Removed trailing whitespaces from .h and .c files using the
[obnox/wireshark/wip.git] / packet-aarp.c
1 /* packet-aarp.c
2  * Routines for Appletalk ARP packet disassembly
3  *
4  * $Id: packet-aarp.c,v 1.36 2002/08/02 23:35:46 jmayer Exp $
5  *
6  * Simon Wilkinson <sxw@dcs.ed.ac.uk>
7  *
8  * Ethereal - Network traffic analyzer
9  * By Gerald Combs <gerald@ethereal.com>
10  * Copyright 1998
11  *
12  * This program is free software; you can redistribute it and/or
13  * modify it under the terms of the GNU General Public License
14  * as published by the Free Software Foundation; either version 2
15  * of the License, or (at your option) any later version.
16  * 
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  * 
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
25  */
26
27 #ifdef HAVE_CONFIG_H
28 # include "config.h"
29 #endif
30
31 #include <stdio.h>
32 #include <glib.h>
33 #include <epan/packet.h>
34 #include <epan/strutil.h>
35 #include "etypes.h"
36
37 static int proto_aarp = -1;
38 static int hf_aarp_hard_type = -1;
39 static int hf_aarp_proto_type = -1;
40 static int hf_aarp_hard_size = -1;
41 static int hf_aarp_proto_size = -1;
42 static int hf_aarp_opcode = -1;
43 static int hf_aarp_src_hw = -1;
44 static int hf_aarp_src_hw_mac = -1;
45 static int hf_aarp_src_proto = -1;
46 static int hf_aarp_src_proto_id = -1;
47 static int hf_aarp_dst_hw = -1;
48 static int hf_aarp_dst_hw_mac = -1;
49 static int hf_aarp_dst_proto = -1;
50 static int hf_aarp_dst_proto_id = -1;
51
52 static gint ett_aarp = -1;
53
54 #ifndef AARP_REQUEST
55 #define AARP_REQUEST    0x0001
56 #endif
57 #ifndef AARP_REPLY
58 #define AARP_REPLY      0x0002
59 #endif
60 #ifndef AARP_PROBE      
61 #define AARP_PROBE      0x0003
62 #endif
63
64 /* The following is screwed up shit to deal with the fact that
65    the linux kernel edits the packet inline. */
66 #define AARP_REQUEST_SWAPPED    0x0100
67 #define AARP_REPLY_SWAPPED  0x0200
68 #define AARP_PROBE_SWAPPED  0x0300
69
70 static const value_string op_vals[] = {
71   {AARP_REQUEST,  "request" },
72   {AARP_REPLY,    "reply"   },
73   {AARP_PROBE,    "probe"   },
74   {AARP_REQUEST_SWAPPED,  "request" },
75   {AARP_REPLY_SWAPPED,    "reply"   },
76   {AARP_PROBE_SWAPPED,    "probe"   },
77   {0,             NULL           } };
78
79 /* AARP protocol HARDWARE identifiers. */
80 #define AARPHRD_ETHER   1               /* Ethernet 10Mbps              */
81 #define AARPHRD_TR      2               /* Token Ring                   */
82
83 static const value_string hrd_vals[] = {
84   {AARPHRD_ETHER,   "Ethernet"       },
85   {AARPHRD_TR,      "Token Ring"     },
86   {0,               NULL             } };
87
88 /*
89  * Given the hardware address type and length, check whether an address
90  * is an Ethernet address - the address must be of type "Ethernet" or
91  * "Token Ring", and the length must be 6 bytes.
92  */
93 #define AARP_HW_IS_ETHER(ar_hrd, ar_hln) \
94         (((ar_hrd) == AARPHRD_ETHER || (ar_hrd) == AARPHRD_TR) \
95                                 && (ar_hln) == 6)
96
97 /*
98  * Given the protocol address type and length, check whether an address
99  * is an Appletalk address - the address must be of type "Appletalk",
100  * and the length must be 4 bytes.
101  */
102 #define AARP_PRO_IS_ATALK(ar_pro, ar_pln) \
103         ((ar_pro) == ETHERTYPE_ATALK && (ar_pln) == 4)
104
105 static gchar *
106 atalkid_to_str(const guint8 *ad) {
107   gint node;
108   static gchar  str[3][16];
109   static gchar *cur;
110   
111   if (cur == &str[0][0]) {
112     cur = &str[1][0];
113   } else if (cur == &str[1][0]) {  
114     cur = &str[2][0];
115   } else {  
116     cur = &str[0][0];
117   }
118   
119   node=ad[1]<<8|ad[2];
120   sprintf(cur, "%d.%d",node,ad[3]);
121   return cur;
122 }
123
124 static gchar *
125 aarphrdaddr_to_str(const guint8 *ad, int ad_len, guint16 type) {
126   if (AARP_HW_IS_ETHER(type, ad_len)) {
127     /* Ethernet address (or Token Ring address, which is the same type
128        of address). */
129     return ether_to_str(ad);
130   }
131   return bytes_to_str(ad, ad_len);
132 }
133
134 static gchar *
135 aarpproaddr_to_str(const guint8 *ad, int ad_len, guint16 type) {
136   if (AARP_PRO_IS_ATALK(type, ad_len)) {
137     /* Appletalk address.  */
138     return atalkid_to_str(ad);
139   }
140   return bytes_to_str(ad, ad_len);
141 }
142     
143 /* Offsets of fields within an AARP packet. */
144 #define AR_HRD          0
145 #define AR_PRO          2
146 #define AR_HLN          4
147 #define AR_PLN          5
148 #define AR_OP           6
149 #define MIN_AARP_HEADER_SIZE    8
150
151 static void
152 dissect_aarp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree) {
153   guint16     ar_hrd;
154   guint16     ar_pro;
155   guint8      ar_hln;
156   guint8      ar_pln;
157   guint16     ar_op;
158   proto_tree  *aarp_tree;
159   proto_item  *ti;
160   gchar       *op_str;
161   int         sha_offset, spa_offset, tha_offset, tpa_offset;
162   const guint8      *sha_val, *spa_val, *tha_val, *tpa_val;
163   gchar       *sha_str, *spa_str, *tha_str, *tpa_str;
164
165   if(check_col(pinfo->cinfo, COL_PROTOCOL))
166     col_set_str(pinfo->cinfo, COL_PROTOCOL, "AARP");
167   if(check_col(pinfo->cinfo, COL_INFO))
168     col_clear(pinfo->cinfo, COL_INFO);
169
170   ar_hrd = tvb_get_ntohs(tvb, AR_HRD);
171   ar_pro = tvb_get_ntohs(tvb, AR_PRO);
172   ar_hln = tvb_get_guint8(tvb, AR_HLN);
173   ar_pln = tvb_get_guint8(tvb, AR_PLN);
174   ar_op  = tvb_get_ntohs(tvb, AR_OP);
175
176   /* Get the offsets of the addresses. */
177   sha_offset = MIN_AARP_HEADER_SIZE;
178   spa_offset = sha_offset + ar_hln;
179   tha_offset = spa_offset + ar_pln;
180   tpa_offset = tha_offset + ar_hln;
181
182   /* Extract the addresses.  */
183   sha_val = tvb_get_ptr(tvb, sha_offset, ar_hln);
184   sha_str = aarphrdaddr_to_str(sha_val, ar_hln, ar_hrd);
185
186   spa_val = tvb_get_ptr(tvb, spa_offset, ar_pln);
187   spa_str = aarpproaddr_to_str(spa_val, ar_pln, ar_pro);
188
189   tha_val = tvb_get_ptr(tvb, tha_offset, ar_hln);
190   tha_str = aarphrdaddr_to_str(tha_val, ar_hln, ar_hrd);
191
192   tpa_val = tvb_get_ptr(tvb, tpa_offset, ar_pln);
193   tpa_str = aarpproaddr_to_str(tpa_val, ar_pln, ar_pro);
194
195   if (check_col(pinfo->cinfo, COL_INFO)) {
196     switch (ar_op) {
197       case AARP_REQUEST:
198       case AARP_REQUEST_SWAPPED:
199         col_add_fstr(pinfo->cinfo, COL_INFO, "Who has %s?  Tell %s", tpa_str, spa_str);
200         break;
201       case AARP_REPLY:
202       case AARP_REPLY_SWAPPED:
203         col_add_fstr(pinfo->cinfo, COL_INFO, "%s is at %s", spa_str, sha_str);
204         break;
205       case AARP_PROBE:
206       case AARP_PROBE_SWAPPED:
207         col_add_fstr(pinfo->cinfo, COL_INFO, "Is there a %s", tpa_str);
208         break;
209       default:
210         col_add_fstr(pinfo->cinfo, COL_INFO, "Unknown AARP opcode 0x%04x", ar_op);
211         break;
212     }
213   }
214
215   if (tree) {
216     if ((op_str = match_strval(ar_op, op_vals)))
217       ti = proto_tree_add_protocol_format(tree, proto_aarp, tvb, 0,
218                                       MIN_AARP_HEADER_SIZE + 2*ar_hln + 
219                                       2*ar_pln, "AppleTalk Address Resolution Protocol (%s)", op_str);
220     else
221       ti = proto_tree_add_protocol_format(tree, proto_aarp, tvb, 0,
222                                       MIN_AARP_HEADER_SIZE + 2*ar_hln + 
223                                       2*ar_pln,
224                                       "AppleTalk Address Resolution Protocol (opcode 0x%04x)", ar_op);
225     aarp_tree = proto_item_add_subtree(ti, ett_aarp);
226     proto_tree_add_uint(aarp_tree, hf_aarp_hard_type, tvb, AR_HRD, 2,
227                                ar_hrd);
228     proto_tree_add_uint(aarp_tree, hf_aarp_proto_type, tvb, AR_PRO, 2, 
229                                ar_pro);
230     proto_tree_add_uint(aarp_tree, hf_aarp_hard_size, tvb, AR_HLN, 1,
231                                ar_hln);
232     proto_tree_add_uint(aarp_tree, hf_aarp_proto_size, tvb, AR_PLN, 1,
233                                ar_pln);
234     proto_tree_add_uint(aarp_tree, hf_aarp_opcode, tvb, AR_OP, 2,
235                                ar_op);
236     if (ar_hln != 0) {
237       proto_tree_add_item(aarp_tree,
238         AARP_HW_IS_ETHER(ar_hrd, ar_hln) ? hf_aarp_src_hw_mac : hf_aarp_src_hw,
239         tvb, sha_offset, ar_hln, FALSE);
240     }
241
242     if (ar_pln != 0) {
243       if (AARP_PRO_IS_ATALK(ar_pro, ar_pln)) {
244         proto_tree_add_bytes_format(aarp_tree, hf_aarp_src_proto_id, tvb, spa_offset, ar_pln,
245                                spa_val,
246                                "Sender ID: %s", spa_str);
247       } else { 
248         proto_tree_add_bytes_format(aarp_tree, hf_aarp_src_proto, tvb, spa_offset, ar_pln,
249                                spa_val,
250                                "Sender protocol address: %s", spa_str);
251       }
252     }
253
254     if (ar_hln != 0) {
255       proto_tree_add_item(aarp_tree,
256         AARP_HW_IS_ETHER(ar_hrd, ar_hln) ? hf_aarp_dst_hw_mac : hf_aarp_dst_hw,
257         tvb, tha_offset, ar_hln, FALSE);
258     }
259
260     if (ar_pln != 0) {
261       if (AARP_PRO_IS_ATALK(ar_pro, ar_pln)) {
262         proto_tree_add_bytes_format(aarp_tree, hf_aarp_dst_proto_id, tvb, tpa_offset, ar_pln,
263                                tpa_val,
264                                "Target ID: %s", tpa_str);
265       } else {
266         proto_tree_add_bytes_format(aarp_tree, hf_aarp_dst_proto, tvb, tpa_offset, ar_pln,
267                                tpa_val,
268                                "Target protocol address: %s", tpa_str);
269       }
270     }
271   }
272 }
273
274 void
275 proto_register_aarp(void)
276 {
277   static hf_register_info hf[] = {
278     { &hf_aarp_hard_type,
279       { "Hardware type",                "aarp.hard.type",       
280         FT_UINT16,      BASE_HEX,       VALS(hrd_vals), 0x0,
281         "", HFILL }},
282
283     { &hf_aarp_proto_type,
284       { "Protocol type",                "aarp.proto.type",      
285         FT_UINT16,      BASE_HEX,       VALS(etype_vals),       0x0,
286         "", HFILL }},    
287
288     { &hf_aarp_hard_size,
289       { "Hardware size",                "aarp.hard.size",       
290         FT_UINT8,       BASE_DEC,       NULL,   0x0,
291         "", HFILL }},
292
293     { &hf_aarp_proto_size,
294       { "Protocol size",                "aarp.proto.size",      
295         FT_UINT8,       BASE_DEC,       NULL,   0x0,
296         "", HFILL }},
297
298     { &hf_aarp_opcode,
299       { "Opcode",                       "aarp.opcode",
300         FT_UINT16,      BASE_DEC,       VALS(op_vals),  0x0,
301         "", HFILL }},
302
303     { &hf_aarp_src_hw,
304       { "Sender hardware address",      "aarp.src.hw",
305         FT_BYTES,       BASE_NONE,      NULL,   0x0,
306         "", HFILL }},
307
308     { &hf_aarp_src_hw_mac,
309       { "Sender MAC address",           "aarp.src.hw_mac",
310         FT_ETHER,       BASE_NONE,      NULL,   0x0,
311         "", HFILL }},
312
313     { &hf_aarp_src_proto,
314       { "Sender protocol address",      "aarp.src.proto",
315         FT_BYTES,       BASE_NONE,      NULL,   0x0,
316         "", HFILL }},
317
318     { &hf_aarp_src_proto_id,
319       { "Sender ID",                    "aarp.src.proto_id",
320         FT_BYTES,       BASE_HEX,       NULL,   0x0,
321         "", HFILL }},
322
323     { &hf_aarp_dst_hw,
324       { "Target hardware address",      "aarp.dst.hw",
325         FT_BYTES,       BASE_NONE,      NULL,   0x0,
326         "", HFILL }},
327
328     { &hf_aarp_dst_hw_mac,
329       { "Target MAC address",           "aarp.dst.hw_mac",
330         FT_ETHER,       BASE_NONE,      NULL,   0x0,
331         "", HFILL }},
332
333     { &hf_aarp_dst_proto,
334       { "Target protocol address",      "aarp.dst.proto",
335         FT_BYTES,       BASE_NONE,      NULL,   0x0,
336       "", HFILL }},
337
338     { &hf_aarp_dst_proto_id,
339       { "Target ID",                    "aarp.dst.proto_id",
340         FT_BYTES,       BASE_HEX,       NULL,   0x0,
341         "", HFILL }},
342   };
343   static gint *ett[] = {
344     &ett_aarp,
345   };
346
347   proto_aarp = proto_register_protocol("Appletalk Address Resolution Protocol",
348                                        "AARP",
349                                        "aarp");
350   proto_register_field_array(proto_aarp, hf, array_length(hf));
351   proto_register_subtree_array(ett, array_length(ett));
352 }
353
354 void
355 proto_reg_handoff_aarp(void)
356 {
357   dissector_handle_t aarp_handle;
358
359   aarp_handle = create_dissector_handle(dissect_aarp, proto_aarp);
360   dissector_add("ethertype", ETHERTYPE_AARP, aarp_handle);
361   dissector_add("chdlctype", ETHERTYPE_AARP, aarp_handle);
362 }