1 /* 2 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994 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 24 #ifndef lint 25 static const char rcsid[] = 26 "@(#) $Header: /tcpdump/master/tcpdump/print-ip6.c,v 1.21 2001/11/16 02:17:36 itojun Exp $"; 27 #endif 28 29 #ifdef HAVE_CONFIG_H 30 #include "config.h" 31 #endif 32 33 #ifdef INET6 34 35 #include <sys/param.h> 36 #include <sys/time.h> 37 #include <sys/types.h> 38 #include <sys/socket.h> 39 40 #include <netinet/in.h> 41 42 #include <stdio.h> 43 #include <stdlib.h> 44 #include <unistd.h> 45 #include <string.h> 46 47 #include "interface.h" 48 #include "addrtoname.h" 49 50 #include "ip6.h" 51 52 /* 53 * print an IP6 datagram. 54 */ 55 void 56 ip6_print(register const u_char *bp, register u_int length) 57 { 58 register const struct ip6_hdr *ip6; 59 register int advance; 60 register u_int len; 61 register const u_char *cp; 62 int nh; 63 int fragmented = 0; 64 u_int flow; 65 66 ip6 = (const struct ip6_hdr *)bp; 67 68 #ifdef LBL_ALIGN 69 /* 70 * The IP6 header is not 16-byte aligned, so copy into abuf. 71 */ 72 if ((u_long)ip6 & 15) { 73 static u_char *abuf; 74 75 if (abuf == NULL) { 76 abuf = malloc(snaplen); 77 if (abuf == NULL) 78 error("ip6_print: malloc"); 79 } 80 memcpy(abuf, ip6, min(length, snaplen)); 81 snapend += abuf - (u_char *)ip6; 82 packetp = abuf; 83 ip6 = (struct ip6_hdr *)abuf; 84 bp = abuf; 85 } 86 #endif 87 TCHECK(*ip6); 88 if (length < sizeof (struct ip6_hdr)) { 89 (void)printf("truncated-ip6 %d", length); 90 return; 91 } 92 advance = sizeof(struct ip6_hdr); 93 94 len = ntohs(ip6->ip6_plen); 95 if (length < len + advance) 96 (void)printf("truncated-ip6 - %d bytes missing!", 97 len + advance - length); 98 99 cp = (const u_char *)ip6; 100 nh = ip6->ip6_nxt; 101 while (cp < snapend) { 102 cp += advance; 103 104 if (cp == (const u_char *)(ip6 + 1) 105 && nh != IPPROTO_TCP && nh != IPPROTO_UDP) { 106 (void)printf("%s > %s: ", ip6addr_string(&ip6->ip6_src), 107 ip6addr_string(&ip6->ip6_dst)); 108 } 109 110 switch (nh) { 111 case IPPROTO_HOPOPTS: 112 advance = hbhopt_print(cp); 113 nh = *cp; 114 break; 115 case IPPROTO_DSTOPTS: 116 advance = dstopt_print(cp); 117 nh = *cp; 118 break; 119 case IPPROTO_FRAGMENT: 120 advance = frag6_print(cp, (const u_char *)ip6); 121 if (snapend <= cp + advance) 122 goto end; 123 nh = *cp; 124 fragmented = 1; 125 break; 126 case IPPROTO_ROUTING: 127 advance = rt6_print(cp, (const u_char *)ip6); 128 nh = *cp; 129 break; 130 case IPPROTO_TCP: 131 tcp_print(cp, len + sizeof(struct ip6_hdr) - (cp - bp), 132 (const u_char *)ip6, fragmented); 133 goto end; 134 case IPPROTO_UDP: 135 udp_print(cp, len + sizeof(struct ip6_hdr) - (cp - bp), 136 (const u_char *)ip6, fragmented); 137 goto end; 138 case IPPROTO_ICMPV6: 139 icmp6_print(cp, (const u_char *)ip6); 140 goto end; 141 case IPPROTO_AH: 142 advance = ah_print(cp, (const u_char *)ip6); 143 nh = *cp; 144 break; 145 case IPPROTO_ESP: 146 { 147 int enh, padlen; 148 advance = esp_print(cp, (const u_char *)ip6, &enh, &padlen); 149 if (enh < 0) 150 goto end; 151 nh = enh & 0xff; 152 len -= padlen; 153 break; 154 } 155 #ifndef IPPROTO_IPCOMP 156 #define IPPROTO_IPCOMP 108 157 #endif 158 case IPPROTO_IPCOMP: 159 { 160 int enh; 161 advance = ipcomp_print(cp, (const u_char *)ip6, &enh); 162 if (enh < 0) 163 goto end; 164 nh = enh & 0xff; 165 break; 166 } 167 168 #ifndef IPPROTO_PIM 169 #define IPPROTO_PIM 103 170 #endif 171 case IPPROTO_PIM: 172 pim_print(cp, len); 173 goto end; 174 #ifndef IPPROTO_OSPF 175 #define IPPROTO_OSPF 89 176 #endif 177 case IPPROTO_OSPF: 178 ospf6_print(cp, len); 179 goto end; 180 case IPPROTO_IPV6: 181 ip6_print(cp, len); 182 goto end; 183 #ifndef IPPROTO_IPV4 184 #define IPPROTO_IPV4 4 185 #endif 186 case IPPROTO_IPV4: 187 ip_print(cp, len); 188 goto end; 189 case IPPROTO_NONE: 190 (void)printf("no next header"); 191 goto end; 192 193 default: 194 (void)printf("ip-proto-%d %d", ip6->ip6_nxt, len); 195 goto end; 196 } 197 } 198 199 end: 200 201 flow = ntohl(ip6->ip6_flow); 202 #if 0 203 /* rfc1883 */ 204 if (flow & 0x0f000000) 205 (void)printf(" [pri 0x%x]", (flow & 0x0f000000) >> 24); 206 if (flow & 0x00ffffff) 207 (void)printf(" [flowlabel 0x%x]", flow & 0x00ffffff); 208 #else 209 /* RFC 2460 */ 210 if (flow & 0x0ff00000) 211 (void)printf(" [class 0x%x]", (flow & 0x0ff00000) >> 20); 212 if (flow & 0x000fffff) 213 (void)printf(" [flowlabel 0x%x]", flow & 0x000fffff); 214 #endif 215 216 if (ip6->ip6_hlim <= 1) 217 (void)printf(" [hlim %d]", (int)ip6->ip6_hlim); 218 219 if (vflag) { 220 printf(" ("); 221 (void)printf("len %d", len); 222 if (ip6->ip6_hlim > 1) 223 (void)printf(", hlim %d", (int)ip6->ip6_hlim); 224 printf(")"); 225 } 226 return; 227 trunc: 228 (void)printf("[|ip6]"); 229 } 230 231 #endif /* INET6 */ 232