xref: /freebsd/contrib/tcpdump/print-atm.c (revision d056fa046c6a91b90cd98165face0e42a33a5173)
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.2 2005/06/20 07:45:06 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_celltype_values[] = {
49     { 0x1, "Fault Management" },
50     { 0x2, "Performance Management" },
51     { 0x8, "activate/deactivate" },
52     { 0xf, "System Management" },
53     { 0, NULL }
54 };
55 
56 struct tok oam_fm_functype_values[] = {
57     { 0x0, "AIS" },
58     { 0x1, "RDI" },
59     { 0x4, "Continuity Check" },
60     { 0x8, "Loopback" },
61     { 0, NULL }
62 };
63 
64 struct tok oam_pm_functype_values[] = {
65     { 0x0, "Forward Monitoring" },
66     { 0x1, "Backward Reporting" },
67     { 0x2, "Monitoring and Reporting" },
68     { 0, NULL }
69 };
70 
71 struct tok oam_ad_functype_values[] = {
72     { 0x0, "Performance Monitoring" },
73     { 0x1, "Continuity Check" },
74     { 0, NULL }
75 };
76 
77 static const struct tok *oam_functype_values[16] = {
78     NULL,
79     oam_fm_functype_values, /* 1 */
80     oam_pm_functype_values, /* 2 */
81     NULL,
82     NULL,
83     NULL,
84     NULL,
85     NULL,
86     oam_ad_functype_values, /* 8 */
87     NULL,
88     NULL,
89     NULL,
90     NULL,
91     NULL,
92     NULL,
93     NULL
94 };
95 
96 /*
97  * Print an RFC 1483 LLC-encapsulated ATM frame.
98  */
99 static void
100 atm_llc_print(const u_char *p, int length, int caplen)
101 {
102 	u_short extracted_ethertype;
103 
104 	if (!llc_print(p, length, caplen, NULL, NULL,
105 	    &extracted_ethertype)) {
106 		/* ether_type not known, print raw packet */
107 		if (extracted_ethertype) {
108 			printf("(LLC %s) ",
109 		etherproto_string(htons(extracted_ethertype)));
110 		}
111 		if (!xflag && !qflag)
112 			default_print(p, caplen);
113 	}
114 }
115 
116 /*
117  * Given a SAP value, generate the LLC header value for a UI packet
118  * with that SAP as the source and destination SAP.
119  */
120 #define LLC_UI_HDR(sap)	((sap)<<16 | (sap<<8) | 0x03)
121 
122 /*
123  * This is the top level routine of the printer.  'p' points
124  * to the LLC/SNAP header of the packet, 'h->ts' is the timestamp,
125  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
126  * is the number of bytes actually captured.
127  */
128 u_int
129 atm_if_print(const struct pcap_pkthdr *h, const u_char *p)
130 {
131 	u_int caplen = h->caplen;
132 	u_int length = h->len;
133 	u_int32_t llchdr;
134 	u_int hdrlen = 0;
135 
136 	if (caplen < 8) {
137 		printf("[|atm]");
138 		return (caplen);
139 	}
140 	/*
141 	 * Extract the presumed LLC header into a variable, for quick
142 	 * testing.
143 	 * Then check for a header that's neither a header for a SNAP
144 	 * packet nor an RFC 2684 routed NLPID-formatted PDU nor
145 	 * an 802.2-but-no-SNAP IP packet.
146 	 */
147 	llchdr = EXTRACT_24BITS(p);
148 	if (llchdr != LLC_UI_HDR(LLCSAP_SNAP) &&
149 	    llchdr != LLC_UI_HDR(LLCSAP_ISONS) &&
150 	    llchdr != LLC_UI_HDR(LLCSAP_IP)) {
151 		/*
152 		 * XXX - assume 802.6 MAC header from Fore driver.
153 		 *
154 		 * Unfortunately, the above list doesn't check for
155 		 * all known SAPs, doesn't check for headers where
156 		 * the source and destination SAP aren't the same,
157 		 * and doesn't check for non-UI frames.  It also
158 		 * runs the risk of an 802.6 MAC header that happens
159 		 * to begin with one of those values being
160 		 * incorrectly treated as an 802.2 header.
161 		 *
162 		 * So is that Fore driver still around?  And, if so,
163 		 * is it still putting 802.6 MAC headers on ATM
164 		 * packets?  If so, could it be changed to use a
165 		 * new DLT_IEEE802_6 value if we added it?
166 		 */
167 		if (eflag)
168 			printf("%08x%08x %08x%08x ",
169 			       EXTRACT_32BITS(p),
170 			       EXTRACT_32BITS(p+4),
171 			       EXTRACT_32BITS(p+8),
172 			       EXTRACT_32BITS(p+12));
173 		p += 20;
174 		length -= 20;
175 		caplen -= 20;
176 		hdrlen += 20;
177 	}
178 	atm_llc_print(p, length, caplen);
179 	return (hdrlen);
180 }
181 
182 /*
183  * ATM signalling.
184  */
185 static struct tok msgtype2str[] = {
186 	{ CALL_PROCEED,		"Call_proceeding" },
187 	{ CONNECT,		"Connect" },
188 	{ CONNECT_ACK,		"Connect_ack" },
189 	{ SETUP,		"Setup" },
190 	{ RELEASE,		"Release" },
191 	{ RELEASE_DONE,		"Release_complete" },
192 	{ RESTART,		"Restart" },
193 	{ RESTART_ACK,		"Restart_ack" },
194 	{ STATUS,		"Status" },
195 	{ STATUS_ENQ,		"Status_enquiry" },
196 	{ ADD_PARTY,		"Add_party" },
197 	{ ADD_PARTY_ACK,	"Add_party_ack" },
198 	{ ADD_PARTY_REJ,	"Add_party_reject" },
199 	{ DROP_PARTY,		"Drop_party" },
200 	{ DROP_PARTY_ACK,	"Drop_party_ack" },
201 	{ 0,			NULL }
202 };
203 
204 static void
205 sig_print(const u_char *p, int caplen)
206 {
207 	bpf_u_int32 call_ref;
208 
209 	if (caplen < PROTO_POS) {
210 		printf("[|atm]");
211 		return;
212 	}
213 	if (p[PROTO_POS] == Q2931) {
214 		/*
215 		 * protocol:Q.2931 for User to Network Interface
216 		 * (UNI 3.1) signalling
217 		 */
218 		printf("Q.2931");
219 		if (caplen < MSG_TYPE_POS) {
220 			printf(" [|atm]");
221 			return;
222 		}
223 		printf(":%s ",
224 		    tok2str(msgtype2str, "msgtype#%d", p[MSG_TYPE_POS]));
225 
226 		if (caplen < CALL_REF_POS+3) {
227 			printf("[|atm]");
228 			return;
229 		}
230 		call_ref = EXTRACT_24BITS(&p[CALL_REF_POS]);
231 		printf("CALL_REF:0x%06x", call_ref);
232 	} else {
233 		/* SCCOP with some unknown protocol atop it */
234 		printf("SSCOP, proto %d ", p[PROTO_POS]);
235 	}
236 }
237 
238 /*
239  * Print an ATM PDU (such as an AAL5 PDU).
240  */
241 void
242 atm_print(u_int vpi, u_int vci, u_int traftype, const u_char *p, u_int length,
243     u_int caplen)
244 {
245 	if (eflag)
246 		printf("VPI:%u VCI:%u ", vpi, vci);
247 
248 	if (vpi == 0) {
249 		switch (vci) {
250 
251 		case PPC:
252 			sig_print(p, caplen);
253 			return;
254 
255 		case BCC:
256 			printf("broadcast sig: ");
257 			return;
258 
259 		case OAMF4SC: /* fall through */
260 		case OAMF4EC:
261                         oam_print(p, length, ATM_OAM_HEC);
262 			return;
263 
264 		case METAC:
265 			printf("meta: ");
266 			return;
267 
268 		case ILMIC:
269 			printf("ilmi: ");
270 			snmp_print(p, length);
271 			return;
272 		}
273 	}
274 
275 	switch (traftype) {
276 
277 	case ATM_LLC:
278 	default:
279 		/*
280 		 * Assumes traffic is LLC if unknown.
281 		 */
282 		atm_llc_print(p, length, caplen);
283 		break;
284 
285 	case ATM_LANE:
286 		lane_print(p, length, caplen);
287 		break;
288 	}
289 }
290 
291 int
292 oam_print (const u_char *p, u_int length, u_int hec) {
293 
294     u_int16_t cell_header, cell_type, func_type,vpi,vci,payload,clp;
295 
296     cell_header = EXTRACT_32BITS(p);
297     cell_type = ((*(p+4+hec))>>4) & 0x0f;
298     func_type = *(p+4+hec) & 0x0f;
299 
300     vpi = (cell_header>>20)&0xff;
301     vci = (cell_header>>4)&0xffff;
302     payload = (cell_header>>1)&0x7;
303     clp = cell_header&0x1;
304 
305     switch (vci) {
306     case OAMF4SC:
307         printf("OAM F4 (segment), ");
308             break;
309     case OAMF4EC:
310         printf("OAM F4 (end), ");
311         break;
312     default:
313         printf("OAM F5, ");
314         break;
315     }
316 
317     if (eflag)
318         printf("vpi %u, vci %u, payload %u, clp %u, ",vpi,vci,payload,clp);
319 
320     printf("cell-type %s (%u)",
321            tok2str(oam_celltype_values, "unknown", cell_type),
322            cell_type);
323 
324     if (oam_functype_values[cell_type] == NULL)
325         printf(", func-type unknown (%u)", func_type);
326     else
327         printf(", func-type %s (%u)",
328                bittok2str(oam_functype_values[cell_type],"none",func_type),
329                func_type);
330 
331     printf(", length %u",length);
332     return 1;
333 }
334