projects / squirrelmail.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Internationalization almost finished. Only check_me.js left.
[squirrelmail.git] / plugins / squirrelspell / modules / check_me.mod.php
diff --git a/plugins/squirrelspell/modules/check_me.mod.php b/plugins/squirrelspell/modules/check_me.mod.php
index 0a650944d22f8a99ea2c56520fd0a12c005f67b2..1e2945e05515e1178524faed75daff034131ee50 100644 (file)
--- a/plugins/squirrelspell/modules/check_me.mod.php
+++ b/plugins/squirrelspell/modules/check_me.mod.php
@@ -1,15 +1,28 @@
 <?php
 <?php
+   /**
+    **  check_me.mod.php -- Squirrelspell module
+    **
+    **  Copyright (c) 1999-2001 The SquirrelMail development team
+    **  Licensed under the GNU GPL. For full terms see the file COPYING.
+    **
+    **  This module is the main workhorse of SquirrelSpell. It submits
+    **  the message to the spell-checker, parses the output, and loads
+    **  the interface window.
+    **
+    **  $Id$
+    **/
+
+function SpellLink( $cod, $tit, $ln ) {
+
+    echo "<td><a href=\"javascript:$cod\"".
+         " title=\"$tit\">$ln</a>".
+         '</td>';
+
+}
 
 
- /**
-    CHECK_ME.MOD.PHP
-    -----------------
-    This module is the main workhorse of SquirrelSpell. It submits
-    the message to the spell-checker, parses the output, and loads
-    the interface window.
-                                                               **/
 // Declaring globals for E_ALL.
 global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
 // Declaring globals for E_ALL.
 global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
-       $username, $SQSPELL_EREG, $color; 
+       $username, $SQSPELL_EREG, $color;
 
  // Now we explode the lines for three reasons:
  // 1) So we can ignore lines starting with ">" (reply's)
 
  // Now we explode the lines for three reasons:
  // 1) So we can ignore lines starting with ">" (reply's)
@@ -19,10 +32,10 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
  //    ispell/aspell don't treat these as command characters.
  $sqspell_raw_lines = explode("\n", $sqspell_text);
  for ($i=0; $i<sizeof($sqspell_raw_lines); $i++){
  //    ispell/aspell don't treat these as command characters.
  $sqspell_raw_lines = explode("\n", $sqspell_text);
  for ($i=0; $i<sizeof($sqspell_raw_lines); $i++){
-   if (trim($sqspell_raw_lines[$i]) == "--") break;
-   if(substr($sqspell_raw_lines[$i], 0, 1) != ">") 
-    $sqspell_new_lines[$i] = " " . $sqspell_raw_lines[$i];
-    else $sqspell_new_lines[$i] = "";
+   if (trim($sqspell_raw_lines[$i]) == '--') break;
+   if(substr($sqspell_raw_lines[$i], 0, 1) != '>')
+    $sqspell_new_lines[$i] = ' ' . $sqspell_raw_lines[$i];
+    else $sqspell_new_lines[$i] = '';
  }
  $sqspell_new_text=implode("\n", $sqspell_new_lines);
 
  }
  $sqspell_new_text=implode("\n", $sqspell_new_lines);
 
@@ -35,8 +48,8 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
  // NOTE: This will probably change in future releases of squirrelspell
  // for privacy reasons.
  //
  // NOTE: This will probably change in future releases of squirrelspell
  // for privacy reasons.
  //
- $floc = "$attachment_dir/$username" . "_sqspell_data.txt";
- $fp=fopen($floc, "w");
+ $floc = "$attachment_dir/$username_sqspell_data.txt";
+ $fp=fopen($floc, 'w');
  fwrite($fp, $sqspell_new_text);
  fclose($fp);
  exec("cat $floc | $sqspell_command", $sqspell_output);
  fwrite($fp, $sqspell_new_text);
  fclose($fp);
  exec("cat $floc | $sqspell_command", $sqspell_output);
