Subversion Repositories Applications.papyrus

<?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

$tempfiledir    = "./";

$spellercss             = '../spellerStyle.css';                                                // by FredCK
$word_win_src   = '../wordWindow.js';                                                   // by FredCK

$textinputs             = $_POST['textinputs']; # array
$input_separator = "A";

# 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 = "";
        # create temp file
        $tempfile = tempnam( $tempfiledir, '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>