xref: /freebsd/contrib/tcpdump/print-atm.c (revision 9336e0699bda8a301cd2bfa37106b6ec5e32012e)
1 /*
2  * Copyright (c) 1994, 1995, 1996, 1997
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that: (1) source code distributions
7  * retain the above copyright notice and this paragraph in its entirety, (2)
8  * distributions including binary code include the above copyright notice and
9  * this paragraph in its entirety in the documentation or other materials
10  * provided with the distribution, and (3) all advertising materials mentioning
11  * features or use of this software display the following acknowledgement:
12  * ``This product includes software developed by the University of California,
13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14  * the University nor the names of its contributors may be used to endorse
15  * or promote products derived from this software without specific prior
16  * written permission.
17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20  *
21  * $FreeBSD$
22  */
23 #ifndef lint
24 static const char rcsid[] _U_ =
25     "@(#) $Header: /tcpdump/master/tcpdump/print-atm.c,v 1.38.2.6 2006/01/25 13:27:24 hannes Exp $ (LBL)";
26 #endif
27 
28 #ifdef HAVE_CONFIG_H
29 #include "config.h"
30 #endif
31 
32 #include <tcpdump-stdinc.h>
33 
34 #include <stdio.h>
35 #include <pcap.h>
36 #include <string.h>
37 
38 #include "interface.h"
39 #include "extract.h"
40 #include "addrtoname.h"
41 #include "ethertype.h"
42 #include "atm.h"
43 #include "atmuni31.h"
44 #include "llc.h"
45 
46 #include "ether.h"
47 
48 struct tok oam_f_values[] = {
49     { OAMF4SC, "OAM F4 (segment)" },
50     { OAMF4EC, "OAM F4 (end)" },
51     { 0, NULL }
52 };
53 
54 struct tok oam_celltype_values[] = {
55     { 0x1, "Fault Management" },
56     { 0x2, "Performance Management" },
57     { 0x8, "activate/deactivate" },
58     { 0xf, "System Management" },
59     { 0, NULL }
60 };
61 
62 struct tok oam_fm_functype_values[] = {
63     { 0x0, "AIS" },
64     { 0x1, "RDI" },
65     { 0x4, "Continuity Check" },
66     { 0x8, "Loopback" },
67     { 0, NULL }
68 };
69 
70 struct tok oam_pm_functype_values[] = {
71     { 0x0, "Forward Monitoring" },
72     { 0x1, "Backward Reporting" },
73     { 0x2, "Monitoring and Reporting" },
74     { 0, NULL }
75 };
76 
77 struct tok oam_ad_functype_values[] = {
78     { 0x0, "Performance Monitoring" },
79     { 0x1, "Continuity Check" },
80     { 0, NULL }
81 };
82 
83 static const struct tok *oam_functype_values[16] = {
84     NULL,
85     oam_fm_functype_values, /* 1 */
86     oam_pm_functype_values, /* 2 */
87     NULL,
88     NULL,
89     NULL,
90     NULL,
91     NULL,
92     oam_ad_functype_values, /* 8 */
93     NULL,
94     NULL,
95     NULL,
96     NULL,
97     NULL,
98     NULL,
99     NULL
100 };
101 
102 /*
103  * Print an RFC 1483 LLC-encapsulated ATM frame.
104  */
105 static void
106 atm_llc_print(const u_char *p, int length, int caplen)
107 {
108 	u_short extracted_ethertype;
109 
110 	if (!llc_print(p, length, caplen, NULL, NULL,
111 	    &extracted_ethertype)) {
112 		/* ether_type not known, print raw packet */
113 		if (extracted_ethertype) {
114 			printf("(LLC %s) ",
115 		etherproto_string(htons(extracted_ethertype)));
116 		}
117 		if (!suppress_default_print)
118 			default_print(p, caplen);
119 	}
120 }
121 
122 /*
123  * Given a SAP value, generate the LLC header value for a UI packet
124  * with that SAP as the source and destination SAP.
125  */
126 #define LLC_UI_HDR(sap)	((sap)<<16 | (sap<<8) | 0x03)
127 
128 /*
129  * This is the top level routine of the printer.  'p' points
130  * to the LLC/SNAP header of the packet, 'h->ts' is the timestamp,
131  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
132  * is the number of bytes actually captured.
133  */
134 u_int
135 atm_if_print(const struct pcap_pkthdr *h, const u_char *p)
136 {
137 	u_int caplen = h->caplen;
138 	u_int length = h->len;
139 	u_int32_t llchdr;
140 	u_int hdrlen = 0;
141 
142 	if (caplen < 8) {
143 		printf("[|atm]");
144 		return (caplen);
145 	}
146 
147         /* Cisco Style NLPID ? */
148         if (*p == LLC_UI) {
149             if (eflag)
150                 printf("CNLPID ");
151             isoclns_print(p+1, length-1, caplen-1);
152             return hdrlen;
153         }
154 
155 	/*
156 	 * Extract the presumed LLC header into a variable, for quick
157 	 * testing.
158 	 * Then check for a header that's neither a header for a SNAP
159 	 * packet nor an RFC 2684 routed NLPID-formatted PDU nor
160 	 * an 802.2-but-no-SNAP IP packet.
161 	 */
162 	llchdr = EXTRACT_24BITS(p);
163 	if (llchdr != LLC_UI_HDR(LLCSAP_SNAP) &&
164 	    llchdr != LLC_UI_HDR(LLCSAP_ISONS) &&
165 	    llchdr != LLC_UI_HDR(LLCSAP_IP)) {
166 		/*
167 		 * XXX - assume 802.6 MAC header from Fore driver.
168 		 *
169 		 * Unfortunately, the above list doesn't check for
170 		 * all known SAPs, doesn't check for headers where
171 		 * the source and destination SAP aren't the same,
172 		 * and doesn't check for non-UI frames.  It also
173 		 * runs the risk of an 802.6 MAC header that happens
174 		 * to begin with one of those values being
175 		 * incorrectly treated as an 802.2 header.
176 		 *
177 		 * So is that Fore driver still around?  And, if so,
178 		 * is it still putting 802.6 MAC headers on ATM
179 		 * packets?  If so, could it be changed to use a
180 		 * new DLT_IEEE802_6 value if we added it?
181 		 */
182 		if (eflag)
183 			printf("%08x%08x %08x%08x ",
184 			       EXTRACT_32BITS(p),
185 			       EXTRACT_32BITS(p+4),
186 			       EXTRACT_32BITS(p+8),
187 			       EXTRACT_32BITS(p+12));
188 		p += 20;
189 		length -= 20;
190 		caplen -= 20;
191 		hdrlen += 20;
192 	}
193 	atm_llc_print(p, length, caplen);
194 	return (hdrlen);
195 }
196 
197 /*
198  * ATM signalling.
199  */
200 static struct tok msgtype2str[] = {
201 	{ CALL_PROCEED,		"Call_proceeding" },
202 	{ CONNECT,		"Connect" },
203 	{ CONNECT_ACK,		"Connect_ack" },
204 	{ SETUP,		"Setup" },
205 	{ RELEASE,		"Release" },
206 	{ RELEASE_DONE,		"Release_complete" },
207 	{ RESTART,		"Restart" },
208 	{ RESTART_ACK,		"Restart_ack" },
209 	{ STATUS,		"Status" },
210 	{ STATUS_ENQ,		"Status_enquiry" },
211 	{ ADD_PARTY,		"Add_party" },
212 	{ ADD_PARTY_ACK,	"Add_party_ack" },
213 	{ ADD_PARTY_REJ,	"Add_party_reject" },
214 	{ DROP_PARTY,		"Drop_party" },
215 	{ DROP_PARTY_ACK,	"Drop_party_ack" },
216 	{ 0,			NULL }
217 };
218 
219 static void
220 sig_print(const u_char *p, int caplen)
221 {
222 	bpf_u_int32 call_ref;
223 
224 	if (caplen < PROTO_POS) {
225 		printf("[|atm]");
226 		return;
227 	}
228 	if (p[PROTO_POS] == Q2931) {
229 		/*
230 		 * protocol:Q.2931 for User to Network Interface
231 		 * (UNI 3.1) signalling
232 		 */
233 		printf("Q.2931");
234 		if (caplen < MSG_TYPE_POS) {
235 			printf(" [|atm]");
236 			return;
237 		}
238 		printf(":%s ",
239 		    tok2str(msgtype2str, "msgtype#%d", p[MSG_TYPE_POS]));
240 
241 		if (caplen < CALL_REF_POS+3) {
242 			printf("[|atm]");
243 			return;
244 		}
245 		call_ref = EXTRACT_24BITS(&p[CALL_REF_POS]);
246 		printf("CALL_REF:0x%06x", call_ref);
247 	} else {
248 		/* SCCOP with some unknown protocol atop it */
249 		printf("SSCOP, proto %d ", p[PROTO_POS]);
250 	}
251 }
252 
253 /*
254  * Print an ATM PDU (such as an AAL5 PDU).
255  */
256 void
257 atm_print(u_int vpi, u_int vci, u_int traftype, const u_char *p, u_int length,
258     u_int caplen)
259 {
260 	if (eflag)
261 		printf("VPI:%u VCI:%u ", vpi, vci);
262 
263 	if (vpi == 0) {
264 		switch (vci) {
265 
266 		case PPC:
267 			sig_print(p, caplen);
268 			return;
269 
270 		case BCC:
271 			printf("broadcast sig: ");
272 			return;
273 
274 		case OAMF4SC: /* fall through */
275 		case OAMF4EC:
276                         oam_print(p, length, ATM_OAM_HEC);
277 			return;
278 
279 		case METAC:
280 			printf("meta: ");
281 			return;
282 
283 		case ILMIC:
284 			printf("ilmi: ");
285 			snmp_print(p, length);
286 			return;
287 		}
288 	}
289 
290 	switch (traftype) {
291 
292 	case ATM_LLC:
293 	default:
294 		/*
295 		 * Assumes traffic is LLC if unknown.
296 		 */
297 		atm_llc_print(p, length, caplen);
298 		break;
299 
300 	case ATM_LANE:
301 		lane_print(p, length, caplen);
302 		break;
303 	}
304 }
305 
306 int
307 oam_print (const u_char *p, u_int length, u_int hec) {
308 
309     u_int32_t cell_header;
310     u_int16_t cell_type, func_type,vpi,vci,payload,clp;
311 
312     cell_header = EXTRACT_32BITS(p+hec);
313     cell_type = ((*(p+4+hec))>>4) & 0x0f;
314     func_type = *(p+4+hec) & 0x0f;
315 
316     vpi = (cell_header>>20)&0xff;
317     vci = (cell_header>>4)&0xffff;
318     payload = (cell_header>>1)&0x7;
319     clp = cell_header&0x1;
320 
321     printf("%s, vpi %u, vci %u, payload %u, clp %u, ",
322            tok2str(oam_f_values, "OAM F5", vci),
323            vpi, vci, payload, clp);
324 
325     printf("cell-type %s (%u)",
326            tok2str(oam_celltype_values, "unknown", cell_type),
327            cell_type);
328 
329     if (oam_functype_values[cell_type] == NULL)
330         printf(", func-type unknown (%u)", func_type);
331     else
332         printf(", func-type %s (%u)",
333                bittok2str(oam_functype_values[cell_type],"none",func_type),
334                func_type);
335 
336     printf(", length %u",length);
337     return 1;
338 }
339