From Jelmer Vernooij:
[obnox/wireshark/wip.git] / epan / dissectors / packet-aim-bos.c
1 /* packet-aim-bos.c
2  * Routines for AIM (OSCAR) dissection, SNAC BOS
3  * Copyright 2004, Jelmer Vernooij <jelmer@samba.org>
4  *
5  * $Id$
6  *
7  * Ethereal - Network traffic analyzer
8  * By Gerald Combs <gerald@ethereal.com>
9  * Copyright 1998 Gerald Combs
10  *
11  * This program is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU General Public License
13  * as published by the Free Software Foundation; either version 2
14  * of the License, or (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24  */
25
26 #ifdef HAVE_CONFIG_H
27 # include "config.h"
28 #endif
29
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <ctype.h>
34
35 #include <glib.h>
36
37 #include <epan/packet.h>
38 #include <epan/strutil.h>
39
40 #include "packet-aim.h"
41
42 #define FAMILY_BOS        0x0009
43
44 /* Family BOS (Misc) */
45
46 #define CLASS_UNCONFIRMED                        0x0001
47 #define CLASS_ADMINISTRATOR                      0x0002
48 #define CLASS_AOL                                    0x0004
49 #define CLASS_COMMERCIAL                         0x0008
50 #define CLASS_FREE                                   0x0010
51 #define CLASS_AWAY                                   0x0020
52 #define CLASS_ICQ                                    0x0040
53 #define CLASS_WIRELESS                   0x0080
54 #define CLASS_UNKNOWN100                     0x0100
55 #define CLASS_UNKNOWN200                     0x0200
56 #define CLASS_UNKNOWN400                     0x0400
57 #define CLASS_UNKNOWN800                     0x0800
58
59 #define AIM_PRIVACY_TLV_MAX_VISIB_LIST_SIZE             0x001
60 #define AIM_PRIVACY_TLV_MAX_INVISIB_LIST_SIZE   0x002
61
62 static const aim_tlv privacy_tlvs[] = {
63         { AIM_PRIVACY_TLV_MAX_VISIB_LIST_SIZE, "Max visible list size", dissect_aim_tlv_value_uint16 },
64         { AIM_PRIVACY_TLV_MAX_INVISIB_LIST_SIZE, "Max invisible list size", dissect_aim_tlv_value_uint16 },
65         { 0, "Unknown", NULL },
66 };
67
68 /* Initialize the protocol and registered fields */
69 static int proto_aim_bos = -1;
70 static int hf_aim_bos_data = -1;
71 static int hf_aim_bos_class = -1;
72
73 /* Initialize the subtree pointers */
74 static gint ett_aim_bos      = -1;
75
76 static int dissect_aim_bos_set_group_perm(tvbuff_t *tvb, packet_info *pinfo _U_, proto_tree *bos_tree) 
77 {
78         int offset = 0;
79         guint32 userclass = tvb_get_ntohl(tvb, offset);
80         proto_item *ti = proto_tree_add_uint(bos_tree, hf_aim_bos_class, tvb, offset, 4, userclass); 
81         return dissect_aim_userclass(tvb, offset, 4, ti, userclass);
82 }
83
84 static int dissect_aim_bos_rights(tvbuff_t *tvb, packet_info *pinfo, proto_tree *bos_tree) 
85 {
86         return dissect_aim_tlv_sequence(tvb, pinfo, 0, bos_tree, privacy_tlvs);
87 }
88
89 static int dissect_aim_bos_buddyname(tvbuff_t *tvb, packet_info *pinfo, proto_tree *bos_tree) 
90 {
91         int offset = 0;
92         while(tvb_reported_length_remaining(tvb, offset) > 0) {
93                 offset = dissect_aim_buddyname(tvb, pinfo, offset, bos_tree);
94         }
95         return offset;
96 }
97
98 /* Register the protocol with Ethereal */
99 void
100 proto_register_aim_bos(void)
101 {
102
103         /* Setup list of header fields */
104         static hf_register_info hf[] = {
105                 { &hf_aim_bos_data,
106                         { "Data", "aim.data", FT_BYTES, BASE_HEX, NULL, 0x0, "", HFILL }
107                 },
108                 { &hf_aim_bos_class,
109                         { "User class", "aim.bos.userclass", FT_UINT32, BASE_HEX, NULL, 0x0, "", HFILL },
110                 },
111         };
112
113         /* Setup protocol subtree array */
114         static gint *ett[] = {
115                 &ett_aim_bos,
116         };
117
118         /* Register the protocol name and description */
119         proto_aim_bos = proto_register_protocol("AIM Privacy Management Service", "AIM BOS", "aim_bos");
120
121         /* Required function calls to register the header fields and subtrees used */
122         proto_register_field_array(proto_aim_bos, hf, array_length(hf));
123         proto_register_subtree_array(ett, array_length(ett));
124 }
125
126 static const aim_subtype aim_fnac_family_bos[] = {
127         { 0x0001, "Error", dissect_aim_snac_error },
128         { 0x0002, "Rights Query", NULL },
129         { 0x0003, "Rights" , dissect_aim_bos_rights },
130         { 0x0004, "Set Group Permissions Mask", dissect_aim_bos_set_group_perm },
131         { 0x0005, "Add To Visible List", dissect_aim_bos_buddyname },
132         { 0x0006, "Delete From Visible List", dissect_aim_bos_buddyname },
133         { 0x0007, "Add To Invisible List", dissect_aim_bos_buddyname },
134         { 0x0008, "Delete From Invisible List", dissect_aim_bos_buddyname },
135         { 0, NULL, NULL }
136 };
137
138 void
139 proto_reg_handoff_aim_bos(void)
140 {
141         aim_init_family(proto_aim_bos, ett_aim_bos, FAMILY_BOS, aim_fnac_family_bos);
142 }