thmlplain.cpp Source File

00001 /******************************************************************************
00002  *
00003  * thmlplain -  SWFilter decendant to strip out all ThML tags or convert to
00004  *              ASCII rendered symbols.
00005  */
00006 
00007 
00008 #include <stdlib.h>
00009 #include <string.h>
00010 #include <thmlplain.h>
00011 
00012 
00013 ThMLPlain::ThMLPlain() {
00014 }
00015 
00016 
00017 char ThMLPlain::ProcessText(char *text, int maxlen)
00018 {
00019         char *to, *from, token[2048];
00020         int tokpos = 0;
00021         bool intoken = false;
00022         int len;
00023         bool ampersand = false;
00024 
00025         len = strlen(text) + 1;                                         // shift string to right of buffer
00026         if (len < maxlen) {
00027                 memmove(&text[maxlen - len], text, len);
00028                 from = &text[maxlen - len];
00029         }
00030         else    from = text;                                                    // -------------------------------
00031 
00032         for (to = text; *from; from++) {
00033                 if (*from == 10 || *from == 13)
00034                         from++;
00035                 if (*from == '<') {
00036                         intoken = true;
00037                         tokpos = 0;
00038                         token[0] = 0;
00039                         token[1] = 0;
00040                         token[2] = 0;
00041                         ampersand = false;
00042                         continue;
00043                 }
00044                 else if (*from == '&') {
00045                         intoken = true;
00046                         tokpos = 0;
00047                         token[0] = 0;
00048                         token[1] = 0;
00049                         token[2] = 0;
00050                         ampersand = true;
00051                         continue;
00052                 }
00053                 if (*from == ';' && ampersand) {
00054                         intoken = false;
00055 
00056                         if (!strncmp("nbsp", token, 4)) *to++ = ' ';
00057                         else if (!strncmp("quot", token, 4)) *to++ = '"';
00058                         else if (!strncmp("amp", token, 3)) *to++ = '&';
00059                         else if (!strncmp("lt", token, 2)) *to++ = '<';
00060                         else if (!strncmp("gt", token, 2)) *to++ = '>';
00061                         else if (!strncmp("brvbar", token, 6)) *to++ = '|';
00062                         else if (!strncmp("sect", token, 4)) *to++ = '§';
00063                         else if (!strncmp("copy", token, 4)) *to++ = '©';
00064                         else if (!strncmp("laquo", token, 5)) *to++ = '«';
00065                         else if (!strncmp("reg", token, 3)) *to++ = '®';
00066                         else if (!strncmp("acute", token, 5)) *to++ = '´';
00067                         else if (!strncmp("para", token, 4)) *to++ = '¶';
00068                         else if (!strncmp("raquo", token, 5)) *to++ = '»';
00069 
00070                         else if (!strncmp("Aacute", token, 6)) *to++ = 'Á';
00071                         else if (!strncmp("Agrave", token, 6)) *to++ = 'À';
00072                         else if (!strncmp("Acirc", token, 5)) *to++ = 'Â';
00073                         else if (!strncmp("Auml", token, 4)) *to++ = 'Ä';
00074                         else if (!strncmp("Atilde", token, 6)) *to++ = 'Ã';
00075                         else if (!strncmp("Aring", token, 5)) *to++ = 'Å';
00076                         else if (!strncmp("aacute", token, 6)) *to++ = 'á';
00077                         else if (!strncmp("agrave", token, 6)) *to++ = 'à';
00078                         else if (!strncmp("acirc", token, 5)) *to++ = 'â';
00079                         else if (!strncmp("auml", token, 4)) *to++ = 'ä';
00080                         else if (!strncmp("atilde", token, 6)) *to++ = 'ã';
00081                         else if (!strncmp("aring", token, 5)) *to++ = 'å';
00082                         else if (!strncmp("Eacute", token, 6)) *to++ = 'É';
00083                         else if (!strncmp("Egrave", token, 6)) *to++ = 'È';
00084                         else if (!strncmp("Ecirc", token, 5)) *to++ = 'Ê';
00085                         else if (!strncmp("Euml", token, 4)) *to++ = 'Ë';
00086                         else if (!strncmp("eacute", token, 6)) *to++ = 'é';
00087                         else if (!strncmp("egrave", token, 6)) *to++ = 'è';
00088                         else if (!strncmp("ecirc", token, 5)) *to++ = 'ê';
00089                         else if (!strncmp("euml", token, 4)) *to++ = 'ë';
00090                         else if (!strncmp("Iacute", token, 6)) *to++ = 'Í';
00091                         else if (!strncmp("Igrave", token, 6)) *to++ = 'Ì';
00092                         else if (!strncmp("Icirc", token, 5)) *to++ = 'Î';
00093                         else if (!strncmp("Iuml", token, 4)) *to++ = 'Ï';
00094                         else if (!strncmp("iacute", token, 6)) *to++ = 'í';
00095                         else if (!strncmp("igrave", token, 6)) *to++ = 'ì';
00096                         else if (!strncmp("icirc", token, 5)) *to++ = 'î';
00097                         else if (!strncmp("iuml", token, 4)) *to++ = 'ï';
00098                         else if (!strncmp("Oacute", token, 6)) *to++ = 'Ó';
00099                         else if (!strncmp("Ograve", token, 6)) *to++ = 'Ò';
00100                         else if (!strncmp("Ocirc", token, 5)) *to++ = 'Ô';
00101                         else if (!strncmp("Ouml", token, 4)) *to++ = 'Ö';
00102                         else if (!strncmp("Otilde", token, 6)) *to++ = 'Õ';
00103                         else if (!strncmp("oacute", token, 6)) *to++ = 'ó';
00104                         else if (!strncmp("ograve", token, 6)) *to++ = 'ò';
00105                         else if (!strncmp("ocirc", token, 5)) *to++ = 'ô';
00106                         else if (!strncmp("ouml", token, 4)) *to++ = 'ö';
00107                         else if (!strncmp("otilde", token, 6)) *to++ = 'õ';
00108                         else if (!strncmp("Uacute", token, 6)) *to++ = 'Ú';
00109                         else if (!strncmp("Ugrave", token, 6)) *to++ = 'Ù';
00110                         else if (!strncmp("Ucirc", token, 5)) *to++ = 'Û';
00111                         else if (!strncmp("Uuml", token, 4)) *to++ = 'Ü';
00112                         else if (!strncmp("uacute", token, 6)) *to++ = 'ú';
00113                         else if (!strncmp("ugrave", token, 6)) *to++ = 'ù';
00114                         else if (!strncmp("ucirc", token, 5)) *to++ = 'û';
00115                         else if (!strncmp("uuml", token, 4)) *to++ = 'ü';
00116                         else if (!strncmp("Yacute", token, 6)) *to++ = 'Ý';
00117                         else if (!strncmp("yacute", token, 6)) *to++ = 'ý';
00118                         else if (!strncmp("yuml", token, 4)) *to++ = 'ÿ';
00119 
00120                         else if (!strncmp("deg", token, 3)) *to++ = '°';
00121                         else if (!strncmp("plusmn", token, 6)) *to++ = '±';
00122                         else if (!strncmp("sup2", token, 4)) *to++ = '²';
00123                         else if (!strncmp("sup3", token, 4)) *to++ = '³';
00124                         else if (!strncmp("sup1", token, 4)) *to++ = '¹';
00125                         else if (!strncmp("nbsp", token, 4)) *to++ = 'º';
00126                         else if (!strncmp("pound", token, 5)) *to++ = '£';
00127                         else if (!strncmp("cent", token, 4)) *to++ = '¢';
00128                         else if (!strncmp("frac14", token, 6)) *to++ = '¼';
00129                         else if (!strncmp("frac12", token, 6)) *to++ = '½';
00130                         else if (!strncmp("frac34", token, 6)) *to++ = '¾';
00131                         else if (!strncmp("iquest", token, 6)) *to++ = '¿';
00132                         else if (!strncmp("iexcl", token, 5)) *to++ = '¡';
00133                         else if (!strncmp("ETH", token, 3)) *to++ = 'Ð';
00134                         else if (!strncmp("eth", token, 3)) *to++ = 'ð';
00135                         else if (!strncmp("THORN", token, 5)) *to++ = 'Þ';
00136                         else if (!strncmp("thorn", token, 5)) *to++ = 'þ';
00137                         else if (!strncmp("AElig", token, 5)) *to++ = 'Æ';
00138                         else if (!strncmp("aelig", token, 5)) *to++ = 'æ';
00139                         else if (!strncmp("Oslash", token, 6)) *to++ = 'Ø';
00140                         else if (!strncmp("curren", token, 6)) *to++ = '¤';
00141                         else if (!strncmp("Ccedil", token, 6)) *to++ = 'Ç';
00142                         else if (!strncmp("ccedil", token, 6)) *to++ = 'ç';
00143                         else if (!strncmp("szlig", token, 5)) *to++ = 'ß';
00144                         else if (!strncmp("Ntilde", token, 6)) *to++ = 'Ñ';
00145                         else if (!strncmp("ntilde", token, 6)) *to++ = 'ñ';
00146                         else if (!strncmp("yen", token, 3)) *to++ = '¥';
00147                         else if (!strncmp("not", token, 3)) *to++ = '¬';
00148                         else if (!strncmp("ordf", token, 4)) *to++ = 'ª';
00149                         else if (!strncmp("uml", token, 3)) *to++ = '¨';
00150                         else if (!strncmp("shy", token, 3)) *to++ = '';
00151                         else if (!strncmp("macr", token, 4)) *to++ = '¯';
00152                         continue;
00153 
00154                 }
00155                 else if (*from == '>' && !ampersand) {
00156                         intoken = false;
00157                         // process desired tokens
00158                         if (!strncmp(token, "sync type=\"Strongs\" value=\"", 27)) {
00159                                 *to++ = ' ';
00160                                 *to++ = '<';
00161                                 for (unsigned int i = 27; token[i] != '\"'; i++)
00162                                         *to++ = token[i];
00163                                 *to++ = '>';
00164                                 continue;
00165                         }
00166                         if (!strncmp(token, "sync type=\"morph\" value=\"", 25)) {
00167                                 *to++ = ' ';
00168                                 *to++ = '(';
00169                                 for (unsigned int i = 25; token[i] != '\"'; i++)
00170                                         *to++ = token[i];
00171                                 *to++ = ')';
00172                                 continue;
00173                         }
00174                         if (!strncmp("note", token, 4)) {
00175                                 *to++ = ' ';
00176                                 *to++ = '(';
00177                         }
00178                         else if (!strncmp("br", token, 2))
00179                                 *to++ = '\n';
00180                         else if (!strncmp("/p", token, 2))
00181                                 *to++ = '\n';
00182                         else if (!strncmp("/note", token, 5)) {
00183                                 *to++ = ')';
00184                                 *to++ = ' ';
00185                         }
00186                         continue;
00187                 }
00188                 if (intoken) {
00189                         if (tokpos < 2045)
00190                                 token[tokpos++] = *from;
00191                                 token[tokpos+2] = 0;
00192                 }
00193                 else    *to++ = *from;
00194         }
00195         *to++ = 0;
00196         *to = 0;
00197 
00198         return 0;
00199 }
00200 
00201