@@ -54,30 +67,31 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
  // in ispell compatibility mode, whichever).
  for ($i=0; $i<sizeof($sqspell_output); $i++){
   switch (substr($sqspell_output[$i], 0, 1)){
  // in ispell compatibility mode, whichever).
  for ($i=0; $i<sizeof($sqspell_output); $i++){
   switch (substr($sqspell_output[$i], 0, 1)){
-  case "":
+  case '':
     // Ispell adds empty lines when an end of line is reached
     $current_line++;
     break;
 
     // Ispell adds empty lines when an end of line is reached
     $current_line++;
     break;
 
-  case "&":
+  case '&':
     // This means there's a misspelled word and a few suggestions.
     list($left, $right) = explode(": ", $sqspell_output[$i]);
     $tmparray = explode(" ", $left);
     $sqspell_word=$tmparray[1];
     // Check if the word is in user dictionary.
     // This means there's a misspelled word and a few suggestions.
     list($left, $right) = explode(": ", $sqspell_output[$i]);
     $tmparray = explode(" ", $left);
     $sqspell_word=$tmparray[1];
     // Check if the word is in user dictionary.
-    if (!$SQSPELL_EREG("\n$sqspell_word\n", $words)){ 
+    if (!$SQSPELL_EREG("\n$sqspell_word\n", $words)){
      $sqspell_symb=intval($tmparray[3])-1;
      if (!$misses[$sqspell_word]) {
      $sqspell_symb=intval($tmparray[3])-1;
      if (!$misses[$sqspell_word]) {
-       $misses[$sqspell_word] = $right;
-       $missed_words[$errors] = $sqspell_word;
-       $errors++;
+        $misses[$sqspell_word] = $right;
+        $missed_words[$errors] = $sqspell_word;
+        $errors++;
      }
      }
-     if ($locations[$sqspell_word]) $locations[$sqspell_word] .= ", ";
+     if ($locations[$sqspell_word])
+        $locations[$sqspell_word] .= ', ';
      $locations[$sqspell_word] .= "$current_line:$sqspell_symb";
     }
     break;
 
      $locations[$sqspell_word] .= "$current_line:$sqspell_symb";
     }
     break;
 
-  case "#":
+  case '#':
     // This means a misspelled word and no suggestions.
     $tmparray = explode(" ", $sqspell_output[$i]);
     $sqspell_word=$tmparray[1];
     // This means a misspelled word and no suggestions.
     $tmparray = explode(" ", $sqspell_output[$i]);
     $sqspell_word=$tmparray[1];
@@ -85,74 +99,76 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
     if (!$SQSPELL_EREG("\n$sqspell_word\n", $words)){
      $sqspell_symb=intval($tmparray[2])-1;
      if (!$misses[$sqspell_word]) {
     if (!$SQSPELL_EREG("\n$sqspell_word\n", $words)){
      $sqspell_symb=intval($tmparray[2])-1;
      if (!$misses[$sqspell_word]) {
-       $misses[$sqspell_word] = "_NONE";
-       $missed_words[$errors] = $sqspell_word;
-       $errors++;
+        $misses[$sqspell_word] = '_NONE';
+        $missed_words[$errors] = $sqspell_word;
+        $errors++;
      }
      }
-     if ($locations[$sqspell_word]) $locations[$sqspell_word] .= ", ";
+     if ($locations[$sqspell_word]) $locations[$sqspell_word] .= ', ';
      $locations[$sqspell_word] .= "$current_line:$sqspell_symb";
     }
     break;
   }
  }
 
      $locations[$sqspell_word] .= "$current_line:$sqspell_symb";
     }
     break;
   }
  }
 
