1: /*
2: * Purple's oscar protocol plugin
3: * This file is the legal property of its developers.
4: * Please see the AUTHORS file distributed alongside this file.
5: *
6: * This library is free software; you can redistribute it and/or
7: * modify it under the terms of the GNU Lesser General Public
8: * License as published by the Free Software Foundation; either
9: * version 2 of the License, or (at your option) any later version.
10: *
11: * This library 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 GNU
14: * Lesser General Public License for more details.
15: *
16: * You should have received a copy of the GNU Lesser General Public
17: * License along with this library; if not, write to the Free Software
18: * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
19: */
20:
21: /*
22: * Family 0x0015 - Encapsulated ICQ.
23: *
24: */
25:
26: #include "encoding.h"
27: #include "oscar.h"
28:
29: #define AIM_ICQ_INFO_REQUEST 0x04b2
30: #define AIM_ICQ_ALIAS_REQUEST 0x04ba
31:
32: static
33: int compare_icq_infos(gconstpointer a, gconstpointer b)
34: {
35: const struct aim_icq_info* aa = a;
36: const guint16* bb = b;
37: return aa->reqid - *bb;
38: }
39:
40: static void aim_icq_freeinfo(struct aim_icq_info *info) {
41: int i;
42:
43: if (!info)
44: return;
45: g_free(info->nick);
46: g_free(info->first);
47: g_free(info->last);
48: g_free(info->email);
49: g_free(info->homecity);
50: g_free(info->homestate);
51: g_free(info->homephone);
52: g_free(info->homefax);
53: g_free(info->homeaddr);
54: g_free(info->mobile);
55: g_free(info->homezip);
56: g_free(info->personalwebpage);
57: if (info->email2)
58: for (i = 0; i < info->numaddresses; i++)
59: g_free(info->email2[i]);
60: g_free(info->email2);
61: g_free(info->workcity);
62: g_free(info->workstate);
63: g_free(info->workphone);
64: g_free(info->workfax);
65: g_free(info->workaddr);
66: g_free(info->workzip);
67: g_free(info->workcompany);
68: g_free(info->workdivision);
69: g_free(info->workposition);
70: g_free(info->workwebpage);
71: g_free(info->info);
72: g_free(info->status_note_title);
73: g_free(info->auth_request_reason);
74: }
75:
76: static
77: int error(OscarData *od, aim_modsnac_t *error_snac, ByteStream *bs)
78: {
79: aim_snac_t *original_snac = aim_remsnac(od, error_snac->id);
80: guint16 *request_type;
81: GSList *original_info_ptr;
82: struct aim_icq_info *original_info;
83: guint16 reason;
84: gchar *uin;
85:
86: if (!original_snac || (original_snac->family != SNAC_FAMILY_ICQ) || !original_snac->data) {
87: purple_debug_misc("oscar", "icq: the original snac for the error packet was not found");
88: g_free(original_snac);
89: return 0;
90: }
91:
92: request_type = original_snac->data;
93: original_info_ptr = g_slist_find_custom(od->icq_info, &original_snac->id, compare_icq_infos);
94:
95: if (!original_info_ptr) {
96: purple_debug_misc("oscar", "icq: the request info for the error packet was not found");
97: g_free(original_snac);
98: return 0;
99: }
100:
101: original_info = original_info_ptr->data;
102:
103: reason = byte_stream_get16(bs);
104: uin = g_strdup_printf("%u", original_info->uin);
105: switch (*request_type) {
106: case AIM_ICQ_INFO_REQUEST:
107: oscar_user_info_display_error(od, reason, uin);
108: break;
109: case AIM_ICQ_ALIAS_REQUEST:
110: /* Couldn't retrieve an alias for the buddy requesting authorization; have to make do with UIN only. */
111: if (original_info->for_auth_request)
112: oscar_auth_recvrequest(od->gc, uin, NULL, original_info->auth_request_reason);
113: break;
114: default:
115: purple_debug_misc("oscar", "icq: got an error packet with unknown request type %u", *request_type);
116: break;
117: }
118:
119: aim_icq_freeinfo(original_info);
120: od->icq_info = g_slist_remove(od->icq_info, original_info_ptr);
121: g_free(original_snac->data);
122: g_free(original_snac);
123: return 1;
124: }
125:
126: int
127: aim_icq_setsecurity(OscarData *od, gboolean auth_required, gboolean webaware)
128: {
129: FlapConnection *conn;
130: ByteStream bs;
131: aim_snacid_t snacid;
132: int bslen;
133:
134: if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICQ)))
135: return -EINVAL;
136:
137: bslen = 2+4+2+2+2+2+2+1+1+1+1+1+1;
138:
139: byte_stream_new(&bs, 4 + bslen);
140:
141: snacid = aim_cachesnac(od, SNAC_FAMILY_ICQ, 0x0002, 0x0000, NULL, 0);
142:
143: /* For simplicity, don't bother using a tlvlist */
144: byte_stream_put16(&bs, 0x0001);
145: byte_stream_put16(&bs, bslen);
146:
147: byte_stream_putle16(&bs, bslen - 2);
148: byte_stream_putuid(&bs, od);
149: byte_stream_putle16(&bs, 0x07d0); /* I command thee. */
150: byte_stream_putle16(&bs, snacid); /* eh. */
151: byte_stream_putle16(&bs, 0x0c3a); /* shrug. */
152: byte_stream_putle16(&bs, 0x030c);
153: byte_stream_putle16(&bs, 0x0001);
154: byte_stream_putle8(&bs, webaware);
155: byte_stream_putle8(&bs, 0xf8);
156: byte_stream_putle8(&bs, 0x02);
157: byte_stream_putle8(&bs, 0x01);
158: byte_stream_putle8(&bs, 0x00);
159: byte_stream_putle8(&bs, !auth_required);
160:
161: flap_connection_send_snac(od, conn, SNAC_FAMILY_ICQ, 0x0002, snacid, &bs);
162:
163: byte_stream_destroy(&bs);
164:
165: return 0;
166: }
167:
168: /**
169: * Change your ICQ password.
170: *
171: * @param od The oscar session
172: * @param passwd The new password. If this is longer than 8 characters it
173: * will be truncated.
174: * @return Return 0 if no errors, otherwise return the error number.
175: */
176: int aim_icq_changepasswd(OscarData *od, const char *passwd)
177: {
178: FlapConnection *conn;
179: ByteStream bs;
180: aim_snacid_t snacid;
181: int bslen, passwdlen;
182:
183: if (!passwd)
184: return -EINVAL;
185:
186: if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICQ)))
187: return -EINVAL;
188:
189: passwdlen = strlen(passwd);
190: if (passwdlen > MAXICQPASSLEN)
191: passwdlen = MAXICQPASSLEN;
192: bslen = 2+4+2+2+2+2+passwdlen+1;
193:
194: byte_stream_new(&bs, 4 + bslen);
195:
196: snacid = aim_cachesnac(od, SNAC_FAMILY_ICQ, 0x0002, 0x0000, NULL, 0);
197:
198: /* For simplicity, don't bother using a tlvlist */
199: byte_stream_put16(&bs, 0x0001);
200: byte_stream_put16(&bs, bslen);
201:
202: byte_stream_putle16(&bs, bslen - 2);
203: byte_stream_putuid(&bs, od);
204: byte_stream_putle16(&bs, 0x07d0); /* I command thee. */
205: byte_stream_putle16(&bs, snacid); /* eh. */
206: byte_stream_putle16(&bs, 0x042e); /* shrug. */
207: byte_stream_putle16(&bs, passwdlen+1);
208: byte_stream_putraw(&bs, (const guint8 *)passwd, passwdlen);
209: byte_stream_putle8(&bs, '\0');
210:
211: flap_connection_send_snac(od, conn, SNAC_FAMILY_ICQ, 0x0002, snacid, &bs);
212:
213: byte_stream_destroy(&bs);
214:
215: return 0;
216: }
217:
218: int aim_icq_getallinfo(OscarData *od, const char *uin)
219: {
220: FlapConnection *conn;
221: ByteStream bs;
222: aim_snacid_t snacid;
223: int bslen;
224: struct aim_icq_info *info;
225: guint16 request_type = AIM_ICQ_INFO_REQUEST;
226:
227: if (!uin || uin[0] < '0' || uin[0] > '9')
228: return -EINVAL;
229:
230: if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICQ)))
231: return -EINVAL;
232:
233: bslen = 2 + 4 + 2 + 2 + 2 + 4;
234:
235: byte_stream_new(&bs, 4 + bslen);
236:
237: snacid = aim_cachesnac(od, SNAC_FAMILY_ICQ, 0x0002, 0x0000, &request_type, sizeof(request_type));
238:
239: /* For simplicity, don't bother using a tlvlist */
240: byte_stream_put16(&bs, 0x0001);
241: byte_stream_put16(&bs, bslen);
242:
243: byte_stream_putle16(&bs, bslen - 2);
244: byte_stream_putuid(&bs, od);
245: byte_stream_putle16(&bs, 0x07d0); /* I command thee. */
246: byte_stream_putle16(&bs, snacid); /* eh. */
247: byte_stream_putle16(&bs, request_type); /* shrug. */
248: byte_stream_putle32(&bs, atoi(uin));
249:
250: flap_connection_send_snac_with_priority(od, conn, SNAC_FAMILY_ICQ, 0x0002, snacid, &bs, FALSE);
251:
252: byte_stream_destroy(&bs);
253:
254: /* Keep track of this request and the ICQ number and request ID */
255: info = (struct aim_icq_info *)g_new0(struct aim_icq_info, 1);
256: info->reqid = snacid;
257: info->uin = atoi(uin);
258: od->icq_info = g_slist_prepend(od->icq_info, info);
259:
260: return 0;
261: }
262:
263: int aim_icq_getalias(OscarData *od, const char *uin, gboolean for_auth_request, char *auth_request_reason)
264: {
265: FlapConnection *conn;
266: ByteStream bs;
267: aim_snacid_t snacid;
268: int bslen;
269: struct aim_icq_info *info;
270: guint16 request_type = AIM_ICQ_ALIAS_REQUEST;
271:
272: if (!uin || uin[0] < '0' || uin[0] > '9')
273: return -EINVAL;
274:
275: if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICQ)))
276: return -EINVAL;
277:
278: purple_debug_info("oscar", "Requesting ICQ alias for %s\n", uin);
279:
280: bslen = 2 + 4 + 2 + 2 + 2 + 4;
281:
282: byte_stream_new(&bs, 4 + bslen);
283:
284: snacid = aim_cachesnac(od, SNAC_FAMILY_ICQ, 0x0002, 0x0000, &request_type, sizeof(request_type));
285:
286: /* For simplicity, don't bother using a tlvlist */
287: byte_stream_put16(&bs, 0x0001);
288: byte_stream_put16(&bs, bslen);
289:
290: byte_stream_putle16(&bs, bslen - 2);
291: byte_stream_putuid(&bs, od);
292: byte_stream_putle16(&bs, 0x07d0); /* I command thee. */
293: byte_stream_putle16(&bs, snacid); /* eh. */
294: byte_stream_putle16(&bs, request_type); /* shrug. */
295: byte_stream_putle32(&bs, atoi(uin));
296:
297: flap_connection_send_snac_with_priority(od, conn, SNAC_FAMILY_ICQ, 0x0002, snacid, &bs, FALSE);
298:
299: byte_stream_destroy(&bs);
300:
301: /* Keep track of this request and the ICQ number and request ID */
302: info = (struct aim_icq_info *)g_new0(struct aim_icq_info, 1);
303: info->reqid = snacid;
304: info->uin = atoi(uin);
305: info->for_auth_request = for_auth_request;
306: info->auth_request_reason = g_strdup(auth_request_reason);
307: od->icq_info = g_slist_prepend(od->icq_info, info);
308:
309: return 0;
310: }
311:
312: /*
313: * Send an SMS message. This is the non-US way. The US-way is to IM
314: * their cell phone number (+19195551234).
315: *
316: * We basically construct and send an XML message. The format is:
317: * <icq_sms_message>
318: * <destination>full_phone_without_leading_+</destination>
319: * <text>message</text>
320: * <codepage>1252</codepage>
321: * <senders_UIN>self_uin</senders_UIN>
322: * <senders_name>self_name</senders_name>
323: * <delivery_receipt>Yes|No</delivery_receipt>
324: * <time>Wkd, DD Mmm YYYY HH:MM:SS TMZ</time>
325: * </icq_sms_message>
326: *
327: * Yeah hi Peter, whaaaat's happening. If there's any way to use
328: * a codepage other than 1252 that would be great. Thaaaanks.
329: */
330: int aim_icq_sendsms(OscarData *od, const char *name, const char *msg, const char *alias)
331: {
332: FlapConnection *conn;
333: PurpleAccount *account;
334: ByteStream bs;
335: aim_snacid_t snacid;
336: int bslen, xmllen;
337: char *xml;
338: const char *timestr, *username;
339: time_t t;
340: struct tm *tm;
341: gchar *stripped;
342:
343: if (!od || !(conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICQ)))
344: return -EINVAL;
345:
346: if (!name || !msg || !alias)
347: return -EINVAL;
348:
349: account = purple_connection_get_account(od->gc);
350: username = purple_account_get_username(account);
351:
352: time(&t);
353: tm = gmtime(&t);
354: timestr = purple_utf8_strftime("%a, %d %b %Y %T %Z", tm);
355:
356: stripped = purple_markup_strip_html(msg);
357:
358: /* The length of xml included the null terminating character */
359: xmllen = 209 + strlen(name) + strlen(stripped) + strlen(username) + strlen(alias) + strlen(timestr) + 1;
360:
361: xml = g_new(char, xmllen);
362: snprintf(xml, xmllen, "<icq_sms_message>"
363: "<destination>%s</destination>"
364: "<text>%s</text>"
365: "<codepage>1252</codepage>"
366: "<senders_UIN>%s</senders_UIN>"
367: "<senders_name>%s</senders_name>"
368: "<delivery_receipt>Yes</delivery_receipt>"
369: "<time>%s</time>"
370: "</icq_sms_message>",
371: name, stripped, username, alias, timestr);
372:
373: bslen = 36 + xmllen;
374:
375: byte_stream_new(&bs, 4 + bslen);
376:
377: snacid = aim_cachesnac(od, SNAC_FAMILY_ICQ, 0x0002, 0x0000, NULL, 0);
378:
379: /* For simplicity, don't bother using a tlvlist */
380: byte_stream_put16(&bs, 0x0001);
381: byte_stream_put16(&bs, bslen);
382:
383: byte_stream_putle16(&bs, bslen - 2);
384: byte_stream_putuid(&bs, od);
385: byte_stream_putle16(&bs, 0x07d0); /* I command thee. */
386: byte_stream_putle16(&bs, snacid); /* eh. */
387:
388: /* From libicq200-0.3.2/src/SNAC-SRV.cpp */
389: byte_stream_putle16(&bs, 0x1482);
390: byte_stream_put16(&bs, 0x0001);
391: byte_stream_put16(&bs, 0x0016);
392: byte_stream_put32(&bs, 0x00000000);
393: byte_stream_put32(&bs, 0x00000000);
394: byte_stream_put32(&bs, 0x00000000);
395: byte_stream_put32(&bs, 0x00000000);
396:
397: byte_stream_put16(&bs, 0x0000);
398: byte_stream_put16(&bs, xmllen);
399: byte_stream_putstr(&bs, xml);
400: byte_stream_put8(&bs, 0x00);
401:
402: flap_connection_send_snac(od, conn, SNAC_FAMILY_ICQ, 0x0002, snacid, &bs);
403:
404: byte_stream_destroy(&bs);
405:
406: g_free(xml);
407: g_free(stripped);
408:
409: return 0;
410: }
411:
412: static void
413: gotalias(OscarData *od, struct aim_icq_info *info)
414: {
415: PurpleConnection *gc = od->gc;
416: PurpleAccount *account = purple_connection_get_account(gc);
417: PurpleBuddy *b;
418: gchar *utf8 = oscar_utf8_try_convert(account, od, info->nick);
419:
420: if (info->for_auth_request) {
421: oscar_auth_recvrequest(gc, g_strdup_printf("%u", info->uin), utf8, info->auth_request_reason);
422: } else {
423: if (utf8 && *utf8) {
424: gchar who[16];
425: g_snprintf(who, sizeof(who), "%u", info->uin);
426: serv_got_alias(gc, who, utf8);
427: if ((b = purple_find_buddy(account, who))) {
428: purple_blist_node_set_string((PurpleBlistNode*)b, "servernick", utf8);
429: }
430: }
431: g_free(utf8);
432: }
433: }
434:
435: /**
436: * Subtype 0x0003 - Response to SNAC_FAMILY_ICQ/0x002, contains an ICQesque packet.
437: */
438: static int
439: icqresponse(OscarData *od, aim_modsnac_t *snac, ByteStream *bs)
440: {
441: GSList *tlvlist;
442: aim_tlv_t *datatlv;
443: ByteStream qbs;
444: guint32 ouruin;
445: guint16 cmdlen, cmd, reqid;
446:
447: if (!(tlvlist = aim_tlvlist_read(bs)) || !(datatlv = aim_tlv_gettlv(tlvlist, 0x0001, 1))) {
448: aim_tlvlist_free(tlvlist);
449: purple_debug_misc("oscar", "corrupt ICQ response\n");
450: return 0;
451: }
452:
453: byte_stream_init(&qbs, datatlv->value, datatlv->length);
454:
455: cmdlen = byte_stream_getle16(&qbs);
456: ouruin = byte_stream_getle32(&qbs);
457: cmd = byte_stream_getle16(&qbs);
458: reqid = byte_stream_getle16(&qbs);
459:
460: purple_debug_misc("oscar", "icq response: %d bytes, %u, 0x%04x, 0x%04x\n", cmdlen, ouruin, cmd, reqid);
461:
462: if (cmd == 0x07da) { /* information */
463: guint16 subtype;
464: GSList *info_ptr;
465: struct aim_icq_info *info;
466:
467: subtype = byte_stream_getle16(&qbs);
468: byte_stream_advance(&qbs, 1); /* 0x0a */
469:
470: /* find other data from the same request */
471: info_ptr = g_slist_find_custom(od->icq_info, &reqid, compare_icq_infos);
472: if (!info_ptr) {
473: struct aim_icq_info *new_info = (struct aim_icq_info *)g_new0(struct aim_icq_info, 1);
474: new_info->reqid = reqid;
475: info_ptr = od->icq_info = g_slist_prepend(od->icq_info, new_info);
476: }
477:
478: info = info_ptr->data;
479: switch (subtype) {
480: case 0x00a0: { /* hide ip status */
481: /* nothing */
482: } break;
483:
484: case 0x00aa: { /* password change status */
485: /* nothing */
486: } break;
487:
488: case 0x00c8: { /* general and "home" information */
489: info->nick = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
490: info->first = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
491: info->last = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
492: info->email = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
493: info->homecity = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
494: info->homestate = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
495: info->homephone = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
496: info->homefax = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
497: info->homeaddr = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
498: info->mobile = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
499: info->homezip = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
500: info->homecountry = byte_stream_getle16(&qbs);
501: /* 0x0a 00 02 00 */
502: /* 1 byte timezone? */
503: /* 1 byte hide email flag? */
504: } break;
505:
506: case 0x00dc: { /* personal information */
507: info->age = byte_stream_getle8(&qbs);
508: info->unknown = byte_stream_getle8(&qbs);
509: info->gender = byte_stream_getle8(&qbs); /* Not specified=0x00, Female=0x01, Male=0x02 */
510: info->personalwebpage = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
511: info->birthyear = byte_stream_getle16(&qbs);
512: info->birthmonth = byte_stream_getle8(&qbs);
513: info->birthday = byte_stream_getle8(&qbs);
514: info->language1 = byte_stream_getle8(&qbs);
515: info->language2 = byte_stream_getle8(&qbs);
516: info->language3 = byte_stream_getle8(&qbs);
517: /* 0x00 00 01 00 00 01 00 00 00 00 00 */
518: } break;
519:
520: case 0x00d2: { /* work information */
521: info->workcity = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
522: info->workstate = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
523: info->workphone = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
524: info->workfax = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
525: info->workaddr = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
526: info->workzip = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
527: info->workcountry = byte_stream_getle16(&qbs);
528: info->workcompany = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
529: info->workdivision = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
530: info->workposition = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
531: byte_stream_advance(&qbs, 2); /* 0x01 00 */
532: info->workwebpage = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
533: } break;
534:
535: case 0x00e6: { /* additional personal information */
536: info->info = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs)-1);
537: } break;
538:
539: case 0x00eb: { /* email address(es) */
540: int i;
541: info->numaddresses = byte_stream_getle16(&qbs);
542: info->email2 = (char **)g_new0(char *, info->numaddresses);
543: for (i = 0; i < info->numaddresses; i++) {
544: info->email2[i] = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
545: if (i+1 != info->numaddresses)
546: byte_stream_advance(&qbs, 1); /* 0x00 */
547: }
548: } break;
549:
550: case 0x00f0: { /* personal interests */
551: } break;
552:
553: case 0x00fa: { /* past background and current organizations */
554: } break;
555:
556: case 0x0104: { /* alias info */
557: info->nick = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
558: info->first = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
559: info->last = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
560: byte_stream_advance(&qbs, byte_stream_getle16(&qbs)); /* email address? */
561: /* Then 0x00 02 00 */
562: } break;
563:
564: case 0x010e: { /* unknown */
565: /* 0x00 00 */
566: } break;
567:
568: case 0x019a: { /* simple info */
569: byte_stream_advance(&qbs, 2);
570: info->uin = byte_stream_getle32(&qbs);
571: info->nick = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
572: info->first = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
573: info->last = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
574: info->email = byte_stream_getstr(&qbs, byte_stream_getle16(&qbs));
575: /* Then 0x00 02 00 00 00 00 00 */
576: } break;
577:
578: /* status note title and send request for status note text */
579: case 0x0fb4: {
580: GSList *tlvlist;
581: aim_tlv_t *tlv;
582: FlapConnection *conn;
583: char *uin = NULL;
584: char *status_note_title = NULL;
585:
586: conn = flap_connection_findbygroup(od, 0x0004);
587: if (conn == NULL)
588: {
589: purple_debug_misc("oscar", "icq/0x0fb4: flap connection was not found.\n");
590: break;
591: }
592:
593: byte_stream_advance(&qbs, 0x02); /* length */
594: byte_stream_advance(&qbs, 0x2f); /* unknown stuff */
595:
596: tlvlist = aim_tlvlist_read(&qbs);
597:
598: tlv = aim_tlv_gettlv(tlvlist, 0x0032, 1);
599: if (tlv != NULL)
600: /* Get user number */
601: uin = aim_tlv_getvalue_as_string(tlv);
602:
603: tlv = aim_tlv_gettlv(tlvlist, 0x0226, 1);
604: if (tlv != NULL)
605: /* Get status note title */
606: status_note_title = aim_tlv_getvalue_as_string(tlv);
607:
608: aim_tlvlist_free(tlvlist);
609:
610: if (uin == NULL || status_note_title == NULL)
611: {
612: purple_debug_misc("oscar", "icq/0x0fb4: uin or "
613: "status_note_title was not found\n");
614: g_free(uin);
615: g_free(status_note_title);
616: break;
617: }
618:
619: if (status_note_title[0] == '\0')
620: {
621: PurpleAccount *account;
622: PurpleBuddy *buddy;
623: PurplePresence *presence;
624: PurpleStatus *status;
625:
626: account = purple_connection_get_account(od->gc);
627: buddy = purple_find_buddy(account, uin);
628: presence = purple_buddy_get_presence(buddy);
629: status = purple_presence_get_active_status(presence);
630:
631: purple_prpl_got_user_status(account, uin,
632: purple_status_get_id(status),
633: "message", NULL, NULL);
634:
635: g_free(status_note_title);
636: }
637: else
638: {
639: struct aim_icq_info *info;
640: ByteStream bs;
641: guint32 bslen;
642: aim_snacid_t snacid;
643: guchar cookie[8];
644:
645: info = g_new0(struct aim_icq_info, 1);
646:
647: bslen = 13 + strlen(uin) + 30 + 6 + 4 + 55 + 85 + 4;
648: byte_stream_new(&bs, 4 + bslen);
649:
650: snacid = aim_cachesnac(od, 0x0004, 0x0006, 0x0000, NULL, 0);
651:
652: aim_icbm_makecookie(cookie);
653:
654: byte_stream_putraw(&bs, cookie, 8); /* ICBM cookie */
655: byte_stream_put16(&bs, 0x0002); /* message channel */
656: byte_stream_put8(&bs, strlen(uin)); /* uin */
657: byte_stream_putstr(&bs, uin);
658:
659: byte_stream_put16(&bs, 0x0005); /* rendez vous data */
660: byte_stream_put16(&bs, 0x00b2);
661: byte_stream_put16(&bs, 0x0000); /* request */
662: byte_stream_putraw(&bs, cookie, 8); /* ICBM cookie */
663: byte_stream_put32(&bs, 0x09461349); /* ICQ server relaying */
664: byte_stream_put16(&bs, 0x4c7f);
665: byte_stream_put16(&bs, 0x11d1);
666: byte_stream_put32(&bs, 0x82224445);
667: byte_stream_put32(&bs, 0x53540000);
668:
669: byte_stream_put16(&bs, 0x000a); /* unknown TLV */
670: byte_stream_put16(&bs, 0x0002);
671: byte_stream_put16(&bs, 0x0001);
672:
673: byte_stream_put16(&bs, 0x000f); /* unknown TLV */
674: byte_stream_put16(&bs, 0x0000);
675:
676: byte_stream_put16(&bs, 0x2711); /* extended data */
677: byte_stream_put16(&bs, 0x008a);
678: byte_stream_putle16(&bs, 0x001b); /* length */
679: byte_stream_putle16(&bs, 0x0009); /* version */
680: byte_stream_putle32(&bs, 0x00000000); /* plugin: none */
681: byte_stream_putle32(&bs, 0x00000000);
682: byte_stream_putle32(&bs, 0x00000000);
683: byte_stream_putle32(&bs, 0x00000000);
684: byte_stream_putle16(&bs, 0x0000); /* unknown */
685: byte_stream_putle32(&bs, 0x00000000); /* client capabilities flags */
686: byte_stream_put8(&bs, 0x00); /* unknown */
687: byte_stream_putle16(&bs, 0x0064); /* downcounter? */
688: byte_stream_putle16(&bs, 0x000e); /* length */
689: byte_stream_putle16(&bs, 0x0064); /* downcounter? */
690: byte_stream_putle32(&bs, 0x00000000); /* unknown */
691: byte_stream_putle32(&bs, 0x00000000);
692: byte_stream_putle32(&bs, 0x00000000);
693: byte_stream_put8(&bs, 0x1a); /* message type: plugin message descibed by text string */
694: byte_stream_put8(&bs, 0x00); /* message flags */
695: byte_stream_putle16(&bs, 0x0000); /* status code */
696: byte_stream_putle16(&bs, 0x0001); /* priority code */
697: byte_stream_putle16(&bs, 0x0000); /* text length */
698:
699: byte_stream_put8(&bs, 0x3a); /* message dump */
700: byte_stream_put32(&bs, 0x00811a18);
701: byte_stream_put32(&bs, 0xbc0e6c18);
702: byte_stream_put32(&bs, 0x47a5916f);
703: byte_stream_put32(&bs, 0x18dcc76f);
704: byte_stream_put32(&bs, 0x1a010013);
705: byte_stream_put32(&bs, 0x00000041);
706: byte_stream_put32(&bs, 0x77617920);
707: byte_stream_put32(&bs, 0x53746174);
708: byte_stream_put32(&bs, 0x7573204d);
709: byte_stream_put32(&bs, 0x65737361);
710: byte_stream_put32(&bs, 0x67650100);
711: byte_stream_put32(&bs, 0x00000000);
712: byte_stream_put32(&bs, 0x00000000);
713: byte_stream_put32(&bs, 0x00000000);
714: byte_stream_put32(&bs, 0x00000015);
715: byte_stream_put32(&bs, 0x00000000);
716: byte_stream_put32(&bs, 0x0000000d);
717: byte_stream_put32(&bs, 0x00000074);
718: byte_stream_put32(&bs, 0x6578742f);
719: byte_stream_put32(&bs, 0x782d616f);
720: byte_stream_put32(&bs, 0x6c727466);
721:
722: byte_stream_put16(&bs, 0x0003); /* server ACK requested */
723: byte_stream_put16(&bs, 0x0000);
724:
725: info->uin = atoi(uin);
726: info->status_note_title = status_note_title;
727:
728: memcpy(&info->icbm_cookie, cookie, 8);
729:
730: od->icq_info = g_slist_prepend(od->icq_info, info);
731:
732: flap_connection_send_snac_with_priority(od, conn, 0x0004, 0x0006, snacid, &bs, FALSE);
733:
734: byte_stream_destroy(&bs);
735: }
736:
737: g_free(uin);
738:
739: } break;
740:
741: } /* End switch statement */
742:
743: if (!(snac->flags & 0x0001)) {
744: if (subtype != 0x0104)
745: oscar_user_info_display_icq(od, info);
746:
747: if (info->uin && info->nick)
748: gotalias(od, info);
749:
750: aim_icq_freeinfo(info);
751: od->icq_info = g_slist_remove(od->icq_info, info);
752: }
753: }
754:
755: aim_tlvlist_free(tlvlist);
756:
757: return 1;
758: }
759:
760: static int
761: snachandler(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)
762: {
763: if (snac->subtype == 0x0001)
764: return error(od, snac, bs);
765: else if (snac->subtype == 0x0003)
766: return icqresponse(od, snac, bs);
767:
768: return 0;
769: }
770:
771: static void
772: icq_shutdown(OscarData *od, aim_module_t *mod)
773: {
774: GSList *cur;
775: for (cur = od->icq_info; cur; cur = cur->next)
776: aim_icq_freeinfo(cur->data);
777: g_slist_free(od->icq_info);
778: }
779:
780: int
781: icq_modfirst(OscarData *od, aim_module_t *mod)
782: {
783: mod->family = SNAC_FAMILY_ICQ;
784: mod->version = 0x0001;
785: mod->toolid = 0x0110;
786: mod->toolversion = 0x047c;
787: mod->flags = 0;
788: strncpy(mod->name, "icq", sizeof(mod->name));
789: mod->snachandler = snachandler;
790: mod->shutdown = icq_shutdown;
791:
792: return 0;
793: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to family_icq.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Coherent Logic Development] / ChivanetAimPidgin / oscarprpl / src / c