Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F120822786
enchant.php
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Authored By
Unknown
Size
5 KB
Referenced Files
None
Subscribers
None
enchant.php
View Options
<?php
/**
+-----------------------------------------------------------------------+
| This file is part of the Roundcube Webmail client |
| |
| Copyright (C) The Roundcube Dev Team |
| Copyright (C) Kolab Systems AG |
| |
| Licensed under the GNU General Public License version 3 or |
| any later version with exceptions for skins & plugins. |
| See the README file for a full license statement. |
| |
| PURPOSE: |
| Spellchecking backend implementation to work with Enchant |
+-----------------------------------------------------------------------+
| Author: Aleksander Machniak <machniak@kolabsys.com> |
+-----------------------------------------------------------------------+
*/
/**
* Spellchecking backend implementation to work with Pspell
*
* @package Framework
* @subpackage Utils
*/
class
rcube_spellchecker_enchant
extends
rcube_spellchecker_engine
{
private
$enchant_broker
;
private
$enchant_dictionary
;
private
$matches
=
[];
/**
* Return a list of languages supported by this backend
*
* @see rcube_spellchecker_engine::languages()
*/
function
languages
()
{
$this
->
init
();
if
(!
$this
->
enchant_broker
)
{
return
[];
}
$langs
=
[];
if
(
$dicts
=
enchant_broker_list_dicts
(
$this
->
enchant_broker
))
{
foreach
(
$dicts
as
$dict
)
{
$langs
[]
=
preg_replace
(
'/-.*$/'
,
''
,
$dict
[
'lang_tag'
]);
}
}
return
array_unique
(
$langs
);
}
/**
* Initializes Enchant dictionary
*/
private
function
init
()
{
if
(!
$this
->
enchant_broker
)
{
if
(!
extension_loaded
(
'enchant'
))
{
$this
->
error
=
"Enchant extension not available"
;
return
;
}
$this
->
enchant_broker
=
enchant_broker_init
();
}
if
(!
enchant_broker_dict_exists
(
$this
->
enchant_broker
,
$this
->
lang
))
{
$this
->
error
=
"Unable to load dictionary for selected language using Enchant"
;
return
;
}
$this
->
enchant_dictionary
=
enchant_broker_request_dict
(
$this
->
enchant_broker
,
$this
->
lang
);
}
/**
* Set content and check spelling
*
* @see rcube_spellchecker_engine::check()
*/
function
check
(
$text
)
{
$this
->
init
();
if
(!
$this
->
enchant_dictionary
)
{
return
[];
}
// tokenize
$text
=
preg_split
(
$this
->
separator
,
$text
,
-
1
,
PREG_SPLIT_NO_EMPTY
|
PREG_SPLIT_OFFSET_CAPTURE
);
$diff
=
0
;
$matches
=
[];
foreach
(
$text
as
$w
)
{
$word
=
trim
(
$w
[
0
]);
$pos
=
$w
[
1
]
-
$diff
;
$len
=
mb_strlen
(
$word
);
if
(
$this
->
dictionary
->
is_exception
(
$word
))
{
// skip exceptions
}
else
if
(!
enchant_dict_check
(
$this
->
enchant_dictionary
,
$word
))
{
$suggestions
=
enchant_dict_suggest
(
$this
->
enchant_dictionary
,
$word
);
if
(
is_array
(
$suggestions
)
&&
count
(
$suggestions
)
>
self
::
MAX_SUGGESTIONS
)
{
$suggestions
=
array_slice
(
$suggestions
,
0
,
self
::
MAX_SUGGESTIONS
);
}
$matches
[]
=
[
$word
,
$pos
,
$len
,
null
,
$suggestions
];
}
$diff
+=
(
strlen
(
$word
)
-
$len
);
}
$this
->
matches
=
$matches
;
return
$matches
;
}
/**
* Returns suggestions for the specified word
*
* @see rcube_spellchecker_engine::get_words()
*/
function
get_suggestions
(
$word
)
{
$this
->
init
();
if
(!
$this
->
enchant_dictionary
)
{
return
[];
}
$suggestions
=
enchant_dict_suggest
(
$this
->
enchant_dictionary
,
$word
);
if
(
is_array
(
$suggestions
)
&&
count
(
$suggestions
)
>
self
::
MAX_SUGGESTIONS
)
{
$suggestions
=
array_slice
(
$suggestions
,
0
,
self
::
MAX_SUGGESTIONS
);
}
return
is_array
(
$suggestions
)
?
$suggestions
:
[];
}
/**
* Returns misspelled words
*
* @see rcube_spellchecker_engine::get_suggestions()
*/
function
get_words
(
$text
=
null
)
{
$result
=
[];
if
(
$text
)
{
// init spellchecker
$this
->
init
();
if
(!
$this
->
enchant_dictionary
)
{
return
[];
}
// With Enchant we don't need to get suggestions to return misspelled words
$text
=
preg_split
(
$this
->
separator
,
$text
,
-
1
,
PREG_SPLIT_NO_EMPTY
|
PREG_SPLIT_OFFSET_CAPTURE
);
foreach
(
$text
as
$w
)
{
$word
=
trim
(
$w
[
0
]);
// skip exceptions
if
(
$this
->
dictionary
->
is_exception
(
$word
))
{
continue
;
}
if
(!
enchant_dict_check
(
$this
->
enchant_dictionary
,
$word
))
{
$result
[]
=
$word
;
}
}
return
$result
;
}
foreach
(
$this
->
matches
as
$m
)
{
$result
[]
=
$m
[
0
];
}
return
$result
;
}
}
File Metadata
Details
Attached
Mime Type
text/x-php
Expires
Fri, Apr 24, 9:55 AM (1 w, 9 h ago)
Storage Engine
local-disk
Storage Format
Raw Data
Storage Handle
ee/27/57723d56cb64458e5a1295a3e01d
Default Alt Text
enchant.php (5 KB)
Attached To
Mode
R113 roundcubemail
Attached
Detach File
Event Timeline