summaryrefslogtreecommitdiff
path: root/program/steps/mail/spell_pspell.inc
diff options
context:
space:
mode:
authorthomascube <thomas@roundcube.net>2008-08-15 10:35:09 +0000
committerthomascube <thomas@roundcube.net>2008-08-15 10:35:09 +0000
commit5d2b7fd387bd887be957d9221c66a030b374938b (patch)
tree77f61462422cf770536a04fe0e62a24bacfc8cb3 /program/steps/mail/spell_pspell.inc
parentac5d15de2946cbd8988c11de0f218aeb1acf58dc (diff)
Added pspell support patch by Kris Steinhoff (#1483960)
Diffstat (limited to 'program/steps/mail/spell_pspell.inc')
-rw-r--r--program/steps/mail/spell_pspell.inc54
1 files changed, 54 insertions, 0 deletions
diff --git a/program/steps/mail/spell_pspell.inc b/program/steps/mail/spell_pspell.inc
new file mode 100644
index 000000000..ad637e85b
--- /dev/null
+++ b/program/steps/mail/spell_pspell.inc
@@ -0,0 +1,54 @@
+<?php
+
+/*
+ +-----------------------------------------------------------------------+
+ | program/steps/mail/spell_pspell.inc |
+ | |
+ | This file is part of the RoundCube Webmail client |
+ | Licensed under the GNU GPL |
+ | |
+ | PURPOSE: |
+ | Use the Pspell extension to check spelling, returns results |
+ | compatible with spell_googie.inc. |
+ | |
+ +-----------------------------------------------------------------------+
+ | Author: Kris Steinhoff <steinhof@umich.edu> |
+ +-----------------------------------------------------------------------+
+
+ $Id$
+
+*/
+
+if (!extension_loaded('pspell')) {
+ raise_error(array(
+ 'code' => 500,
+ 'file' => __FILE__,
+ 'message' => "Pspell extension not available"), true, false);
+
+ header('HTTP/1.1 404 Not Found');
+ exit;
+}
+
+$data = file_get_contents('php://input');
+$xml = simplexml_load_string($data);
+$text = (string)$xml->text;
+$words = preg_split('/[ !"#$%&()*+\\,-.\/\n:;<=>?@\[\]^_{|}]+/', $text, NULL, PREG_SPLIT_NO_EMPTY | PREG_SPLIT_OFFSET_CAPTURE );
+$plink = pspell_new(get_input_value('lang', RCUBE_INPUT_GET), null, null, 'utf-8');
+$out = '<?xml version="1.0" encoding="UTF-8"?><spellresult charschecked="'.strlen($text).'">';
+foreach ($words as $w) {
+ $word = $w[0];
+ $pos = $w[1];
+ $len = strlen($word);
+ if (!pspell_check($plink, $word)) {
+ $suggestions = pspell_suggest($plink, $word);
+ $out .= '<c o="'.$pos.'" l="'.$len.'">';
+ $out .= implode("\t", $suggestions);
+ $out .= '</c>';
+ }
+}
+$out .= '</spellresult>';
+
+echo $out;
+exit;
+
+?>