Mercurial > pidgin.yaz
annotate src/protocols/toc/toc.c @ 2281:cc462108c101
[gaim-migrate @ 2291]
hopefully this should fix a couple things...
committer: Tailor Script <tailor@pidgin.im>
author | Eric Warmenhoven <eric@warmenhoven.org> |
---|---|
date | Thu, 13 Sep 2001 23:42:44 +0000 |
parents | 0b5c3338fa3d |
children | f5bf315e6104 |
rev | line source |
---|---|
2086 | 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 | |
23 | |
24 #ifdef HAVE_CONFIG_H | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
25 #include <config.h> |
2086 | 26 #endif |
27 #include <netdb.h> | |
28 #include <gtk/gtk.h> | |
29 #include <unistd.h> | |
30 #include <errno.h> | |
31 #include <netinet/in.h> | |
32 #include <arpa/inet.h> | |
33 #include <string.h> | |
34 #include <stdlib.h> | |
35 #include <stdio.h> | |
36 #include <time.h> | |
37 #include <sys/socket.h> | |
38 #include <sys/types.h> | |
39 #include <sys/stat.h> | |
40 #include "prpl.h" | |
41 #include "multi.h" | |
42 #include "gaim.h" | |
43 #include "proxy.h" | |
44 | |
45 #include "pixmaps/admin_icon.xpm" | |
46 #include "pixmaps/aol_icon.xpm" | |
47 #include "pixmaps/away_icon.xpm" | |
48 #include "pixmaps/dt_icon.xpm" | |
49 #include "pixmaps/free_icon.xpm" | |
50 | |
51 #define REVISION "penguin" | |
52 | |
53 #define TYPE_SIGNON 1 | |
54 #define TYPE_DATA 2 | |
55 #define TYPE_ERROR 3 | |
56 #define TYPE_SIGNOFF 4 | |
57 #define TYPE_KEEPALIVE 5 | |
58 | |
59 #define FLAPON "FLAPON\r\n\r\n" | |
60 #define ROAST "Tic/Toc" | |
61 | |
62 #define TOC_HOST "toc.oscar.aol.com" | |
63 #define TOC_PORT 9898 | |
64 #define AUTH_HOST "login.oscar.aol.com" | |
65 #define AUTH_PORT 5190 | |
66 #define LANGUAGE "english" | |
67 | |
68 #define STATE_OFFLINE 0 | |
69 #define STATE_FLAPON 1 | |
70 #define STATE_SIGNON_REQUEST 2 | |
71 #define STATE_ONLINE 3 | |
72 #define STATE_PAUSE 4 | |
73 | |
74 #define VOICE_UID "09461341-4C7F-11D1-8222-444553540000" | |
75 #define FILE_SEND_UID "09461343-4C7F-11D1-8222-444553540000" | |
76 #define IMAGE_UID "09461345-4C7F-11D1-8222-444553540000" | |
77 #define B_ICON_UID "09461346-4C7F-11D1-8222-444553540000" | |
78 #define STOCKS_UID "09461347-4C7F-11D1-8222-444553540000" | |
79 #define FILE_GET_UID "09461348-4C7F-11D1-8222-444553540000" | |
80 #define GAMES_UID "0946134a-4C7F-11D1-8222-444553540000" | |
81 | |
82 struct ft_request { | |
83 struct gaim_connection *gc; | |
84 char *user; | |
85 char UID[2048]; | |
86 char *cookie; | |
87 char *ip; | |
88 int port; | |
89 char *message; | |
90 char *filename; | |
91 int files; | |
92 int size; | |
93 }; | |
94 | |
95 struct buddy_icon { | |
96 guint32 hash; | |
97 guint32 len; | |
98 time_t time; | |
99 void *data; | |
100 }; | |
101 | |
102 struct toc_data { | |
103 int toc_fd; | |
104 int seqno; | |
105 int state; | |
106 }; | |
107 | |
108 struct sflap_hdr { | |
109 unsigned char ast; | |
110 unsigned char type; | |
111 unsigned short seqno; | |
112 unsigned short len; | |
113 }; | |
114 | |
115 struct signon { | |
116 unsigned int ver; | |
117 unsigned short tag; | |
118 unsigned short namelen; | |
119 char username[80]; | |
120 }; | |
121 | |
122 /* constants to identify proto_opts */ | |
123 #define USEROPT_AUTH 0 | |
124 #define USEROPT_AUTHPORT 1 | |
125 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
126 static void toc_login_callback(gpointer, gint, GaimInputCondition); |
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
127 static void toc_callback(gpointer, gint, GaimInputCondition); |
2086 | 128 static unsigned char *roast_password(char *); |
129 static void accept_file_dialog(struct ft_request *); | |
130 | |
131 /* ok. this function used to take username/password, and return 0 on success. | |
132 * now, it takes username/password, and returns NULL on error or a new gaim_connection | |
133 * on success. */ | |
134 static void toc_login(struct aim_user *user) | |
135 { | |
136 struct gaim_connection *gc; | |
137 struct toc_data *tdt; | |
138 char buf[80]; | |
139 | |
140 gc = new_gaim_conn(user); | |
141 gc->proto_data = tdt = g_new0(struct toc_data, 1); | |
142 | |
143 g_snprintf(buf, sizeof buf, "Looking up %s", | |
144 user->proto_opt[USEROPT_AUTH][0] ? user->proto_opt[USEROPT_AUTH] : TOC_HOST); | |
145 set_login_progress(gc, 1, buf); | |
146 | |
147 debug_printf("* Client connects to TOC\n"); | |
148 tdt->toc_fd = | |
149 proxy_connect(user->proto_opt[USEROPT_AUTH][0] ? user->proto_opt[USEROPT_AUTH] : TOC_HOST, | |
150 user->proto_opt[USEROPT_AUTHPORT][0] ? | |
151 atoi(user->proto_opt[USEROPT_AUTHPORT]) : TOC_PORT, | |
152 toc_login_callback, gc); | |
153 | |
154 if (!user->gc || (tdt->toc_fd < 0)) { | |
155 g_snprintf(buf, sizeof(buf), "Connect to %s failed", user->proto_opt[USEROPT_AUTH]); | |
156 hide_login_progress(gc, buf); | |
157 signoff(gc); | |
158 return; | |
159 } | |
160 } | |
161 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
162 static void toc_login_callback(gpointer data, gint source, GaimInputCondition cond) |
2086 | 163 { |
164 struct gaim_connection *gc = data; | |
165 struct toc_data *tdt; | |
166 char buf[80]; | |
167 | |
168 if (!g_slist_find(connections, data)) { | |
169 close(source); | |
170 return; | |
171 } | |
172 | |
173 tdt = gc->proto_data; | |
174 | |
175 if (source == -1) { | |
176 /* we didn't successfully connect. tdt->toc_fd is valid here */ | |
177 hide_login_progress(gc, "Unable to connect."); | |
178 signoff(gc); | |
179 return; | |
180 } | |
181 | |
182 if (tdt->toc_fd == 0) | |
183 tdt->toc_fd = source; | |
184 | |
185 debug_printf("* Client sends \"FLAPON\\r\\n\\r\\n\"\n"); | |
186 if (write(tdt->toc_fd, FLAPON, strlen(FLAPON)) < 0) { | |
187 hide_login_progress(gc, "Disconnected."); | |
188 signoff(gc); | |
189 return; | |
190 } | |
191 tdt->state = STATE_FLAPON; | |
192 | |
193 /* i know a lot of people like to look at gaim to see how TOC works. so i'll comment | |
194 * on what this does. it's really simple. when there's data ready to be read from the | |
195 * toc_fd file descriptor, toc_callback is called, with gc passed as its data arg. */ | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
196 gc->inpa = gaim_input_add(tdt->toc_fd, GAIM_INPUT_READ, toc_callback, gc); |
2086 | 197 |
198 g_snprintf(buf, sizeof(buf), "Signon: %s", gc->username); | |
199 set_login_progress(gc, 2, buf); | |
200 } | |
201 | |
202 static void toc_close(struct gaim_connection *gc) | |
203 { | |
204 if (gc->inpa > 0) | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
205 gaim_input_remove(gc->inpa); |
2086 | 206 gc->inpa = 0; |
207 close(((struct toc_data *)gc->proto_data)->toc_fd); | |
208 g_free(gc->proto_data); | |
209 } | |
210 | |
211 static int sflap_send(struct gaim_connection *gc, char *buf, int olen, int type) | |
212 { | |
213 int len; | |
214 int slen = 0; | |
215 struct sflap_hdr hdr; | |
216 char obuf[MSG_LEN]; | |
217 struct toc_data *tdt = (struct toc_data *)gc->proto_data; | |
218 | |
219 if (tdt->state == STATE_PAUSE) | |
220 /* TOC has given us the PAUSE message; sending could cause a disconnect | |
221 * so we just return here like everything went through fine */ | |
222 return 0; | |
223 | |
2281
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
224 if (olen < 0) |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
225 len = escape_message(buf); |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
226 else |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
227 len = olen; |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
228 |
2086 | 229 /* One _last_ 2048 check here! This shouldn't ever |
230 * get hit though, hopefully. If it gets hit on an IM | |
231 * It'll lose the last " and the message won't go through, | |
232 * but this'll stop a segfault. */ | |
2281
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
233 if (len > MSG_LEN) { |
2086 | 234 debug_printf("message too long, truncating\n"); |
2281
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
235 buf[MSG_LEN - 1] = '\0'; |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
236 len = MSG_LEN; |
2086 | 237 } |
238 | |
239 hdr.ast = '*'; | |
240 hdr.type = type; | |
241 hdr.seqno = htons(tdt->seqno++ & 0xffff); | |
242 hdr.len = htons(len + (type == TYPE_SIGNON ? 0 : 1)); | |
243 | |
244 memcpy(obuf, &hdr, sizeof(hdr)); | |
245 slen += sizeof(hdr); | |
246 memcpy(&obuf[slen], buf, len); | |
247 slen += len; | |
248 if (type != TYPE_SIGNON) { | |
249 obuf[slen] = '\0'; | |
250 slen += 1; | |
251 } | |
252 | |
253 return write(tdt->toc_fd, obuf, slen); | |
254 } | |
255 | |
256 static int wait_reply(struct gaim_connection *gc, char *buffer, size_t buflen) | |
257 { | |
258 struct toc_data *tdt = (struct toc_data *)gc->proto_data; | |
259 struct sflap_hdr *hdr; | |
260 int ret; | |
261 | |
262 if (read(tdt->toc_fd, buffer, sizeof(struct sflap_hdr)) < 0) { | |
263 debug_printf("error, couldn't read flap header\n"); | |
264 return -1; | |
265 } | |
266 | |
267 hdr = (struct sflap_hdr *)buffer; | |
268 | |
269 if (buflen < ntohs(hdr->len)) { | |
270 /* fake like there's a read error */ | |
271 debug_printf("buffer too small (have %d, need %d)\n", buflen, ntohs(hdr->len)); | |
272 return -1; | |
273 } | |
274 | |
275 if (ntohs(hdr->len) > 0) { | |
276 int count = 0; | |
277 ret = 0; | |
278 do { | |
279 count += ret; | |
280 ret = read(tdt->toc_fd, | |
281 buffer + sizeof(struct sflap_hdr) + count, ntohs(hdr->len) - count); | |
282 } while (count + ret < ntohs(hdr->len) && ret > 0); | |
283 buffer[sizeof(struct sflap_hdr) + count + ret] = '\0'; | |
284 return ret; | |
285 } else | |
286 return 0; | |
287 } | |
288 | |
289 static unsigned char *roast_password(char *pass) | |
290 { | |
291 /* Trivial "encryption" */ | |
292 static unsigned char rp[256]; | |
293 static char *roast = ROAST; | |
294 int pos = 2; | |
295 int x; | |
296 strcpy(rp, "0x"); | |
297 for (x = 0; (x < 150) && pass[x]; x++) | |
298 pos += sprintf(&rp[pos], "%02x", pass[x] ^ roast[x % strlen(roast)]); | |
299 rp[pos] = '\0'; | |
300 return rp; | |
301 } | |
302 | |
303 static void toc_got_info(gpointer data, char *url_text) | |
304 { | |
305 if (!url_text) | |
306 return; | |
307 | |
2137
18722ae5b882
[gaim-migrate @ 2147]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2136
diff
changeset
|
308 g_show_info_text(url_text, NULL); |
2086 | 309 } |
310 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
311 static void toc_callback(gpointer data, gint source, GaimInputCondition condition) |
2086 | 312 { |
313 struct gaim_connection *gc = (struct gaim_connection *)data; | |
314 struct toc_data *tdt = (struct toc_data *)gc->proto_data; | |
315 struct sflap_hdr *hdr; | |
316 struct signon so; | |
317 char buf[8 * 1024], *c; | |
318 char snd[BUF_LEN * 2]; | |
319 | |
320 /* there's data waiting to be read, so read it. */ | |
321 if (wait_reply(gc, buf, 8 * 1024) <= 0) { | |
322 hide_login_progress(gc, _("Connection Closed")); | |
323 signoff(gc); | |
324 return; | |
325 } | |
326 | |
327 if (tdt->state == STATE_FLAPON) { | |
328 hdr = (struct sflap_hdr *)buf; | |
329 if (hdr->type != TYPE_SIGNON) | |
330 debug_printf("problem, hdr->type != TYPE_SIGNON\n"); | |
331 else | |
332 debug_printf("* TOC sends Client FLAP SIGNON\n"); | |
333 tdt->seqno = ntohs(hdr->seqno); | |
334 tdt->state = STATE_SIGNON_REQUEST; | |
335 | |
336 debug_printf("* Client sends TOC FLAP SIGNON\n"); | |
337 g_snprintf(so.username, sizeof(so.username), "%s", gc->username); | |
338 so.ver = htonl(1); | |
339 so.tag = htons(1); | |
340 so.namelen = htons(strlen(so.username)); | |
341 if (sflap_send(gc, (char *)&so, ntohs(so.namelen) + 8, TYPE_SIGNON) < 0) { | |
342 hide_login_progress(gc, _("Disconnected.")); | |
343 signoff(gc); | |
344 return; | |
345 } | |
346 | |
347 debug_printf("* Client sends TOC \"toc_signon\" message\n"); | |
348 g_snprintf(snd, sizeof snd, "toc_signon %s %d %s %s %s \"%s\"", | |
349 AUTH_HOST, AUTH_PORT, normalize(gc->username), | |
350 roast_password(gc->password), LANGUAGE, REVISION); | |
351 if (sflap_send(gc, snd, -1, TYPE_DATA) < 0) { | |
352 hide_login_progress(gc, _("Disconnected.")); | |
353 signoff(gc); | |
354 return; | |
355 } | |
356 | |
357 set_login_progress(gc, 3, _("Waiting for reply...")); | |
358 return; | |
359 } | |
360 | |
361 if (tdt->state == STATE_SIGNON_REQUEST) { | |
362 debug_printf("* TOC sends client SIGN_ON reply\n"); | |
363 if (g_strncasecmp(buf + sizeof(struct sflap_hdr), "SIGN_ON", strlen("SIGN_ON"))) { | |
364 debug_printf("Didn't get SIGN_ON! buf was: %s\n", | |
365 buf + sizeof(struct sflap_hdr)); | |
366 hide_login_progress(gc, _("Authentication Failed")); | |
367 signoff(gc); | |
368 return; | |
369 } | |
370 /* we're supposed to check that it's really TOC v1 here but we know it is ;) */ | |
2128
bc79be34eb73
[gaim-migrate @ 2138]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2123
diff
changeset
|
371 debug_printf("TOC version: %s\n", buf + sizeof(struct sflap_hdr) + 8); |
2086 | 372 |
373 /* we used to check for the CONFIG here, but we'll wait until we've sent our | |
374 * version of the config and then the toc_init_done message. we'll come back to | |
375 * the callback in a better state if we get CONFIG anyway */ | |
376 | |
377 tdt->state = STATE_ONLINE; | |
378 | |
379 account_online(gc); | |
380 serv_finish_login(gc); | |
381 | |
382 do_import(0, gc); | |
383 | |
384 /* Client sends TOC toc_init_done message */ | |
385 debug_printf("* Client sends TOC toc_init_done message\n"); | |
386 g_snprintf(snd, sizeof snd, "toc_init_done"); | |
387 sflap_send(gc, snd, -1, TYPE_DATA); | |
388 | |
389 /* | |
390 g_snprintf(snd, sizeof snd, "toc_set_caps %s %s %s", | |
391 FILE_SEND_UID, FILE_GET_UID, B_ICON_UID); | |
392 */ | |
393 g_snprintf(snd, sizeof snd, "toc_set_caps %s %s", FILE_SEND_UID, FILE_GET_UID); | |
394 sflap_send(gc, snd, -1, TYPE_DATA); | |
395 | |
396 return; | |
397 } | |
398 | |
399 debug_printf("From TOC server: %s\n", buf + sizeof(struct sflap_hdr)); | |
400 | |
401 c = strtok(buf + sizeof(struct sflap_hdr), ":"); /* Ditch the first part */ | |
402 | |
403 if (!g_strcasecmp(c, "SIGN_ON")) { | |
404 /* we should only get here after a PAUSE */ | |
405 if (tdt->state != STATE_PAUSE) | |
406 debug_printf("got SIGN_ON but not PAUSE!\n"); | |
407 else { | |
408 tdt->state = STATE_ONLINE; | |
409 g_snprintf(snd, sizeof snd, "toc_signon %s %d %s %s %s \"%s\"", | |
410 AUTH_HOST, AUTH_PORT, normalize(gc->username), | |
411 roast_password(gc->password), LANGUAGE, REVISION); | |
412 if (sflap_send(gc, snd, -1, TYPE_DATA) < 0) { | |
413 hide_login_progress(gc, _("Disconnected.")); | |
414 signoff(gc); | |
415 return; | |
416 } | |
417 do_import(0, gc); | |
418 g_snprintf(snd, sizeof snd, "toc_init_done"); | |
419 sflap_send(gc, snd, -1, TYPE_DATA); | |
420 do_error_dialog(_("TOC has come back from its pause. You may now send" | |
421 " messages again."), _("TOC Resume")); | |
422 } | |
423 } else if (!strcasecmp(c, "CONFIG")) { | |
424 c = strtok(NULL, ":"); | |
425 parse_toc_buddy_list(gc, c, 0); | |
426 } else if (!strcasecmp(c, "NICK")) { | |
427 /* ignore NICK so that things get imported/exported properly | |
428 c = strtok(NULL, ":"); | |
429 g_snprintf(gc->username, sizeof(gc->username), "%s", c); | |
430 */ | |
431 } else if (!strcasecmp(c, "IM_IN")) { | |
432 char *away, *message; | |
433 int a = 0; | |
434 | |
435 c = strtok(NULL, ":"); | |
436 away = strtok(NULL, ":"); | |
437 | |
438 message = away; | |
439 while (*message && (*message != ':')) | |
440 message++; | |
441 message++; | |
442 | |
2273
0b5c3338fa3d
[gaim-migrate @ 2283]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
443 a = (away && (*away == 'T')) ? IM_FLAG_AWAY : 0; |
2086 | 444 |
445 serv_got_im(gc, c, message, a, time((time_t)NULL)); | |
446 } else if (!strcasecmp(c, "UPDATE_BUDDY")) { | |
447 char *l, *uc; | |
448 int logged, evil, idle, type = 0; | |
449 time_t signon, time_idle; | |
450 | |
451 c = strtok(NULL, ":"); /* name */ | |
452 l = strtok(NULL, ":"); /* online */ | |
453 sscanf(strtok(NULL, ":"), "%d", &evil); | |
454 sscanf(strtok(NULL, ":"), "%ld", &signon); | |
455 sscanf(strtok(NULL, ":"), "%d", &idle); | |
456 uc = strtok(NULL, ":"); | |
457 | |
458 logged = (l && (*l == 'T')) ? 1 : 0; | |
459 | |
460 if (uc[0] == 'A') | |
461 type |= UC_AOL; | |
462 switch (uc[1]) { | |
463 case 'A': | |
464 type |= UC_ADMIN; | |
465 break; | |
466 case 'U': | |
467 type |= UC_UNCONFIRMED; | |
468 break; | |
469 case 'O': | |
470 type |= UC_NORMAL; | |
471 break; | |
472 default: | |
473 break; | |
474 } | |
475 if (uc[2] == 'U') | |
476 type |= UC_UNAVAILABLE; | |
477 | |
478 if (idle) { | |
479 time(&time_idle); | |
480 time_idle -= idle * 60; | |
481 } else | |
482 time_idle = 0; | |
483 | |
484 serv_got_update(gc, c, logged, evil, signon, time_idle, type, 0); | |
485 } else if (!strcasecmp(c, "ERROR")) { | |
486 c = strtok(NULL, ":"); | |
487 show_error_dialog(c); | |
488 } else if (!strcasecmp(c, "EVILED")) { | |
489 int lev; | |
490 char *name; | |
491 | |
492 sscanf(strtok(NULL, ":"), "%d", &lev); | |
493 name = strtok(NULL, ":"); | |
494 | |
495 serv_got_eviled(gc, name, lev); | |
496 } else if (!strcasecmp(c, "CHAT_JOIN")) { | |
497 char *name; | |
498 int id; | |
499 | |
500 sscanf(strtok(NULL, ":"), "%d", &id); | |
501 name = strtok(NULL, ":"); | |
502 | |
503 serv_got_joined_chat(gc, id, name); | |
504 } else if (!strcasecmp(c, "CHAT_IN")) { | |
505 int id, w; | |
506 char *m, *who, *whisper; | |
507 | |
508 sscanf(strtok(NULL, ":"), "%d", &id); | |
509 who = strtok(NULL, ":"); | |
510 whisper = strtok(NULL, ":"); | |
511 m = whisper; | |
512 while (*m && (*m != ':')) | |
513 m++; | |
514 m++; | |
515 | |
516 w = (whisper && (*whisper == 'T')) ? 1 : 0; | |
517 | |
518 serv_got_chat_in(gc, id, who, w, m, time((time_t)NULL)); | |
519 } else if (!strcasecmp(c, "CHAT_UPDATE_BUDDY")) { | |
520 int id; | |
521 char *in, *buddy; | |
522 GSList *bcs = gc->buddy_chats; | |
523 struct conversation *b = NULL; | |
524 | |
525 sscanf(strtok(NULL, ":"), "%d", &id); | |
526 in = strtok(NULL, ":"); | |
527 | |
528 while (bcs) { | |
529 b = (struct conversation *)bcs->data; | |
530 if (id == b->id) | |
531 break; | |
532 bcs = bcs->next; | |
533 b = NULL; | |
534 } | |
535 | |
536 if (!b) | |
537 return; | |
538 | |
539 if (in && (*in == 'T')) | |
540 while ((buddy = strtok(NULL, ":")) != NULL) | |
541 add_chat_buddy(b, buddy); | |
542 else | |
543 while ((buddy = strtok(NULL, ":")) != NULL) | |
544 remove_chat_buddy(b, buddy); | |
545 } else if (!strcasecmp(c, "CHAT_INVITE")) { | |
546 char *name, *who, *message; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
547 int *id = g_new0(int, 1); |
2086 | 548 |
549 name = strtok(NULL, ":"); | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
550 sscanf(strtok(NULL, ":"), "%d", id); |
2086 | 551 who = strtok(NULL, ":"); |
552 message = strtok(NULL, ":"); | |
553 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
554 serv_got_chat_invite(gc, name, who, message, g_list_append(NULL, id)); |
2086 | 555 } else if (!strcasecmp(c, "CHAT_LEFT")) { |
556 GSList *bcs = gc->buddy_chats; | |
557 struct conversation *b = NULL; | |
558 int id; | |
559 | |
560 sscanf(strtok(NULL, ":"), "%d", &id); | |
561 | |
562 while (bcs) { | |
563 b = (struct conversation *)bcs->data; | |
564 if (id == b->id) | |
565 break; | |
566 b = NULL; | |
567 bcs = bcs->next; | |
568 } | |
569 | |
570 if (!b) | |
571 return; | |
572 | |
573 if (b->window) { | |
574 char error_buf[BUF_LONG]; | |
575 b->gc = NULL; | |
576 g_snprintf(error_buf, sizeof error_buf, _("You have been disconnected" | |
577 " from chat room %s."), b->name); | |
578 do_error_dialog(error_buf, _("Chat Error")); | |
579 } else | |
580 serv_got_chat_left(gc, id); | |
581 } else if (!strcasecmp(c, "GOTO_URL")) { | |
582 char *name, *url, tmp[256]; | |
583 | |
584 name = strtok(NULL, ":"); | |
585 url = strtok(NULL, ":"); | |
586 | |
587 g_snprintf(tmp, sizeof(tmp), "http://%s:%d/%s", | |
588 gc->user->proto_opt[USEROPT_AUTH][0] ? | |
589 gc->user->proto_opt[USEROPT_AUTH] : TOC_HOST, | |
590 gc->user->proto_opt[USEROPT_AUTHPORT][0] ? | |
591 atoi(gc->user->proto_opt[USEROPT_AUTHPORT]) : TOC_PORT, | |
592 url); | |
593 grab_url(tmp, toc_got_info, NULL); | |
594 } else if (!strcasecmp(c, "DIR_STATUS")) { | |
595 } else if (!strcasecmp(c, "ADMIN_NICK_STATUS")) { | |
596 } else if (!strcasecmp(c, "ADMIN_PASSWD_STATUS")) { | |
597 do_error_dialog(_("Password Change Successeful"), _("Gaim - Password Change")); | |
598 } else if (!strcasecmp(c, "PAUSE")) { | |
599 tdt->state = STATE_PAUSE; | |
600 do_error_dialog(_("TOC has sent a PAUSE command. When this happens, TOC ignores" | |
601 " any messages sent to it, and may kick you off if you send a" | |
602 " message. Gaim will prevent anything from going through. This" | |
603 " is only temporary, please be patient."), _("TOC Pause")); | |
604 } else if (!strcasecmp(c, "RVOUS_PROPOSE")) { | |
605 char *user, *uuid, *cookie; | |
606 int seq; | |
607 char *rip, *pip, *vip; | |
608 int port; | |
609 | |
610 user = strtok(NULL, ":"); | |
611 uuid = strtok(NULL, ":"); | |
612 cookie = strtok(NULL, ":"); | |
613 sscanf(strtok(NULL, ":"), "%d", &seq); | |
614 rip = strtok(NULL, ":"); | |
615 pip = strtok(NULL, ":"); | |
616 vip = strtok(NULL, ":"); | |
617 sscanf(strtok(NULL, ":"), "%d", &port); | |
618 | |
619 if (!strcmp(uuid, FILE_SEND_UID)) { | |
620 /* they want us to get a file */ | |
621 int unk[4], i; | |
622 char *messages[4], *tmp, *name; | |
623 int subtype, files, totalsize = 0; | |
624 struct ft_request *ft; | |
625 | |
626 for (i = 0; i < 4; i++) { | |
627 sscanf(strtok(NULL, ":"), "%d", &unk[i]); | |
628 if (unk[i] == 10001) | |
629 break; | |
630 frombase64(strtok(NULL, ":"), &messages[i], NULL); | |
631 } | |
632 frombase64(strtok(NULL, ":"), &tmp, NULL); | |
633 | |
634 subtype = tmp[1]; | |
635 files = tmp[3]; | |
636 | |
637 totalsize |= (tmp[4] << 24) & 0xff000000; | |
638 totalsize |= (tmp[5] << 16) & 0x00ff0000; | |
639 totalsize |= (tmp[6] << 8) & 0x0000ff00; | |
640 totalsize |= (tmp[7] << 0) & 0x000000ff; | |
641 | |
642 if (!totalsize) { | |
643 g_free(tmp); | |
644 for (i--; i >= 0; i--) | |
645 g_free(messages[i]); | |
646 return; | |
647 } | |
648 | |
649 name = tmp + 8; | |
650 | |
651 ft = g_new0(struct ft_request, 1); | |
652 ft->cookie = g_strdup(cookie); | |
653 ft->ip = g_strdup(pip); | |
654 ft->port = port; | |
655 if (i) | |
656 ft->message = g_strdup(messages[0]); | |
657 else | |
658 ft->message = NULL; | |
659 ft->filename = g_strdup(name); | |
660 ft->user = g_strdup(user); | |
661 ft->size = totalsize; | |
662 ft->files = files; | |
663 g_snprintf(ft->UID, sizeof(ft->UID), "%s", FILE_SEND_UID); | |
664 ft->gc = gc; | |
665 | |
666 g_free(tmp); | |
667 for (i--; i >= 0; i--) | |
668 g_free(messages[i]); | |
669 | |
670 debug_printf("English translation of RVOUS_PROPOSE: %s requests Send File (i.e." | |
671 " send a file to you); %s:%d (verified_ip:port), %d files at" | |
672 " total size of %ld bytes.\n", user, vip, port, files, totalsize); | |
673 accept_file_dialog(ft); | |
674 } else if (!strcmp(uuid, FILE_GET_UID)) { | |
675 /* they want us to send a file */ | |
676 int unk[4], i; | |
677 char *messages[4], *tmp; | |
678 struct ft_request *ft; | |
679 | |
680 for (i = 0; i < 4; i++) { | |
681 sscanf(strtok(NULL, ":"), "%d", unk + i); | |
682 if (unk[i] == 10001) | |
683 break; | |
684 frombase64(strtok(NULL, ":"), &messages[i], NULL); | |
685 } | |
686 frombase64(strtok(NULL, ":"), &tmp, NULL); | |
687 | |
688 ft = g_new0(struct ft_request, 1); | |
689 ft->cookie = g_strdup(cookie); | |
690 ft->ip = g_strdup(pip); | |
691 ft->port = port; | |
692 if (i) | |
693 ft->message = g_strdup(messages[0]); | |
694 else | |
695 ft->message = NULL; | |
696 ft->user = g_strdup(user); | |
697 g_snprintf(ft->UID, sizeof(ft->UID), "%s", FILE_GET_UID); | |
698 ft->gc = gc; | |
699 | |
700 g_free(tmp); | |
701 for (i--; i >= 0; i--) | |
702 g_free(messages[i]); | |
703 | |
704 accept_file_dialog(ft); | |
705 } else if (!strcmp(uuid, VOICE_UID)) { | |
706 /* oh goody. voice over ip. fun stuff. */ | |
707 } else if (!strcmp(uuid, B_ICON_UID)) { | |
708 /* | |
709 int unk[4], i; | |
710 char *messages[4]; | |
711 struct buddy_icon *icon; | |
712 | |
713 for (i = 0; i < 4; i++) { | |
714 sscanf(strtok(NULL, ":"), "%d", unk + i); | |
715 if (unk[i] == 10001) | |
716 break; | |
717 frombase64(strtok(NULL, ":"), &messages[i], NULL); | |
718 } | |
719 frombase64(strtok(NULL, ":"), (char **)&icon, NULL); | |
720 | |
721 debug_printf("received icon of length %d\n", icon->len); | |
722 g_free(icon); | |
723 for (i--; i >= 0; i--) | |
724 g_free(messages[i]); | |
725 */ | |
726 } else if (!strcmp(uuid, IMAGE_UID)) { | |
727 /* aka Direct IM */ | |
728 } else { | |
729 debug_printf("Don't know what to do with RVOUS UUID %s\n", uuid); | |
730 /* do we have to do anything here? i think it just times out */ | |
731 } | |
732 } else { | |
733 debug_printf("don't know what to do with %s\n", c); | |
734 } | |
735 } | |
736 | |
737 static char *toc_name() | |
738 { | |
739 return "TOC"; | |
740 } | |
741 | |
2231
8c4ff1a368bd
[gaim-migrate @ 2241]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2205
diff
changeset
|
742 static int toc_send_im(struct gaim_connection *gc, char *name, char *message, int flags) |
2086 | 743 { |
744 char buf[BUF_LEN * 2]; | |
2136
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
745 char *tmp = g_malloc(strlen(message) * 2); |
2086 | 746 |
2136
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
747 strcpy(tmp, message); |
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
748 escape_text(tmp); |
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
749 if (strlen(tmp) + 52 > MSG_LEN) { |
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
750 g_free(tmp); |
2123
56c4382f2909
[gaim-migrate @ 2133]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2090
diff
changeset
|
751 return -E2BIG; |
2136
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
752 } |
2086 | 753 g_snprintf(buf, MSG_LEN - 8, "toc_send_im %s \"%s\"%s", normalize(name), |
2231
8c4ff1a368bd
[gaim-migrate @ 2241]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2205
diff
changeset
|
754 tmp, ((flags & IM_FLAG_AWAY) ? " auto" : "")); |
2086 | 755 sflap_send(gc, buf, -1, TYPE_DATA); |
2123
56c4382f2909
[gaim-migrate @ 2133]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2090
diff
changeset
|
756 |
2136
73253b36c3cb
[gaim-migrate @ 2146]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2130
diff
changeset
|
757 g_free(tmp); |
2123
56c4382f2909
[gaim-migrate @ 2133]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2090
diff
changeset
|
758 return 0; |
2086 | 759 } |
760 | |
761 static void toc_set_config(struct gaim_connection *gc) | |
762 { | |
2281
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
763 char *buf = g_malloc(MSG_LEN), snd[BUF_LEN * 2]; |
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
764 toc_build_config(gc, buf, MSG_LEN - strlen("toc_set_config \\{\\}"), FALSE); |
2086 | 765 g_snprintf(snd, MSG_LEN, "toc_set_config {%s}", buf); |
766 sflap_send(gc, snd, -1, TYPE_DATA); | |
2281
cc462108c101
[gaim-migrate @ 2291]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2273
diff
changeset
|
767 g_free(buf); |
2086 | 768 } |
769 | |
770 static void toc_get_info(struct gaim_connection *g, char *name) | |
771 { | |
772 char buf[BUF_LEN * 2]; | |
773 g_snprintf(buf, MSG_LEN, "toc_get_info %s", normalize(name)); | |
774 sflap_send(g, buf, -1, TYPE_DATA); | |
775 } | |
776 | |
777 static void toc_get_dir(struct gaim_connection *g, char *name) | |
778 { | |
779 char buf[BUF_LEN * 2]; | |
780 g_snprintf(buf, MSG_LEN, "toc_get_dir %s", normalize(name)); | |
781 sflap_send(g, buf, -1, TYPE_DATA); | |
782 } | |
783 | |
784 static void toc_set_dir(struct gaim_connection *g, char *first, char *middle, char *last, | |
785 char *maiden, char *city, char *state, char *country, int web) | |
786 { | |
787 char buf2[BUF_LEN * 4], buf[BUF_LEN]; | |
788 g_snprintf(buf2, sizeof(buf2), "%s:%s:%s:%s:%s:%s:%s:%s", first, | |
789 middle, last, maiden, city, state, country, (web == 1) ? "Y" : ""); | |
790 escape_text(buf2); | |
791 g_snprintf(buf, sizeof(buf), "toc_set_dir %s", buf2); | |
792 sflap_send(g, buf, -1, TYPE_DATA); | |
793 } | |
794 | |
795 static void toc_dir_search(struct gaim_connection *g, char *first, char *middle, char *last, | |
796 char *maiden, char *city, char *state, char *country, char *email) | |
797 { | |
798 char buf[BUF_LONG]; | |
799 g_snprintf(buf, sizeof(buf) / 2, "toc_dir_search %s:%s:%s:%s:%s:%s:%s:%s", first, middle, | |
800 last, maiden, city, state, country, email); | |
801 debug_printf("Searching for: %s,%s,%s,%s,%s,%s,%s\n", first, middle, last, maiden, | |
802 city, state, country); | |
803 sflap_send(g, buf, -1, TYPE_DATA); | |
804 } | |
805 | |
806 static void toc_set_away(struct gaim_connection *g, char *state, char *message) | |
807 { | |
808 char buf[BUF_LEN * 2]; | |
809 if (g->away) | |
810 g_free (g->away); | |
811 g->away = NULL; | |
812 if (message) { | |
813 g->away = g_strdup (message); | |
814 escape_text(message); | |
815 g_snprintf(buf, MSG_LEN, "toc_set_away \"%s\"", message); | |
816 } else | |
817 g_snprintf(buf, MSG_LEN, "toc_set_away \"\""); | |
818 sflap_send(g, buf, -1, TYPE_DATA); | |
819 } | |
820 | |
821 static void toc_set_info(struct gaim_connection *g, char *info) | |
822 { | |
823 char buf[BUF_LEN * 2], buf2[BUF_LEN * 2]; | |
824 g_snprintf(buf2, sizeof buf2, "%s", info); | |
825 escape_text(buf2); | |
826 g_snprintf(buf, sizeof(buf), "toc_set_info \"%s\n\"", buf2); | |
827 sflap_send(g, buf, -1, TYPE_DATA); | |
828 } | |
829 | |
830 static void toc_change_passwd(struct gaim_connection *g, char *orig, char *new) | |
831 { | |
832 char buf[BUF_LEN * 2]; | |
833 g_snprintf(buf, BUF_LONG, "toc_change_passwd %s %s", orig, new); | |
834 sflap_send(g, buf, strlen(buf), TYPE_DATA); | |
835 } | |
836 | |
837 static void toc_add_buddy(struct gaim_connection *g, char *name) | |
838 { | |
839 char buf[BUF_LEN * 2]; | |
840 g_snprintf(buf, sizeof(buf), "toc_add_buddy %s", normalize(name)); | |
841 sflap_send(g, buf, -1, TYPE_DATA); | |
842 toc_set_config(g); | |
843 } | |
844 | |
845 static void toc_add_buddies(struct gaim_connection *g, GList * buddies) | |
846 { | |
847 char buf[BUF_LEN * 2]; | |
848 int n; | |
849 | |
850 n = g_snprintf(buf, sizeof(buf), "toc_add_buddy"); | |
851 while (buddies) { | |
2130
50c7a704ee56
[gaim-migrate @ 2140]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2128
diff
changeset
|
852 if (strlen(normalize(buddies->data)) + n + 32 > MSG_LEN) { |
2086 | 853 sflap_send(g, buf, -1, TYPE_DATA); |
854 n = g_snprintf(buf, sizeof(buf), "toc_add_buddy"); | |
855 } | |
856 n += g_snprintf(buf + n, sizeof(buf) - n, " %s", normalize(buddies->data)); | |
857 buddies = buddies->next; | |
858 } | |
859 sflap_send(g, buf, -1, TYPE_DATA); | |
860 } | |
861 | |
862 static void toc_remove_buddy(struct gaim_connection *g, char *name) | |
863 { | |
864 char buf[BUF_LEN * 2]; | |
865 g_snprintf(buf, sizeof(buf), "toc_remove_buddy %s", normalize(name)); | |
866 sflap_send(g, buf, -1, TYPE_DATA); | |
867 toc_set_config(g); | |
868 } | |
869 | |
870 static void toc_set_idle(struct gaim_connection *g, int time) | |
871 { | |
872 char buf[BUF_LEN * 2]; | |
873 g_snprintf(buf, sizeof(buf), "toc_set_idle %d", time); | |
874 sflap_send(g, buf, -1, TYPE_DATA); | |
875 } | |
876 | |
877 static void toc_warn(struct gaim_connection *g, char *name, int anon) | |
878 { | |
879 char send[BUF_LEN * 2]; | |
880 g_snprintf(send, 255, "toc_evil %s %s", name, ((anon) ? "anon" : "norm")); | |
881 sflap_send(g, send, -1, TYPE_DATA); | |
882 } | |
883 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
884 static GList *toc_chat_info(struct gaim_connection *gc) |
2086 | 885 { |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
886 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
887 struct proto_chat_entry *pce; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
888 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
889 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
890 pce->label = _("Join what group:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
891 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
892 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
893 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
894 pce->label = _("Exchange:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
895 pce->is_int = TRUE; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
896 pce->min = 4; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
897 pce->max = 20; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
898 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
899 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
900 return m; |
2086 | 901 } |
902 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
903 static void toc_join_chat(struct gaim_connection *g, GList *data) |
2086 | 904 { |
905 char buf[BUF_LONG]; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
906 int *exchange; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
907 char *name; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
908 int *i; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
909 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
910 if (!data) |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
911 return; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
912 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
913 if (!data->next) { |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
914 i = data->data; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
915 g_snprintf(buf, 255, "toc_chat_accept %d", *i); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
916 } else { |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
917 name = data->data; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
918 exchange = data->next->data; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
919 g_snprintf(buf, sizeof(buf) / 2, "toc_chat_join %d \"%s\"", *exchange, name); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
920 } |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
921 |
2086 | 922 sflap_send(g, buf, -1, TYPE_DATA); |
923 } | |
924 | |
925 static void toc_chat_invite(struct gaim_connection *g, int id, char *message, char *name) | |
926 { | |
927 char buf[BUF_LONG]; | |
928 g_snprintf(buf, sizeof(buf) / 2, "toc_chat_invite %d \"%s\" %s", id, message, normalize(name)); | |
929 sflap_send(g, buf, -1, TYPE_DATA); | |
930 } | |
931 | |
932 static void toc_chat_leave(struct gaim_connection *g, int id) | |
933 { | |
934 GSList *bcs = g->buddy_chats; | |
935 struct conversation *b = NULL; | |
936 char buf[BUF_LEN * 2]; | |
937 | |
938 while (bcs) { | |
939 b = (struct conversation *)bcs->data; | |
940 if (id == b->id) | |
941 break; | |
942 b = NULL; | |
943 bcs = bcs->next; | |
944 } | |
945 | |
946 if (!b) | |
947 return; /* can this happen? */ | |
948 | |
949 if (!b->gc) /* TOC already kicked us out of this room */ | |
950 serv_got_chat_left(g, id); | |
951 else { | |
952 g_snprintf(buf, 255, "toc_chat_leave %d", id); | |
953 sflap_send(g, buf, -1, TYPE_DATA); | |
954 } | |
955 } | |
956 | |
957 static void toc_chat_whisper(struct gaim_connection *g, int id, char *who, char *message) | |
958 { | |
959 char buf2[BUF_LEN * 2]; | |
960 g_snprintf(buf2, sizeof(buf2), "toc_chat_whisper %d %s \"%s\"", id, who, message); | |
961 sflap_send(g, buf2, -1, TYPE_DATA); | |
962 } | |
963 | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
964 static int toc_chat_send(struct gaim_connection *g, int id, char *message) |
2086 | 965 { |
966 char buf[BUF_LEN * 2]; | |
967 escape_text(message); | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
968 if (strlen(message) > 2000) |
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
969 return -E2BIG; |
2086 | 970 g_snprintf(buf, sizeof(buf), "toc_chat_send %d \"%s\"", id, message); |
971 sflap_send(g, buf, -1, TYPE_DATA); | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
972 return 0; |
2086 | 973 } |
974 | |
975 static void toc_keepalive(struct gaim_connection *gc) | |
976 { | |
977 sflap_send(gc, "", 0, TYPE_KEEPALIVE); | |
978 } | |
979 | |
980 static char **toc_list_icon(int uc) | |
981 { | |
982 if (uc & UC_UNAVAILABLE) | |
983 return (char **)away_icon_xpm; | |
984 if (uc & UC_AOL) | |
985 return (char **)aol_icon_xpm; | |
986 if (uc & UC_NORMAL) | |
987 return (char **)free_icon_xpm; | |
988 if (uc & UC_ADMIN) | |
989 return (char **)admin_icon_xpm; | |
990 if (uc & UC_UNCONFIRMED) | |
991 return (char **)dt_icon_xpm; | |
992 return NULL; | |
993 } | |
994 | |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
995 static GList *toc_buddy_menu(struct gaim_connection *gc, char *who) |
2086 | 996 { |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
997 GList *m = NULL; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
998 struct proto_buddy_menu *pbm; |
2086 | 999 |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1000 pbm = g_new0(struct proto_buddy_menu, 1); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1001 pbm->label = _("Get Info"); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1002 pbm->callback = toc_get_info; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1003 pbm->gc = gc; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1004 m = g_list_append(m, pbm); |
2086 | 1005 |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1006 pbm = g_new0(struct proto_buddy_menu, 1); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1007 pbm->label = _("Get Dir Info"); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1008 pbm->callback = toc_get_dir; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1009 pbm->gc = gc; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1010 m = g_list_append(m, pbm); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1011 |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1012 return m; |
2086 | 1013 } |
1014 | |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1015 static GList *toc_user_opts() |
2086 | 1016 { |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1017 GList *m = NULL; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1018 struct proto_user_opt *puo; |
2086 | 1019 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1020 puo = g_new0(struct proto_user_opt, 1); |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1021 puo->label = "TOC Host:"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1022 puo->def = "toc.oscar.aol.com"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1023 puo->pos = USEROPT_AUTH; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1024 m = g_list_append(m, puo); |
2086 | 1025 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1026 puo = g_new0(struct proto_user_opt, 1); |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1027 puo->label = "TOC Port:"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1028 puo->def = "9898"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1029 puo->pos = USEROPT_AUTHPORT; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1030 m = g_list_append(m, puo); |
2086 | 1031 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2149
diff
changeset
|
1032 return m; |
2086 | 1033 } |
1034 | |
1035 static void toc_add_permit(struct gaim_connection *gc, char *who) | |
1036 { | |
1037 char buf2[BUF_LEN * 2]; | |
1038 if (gc->permdeny != 3) | |
1039 return; | |
1040 g_snprintf(buf2, sizeof(buf2), "toc_add_permit %s", normalize(who)); | |
1041 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1042 toc_set_config(gc); | |
1043 } | |
1044 | |
1045 static void toc_add_deny(struct gaim_connection *gc, char *who) | |
1046 { | |
1047 char buf2[BUF_LEN * 2]; | |
1048 if (gc->permdeny != 4) | |
1049 return; | |
1050 g_snprintf(buf2, sizeof(buf2), "toc_add_deny %s", normalize(who)); | |
1051 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1052 toc_set_config(gc); | |
1053 } | |
1054 | |
1055 static void toc_set_permit_deny(struct gaim_connection *gc) | |
1056 { | |
1057 char buf2[BUF_LEN * 2]; | |
1058 GSList *list; | |
1059 int at; | |
1060 | |
1061 switch (gc->permdeny) { | |
1062 case 1: | |
1063 /* permit all, deny none. to get here reliably we need to have been in permit | |
1064 * mode, and send an empty toc_add_deny message, which will switch us to deny none */ | |
1065 g_snprintf(buf2, sizeof(buf2), "toc_add_permit "); | |
1066 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1067 g_snprintf(buf2, sizeof(buf2), "toc_add_deny "); | |
1068 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1069 break; | |
1070 case 2: | |
1071 /* deny all, permit none. to get here reliably we need to have been in deny | |
1072 * mode, and send an empty toc_add_permit message, which will switch us to permit none */ | |
1073 g_snprintf(buf2, sizeof(buf2), "toc_add_deny "); | |
1074 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1075 g_snprintf(buf2, sizeof(buf2), "toc_add_permit "); | |
1076 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1077 break; | |
1078 case 3: | |
1079 /* permit some. we want to switch to deny mode first, then send the toc_add_permit | |
1080 * message, which will clear and set our permit list. toc sucks. */ | |
1081 g_snprintf(buf2, sizeof(buf2), "toc_add_deny "); | |
1082 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1083 | |
1084 at = g_snprintf(buf2, sizeof(buf2), "toc_add_permit "); | |
1085 list = gc->permit; | |
1086 while (list) { | |
1087 at += g_snprintf(buf2 + at, sizeof(buf2) - at, "%s ", normalize(list->data)); | |
1088 if (at > MSG_LEN + 32) { /* from out my ass comes greatness */ | |
1089 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1090 at = g_snprintf(buf2, sizeof(buf2), "toc_add_permit "); | |
1091 } | |
1092 list = list->next; | |
1093 } | |
1094 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1095 break; | |
1096 case 4: | |
1097 /* deny some. we want to switch to permit mode first, then send the toc_add_deny | |
1098 * message, which will clear and set our deny list. toc sucks. */ | |
1099 g_snprintf(buf2, sizeof(buf2), "toc_add_permit "); | |
1100 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1101 | |
1102 at = g_snprintf(buf2, sizeof(buf2), "toc_add_deny "); | |
1103 list = gc->deny; | |
1104 while (list) { | |
1105 at += g_snprintf(buf2 + at, sizeof(buf2) - at, "%s ", normalize(list->data)); | |
1106 if (at > MSG_LEN + 32) { /* from out my ass comes greatness */ | |
1107 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1108 at = g_snprintf(buf2, sizeof(buf2), "toc_add_deny "); | |
1109 } | |
1110 list = list->next; | |
1111 } | |
1112 sflap_send(gc, buf2, -1, TYPE_DATA); | |
1113 break; | |
1114 default: | |
1115 break; | |
1116 } | |
1117 toc_set_config(gc); | |
1118 } | |
1119 | |
1120 static void toc_rem_permit(struct gaim_connection *gc, char *who) | |
1121 { | |
1122 if (gc->permdeny != 3) | |
1123 return; | |
1124 toc_set_permit_deny(gc); | |
1125 } | |
1126 | |
1127 static void toc_rem_deny(struct gaim_connection *gc, char *who) | |
1128 { | |
1129 if (gc->permdeny != 4) | |
1130 return; | |
1131 toc_set_permit_deny(gc); | |
1132 } | |
1133 | |
1134 static GList *toc_away_states() | |
1135 { | |
1136 return g_list_append(NULL, GAIM_AWAY_CUSTOM); | |
1137 } | |
1138 | |
1139 static void toc_do_action(struct gaim_connection *gc, char *act) | |
1140 { | |
1141 if (!strcmp(act, "Set User Info")) { | |
1142 show_set_info(gc); | |
1143 } else if (!strcmp(act, "Set Dir Info")) { | |
1144 show_set_dir(gc); | |
1145 } else if (!strcmp(act, "Change Password")) { | |
1146 show_change_passwd(gc); | |
1147 } | |
1148 } | |
1149 | |
1150 static GList *toc_actions() | |
1151 { | |
1152 GList *m = NULL; | |
1153 | |
1154 m = g_list_append(m, "Set User Info"); | |
1155 m = g_list_append(m, "Set Dir Info"); | |
1156 m = g_list_append(m, "Change Password"); | |
1157 | |
1158 return m; | |
1159 } | |
1160 | |
1161 static struct prpl *my_protocol = NULL; | |
1162 | |
1163 void toc_init(struct prpl *ret) | |
1164 { | |
1165 ret->protocol = PROTO_TOC; | |
1166 ret->options = OPT_PROTO_HTML | OPT_PROTO_CORRECT_TIME; | |
1167 ret->name = toc_name; | |
1168 ret->list_icon = toc_list_icon; | |
1169 ret->away_states = toc_away_states; | |
1170 ret->actions = toc_actions; | |
1171 ret->do_action = toc_do_action; | |
1172 ret->buddy_menu = toc_buddy_menu; | |
1173 ret->user_opts = toc_user_opts; | |
1174 ret->login = toc_login; | |
1175 ret->close = toc_close; | |
1176 ret->send_im = toc_send_im; | |
1177 ret->set_info = toc_set_info; | |
1178 ret->get_info = toc_get_info; | |
1179 ret->set_away = toc_set_away; | |
1180 ret->get_away_msg = NULL; | |
1181 ret->set_dir = toc_set_dir; | |
1182 ret->get_dir = toc_get_dir; | |
1183 ret->dir_search = toc_dir_search; | |
1184 ret->set_idle = toc_set_idle; | |
1185 ret->change_passwd = toc_change_passwd; | |
1186 ret->add_buddy = toc_add_buddy; | |
1187 ret->add_buddies = toc_add_buddies; | |
1188 ret->remove_buddy = toc_remove_buddy; | |
1189 ret->add_permit = toc_add_permit; | |
1190 ret->add_deny = toc_add_deny; | |
1191 ret->rem_permit = toc_rem_permit; | |
1192 ret->rem_deny = toc_rem_deny; | |
1193 ret->set_permit_deny = toc_set_permit_deny; | |
1194 ret->warn = toc_warn; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1195 ret->chat_info = toc_chat_info; |
2086 | 1196 ret->join_chat = toc_join_chat; |
1197 ret->chat_invite = toc_chat_invite; | |
1198 ret->chat_leave = toc_chat_leave; | |
1199 ret->chat_whisper = toc_chat_whisper; | |
1200 ret->chat_send = toc_chat_send; | |
1201 ret->keepalive = toc_keepalive; | |
1202 | |
1203 my_protocol = ret; | |
1204 } | |
1205 | |
1206 #ifndef STATIC | |
1207 | |
1208 char *gaim_plugin_init(GModule *handle) | |
1209 { | |
1210 load_protocol(toc_init, sizeof(struct prpl)); | |
1211 return NULL; | |
1212 } | |
1213 | |
1214 void gaim_plugin_remove() | |
1215 { | |
1216 struct prpl *p = find_prpl(PROTO_TOC); | |
1217 if (p == my_protocol) | |
1218 unload_protocol(p); | |
1219 } | |
1220 | |
1221 char *name() | |
1222 { | |
1223 return "TOC"; | |
1224 } | |
1225 | |
1226 char *description() | |
1227 { | |
2162
a464da684307
[gaim-migrate @ 2172]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2154
diff
changeset
|
1228 return PRPL_DESC("TOC"); |
2086 | 1229 } |
1230 | |
1231 #endif | |
1232 | |
1233 /********* | |
1234 * RVOUS ACTIONS | |
1235 ********/ | |
1236 | |
1237 struct file_header { | |
1238 char magic[4]; /* 0 */ | |
1239 short hdrlen; /* 4 */ | |
1240 short hdrtype; /* 6 */ | |
1241 char bcookie[8]; /* 8 */ | |
1242 short encrypt; /* 16 */ | |
1243 short compress; /* 18 */ | |
1244 short totfiles; /* 20 */ | |
1245 short filesleft; /* 22 */ | |
1246 short totparts; /* 24 */ | |
1247 short partsleft; /* 26 */ | |
1248 long totsize; /* 28 */ | |
1249 long size; /* 32 */ | |
1250 long modtime; /* 36 */ | |
1251 long checksum; /* 40 */ | |
1252 long rfrcsum; /* 44 */ | |
1253 long rfsize; /* 48 */ | |
1254 long cretime; /* 52 */ | |
1255 long rfcsum; /* 56 */ | |
1256 long nrecvd; /* 60 */ | |
1257 long recvcsum; /* 64 */ | |
1258 char idstring[32]; /* 68 */ | |
1259 char flags; /* 100 */ | |
1260 char lnameoffset; /* 101 */ | |
1261 char lsizeoffset; /* 102 */ | |
1262 char dummy[69]; /* 103 */ | |
1263 char macfileinfo[16]; /* 172 */ | |
1264 short nencode; /* 188 */ | |
1265 short nlanguage; /* 190 */ | |
1266 char name[64]; /* 192 */ | |
1267 /* 256 */ | |
1268 }; | |
1269 | |
1270 struct file_transfer { | |
1271 struct file_header hdr; | |
1272 | |
1273 struct gaim_connection *gc; | |
1274 | |
1275 char *user; | |
1276 char *cookie; | |
1277 char *ip; | |
1278 int port; | |
1279 long size; | |
1280 struct stat st; | |
1281 | |
1282 GtkWidget *window; | |
1283 int files; | |
1284 char *filename; | |
1285 FILE *file; | |
1286 int recvsize; | |
1287 | |
1288 gint inpa; | |
1289 }; | |
1290 | |
1291 static void debug_header(struct file_transfer *ft) { | |
1292 struct file_header *f = (struct file_header *)ft; | |
1293 debug_printf("TOC FT HEADER:\n" | |
1294 "\t%s %d 0x%04x\n" | |
1295 "\t%s %d %d\n" | |
1296 "\t%d %d %d %d %ld %ld\n" | |
1297 "\t%ld %ld %ld %ld %ld %ld %ld %ld\n" | |
1298 "\t%s\n" | |
1299 "\t0x%02x, 0x%02x, 0x%02x\n" | |
1300 "\t%s %s\n" | |
1301 "\t%d %d\n" | |
1302 "\t%s\n", | |
1303 f->magic, ntohs(f->hdrlen), f->hdrtype, | |
1304 f->bcookie, ntohs(f->encrypt), ntohs(f->compress), | |
1305 ntohs(f->totfiles), ntohs(f->filesleft), ntohs(f->totparts), | |
1306 ntohs(f->partsleft), ntohl(f->totsize), ntohl(f->size), | |
1307 ntohl(f->modtime), ntohl(f->checksum), ntohl(f->rfrcsum), ntohl(f->rfsize), | |
1308 ntohl(f->cretime), ntohl(f->rfcsum), ntohl(f->nrecvd), | |
1309 ntohl(f->recvcsum), | |
1310 f->idstring, | |
1311 f->flags, f->lnameoffset, f->lsizeoffset, | |
1312 f->dummy, f->macfileinfo, | |
1313 ntohs(f->nencode), ntohs(f->nlanguage), | |
1314 f->name); | |
1315 } | |
1316 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1317 static void toc_send_file_callback(gpointer data, gint source, GaimInputCondition cond) |
2086 | 1318 { |
1319 char buf[BUF_LONG]; | |
1320 int rt, i; | |
1321 | |
1322 struct file_transfer *ft = data; | |
1323 | |
1324 if (ft->hdr.hdrtype != 0x202) { | |
1325 char *buf; | |
1326 frombase64(ft->cookie, &buf, NULL); | |
1327 | |
1328 read(source, ft, 8); | |
1329 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1330 debug_header(ft); | |
1331 | |
1332 ft->hdr.hdrtype = 0x202; | |
1333 memcpy(ft->hdr.bcookie, buf, 8); | |
1334 g_free(buf); | |
1335 ft->hdr.encrypt = 0; ft->hdr.compress = 0; | |
1336 debug_header(ft); | |
1337 write(source, ft, 256); | |
1338 | |
1339 if (ft->files == 1) { | |
1340 ft->file = fopen(ft->filename, "w"); | |
1341 if (!ft->file) { | |
1342 buf = g_strdup_printf("Could not open %s for writing!", ft->filename); | |
1343 do_error_dialog(buf, _("Error")); | |
1344 g_free(buf); | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1345 gaim_input_remove(ft->inpa); |
2086 | 1346 close(source); |
1347 g_free(ft->filename); | |
1348 g_free(ft->user); | |
1349 g_free(ft->ip); | |
1350 g_free(ft->cookie); | |
1351 g_free(ft); | |
1352 } | |
1353 } else { | |
1354 buf = g_strdup_printf("%s/%s", ft->filename, ft->hdr.name); | |
1355 ft->file = fopen(buf, "w"); | |
1356 g_free(buf); | |
1357 if (!ft->file) { | |
1358 buf = g_strdup_printf("Could not open %s/%s for writing!", ft->filename, | |
1359 ft->hdr.name); | |
1360 do_error_dialog(buf, _("Error")); | |
1361 g_free(buf); | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1362 gaim_input_remove(ft->inpa); |
2086 | 1363 close(source); |
1364 g_free(ft->filename); | |
1365 g_free(ft->user); | |
1366 g_free(ft->ip); | |
1367 g_free(ft->cookie); | |
1368 g_free(ft); | |
1369 } | |
1370 } | |
1371 | |
1372 return; | |
1373 } | |
1374 | |
1375 rt = read(source, buf, MIN(ntohl(ft->hdr.size) - ft->recvsize, 1024)); | |
1376 if (rt < 0) { | |
1377 do_error_dialog("File transfer failed; other side probably canceled.", "Error"); | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1378 gaim_input_remove(ft->inpa); |
2086 | 1379 close(source); |
1380 g_free(ft->user); | |
1381 g_free(ft->ip); | |
1382 g_free(ft->cookie); | |
1383 if (ft->file) | |
1384 fclose(ft->file); | |
1385 g_free(ft); | |
1386 return; | |
1387 } | |
1388 ft->recvsize += rt; | |
1389 for (i = 0; i < rt; i++) | |
1390 fprintf(ft->file, "%c", buf[i]); | |
1391 | |
1392 if (ft->recvsize == ntohl(ft->hdr.size)) { | |
1393 ft->hdr.hdrtype = htons(0x0204); | |
1394 ft->hdr.filesleft = htons(ntohs(ft->hdr.filesleft) - 1); | |
1395 ft->hdr.partsleft = htons(ntohs(ft->hdr.partsleft) - 1); | |
1396 ft->hdr.recvcsum = ft->hdr.checksum; /* uh... */ | |
1397 ft->hdr.nrecvd = htons(ntohs(ft->hdr.nrecvd) + 1); | |
1398 ft->hdr.flags = 0; | |
1399 write(source, ft, 256); | |
1400 debug_header(ft); | |
1401 ft->recvsize = 0; | |
1402 fclose(ft->file); | |
1403 if (ft->hdr.filesleft == 0) { | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1404 gaim_input_remove(ft->inpa); |
2086 | 1405 close(source); |
1406 g_free(ft->filename); | |
1407 g_free(ft->user); | |
1408 g_free(ft->ip); | |
1409 g_free(ft->cookie); | |
1410 g_free(ft); | |
1411 } | |
1412 } | |
1413 } | |
1414 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1415 static void toc_send_file_connect(gpointer data, gint src, GaimInputCondition cond) |
2086 | 1416 { |
1417 struct file_transfer *ft = data; | |
1418 | |
1419 if (src == -1) { | |
1420 do_error_dialog(_("Could not connect for transfer!"), _("Error")); | |
1421 g_free(ft->filename); | |
1422 g_free(ft->cookie); | |
1423 g_free(ft->user); | |
1424 g_free(ft->ip); | |
1425 g_free(ft); | |
1426 return; | |
1427 } | |
1428 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1429 ft->inpa = gaim_input_add(src, GAIM_INPUT_READ, toc_send_file_callback, ft); |
2086 | 1430 } |
1431 | |
1432 static void toc_send_file(gpointer a, struct file_transfer *old_ft) | |
1433 { | |
1434 struct file_transfer *ft; | |
1435 const char *dirname = gtk_file_selection_get_filename(GTK_FILE_SELECTION(old_ft->window)); | |
1436 int fd; | |
1437 struct aim_user *user; | |
1438 char buf[BUF_LEN * 2]; | |
1439 | |
1440 if (file_is_dir(dirname, old_ft->window)) | |
1441 return; | |
1442 ft = g_new0(struct file_transfer, 1); | |
1443 if (old_ft->files == 1) | |
1444 ft->filename = g_strdup(dirname); | |
1445 else | |
1446 ft->filename = g_dirname(dirname); | |
1447 ft->cookie = g_strdup(old_ft->cookie); | |
1448 ft->user = g_strdup(old_ft->user); | |
1449 ft->ip = g_strdup(old_ft->ip); | |
1450 ft->files = old_ft->files; | |
1451 ft->port = old_ft->port; | |
1452 ft->gc = old_ft->gc; | |
1453 user = ft->gc->user; | |
1454 gtk_widget_destroy(old_ft->window); | |
1455 | |
1456 g_snprintf(buf, sizeof(buf), "toc_rvous_accept %s %s %s", ft->user, ft->cookie, FILE_SEND_UID); | |
1457 sflap_send(ft->gc, buf, -1, TYPE_DATA); | |
1458 | |
1459 fd = | |
1460 proxy_connect(ft->ip, ft->port, toc_send_file_connect, ft); | |
1461 if (fd < 0) { | |
1462 do_error_dialog(_("Could not connect for transfer!"), _("Error")); | |
1463 g_free(ft->filename); | |
1464 g_free(ft->cookie); | |
1465 g_free(ft->user); | |
1466 g_free(ft->ip); | |
1467 g_free(ft); | |
1468 return; | |
1469 } | |
1470 } | |
1471 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1472 static void toc_get_file_callback(gpointer data, gint source, GaimInputCondition cond) |
2086 | 1473 { |
1474 char buf[BUF_LONG]; | |
1475 | |
1476 struct file_transfer *ft = data; | |
1477 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1478 if (cond & GAIM_INPUT_WRITE) { |
2086 | 1479 int remain = MIN(ntohl(ft->hdr.totsize) - ft->recvsize, 1024); |
1480 int i; | |
1481 for (i = 0; i < remain; i++) | |
1482 fscanf(ft->file, "%c", &buf[i]); | |
1483 write(source, buf, remain); | |
1484 ft->recvsize += remain; | |
1485 if (ft->recvsize == ntohl(ft->hdr.totsize)) { | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1486 gaim_input_remove(ft->inpa); |
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1487 ft->inpa = gaim_input_add(source, GAIM_INPUT_READ, |
2086 | 1488 toc_get_file_callback, ft); |
1489 } | |
1490 return; | |
1491 } | |
1492 | |
1493 if (ft->hdr.hdrtype == htons(0x1108)) { | |
1494 struct tm *fortime; | |
1495 struct stat st; | |
1496 | |
1497 read(source, ft, 8); | |
1498 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1499 debug_header(ft); | |
1500 | |
1501 stat(ft->filename, &st); | |
1502 fortime = localtime(&st.st_mtime); | |
1503 g_snprintf(buf, sizeof(buf), "%2d/%2d/%4d %2d:%2d %8ld %s\r\n", | |
1504 fortime->tm_mon + 1, fortime->tm_mday, fortime->tm_year + 1900, | |
1505 fortime->tm_hour + 1, fortime->tm_min + 1, (long)st.st_size, | |
1506 g_basename(ft->filename)); | |
1507 write(source, buf, ntohl(ft->hdr.size)); | |
1508 return; | |
1509 } | |
1510 | |
1511 if (ft->hdr.hdrtype == htons(0x1209)) { | |
1512 read(source, ft, 8); | |
1513 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1514 debug_header(ft); | |
1515 return; | |
1516 } | |
1517 | |
1518 if (ft->hdr.hdrtype == htons(0x120b)) { | |
1519 read(source, ft, 8); | |
1520 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1521 debug_header(ft); | |
1522 | |
1523 if (ft->hdr.hdrtype != htons(0x120c)) { | |
1524 g_snprintf(buf, sizeof(buf), "%s decided to cancel the transfer", ft->user); | |
1525 do_error_dialog(buf, "Error"); | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1526 gaim_input_remove(ft->inpa); |
2086 | 1527 close(source); |
1528 g_free(ft->filename); | |
1529 g_free(ft->user); | |
1530 g_free(ft->ip); | |
1531 g_free(ft->cookie); | |
1532 if (ft->file) | |
1533 fclose(ft->file); | |
1534 g_free(ft); | |
1535 return; | |
1536 } | |
1537 | |
1538 ft->hdr.hdrtype = 0x0101; | |
1539 ft->hdr.totfiles = htons(1); ft->hdr.filesleft = htons(1); | |
1540 ft->hdr.flags = 0x20; | |
1541 write(source, ft, 256); | |
1542 return; | |
1543 } | |
1544 | |
1545 if (ft->hdr.hdrtype == 0x0101) { | |
1546 read(source, ft, 8); | |
1547 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1548 debug_header(ft); | |
1549 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1550 gaim_input_remove(ft->inpa); |
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1551 ft->inpa = gaim_input_add(source, GAIM_INPUT_WRITE, |
2086 | 1552 toc_get_file_callback, ft); |
1553 return; | |
1554 } | |
1555 | |
1556 if (ft->hdr.hdrtype == 0x0202) { | |
1557 read(source, ft, 8); | |
1558 read(source, &ft->hdr.bcookie, MIN(256 - 8, ntohs(ft->hdr.hdrlen) - 8)); | |
1559 debug_header(ft); | |
1560 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1561 gaim_input_remove(ft->inpa); |
2086 | 1562 close(source); |
1563 g_free(ft->filename); | |
1564 g_free(ft->user); | |
1565 g_free(ft->ip); | |
1566 g_free(ft->cookie); | |
1567 if (ft->file) | |
1568 fclose(ft->file); | |
1569 g_free(ft); | |
1570 return; | |
1571 } | |
1572 } | |
1573 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1574 static void toc_get_file_connect(gpointer data, gint src, GaimInputCondition cond) |
2086 | 1575 { |
1576 struct file_transfer *ft = data; | |
1577 struct file_header *hdr; | |
1578 char *buf; | |
1579 | |
1580 if (src == -1) { | |
1581 do_error_dialog(_("Could not connect for transfer!"), _("Error")); | |
1582 fclose(ft->file); | |
1583 g_free(ft->filename); | |
1584 g_free(ft->cookie); | |
1585 g_free(ft->user); | |
1586 g_free(ft->ip); | |
1587 g_free(ft); | |
1588 return; | |
1589 } | |
1590 | |
1591 hdr = (struct file_header *)ft; | |
1592 hdr->magic[0] = 'O'; hdr->magic[1] = 'F'; hdr->magic[2] = 'T'; hdr->magic[3] = '2'; | |
1593 hdr->hdrlen = htons(256); | |
1594 hdr->hdrtype = htons(0x1108); | |
1595 frombase64(ft->cookie, &buf, NULL); | |
1596 g_snprintf(hdr->bcookie, 8, "%s", buf); | |
1597 g_free(buf); | |
1598 hdr->totfiles = htons(1); hdr->filesleft = htons(1); | |
1599 hdr->totparts = htons(1); hdr->partsleft = htons(1); | |
1600 hdr->totsize = htonl((long)ft->st.st_size); /* combined size of all files */ | |
1601 /* size = strlen("mm/dd/yyyy hh:mm sizesize 'name'\r\n") */ | |
1602 hdr->size = htonl(28 + strlen(g_basename(ft->filename))); /* size of listing.txt */ | |
1603 hdr->modtime = htonl(ft->st.st_mtime); | |
1604 hdr->checksum = htonl(0x89f70000); /* uh... */ | |
1605 g_snprintf(hdr->idstring, 32, "OFT_Windows ICBMFT V1.1 32"); | |
1606 hdr->flags = 0x02; | |
1607 hdr->lnameoffset = 0x1A; | |
1608 hdr->lsizeoffset = 0x10; | |
1609 g_snprintf(hdr->name, 64, "listing.txt"); | |
1610 if (write(src, hdr, 256) < 0) { | |
1611 do_error_dialog(_("Could not write file header!"), _("Error")); | |
1612 fclose(ft->file); | |
1613 g_free(ft->filename); | |
1614 g_free(ft->cookie); | |
1615 g_free(ft->user); | |
1616 g_free(ft->ip); | |
1617 g_free(ft); | |
1618 return; | |
1619 } | |
1620 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
1621 ft->inpa = gaim_input_add(src, GAIM_INPUT_READ, toc_get_file_callback, ft); |
2086 | 1622 } |
1623 | |
1624 static void toc_get_file(gpointer a, struct file_transfer *old_ft) | |
1625 { | |
1626 struct file_transfer *ft; | |
1627 const char *dirname = gtk_file_selection_get_filename(GTK_FILE_SELECTION(old_ft->window)); | |
1628 int fd; | |
1629 struct aim_user *user; | |
1630 char *buf, buf2[BUF_LEN * 2]; | |
1631 | |
1632 if (file_is_dir(dirname, old_ft->window)) | |
1633 return; | |
1634 ft = g_new0(struct file_transfer, 1); | |
1635 ft->filename = g_strdup(dirname); | |
1636 ft->file = fopen(ft->filename, "r"); | |
1637 if (!ft->file) { | |
1638 buf = g_strdup_printf("Unable to open %s for transfer!", ft->filename); | |
1639 do_error_dialog(buf, "Error"); | |
1640 g_free(buf); | |
1641 g_free(ft->filename); | |
1642 g_free(ft); | |
1643 return; | |
1644 } | |
1645 if (stat(dirname, &ft->st)) { | |
1646 buf = g_strdup_printf("Unable to examine %s!", dirname); | |
1647 do_error_dialog(buf, "Error"); | |
1648 g_free(buf); | |
1649 g_free(ft->filename); | |
1650 g_free(ft); | |
1651 return; | |
1652 } | |
1653 ft->cookie = g_strdup(old_ft->cookie); | |
1654 ft->user = g_strdup(old_ft->user); | |
1655 ft->ip = g_strdup(old_ft->ip); | |
1656 ft->port = old_ft->port; | |
1657 ft->gc = old_ft->gc; | |
1658 user = ft->gc->user; | |
1659 gtk_widget_destroy(old_ft->window); | |
1660 | |
1661 g_snprintf(buf2, sizeof(buf2), "toc_rvous_accept %s %s %s", ft->user, ft->cookie, FILE_GET_UID); | |
1662 sflap_send(ft->gc, buf2, -1, TYPE_DATA); | |
1663 | |
1664 fd = | |
1665 proxy_connect(ft->ip, ft->port, toc_get_file_connect, ft); | |
1666 if (fd < 0) { | |
1667 do_error_dialog(_("Could not connect for transfer!"), _("Error")); | |
1668 fclose(ft->file); | |
1669 g_free(ft->filename); | |
1670 g_free(ft->cookie); | |
1671 g_free(ft->user); | |
1672 g_free(ft->ip); | |
1673 g_free(ft); | |
1674 return; | |
1675 } | |
1676 } | |
1677 | |
1678 static void cancel_callback(gpointer a, struct file_transfer *ft) { | |
1679 gtk_widget_destroy(ft->window); | |
1680 if (a == ft->window) { | |
1681 g_free(ft->cookie); | |
1682 g_free(ft->user); | |
1683 g_free(ft->ip); | |
1684 g_free(ft); | |
1685 } | |
1686 } | |
1687 | |
1688 static void toc_accept_ft(gpointer a, struct ft_request *fr) { | |
1689 GtkWidget *window; | |
1690 char buf[BUF_LEN]; | |
1691 | |
1692 struct file_transfer *ft = g_new0(struct file_transfer, 1); | |
1693 ft->gc = fr->gc; | |
1694 ft->user = g_strdup(fr->user); | |
1695 ft->cookie = g_strdup(fr->cookie); | |
1696 ft->ip = g_strdup(fr->ip); | |
1697 ft->port = fr->port; | |
1698 ft->files = fr->files; | |
1699 | |
1700 ft->window = window = gtk_file_selection_new(_("Gaim - Save As...")); | |
1701 g_snprintf(buf, sizeof(buf), "%s/%s", g_get_home_dir(), fr->filename ? fr->filename : ""); | |
1702 gtk_file_selection_set_filename(GTK_FILE_SELECTION(window), buf); | |
1703 gtk_signal_connect(GTK_OBJECT(window), "destroy", | |
1704 GTK_SIGNAL_FUNC(cancel_callback), ft); | |
1705 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(ft->window)->cancel_button), "clicked", | |
1706 GTK_SIGNAL_FUNC(cancel_callback), ft); | |
1707 | |
1708 if (!strcmp(fr->UID, FILE_SEND_UID)) | |
1709 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(window)->ok_button), "clicked", | |
1710 GTK_SIGNAL_FUNC(toc_send_file), ft); | |
1711 else | |
1712 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(window)->ok_button), "clicked", | |
1713 GTK_SIGNAL_FUNC(toc_get_file), ft); | |
1714 | |
1715 gtk_widget_show(window); | |
1716 } | |
1717 | |
1718 static void toc_reject_ft(gpointer a, struct ft_request *ft) { | |
1719 g_free(ft->user); | |
1720 g_free(ft->filename); | |
1721 g_free(ft->ip); | |
1722 g_free(ft->cookie); | |
1723 if (ft->message) | |
1724 g_free(ft->message); | |
1725 g_free(ft); | |
1726 } | |
1727 | |
1728 static void accept_file_dialog(struct ft_request *ft) { | |
1729 char buf[BUF_LONG]; | |
1730 if (!strcmp(ft->UID, FILE_SEND_UID)) { | |
1731 /* holy crap. who the fuck would transfer gigabytes through AIM?! */ | |
1732 static char *sizes[4] = { "bytes", "KB", "MB", "GB" }; | |
1733 float size = ft->size; | |
1734 int index = 0; | |
1735 while ((index < 4) && (size > 1024)) { | |
1736 size /= 1024; | |
1737 index++; | |
1738 } | |
1739 g_snprintf(buf, sizeof(buf), _("%s requests %s to accept %d file%s: %s (%.2f %s)%s%s"), | |
1740 ft->user, ft->gc->username, ft->files, (ft->files == 1) ? "" : "s", | |
1741 ft->filename, size, sizes[index], (ft->message) ? "\n" : "", | |
1742 (ft->message) ? ft->message : ""); | |
1743 } else { | |
1744 g_snprintf(buf, sizeof(buf), _("%s requests you to send them a file"), ft->user); | |
1745 } | |
1746 do_ask_dialog(buf, ft, toc_accept_ft, toc_reject_ft); | |
1747 } |