Mercurial > pidgin
annotate src/gtkimhtml.c @ 4032:2b3a9d8f168e
[gaim-migrate @ 4238]
Smileys. These are just the default smileys--I'm adding the prpl-specific smileys right now.
If you want to help by creating some png's, IM me.
committer: Tailor Script <tailor@pidgin.im>
author | Sean Egan <seanegan@gmail.com> |
---|---|
date | Tue, 03 Dec 2002 02:02:16 +0000 |
parents | 23c430e780eb |
children | 3a36ec242415 |
rev | line source |
---|---|
1428 | 1 /* |
2 * GtkIMHtml | |
3 * | |
4 * Copyright (C) 2000, Eric Warmenhoven <warmenhoven@yahoo.com> | |
5 * | |
6 * This program is free software; you can redistribute it and/or modify | |
7 * under the terms of the GNU General Public License as published by | |
8 * the Free Software Foundation; either version 2 of the License, or | |
9 * (at your option) any later version. | |
10 * | |
11 * This program is distributed in the hope that it will be useful, | |
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 * GNU General Public License for more details. | |
15 * | |
16 * You should have received a copy of the GNU General Public License | |
17 * along with this program; if not, write to the Free Software | |
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
19 * | |
20 */ | |
21 | |
2541
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
22 #ifdef HAVE_CONFIG_H |
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
23 #include <config.h> |
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
24 #endif |
1428 | 25 #include "gtkimhtml.h" |
26 #include <gtk/gtk.h> | |
27 #include <string.h> | |
28 #include <ctype.h> | |
29 #include <stdio.h> | |
30 #include <math.h> | |
2541
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
31 #ifdef HAVE_LANGINFO_CODESET |
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
32 #include <langinfo.h> |
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
33 #include <locale.h> |
8229710b343b
[gaim-migrate @ 2554]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2365
diff
changeset
|
34 #endif |
1428 | 35 |
2349
60c716c32c40
[gaim-migrate @ 2362]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2348
diff
changeset
|
36 |
3922 | 37 /* POINT_SIZE converts from AIM font sizes to point sizes. It probably should be redone in such a |
38 * way that it base the sizes off the default font size rather than using arbitrary font sizes. */ | |
39 #define MAX_FONT_SIZE 7 | |
40 #define POINT_SIZE(x) (_point_sizes [MIN ((x), MAX_FONT_SIZE) - 1]) | |
3928 | 41 static gint _point_sizes [] = { 8, 10, 12, 14, 20, 30, 40 }; |
2349
60c716c32c40
[gaim-migrate @ 2362]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2348
diff
changeset
|
42 |
3922 | 43 /* The four elements present in a <FONT> tag contained in a struct */ |
44 typedef struct _FontDetail FontDetail; | |
1428 | 45 struct _FontDetail { |
46 gushort size; | |
47 gchar *face; | |
3922 | 48 gchar *fore; |
49 gchar *back; | |
4032 | 50 gchar *sml; |
1428 | 51 }; |
52 | |
4032 | 53 struct _GtkSmileyTree { |
54 GString *values; | |
55 GtkSmileyTree **children; | |
56 gchar *image; | |
57 }; | |
58 | |
59 static GtkSmileyTree* | |
60 gtk_smiley_tree_new () | |
61 { | |
62 return g_new0 (GtkSmileyTree, 1); | |
63 } | |
64 | |
65 static void | |
66 gtk_smiley_tree_insert (GtkSmileyTree *tree, | |
67 const gchar *text, | |
68 const gchar *path) | |
69 { | |
70 GtkSmileyTree *t = tree; | |
71 const gchar *x = text; | |
72 | |
73 if (!strlen (x)) | |
74 return; | |
75 | |
76 while (*x) { | |
77 gchar *pos; | |
78 gint index; | |
79 | |
80 if (!t->values) | |
81 t->values = g_string_new (""); | |
82 | |
83 pos = strchr (t->values->str, *x); | |
84 if (!pos) { | |
85 t->values = g_string_append_c (t->values, *x); | |
86 index = t->values->len - 1; | |
87 t->children = g_realloc (t->children, t->values->len * sizeof (GtkSmileyTree *)); | |
88 t->children [index] = g_new0 (GtkSmileyTree, 1); | |
89 } else | |
90 index = (int) pos - (int) t->values->str; | |
91 | |
92 t = t->children [index]; | |
93 | |
94 x++; | |
95 } | |
96 | |
97 t->image = path; | |
98 } | |
99 gtk_smiley_tree_destroy (GtkSmileyTree *tree) | |
100 { | |
101 GSList *list = g_slist_append (NULL, tree); | |
102 | |
103 while (list) { | |
104 GtkSmileyTree *t = list->data; | |
105 gint i; | |
106 list = g_slist_remove(list, t); | |
107 if (t->values) { | |
108 for (i = 0; i < t->values->len; i++) | |
109 list = g_slist_append (list, t->children [i]); | |
110 g_string_free (t->values, TRUE); | |
111 g_free (t->children); | |
112 } | |
113 g_free (t); | |
114 } | |
115 } | |
116 | |
117 static GtkTextViewClass *parent_class = NULL; | |
118 | |
119 | |
3922 | 120 /* GtkIMHtml has one signal--URL_CLICKED */ |
1428 | 121 enum { |
122 URL_CLICKED, | |
123 LAST_SIGNAL | |
124 }; | |
125 static guint signals [LAST_SIGNAL] = { 0 }; | |
126 | |
4032 | 127 static void |
128 gtk_imhtml_finalize (GObject *object) | |
129 { | |
130 GtkIMHtml *imhtml = GTK_IMHTML(object); | |
131 | |
132 g_hash_table_foreach_remove(imhtml->smiley_data, gtk_smiley_tree_destroy, NULL); | |
133 gtk_smiley_tree_destroy(imhtml->default_smilies); | |
134 G_OBJECT_CLASS(parent_class)->finalize (object); | |
135 } | |
1428 | 136 |
3922 | 137 /* Boring GTK stuff */ |
138 static void gtk_imhtml_class_init (GtkIMHtmlClass *class) | |
1428 | 139 { |
3922 | 140 GtkObjectClass *object_class; |
4032 | 141 GObjectClass *gobject_class; |
3922 | 142 object_class = (GtkObjectClass*) class; |
4032 | 143 gobject_class = (GObjectClass*) class; |
144 parent_class = gtk_type_class(GTK_TYPE_TEXT_VIEW); | |
3922 | 145 signals[URL_CLICKED] = gtk_signal_new("url_clicked", |
146 GTK_RUN_FIRST, | |
147 GTK_CLASS_TYPE(object_class), | |
148 GTK_SIGNAL_OFFSET(GtkIMHtmlClass, url_clicked), | |
149 gtk_marshal_NONE__POINTER, | |
150 GTK_TYPE_NONE, 1, | |
151 GTK_TYPE_POINTER); | |
4032 | 152 gobject_class->finalize = gtk_imhtml_finalize; |
1428 | 153 } |
154 | |
3922 | 155 static void gtk_imhtml_init (GtkIMHtml *imhtml) |
1428 | 156 { |
3922 | 157 GtkTextIter iter; |
158 imhtml->text_buffer = gtk_text_buffer_new(NULL); | |
159 gtk_text_buffer_get_end_iter (imhtml->text_buffer, &iter); | |
160 imhtml->end = gtk_text_buffer_create_mark(imhtml->text_buffer, NULL, &iter, FALSE); | |
161 gtk_text_view_set_buffer(GTK_TEXT_VIEW(imhtml), imhtml->text_buffer); | |
162 gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(imhtml), GTK_WRAP_WORD); | |
163 gtk_text_view_set_editable(GTK_TEXT_VIEW(imhtml), FALSE); | |
164 gtk_text_view_set_pixels_below_lines(GTK_TEXT_VIEW(imhtml), 5); | |
165 gtk_text_view_set_cursor_visible(GTK_TEXT_VIEW(imhtml), FALSE); | |
166 /*gtk_text_view_set_justification(GTK_TEXT_VIEW(imhtml), GTK_JUSTIFY_FILL);*/ | |
3465 | 167 |
3922 | 168 /* These tags will be used often and can be reused--we create them on init and then apply them by name |
169 * other tags (color, size, face, etc.) will have to be created and applied dynamically */ | |
170 gtk_text_buffer_create_tag(imhtml->text_buffer, "BOLD", "weight", PANGO_WEIGHT_BOLD, NULL); | |
171 gtk_text_buffer_create_tag(imhtml->text_buffer, "ITALICS", "style", PANGO_STYLE_ITALIC, NULL); | |
172 gtk_text_buffer_create_tag(imhtml->text_buffer, "UNDERLINE", "underline", PANGO_UNDERLINE_SINGLE, NULL); | |
173 gtk_text_buffer_create_tag(imhtml->text_buffer, "STRIKE", "strikethrough", TRUE, NULL); | |
174 gtk_text_buffer_create_tag(imhtml->text_buffer, "SUB", "rise", -5000, NULL); | |
175 gtk_text_buffer_create_tag(imhtml->text_buffer, "SUP", "rise", 5000, NULL); | |
176 gtk_text_buffer_create_tag(imhtml->text_buffer, "PRE", "family", "Monospace", NULL); | |
3465 | 177 |
3922 | 178 /* When hovering over a link, we show the hand cursor--elsewhere we show the plain ol' pointer cursor */ |
179 imhtml->hand_cursor = gdk_cursor_new (GDK_HAND2); | |
180 imhtml->arrow_cursor = gdk_cursor_new (GDK_LEFT_PTR); | |
2993 | 181 |
4032 | 182 imhtml->smiley_data = g_hash_table_new (g_str_hash, g_str_equal); |
183 imhtml->default_smilies = gtk_smiley_tree_new(); | |
2993 | 184 } |
185 | |
3922 | 186 GtkWidget *gtk_imhtml_new(void *a, void *b) |
1428 | 187 { |
3922 | 188 return GTK_WIDGET(gtk_type_new(gtk_imhtml_get_type())); |
1428 | 189 } |
190 | |
3922 | 191 GtkType gtk_imhtml_get_type() |
1428 | 192 { |
3922 | 193 static guint imhtml_type = 0; |
1428 | 194 |
195 if (!imhtml_type) { | |
3922 | 196 GtkTypeInfo imhtml_info = { |
1428 | 197 "GtkIMHtml", |
198 sizeof (GtkIMHtml), | |
199 sizeof (GtkIMHtmlClass), | |
200 (GtkClassInitFunc) gtk_imhtml_class_init, | |
201 (GtkObjectInitFunc) gtk_imhtml_init, | |
202 NULL, | |
203 NULL | |
204 }; | |
3922 | 205 |
206 imhtml_type = gtk_type_unique (gtk_text_view_get_type (), &imhtml_info); | |
1428 | 207 } |
208 | |
209 return imhtml_type; | |
210 } | |
211 | |
3922 | 212 /* The call back for an event on a link tag. */ |
213 void tag_event(GtkTextTag *tag, GObject *arg1, GdkEvent *event, GtkTextIter *arg2, char *url) { | |
214 if (event->type == GDK_BUTTON_RELEASE) { | |
215 /* A link was clicked--we emit the "url_clicked" signal with the URL as the argument */ | |
216 // if ((GdkEventButton)(event)->button == 1) | |
217 gtk_signal_emit (G_OBJECT(arg1), signals[URL_CLICKED], url); | |
218 } else if (event->type == GDK_ENTER_NOTIFY) { | |
219 /* make a hand cursor and a tooltip timeout -- if GTK worked as it should */ | |
220 } else if (event->type == GDK_LEAVE_NOTIFY) { | |
221 /* clear timeout and make an arrow cursor again --if GTK worked as it should */ | |
1428 | 222 } |
223 } | |
224 | |
4032 | 225 static void |
226 gtk_smiley_tree_remove (GtkSmileyTree *tree, | |
227 const gchar *text) | |
228 { | |
229 GtkSmileyTree *t = tree; | |
230 const gchar *x = text; | |
231 gint len = 0; | |
232 | |
233 while (*x) { | |
234 gchar *pos; | |
235 | |
236 if (!t->values) | |
237 return; | |
238 | |
239 pos = strchr (t->values->str, *x); | |
240 if (pos) | |
241 t = t->children [(int) pos - (int) t->values->str]; | |
242 else | |
243 return; | |
244 | |
245 x++; len++; | |
246 } | |
247 | |
248 if (t->image) | |
249 t->image = NULL; | |
250 } | |
251 | |
252 static gint | |
253 gtk_smiley_tree_lookup (GtkSmileyTree *tree, | |
254 const gchar *text) | |
255 { | |
256 GtkSmileyTree *t = tree; | |
257 const gchar *x = text; | |
258 gint len = 0; | |
259 | |
260 while (*x) { | |
261 gchar *pos; | |
262 | |
263 if (!t->values) | |
264 break; | |
265 | |
266 pos = strchr (t->values->str, *x); | |
267 if (pos) | |
268 t = t->children [(int) pos - (int) t->values->str]; | |
269 else | |
270 break; | |
271 | |
272 x++; len++; | |
273 } | |
274 | |
275 if (t->image) | |
276 return len; | |
277 | |
278 return 0; | |
279 } | |
280 | |
281 void | |
282 gtk_imhtml_associate_smiley (GtkIMHtml *imhtml, | |
283 gchar *text, | |
284 gchar *sml, | |
285 gchar *path) | |
286 { | |
287 GtkSmileyTree *tree; | |
288 g_return_if_fail (imhtml != NULL); | |
289 g_return_if_fail (GTK_IS_IMHTML (imhtml)); | |
290 g_return_if_fail (text != NULL); | |
291 | |
292 if (sml == NULL) | |
293 tree = imhtml->default_smilies; | |
294 else if ((tree = g_hash_table_lookup(imhtml->smiley_data, sml))) { | |
295 } else { | |
296 tree = gtk_smiley_tree_new(); | |
297 g_hash_table_insert(imhtml->smiley_data, sml, tree); | |
298 } | |
299 | |
300 if (path == NULL) | |
301 gtk_smiley_tree_remove (tree, text); | |
302 else | |
303 gtk_smiley_tree_insert (tree, text, path); | |
304 } | |
305 | |
306 static gboolean | |
307 gtk_imhtml_is_smiley (GtkIMHtml *imhtml, | |
308 GSList *fonts, | |
309 const gchar *text, | |
310 gint *len) | |
311 { | |
312 GtkSmileyTree *tree; | |
313 FontDetail *font; | |
314 char *sml = NULL; | |
315 | |
316 if (fonts) { | |
317 font = fonts->data; | |
318 sml = font->sml; | |
319 } | |
320 | |
321 if (sml == NULL) | |
322 tree = imhtml->default_smilies; | |
323 else { | |
324 tree = g_hash_table_lookup(imhtml->smiley_data, sml); | |
325 } | |
326 if (tree == NULL) | |
327 return FALSE; | |
328 | |
329 *len = gtk_smiley_tree_lookup (tree, text); | |
330 return (*len > 0); | |
331 } | |
332 | |
333 static gchar* | |
334 gtk_smiley_tree_image (GtkIMHtml *imhtml, | |
335 const gchar *sml, | |
336 const gchar *text) | |
337 { | |
338 GtkSmileyTree *t; | |
339 const gchar *x = text; | |
340 | |
341 if (sml == NULL) | |
342 t = imhtml->default_smilies; | |
343 else | |
344 t = g_hash_table_lookup(imhtml->smiley_data, sml); | |
345 | |
346 | |
347 if (t == NULL) | |
348 return sml ? gtk_smiley_tree_image(imhtml, NULL, text) : NULL; | |
349 | |
350 while (*x) { | |
351 gchar *pos; | |
352 | |
353 if (!t->values) { | |
354 return sml ? gtk_smiley_tree_image(imhtml, NULL, text) : NULL; | |
355 } | |
356 | |
357 pos = strchr (t->values->str, *x); | |
358 if (pos) { | |
359 t = t->children [(int) pos - (int) t->values->str]; | |
360 } else { | |
361 return sml ? gtk_smiley_tree_image(imhtml, NULL, text) : NULL; | |
362 } | |
363 x++; | |
364 } | |
365 | |
366 return t->image; | |
367 } | |
3922 | 368 #define VALID_TAG(x) if (!g_strncasecmp (string, x ">", strlen (x ">"))) { \ |
369 *tag = g_strndup (string, strlen (x)); \ | |
370 *len = strlen (x) + 1; \ | |
371 return TRUE; \ | |
372 } \ | |
373 (*type)++ | |
1428 | 374 |
3922 | 375 #define VALID_OPT_TAG(x) if (!g_strncasecmp (string, x " ", strlen (x " "))) { \ |
376 const gchar *c = string + strlen (x " "); \ | |
377 gchar e = '"'; \ | |
378 gboolean quote = FALSE; \ | |
379 while (*c) { \ | |
380 if (*c == '"' || *c == '\'') { \ | |
381 if (quote && (*c == e)) \ | |
382 quote = !quote; \ | |
383 else if (!quote) { \ | |
384 quote = !quote; \ | |
385 e = *c; \ | |
386 } \ | |
387 } else if (!quote && (*c == '>')) \ | |
388 break; \ | |
389 c++; \ | |
390 } \ | |
391 if (*c) { \ | |
392 *tag = g_strndup (string, c - string); \ | |
393 *len = c - string + 1; \ | |
394 return TRUE; \ | |
395 } \ | |
396 } \ | |
397 (*type)++ | |
1428 | 398 |
399 | |
1472
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
400 static gboolean |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
401 gtk_imhtml_is_amp_escape (const gchar *string, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
402 gchar *replace, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
403 gint *length) |
1472
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
404 { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
405 g_return_val_if_fail (string != NULL, FALSE); |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
406 g_return_val_if_fail (replace != NULL, FALSE); |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
407 g_return_val_if_fail (length != NULL, FALSE); |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
408 |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
409 if (!g_strncasecmp (string, "&", 5)) { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
410 *replace = '&'; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
411 *length = 5; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
412 } else if (!g_strncasecmp (string, "<", 4)) { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
413 *replace = '<'; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
414 *length = 4; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
415 } else if (!g_strncasecmp (string, ">", 4)) { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
416 *replace = '>'; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
417 *length = 4; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
418 } else if (!g_strncasecmp (string, " ", 6)) { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
419 *replace = ' '; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
420 *length = 6; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
421 } else if (!g_strncasecmp (string, "©", 6)) { |
3717
988485669631
[gaim-migrate @ 3850]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3705
diff
changeset
|
422 *replace = '©'; /* was: '©' */ |
1472
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
423 *length = 6; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
424 } else if (!g_strncasecmp (string, """, 6)) { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
425 *replace = '\"'; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
426 *length = 6; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
427 } else if (!g_strncasecmp (string, "®", 5)) { |
3717
988485669631
[gaim-migrate @ 3850]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
3705
diff
changeset
|
428 *replace = '®'; /* was: '®' */ |
1472
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
429 *length = 5; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
430 } else if (*(string + 1) == '#') { |
2022
199ba82faacb
[gaim-migrate @ 2032]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2002
diff
changeset
|
431 guint pound = 0; |
3004 | 432 if ((sscanf (string, "&#%u;", £) == 1) && pound != 0) { |
1472
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
433 if (*(string + 3 + (gint)log10 (pound)) != ';') |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
434 return FALSE; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
435 *replace = (gchar)pound; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
436 *length = 2; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
437 while (isdigit ((gint) string [*length])) (*length)++; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
438 if (string [*length] == ';') (*length)++; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
439 } else { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
440 return FALSE; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
441 } |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
442 } else { |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
443 return FALSE; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
444 } |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
445 |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
446 return TRUE; |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
447 } |
be620a051d6d
[gaim-migrate @ 1482]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1463
diff
changeset
|
448 |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
449 static gboolean |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
450 gtk_imhtml_is_tag (const gchar *string, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
451 gchar **tag, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
452 gint *len, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
453 gint *type) |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
454 { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
455 *type = 1; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
456 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
457 if (!strchr (string, '>')) |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
458 return FALSE; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
459 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
460 VALID_TAG ("B"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
461 VALID_TAG ("BOLD"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
462 VALID_TAG ("/B"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
463 VALID_TAG ("/BOLD"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
464 VALID_TAG ("I"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
465 VALID_TAG ("ITALIC"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
466 VALID_TAG ("/I"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
467 VALID_TAG ("/ITALIC"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
468 VALID_TAG ("U"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
469 VALID_TAG ("UNDERLINE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
470 VALID_TAG ("/U"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
471 VALID_TAG ("/UNDERLINE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
472 VALID_TAG ("S"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
473 VALID_TAG ("STRIKE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
474 VALID_TAG ("/S"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
475 VALID_TAG ("/STRIKE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
476 VALID_TAG ("SUB"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
477 VALID_TAG ("/SUB"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
478 VALID_TAG ("SUP"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
479 VALID_TAG ("/SUP"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
480 VALID_TAG ("PRE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
481 VALID_TAG ("/PRE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
482 VALID_TAG ("TITLE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
483 VALID_TAG ("/TITLE"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
484 VALID_TAG ("BR"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
485 VALID_TAG ("HR"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
486 VALID_TAG ("/FONT"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
487 VALID_TAG ("/A"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
488 VALID_TAG ("P"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
489 VALID_TAG ("/P"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
490 VALID_TAG ("H3"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
491 VALID_TAG ("/H3"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
492 VALID_TAG ("HTML"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
493 VALID_TAG ("/HTML"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
494 VALID_TAG ("BODY"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
495 VALID_TAG ("/BODY"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
496 VALID_TAG ("FONT"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
497 VALID_TAG ("HEAD"); |
2993 | 498 VALID_TAG ("/HEAD"); |
499 VALID_TAG ("BINARY"); | |
500 VALID_TAG ("/BINARY"); | |
501 | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
502 VALID_OPT_TAG ("HR"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
503 VALID_OPT_TAG ("FONT"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
504 VALID_OPT_TAG ("BODY"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
505 VALID_OPT_TAG ("A"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
506 VALID_OPT_TAG ("IMG"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
507 VALID_OPT_TAG ("P"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
508 VALID_OPT_TAG ("H3"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
509 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
510 if (!g_strncasecmp(string, "!--", strlen ("!--"))) { |
2954
f6c4f2187c08
[gaim-migrate @ 2967]
Christian Hammond <chipx86@chipx86.com>
parents:
2898
diff
changeset
|
511 gchar *e = strstr (string + strlen("!--"), "-->"); |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
512 if (e) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
513 *len = e - string + strlen ("-->"); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
514 *tag = g_strndup (string + strlen ("!--"), *len - strlen ("!---->")); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
515 return TRUE; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
516 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
517 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
518 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
519 return FALSE; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
520 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
521 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
522 static gchar* |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
523 gtk_imhtml_get_html_opt (gchar *tag, |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
524 const gchar *opt) |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
525 { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
526 gchar *t = tag; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
527 gchar *e, *a; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
528 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
529 while (g_strncasecmp (t, opt, strlen (opt))) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
530 gboolean quote = FALSE; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
531 if (*t == '\0') break; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
532 while (*t && !((*t == ' ') && !quote)) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
533 if (*t == '\"') |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
534 quote = ! quote; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
535 t++; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
536 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
537 while (*t && (*t == ' ')) t++; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
538 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
539 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
540 if (!g_strncasecmp (t, opt, strlen (opt))) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
541 t += strlen (opt); |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
542 } else { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
543 return NULL; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
544 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
545 |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
546 if ((*t == '\"') || (*t == '\'')) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
547 e = a = ++t; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
548 while (*e && (*e != *(t - 1))) e++; |
2993 | 549 if (*e == '\0') { |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
550 return NULL; |
2993 | 551 } else |
552 return g_strndup (a, e - a); | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
553 } else { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
554 e = a = t; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
555 while (*e && !isspace ((gint) *e)) e++; |
2993 | 556 return g_strndup (a, e - a); |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
557 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
558 } |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
559 |
3922 | 560 |
561 | |
562 #define NEW_TEXT_BIT 0 | |
563 #define NEW_HR_BIT 1 | |
564 #define NEW_BIT(x) ws [wpos] = '\0'; \ | |
565 mark2 = gtk_text_buffer_create_mark(imhtml->text_buffer, NULL, &iter, TRUE); \ | |
566 gtk_text_buffer_insert(imhtml->text_buffer, &iter, ws, -1); \ | |
567 gtk_text_buffer_get_end_iter(imhtml->text_buffer, &iter); \ | |
568 gtk_text_buffer_get_iter_at_mark(imhtml->text_buffer, &siter, mark2); \ | |
569 gtk_text_buffer_delete_mark(imhtml->text_buffer, mark2); \ | |
570 if (bold) \ | |
571 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "BOLD", &siter, &iter); \ | |
572 if (italics) \ | |
573 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "ITALICS", &siter, &iter); \ | |
574 if (underline) \ | |
575 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "UNDERLINE", &siter, &iter); \ | |
576 if (strike) \ | |
577 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "STRIKE", &siter, &iter); \ | |
578 if (sub) \ | |
579 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "SUB", &siter, &iter); \ | |
580 if (sup) \ | |
581 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "SUP", &siter, &iter); \ | |
582 if (pre) \ | |
583 gtk_text_buffer_apply_tag_by_name(imhtml->text_buffer, "PRE", &siter, &iter); \ | |
584 if (bg) { \ | |
585 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "background", bg, NULL); \ | |
586 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
587 } \ | |
588 if (fonts) { \ | |
589 FontDetail *fd = fonts->data; \ | |
590 if (fd->fore) { \ | |
591 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "foreground", fd->fore, NULL); \ | |
592 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
593 } \ | |
594 if (fd->back) { \ | |
595 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "background", fd->back, NULL); \ | |
596 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
597 } \ | |
598 if (fd->face) { \ | |
599 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "font", fd->face, NULL); \ | |
600 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
601 } \ | |
602 if (fd->size) { \ | |
603 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "size-points", (double)POINT_SIZE(fd->size), NULL); \ | |
604 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
605 } \ | |
606 } \ | |
607 if (url) { \ | |
608 texttag = gtk_text_buffer_create_tag(imhtml->text_buffer, NULL, "foreground", "blue", "underline", PANGO_UNDERLINE_SINGLE, NULL); \ | |
609 g_signal_connect(G_OBJECT(texttag), "event", G_CALLBACK(tag_event), strdup(url)); \ | |
610 gtk_text_buffer_apply_tag(imhtml->text_buffer, texttag, &siter, &iter); \ | |
611 } \ | |
612 wpos = 0; \ | |
613 ws[0] = 0; \ | |
614 gtk_text_buffer_get_end_iter(imhtml->text_buffer, &iter); \ | |
615 | |
616 | |
617 /* if (x == NEW_HR_BIT) { \ | |
618 sep = gtk_hseparator_new(); \ | |
619 gtk_widget_size_request(GTK_WIDGET(imhtml), &req); \ | |
620 gtk_widget_set_size_request(sep, 20, -1); \ | |
621 anchor = gtk_text_buffer_create_child_anchor(imhtml->text_buffer, &iter); \ | |
622 gtk_text_view_add_child_at_anchor(GTK_TEXT_VIEW(imhtml), sep, anchor); \ | |
623 gtk_widget_show(sep); \ | |
624 } */ | |
625 | |
626 GString* gtk_imhtml_append_text (GtkIMHtml *imhtml, | |
627 const gchar *text, | |
628 gint len, | |
629 GtkIMHtmlOptions options) | |
1428 | 630 { |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
631 gint pos = 0; |
3922 | 632 GString *str = NULL; |
633 GtkTextIter iter, siter; | |
634 GtkTextMark *mark, *mark2; | |
635 GtkTextChildAnchor *anchor; | |
636 GtkTextTag *texttag; | |
637 GtkWidget *sep; | |
638 GtkRequisition req; | |
639 gchar *ws; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
640 gchar *tag; |
3922 | 641 gchar *url = NULL; |
642 gchar *bg = NULL; | |
4032 | 643 gint tlen, smilelen, wpos=0; |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
644 gint type; |
3922 | 645 const gchar *c; |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
646 gchar amp; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
647 |
1428 | 648 guint bold = 0, |
649 italics = 0, | |
650 underline = 0, | |
651 strike = 0, | |
652 sub = 0, | |
653 sup = 0, | |
1691
d802b115800f
[gaim-migrate @ 1701]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1647
diff
changeset
|
654 title = 0, |
3922 | 655 pre = 0; |
1428 | 656 |
3922 | 657 GSList *fonts = NULL; |
1428 | 658 |
659 g_return_val_if_fail (imhtml != NULL, NULL); | |
660 g_return_val_if_fail (GTK_IS_IMHTML (imhtml), NULL); | |
661 g_return_val_if_fail (text != NULL, NULL); | |
3922 | 662 g_return_val_if_fail (len != 0, NULL); |
663 | |
664 c = text; | |
665 if (len == -1) | |
666 len = strlen(text); | |
667 ws = g_malloc(len + 1); | |
668 ws[0] = 0; | |
1428 | 669 |
670 if (options & GTK_IMHTML_RETURN_LOG) | |
3922 | 671 str = g_string_new(""); |
1428 | 672 |
3922 | 673 gtk_text_buffer_get_end_iter(imhtml->text_buffer, &iter); |
674 mark = gtk_text_buffer_create_mark (imhtml->text_buffer, NULL, &iter, /* right grav */ FALSE); | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
675 while (pos < len) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
676 if (*c == '<' && gtk_imhtml_is_tag (c + 1, &tag, &tlen, &type)) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
677 c++; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
678 pos++; |
3922 | 679 switch (type) |
680 { | |
681 case 1: /* B */ | |
682 case 2: /* BOLD */ | |
683 NEW_BIT (NEW_TEXT_BIT); | |
684 bold++; | |
685 break; | |
686 case 3: /* /B */ | |
687 case 4: /* /BOLD */ | |
688 NEW_BIT (NEW_TEXT_BIT); | |
689 if (bold) | |
690 bold--; | |
691 break; | |
692 case 5: /* I */ | |
693 case 6: /* ITALIC */ | |
694 NEW_BIT (NEW_TEXT_BIT); | |
695 italics++; | |
696 break; | |
697 case 7: /* /I */ | |
698 case 8: /* /ITALIC */ | |
699 NEW_BIT (NEW_TEXT_BIT); | |
700 if (italics) | |
701 italics--; | |
702 break; | |
703 case 9: /* U */ | |
704 case 10: /* UNDERLINE */ | |
705 NEW_BIT (NEW_TEXT_BIT); | |
706 underline++; | |
707 break; | |
708 case 11: /* /U */ | |
709 case 12: /* /UNDERLINE */ | |
710 NEW_BIT (NEW_TEXT_BIT); | |
711 if (underline) | |
712 underline--; | |
713 break; | |
714 case 13: /* S */ | |
715 case 14: /* STRIKE */ | |
716 NEW_BIT (NEW_TEXT_BIT); | |
717 strike++; | |
718 break; | |
719 case 15: /* /S */ | |
720 case 16: /* /STRIKE */ | |
721 NEW_BIT (NEW_TEXT_BIT); | |
722 if (strike) | |
723 strike--; | |
724 break; | |
725 case 17: /* SUB */ | |
726 NEW_BIT (NEW_TEXT_BIT); | |
727 sub++; | |
728 break; | |
729 case 18: /* /SUB */ | |
730 NEW_BIT (NEW_TEXT_BIT); | |
731 if (sub) | |
732 sub--; | |
733 break; | |
734 case 19: /* SUP */ | |
735 NEW_BIT (NEW_TEXT_BIT); | |
736 sup++; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
737 break; |
3922 | 738 case 20: /* /SUP */ |
739 NEW_BIT (NEW_TEXT_BIT); | |
740 if (sup) | |
741 sup--; | |
742 break; | |
743 case 21: /* PRE */ | |
744 NEW_BIT (NEW_TEXT_BIT); | |
745 pre++; | |
746 break; | |
747 case 22: /* /PRE */ | |
748 NEW_BIT (NEW_TEXT_BIT); | |
749 if (pre) | |
750 pre--; | |
751 break; | |
752 case 23: /* TITLE */ | |
753 NEW_BIT (NEW_TEXT_BIT); | |
754 title++; | |
755 break; | |
756 case 24: /* /TITLE */ | |
757 if (title) { | |
758 if (options & GTK_IMHTML_NO_TITLE) { | |
759 wpos = 0; | |
760 ws [wpos] = '\0'; | |
761 } | |
762 title--; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
763 } |
3922 | 764 break; |
765 case 25: /* BR */ | |
766 ws[wpos] = '\n'; | |
767 wpos++; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
768 NEW_BIT (NEW_TEXT_BIT); |
3922 | 769 break; |
770 case 26: /* HR */ | |
771 case 42: /* HR (opt) */ | |
772 ws[wpos++] = '\n'; | |
773 NEW_BIT(NEW_HR_BIT); | |
774 break; | |
775 case 27: /* /FONT */ | |
776 if (fonts) { | |
777 FontDetail *font = fonts->data; | |
778 NEW_BIT (NEW_TEXT_BIT); | |
779 fonts = g_slist_remove (fonts, font); | |
780 if (font->face) | |
781 g_free (font->face); | |
782 if (font->fore) | |
783 g_free (font->fore); | |
784 if (font->back) | |
785 g_free (font->back); | |
4032 | 786 if (font->sml) |
787 g_free (font->sml); | |
3922 | 788 g_free (font); |
789 } | |
790 break; | |
791 case 28: /* /A */ | |
792 if (url) { | |
793 NEW_BIT(NEW_TEXT_BIT); | |
794 g_free(url); | |
795 url = NULL; | |
2993 | 796 break; |
797 } | |
3922 | 798 case 29: /* P */ |
799 case 30: /* /P */ | |
800 case 31: /* H3 */ | |
801 case 32: /* /H3 */ | |
802 case 33: /* HTML */ | |
803 case 34: /* /HTML */ | |
804 case 35: /* BODY */ | |
805 case 36: /* /BODY */ | |
806 case 37: /* FONT */ | |
807 case 38: /* HEAD */ | |
808 case 39: /* /HEAD */ | |
809 break; | |
810 case 40: /* BINARY */ | |
811 case 41: /* /BINARY */ | |
812 break; | |
813 case 43: /* FONT (opt) */ | |
814 { | |
4032 | 815 gchar *color, *back, *face, *size, *sml; |
3922 | 816 FontDetail *font, *oldfont = NULL; |
817 color = gtk_imhtml_get_html_opt (tag, "COLOR="); | |
818 back = gtk_imhtml_get_html_opt (tag, "BACK="); | |
819 face = gtk_imhtml_get_html_opt (tag, "FACE="); | |
820 size = gtk_imhtml_get_html_opt (tag, "SIZE="); | |
4032 | 821 sml = gtk_imhtml_get_html_opt (tag, "SML="); |
822 if (!(color || back || face || size || sml)) | |
3922 | 823 break; |
824 | |
825 NEW_BIT (NEW_TEXT_BIT); | |
826 | |
827 font = g_new0 (FontDetail, 1); | |
828 if (fonts) | |
829 oldfont = fonts->data; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
830 |
3922 | 831 if (color && !(options & GTK_IMHTML_NO_COLOURS)) |
832 font->fore = color; | |
833 else if (oldfont && oldfont->fore) | |
834 font->fore = g_strdup(oldfont->fore); | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
835 |
3922 | 836 if (back && !(options & GTK_IMHTML_NO_COLOURS)) |
837 font->back = back; | |
838 else if (oldfont && oldfont->back) | |
839 font->back = g_strdup(oldfont->back); | |
840 | |
841 if (face && !(options & GTK_IMHTML_NO_FONTS)) | |
842 font->face = face; | |
843 else if (oldfont && oldfont->face) | |
844 font->face = g_strdup(oldfont->face); | |
4032 | 845 |
846 if (sml) | |
847 font->sml = sml; | |
848 else if (oldfont && oldfont->sml) | |
849 font->sml = g_strdup(oldfont->sml); | |
850 | |
3922 | 851 if (size && !(options & GTK_IMHTML_NO_SIZES)) { |
852 if (*size == '+') { | |
853 sscanf (size + 1, "%hd", &font->size); | |
854 font->size += 3; | |
855 } else if (*size == '-') { | |
856 sscanf (size + 1, "%hd", &font->size); | |
857 font->size = MAX (0, 3 - font->size); | |
858 } else if (isdigit (*size)) { | |
859 sscanf (size, "%hd", &font->size); | |
860 } | |
861 } else if (oldfont) | |
862 font->size = oldfont->size; | |
863 g_free(size); | |
864 fonts = g_slist_prepend (fonts, font); | |
865 } | |
866 break; | |
867 case 44: /* BODY (opt) */ | |
868 if (!(options & GTK_IMHTML_NO_COLOURS)) { | |
869 char *bgcolor = gtk_imhtml_get_html_opt (tag, "BGCOLOR="); | |
870 if (bgcolor) { | |
871 NEW_BIT(NEW_TEXT_BIT); | |
872 if (bg) | |
873 g_free(bg); | |
874 bg = bgcolor; | |
2885
f72efa29c109
[gaim-migrate @ 2898]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2871
diff
changeset
|
875 } |
1428 | 876 } |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
877 break; |
3922 | 878 case 45: /* A (opt) */ |
879 { | |
880 gchar *href = gtk_imhtml_get_html_opt (tag, "HREF="); | |
881 if (href) { | |
882 NEW_BIT (NEW_TEXT_BIT); | |
883 if (url) | |
884 g_free (url); | |
885 url = href; | |
886 } | |
2993 | 887 } |
3922 | 888 break; |
889 case 47: /* P (opt) */ | |
890 case 48: /* H3 (opt) */ | |
2993 | 891 break; |
3922 | 892 case 49: /* comment */ |
893 NEW_BIT (NEW_TEXT_BIT); | |
894 wpos = g_snprintf (ws, len, "%s", tag); | |
895 NEW_BIT (NEW_COMMENT_BIT); | |
896 break; | |
897 default: | |
898 break; | |
2993 | 899 } |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
900 c += tlen; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
901 pos += tlen; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
902 } else if (*c == '&' && gtk_imhtml_is_amp_escape (c, &, &tlen)) { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
903 ws [wpos++] = amp; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
904 c += tlen; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
905 pos += tlen; |
1428 | 906 } else if (*c == '\n') { |
907 if (!(options & GTK_IMHTML_NO_NEWLINE)) { | |
3922 | 908 ws[wpos] = '\n'; |
909 wpos++; | |
1428 | 910 NEW_BIT (NEW_TEXT_BIT); |
911 } | |
912 c++; | |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
913 pos++; |
4032 | 914 } else if (gtk_imhtml_is_smiley (imhtml, fonts, c, &smilelen) || gtk_imhtml_is_smiley(imhtml, NULL, c, &smilelen)) { |
915 FontDetail *fd; | |
916 gchar *sml = NULL; | |
917 if (fonts) { | |
918 fd = fonts->data; | |
919 sml = fd->sml; | |
920 } | |
921 NEW_BIT (NEW_TEXT_BIT); | |
922 wpos = g_snprintf (ws, smilelen + 1, "%s", c); | |
923 gtk_text_buffer_insert_pixbuf(imhtml->text_buffer, &iter, gdk_pixbuf_new_from_file(gtk_smiley_tree_image (imhtml, sml, ws), NULL)); | |
924 c += smilelen; | |
925 pos += smilelen; | |
926 wpos = 0; | |
927 ws[0] = 0; | |
928 } else if (*c) { | |
1428 | 929 ws [wpos++] = *c++; |
2856
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
930 pos++; |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
931 } else { |
b1e300a85678
[gaim-migrate @ 2869]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2826
diff
changeset
|
932 break; |
1428 | 933 } |
934 } | |
3922 | 935 |
936 NEW_BIT(NEW_TEXT_BIT); | |
1428 | 937 if (url) { |
938 g_free (url); | |
3922 | 939 if (str) |
940 str = g_string_append (str, "</A>"); | |
1428 | 941 } |
3922 | 942 |
4032 | 943 while (fonts) { |
944 FontDetail *font = fonts->data; | |
945 fonts = g_slist_remove (fonts, font); | |
946 if (font->face) | |
947 g_free (font->face); | |
948 if (font->fore) | |
949 g_free (font->fore); | |
950 if (font->back) | |
951 g_free (font->back); | |
952 if (font->sml) | |
953 g_free (font->sml); | |
954 g_free (font); | |
955 if (str) | |
956 str = g_string_append (str, "</FONT>"); | |
957 } | |
958 | |
3922 | 959 if (str) { |
1428 | 960 while (bold) { |
3922 | 961 str = g_string_append (str, "</B>"); |
1428 | 962 bold--; |
963 } | |
964 while (italics) { | |
3922 | 965 str = g_string_append (str, "</I>"); |
1428 | 966 italics--; |
967 } | |
968 while (underline) { | |
3922 | 969 str = g_string_append (str, "</U>"); |
1428 | 970 underline--; |
971 } | |
972 while (strike) { | |
3922 | 973 str = g_string_append (str, "</S>"); |
1428 | 974 strike--; |
975 } | |
976 while (sub) { | |
3922 | 977 str = g_string_append (str, "</SUB>"); |
1428 | 978 sub--; |
979 } | |
980 while (sup) { | |
3922 | 981 str = g_string_append (str, "</SUP>"); |
1428 | 982 sup--; |
983 } | |
984 while (title) { | |
3922 | 985 str = g_string_append (str, "</TITLE>"); |
1428 | 986 title--; |
987 } | |
1691
d802b115800f
[gaim-migrate @ 1701]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1647
diff
changeset
|
988 while (pre) { |
3922 | 989 str = g_string_append (str, "</PRE>"); |
1691
d802b115800f
[gaim-migrate @ 1701]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1647
diff
changeset
|
990 pre--; |
d802b115800f
[gaim-migrate @ 1701]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1647
diff
changeset
|
991 } |
1428 | 992 } |
4032 | 993 g_free (ws); |
994 if (!(options & GTK_IMHTML_NO_SCROLL)) | |
995 gtk_text_view_scroll_to_mark (GTK_TEXT_VIEW (imhtml), mark, | |
996 0, TRUE, 0.0, 1.0); | |
3922 | 997 gtk_text_buffer_delete_mark (imhtml->text_buffer, mark); |
998 return str; | |
999 } | |
1000 | |
1001 void gtk_imhtml_set_adjustments (GtkIMHtml *imhtml, | |
1002 GtkAdjustment *hadj, | |
1003 GtkAdjustment *vadj){} | |
1428 | 1004 |
3922 | 1005 void gtk_imhtml_set_defaults (GtkIMHtml *imhtml, |
1006 PangoFontDescription *font, | |
1007 GdkColor *fg_color, | |
1008 GdkColor *bg_color){} | |
1009 | |
1010 void gtk_imhtml_set_img_handler (GtkIMHtml *imhtml, | |
1011 GtkIMHtmlImage handler){} | |
1012 | |
1013 void gtk_imhtml_init_smileys (GtkIMHtml *imhtml){} | |
1014 void gtk_imhtml_remove_smileys (GtkIMHtml *imhtml){} | |
1015 void gtk_imhtml_reset_smileys (GtkIMHtml *imhtml){} | |
1016 void gtk_imhtml_show_smileys (GtkIMHtml *imhtml, | |
1017 gboolean show){} | |
1018 | |
1019 void gtk_imhtml_show_comments (GtkIMHtml *imhtml, | |
1020 gboolean show){} | |
1780
d7cbedd1d651
[gaim-migrate @ 1790]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1738
diff
changeset
|
1021 |
d7cbedd1d651
[gaim-migrate @ 1790]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1738
diff
changeset
|
1022 void |
d7cbedd1d651
[gaim-migrate @ 1790]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1738
diff
changeset
|
1023 gtk_imhtml_clear (GtkIMHtml *imhtml) |
d7cbedd1d651
[gaim-migrate @ 1790]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1738
diff
changeset
|
1024 { |
3922 | 1025 GtkTextIter start, end; |
2993 | 1026 |
3922 | 1027 gtk_text_buffer_get_start_iter(imhtml->text_buffer, &start); |
1028 gtk_text_buffer_get_end_iter(imhtml->text_buffer, &end); | |
1029 gtk_text_buffer_delete(imhtml->text_buffer, &start, &end); | |
1780
d7cbedd1d651
[gaim-migrate @ 1790]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1738
diff
changeset
|
1030 } |
2363
08c66712364c
[gaim-migrate @ 2376]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2349
diff
changeset
|
1031 |
3922 | 1032 void gtk_imhtml_page_up (GtkIMHtml *imhtml){} |
1033 void gtk_imhtml_page_down (GtkIMHtml *imhtml){} |