Mercurial > pidgin
annotate src/gtkspell.c @ 2456:308f010ed664
[gaim-migrate @ 2469]
hm
committer: Tailor Script <tailor@pidgin.im>
author | Eric Warmenhoven <eric@warmenhoven.org> |
---|---|
date | Tue, 09 Oct 2001 16:23:08 +0000 |
parents | 64e20158271e |
children | e6b9246b33fd |
rev | line source |
---|---|
1117 | 1 /* gtkspell - a spell-checking addon for GtkText |
2 * Copyright (c) 2000 Evan Martin. | |
3 * vim: ts=4 sw=4 | |
4 * This library is free software; you can redistribute it and/or | |
5 * modify it under the terms of the GNU Lesser General Public | |
6 * License as published by the Free Software Foundation; either | |
7 * version 2 of the License, or (at your option) any later version. | |
8 * | |
9 * This library is distributed in the hope that it will be useful, | |
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
12 * Lesser General Public License for more details. | |
13 * | |
14 * You should have received a copy of the GNU Lesser General Public | |
15 * License along with this library; if not, write to the Free Software | |
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
17 */ | |
18 | |
19 #include <gtk/gtk.h> | |
20 | |
21 #include <sys/types.h> | |
22 #include <sys/wait.h> | |
23 #include <sys/time.h> | |
24 #include <unistd.h> | |
25 #include <stdio.h> | |
26 #include <signal.h> | |
27 #include <ctype.h> | |
28 #include <string.h> | |
29 #include <stdlib.h> | |
30 #include <errno.h> | |
31 | |
32 /* TODO: | |
33 * handle dictionary changes | |
34 * asynchronous lookups | |
35 */ | |
36 | |
37 /* size of the text buffer used in various word-processing routines. */ | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
38 /* #define BUFSIZE 1024 */ |
1117 | 39 /* number of suggestions to display on each menu. */ |
40 #define MENUCOUNT 10 | |
41 #define BUGEMAIL "gtkspell-devel@lists.sourceforge.net" | |
42 | |
43 /* because we keep only one copy of the spell program running, | |
44 * all ispell-related variables can be static. | |
45 */ | |
46 static pid_t spell_pid = -1; | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
47 static int fd_write[2] = {0}, fd_read[2] = {0}; |
1117 | 48 static int signal_set_up = 0; |
49 | |
50 /* FIXME? */ | |
51 static GdkColor highlight = { 0, 255*256, 0, 0 }; | |
52 | |
53 static void entry_insert_cb(GtkText *gtktext, | |
54 gchar *newtext, guint len, guint *ppos, gpointer d); | |
55 static void set_up_signal(); | |
56 | |
57 int gtkspell_running() { | |
58 return (spell_pid > 0); | |
59 } | |
60 | |
1794
60b3fd819cce
[gaim-migrate @ 1804]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1496
diff
changeset
|
61 /* |
1117 | 62 static void error_print(const char *fmt, ...) { |
63 va_list ap; | |
64 va_start(ap, fmt); | |
65 fprintf(stderr, "gtkspell: "); | |
66 vfprintf(stderr, fmt, ap); | |
67 va_end(ap); | |
68 } | |
1794
60b3fd819cce
[gaim-migrate @ 1804]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1496
diff
changeset
|
69 */ |
1815
f15d449b3167
[gaim-migrate @ 1825]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1794
diff
changeset
|
70 extern void debug_printf(char *, ...); |
1794
60b3fd819cce
[gaim-migrate @ 1804]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1496
diff
changeset
|
71 #define error_print debug_printf |
1117 | 72 |
73 /* functions to interface with pipe */ | |
74 static void writetext(char *text) { | |
75 write(fd_write[1], text, strlen(text)); | |
76 } | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
77 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
78 static char *readline() { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
79 int len = 1024; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
80 gchar *buf = g_malloc(len); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
81 int pos = 0; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
82 do { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
83 int val = read(fd_read[0], buf + pos, 1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
84 if (val <= 0) { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
85 error_print("read: %s\n", strerror(errno)); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
86 g_free(buf); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
87 return NULL; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
88 } |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
89 pos += val; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
90 if (pos == len) { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
91 len *= 2; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
92 buf = g_realloc(buf, len); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
93 } |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
94 } while (buf[pos - 1] != '\n'); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
95 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
96 buf = g_realloc(buf, pos + 1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
97 buf[pos] = 0; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
98 return buf; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
99 } |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
100 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
101 static char *readresponse() { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
102 char *r1, *r2, *result; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
103 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
104 r1 = readline(); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
105 if (!r1) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
106 return NULL; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
107 if (*r1 == '\n') { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
108 g_strchomp(r1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
109 return r1; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
110 } |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
111 r2 = readline(); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
112 if (!r2) { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
113 g_free(r1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
114 return NULL; |
1117 | 115 } |
116 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
117 while (r2 && *r2 != '\n') { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
118 char *tmp = r1; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
119 r1 = g_strconcat(tmp, r2, NULL); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
120 g_free(tmp); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
121 g_free(r2); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
122 r2 = readline(); |
1117 | 123 } |
124 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
125 if (!r2) { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
126 g_free(r1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
127 return NULL; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
128 } |
1117 | 129 |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
130 result = g_strconcat(r1, r2, NULL); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
131 g_free(r1); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
132 g_free(r2); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
133 g_strchomp(result); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
134 return result; |
1117 | 135 } |
136 | |
137 | |
138 void gtkspell_stop() { | |
139 if (gtkspell_running()) { | |
1415
3dfd2a83fb5e
[gaim-migrate @ 1425]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1127
diff
changeset
|
140 kill(spell_pid, SIGHUP); |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
141 spell_pid = 0; |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
142 close(fd_read[0]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
143 close(fd_write[1]); |
1117 | 144 } |
145 } | |
146 | |
147 int gtkspell_start(char *path, char * args[]) { | |
148 int fd_error[2]; | |
149 | |
150 if (gtkspell_running()) { | |
151 error_print("gtkspell_start called while already running.\n"); | |
152 gtkspell_stop(); | |
153 } | |
154 | |
155 if (!signal_set_up) { | |
156 set_up_signal(); | |
157 signal_set_up = 1; | |
158 } | |
159 | |
160 pipe(fd_write); | |
161 pipe(fd_read); | |
162 pipe(fd_error); | |
163 | |
164 spell_pid = fork(); | |
165 if (spell_pid < 0) { | |
166 error_print("fork: %s\n", strerror(errno)); | |
167 return -1; | |
168 } else if (spell_pid == 0) { | |
169 dup2(fd_write[0], 0); | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
170 close(fd_write[0]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
171 close(fd_write[1]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
172 |
1117 | 173 dup2(fd_read[1], 1); |
174 close(fd_read[0]); | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
175 close(fd_read[1]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
176 |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
177 dup2(fd_error[1], 2); |
1117 | 178 close(fd_error[0]); |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
179 close(fd_error[1]); |
1117 | 180 |
181 if (path == NULL) { | |
182 if (execvp(args[0], args) < 0) | |
183 error_print("execvp('%s'): %s\n", args[0], strerror(errno)); | |
184 } else { | |
185 if (execv(path, args) < 0) | |
186 error_print("execv('%s'): %s\n", path, strerror(errno)); | |
187 } | |
188 /* if we get here, we failed. | |
189 * send some text on the pipe to indicate status. | |
190 */ | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
191 write(0, "!", 1); /* stdout _is_ the pipe. */ |
1117 | 192 |
193 _exit(0); | |
194 } else { | |
195 /* there are at least two ways to fail: | |
196 * - the exec() can fail | |
197 * - the exec() can succeed, but the program can dump the help screen | |
198 * we must check for both. | |
199 */ | |
200 fd_set rfds; | |
201 struct timeval tv; | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
202 char *buf; |
1117 | 203 |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
204 close(fd_write[0]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
205 close(fd_read[1]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
206 |
1117 | 207 FD_ZERO(&rfds); |
208 FD_SET(fd_error[0], &rfds); | |
209 FD_SET(fd_read[0], &rfds); | |
210 tv.tv_sec = 2; | |
211 tv.tv_usec = 0; | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
212 |
1117 | 213 if (select(MAX(fd_error[0], fd_read[0])+1, |
214 &rfds, NULL, NULL, &tv) < 0) { | |
215 /* FIXME: is this needed? */ | |
216 error_print("Timed out waiting for spell command.\n"); | |
217 gtkspell_stop(); | |
218 return -1; | |
219 } | |
220 | |
221 if (FD_ISSET(fd_error[0], &rfds)) { /* stderr readable? */ | |
222 error_print("Spell command printed on stderr -- probably failed.\n"); | |
223 gtkspell_stop(); | |
224 return -1; | |
225 } | |
226 | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
227 /* we're done with stderr, now. */ |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
228 close(fd_error[0]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
229 close(fd_error[1]); |
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
230 |
1117 | 231 /* otherwise, fd_read[0] is set. */ |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
232 buf = readline(); |
1117 | 233 |
234 /* ispell should print something like this: | |
235 * @(#) International Ispell Version 3.1.20 10/10/95 | |
236 * if it doesn't, it's an error. */ | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
237 if (!buf || buf[0] != '@') { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
238 if (buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
239 g_free(buf); |
1117 | 240 gtkspell_stop(); |
241 return -1; | |
242 } | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
243 g_free(buf); |
1117 | 244 } |
245 | |
246 /* put ispell into terse mode. | |
247 * this makes it not respond on correctly spelled words. */ | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
248 writetext("!\n"); |
1117 | 249 return 0; |
250 } | |
251 | |
252 static GList* misspelled_suggest(char *word) { | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
253 char *buf; |
1117 | 254 char *newword; |
255 GList *l = NULL; | |
256 int count; | |
257 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
258 buf = g_strdup_printf("^%s\n", word); /* guard against ispell control chars */ |
1117 | 259 writetext(buf); |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
260 g_free(buf); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
261 buf = readresponse(); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
262 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
263 if (!buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
264 return NULL; |
1117 | 265 |
266 switch (buf[0]) { /* first char is ispell command. */ | |
267 case 0: /* no response: word is ok. */ | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
268 g_free(buf); |
1117 | 269 return NULL; |
270 case '&': /* misspelled, with suggestions */ | |
271 /* & <orig> <count> <ofs>: <miss>, <miss>, <guess>, ... */ | |
272 strtok(buf, " "); /* & */ | |
273 newword = strtok(NULL, " "); /* orig */ | |
274 l = g_list_append(l, g_strdup(newword)); | |
275 newword = strtok(NULL, " "); /* count */ | |
276 count = atoi(newword); | |
277 strtok(NULL, " "); /* ofs: */ | |
278 | |
279 while ((newword = strtok(NULL, ",")) != NULL) { | |
280 int len = strlen(newword); | |
281 if (newword[len-1] == ' ' || newword[len-1] == '\n') | |
282 newword[len-1] = 0; | |
283 if (count == 0) { | |
284 g_list_append(l, NULL); /* signal the "suggestions" */ | |
285 } | |
286 /* add it to the list, skipping the initial space. */ | |
287 l = g_list_append(l, | |
288 g_strdup(newword[0] == ' ' ? newword+1 : newword)); | |
289 | |
290 count--; | |
291 } | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
292 g_free(buf); |
1117 | 293 return l; |
294 | |
295 case '#': /* misspelled, no suggestions */ | |
1467
7f7857c5036e
[gaim-migrate @ 1477]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1415
diff
changeset
|
296 case '?': /* ispell is guessing. */ |
1117 | 297 /* # <orig> <ofs> */ |
298 strtok(buf, " "); /* & */ | |
299 newword = strtok(NULL, " "); /* orig */ | |
300 l = g_list_append(l, g_strdup(newword)); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
301 g_free(buf); |
1117 | 302 return l; |
303 default: | |
304 error_print("Unsupported spell command '%c'.\n" | |
305 "This is a bug; mail " BUGEMAIL " about it.\n", buf[0]); | |
1467
7f7857c5036e
[gaim-migrate @ 1477]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1415
diff
changeset
|
306 error_print("Input [%s]\nOutput [%s]\n", word, buf); |
7f7857c5036e
[gaim-migrate @ 1477]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1415
diff
changeset
|
307 |
1117 | 308 } |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
309 g_free(buf); |
1117 | 310 return NULL; |
311 } | |
312 | |
313 static int misspelled_test(char *word) { | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
314 char *buf; |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
315 buf = g_strdup_printf("^%s\n", word); /* guard against ispell control chars */ |
1117 | 316 writetext(buf); |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
317 g_free(buf); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
318 buf = readresponse(); |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
319 |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
320 if (!buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
321 return 0; |
1117 | 322 |
323 if (buf[0] == 0) { | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
324 g_free(buf); |
1117 | 325 return 0; |
1467
7f7857c5036e
[gaim-migrate @ 1477]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1415
diff
changeset
|
326 } else if (buf[0] == '&' || buf[0] == '#' || buf[0] == '?') { |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
327 g_free(buf); |
1117 | 328 return 1; |
329 } | |
330 | |
331 error_print("Unsupported spell command '%c'.\n" | |
332 "This is a bug; mail " BUGEMAIL " about it.\n", buf[0]); | |
1467
7f7857c5036e
[gaim-migrate @ 1477]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1415
diff
changeset
|
333 error_print("Input [%s]\nOutput [%s]\n", word, buf); |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
334 g_free(buf); |
1117 | 335 return -1; |
336 } | |
337 | |
338 static gboolean iswordsep(char c) { | |
339 return !isalpha(c) && c != '\''; | |
340 } | |
341 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
342 static gboolean get_word_from_pos(GtkText* gtktext, int pos, char** buf, |
1117 | 343 int *pstart, int *pend) { |
344 gint start, end; | |
345 | |
346 if (iswordsep(GTK_TEXT_INDEX(gtktext, pos))) return FALSE; | |
347 | |
348 for (start = pos; start >= 0; --start) { | |
349 if (iswordsep(GTK_TEXT_INDEX(gtktext, start))) break; | |
350 } | |
351 start++; | |
352 | |
353 for (end = pos; end <= gtk_text_get_length(gtktext); end++) { | |
354 if (iswordsep(GTK_TEXT_INDEX(gtktext, end))) break; | |
355 } | |
356 | |
357 if (buf) { | |
2456
308f010ed664
[gaim-migrate @ 2469]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2454
diff
changeset
|
358 char *tmp = g_malloc(end - start + 1); |
1117 | 359 for (pos = start; pos < end; pos++) |
2456
308f010ed664
[gaim-migrate @ 2469]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2454
diff
changeset
|
360 tmp[pos-start] = GTK_TEXT_INDEX(gtktext, pos); |
308f010ed664
[gaim-migrate @ 2469]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2454
diff
changeset
|
361 tmp[pos-start] = 0; |
308f010ed664
[gaim-migrate @ 2469]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2454
diff
changeset
|
362 *buf = tmp; |
1117 | 363 } |
364 | |
365 if (pstart) *pstart = start; | |
366 if (pend) *pend = end; | |
367 | |
368 return TRUE; | |
369 } | |
370 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
371 static gboolean get_curword(GtkText* gtktext, char** buf, |
1117 | 372 int *pstart, int *pend) { |
373 int pos = gtk_editable_get_position(GTK_EDITABLE(gtktext)); | |
374 return get_word_from_pos(gtktext, pos, buf, pstart, pend); | |
375 } | |
376 | |
377 static void change_color(GtkText *gtktext, | |
378 int start, int end, GdkColor *color) { | |
379 char *newtext = gtk_editable_get_chars(GTK_EDITABLE(gtktext), start, end); | |
380 gtk_text_freeze(gtktext); | |
381 gtk_signal_handler_block_by_func(GTK_OBJECT(gtktext), | |
382 GTK_SIGNAL_FUNC(entry_insert_cb), NULL); | |
383 | |
384 gtk_text_set_point(gtktext, start); | |
385 gtk_text_forward_delete(gtktext, end-start); | |
386 | |
387 if (newtext && end-start > 0) | |
388 gtk_text_insert(gtktext, NULL, color, NULL, newtext, end-start); | |
389 | |
390 gtk_signal_handler_unblock_by_func(GTK_OBJECT(gtktext), | |
391 GTK_SIGNAL_FUNC(entry_insert_cb), NULL); | |
392 gtk_text_thaw(gtktext); | |
1415
3dfd2a83fb5e
[gaim-migrate @ 1425]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1127
diff
changeset
|
393 g_free(newtext); |
1117 | 394 } |
395 | |
396 static gboolean check_at(GtkText *gtktext, int from_pos) { | |
397 int start, end; | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
398 char *buf = NULL; |
1117 | 399 |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
400 if (!get_word_from_pos(gtktext, from_pos, &buf, &start, &end)) { |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
401 if (buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
402 g_free(buf); |
1117 | 403 return FALSE; |
404 } | |
405 | |
406 if (misspelled_test(buf)) { | |
407 if (highlight.pixel == 0) { | |
408 /* add an entry for the highlight in the color map. */ | |
409 GdkColormap *gc = gtk_widget_get_colormap(GTK_WIDGET(gtktext)); | |
410 gdk_colormap_alloc_color(gc, &highlight, FALSE, TRUE);; | |
411 } | |
412 change_color(gtktext, start, end, &highlight); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
413 if (buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
414 g_free(buf); |
1117 | 415 return TRUE; |
416 } else { | |
417 change_color(gtktext, start, end, | |
418 &(GTK_WIDGET(gtktext)->style->fg[0])); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
419 if (buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
420 g_free(buf); |
1117 | 421 return FALSE; |
422 } | |
423 } | |
424 | |
425 void gtkspell_check_all(GtkText *gtktext) { | |
426 guint origpos; | |
427 guint pos = 0; | |
428 guint len; | |
429 float adj_value; | |
430 | |
431 if (!gtkspell_running()) return; | |
432 | |
433 len = gtk_text_get_length(gtktext); | |
434 | |
435 adj_value = gtktext->vadj->value; | |
436 gtk_text_freeze(gtktext); | |
437 origpos = gtk_editable_get_position(GTK_EDITABLE(gtktext)); | |
438 while (pos < len) { | |
439 while (pos < len && iswordsep(GTK_TEXT_INDEX(gtktext, pos))) | |
440 pos++; | |
441 while (pos < len && !iswordsep(GTK_TEXT_INDEX(gtktext, pos))) | |
442 pos++; | |
443 if (pos > 0) | |
444 check_at(gtktext, pos-1); | |
445 } | |
446 gtk_text_thaw(gtktext); | |
447 gtk_editable_set_position(GTK_EDITABLE(gtktext), origpos); | |
448 } | |
449 | |
450 static void entry_insert_cb(GtkText *gtktext, | |
451 gchar *newtext, guint len, guint *ppos, gpointer d) { | |
452 int origpos; | |
453 | |
454 if (!gtkspell_running()) return; | |
455 | |
456 gtk_signal_handler_block_by_func(GTK_OBJECT(gtktext), | |
457 GTK_SIGNAL_FUNC(entry_insert_cb), | |
458 NULL); | |
459 gtk_text_insert(GTK_TEXT(gtktext), NULL, | |
460 &(GTK_WIDGET(gtktext)->style->fg[0]), NULL, newtext, len); | |
461 gtk_signal_handler_unblock_by_func(GTK_OBJECT(gtktext), | |
462 GTK_SIGNAL_FUNC(entry_insert_cb), | |
463 NULL); | |
464 gtk_signal_emit_stop_by_name(GTK_OBJECT(gtktext), "insert-text"); | |
465 *ppos += len; | |
466 | |
467 origpos = gtk_editable_get_position(GTK_EDITABLE(gtktext)); | |
468 | |
469 if (iswordsep(newtext[0])) { | |
470 /* did we just end a word? */ | |
471 if (*ppos >= 2) check_at(gtktext, *ppos-2); | |
472 | |
473 /* did we just split a word? */ | |
474 if (*ppos < gtk_text_get_length(gtktext)) | |
475 check_at(gtktext, *ppos+1); | |
476 } else { | |
477 /* check as they type, *except* if they're typing at the end (the most | |
478 * common case. | |
479 */ | |
480 if (*ppos < gtk_text_get_length(gtktext) && | |
481 !iswordsep(GTK_TEXT_INDEX(gtktext, *ppos))) | |
482 check_at(gtktext, *ppos-1); | |
483 } | |
484 | |
485 gtk_editable_set_position(GTK_EDITABLE(gtktext), origpos); | |
1496
d33bf6548543
[gaim-migrate @ 1506]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1467
diff
changeset
|
486 gtk_editable_select_region(GTK_EDITABLE(gtktext), origpos, origpos); |
1117 | 487 } |
488 | |
489 static void entry_delete_cb(GtkText *gtktext, | |
490 gint start, gint end, gpointer d) { | |
491 int origpos; | |
492 | |
493 if (!gtkspell_running()) return; | |
494 | |
495 origpos = gtk_editable_get_position(GTK_EDITABLE(gtktext)); | |
496 check_at(gtktext, start-1); | |
497 gtk_editable_set_position(GTK_EDITABLE(gtktext), origpos); | |
498 gtk_editable_select_region(GTK_EDITABLE(gtktext), origpos, origpos); | |
499 /* this is to *UNDO* the selection, in case they were holding shift | |
500 * while hitting backspace. */ | |
501 } | |
502 | |
503 static void replace_word(GtkWidget *w, gpointer d) { | |
504 int start, end; | |
505 char *newword; | |
506 | |
507 /* we don't save their position, | |
508 * because the cursor is moved by the click. */ | |
509 | |
510 gtk_text_freeze(GTK_TEXT(d)); | |
511 | |
512 gtk_label_get(GTK_LABEL(GTK_BIN(w)->child), &newword); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
513 get_curword(GTK_TEXT(d), NULL, &start, &end); |
1117 | 514 |
515 gtk_text_set_point(GTK_TEXT(d), end); | |
516 gtk_text_backward_delete(GTK_TEXT(d), end-start); | |
517 gtk_text_insert(GTK_TEXT(d), NULL, NULL, NULL, newword, strlen(newword)); | |
518 | |
519 gtk_text_thaw(GTK_TEXT(d)); | |
520 } | |
521 | |
522 static GtkMenu *make_menu(GList *l, GtkText *gtktext) { | |
523 GtkWidget *menu, *item; | |
524 char *caption; | |
525 menu = gtk_menu_new(); { | |
526 caption = g_strdup_printf("Not in dictionary: %s", (char*)l->data); | |
527 item = gtk_menu_item_new_with_label(caption); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
528 g_free(caption); |
1117 | 529 /* I'd like to make it so this item is never selectable, like |
530 * the menu titles in the GNOME panel... unfortunately, the GNOME | |
531 * panel creates their own custom widget to do this! */ | |
532 gtk_widget_show(item); | |
533 gtk_menu_append(GTK_MENU(menu), item); | |
534 | |
535 item = gtk_menu_item_new(); | |
536 gtk_widget_show(item); | |
537 gtk_menu_append(GTK_MENU(menu), item); | |
538 | |
539 l = l->next; | |
540 if (l == NULL) { | |
541 item = gtk_menu_item_new_with_label("(no suggestions)"); | |
542 gtk_widget_show(item); | |
543 gtk_menu_append(GTK_MENU(menu), item); | |
544 } else { | |
545 GtkWidget *curmenu = menu; | |
546 int count = 0; | |
547 do { | |
548 if (l->data == NULL && l->next != NULL) { | |
549 count = 0; | |
550 curmenu = gtk_menu_new(); | |
551 item = gtk_menu_item_new_with_label("Other Possibilities..."); | |
552 gtk_widget_show(item); | |
553 gtk_menu_item_set_submenu(GTK_MENU_ITEM(item), curmenu); | |
554 gtk_menu_append(GTK_MENU(curmenu), item); | |
555 l = l->next; | |
556 } else if (count > MENUCOUNT) { | |
557 count -= MENUCOUNT; | |
558 item = gtk_menu_item_new_with_label("More..."); | |
559 gtk_widget_show(item); | |
560 gtk_menu_append(GTK_MENU(curmenu), item); | |
561 curmenu = gtk_menu_new(); | |
562 gtk_menu_item_set_submenu(GTK_MENU_ITEM(item), curmenu); | |
563 } | |
564 item = gtk_menu_item_new_with_label((char*)l->data); | |
565 gtk_signal_connect(GTK_OBJECT(item), "activate", | |
566 GTK_SIGNAL_FUNC(replace_word), gtktext); | |
567 gtk_widget_show(item); | |
568 gtk_menu_append(GTK_MENU(curmenu), item); | |
569 count++; | |
570 } while ((l = l->next) != NULL); | |
571 } | |
572 } | |
573 return GTK_MENU(menu); | |
574 } | |
575 | |
576 static void popup_menu(GtkText *gtktext, GdkEventButton *eb) { | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
577 char *buf = NULL; |
1117 | 578 GList *list, *l; |
579 | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
580 get_curword(gtktext, &buf, NULL, NULL); |
1117 | 581 |
582 list = misspelled_suggest(buf); | |
2454
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
583 if (buf) |
64e20158271e
[gaim-migrate @ 2467]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1815
diff
changeset
|
584 g_free(buf); |
1117 | 585 if (list != NULL) { |
586 gtk_menu_popup(make_menu(list, gtktext), NULL, NULL, NULL, NULL, | |
587 eb->button, eb->time); | |
588 for (l = list; l != NULL; l = l->next) | |
589 g_free(l->data); | |
590 g_list_free(list); | |
591 } | |
592 } | |
593 | |
594 /* ok, this is pretty wacky: | |
595 * we need to let the right-mouse-click go through, so it moves the cursor, | |
596 * but we *can't* let it go through, because GtkText interprets rightclicks as | |
597 * weird selection modifiers. | |
598 * | |
599 * so what do we do? forge rightclicks as leftclicks, then popup the menu. | |
600 * HACK HACK HACK. | |
601 */ | |
602 static gint button_press_intercept_cb(GtkText *gtktext, GdkEvent *e, gpointer d) { | |
603 GdkEventButton *eb; | |
604 gboolean retval; | |
605 | |
606 if (!gtkspell_running()) return FALSE; | |
607 | |
608 if (e->type != GDK_BUTTON_PRESS) return FALSE; | |
609 eb = (GdkEventButton*) e; | |
610 | |
611 if (eb->button != 3) return FALSE; | |
612 | |
613 /* forge the leftclick */ | |
614 eb->button = 1; | |
615 | |
616 gtk_signal_handler_block_by_func(GTK_OBJECT(gtktext), | |
617 GTK_SIGNAL_FUNC(button_press_intercept_cb), d); | |
618 gtk_signal_emit_by_name(GTK_OBJECT(gtktext), "button-press-event", | |
619 e, &retval); | |
620 gtk_signal_handler_unblock_by_func(GTK_OBJECT(gtktext), | |
621 GTK_SIGNAL_FUNC(button_press_intercept_cb), d); | |
622 gtk_signal_emit_stop_by_name(GTK_OBJECT(gtktext), "button-press-event"); | |
623 | |
624 /* now do the menu wackiness */ | |
625 popup_menu(gtktext, eb); | |
626 return TRUE; | |
627 } | |
628 | |
629 void gtkspell_uncheck_all(GtkText *gtktext) { | |
630 int origpos; | |
631 char *text; | |
632 float adj_value; | |
633 | |
634 adj_value = gtktext->vadj->value; | |
635 gtk_text_freeze(gtktext); | |
636 origpos = gtk_editable_get_position(GTK_EDITABLE(gtktext)); | |
637 text = gtk_editable_get_chars(GTK_EDITABLE(gtktext), 0, -1); | |
638 gtk_text_set_point(gtktext, 0); | |
639 gtk_text_forward_delete(gtktext, gtk_text_get_length(gtktext)); | |
640 gtk_text_insert(gtktext, NULL, NULL, NULL, text, strlen(text)); | |
641 gtk_text_thaw(gtktext); | |
1794
60b3fd819cce
[gaim-migrate @ 1804]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1496
diff
changeset
|
642 g_free(text); |
1117 | 643 |
644 gtk_editable_set_position(GTK_EDITABLE(gtktext), origpos); | |
645 gtk_adjustment_set_value(gtktext->vadj, adj_value); | |
646 } | |
647 | |
648 void gtkspell_attach(GtkText *gtktext) { | |
649 gtk_signal_connect(GTK_OBJECT(gtktext), "insert-text", | |
650 GTK_SIGNAL_FUNC(entry_insert_cb), NULL); | |
651 gtk_signal_connect_after(GTK_OBJECT(gtktext), "delete-text", | |
652 GTK_SIGNAL_FUNC(entry_delete_cb), NULL); | |
653 gtk_signal_connect(GTK_OBJECT(gtktext), "button-press-event", | |
654 GTK_SIGNAL_FUNC(button_press_intercept_cb), NULL); | |
655 } | |
656 | |
657 void gtkspell_detach(GtkText *gtktext) { | |
658 gtk_signal_disconnect_by_func(GTK_OBJECT(gtktext), | |
659 GTK_SIGNAL_FUNC(entry_insert_cb), NULL); | |
660 gtk_signal_disconnect_by_func(GTK_OBJECT(gtktext), | |
661 GTK_SIGNAL_FUNC(entry_delete_cb), NULL); | |
662 gtk_signal_disconnect_by_func(GTK_OBJECT(gtktext), | |
663 GTK_SIGNAL_FUNC(button_press_intercept_cb), NULL); | |
664 | |
665 gtkspell_uncheck_all(gtktext); | |
666 } | |
667 | |
668 static void sigchld(int param) { | |
669 if (gtkspell_running() && | |
670 (waitpid(spell_pid, NULL, WNOHANG) == spell_pid)) { | |
671 spell_pid = 0; | |
672 } else { | |
673 /* a default SIGCHLD handler. | |
674 * what else to do here? */ | |
675 waitpid(-1, NULL, WNOHANG); | |
676 } | |
677 } | |
678 | |
679 static void set_up_signal() { | |
680 struct sigaction sigact; | |
681 memset(&sigact, 0, sizeof(struct sigaction)); | |
682 | |
683 sigact.sa_handler = sigchld; | |
684 sigaction(SIGCHLD, &sigact, NULL); | |
685 } |