1
|
1 /*
|
|
2 * gaim
|
|
3 *
|
|
4 * Copyright (C) 1998-1999, Mark Spencer <markster@marko.net>
|
|
5 *
|
|
6 * This program is free software; you can redistribute it and/or modify
|
|
7 * it 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
|
|
22 #include <string.h>
|
|
23 #include <sys/time.h>
|
|
24
|
|
25 #include <sys/types.h>
|
|
26 #include <sys/stat.h>
|
|
27
|
|
28 #include <unistd.h>
|
|
29 #include <stdio.h>
|
|
30 #include <stdlib.h>
|
|
31 #include <gtk/gtk.h>
|
|
32 #include "gaim.h"
|
|
33 #include "proxy.h"
|
|
34
|
|
35
|
|
36 struct aim_user *current_user = NULL;
|
|
37 GList *aim_users = NULL;
|
|
38 int general_options;
|
|
39 int display_options;
|
|
40 int sound_options;
|
|
41 int font_options;
|
|
42
|
|
43 int report_idle, web_browser;
|
|
44 struct save_pos blist_pos;
|
|
45 char web_command[2048];
|
|
46 char aim_host[512];
|
|
47 int aim_port;
|
|
48 char login_host[512];
|
|
49 int login_port;
|
|
50
|
|
51
|
|
52 struct parse {
|
|
53 char option[256];
|
|
54 char value[6][256];
|
|
55 };
|
|
56
|
|
57 static struct parse *parse_line(char *line)
|
|
58 {
|
|
59 char *c = line;
|
|
60 int inopt = 1, inval = 0, curval = -1;
|
|
61 int optlen = 0, vallen = 0;
|
|
62 static struct parse p;
|
|
63
|
|
64
|
|
65 while(*c) {
|
|
66 if (*c == '\t') {
|
|
67 c++;
|
|
68 continue;
|
|
69 }
|
|
70 if (inopt) {
|
|
71 // if ((*c < 'a' || *c > 'z') && *c != '_') {
|
|
72 if ((*c < 'a' || *c > 'z') && *c != '_' && (*c < 'A' || *c > 'Z')) {
|
|
73 inopt = 0;
|
|
74 p.option[optlen] = 0;
|
|
75 c++;
|
|
76 continue;
|
|
77 }
|
|
78
|
|
79 p.option[optlen] = *c;
|
|
80 optlen++;
|
|
81 c++;
|
|
82 continue;
|
|
83 } else if (inval) {
|
|
84 if ( (*c == '}') ) {
|
|
85 if (*(c-1) == '\\') {
|
|
86 p.value[curval][vallen - 1] = *c;
|
|
87 c++;
|
|
88 continue;
|
|
89 } else {
|
|
90 p.value[curval][vallen - 1] = 0;
|
|
91 inval = 0;
|
|
92 c++;
|
|
93 continue;
|
|
94 }
|
|
95 } else {
|
|
96 p.value[curval][vallen] = *c;
|
|
97 vallen++;
|
|
98 c++;
|
|
99 continue; }
|
|
100 } else if (*c == '{') {
|
|
101 if (*(c-1) == '\\') {
|
|
102 p.value[curval][vallen-1] = *c;
|
|
103 c++;
|
|
104 continue;
|
|
105 }
|
|
106 else
|
|
107 {
|
|
108 curval++;
|
|
109 vallen = 0;
|
|
110 inval = 1;
|
|
111 c++;
|
|
112 c++;
|
|
113 continue;
|
|
114 }
|
|
115 }
|
|
116 c++;
|
|
117 }
|
|
118 return &p;
|
|
119 }
|
|
120
|
|
121
|
|
122 static int gaimrc_parse_tag(FILE *f)
|
|
123 {
|
|
124 char buf[2048];
|
|
125 char tag[256];
|
|
126 buf[0] = '#';
|
|
127
|
|
128 while (buf[0] == '#' && !feof(f))
|
|
129 fgets(buf, sizeof(buf), f);
|
|
130
|
|
131 if (feof(f))
|
|
132 return -1;
|
|
133
|
|
134 sscanf(buf, "%s {", tag);
|
|
135
|
|
136 if (!strcmp(tag, "users")) {
|
|
137 return 0;
|
|
138 } else if (!strcmp(tag, "options")) {
|
|
139 return 1;
|
|
140 } else if (!strcmp(tag, "away")) {
|
|
141 return 2;
|
|
142 }
|
|
143
|
|
144 return -1;
|
|
145 }
|
|
146
|
|
147 void filter_break(char *msg)
|
|
148 {
|
|
149 char *c;
|
|
150 int mc;
|
|
151
|
|
152 c = g_strdup(msg);
|
|
153 mc = 0;
|
|
154 while (*c)
|
|
155 {
|
|
156 if (*c == '\\') {
|
|
157 c++;
|
|
158 msg[mc] = *c;
|
|
159 }
|
|
160 else {
|
|
161 msg[mc] = *c;
|
|
162 }
|
|
163 mc++;
|
|
164 c++;
|
|
165 }
|
|
166 msg[mc] = 0;
|
|
167 }
|
|
168
|
|
169 static void gaimrc_read_away(FILE *f)
|
|
170 {
|
|
171 struct parse *p;
|
|
172 char buf[4096];
|
|
173 struct away_message *a;
|
|
174
|
|
175 buf[0] = 0;
|
|
176
|
|
177 while (buf[0] != '}')
|
|
178 {
|
|
179 if (!fgets(buf, sizeof(buf), f))
|
|
180 return;
|
|
181
|
|
182 if (buf[0] == '}')
|
|
183 return;
|
|
184
|
|
185 p = parse_line(buf);
|
15
|
186 if (!strcmp(p->option, "message"))
|
|
187 {
|
|
188 a = g_new0(struct away_message, 1);
|
1
|
189
|
15
|
190 g_snprintf(a->name, sizeof(a->name), "%s", p->value[0]);
|
|
191 g_snprintf(a->message, sizeof(a->message), "%s", p->value[1]);
|
|
192 filter_break(a->message);
|
|
193 away_messages = g_list_append(away_messages, a);
|
|
194 }
|
1
|
195 }
|
|
196 }
|
|
197
|
|
198 static void gaimrc_write_away(FILE *f)
|
|
199 {
|
|
200 GList *awy = away_messages;
|
|
201 struct away_message *a;
|
|
202
|
|
203 fprintf(f, "away {\n");
|
|
204
|
|
205 while (awy) {
|
26
|
206 char *str1, *str2;
|
|
207
|
1
|
208 a = (struct away_message *)awy->data;
|
26
|
209
|
|
210 str1 = escape_text2(a->name);
|
|
211 str2 = escape_text2(a->message);
|
|
212
|
|
213 fprintf(f, "\tmessage { %s } { %s }\n", str1, str2);
|
|
214
|
|
215 /* escape_text2 uses malloc(), so we don't want to g_free these */
|
|
216 free(str1);
|
|
217 free(str2);
|
|
218
|
1
|
219 awy = awy->next;
|
|
220 }
|
|
221
|
|
222 fprintf(f, "}\n");
|
|
223 }
|
|
224
|
|
225
|
|
226
|
|
227
|
|
228 static struct aim_user *gaimrc_read_user(FILE *f)
|
|
229 {
|
|
230 struct parse *p;
|
|
231 struct aim_user *u;
|
|
232 char buf[4096];
|
|
233
|
|
234 if (!fgets(buf, sizeof(buf), f))
|
|
235 return NULL;
|
|
236
|
|
237 p = parse_line(buf);
|
|
238
|
|
239 if (strcmp(p->option, "ident"))
|
|
240 return NULL;
|
|
241
|
|
242 u = g_new0(struct aim_user, 1);
|
|
243
|
|
244 strcpy(u->username, p->value[0]);
|
|
245 strcpy(u->password, p->value[1]);
|
|
246
|
|
247 u->user_info[0] = 0;
|
|
248
|
|
249 if (!fgets(buf, sizeof(buf), f))
|
|
250 return u;
|
|
251
|
|
252 if (strcmp(buf, "\t\tuser_info {\n")) {
|
|
253 return u;
|
|
254 }
|
|
255
|
|
256 if (!fgets(buf, sizeof(buf), f))
|
|
257 return u;
|
|
258
|
|
259 while (strncmp(buf, "\t\t}", 3)) {
|
|
260 if (strlen(buf) > 3)
|
|
261 strcat(u->user_info, &buf[3]);
|
|
262
|
|
263 if (!fgets(buf, sizeof(buf), f)) {
|
|
264 return u;
|
|
265 }
|
|
266 }
|
|
267
|
|
268 return u;
|
|
269
|
|
270 }
|
|
271
|
|
272 static void gaimrc_write_user(FILE *f, struct aim_user *u)
|
|
273 {
|
|
274 char *c;
|
|
275 int nl = 1;;
|
|
276 fprintf(f, "\t\tident { %s } { %s }\n", u->username, u->password);
|
|
277 fprintf(f, "\t\tuser_info {");
|
|
278 c = u->user_info;
|
|
279 while(*c) {
|
|
280 /* This is not as silly as it looks. */
|
|
281 if (*c == '\n') {
|
|
282 nl++;
|
|
283 } else {
|
|
284 if (nl) {
|
|
285 while(nl) {
|
|
286 fprintf(f, "\n\t\t\t");
|
|
287 nl--;
|
|
288 }
|
|
289 }
|
|
290 fprintf(f, "%c", *c);
|
|
291 }
|
|
292 c++;
|
|
293 }
|
|
294 fprintf(f, "\n\t\t}\n");
|
|
295
|
|
296 }
|
|
297
|
|
298
|
|
299 static void gaimrc_read_users(FILE *f)
|
|
300 {
|
|
301 char buf[2048];
|
|
302 struct aim_user *u;
|
|
303 struct parse *p;
|
|
304 int cur = 0;
|
|
305
|
|
306 buf[0] = 0;
|
|
307
|
|
308 while (buf[0] != '}') {
|
|
309 if (buf[0] == '#')
|
|
310 continue;
|
|
311
|
|
312 if (!fgets(buf, sizeof(buf), f))
|
|
313 return;
|
|
314
|
|
315
|
|
316
|
|
317 p = parse_line(buf);
|
|
318
|
|
319 if (!strcmp(p->option, "current_user")) {
|
|
320 cur = 1;;
|
|
321 } else if (strcmp(p->option, "user")) {
|
|
322 continue;
|
|
323 }
|
|
324
|
|
325 u = gaimrc_read_user(f);
|
|
326
|
|
327 if (cur)
|
|
328 current_user = u;
|
|
329
|
|
330 aim_users = g_list_append(aim_users, u);
|
|
331 }
|
|
332 }
|
|
333
|
|
334 static void gaimrc_write_users(FILE *f)
|
|
335 {
|
|
336 GList *usr = aim_users;
|
|
337 struct aim_user *u;
|
|
338
|
|
339 fprintf(f, "users {\n");
|
|
340
|
|
341 while(usr) {
|
|
342 u = (struct aim_user *)usr->data;
|
|
343 if (current_user == u) {
|
|
344 fprintf(f, "\tcurrent_user {\n");
|
|
345 } else {
|
|
346 fprintf(f, "\tuser {\n");
|
|
347 }
|
|
348 gaimrc_write_user(f, u);
|
|
349
|
|
350 fprintf(f, "\t}\n");
|
|
351
|
|
352 usr = usr->next;
|
|
353 }
|
|
354
|
|
355 fprintf(f, "}\n");
|
|
356 }
|
|
357
|
|
358
|
|
359
|
|
360
|
|
361 static void gaimrc_read_options(FILE *f)
|
|
362 {
|
|
363 char buf[2048];
|
|
364 struct parse *p;
|
|
365
|
|
366 buf[0] = 0;
|
|
367
|
|
368 while (buf[0] != '}') {
|
|
369 if (buf[0] == '#')
|
|
370 continue;
|
|
371
|
|
372 if (!fgets(buf, sizeof(buf), f))
|
|
373 return;
|
|
374
|
|
375 p = parse_line(buf);
|
|
376
|
|
377 if (!strcmp(p->option, "general_options")) {
|
|
378 general_options = atoi(p->value[0]);
|
|
379 } else if (!strcmp(p->option, "display_options")) {
|
|
380 display_options = atoi(p->value[0]);
|
|
381 } else if (!strcmp(p->option, "sound_options")) {
|
|
382 sound_options = atoi(p->value[0]);
|
|
383 } else if (!strcmp(p->option, "font_options")) {
|
|
384 font_options = atoi(p->value[0]);
|
|
385 } else if (!strcmp(p->option, "report_idle")) {
|
|
386 report_idle = atoi(p->value[0]);
|
|
387 } else if (!strcmp(p->option, "web_browser")) {
|
|
388 web_browser = atoi(p->value[0]);
|
|
389 } else if (!strcmp(p->option, "web_command")) {
|
|
390 strcpy(web_command, p->value[0]);
|
|
391 } else if (!strcmp(p->option, "proxy_type")) {
|
|
392 proxy_type = atoi(p->value[0]);
|
|
393 } else if (!strcmp(p->option, "proxy_host")) {
|
|
394 strcpy(proxy_host, p->value[0]);
|
|
395 } else if (!strcmp(p->option, "proxy_port")) {
|
|
396 proxy_port = atoi(p->value[0]);
|
|
397 } else if (!strcmp(p->option, "aim_host")) {
|
|
398 strcpy(aim_host, p->value[0]);
|
|
399 } else if (!strcmp(p->option, "aim_port")) {
|
|
400 aim_port = atoi(p->value[0]);
|
|
401 } else if (!strcmp(p->option, "login_host")) {
|
|
402 strcpy(login_host, p->value[0]);
|
|
403 } else if (!strcmp(p->option, "login_port")) {
|
|
404 login_port = atoi(p->value[0]);
|
|
405 } else if (!strcmp(p->option, "blist_pos")) {
|
|
406 blist_pos.x = atoi(p->value[0]);
|
|
407 blist_pos.y = atoi(p->value[1]);
|
|
408 blist_pos.width = atoi(p->value[2]);
|
|
409 blist_pos.height = atoi(p->value[3]);
|
|
410 blist_pos.xoff = atoi(p->value[4]);
|
|
411 blist_pos.yoff = atoi(p->value[5]);
|
|
412 }
|
|
413
|
|
414 }
|
|
415
|
|
416 }
|
|
417
|
|
418 static void gaimrc_write_options(FILE *f)
|
|
419 {
|
|
420
|
|
421 fprintf(f, "options {\n");
|
|
422 fprintf(f, "\tgeneral_options { %d }\n", general_options);
|
|
423 fprintf(f, "\tdisplay_options { %d }\n", display_options);
|
|
424 fprintf(f, "\tsound_options { %d }\n", sound_options);
|
|
425 fprintf(f, "\tfont_options { %d }\n", font_options);
|
|
426 fprintf(f, "\treport_idle { %d }\n", report_idle);
|
|
427 fprintf(f, "\tweb_browser { %d }\n", web_browser);
|
|
428 fprintf(f, "\tweb_command { %s }\n", web_command);
|
|
429 fprintf(f, "\tproxy_type { %d }\n", proxy_type);
|
|
430 fprintf(f, "\tproxy_host { %s }\n", proxy_host);
|
|
431 fprintf(f, "\tproxy_port { %d }\n", proxy_port);
|
|
432 fprintf(f, "\taim_host { %s }\n", aim_host);
|
|
433 fprintf(f, "\taim_port { %d }\n", aim_port);
|
|
434 fprintf(f, "\tlogin_host { %s }\n", login_host);
|
|
435 fprintf(f, "\tlogin_port { %d }\n", login_port);
|
|
436 fprintf(f, "\tblist_pos { %d } { %d } { %d } { %d } { %d } { %d }\n",
|
|
437 blist_pos.x, blist_pos.y, blist_pos.width, blist_pos.height,
|
|
438 blist_pos.xoff, blist_pos.yoff);
|
|
439 fprintf(f, "}\n");
|
|
440 }
|
|
441
|
|
442
|
|
443 void set_defaults()
|
|
444 {
|
|
445 general_options =
|
|
446 OPT_GEN_SEND_LINKS |
|
|
447 OPT_GEN_ENTER_SENDS |
|
|
448 OPT_GEN_SAVED_WINDOWS |
|
|
449 OPT_GEN_REMEMBER_PASS |
|
|
450 OPT_GEN_REGISTERED;
|
|
451 display_options =
|
|
452 OPT_DISP_SHOW_IDLETIME |
|
|
453 OPT_DISP_SHOW_TIME |
|
|
454 OPT_DISP_SHOW_PIXMAPS |
|
|
455 OPT_DISP_SHOW_BUTTON_XPM;
|
|
456 font_options = 0;
|
|
457 sound_options = OPT_SOUND_LOGIN | OPT_SOUND_LOGOUT | OPT_SOUND_RECV | OPT_SOUND_SEND;
|
|
458 report_idle = IDLE_GAIM;
|
|
459 web_browser = BROWSER_NETSCAPE;
|
|
460 proxy_type = PROXY_NONE;
|
|
461
|
|
462 aim_port = TOC_PORT;
|
|
463 login_port = AUTH_PORT;
|
|
464 g_snprintf(aim_host, sizeof(aim_host), "%s", TOC_HOST);
|
|
465 g_snprintf(login_host, sizeof(login_host), "%s", AUTH_HOST);
|
|
466 proxy_host[0] = 0;
|
|
467 proxy_port = 0;
|
|
468 g_snprintf(web_command, sizeof(web_command), "xterm -e lynx %%s");
|
|
469 blist_pos.width = 0;
|
|
470 blist_pos.height = 0;
|
|
471 blist_pos.x = 0;
|
|
472 blist_pos.y = 0;
|
|
473 blist_pos.xoff = 0;
|
|
474 blist_pos.yoff = 0;
|
|
475 }
|
|
476
|
|
477
|
|
478 void load_prefs()
|
|
479 {
|
|
480 FILE *f;
|
|
481 char buf[1024];
|
|
482 int ver = 0;
|
|
483
|
|
484 if (getenv("HOME")) {
|
|
485 g_snprintf(buf, sizeof(buf), "%s/.gaimrc", getenv("HOME"));
|
|
486 if ((f = fopen(buf,"r"))) {
|
|
487 fgets(buf, sizeof(buf), f);
|
|
488 sscanf(buf, "# .gaimrc v%d", &ver);
|
15
|
489 if ( (ver <= 1) || (buf[0] != '#')) {
|
1
|
490 fclose(f);
|
|
491 set_defaults();
|
|
492 save_prefs();
|
|
493 load_prefs();
|
|
494 return;
|
|
495 }
|
|
496 while(!feof(f)) {
|
|
497 switch(gaimrc_parse_tag(f)) {
|
|
498 case -1:
|
|
499 /* Let the loop end, EOF*/
|
|
500 break;
|
|
501 case 0:
|
|
502 gaimrc_read_users(f);
|
|
503 break;
|
|
504 case 1:
|
|
505 gaimrc_read_options(f);
|
|
506 break;
|
|
507 case 2:
|
|
508 gaimrc_read_away(f);
|
|
509 break;
|
|
510 default:
|
|
511 /* NOOP */
|
|
512 break;
|
|
513 }
|
|
514 }
|
|
515 fclose(f);
|
|
516 }
|
|
517 }
|
|
518
|
|
519 }
|
|
520
|
|
521 void save_prefs()
|
|
522 {
|
|
523 FILE *f;
|
|
524 char buf[BUF_LONG];
|
|
525
|
|
526 if (getenv("HOME")) {
|
|
527 g_snprintf(buf, sizeof(buf), "%s/.gaimrc", getenv("HOME"));
|
|
528 if ((f = fopen(buf,"w"))) {
|
15
|
529 fprintf(f, "# .gaimrc v%d\n", 2);
|
1
|
530 gaimrc_write_users(f);
|
|
531 gaimrc_write_options(f);
|
|
532 gaimrc_write_away(f);
|
|
533 fclose(f);
|
|
534 chmod(buf, S_IRUSR | S_IWUSR);
|
|
535 }
|
|
536
|
|
537 }
|
|
538 }
|
|
539
|