forked from extern/egroupware
264 lines
7.8 KiB
PHP
264 lines
7.8 KiB
PHP
<?php
|
|
header('Content-type: text/html; charset=utf-8');
|
|
|
|
// The following variables values must reflect your installation needs.
|
|
|
|
//$aspell_prog = '"C:\Program Files\Aspell\bin\aspell.exe"'; // by FredCK (for Windows)
|
|
//$aspell_prog = 'aspell'; // by FredCK (for Linux)
|
|
|
|
//$lang = 'en_US';
|
|
//$aspell_opts = "-a --lang=$lang --encoding=utf-8 -H --rem-sgml-check=alt"; // by FredCK
|
|
|
|
// This is to prevent abitrary access to FCK's spellchecker.php AND to supply the configured path and lang
|
|
function deny_no_egw_session(&$account)
|
|
{
|
|
die('Access denied, no EGroupware session!');
|
|
}
|
|
$GLOBALS['egw_info'] = array(
|
|
'flags' => array(
|
|
'currentapp' => 'home',
|
|
'noheader' => true,
|
|
'autocreate_session_callback' => 'deny_no_egw_session',
|
|
)
|
|
);
|
|
// will not continue, unless the header get's included and there is a valid eGW session
|
|
require('../../../../../../../header.inc.php');
|
|
|
|
$lang = ($GLOBALS['egw_info']['user']['preferences']['common']['spellchecker_lang'] ?
|
|
$GLOBALS['egw_info']['user']['preferences']['common']['spellchecker_lang']:
|
|
$GLOBALS['egw_info']['user']['preferences']['common']['lang']);
|
|
|
|
$country = $GLOBALS['egw_info']['user']['preferences']['common']['country'];
|
|
|
|
$lang_ext = $lang.'_'.$country;
|
|
$langs = getDictLangs();
|
|
|
|
$aspell_opts = '-a '.escapeshellarg('--lang='.(in_array($lang_ext,$langs)?$lang_ext:$lang)).' --encoding=utf-8 -H --rem-sgml-check=alt'; // by FredCK
|
|
$tempfiledir = "./";
|
|
|
|
$spellercss = '../spellerStyle.css'; // by FredCK
|
|
$word_win_src = '../wordWindow.js'; // by FredCK
|
|
|
|
$textinputs = $_POST['textinputs']; # array
|
|
$input_separator = "A";
|
|
|
|
function getDictLangs()
|
|
{
|
|
static $langs;
|
|
if (is_null($langs)) $langs = egw_cache::getCache(egw_cache::TREE,'spellckecher','aspellDictLangs',$callback=null,$callback_params=array(),$expiration=60*60*1);
|
|
if (isset($langs) && !empty($langs)) return $langs;
|
|
$langs = array();
|
|
$aspell_prog = getAspellPath();
|
|
$cmd = "$aspell_prog dump dicts";
|
|
if( $aspellret = shell_exec( $cmd )) {
|
|
$linesout = explode( "\n", $aspellret );
|
|
$index = 0;
|
|
$text_input_index = -1;
|
|
# parse each line of aspell return
|
|
foreach( $linesout as $key=>$val ) {
|
|
//error_log('spellerpages'.__LINE__.' : '.trim($val));
|
|
$langs[] = trim($val);
|
|
}
|
|
}
|
|
egw_cache::setCache(egw_cache::TREE,'spellchecker','aspellDictLangs',$langs,$expiration=60*60*1);
|
|
return $langs;
|
|
}
|
|
|
|
function getAspellPath()
|
|
{
|
|
if (!empty($GLOBALS['egw_info']['server']['aspell_path']) &&
|
|
is_executable($GLOBALS['egw_info']['server']['aspell_path']))
|
|
{
|
|
$aspell_prog = $GLOBALS['egw_info']['server']['aspell_path'];
|
|
}
|
|
else // little fallback that might save linux users
|
|
{
|
|
$aspell_prog = 'aspell';
|
|
}
|
|
return $aspell_prog;
|
|
}
|
|
|
|
# set the JavaScript variable to the submitted text.
|
|
# textinputs is an array, each element corresponding to the (url-encoded)
|
|
# value of the text control submitted for spell-checking
|
|
function print_textinputs_var() {
|
|
global $textinputs;
|
|
foreach( $textinputs as $key=>$val ) {
|
|
# $val = str_replace( "'", "%27", $val );
|
|
echo "textinputs[$key] = decodeURIComponent(\"" . $val . "\");\n";
|
|
}
|
|
}
|
|
|
|
# make declarations for the text input index
|
|
function print_textindex_decl( $text_input_idx ) {
|
|
echo "words[$text_input_idx] = [];\n";
|
|
echo "suggs[$text_input_idx] = [];\n";
|
|
}
|
|
|
|
# set an element of the JavaScript 'words' array to a misspelled word
|
|
function print_words_elem( $word, $index, $text_input_idx ) {
|
|
echo "words[$text_input_idx][$index] = '" . escape_quote( $word ) . "';\n";
|
|
}
|
|
|
|
|
|
# set an element of the JavaScript 'suggs' array to a list of suggestions
|
|
function print_suggs_elem( $suggs, $index, $text_input_idx ) {
|
|
echo "suggs[$text_input_idx][$index] = [";
|
|
foreach( $suggs as $key=>$val ) {
|
|
if( $val ) {
|
|
echo "'" . escape_quote( $val ) . "'";
|
|
if ( $key+1 < count( $suggs )) {
|
|
echo ", ";
|
|
}
|
|
}
|
|
}
|
|
echo "];\n";
|
|
}
|
|
|
|
# escape single quote
|
|
function escape_quote( $str ) {
|
|
return preg_replace ( "/'/", "\\'", $str );
|
|
}
|
|
|
|
|
|
# handle a server-side error.
|
|
function error_handler( $err ) {
|
|
echo "error = '" . preg_replace( "/['\\\\]/", "\\\\$0", $err ) . "';\n";
|
|
}
|
|
|
|
## get the list of misspelled words. Put the results in the javascript words array
|
|
## for each misspelled word, get suggestions and put in the javascript suggs array
|
|
function print_checker_results() {
|
|
|
|
global $aspell_prog;
|
|
global $aspell_opts;
|
|
global $tempfiledir;
|
|
global $textinputs;
|
|
global $input_separator;
|
|
$aspell_err = "";
|
|
$aspell_prog = getAspellPath();
|
|
|
|
# create temp file
|
|
// use EGroupware's temp_dir
|
|
$tempfile = tempnam( $GLOBALS['egw_info']['server']['temp_dir'], 'aspell_data_' );
|
|
|
|
# open temp file, add the submitted text.
|
|
if( $fh = fopen( $tempfile, 'w' )) {
|
|
for( $i = 0; $i < count( $textinputs ); $i++ ) {
|
|
$text = urldecode( $textinputs[$i] );
|
|
|
|
// Strip all tags for the text. (by FredCK - #339 / #681)
|
|
$text = preg_replace( "/<[^>]+>/", " ", $text ) ;
|
|
|
|
$lines = explode( "\n", $text );
|
|
fwrite ( $fh, "%\n" ); # exit terse mode
|
|
fwrite ( $fh, "^$input_separator\n" );
|
|
fwrite ( $fh, "!\n" ); # enter terse mode
|
|
foreach( $lines as $key=>$value ) {
|
|
# use carat on each line to escape possible aspell commands
|
|
fwrite( $fh, "^$value\n" );
|
|
}
|
|
}
|
|
fclose( $fh );
|
|
|
|
# exec aspell command - redirect STDERR to STDOUT
|
|
$cmd = "$aspell_prog $aspell_opts < $tempfile 2>&1";
|
|
if( $aspellret = shell_exec( $cmd )) {
|
|
$linesout = explode( "\n", $aspellret );
|
|
$index = 0;
|
|
$text_input_index = -1;
|
|
# parse each line of aspell return
|
|
foreach( $linesout as $key=>$val ) {
|
|
$chardesc = substr( $val, 0, 1 );
|
|
# if '&', then not in dictionary but has suggestions
|
|
# if '#', then not in dictionary and no suggestions
|
|
# if '*', then it is a delimiter between text inputs
|
|
# if '@' then version info
|
|
if( $chardesc == '&' || $chardesc == '#' ) {
|
|
$line = explode( " ", $val, 5 );
|
|
print_words_elem( $line[1], $index, $text_input_index );
|
|
if( isset( $line[4] )) {
|
|
$suggs = explode( ", ", $line[4] );
|
|
} else {
|
|
$suggs = array();
|
|
}
|
|
print_suggs_elem( $suggs, $index, $text_input_index );
|
|
$index++;
|
|
} elseif( $chardesc == '*' ) {
|
|
$text_input_index++;
|
|
print_textindex_decl( $text_input_index );
|
|
$index = 0;
|
|
} elseif( $chardesc != '@' && $chardesc != "" ) {
|
|
# assume this is error output
|
|
$aspell_err .= $val;
|
|
}
|
|
}
|
|
if( $aspell_err ) {
|
|
$aspell_err = "Error executing `$cmd`\\n$aspell_err";
|
|
error_handler( $aspell_err );
|
|
}
|
|
} else {
|
|
error_handler( "System error: Aspell program execution failed (`$cmd`)" );
|
|
}
|
|
} else {
|
|
error_handler( "System error: Could not open file '$tempfile' for writing" );
|
|
}
|
|
|
|
# close temp file, delete file
|
|
unlink( $tempfile );
|
|
}
|
|
|
|
|
|
?>
|
|
<html>
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
|
|
<link rel="stylesheet" type="text/css" href="<?php echo $spellercss ?>" />
|
|
<script language="javascript" src="<?php echo $word_win_src ?>"></script>
|
|
<script language="javascript">
|
|
var suggs = new Array();
|
|
var words = new Array();
|
|
var textinputs = new Array();
|
|
var error;
|
|
<?php
|
|
|
|
print_textinputs_var();
|
|
|
|
print_checker_results();
|
|
|
|
?>
|
|
|
|
var wordWindowObj = new wordWindow();
|
|
wordWindowObj.originalSpellings = words;
|
|
wordWindowObj.suggestions = suggs;
|
|
wordWindowObj.textInputs = textinputs;
|
|
|
|
function init_spell() {
|
|
// check if any error occured during server-side processing
|
|
if( error ) {
|
|
alert( error );
|
|
} else {
|
|
// call the init_spell() function in the parent frameset
|
|
if (parent.frames.length) {
|
|
parent.init_spell( wordWindowObj );
|
|
} else {
|
|
alert('This page was loaded outside of a frameset. It might not display properly');
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
</script>
|
|
|
|
</head>
|
|
<!-- <body onLoad="init_spell();"> by FredCK -->
|
|
<body onLoad="init_spell();" bgcolor="#ffffff">
|
|
|
|
<script type="text/javascript">
|
|
wordWindowObj.writeBody();
|
|
</script>
|
|
|
|
</body>
|
|
</html>
|