5 /* called for both reply and change-reply */
6 static int infochange(struct aim_session_t *sess, aim_module_t *mod, struct command_rx_struct *rx, aim_modsnac_t *snac, unsigned char *data, int datalen)
12 * unsigned short perms;
13 * unsigned short tlvcount;
14 * aim_tlv_t tlvs[tlvcount];
17 for (i = 0; i < datalen; ) {
20 perms = aimutil_get16(data+i);
23 tlvcount = aimutil_get16(data+i);
27 rxcallback_t userfunc;
28 struct aim_tlv_t *tlv;
31 if ((aimutil_get16(data+i) == 0x0011) ||
32 (aimutil_get16(data+i) == 0x0004))
36 tlv = aim_grabtlvstr(data+i);
38 tlv = aim_grabtlv(data+i);
40 /* XXX fix so its only called once for the entire packet */
41 if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
42 userfunc(sess, rx, perms, tlv->type, tlv->length, tlv->value, str);
47 if (tlv && tlv->value)
59 static int accountconfirm(struct aim_session_t *sess, aim_module_t *mod, struct command_rx_struct *rx, aim_modsnac_t *snac, unsigned char *data, int datalen)
61 rxcallback_t userfunc;
64 status = aimutil_get16(data);
66 if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
67 return userfunc(sess, rx, status);
72 static int snachandler(struct aim_session_t *sess, aim_module_t *mod, struct command_rx_struct *rx, aim_modsnac_t *snac, unsigned char *data, int datalen)
75 faimdprintf(sess, 0, "%s: snachandler: got %x/%x\n", mod->name, snac->family, snac->subtype);
77 if (snac->family != mod->family)
80 if (snac->subtype == 0x0001)
82 else if ((snac->subtype == 0x0003) || (snac->subtype == 0x0005))
83 return infochange(sess, mod, rx, snac, data, datalen);
84 else if (snac->subtype == 0x0007)
85 return accountconfirm(sess, mod, rx, snac, data, datalen);
90 faim_internal int admin_modfirst(struct aim_session_t *sess, aim_module_t *mod)
94 mod->version = 0x0000;
96 strncpy(mod->name, "admin", sizeof(mod->name));
97 mod->snachandler = snachandler;
102 faim_export unsigned long aim_auth_clientready(struct aim_session_t *sess,
103 struct aim_conn_t *conn)
105 struct aim_tool_version tools[] = {
106 {0x0001, 0x0003, AIM_TOOL_NEWWIN, 0x0361},
107 {0x0007, 0x0001, AIM_TOOL_NEWWIN, 0x0361},
110 struct command_tx_struct *newpacket;
111 int toolcount = sizeof(tools)/sizeof(struct aim_tool_version);
113 if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 1152)))
118 i = aim_putsnac(newpacket->data, 0x0001, 0x0002, 0x0000, sess->snac_nextid);
119 aim_cachesnac(sess, 0x0001, 0x0002, 0x0000, NULL, 0);
121 for (j = 0; j < toolcount; j++) {
122 i += aimutil_put16(newpacket->data+i, tools[j].group);
123 i += aimutil_put16(newpacket->data+i, tools[j].version);
124 i += aimutil_put16(newpacket->data+i, tools[j].tool);
125 i += aimutil_put16(newpacket->data+i, tools[j].toolversion);
128 newpacket->commandlen = i;
131 aim_tx_enqueue(sess, newpacket);
133 return sess->snac_nextid;
136 faim_export unsigned long aim_auth_changepasswd(struct aim_session_t *sess,
137 struct aim_conn_t *conn,
138 char *new, char *current)
140 struct command_tx_struct *newpacket;
143 if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+4+strlen(current)+4+strlen(new))))
148 i = aim_putsnac(newpacket->data, 0x0007, 0x0004, 0x0000, sess->snac_nextid);
149 aim_cachesnac(sess, 0x0007, 0x0004, 0x0000, NULL, 0);
151 /* new password TLV t(0002) */
152 i += aim_puttlv_str(newpacket->data+i, 0x0002, strlen(new), new);
154 /* current password TLV t(0012) */
155 i += aim_puttlv_str(newpacket->data+i, 0x0012, strlen(current), current);
157 aim_tx_enqueue(sess, newpacket);
159 return sess->snac_nextid;
162 faim_export unsigned long aim_auth_setversions(struct aim_session_t *sess,
163 struct aim_conn_t *conn)
165 struct command_tx_struct *newpacket;
168 if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10 + (4*2))))
173 i = aim_putsnac(newpacket->data, 0x0001, 0x0017, 0x0000, sess->snac_nextid);
174 aim_cachesnac(sess, 0x0001, 0x0017, 0x0000, NULL, 0);
176 i += aimutil_put16(newpacket->data+i, 0x0001);
177 i += aimutil_put16(newpacket->data+i, 0x0003);
179 i += aimutil_put16(newpacket->data+i, 0x0007);
180 i += aimutil_put16(newpacket->data+i, 0x0001);
182 newpacket->commandlen = i;
184 aim_tx_enqueue(sess, newpacket);
186 return sess->snac_nextid;
190 * Request account confirmation.
192 * This will cause an email to be sent to the address associated with
193 * the account. By following the instructions in the mail, you can
194 * get the TRIAL flag removed from your account.
197 faim_export unsigned long aim_auth_reqconfirm(struct aim_session_t *sess,
198 struct aim_conn_t *conn)
200 return aim_genericreq_n(sess, conn, 0x0007, 0x0006);
204 * Request a bit of account info.
206 * The only known valid tag is 0x0011 (email address).
209 faim_export unsigned long aim_auth_getinfo(struct aim_session_t *sess,
210 struct aim_conn_t *conn,
213 struct command_tx_struct *newpacket;
216 if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10 + 4)))
221 i = aim_putsnac(newpacket->data, 0x0007, 0x0002, 0x0000, sess->snac_nextid);
222 aim_cachesnac(sess, 0x0002, 0x0002, 0x0000, NULL, 0);
224 i += aimutil_put16(newpacket->data+i, info);
225 i += aimutil_put16(newpacket->data+i, 0x0000);
227 newpacket->commandlen = i;
229 aim_tx_enqueue(sess, newpacket);
231 return sess->snac_nextid;
234 faim_export unsigned long aim_auth_setemail(struct aim_session_t *sess,
235 struct aim_conn_t *conn,
238 struct command_tx_struct *newpacket;
241 if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+2+2+strlen(newemail))))
246 i = aim_putsnac(newpacket->data, 0x0007, 0x0004, 0x0000, sess->snac_nextid);
247 aim_cachesnac(sess, 0x0007, 0x0004, 0x0000, NULL, 0);
249 i += aim_puttlv_str(newpacket->data+i, 0x0011, strlen(newemail), newemail);
251 aim_tx_enqueue(sess, newpacket);
253 return sess->snac_nextid;