aim_chatnav.c

   1 /*
   2  *
   3  *
   4  *
   5  *
   6  */
   7
   8 #include <faim/aim.h>
   9
  10
  11 /*
  12  * conn must be a chatnav connection!
  13  */
  14 u_long aim_chatnav_reqrights(struct aim_session_t *sess,
  15                           struct aim_conn_t *conn)
  16 {
  17   struct aim_snac_t snac;
  18
  19   snac.id = aim_genericreq_n(sess, conn, 0x000d, 0x0002);
  20
  21   snac.family = 0x000d;
  22   snac.type = 0x0002;
  23   snac.flags = 0x0000;
  24   snac.data = NULL;
  25
  26   aim_newsnac(sess, &snac);
  27
  28   return (sess->snac_nextid); /* already incremented */
  29 }
  30
  31 u_long aim_chatnav_clientready(struct aim_session_t *sess,
  32                                struct aim_conn_t *conn)
  33 {
  34   struct command_tx_struct *newpacket;
  35   int i;
  36
  37   if (!(newpacket = aim_tx_new(AIM_FRAMETYPE_OSCAR, 0x0002, conn, 0x20)))
  38     return -1;
  39
  40   newpacket->lock = 1;
  41
  42   i = aim_putsnac(newpacket->data, 0x0001, 0x0002, 0x0000, sess->snac_nextid);
  43
  44   i+= aimutil_put16(newpacket->data+i, 0x000d);
  45   i+= aimutil_put16(newpacket->data+i, 0x0001);
  46
  47   i+= aimutil_put16(newpacket->data+i, 0x0004);
  48   i+= aimutil_put16(newpacket->data+i, 0x0001);
  49
  50   i+= aimutil_put16(newpacket->data+i, 0x0001);
  51   i+= aimutil_put16(newpacket->data+i, 0x0003);
  52
  53   i+= aimutil_put16(newpacket->data+i, 0x0004);
  54   i+= aimutil_put16(newpacket->data+i, 0x0686);
  55
  56   aim_tx_enqueue(sess, newpacket);
  57
  58   return (sess->snac_nextid++);
  59 }
  60
  61 /*
  62  * Since multiple things can trigger this callback,
  63  * we must lookup the snacid to determine the original
  64  * snac subtype that was called.
  65  */
  66 int aim_chatnav_parse_info(struct aim_session_t *sess, struct command_rx_struct *command)
  67 {
  68   struct aim_snac_t *snac;
  69   u_long snacid;
  70   rxcallback_t userfunc;
  71   int ret=1;
  72
  73   snacid = aimutil_get32(command->data+6);
  74   snac = aim_remsnac(sess, snacid);
  75
  76   if (!snac)
  77     {
  78       printf("faim: chatnav_parse_info: received response to unknown request! (%08lx)\n", snacid);
  79       return 1;
  80     }
  81
  82   if (snac->family != 0x000d)
  83     {
  84       printf("faim: chatnav_parse_info: recieved response that maps to corrupt request! (fam=%04x)\n", snac->family);
  85       return 1;
  86     }
  87
  88   /*
  89    * We now know what the original SNAC subtype was.
  90    */
  91   switch(snac->type)
  92     {
  93     case 0x0002: /* request chat rights */
  94       {
  95           struct aim_tlvlist_t *tlvlist;
  96           struct aim_chat_exchangeinfo *exchanges = NULL;
  97           int curexchange = 0;
  98           struct aim_tlv_t *exchangetlv;
  99           u_char maxrooms = 0;
 100           struct aim_tlvlist_t *innerlist;
 101
 102           tlvlist = aim_readtlvchain(command->data+10, command->commandlen-10);
 103
 104           /*
 105            * Type 0x0002: Maximum concurrent rooms.
 106            */
 107           if (aim_gettlv(tlvlist, 0x0002, 1))
 108             {
 109               struct aim_tlv_t *maxroomstlv;
 110               maxroomstlv = aim_gettlv(tlvlist, 0x0002, 1);
 111               maxrooms = aimutil_get8(maxroomstlv->value);
 112             }
 113
 114           /*
 115            * Type 0x0003: Exchange information
 116            *
 117            * There can be any number of these, each one
 118            * representing another exchange.
 119            *
 120            */
 121           curexchange = 0;
 122           while ((exchangetlv = aim_gettlv(tlvlist, 0x0003, curexchange+1)))
 123             {
 124               curexchange++;
 125               exchanges = realloc(exchanges, curexchange * sizeof(struct aim_chat_exchangeinfo));
 126
 127
 128               /* exchange number */
 129               exchanges[curexchange-1].number = aimutil_get16(exchangetlv->value);
 130               innerlist = aim_readtlvchain(exchangetlv->value+2, exchangetlv->length-2);
 131
 132               /*
 133                * Type 0x000d: Unknown.
 134                */
 135               if (aim_gettlv(innerlist, 0x000d, 1))
 136                 ;
 137
 138               /*
 139                * Type 0x0004: Unknown
 140                */
 141               if (aim_gettlv(innerlist, 0x0004, 1))
 142                 ;
 143
 144               /*
 145                * Type 0x00c9: Unknown
 146                */
 147               if (aim_gettlv(innerlist, 0x00c9, 1))
 148                 ;
 149
 150               /*
 151                * Type 0x00ca: Creation Date
 152                */
 153               if (aim_gettlv(innerlist, 0x00ca, 1))
 154                 ;
 155
 156               /*
 157                * Type 0x00d0: Unknown
 158                */
 159               if (aim_gettlv(innerlist, 0x00d0, 1))
 160                 ;
 161
 162               /*
 163                * Type 0x00d1: Maximum Message length
 164                */
 165               if (aim_gettlv(innerlist, 0x00d1, 1))
 166                 ;
 167
 168               /*
 169                * Type 0x00d2: Unknown
 170                */
 171               if (aim_gettlv(innerlist, 0x00d2, 1))
 172                 ;
 173
 174               /*
 175                * Type 0x00d3: Exchange Name
 176                */
 177               if (aim_gettlv(innerlist, 0x00d3, 1))
 178                 exchanges[curexchange-1].name = aim_gettlv_str(innerlist, 0x00d3, 1);
 179               else
 180                 exchanges[curexchange-1].name = NULL;
 181
 182               /*
 183                * Type 0x00d5: Unknown
 184                */
 185               if (aim_gettlv(innerlist, 0x00d5, 1))
 186                 ;
 187
 188               /*
 189                * Type 0x00d6: Character Set (First Time)
 190                */
 191               if (aim_gettlv(innerlist, 0x00d6, 1))
 192                 exchanges[curexchange-1].charset1 = aim_gettlv_str(innerlist, 0x00d6, 1);
 193               else
 194                 exchanges[curexchange-1].charset1 = NULL;
 195
 196               /*
 197                * Type 0x00d7: Language (First Time)
 198                */
 199               if (aim_gettlv(innerlist, 0x00d7, 1))
 200                 exchanges[curexchange-1].lang1 = aim_gettlv_str(innerlist, 0x00d7, 1);
 201               else
 202                 exchanges[curexchange-1].lang1 = NULL;
 203
 204               /*
 205                * Type 0x00d8: Character Set (Second Time)
 206                */
 207               if (aim_gettlv(innerlist, 0x00d8, 1))
 208                 exchanges[curexchange-1].charset2 = aim_gettlv_str(innerlist, 0x00d8, 1);
 209               else
 210                 exchanges[curexchange-1].charset2 = NULL;
 211
 212               /*
 213                * Type 0x00d9: Language (Second Time)
 214                */
 215               if (aim_gettlv(innerlist, 0x00d9, 1))
 216                 exchanges[curexchange-1].lang2 = aim_gettlv_str(innerlist, 0x00d9, 1);
 217               else
 218                 exchanges[curexchange-1].lang2 = NULL;
 219
 220               aim_freetlvchain(&innerlist);
 221             }
 222
 223           /*
 224            * Call client.
 225            */
 226           userfunc = aim_callhandler(command->conn, 0x000d, 0x0009);
 227           if (userfunc)
 228             ret = userfunc(sess,
 229                            command,
 230                            snac->type,
 231                            maxrooms,
 232                            curexchange,
 233                            exchanges);
 234           curexchange--;
 235           while(curexchange >= 0)
 236             {
 237               if (exchanges[curexchange].name)
 238                 free(exchanges[curexchange].name);
 239               if (exchanges[curexchange].charset1)
 240                 free(exchanges[curexchange].charset1);
 241               if (exchanges[curexchange].lang1)
 242                 free(exchanges[curexchange].lang1);
 243               if (exchanges[curexchange].charset2)
 244                 free(exchanges[curexchange].charset2);
 245               if (exchanges[curexchange].lang2)
 246                 free(exchanges[curexchange].lang2);
 247               curexchange--;
 248             }
 249           free(exchanges);
 250           aim_freetlvchain(&tlvlist);
 251
 252           break;
 253       }
 254     case 0x0003: /* request exchange info */
 255       printf("faim: chatnav_parse_info: resposne to exchange info\n");
 256       break;
 257     case 0x0004: /* request room info */
 258       printf("faim: chatnav_parse_info: response to room info\n");
 259       break;
 260     case 0x0005: /* request more room info */
 261       printf("faim: chatnav_parse_info: response to more room info\n");
 262       break;
 263     case 0x0006: /* request occupant list */
 264       printf("faim: chatnav_parse_info: response to occupant info\n");
 265       break;
 266     case 0x0007: /* search for a room */
 267       printf("faim: chatnav_parse_info: search results\n");
 268       break;
 269     case 0x0008: /* create room */
 270       printf("faim: chatnav_parse_info: response to create room\n");
 271       break;
 272     default: /* unknown */
 273       printf("faim: chatnav_parse_info: unknown request subtype (%04x)\n", snac->type);
 274     }
 275
 276   if (snac && snac->data)
 277     free(snac->data);
 278   if (snac)
 279     free(snac);
 280
 281   return ret;
 282 }
 283
 284 u_long aim_chatnav_createroom(struct aim_session_t *sess,
 285                               struct aim_conn_t *conn,
 286                               char *name,
 287                               u_short exchange)
 288 {
 289   struct command_tx_struct *newpacket;
 290   int i;
 291   struct aim_snac_t snac;
 292
 293   if (!(newpacket = aim_tx_new(AIM_FRAMETYPE_OSCAR, 0x0002, conn, 10+12+strlen("invite")+strlen(name))))
 294     return -1;
 295
 296   newpacket->lock = 1;
 297
 298   i = aim_putsnac(newpacket->data, 0x000d, 0x0008, 0x0000, sess->snac_nextid);
 299
 300   /* exchange */
 301   i+= aimutil_put16(newpacket->data+i, exchange);
 302
 303   /* room cookie */
 304   i+= aimutil_put8(newpacket->data+i, strlen("invite"));
 305   i+= aimutil_putstr(newpacket->data+i, "invite", strlen("invite"));
 306
 307   /* instance */
 308   i+= aimutil_put16(newpacket->data+i, 0xffff);
 309
 310   /* detail level */
 311   i+= aimutil_put8(newpacket->data+i, 0x01);
 312
 313   /* tlvcount */
 314   i+= aimutil_put16(newpacket->data+i, 0x0001);
 315
 316   /* room name */
 317   i+= aim_puttlv_str(newpacket->data+i, 0x00d3, strlen(name), name);
 318
 319   snac.id = sess->snac_nextid;
 320   snac.family = 0x000d;
 321   snac.type = 0x0008;
 322   snac.flags = 0x0000;
 323   snac.data = NULL;
 324
 325   aim_newsnac(sess, &snac);
 326
 327   aim_tx_enqueue(sess, newpacket);
 328
 329   return (sess->snac_nextid++);
 330 }