pidgin3: comparison libfaim/auth.c

-:f33239360f10
+:f1e75c7ad28c
 memcpy(newpacket->data+curbyte, chipsahoy, AIM_COOKIELEN);
 return aim_tx_enqueue(sess, newpacket);
 }
-faim_export unsigned long aim_auth_clientready(struct aim_session_t *sess,
+/*
-					       struct aim_conn_t *conn)
+* This is sent back as a general response to the login command.
-{
+* It can be either an error or a success, depending on the
-struct aim_tool_version tools[] = {
+* precense of certain TLVs.
-{0x0001, 0x0003,    AIM_TOOL_NEWWIN, 0x0361},
+*
-{0x0007, 0x0001,    AIM_TOOL_NEWWIN, 0x0361},
+* The client should check the value passed as errorcode. If
-};
+* its nonzero, there was an error.
-int i,j;
+*
-struct command_tx_struct *newpacket;
+*/
-int toolcount = sizeof(tools)/sizeof(struct aim_tool_version);
+static int parse(struct aim_session_t *sess, aim_module_t *mod, struct command_rx_struct *rx, aim_modsnac_t *snac, unsigned char *data, int datalen)
+{
-if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 1152)))
+struct aim_tlvlist_t *tlvlist;
-return -1;
+int ret = 0;
+rxcallback_t userfunc;
-newpacket->lock = 1;
+char *sn = NULL, *bosip = NULL, *errurl = NULL, *email = NULL;
+unsigned char *cookie = NULL;
-i = aim_putsnac(newpacket->data, 0x0001, 0x0002, 0x0000, sess->snac_nextid);
+int errorcode = 0, regstatus = 0;
-aim_cachesnac(sess, 0x0001, 0x0002, 0x0000, NULL, 0);
+int latestbuild = 0, latestbetabuild = 0;
+char *latestrelease = NULL, *latestbeta = NULL;
-for (j = 0; j < toolcount; j++) {
+char *latestreleaseurl = NULL, *latestbetaurl = NULL;
-i += aimutil_put16(newpacket->data+i, tools[j].group);
+char *latestreleaseinfo = NULL, *latestbetainfo = NULL;
-i += aimutil_put16(newpacket->data+i, tools[j].version);
-i += aimutil_put16(newpacket->data+i, tools[j].tool);
+/*
-i += aimutil_put16(newpacket->data+i, tools[j].toolversion);
+* Read block of TLVs.  All further data is derived
+* from what is parsed here.
+*
+*/
+tlvlist = aim_readtlvchain(data, datalen);
+/*
+* No matter what, we should have a screen name.
+*/
+memset(sess->sn, 0, sizeof(sess->sn));
+if (aim_gettlv(tlvlist, 0x0001, 1)) {
+sn = aim_gettlv_str(tlvlist, 0x0001, 1);
+strncpy(sess->sn, sn, sizeof(sess->sn));
 }
-newpacket->commandlen = i;
+/*
-newpacket->lock = 0;
+* Check for an error code.  If so, we should also
+* have an error url.
-aim_tx_enqueue(sess, newpacket);
+*/
+if (aim_gettlv(tlvlist, 0x0008, 1))
-return sess->snac_nextid;
+errorcode = aim_gettlv16(tlvlist, 0x0008, 1);
-}
+if (aim_gettlv(tlvlist, 0x0004, 1))
+errurl = aim_gettlv_str(tlvlist, 0x0004, 1);
-faim_export unsigned long aim_auth_changepasswd(struct aim_session_t *sess,
-						struct aim_conn_t *conn,
+/*
-						char *new, char *current)
+* BOS server address.
-{
+*/
-struct command_tx_struct *newpacket;
+if (aim_gettlv(tlvlist, 0x0005, 1))
-int i;
+bosip = aim_gettlv_str(tlvlist, 0x0005, 1);
-if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+4+strlen(current)+4+strlen(new))))
+/*
-return -1;
+* Authorization cookie.
+*/
-newpacket->lock = 1;
+if (aim_gettlv(tlvlist, 0x0006, 1)) {
+struct aim_tlv_t *tmptlv;
-i = aim_putsnac(newpacket->data, 0x0007, 0x0004, 0x0000, sess->snac_nextid);
-aim_cachesnac(sess, 0x0007, 0x0004, 0x0000, NULL, 0);
+tmptlv = aim_gettlv(tlvlist, 0x0006, 1);
-/* new password TLV t(0002) */
+if ((cookie = malloc(tmptlv->length)))
-i += aim_puttlv_str(newpacket->data+i, 0x0002, strlen(new), new);
+memcpy(cookie, tmptlv->value, tmptlv->length);
+}
-/* current password TLV t(0012) */
-i += aim_puttlv_str(newpacket->data+i, 0x0012, strlen(current), current);
+/*
+* The email address attached to this account
-aim_tx_enqueue(sess, newpacket);
+*   Not available for ICQ logins.
+*/
-return sess->snac_nextid;
+if (aim_gettlv(tlvlist, 0x0011, 1))
-}
+email = aim_gettlv_str(tlvlist, 0x0011, 1);
-faim_export unsigned long aim_auth_setversions(struct aim_session_t *sess,
+/*
-					       struct aim_conn_t *conn)
+* The registration status.  (Not real sure what it means.)
-{
+*   Not available for ICQ logins.
-struct command_tx_struct *newpacket;
+*
-int i;
+*   1 = No disclosure
+*   2 = Limited disclosure
-if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10 + (4*2))))
+*   3 = Full disclosure
-return -1;
+*
+* This has to do with whether your email address is available
-newpacket->lock = 1;
+* to other users or not.  AFAIK, this feature is no longer used.
+*
-i = aim_putsnac(newpacket->data, 0x0001, 0x0017, 0x0000, sess->snac_nextid);
+*/
-aim_cachesnac(sess, 0x0001, 0x0017, 0x0000, NULL, 0);
+if (aim_gettlv(tlvlist, 0x0013, 1))
+regstatus = aim_gettlv16(tlvlist, 0x0013, 1);
-i += aimutil_put16(newpacket->data+i, 0x0001);
-i += aimutil_put16(newpacket->data+i, 0x0003);
+if (aim_gettlv(tlvlist, 0x0040, 1))
+latestbetabuild = aim_gettlv32(tlvlist, 0x0040, 1);
-i += aimutil_put16(newpacket->data+i, 0x0007);
+if (aim_gettlv(tlvlist, 0x0041, 1))
-i += aimutil_put16(newpacket->data+i, 0x0001);
+latestbetaurl = aim_gettlv_str(tlvlist, 0x0041, 1);
+if (aim_gettlv(tlvlist, 0x0042, 1))
-newpacket->commandlen = i;
+latestbetainfo = aim_gettlv_str(tlvlist, 0x0042, 1);
-newpacket->lock = 0;
+if (aim_gettlv(tlvlist, 0x0043, 1))
-aim_tx_enqueue(sess, newpacket);
+latestbeta = aim_gettlv_str(tlvlist, 0x0043, 1);
+if (aim_gettlv(tlvlist, 0x0048, 1))
-return sess->snac_nextid;
+; /* no idea what this is */
+if (aim_gettlv(tlvlist, 0x0044, 1))
+latestbuild = aim_gettlv32(tlvlist, 0x0044, 1);
+if (aim_gettlv(tlvlist, 0x0045, 1))
+latestreleaseurl = aim_gettlv_str(tlvlist, 0x0045, 1);
+if (aim_gettlv(tlvlist, 0x0046, 1))
+latestreleaseinfo = aim_gettlv_str(tlvlist, 0x0046, 1);
+if (aim_gettlv(tlvlist, 0x0047, 1))
+latestrelease = aim_gettlv_str(tlvlist, 0x0047, 1);
+if (aim_gettlv(tlvlist, 0x0049, 1))
+; /* no idea what this is */
+if ((userfunc = aim_callhandler(sess, rx->conn, snac?snac->family:0x0017, snac?snac->subtype:0x0003)))
+ret = userfunc(sess, rx, sn, errorcode, errurl, regstatus, email, bosip, cookie, latestrelease, latestbuild, latestreleaseurl, latestreleaseinfo, latestbeta, latestbetabuild, latestbetaurl, latestbetainfo);
+if (sn)
+free(sn);
+if (bosip)
+free(bosip);
+if (errurl)
+free(errurl);
+if (email)
+free(email);
+if (cookie)
+free(cookie);
+if (latestrelease)
+free(latestrelease);
+if (latestreleaseurl)
+free(latestreleaseurl);
+if (latestbeta)
+free(latestbeta);
+if (latestbetaurl)
+free(latestbetaurl);
+if (latestreleaseinfo)
+free(latestreleaseinfo);
+if (latestbetainfo)
+free(latestbetainfo);
+aim_freetlvchain(&tlvlist);
+return ret;
 }
 /*
-* Request account confirmation.
+* Middle handler for 0017/0007 SNACs.  Contains the auth key prefixed
-*
+* by only its length in a two byte word.
-* This will cause an email to be sent to the address associated with
+*
-* the account.  By following the instructions in the mail, you can
+* Calls the client, which should then use the value to call aim_send_login.
-* get the TRIAL flag removed from your account.
 *
 */
