2 header('Content-type: text/html; charset=utf-8');
\r
4 // The following variables values must reflect your installation needs.
\r
6 $aspell_prog = '"C:\Program Files\Aspell\bin\aspell.exe"'; // by FredCK (for Windows)
\r
7 //$aspell_prog = 'aspell'; // by FredCK (for Linux)
\r
10 $aspell_opts = "-a --lang=$lang --encoding=utf-8 -H --rem-sgml-check=alt"; // by FredCK
\r
12 $tempfiledir = "./";
\r
14 $spellercss = '../spellerStyle.css'; // by FredCK
\r
15 $word_win_src = '../wordWindow.js'; // by FredCK
\r
17 $textinputs = $_POST['textinputs']; # array
\r
18 $input_separator = "A";
\r
20 # set the JavaScript variable to the submitted text.
\r
21 # textinputs is an array, each element corresponding to the (url-encoded)
\r
22 # value of the text control submitted for spell-checking
\r
23 function print_textinputs_var() {
\r
25 foreach( $textinputs as $key=>$val ) {
\r
26 # $val = str_replace( "'", "%27", $val );
\r
27 echo "textinputs[$key] = decodeURIComponent(\"" . $val . "\");\n";
\r
31 # make declarations for the text input index
\r
32 function print_textindex_decl( $text_input_idx ) {
\r
33 echo "words[$text_input_idx] = [];\n";
\r
34 echo "suggs[$text_input_idx] = [];\n";
\r
37 # set an element of the JavaScript 'words' array to a misspelled word
\r
38 function print_words_elem( $word, $index, $text_input_idx ) {
\r
39 echo "words[$text_input_idx][$index] = '" . escape_quote( $word ) . "';\n";
\r
43 # set an element of the JavaScript 'suggs' array to a list of suggestions
\r
44 function print_suggs_elem( $suggs, $index, $text_input_idx ) {
\r
45 echo "suggs[$text_input_idx][$index] = [";
\r
46 foreach( $suggs as $key=>$val ) {
\r
48 echo "'" . escape_quote( $val ) . "'";
\r
49 if ( $key+1 < count( $suggs )) {
\r
57 # escape single quote
\r
58 function escape_quote( $str ) {
\r
59 return preg_replace ( "/'/", "\\'", $str );
\r
63 # handle a server-side error.
\r
64 function error_handler( $err ) {
\r
65 echo "error = '" . preg_replace( "/['\\\\]/", "\\\\$0", $err ) . "';\n";
\r
68 ## get the list of misspelled words. Put the results in the javascript words array
\r
69 ## for each misspelled word, get suggestions and put in the javascript suggs array
\r
70 function print_checker_results() {
\r
72 global $aspell_prog;
\r
73 global $aspell_opts;
\r
74 global $tempfiledir;
\r
76 global $input_separator;
\r
79 $tempfile = tempnam( $tempfiledir, 'aspell_data_' );
\r
81 # open temp file, add the submitted text.
\r
82 if( $fh = fopen( $tempfile, 'w' )) {
\r
83 for( $i = 0; $i < count( $textinputs ); $i++ ) {
\r
84 $text = urldecode( $textinputs[$i] );
\r
86 // Strip all tags for the text. (by FredCK - #339 / #681)
\r
87 $text = preg_replace( "/<[^>]+>/", " ", $text ) ;
\r
89 $lines = explode( "\n", $text );
\r
90 fwrite ( $fh, "%\n" ); # exit terse mode
\r
91 fwrite ( $fh, "^$input_separator\n" );
\r
92 fwrite ( $fh, "!\n" ); # enter terse mode
\r
93 foreach( $lines as $key=>$value ) {
\r
94 # use carat on each line to escape possible aspell commands
\r
95 fwrite( $fh, "^$value\n" );
\r
100 # exec aspell command - redirect STDERR to STDOUT
\r
101 $cmd = "$aspell_prog $aspell_opts < $tempfile 2>&1";
\r
102 if( $aspellret = shell_exec( $cmd )) {
\r
103 $linesout = explode( "\n", $aspellret );
\r
105 $text_input_index = -1;
\r
106 # parse each line of aspell return
\r
107 foreach( $linesout as $key=>$val ) {
\r
108 $chardesc = substr( $val, 0, 1 );
\r
109 # if '&', then not in dictionary but has suggestions
\r
110 # if '#', then not in dictionary and no suggestions
\r
111 # if '*', then it is a delimiter between text inputs
\r
112 # if '@' then version info
\r
113 if( $chardesc == '&' || $chardesc == '#' ) {
\r
114 $line = explode( " ", $val, 5 );
\r
115 print_words_elem( $line[1], $index, $text_input_index );
\r
116 if( isset( $line[4] )) {
\r
117 $suggs = explode( ", ", $line[4] );
\r
121 print_suggs_elem( $suggs, $index, $text_input_index );
\r
123 } elseif( $chardesc == '*' ) {
\r
124 $text_input_index++;
\r
125 print_textindex_decl( $text_input_index );
\r
127 } elseif( $chardesc != '@' && $chardesc != "" ) {
\r
128 # assume this is error output
\r
129 $aspell_err .= $val;
\r
132 if( $aspell_err ) {
\r
133 $aspell_err = "Error executing `$cmd`\\n$aspell_err";
\r
134 error_handler( $aspell_err );
\r
137 error_handler( "System error: Aspell program execution failed (`$cmd`)" );
\r
140 error_handler( "System error: Could not open file '$tempfile' for writing" );
\r
143 # close temp file, delete file
\r
144 unlink( $tempfile );
\r
151 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
\r
152 <link rel="stylesheet" type="text/css" href="<?php echo $spellercss ?>" />
\r
153 <script language="javascript" src="<?php echo $word_win_src ?>"></script>
\r
154 <script language="javascript">
\r
155 var suggs = new Array();
\r
156 var words = new Array();
\r
157 var textinputs = new Array();
\r
161 print_textinputs_var();
\r
163 print_checker_results();
\r
167 var wordWindowObj = new wordWindow();
\r
168 wordWindowObj.originalSpellings = words;
\r
169 wordWindowObj.suggestions = suggs;
\r
170 wordWindowObj.textInputs = textinputs;
\r
172 function init_spell() {
\r
173 // check if any error occured during server-side processing
\r
177 // call the init_spell() function in the parent frameset
\r
178 if (parent.frames.length) {
\r
179 parent.init_spell( wordWindowObj );
\r
181 alert('This page was loaded outside of a frameset. It might not display properly');
\r
191 <!-- <body onLoad="init_spell();"> by FredCK -->
\r
192 <body onLoad="init_spell();" bgcolor="#ffffff">
\r
194 <script type="text/javascript">
\r
195 wordWindowObj.writeBody();
\r