source: libfaim/bos.c @ 2770be99

barnowl_perlaimdebianowlrelease-1.10release-1.4release-1.5release-1.6release-1.7release-1.8release-1.9
Last change on this file since 2770be99 was cf02dd6, checked in by James M. Kretchmar <kretch@mit.edu>, 21 years ago
*** empty log message ***
  • Property mode set to 100644
File size: 4.4 KB
Line 
1/*
2 * Family 0x0009 - Basic Oscar Service.
3 *
4 * The functionality of this family has been replaced by SSI.
5 */
6
7#define FAIM_INTERNAL
8#include <aim.h>
9
10#include <string.h>
11
12/* Subtype 0x0002 - Request BOS rights. */
13faim_export int aim_bos_reqrights(aim_session_t *sess, aim_conn_t *conn)
14{
15        return aim_genericreq_n_snacid(sess, conn, 0x0009, 0x0002);
16}
17
18/* Subtype 0x0003 - BOS Rights. */
19static int rights(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
20{
21        aim_rxcallback_t userfunc;
22        aim_tlvlist_t *tlvlist;
23        fu16_t maxpermits = 0, maxdenies = 0;
24        int ret = 0;
25
26        /*
27         * TLVs follow
28         */
29        tlvlist = aim_tlvlist_read(bs);
30
31        /*
32         * TLV type 0x0001: Maximum number of buddies on permit list.
33         */
34        if (aim_tlv_gettlv(tlvlist, 0x0001, 1))
35                maxpermits = aim_tlv_get16(tlvlist, 0x0001, 1);
36
37        /*
38         * TLV type 0x0002: Maximum number of buddies on deny list.
39         */
40        if (aim_tlv_gettlv(tlvlist, 0x0002, 1)) 
41                maxdenies = aim_tlv_get16(tlvlist, 0x0002, 1);
42
43        if ((userfunc = aim_callhandler(sess, rx->conn, snac->family, snac->subtype)))
44                ret = userfunc(sess, rx, maxpermits, maxdenies);
45
46        aim_tlvlist_free(&tlvlist);
47
48        return ret; 
49}
50
51/*
52 * Subtype 0x0004 - Set group permisson mask.
53 *
54 * Normally 0x1f (all classes).
55 *
56 * The group permission mask allows you to keep users of a certain
57 * class or classes from talking to you.  The mask should be
58 * a bitwise OR of all the user classes you want to see you.
59 *
60 */
61faim_export int aim_bos_setgroupperm(aim_session_t *sess, aim_conn_t *conn, fu32_t mask)
62{
63        return aim_genericreq_l(sess, conn, 0x0009, 0x0004, &mask);
64}
65
66/*
67 * Stubtypes 0x0005, 0x0006, 0x0007, and 0x0008 - Modify permit/deny lists.
68 *
69 * Changes your visibility depending on changetype:
70 *
71 *  AIM_VISIBILITYCHANGE_PERMITADD: Lets provided list of names see you
72 *  AIM_VISIBILITYCHANGE_PERMIDREMOVE: Removes listed names from permit list
73 *  AIM_VISIBILITYCHANGE_DENYADD: Hides you from provided list of names
74 *  AIM_VISIBILITYCHANGE_DENYREMOVE: Lets list see you again
75 *
76 * list should be a list of
77 * screen names in the form "Screen Name One&ScreenNameTwo&" etc.
78 *
79 * Equivelents to options in WinAIM:
80 *   - Allow all users to contact me: Send an AIM_VISIBILITYCHANGE_DENYADD
81 *      with only your name on it.
82 *   - Allow only users on my Buddy List: Send an
83 *      AIM_VISIBILITYCHANGE_PERMITADD with the list the same as your
84 *      buddy list
85 *   - Allow only the uesrs below: Send an AIM_VISIBILITYCHANGE_PERMITADD
86 *      with everyone listed that you want to see you.
87 *   - Block all users: Send an AIM_VISIBILITYCHANGE_PERMITADD with only
88 *      yourself in the list
89 *   - Block the users below: Send an AIM_VISIBILITYCHANGE_DENYADD with
90 *      the list of users to be blocked
91 *
92 * XXX ye gods.
93 */
94faim_export int aim_bos_changevisibility(aim_session_t *sess, aim_conn_t *conn, int changetype, const char *denylist)
95{
96        aim_frame_t *fr;
97        int packlen = 0;
98        fu16_t subtype;
99        char *localcpy = NULL, *tmpptr = NULL;
100        int i;
101        int listcount;
102        aim_snacid_t snacid;
103
104        if (!denylist)
105                return -EINVAL;
106
107        if (changetype == AIM_VISIBILITYCHANGE_PERMITADD)
108                subtype = 0x05;
109        else if (changetype == AIM_VISIBILITYCHANGE_PERMITREMOVE)
110                subtype = 0x06;
111        else if (changetype == AIM_VISIBILITYCHANGE_DENYADD)
112                subtype = 0x07;
113        else if (changetype == AIM_VISIBILITYCHANGE_DENYREMOVE)
114                subtype = 0x08;
115        else
116                return -EINVAL;
117
118        localcpy = strdup(denylist);
119
120        listcount = aimutil_itemcnt(localcpy, '&');
121        packlen = aimutil_tokslen(localcpy, 99, '&') + listcount + 9;
122
123        if (!(fr = aim_tx_new(sess, conn, AIM_FRAMETYPE_FLAP, 0x02, packlen))) {
124                free(localcpy);
125                return -ENOMEM;
126        }
127
128        snacid = aim_cachesnac(sess, 0x0009, subtype, 0x0000, NULL, 0);
129        aim_putsnac(&fr->data, 0x0009, subtype, 0x00, snacid);
130
131        for (i = 0; (i < (listcount - 1)) && (i < 99); i++) {
132                tmpptr = aimutil_itemindex(localcpy, i, '&');
133
134                aimbs_put8(&fr->data, strlen(tmpptr));
135                aimbs_putraw(&fr->data, tmpptr, strlen(tmpptr));
136
137                free(tmpptr);
138        }
139        free(localcpy);
140
141        aim_tx_enqueue(sess, fr);
142
143        return 0;
144}
145
146static int snachandler(aim_session_t *sess, aim_module_t *mod, aim_frame_t *rx, aim_modsnac_t *snac, aim_bstream_t *bs)
147{
148
149        if (snac->subtype == 0x0003)
150                return rights(sess, mod, rx, snac, bs);
151
152        return 0;
153}
154
155faim_internal int bos_modfirst(aim_session_t *sess, aim_module_t *mod)
156{
157
158        mod->family = 0x0009;
159        mod->version = 0x0001;
160        mod->toolid = 0x0110;
161        mod->toolversion = 0x0629;
162        mod->flags = 0;
163        strncpy(mod->name, "bos", sizeof(mod->name));
164        mod->snachandler = snachandler;
165
166        return 0;
167}
Note: See TracBrowser for help on using the repository browser.