src/search.c

   1
   2 /*
   3  * aim_search.c
   4  *
   5  * TODO: Add aim_usersearch_name()
   6  *
   7  */
   8
   9 #define FAIM_INTERNAL
  10 #include <aim.h>
  11
  12 faim_export int aim_usersearch_address(aim_session_t *sess, aim_conn_t *conn, const char *address)
  13 {
  14         aim_frame_t *fr;
  15         aim_snacid_t snacid;
  16
  17         if (!sess || !conn || !address)
  18                 return -EINVAL;
  19
  20         if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x02, 10+strlen(address))))
  21                 return -ENOMEM;
  22
  23         snacid = aim_cachesnac(sess, 0x000a, 0x0002, 0x0000, address, strlen(address)+1);
  24
  25         aim_putsnac(&fr->data, 0x000a, 0x0002, 0x0000, snacid);
  26         aimbs_putraw(&fr->data, address, strlen(address)); /* XXX this doesn't seem right at all... */
  27
  28         aim_tx_enqueue(sess, fr);
  29
  30         return 0;
  31 }
  32
  33 /* XXX can this be integrated with the rest of the error handling? */
  34 static int error(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
  35 {
  36         int ret = 0;
  37         aim_rxcallback_t userfunc;
  38         aim_snac_t *snac2;
  39
  40         /* XXX the modules interface should have already retrieved this for us */
  41         if (!(snac2 = aim_remsnac(sess, snac->id))) {
  42                 faimdprintf(sess, 2, "search error: couldn't get a snac for 0x%08lx\n", snac->id);
  43                 return 0;
  44         }
  45
  46         if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
  47                 ret = userfunc(sess, rx, snac2->data /* address */);
  48
  49         /* XXX freesnac()? */
  50         if (snac2)
  51                 free(snac2->data);
  52         free(snac2);
  53
  54         return ret;
  55 }
  56
  57 static int reply(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
  58 {
  59         int j, m, ret = 0;
  60         aim_tlvlist_t *tlvlist;
  61         char *cur = NULL, *buf = NULL;
  62         aim_rxcallback_t userfunc;
  63         aim_snac_t *snac2;
  64
  65         if (!(snac2 = aim_remsnac(sess, snac->id))) {
  66                 faimdprintf(sess, 2, "search reply: couldn't get a snac for 0x%08lx\n", snac->id);
  67                 return 0;
  68         }
  69
  70         tlvlist = aim_readtlvchain(bs);
  71                 return 0;
  72
  73         j = 0;
  74
  75         m = aim_counttlvchain(&tlvlist);
  76
  77         /* XXX uhm. */
  78         while ((cur = aim_gettlv_str(tlvlist, 0x0001, j+1)) && j < m) {
  79                 buf = realloc(buf, (j+1) * (MAXSNLEN+1));
  80
  81                 strncpy(&buf[j * (MAXSNLEN+1)], cur, MAXSNLEN);
  82                 free(cur);
  83
  84                 j++;
  85         }
  86
  87         aim_freetlvchain(&tlvlist);
  88
  89         if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
  90                 ret = userfunc(sess, rx, snac2->data /* address */, j, buf);
  91
  92         /* XXX freesnac()? */
  93         if (snac2)
  94                 free(snac2->data);
  95         free(snac2);
  96
  97         free(buf);
  98
  99         return ret;
 100 }
 101
 102 static int snachandler(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
 103 {
 104
 105         if (snac->subtype == 0x0001)
 106                 return error(sess, mod, rx, snac, bs);
 107         else if (snac->subtype == 0x0003)
 108                 return reply(sess, mod, rx, snac, bs);
 109
 110         return 0;
 111 }
 112
 113 faim_internal int search_modfirst(aim_session_t *sess, aim_module_t *mod)
 114 {
 115
 116         mod->family = 0x000a;
 117         mod->version = 0x0000;
 118         mod->flags = 0;
 119         strncpy(mod->name, "search", sizeof(mod->name));
 120         mod->snachandler = snachandler;
 121
 122         return 0;
 123 }
 124
 125