- if ($errors){ 
+ if ($errors){
   // So, there are errors
   // This is the only place where the generic GUI-wrapper is not
   // called, but generated right here. This is due to the complexity
   // of the output.
   // So, there are errors
   // This is the only place where the generic GUI-wrapper is not
   // called, but generated right here. This is due to the complexity
   // of the output.
-  ?>
-  <html>
-  <head>
-   <title>SquirrelSpell Results</title>
-   <script type="text/javascript">
-     // Load the spelling errors into JavaScript arrays
-     <!--
-     <?php
-     $sqspell_lines = explode("\n", $sqspell_text);
-     echo "// All lines of the message
-     var sqspell_lines=new Array();\n";
-     for ($i=0; $i<sizeof($sqspell_lines); $i++){
-       echo "sqspell_lines[$i] = \"" . chop(addslashes($sqspell_lines[$i])) . "\";\n";
-     }
 
 
-     echo "\n\n";
-     echo "// Misses are all misspelled words
-     var misses=new Array();\n";
-     for ($i=0; $i<sizeof($missed_words); $i++){
+  echo "<html>\n".
+       "<head>\n".
+       '<title>' . _("SquirrelSpell Results") . '</title>';
+    if ($theme_css != '') {
+        echo "<LINK REL=\"stylesheet\" TYPE=\"text/css\" HREF=\"$theme_css\">\n";
+    }
+    // Load the spelling errors into JavaScript arrays
+    echo "<script type=\"text/javascript\">\n".
+         "<!--\n";
+
+    $sqspell_lines = explode("\n", $sqspell_text);
+    // All lines of the message
+    echo "var sqspell_lines=new Array();\n";
+    for ($i=0; $i<sizeof($sqspell_lines); $i++){
+      echo "sqspell_lines[$i] = \"" . chop(addslashes($sqspell_lines[$i])) . "\";\n";
+    }
+
+    echo "\n\n";
+    // Misses are all misspelled words
+    echo "var misses=new Array();\n";
+    for ($i=0; $i<sizeof($missed_words); $i++){
        echo "misses[$i] = \"" . $missed_words[$i] . "\";\n";
        echo "misses[$i] = \"" . $missed_words[$i] . "\";\n";
-     }
+    }
 
 
-     echo "\n\n";
-     echo "// Suggestions are (guess what!) suggestions for misspellings
-     var suggestions = new Array();\n";
-     $i=0;
-     while (list($word, $value) = each($misses)){
-       if ($value=="_NONE") $value="";
+    echo "\n\n";
+    // Suggestions are (guess what!) suggestions for misspellings
+    echo "var suggestions = new Array();\n";
+    $i=0;
+    while (list($word, $value) = each($misses)){
+       if ($value=='_NONE') $value='';
        echo "suggestions[$i] = \"$value\";\n";
        $i++;
        echo "suggestions[$i] = \"$value\";\n";
        $i++;
-     }
+    }
 
 
-     echo "\n\n";
-     echo "// Locations are where those misspellings are located, line:symbol
-     var locations= new Array();\n";
-     $i=0;
-     while (list($word, $value) = each($locations)){
+    echo "\n\n";
+    // Locations are where those misspellings are located, line:symbol
+    echo "var locations= new Array();\n";
+    $i=0;
+    while (list($word, $value) = each($locations)){
        echo "locations[$i] = \"$value\";\n";
        $i++;
        echo "locations[$i] = \"$value\";\n";
        $i++;
-     }
-     ?>
-     // Why isn't there a booger fairy?
-     //-->
-   </script>
-   <script src="js/check_me.js" type="text/javascript"></script>
-   </head>
-  <?php
-  printf('<body bgcolor="%s" text="%s" link="%s" alink="%s" vlink="%s" onload="populateSqspellForm()">', $color[4], $color[8], $color[7], $color[7], $color[7]);
-   ?>
-   <table width="100%" border="0" cellpadding="2">
-   <tr><td bgcolor="<?php echo $color[9] ?>" align="center"><b>Found <?php 
-       echo $errors ?> errors</b></td></tr>
+    }
+    // Why isn't there a booger fairy?
+    echo "//-->\n".
+         "</script>\n".
+         "<script src=\"js/check_me.php\" type=\"text/javascript\"></script>\n".
+         "</head>\n";
+
+    echo "<body bgcolor=\"$color[4]\" text=\"$color[8]\" link=\"$color[7]\" alink=\"$color[7]\" vlink=\"$color[7]\" onload=\"populateSqspellForm()\">\n".
+         '<table width="100%" border="0" cellpadding="2">'.
+         "<tr><td bgcolor=\"$color[9]\" align=center><b>";
+    printf( _("Found %s errors"), $errors );
+?></b></td></tr>
    <tr><td><hr></td></tr>
    <tr><td>
    <form method="post">
    <tr><td><hr></td></tr>
    <tr><td>
    <form method="post">
@@ -162,40 +178,53 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
    <table border="0" width="100%">
     <tr align="center">
      <td colspan="4">
    <table border="0" width="100%">
     <tr align="center">
      <td colspan="4">
-      <span style="background-color:<?php echo $color[9] ?>">Line with an error:</span><br>
+<?php
+    $sptag = "<span style=\"background-color: $color[9]\">";
+    echo $sptag . _("Line with an error:") . '</span>';
+?>
+      <br>
       <textarea name="sqspell_line_area" cols="50" rows="3" wrap="hard" onfocus="this.blur()"></textarea>
      </td>
     </tr>
     <tr valign="middle">
      <td align="right" width="25%">
       <textarea name="sqspell_line_area" cols="50" rows="3" wrap="hard" onfocus="this.blur()"></textarea>
      </td>
     </tr>
     <tr valign="middle">
      <td align="right" width="25%">
-      <span style="background-color: <?php echo $color[9] ?>">Error:</span> 
+<?php
+    echo $sptag . _("Error:") . '</span>';
+?>
      </td>
      <td align="left" width="25%">
       <input name="sqspell_error" size="10" value="" onfocus="this.blur()">
      </td>
      <td align="right" width="25%">
      </td>
      <td align="left" width="25%">
       <input name="sqspell_error" size="10" value="" onfocus="this.blur()">
      </td>
      <td align="right" width="25%">
-      <span style="background-color: <?php echo $color[9] ?>">Suggestions:</span> 
+<?php
+    echo $sptag . _("Suggestions:") . '</span>';
+?>
      </td>
      <td align="left" width="25%">
       <select name="sqspell_suggestion" onchange="if (this.options[this.selectedIndex].value != '_NONE') document.forms[0].sqspell_oruse.value=this.options[this.selectedIndex].value">
      </td>
      <td align="left" width="25%">
       <select name="sqspell_suggestion" onchange="if (this.options[this.selectedIndex].value != '_NONE') document.forms[0].sqspell_oruse.value=this.options[this.selectedIndex].value">
-       <option>Suggestions</option>
+<?php
+    echo '<option>' . _("Suggestions") . '</option>';
+?>
       </select>
      </td>
     </tr>
     <tr>
      <td align="right">
       </select>
      </td>
     </tr>
     <tr>
      <td align="right">
-      <span style="background-color: <?php echo $color[9] ?>">Change to:</span> 
+<?php
+    echo $sptag . _("Change to:") . '</span>';
+?>
      </td>
      <td align="left">
       <input name="sqspell_oruse" size="15" value=""
         onfocus="if(!this.value) this.value=document.forms[0].sqspell_error.value">
      </td>
      <td align="right">
      </td>
      <td align="left">
       <input name="sqspell_oruse" size="15" value=""
         onfocus="if(!this.value) this.value=document.forms[0].sqspell_error.value">
      </td>
      <td align="right">
-      <span style="background-color: <?php echo $color[9] ?>">Occurs times:</span> 
+<?php
+    echo $sptag . _("Occurs times:") . '</span>';
+?>
      </td>
      <td align="left">
      </td>
      <td align="left">
-      <input name="sqspell_likethis" size=3 value=""
-       onfocus="this.blur()">
+      <input name="sqspell_likethis" size=3 value="" onfocus="this.blur()">
      </td>
     </tr>
    </td></tr>
      </td>
     </tr>
    </td></tr>
@@ -203,36 +232,45 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
     <tr>
      <td colspan="4">
       <table border="0" cellpadding="0" cellspacing="3" width="100%">
     <tr>
      <td colspan="4">
       <table border="0" cellpadding="0" cellspacing="3" width="100%">
-       <tr align="center" bgcolor="<?php echo $color[9] ?>">
-        <td>
-         <a href="javascript:sqspellChange()"
-         title="Change this word">Change</a>
-        </td>
-        <td>
-         <a href="javascript:sqspellChangeAll()"
-         title="Change ALL occurances of this word">Change All</a>
-        </td>
-        <td>
-         <a href="javascript:sqspellIgnore()"
-         title="Ignore this word">Ignore</a>
-        </td>
-        <td>
-         <a href="javascript:sqspellIgnoreAll()"
-         title="Ignore ALL occurances of this word">Ignore All</a>
-        </td>
-       <td>
-        <a href="javascript:sqspellRemember()" 
-         title="Add this word to your personal dictionary">Add to Dic</a>
-       </td>
+<?php
+    echo "<tr align=center bgcolor=\"$color[9]\">";
+
+    SpellLink( 'sqspellChange()',
+               _("Change this word"),
+               _("Change") );
+    SpellLink( 'sqspellChangeAll()',
+               _("Change ALL occurances of this word"),
+               _("Change All") );
+    SpellLink( 'sqspellIgnore()',
+               _("Ignore this word"),
+               _("Ignore") );
+    SpellLink( 'sqspellIgnoreAll()',
+               _("Ignore ALL occurances this word"),
+               _("Ignore All") );
+    SpellLink( 'sqspellRemember()',
+               _("Add this word to your personal dictionary"),
+               _("Add to Dic") );
+?>
        </tr>
       </table>
      </td>
     </tr>
     <tr><td colspan="4"><hr></td></tr>
     <tr>
        </tr>
       </table>
      </td>
     </tr>
     <tr><td colspan="4"><hr></td></tr>
     <tr>
-     <td colspan="4" align="center" bgcolor="<?php echo $color[9] ?>">
-      <input type="button" value="  Close and Commit  " onclick="if (confirm('The spellcheck is not finished. Really close and commit changes?')) sqspellCommitChanges()"> 
-      <input type="button" value="  Close and Cancel  " onclick="if (confirm('The spellcheck is not finished. Really close and discard changes?')) self.close()">
+<?php
+
+    echo "<td colspan=4 align=center bgcolor=\"$color[9]\">" .
+         '<input type="button" value="  ' .
+         _("Close and Commit") .
+         '  " onclick="if (confirm(\''.
+         _("The spellcheck is not finished. Really close and commit changes?").
+         '\')) sqspellCommitChanges()">'.
+         ' <input type="button" value="  '.
+         _("Close and Cancel") .
+         '  " onclick="if (confirm(\''.
+         _("The spellcheck is not finished. Really close and discard changes?").
+         '\')) self.close()">';
+?>
      </td>
     </tr>
    </table>
      </td>
     </tr>
    </table>
@@ -244,7 +282,7 @@ global $sqspell_text, $SQSPELL_APP, $sqspell_use_app, $attachment_dir,
   <?php
  } else {
    // AREN'T YOU SUCH A KNOW-IT-ALL!
   <?php
  } else {
    // AREN'T YOU SUCH A KNOW-IT-ALL!
-   $msg="<form onsubmit=\"return false\"><div align=\"center\"><input type=\"submit\" value=\"  Close  \" onclick=\"self.close()\"></div></form>";
-   sqspell_makeWindow(null, "No errors found", null, $msg);
+   $msg="<form onsubmit=\"return false\"><div align=\"center\"><input type=\"submit\" value=\"  " . _("Close") . "  \" onclick=\"self.close()\"></div></form>";
+   sqspell_makeWindow(null, _("No errors found"), null, $msg);
  }
 ?>
  }
 ?>
Unnamed repository; edit this file 'description' to name the repository.