2 * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2016 Hiroyuki Yamamoto and the Claws Mail team
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
28 #define SC_HTMLBUFSIZE 8192
29 #define HR_STR "────────────────────────────────────────────────"
32 typedef struct _SC_HTMLSymbol SC_HTMLSymbol;
40 static SC_HTMLSymbol symbol_list[] = {
52 {"™", "\342\204\242"},
54 {"¡", "\302\241"},
55 {"¢", "\302\242"},
56 {"£", "\302\243"},
57 {"¤", "\302\244"},
58 {"¥", "\302\245"},
59 {"¦", "\302\246"},
60 {"§", "\302\247"},
61 {"¨", "\302\250"},
62 {"©", "\302\251"},
63 {"ª", "\302\252"},
64 {"«", "\302\253"},
65 {"¬", "\302\254"},
66 {"­", "\302\255"},
67 {"®", "\302\256"},
68 {"¯", "\302\257"},
69 {"°", "\302\260"},
70 {"±", "\302\261"},
71 {"²", "\302\262"},
72 {"³", "\302\263"},
73 {"´", "\302\264"},
74 {"µ", "\302\265"},
75 {"¶", "\302\266"},
76 {"·", "\302\267"},
77 {"¸", "\302\270"},
78 {"¹", "\302\271"},
79 {"º", "\302\272"},
80 {"»", "\302\273"},
81 {"¼", "\302\274"},
82 {"½", "\302\275"},
83 {"¾", "\302\276"},
84 {"¿", "\302\277"},
85 {"À", "\303\200"},
86 {"Á", "\303\201"},
87 {"Â", "\303\202"},
88 {"Ã", "\303\203"},
89 {"Ä", "\303\204"},
90 {"Å", "\303\205"},
91 {"Æ", "\303\206"},
92 {"Ç", "\303\207"},
93 {"È", "\303\210"},
94 {"É", "\303\211"},
95 {"Ê", "\303\212"},
96 {"Ë", "\303\213"},
97 {"Ì", "\303\214"},
98 {"Í", "\303\215"},
99 {"Î", "\303\216"},
100 {"Ï", "\303\217"},
101 {"Ð", "\303\220"},
102 {"Ñ", "\303\221"},
103 {"Ò", "\303\222"},
104 {"Ó", "\303\223"},
105 {"Ô", "\303\224"},
106 {"Õ", "\303\225"},
107 {"Ö", "\303\226"},
108 {"×", "\303\227"},
109 {"Ø", "\303\230"},
110 {"Ù", "\303\231"},
111 {"Ú", "\303\232"},
112 {"Û", "\303\233"},
113 {"Ü", "\303\234"},
114 {"Ý", "\303\235"},
115 {"Þ", "\303\236"},
116 {"ß", "\303\237"},
117 {"à", "\303\240"},
118 {"á", "\303\241"},
119 {"â", "\303\242"},
120 {"ã", "\303\243"},
121 {"ä", "\303\244"},
122 {"å", "\303\245"},
123 {"æ", "\303\246"},
124 {"ç", "\303\247"},
125 {"è", "\303\250"},
126 {"é", "\303\251"},
127 {"ê", "\303\252"},
128 {"ë", "\303\253"},
129 {"ì", "\303\254"},
130 {"í", "\303\255"},
131 {"î", "\303\256"},
132 {"ï", "\303\257"},
133 {"ð", "\303\260"},
134 {"ñ", "\303\261"},
135 {"ò", "\303\262"},
136 {"ó", "\303\263"},
137 {"ô", "\303\264"},
138 {"õ", "\303\265"},
139 {"ö", "\303\266"},
140 {"÷", "\303\267"},
141 {"ø", "\303\270"},
142 {"ù", "\303\271"},
143 {"ú", "\303\272"},
144 {"û", "\303\273"},
145 {"ü", "\303\274"},
146 {"ý", "\303\275"},
147 {"þ", "\303\276"},
148 {"ÿ", "\303\277"},
149 {"Œ", "\305\222"},
150 {"œ", "\305\223"},
151 {"Š", "\305\240"},
152 {"š", "\305\241"},
153 {"Ÿ", "\305\270"},
154 {"ˆ", "\313\206"},
155 {"˜", "\313\234"},
156 {" ", "\342\200\202"},
157 {" ", "\342\200\203"},
158 {" ", "\342\200\211"},
159 {"–", "\342\200\223"},
160 {"—", "\342\200\224"},
161 {"‘", "\342\200\230"},
162 {"’", "\342\200\231"},
163 {"‚", "\342\200\232"},
164 {"“", "\342\200\234"},
165 {"”", "\342\200\235"},
166 {"„", "\342\200\236"},
167 {"†", "\342\200\240"},
168 {"‡", "\342\200\241"},
169 {"•", "\342\200\242"},
170 {"…", "\342\200\246"},
171 {"‰", "\342\200\260"},
172 {"‹", "\342\200\271"},
173 {"›", "\342\200\272"},
174 {"€", "\342\202\254"},
175 {"™", "\342\204\242"},
183 {"¡", "\302\241"},
184 {"¢", "\302\242"},
185 {"£", "\302\243"},
186 {"¤", "\302\244"},
187 {"¥", "\302\245"},
188 {"¦", "\302\246"},
189 {"§", "\302\247"},
190 {"¨", "\302\250"},
191 {"©", "\302\251"},
192 {"ª", "\302\252"},
193 {"«", "\302\253"},
194 {"¬", "\302\254"},
195 {"­", "\302\255"},
196 {"®", "\302\256"},
197 {"¯", "\302\257"},
198 {"°", "\302\260"},
199 {"±", "\302\261"},
200 {"²", "\302\262"},
201 {"³", "\302\263"},
202 {"´", "\302\264"},
203 {"µ", "\302\265"},
204 {"¶", "\302\266"},
205 {"·", "\302\267"},
206 {"¸", "\302\270"},
207 {"¹", "\302\271"},
208 {"º", "\302\272"},
209 {"»", "\302\273"},
210 {"¼", "\302\274"},
211 {"½", "\302\275"},
212 {"¾", "\302\276"},
213 {"¿", "\302\277"},
214 {"À", "\303\200"},
215 {"Á", "\303\201"},
216 {"Â", "\303\202"},
217 {"Ã", "\303\203"},
218 {"Ä", "\303\204"},
219 {"Å", "\303\205"},
220 {"Æ", "\303\206"},
221 {"Ç", "\303\207"},
222 {"È", "\303\210"},
223 {"É", "\303\211"},
224 {"Ê", "\303\212"},
225 {"Ë", "\303\213"},
226 {"Ì", "\303\214"},
227 {"Í", "\303\215"},
228 {"Î", "\303\216"},
229 {"Ï", "\303\217"},
230 {"Ð", "\303\220"},
231 {"Ñ", "\303\221"},
232 {"Ò", "\303\222"},
233 {"Ó", "\303\223"},
234 {"Ô", "\303\224"},
235 {"Õ", "\303\225"},
236 {"Ö", "\303\226"},
237 {"×", "\303\227"},
238 {"Ø", "\303\230"},
239 {"Ù", "\303\231"},
240 {"Ú", "\303\232"},
241 {"Û", "\303\233"},
242 {"Ü", "\303\234"},
243 {"Ý", "\303\235"},
244 {"Þ", "\303\236"},
245 {"ß", "\303\237"},
246 {"à", "\303\240"},
247 {"á", "\303\241"},
248 {"â", "\303\242"},
249 {"ã", "\303\243"},
250 {"ä", "\303\244"},
251 {"å", "\303\245"},
252 {"æ", "\303\246"},
253 {"ç", "\303\247"},
254 {"è", "\303\250"},
255 {"é", "\303\251"},
256 {"ê", "\303\252"},
257 {"ë", "\303\253"},
258 {"ì", "\303\254"},
259 {"í", "\303\255"},
260 {"î", "\303\256"},
261 {"ï", "\303\257"},
262 {"ð", "\303\260"},
263 {"ñ", "\303\261"},
264 {"ò", "\303\262"},
265 {"ó", "\303\263"},
266 {"ô", "\303\264"},
267 {"õ", "\303\265"},
268 {"ö", "\303\266"},
269 {"÷", "\303\267"},
270 {"ø", "\303\270"},
271 {"ù", "\303\271"},
272 {"ú", "\303\272"},
273 {"û", "\303\273"},
274 {"ü", "\303\274"},
275 {"ý", "\303\275"},
276 {"þ", "\303\276"},
277 {"ÿ", "\303\277"},
278 {"Œ", "\305\222"},
279 {"œ", "\305\223"},
280 {"Š", "\305\240"},
281 {"š", "\305\241"},
282 {"Ÿ", "\305\270"},
283 {"ˆ", "\313\206"},
284 {"˜", "\313\234"},
285 {" ", "\342\200\202"},
286 {" ", "\342\200\203"},
287 {" ", "\342\200\211"},
288 {"–", "\342\200\223"},
289 {"—", "\342\200\224"},
290 {"‘", "\342\200\230"},
291 {"’", "\342\200\231"},
292 {"‚", "\342\200\232"},
293 {"“", "\342\200\234"},
294 {"”", "\342\200\235"},
295 {"„", "\342\200\236"},
296 {"†", "\342\200\240"},
297 {"‡", "\342\200\241"},
298 {"•", "\342\200\242"},
299 {"…", "\342\200\246"},
300 {"‰", "\342\200\260"},
301 {"‹", "\342\200\271"},
302 {"›", "\342\200\272"},
303 {"€", "\342\202\254"},
304 {"™", "\342\204\242"}
307 static GHashTable *default_symbol_table;
309 static SC_HTMLState sc_html_read_line (SC_HTMLParser *parser);
310 static void sc_html_append_char (SC_HTMLParser *parser,
312 static void sc_html_append_str (SC_HTMLParser *parser,
315 static SC_HTMLState sc_html_parse_tag (SC_HTMLParser *parser);
316 static void sc_html_parse_special (SC_HTMLParser *parser);
317 static void sc_html_get_parenthesis (SC_HTMLParser *parser,
322 SC_HTMLParser *sc_html_parser_new(FILE *fp, CodeConverter *conv)
324 SC_HTMLParser *parser;
326 cm_return_val_if_fail(fp != NULL, NULL);
327 cm_return_val_if_fail(conv != NULL, NULL);
329 parser = g_new0(SC_HTMLParser, 1);
332 parser->str = g_string_new(NULL);
333 parser->buf = g_string_new(NULL);
334 parser->bufp = parser->buf->str;
335 parser->state = SC_HTML_NORMAL;
337 parser->newline = TRUE;
338 parser->empty_line = TRUE;
339 parser->space = FALSE;
343 if (!default_symbol_table) {
345 default_symbol_table = g_hash_table_new(g_str_hash, g_str_equal);
346 for (i = 0; i < sizeof(symbol_list) / sizeof(symbol_list[0]); i++)
347 g_hash_table_insert(default_symbol_table,
348 symbol_list[i].key, symbol_list[i].val);
351 parser->symbol_table = default_symbol_table;
356 void sc_html_parser_destroy(SC_HTMLParser *parser)
358 g_string_free(parser->str, TRUE);
359 g_string_free(parser->buf, TRUE);
360 g_free(parser->href);
364 gchar *sc_html_parse(SC_HTMLParser *parser)
366 parser->state = SC_HTML_NORMAL;
367 g_string_truncate(parser->str, 0);
369 if (*parser->bufp == '\0') {
370 g_string_truncate(parser->buf, 0);
371 parser->bufp = parser->buf->str;
372 if (sc_html_read_line(parser) == SC_HTML_EOF)
376 while (*parser->bufp != '\0') {
377 switch (*parser->bufp) {
380 st = sc_html_parse_tag(parser);
381 /* when we see an href, we need to flush the str
382 * buffer. Then collect all the chars until we
383 * see the end anchor tag
385 if (SC_HTML_HREF_BEG == st || SC_HTML_HREF == st)
386 return parser->str->str;
390 sc_html_parse_special(parser);
396 if (parser->bufp[0] == '\r' && parser->bufp[1] == '\n')
400 if (!parser->newline)
401 parser->space = TRUE;
408 sc_html_append_char(parser, *parser->bufp++);
412 return parser->str->str;
415 static SC_HTMLState sc_html_read_line(SC_HTMLParser *parser)
417 gchar buf[SC_HTMLBUFSIZE];
418 gchar buf2[SC_HTMLBUFSIZE];
422 if (parser->fp == NULL)
425 n = fread(buf, 1, sizeof(buf) - 1, parser->fp);
427 parser->state = SC_HTML_EOF;
432 if (conv_convert(parser->conv, buf2, sizeof(buf2), buf) < 0) {
433 index = parser->bufp - parser->buf->str;
435 conv_utf8todisp(buf2, sizeof(buf2), buf);
436 g_string_append(parser->buf, buf2);
438 parser->bufp = parser->buf->str + index;
440 return SC_HTML_CONV_FAILED;
443 index = parser->bufp - parser->buf->str;
445 g_string_append(parser->buf, buf2);
447 parser->bufp = parser->buf->str + index;
449 return SC_HTML_NORMAL;
452 static void sc_html_append_char(SC_HTMLParser *parser, gchar ch)
454 GString *str = parser->str;
456 if (!parser->pre && parser->space) {
457 g_string_append_c(str, ' ');
458 parser->space = FALSE;
461 g_string_append_c(str, ch);
463 parser->empty_line = FALSE;
465 parser->newline = TRUE;
466 if (str->len > 1 && str->str[str->len - 2] == '\n')
467 parser->empty_line = TRUE;
468 if (parser->indent > 0) {
469 gint i, n = parser->indent;
470 for (i = 0; i < n; i++)
471 g_string_append_c(str, '>');
472 g_string_append_c(str, ' ');
475 parser->newline = FALSE;
478 static void sc_html_append_str(SC_HTMLParser *parser, const gchar *str, gint len)
480 GString *string = parser->str;
482 if (!parser->pre && parser->space) {
483 g_string_append_c(string, ' ');
484 parser->space = FALSE;
487 if (len == 0) return;
489 g_string_append(string, str);
492 Xstrndup_a(s, str, len, return);
493 g_string_append(string, s);
496 parser->empty_line = FALSE;
497 if (string->len > 0 && string->str[string->len - 1] == '\n') {
498 parser->newline = TRUE;
499 if (string->len > 1 && string->str[string->len - 2] == '\n')
500 parser->empty_line = TRUE;
502 parser->newline = FALSE;
505 static SC_HTMLTag *sc_html_get_tag(const gchar *str)
511 cm_return_val_if_fail(str != NULL, NULL);
513 if (*str == '\0' || *str == '!') return NULL;
515 Xstrdup_a(tmp, str, return NULL);
517 tag = g_new0(SC_HTMLTag, 1);
519 for (tmpp = tmp; *tmpp != '\0' && !g_ascii_isspace(*tmpp); tmpp++)
523 tag->name = g_utf8_strdown(tmp, -1);
527 tag->name = g_utf8_strdown(tmp, -1);
530 while (*tmpp != '\0') {
537 while (g_ascii_isspace(*tmpp)) tmpp++;
540 while (*tmpp != '\0' && !g_ascii_isspace(*tmpp) &&
543 if (*tmpp != '\0' && *tmpp != '=') {
545 while (g_ascii_isspace(*tmpp)) tmpp++;
550 while (g_ascii_isspace(*tmpp)) tmpp++;
552 if (*tmpp == '"' || *tmpp == '\'') {
557 if ((p = strchr(attr_value, quote)) == NULL) {
558 if (debug_get_mode()) {
559 g_warning("sc_html_get_tag(): syntax error in tag: '%s'",
562 gchar *cut = g_strndup(str, 100);
563 g_warning("sc_html_get_tag(): syntax error in tag: '%s%s'",
564 cut, strlen(str)>100?"...":".");
571 while (g_ascii_isspace(*tmpp)) tmpp++;
575 while (*tmpp != '\0' && !g_ascii_isspace(*tmpp)) tmpp++;
582 g_strchomp(attr_name);
583 attr = g_new(SC_HTMLAttr, 1);
584 attr->name = g_utf8_strdown(attr_name, -1);
585 attr->value = g_strdup(attr_value);
586 tag->attr = g_list_append(tag->attr, attr);
592 static void sc_html_free_tag(SC_HTMLTag *tag)
597 while (tag->attr != NULL) {
598 SC_HTMLAttr *attr = (SC_HTMLAttr *)tag->attr->data;
602 tag->attr = g_list_remove(tag->attr, tag->attr->data);
607 static void decode_href(SC_HTMLParser *parser)
610 SC_HTMLParser *tparser = g_new0(SC_HTMLParser, 1);
612 tparser->str = g_string_new(NULL);
613 tparser->buf = g_string_new(parser->href);
614 tparser->bufp = tparser->buf->str;
615 tparser->symbol_table = default_symbol_table;
617 tmp = sc_html_parse(tparser);
619 g_free(parser->href);
620 parser->href = g_strdup(tmp);
622 sc_html_parser_destroy(tparser);
625 static SC_HTMLState sc_html_parse_tag(SC_HTMLParser *parser)
627 gchar buf[SC_HTMLBUFSIZE];
630 sc_html_get_parenthesis(parser, buf, sizeof(buf));
632 tag = sc_html_get_tag(buf);
634 parser->state = SC_HTML_UNKNOWN;
635 if (!tag) return SC_HTML_UNKNOWN;
637 if (!strcmp(tag->name, "br") || !strcmp(tag->name, "br/")) {
638 parser->space = FALSE;
639 sc_html_append_char(parser, '\n');
640 parser->state = SC_HTML_BR;
641 } else if (!strcmp(tag->name, "a")) {
644 for (cur = tag->attr; cur != NULL; cur = cur->next) {
645 if (cur->data && !strcmp(((SC_HTMLAttr *)cur->data)->name, "href")) {
646 g_free(parser->href);
647 parser->href = g_strdup(((SC_HTMLAttr *)cur->data)->value);
649 parser->state = SC_HTML_HREF_BEG;
653 if (parser->href == NULL)
654 parser->href = g_strdup("");
655 parser->state = SC_HTML_HREF_BEG;
656 } else if (!strcmp(tag->name, "/a")) {
657 parser->state = SC_HTML_HREF;
658 } else if (!strcmp(tag->name, "p")) {
659 parser->space = FALSE;
660 if (!parser->empty_line) {
661 parser->space = FALSE;
662 if (!parser->newline) sc_html_append_char(parser, '\n');
663 sc_html_append_char(parser, '\n');
665 parser->state = SC_HTML_PAR;
666 } else if (!strcmp(tag->name, "pre")) {
668 parser->state = SC_HTML_PRE;
669 } else if (!strcmp(tag->name, "/pre")) {
671 parser->state = SC_HTML_NORMAL;
672 } else if (!strcmp(tag->name, "hr")) {
673 if (!parser->newline) {
674 parser->space = FALSE;
675 sc_html_append_char(parser, '\n');
677 sc_html_append_str(parser, HR_STR, -1);
678 sc_html_append_char(parser, '\n');
679 parser->state = SC_HTML_HR;
680 } else if (!strcmp(tag->name, "div") ||
681 !strcmp(tag->name, "ul") ||
682 !strcmp(tag->name, "li") ||
683 !strcmp(tag->name, "table") ||
684 !strcmp(tag->name, "dd") ||
685 !strcmp(tag->name, "tr") ||
686 (tag->name[0] == 'h' && g_ascii_isdigit(tag->name[1]))) {
687 if (!parser->newline) {
688 parser->space = FALSE;
689 sc_html_append_char(parser, '\n');
691 if (!strcmp(tag->name, "li")) {
692 sc_html_append_str(parser, LI_STR, -1);
694 parser->state = SC_HTML_NORMAL;
695 } else if (!strcmp(tag->name, "blockquote")) {
696 parser->state = SC_HTML_NORMAL;
698 } else if (!strcmp(tag->name, "/blockquote")) {
699 parser->state = SC_HTML_NORMAL;
701 } else if (!strcmp(tag->name, "/table") ||
702 (tag->name[0] == '/' &&
703 tag->name[1] == 'h' &&
704 g_ascii_isdigit(tag->name[1]))) {
705 if (!parser->empty_line) {
706 parser->space = FALSE;
707 if (!parser->newline) sc_html_append_char(parser, '\n');
708 sc_html_append_char(parser, '\n');
710 parser->state = SC_HTML_NORMAL;
711 } else if (!strcmp(tag->name, "/div") ||
712 !strcmp(tag->name, "/ul") ||
713 !strcmp(tag->name, "/li")) {
714 if (!parser->newline) {
715 parser->space = FALSE;
716 sc_html_append_char(parser, '\n');
718 parser->state = SC_HTML_NORMAL;
721 sc_html_free_tag(tag);
723 return parser->state;
726 static void sc_html_parse_special(SC_HTMLParser *parser)
728 gchar symbol_name[9];
732 parser->state = SC_HTML_UNKNOWN;
733 cm_return_if_fail(*parser->bufp == '&');
736 for (n = 0; parser->bufp[n] != '\0' && parser->bufp[n] != ';'; n++)
738 if (n > 7 || parser->bufp[n] != ';') {
739 /* output literal `&' */
740 sc_html_append_char(parser, *parser->bufp++);
741 parser->state = SC_HTML_NORMAL;
744 strncpy2(symbol_name, parser->bufp, n + 2);
745 parser->bufp += n + 1;
747 if ((val = g_hash_table_lookup(parser->symbol_table, symbol_name))
749 sc_html_append_str(parser, val, -1);
750 parser->state = SC_HTML_NORMAL;
754 sc_html_append_str(parser, symbol_name, -1);
757 static gchar *sc_html_find_tag(SC_HTMLParser *parser, const gchar *tag)
759 gchar *cur = parser->bufp;
760 gint len = strlen(tag);
765 while ((cur = strstr(cur, "<")) != NULL) {
766 if (!g_ascii_strncasecmp(cur, tag, len))
773 static void sc_html_get_parenthesis(SC_HTMLParser *parser, gchar *buf, gint len)
778 cm_return_if_fail(*parser->bufp == '<');
780 /* ignore comment / CSS / script stuff */
781 if (!strncmp(parser->bufp, "<!--", 4)) {
783 while ((p = strstr(parser->bufp, "-->")) == NULL)
784 if (sc_html_read_line(parser) == SC_HTML_EOF) return;
785 parser->bufp = p + 3;
788 if (!g_ascii_strncasecmp(parser->bufp, "<style", 6)) {
790 while ((p = sc_html_find_tag(parser, "</style>")) == NULL)
791 if (sc_html_read_line(parser) == SC_HTML_EOF) return;
792 parser->bufp = p + 8;
795 if (!g_ascii_strncasecmp(parser->bufp, "<script", 7)) {
797 while ((p = sc_html_find_tag(parser, "</script>")) == NULL)
798 if (sc_html_read_line(parser) == SC_HTML_EOF) return;
799 parser->bufp = p + 9;
804 while ((p = strchr(parser->bufp, '>')) == NULL)
805 if (sc_html_read_line(parser) == SC_HTML_EOF) return;
807 strncpy2(buf, parser->bufp, MIN(p - parser->bufp + 1, len));
809 parser->bufp = p + 1;