xref: /freebsd/contrib/tcpdump/print-ip6opts.c (revision 09e8dea79366f1e5b3a73e8a271b26e4b6bf2e6a)
1 /*
2  * Copyright (C) 1998 WIDE Project.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the project nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #ifdef HAVE_CONFIG_H
31 #include "config.h"
32 #endif
33 
34 #ifndef lint
35 static const char rcsid[] =
36      "@(#) $Header: /tcpdump/master/tcpdump/print-ip6opts.c,v 1.9 2001/05/09 02:47:26 itojun Exp $";
37 #endif
38 
39 #ifdef INET6
40 #include <sys/param.h>
41 #include <sys/time.h>
42 #include <sys/types.h>
43 #include <sys/socket.h>
44 
45 #include <netinet/in.h>
46 #include <stdio.h>
47 
48 #include "ip6.h"
49 
50 #include "interface.h"
51 #include "addrtoname.h"
52 
53 /* items outside of rfc2292bis */
54 #ifndef IP6OPT_MINLEN
55 #define IP6OPT_MINLEN	2
56 #endif
57 #ifndef IP6OPT_RTALERT_LEN
58 #define IP6OPT_RTALERT_LEN	4
59 #endif
60 #ifndef IP6OPT_JUMBO_LEN
61 #define IP6OPT_JUMBO_LEN	6
62 #endif
63 #define IP6OPT_HOMEADDR_MINLEN 18
64 #define IP6OPT_BU_MINLEN       10
65 #define IP6OPT_BA_MINLEN       13
66 #define IP6OPT_BR_MINLEN        2
67 #define IP6SOPT_ALTCOA        0x4
68 #define IP6SOPT_ALTCOA_MINLEN  18
69 #define IP6SOPT_UI            0x2
70 #define IP6SOPT_UI_MINLEN       4
71 
72 static void ip6_sopt_print(const u_char *, int);
73 
74 static void
75 ip6_sopt_print(const u_char *bp, int len)
76 {
77     int i;
78     int optlen;
79 
80     for (i = 0; i < len; i += optlen) {
81 	if (bp[i] == IP6OPT_PAD1)
82 	    optlen = 1;
83 	else {
84 	    if (i + 1 < len)
85 		optlen = bp[i + 1] + 2;
86 	    else
87 		goto trunc;
88 	}
89 	if (i + optlen > len)
90 	    goto trunc;
91 
92 	switch (bp[i]) {
93 	case IP6OPT_PAD1:
94             printf(", pad1");
95 	    break;
96 	case IP6OPT_PADN:
97 	    if (len - i < IP6OPT_MINLEN) {
98 		printf(", padn: trunc");
99 		goto trunc;
100 	    }
101             printf(", padn");
102 	    break;
103         case IP6SOPT_ALTCOA:
104              if (len - i < IP6SOPT_ALTCOA_MINLEN) {
105 		printf(", altcoa: trunc");
106 		goto trunc;
107 	    }
108             printf(", alt-CoA: %s", ip6addr_string(&bp[i+2]));
109 	    break;
110         case IP6SOPT_UI:
111              if (len - i < IP6SOPT_UI_MINLEN) {
112 		printf(", ui: trunc");
113 		goto trunc;
114 	    }
115             printf("(ui: 0x%04x) ", ntohs(*(u_int16_t *)&bp[i + 2]));
116 	    break;
117 	default:
118 	    if (len - i < IP6OPT_MINLEN) {
119 		printf(", sopt_type %d: trunc)", bp[i]);
120 		goto trunc;
121 	    }
122 	    printf(", sopt_type 0x%02x: len=%d", bp[i], bp[i + 1]);
123 	    break;
124 	}
125     }
126     return;
127 
128 trunc:
129     printf("[trunc] ");
130 }
131 
132 void
133 ip6_opt_print(const u_char *bp, int len)
134 {
135     int i;
136     int optlen;
137 
138     for (i = 0; i < len; i += optlen) {
139 	if (bp[i] == IP6OPT_PAD1)
140 	    optlen = 1;
141 	else {
142 	    if (i + 1 < len)
143 		optlen = bp[i + 1] + 2;
144 	    else
145 		goto trunc;
146 	}
147 	if (i + optlen > len)
148 	    goto trunc;
149 
150 	switch (bp[i]) {
151 	case IP6OPT_PAD1:
152             printf("(pad1)");
153 	    break;
154 	case IP6OPT_PADN:
155 	    if (len - i < IP6OPT_MINLEN) {
156 		printf("(padn: trunc)");
157 		goto trunc;
158 	    }
159             printf("(padn)");
160 	    break;
161 	case IP6OPT_ROUTER_ALERT:
162 	    if (len - i < IP6OPT_RTALERT_LEN) {
163 		printf("(rtalert: trunc)");
164 		goto trunc;
165 	    }
166 	    if (bp[i + 1] != IP6OPT_RTALERT_LEN - 2) {
167 		printf("(rtalert: invalid len %d)", bp[i + 1]);
168 		goto trunc;
169 	    }
170 	    printf("(rtalert: 0x%04x) ", ntohs(*(u_int16_t *)&bp[i + 2]));
171 	    break;
172 	case IP6OPT_JUMBO:
173 	    if (len - i < IP6OPT_JUMBO_LEN) {
174 		printf("(jumbo: trunc)");
175 		goto trunc;
176 	    }
177 	    if (bp[i + 1] != IP6OPT_JUMBO_LEN - 2) {
178 		printf("(jumbo: invalid len %d)", bp[i + 1]);
179 		goto trunc;
180 	    }
181 	    printf("(jumbo: %u) ", (u_int32_t)ntohl(*(u_int32_t *)&bp[i + 2]));
182 	    break;
183         case IP6OPT_HOME_ADDRESS:
184 	    if (len - i < IP6OPT_HOMEADDR_MINLEN) {
185 		printf("(homeaddr: trunc)");
186 		goto trunc;
187 	    }
188 	    if (bp[i + 1] < IP6OPT_HOMEADDR_MINLEN - 2) {
189 		printf("(homeaddr: invalid len %d)", bp[i + 1]);
190 		goto trunc;
191 	    }
192 	    printf("(homeaddr: %s", ip6addr_string(&bp[i + 2]));
193             if (bp[i + 1] > IP6OPT_HOMEADDR_MINLEN - 2) {
194 		ip6_sopt_print(&bp[i + IP6OPT_HOMEADDR_MINLEN],
195 		    (optlen - IP6OPT_HOMEADDR_MINLEN));
196 	    }
197             printf(")");
198 	    break;
199         case IP6OPT_BINDING_UPDATE:
200 	    if (len - i < IP6OPT_BU_MINLEN) {
201 		printf("(bu: trunc)");
202 		goto trunc;
203 	    }
204 	    if (bp[i + 1] < IP6OPT_BU_MINLEN - 2) {
205 		printf("(bu: invalid len %d)", bp[i + 1]);
206 		goto trunc;
207 	    }
208 	    printf("(bu: ");
209 	    if (bp[i + 2] & 0x80)
210 		    printf("A");
211 	    if (bp[i + 2] & 0x40)
212 		    printf("H");
213 	    if (bp[i + 2] & 0x20)
214 		    printf("R");
215 	    if (bp[i + 2] & 0x10)
216 		    printf("D");
217 	    if (bp[i + 2] & 0x0f)
218 		    printf("res");
219 	    printf(", prefixlen: %u", bp[i + 3]);
220 	    printf(", sequence: %u",
221 		(u_int16_t)ntohs(*(u_int16_t *)&bp[i + 4]));
222 	    printf(", lifetime: %u",
223 		(u_int32_t)ntohs(*(u_int32_t *)&bp[i + 8]));
224 
225 	    if (bp[i + 1] > IP6OPT_BU_MINLEN - 2) {
226 		ip6_sopt_print(&bp[i + IP6OPT_BU_MINLEN],
227 		    (optlen - IP6OPT_BU_MINLEN));
228 	    }
229 	    printf(")");
230 	    break;
231 	case IP6OPT_BINDING_ACK:
232 	    if (len - i < IP6OPT_BA_MINLEN) {
233 		printf("(ba: trunc)");
234 		goto trunc;
235 	    }
236 	    if (bp[i + 1] < IP6OPT_BA_MINLEN - 2) {
237 		printf("(ba: invalid len %d)", bp[i + 1]);
238 		goto trunc;
239 	    }
240 	    printf("(ba: ");
241 	    printf("status: %u", bp[i + 2]);
242 	    printf(", sequence: %u",
243 		(u_int16_t)ntohs(*(u_int16_t *)&bp[i + 3]));
244 	    printf(", lifetime: %u",
245 		(u_int32_t)ntohs(*(u_int32_t *)&bp[i + 7]));
246 	    printf(", refresh: %u",
247 		(u_int32_t)ntohs(*(u_int32_t *)&bp[i + 11]));
248 
249 	    if (bp[i + 1] > IP6OPT_BA_MINLEN - 2) {
250 		ip6_sopt_print(&bp[i + IP6OPT_BA_MINLEN],
251 		    (optlen - IP6OPT_BA_MINLEN));
252 	    }
253             printf(")");
254 	    break;
255         case IP6OPT_BINDING_REQ:
256 	    if (len - i < IP6OPT_BR_MINLEN) {
257 		printf("(br: trunc)");
258 		goto trunc;
259 	    }
260             printf("(br");
261             if (bp[i + 1] > IP6OPT_BR_MINLEN - 2) {
262 		ip6_sopt_print(&bp[i + IP6OPT_BR_MINLEN],
263 		    (optlen - IP6OPT_BR_MINLEN));
264 	    }
265             printf(")");
266 	    break;
267 	default:
268 	    if (len - i < IP6OPT_MINLEN) {
269 		printf("(type %d: trunc)", bp[i]);
270 		goto trunc;
271 	    }
272 	    printf("(opt_type 0x%02x: len=%d) ", bp[i], bp[i + 1]);
273 	    break;
274 	}
275     }
276 
277 #if 0
278 end:
279 #endif
280     return;
281 
282 trunc:
283     printf("[trunc] ");
284 }
285 
286 int
287 hbhopt_print(register const u_char *bp)
288 {
289     const struct ip6_hbh *dp = (struct ip6_hbh *)bp;
290     register const u_char *ep;
291     int hbhlen = 0;
292 
293     /* 'ep' points to the end of available data. */
294     ep = snapend;
295     TCHECK(dp->ip6h_len);
296     hbhlen = (int)((dp->ip6h_len + 1) << 3);
297     TCHECK2(*dp, hbhlen);
298     printf("HBH ");
299     if (vflag)
300 	ip6_opt_print((const u_char *)dp + sizeof(*dp), hbhlen - sizeof(*dp));
301 
302     return(hbhlen);
303 
304   trunc:
305     fputs("[|HBH]", stdout);
306     return(hbhlen);
307 }
308 
309 int
310 dstopt_print(register const u_char *bp)
311 {
312     const struct ip6_dest *dp = (struct ip6_dest *)bp;
313     register const u_char *ep;
314     int dstoptlen = 0;
315 
316     /* 'ep' points to the end of available data. */
317     ep = snapend;
318     TCHECK(dp->ip6d_len);
319     dstoptlen = (int)((dp->ip6d_len + 1) << 3);
320     TCHECK2(*dp, dstoptlen);
321     printf("DSTOPT ");
322     if (vflag) {
323 	ip6_opt_print((const u_char *)dp + sizeof(*dp),
324 	    dstoptlen - sizeof(*dp));
325     }
326 
327     return(dstoptlen);
328 
329   trunc:
330     fputs("[|DSTOPT]", stdout);
331     return(dstoptlen);
332 }
333 #endif /* INET6 */
334