-faim_export unsigned long aim_auth_reqconfirm(struct aim_session_t *sess,
+static int keyparse(struct aim_session_t *sess, aim_module_t *mod, struct command_rx_struct *rx, aim_modsnac_t *snac, unsigned char *data, int datalen)
-					      struct aim_conn_t *conn)
+{
-{
+unsigned char *key;
-return aim_genericreq_n(sess, conn, 0x0007, 0x0006);
+int keylen;
-}
+int ret = 1;
+rxcallback_t userfunc;
-/*
-* Request a bit of account info.
+keylen = aimutil_get16(data);
-*
+if (!(key = malloc(keylen+1)))
-* The only known valid tag is 0x0011 (email address).
+return ret;
-*
+memcpy(key, data+2, keylen);
-*/
+key[keylen] = '\0';
-faim_export unsigned long aim_auth_getinfo(struct aim_session_t *sess,
-					   struct aim_conn_t *conn,
+if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
-					   unsigned short info)
+ret = userfunc(sess, rx, (char *)key);
-{
-struct command_tx_struct *newpacket;
+free(key);
-int i;
+return ret;
-if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10 + 4)))
+}
-return -1;
+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)
-newpacket->lock = 1;
+{
-i = aim_putsnac(newpacket->data, 0x0007, 0x0002, 0x0000, sess->snac_nextid);
+if (snac->subtype == 0x0003)
-aim_cachesnac(sess, 0x0002, 0x0002, 0x0000, NULL, 0);
+return parse(sess, mod, rx, snac, data, datalen);
+else if (snac->subtype == 0x0007)
-i += aimutil_put16(newpacket->data+i, info);
+return keyparse(sess, mod, rx, snac, data, datalen);
-i += aimutil_put16(newpacket->data+i, 0x0000);
+return 0;
-newpacket->commandlen = i;
+}
-newpacket->lock = 0;
-aim_tx_enqueue(sess, newpacket);
+faim_internal int auth_modfirst(struct aim_session_t *sess, aim_module_t *mod)
+{
-return sess->snac_nextid;
-}
+mod->family = 0x0017;
+mod->version = 0x0000;
-faim_export unsigned long aim_auth_setemail(struct aim_session_t *sess,
+mod->flags = 0;
-					    struct aim_conn_t *conn,
+strncpy(mod->name, "auth", sizeof(mod->name));
-					    char *newemail)
+mod->snachandler = snachandler;
-{
-struct command_tx_struct *newpacket;
+return 0;
-int i;
+}
-if (!(newpacket = aim_tx_new(sess, conn, AIM_FRAMETYPE_OSCAR, 0x0002, 10+2+2+strlen(newemail))))
-return -1;
-newpacket->lock = 1;
-i = aim_putsnac(newpacket->data, 0x0007, 0x0004, 0x0000, sess->snac_nextid);
-aim_cachesnac(sess, 0x0007, 0x0004, 0x0000, NULL, 0);
-i += aim_puttlv_str(newpacket->data+i, 0x0011, strlen(newemail), newemail);
-aim_tx_enqueue(sess, newpacket);
-return sess->snac_nextid;
-}

Mercurial > pidgin3 / file comparison

comparison: libfaim/auth.c

libfaim/auth.c