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