Annotation of ChivanetAimPidgin/oscarprpl/src/c/family_chatnav.c, revision 1.1
1.1 ! snw 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 0x000d - Handle ChatNav.
! 23: *
! 24: * The ChatNav(igation) service does various things to keep chat
! 25: * alive. It provides room information, room searching and creating,
! 26: * as well as giving users the right ("permission") to use chat.
! 27: *
! 28: */
! 29:
! 30: #include "oscar.h"
! 31:
! 32: static int
! 33: error(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)
! 34: {
! 35: int ret = 0;
! 36: aim_snac_t *snac2;
! 37: guint16 error, chatnav_error;
! 38: GSList *tlvlist;
! 39:
! 40: snac2 = aim_remsnac(od, snac->id);
! 41: if (!snac2) {
! 42: purple_debug_warning("oscar", "chatnav error: received response to unknown request (%08x)\n", snac->id);
! 43: return 0;
! 44: }
! 45:
! 46: if (snac2->family != SNAC_FAMILY_CHATNAV) {
! 47: purple_debug_warning("oscar", "chatnav error: received response that maps to corrupt request (fam=%04x)\n", snac2->family);
! 48: g_free(snac2->data);
! 49: g_free(snac2);
! 50: return 0;
! 51: }
! 52:
! 53: /*
! 54: * We now know what the original SNAC subtype was.
! 55: */
! 56: if (snac2->type == 0x0008) /* create room */
! 57: {
! 58: error = byte_stream_get16(bs);
! 59: tlvlist = aim_tlvlist_read(bs);
! 60: chatnav_error = aim_tlv_get16(tlvlist, 0x0008, 1);
! 61:
! 62: purple_debug_warning("oscar",
! 63: "Could not join room, error=0x%04hx, chatnav_error=0x%04hx\n",
! 64: error, chatnav_error);
! 65: purple_notify_error(od->gc, NULL, _("Could not join chat room"),
! 66: chatnav_error == 0x0033 ? _("Invalid chat room name") : _("Unknown error"));
! 67:
! 68: ret = 1;
! 69: }
! 70:
! 71: g_free(snac2->data);
! 72: g_free(snac2);
! 73:
! 74: return ret;
! 75: }
! 76:
! 77: /*
! 78: * Subtype 0x0002
! 79: *
! 80: * conn must be a chatnav connection!
! 81: *
! 82: */
! 83: void aim_chatnav_reqrights(OscarData *od, FlapConnection *conn)
! 84: {
! 85: aim_genericreq_n_snacid(od, conn, SNAC_FAMILY_CHATNAV, 0x0002);
! 86: }
! 87:
! 88: /*
! 89: * Subtype 0x0008
! 90: */
! 91: int aim_chatnav_createroom(OscarData *od, FlapConnection *conn, const char *name, guint16 exchange)
! 92: {
! 93: static const char ck[] = {"create"};
! 94: static const char lang[] = {"en"};
! 95: static const char charset[] = {"us-ascii"};
! 96: ByteStream bs;
! 97: aim_snacid_t snacid;
! 98: GSList *tlvlist = NULL;
! 99:
! 100: byte_stream_new(&bs, 1142);
! 101:
! 102: snacid = aim_cachesnac(od, SNAC_FAMILY_CHATNAV, 0x0008, 0x0000, NULL, 0);
! 103:
! 104: /* exchange */
! 105: byte_stream_put16(&bs, exchange);
! 106:
! 107: /*
! 108: * This looks to be a big hack. You'll note that this entire
! 109: * SNAC is just a room info structure, but the hard room name,
! 110: * here, is set to "create".
! 111: *
! 112: * Either this goes on the "list of questions concerning
! 113: * why-the-hell-did-you-do-that", or this value is completely
! 114: * ignored. Without experimental evidence, but a good knowledge of
! 115: * AOL style, I'm going to guess that it is the latter, and that
! 116: * the value of the room name in create requests is ignored.
! 117: */
! 118: byte_stream_put8(&bs, strlen(ck));
! 119: byte_stream_putstr(&bs, ck);
! 120:
! 121: /*
! 122: * instance
! 123: *
! 124: * Setting this to 0xffff apparently assigns the last instance.
! 125: *
! 126: */
! 127: byte_stream_put16(&bs, 0xffff);
! 128:
! 129: /* detail level */
! 130: byte_stream_put8(&bs, 0x01);
! 131:
! 132: aim_tlvlist_add_str(&tlvlist, 0x00d3, name);
! 133: aim_tlvlist_add_str(&tlvlist, 0x00d6, charset);
! 134: aim_tlvlist_add_str(&tlvlist, 0x00d7, lang);
! 135:
! 136: /* tlvcount */
! 137: byte_stream_put16(&bs, aim_tlvlist_count(tlvlist));
! 138: aim_tlvlist_write(&bs, &tlvlist);
! 139:
! 140: aim_tlvlist_free(tlvlist);
! 141:
! 142: flap_connection_send_snac(od, conn, SNAC_FAMILY_CHATNAV, 0x0008, snacid, &bs);
! 143:
! 144: byte_stream_destroy(&bs);
! 145:
! 146: return 0;
! 147: }
! 148:
! 149: static int
! 150: parseinfo_perms(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs, aim_snac_t *snac2)
! 151: {
! 152: aim_rxcallback_t userfunc;
! 153: int ret = 0;
! 154: struct aim_chat_exchangeinfo *exchanges = NULL;
! 155: int curexchange;
! 156: aim_tlv_t *exchangetlv;
! 157: guint8 maxrooms = 0;
! 158: GSList *tlvlist, *innerlist;
! 159:
! 160: tlvlist = aim_tlvlist_read(bs);
! 161:
! 162: /*
! 163: * Type 0x0002: Maximum concurrent rooms.
! 164: */
! 165: if (aim_tlv_gettlv(tlvlist, 0x0002, 1))
! 166: maxrooms = aim_tlv_get8(tlvlist, 0x0002, 1);
! 167:
! 168: /*
! 169: * Type 0x0003: Exchange information
! 170: *
! 171: * There can be any number of these, each one
! 172: * representing another exchange.
! 173: *
! 174: */
! 175: for (curexchange = 0; ((exchangetlv = aim_tlv_gettlv(tlvlist, 0x0003, curexchange+1))); ) {
! 176: ByteStream tbs;
! 177:
! 178: byte_stream_init(&tbs, exchangetlv->value, exchangetlv->length);
! 179:
! 180: curexchange++;
! 181:
! 182: exchanges = g_realloc(exchanges, curexchange * sizeof(struct aim_chat_exchangeinfo));
! 183:
! 184: /* exchange number */
! 185: exchanges[curexchange-1].number = byte_stream_get16(&tbs);
! 186: innerlist = aim_tlvlist_read(&tbs);
! 187:
! 188: /*
! 189: * Type 0x0002: Unknown
! 190: */
! 191: if (aim_tlv_gettlv(innerlist, 0x0002, 1)) {
! 192: guint16 classperms;
! 193:
! 194: classperms = aim_tlv_get16(innerlist, 0x0002, 1);
! 195:
! 196: purple_debug_misc("oscar", "faim: class permissions %x\n", classperms);
! 197: }
! 198:
! 199: /*
! 200: * Type 0x00c9: Flags
! 201: *
! 202: * 1 Evilable
! 203: * 2 Nav Only
! 204: * 4 Instancing Allowed
! 205: * 8 Occupant Peek Allowed
! 206: *
! 207: */
! 208: if (aim_tlv_gettlv(innerlist, 0x00c9, 1))
! 209: exchanges[curexchange-1].flags = aim_tlv_get16(innerlist, 0x00c9, 1);
! 210:
! 211: /*
! 212: * Type 0x00d3: Exchange Description
! 213: */
! 214: if (aim_tlv_gettlv(innerlist, 0x00d3, 1))
! 215: exchanges[curexchange-1].name = aim_tlv_getstr(innerlist, 0x00d3, 1);
! 216: else
! 217: exchanges[curexchange-1].name = NULL;
! 218:
! 219: /*
! 220: * Type 0x00d5: Creation Permissions
! 221: *
! 222: * 0 Creation not allowed
! 223: * 1 Room creation allowed
! 224: * 2 Exchange creation allowed
! 225: *
! 226: */
! 227: if (aim_tlv_gettlv(innerlist, 0x00d5, 1))
! 228: aim_tlv_get8(innerlist, 0x00d5, 1); /* createperms */
! 229:
! 230: /*
! 231: * Type 0x00d6: Character Set (First Time)
! 232: */
! 233: if (aim_tlv_gettlv(innerlist, 0x00d6, 1))
! 234: exchanges[curexchange-1].charset1 = aim_tlv_getstr(innerlist, 0x00d6, 1);
! 235: else
! 236: exchanges[curexchange-1].charset1 = NULL;
! 237:
! 238: /*
! 239: * Type 0x00d7: Language (First Time)
! 240: */
! 241: if (aim_tlv_gettlv(innerlist, 0x00d7, 1))
! 242: exchanges[curexchange-1].lang1 = aim_tlv_getstr(innerlist, 0x00d7, 1);
! 243: else
! 244: exchanges[curexchange-1].lang1 = NULL;
! 245:
! 246: /*
! 247: * Type 0x00d8: Character Set (Second Time)
! 248: */
! 249: if (aim_tlv_gettlv(innerlist, 0x00d8, 1))
! 250: exchanges[curexchange-1].charset2 = aim_tlv_getstr(innerlist, 0x00d8, 1);
! 251: else
! 252: exchanges[curexchange-1].charset2 = NULL;
! 253:
! 254: /*
! 255: * Type 0x00d9: Language (Second Time)
! 256: */
! 257: if (aim_tlv_gettlv(innerlist, 0x00d9, 1))
! 258: exchanges[curexchange-1].lang2 = aim_tlv_getstr(innerlist, 0x00d9, 1);
! 259: else
! 260: exchanges[curexchange-1].lang2 = NULL;
! 261:
! 262: aim_tlvlist_free(innerlist);
! 263: }
! 264:
! 265: /*
! 266: * Call client.
! 267: */
! 268: if ((userfunc = aim_callhandler(od, snac->family, snac->subtype)))
! 269: ret = userfunc(od, conn, frame, snac2->type, maxrooms, curexchange, exchanges);
! 270:
! 271: for (curexchange--; curexchange >= 0; curexchange--) {
! 272: g_free(exchanges[curexchange].name);
! 273: g_free(exchanges[curexchange].charset1);
! 274: g_free(exchanges[curexchange].lang1);
! 275: g_free(exchanges[curexchange].charset2);
! 276: g_free(exchanges[curexchange].lang2);
! 277: }
! 278: g_free(exchanges);
! 279: aim_tlvlist_free(tlvlist);
! 280:
! 281: return ret;
! 282: }
! 283:
! 284: static int
! 285: parseinfo_create(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs, aim_snac_t *snac2)
! 286: {
! 287: aim_rxcallback_t userfunc;
! 288: GSList *tlvlist, *innerlist;
! 289: char *ck = NULL, *fqcn = NULL, *name = NULL;
! 290: guint16 exchange = 0, instance = 0, unknown = 0, flags = 0, maxmsglen = 0, maxoccupancy = 0;
! 291: guint32 createtime = 0;
! 292: guint8 createperms = 0, detaillevel;
! 293: int cklen;
! 294: aim_tlv_t *bigblock;
! 295: int ret = 0;
! 296: ByteStream bbbs;
! 297:
! 298: tlvlist = aim_tlvlist_read(bs);
! 299:
! 300: if (!(bigblock = aim_tlv_gettlv(tlvlist, 0x0004, 1))) {
! 301: purple_debug_misc("oscar", "no bigblock in top tlv in create room response\n");
! 302: aim_tlvlist_free(tlvlist);
! 303: return 0;
! 304: }
! 305:
! 306: byte_stream_init(&bbbs, bigblock->value, bigblock->length);
! 307:
! 308: exchange = byte_stream_get16(&bbbs);
! 309: cklen = byte_stream_get8(&bbbs);
! 310: ck = byte_stream_getstr(&bbbs, cklen);
! 311: instance = byte_stream_get16(&bbbs);
! 312: detaillevel = byte_stream_get8(&bbbs);
! 313:
! 314: if (detaillevel != 0x02) {
! 315: purple_debug_misc("oscar", "unknown detaillevel in create room response (0x%02x)\n", detaillevel);
! 316: aim_tlvlist_free(tlvlist);
! 317: g_free(ck);
! 318: return 0;
! 319: }
! 320:
! 321: unknown = byte_stream_get16(&bbbs);
! 322:
! 323: innerlist = aim_tlvlist_read(&bbbs);
! 324:
! 325: if (aim_tlv_gettlv(innerlist, 0x006a, 1))
! 326: fqcn = aim_tlv_getstr(innerlist, 0x006a, 1);
! 327:
! 328: if (aim_tlv_gettlv(innerlist, 0x00c9, 1))
! 329: flags = aim_tlv_get16(innerlist, 0x00c9, 1);
! 330:
! 331: if (aim_tlv_gettlv(innerlist, 0x00ca, 1))
! 332: createtime = aim_tlv_get32(innerlist, 0x00ca, 1);
! 333:
! 334: if (aim_tlv_gettlv(innerlist, 0x00d1, 1))
! 335: maxmsglen = aim_tlv_get16(innerlist, 0x00d1, 1);
! 336:
! 337: if (aim_tlv_gettlv(innerlist, 0x00d2, 1))
! 338: maxoccupancy = aim_tlv_get16(innerlist, 0x00d2, 1);
! 339:
! 340: if (aim_tlv_gettlv(innerlist, 0x00d3, 1))
! 341: name = aim_tlv_getstr(innerlist, 0x00d3, 1);
! 342:
! 343: if (aim_tlv_gettlv(innerlist, 0x00d5, 1))
! 344: createperms = aim_tlv_get8(innerlist, 0x00d5, 1);
! 345:
! 346: if ((userfunc = aim_callhandler(od, snac->family, snac->subtype))) {
! 347: ret = userfunc(od, conn, frame, snac2->type, fqcn, instance, exchange, flags, createtime, maxmsglen, maxoccupancy, createperms, unknown, name, ck);
! 348: }
! 349:
! 350: g_free(ck);
! 351: g_free(name);
! 352: g_free(fqcn);
! 353: aim_tlvlist_free(innerlist);
! 354: aim_tlvlist_free(tlvlist);
! 355:
! 356: return ret;
! 357: }
! 358:
! 359: /*
! 360: * Subtype 0x0009
! 361: *
! 362: * Since multiple things can trigger this callback, we must lookup the
! 363: * snacid to determine the original snac subtype that was called.
! 364: *
! 365: * XXX This isn't really how this works. But this is: Every d/9 response
! 366: * has a 16bit value at the beginning. That matches to:
! 367: * Short Desc = 1
! 368: * Full Desc = 2
! 369: * Instance Info = 4
! 370: * Nav Short Desc = 8
! 371: * Nav Instance Info = 16
! 372: * And then everything is really asynchronous. There is no specific
! 373: * attachment of a response to a create room request, for example. Creating
! 374: * the room yields no different a response than requesting the room's info.
! 375: *
! 376: */
! 377: static int
! 378: parseinfo(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)
! 379: {
! 380: aim_snac_t *snac2;
! 381: int ret = 0;
! 382:
! 383: if (!(snac2 = aim_remsnac(od, snac->id))) {
! 384: purple_debug_misc("oscar", "faim: chatnav_parse_info: received response to unknown request! (%08x)\n", snac->id);
! 385: return 0;
! 386: }
! 387:
! 388: if (snac2->family != SNAC_FAMILY_CHATNAV) {
! 389: purple_debug_misc("oscar", "faim: chatnav_parse_info: received response that maps to corrupt request! (fam=%04x)\n", snac2->family);
! 390: g_free(snac2->data);
! 391: g_free(snac2);
! 392: return 0;
! 393: }
! 394:
! 395: /*
! 396: * We now know what the original SNAC subtype was.
! 397: */
! 398: if (snac2->type == 0x0002) /* request chat rights */
! 399: ret = parseinfo_perms(od, conn, mod, frame, snac, bs, snac2);
! 400: else if (snac2->type == 0x0003) /* request exchange info */
! 401: purple_debug_misc("oscar", "chatnav_parse_info: response to exchange info\n");
! 402: else if (snac2->type == 0x0004) /* request room info */
! 403: purple_debug_misc("oscar", "chatnav_parse_info: response to room info\n");
! 404: else if (snac2->type == 0x0005) /* request more room info */
! 405: purple_debug_misc("oscar", "chatnav_parse_info: response to more room info\n");
! 406: else if (snac2->type == 0x0006) /* request occupant list */
! 407: purple_debug_misc("oscar", "chatnav_parse_info: response to occupant info\n");
! 408: else if (snac2->type == 0x0007) /* search for a room */
! 409: purple_debug_misc("oscar", "chatnav_parse_info: search results\n");
! 410: else if (snac2->type == 0x0008) /* create room */
! 411: ret = parseinfo_create(od, conn, mod, frame, snac, bs, snac2);
! 412: else
! 413: purple_debug_misc("oscar", "chatnav_parse_info: unknown request subtype (%04x)\n", snac2->type);
! 414:
! 415: if (snac2)
! 416: g_free(snac2->data);
! 417: g_free(snac2);
! 418:
! 419: return ret;
! 420: }
! 421:
! 422: static int
! 423: snachandler(OscarData *od, FlapConnection *conn, aim_module_t *mod, FlapFrame *frame, aim_modsnac_t *snac, ByteStream *bs)
! 424: {
! 425: if (snac->subtype == 0x0001)
! 426: return error(od, conn, mod, frame, snac, bs);
! 427: else if (snac->subtype == 0x0009)
! 428: return parseinfo(od, conn, mod, frame, snac, bs);
! 429:
! 430: return 0;
! 431: }
! 432:
! 433: int
! 434: chatnav_modfirst(OscarData *od, aim_module_t *mod)
! 435: {
! 436: mod->family = SNAC_FAMILY_CHATNAV;
! 437: mod->version = 0x0001;
! 438: mod->toolid = 0x0010;
! 439: mod->toolversion = 0x0629;
! 440: mod->flags = 0;
! 441: strncpy(mod->name, "chatnav", sizeof(mod->name));
! 442: mod->snachandler = snachandler;
! 443:
! 444: return 0;
! 445: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to family_chatnav.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