2 * Copyright (C)2006 USAGI/WIDE Project
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 * Masahide NAKAMURA @USAGI
27 #include <sys/types.h>
28 #include <sys/socket.h>
29 #include <arpa/inet.h>
30 #include <sys/ioctl.h>
33 #include <linux/if_arp.h>
34 #include <linux/if_tunnel.h>
35 #include <linux/ip6_tunnel.h>
39 #include "ip_common.h"
41 #define IP6_FLOWINFO_TCLASS htonl(0x0FF00000)
42 #define IP6_FLOWINFO_FLOWLABEL htonl(0x000FFFFF)
44 #define DEFAULT_TNL_HOP_LIMIT (64)
46 static void usage(void) __attribute__((noreturn
));
48 static void usage(void)
50 fprintf(stderr
, "Usage: ip -f inet6 tunnel { add | change | del | show } [ NAME ]\n");
51 fprintf(stderr
, " [ mode { ip6ip6 | ipip6 | any } ]\n");
52 fprintf(stderr
, " [ remote ADDR local ADDR ] [ dev PHYS_DEV ]\n");
53 fprintf(stderr
, " [ encaplimit ELIM ]\n");
54 fprintf(stderr
," [ hoplimit TTL ] [ tclass TCLASS ] [ flowlabel FLOWLABEL ]\n");
55 fprintf(stderr
, " [ dscp inherit ]\n");
56 fprintf(stderr
, "\n");
57 fprintf(stderr
, "Where: NAME := STRING\n");
58 fprintf(stderr
, " ADDR := IPV6_ADDRESS\n");
59 fprintf(stderr
, " ELIM := { none | 0..255 }(default=%d)\n",
60 IPV6_DEFAULT_TNL_ENCAP_LIMIT
);
61 fprintf(stderr
, " TTL := 0..255 (default=%d)\n",
62 DEFAULT_TNL_HOP_LIMIT
);
63 fprintf(stderr
, " TOS := { 0x0..0xff | inherit }\n");
64 fprintf(stderr
, " FLOWLABEL := { 0x0..0xfffff | inherit }\n");
68 static void print_tunnel(struct ip6_tnl_parm
*p
)
73 inet_ntop(AF_INET6
, &p
->raddr
, remote
, sizeof(remote
));
74 inet_ntop(AF_INET6
, &p
->laddr
, local
, sizeof(local
));
76 printf("%s: %s/ipv6 remote %s local %s",
77 p
->name
, tnl_strproto(p
->proto
), remote
, local
);
79 const char *n
= ll_index_to_name(p
->link
);
84 if (p
->flags
& IP6_TNL_F_IGN_ENCAP_LIMIT
)
85 printf(" encaplimit none");
87 printf(" encaplimit %u", p
->encap_limit
);
89 printf(" hoplimit %u", p
->hop_limit
);
91 if (p
->flags
& IP6_TNL_F_USE_ORIG_TCLASS
)
92 printf(" tclass inherit");
94 __u32 val
= ntohl(p
->flowinfo
& IP6_FLOWINFO_TCLASS
);
95 printf(" tclass 0x%02x", (__u8
)(val
>> 20));
98 if (p
->flags
& IP6_TNL_F_USE_ORIG_FLOWLABEL
)
99 printf(" flowlabel inherit");
101 printf(" flowlabel 0x%05x", ntohl(p
->flowinfo
& IP6_FLOWINFO_FLOWLABEL
));
103 printf(" (flowinfo 0x%08x)", ntohl(p
->flowinfo
));
105 if (p
->flags
& IP6_TNL_F_RCV_DSCP_COPY
)
106 printf(" dscp inherit");
109 static int parse_args(int argc
, char **argv
, struct ip6_tnl_parm
*p
)
111 char medium
[IFNAMSIZ
];
113 memset(medium
, 0, sizeof(medium
));
116 if (strcmp(*argv
, "mode") == 0) {
118 if (strcmp(*argv
, "ipv6/ipv6") == 0 ||
119 strcmp(*argv
, "ip6ip6") == 0)
120 p
->proto
= IPPROTO_IPV6
;
121 else if (strcmp(*argv
, "ip/ipv6") == 0 ||
122 strcmp(*argv
, "ipv4/ipv6") == 0 ||
123 strcmp(*argv
, "ipip6") == 0 ||
124 strcmp(*argv
, "ip4ip6") == 0)
125 p
->proto
= IPPROTO_IPIP
;
126 else if (strcmp(*argv
, "any/ipv6") == 0 ||
127 strcmp(*argv
, "any") == 0)
130 fprintf(stderr
,"Cannot guess tunnel mode.\n");
133 } else if (strcmp(*argv
, "remote") == 0) {
136 get_prefix(&raddr
, *argv
, preferred_family
);
137 if (raddr
.family
== AF_UNSPEC
)
138 invarg("\"remote\" address family is AF_UNSPEC", *argv
);
139 memcpy(&p
->raddr
, &raddr
.data
, sizeof(p
->raddr
));
140 } else if (strcmp(*argv
, "local") == 0) {
143 get_prefix(&laddr
, *argv
, preferred_family
);
144 if (laddr
.family
== AF_UNSPEC
)
145 invarg("\"local\" address family is AF_UNSPEC", *argv
);
146 memcpy(&p
->laddr
, &laddr
.data
, sizeof(p
->laddr
));
147 } else if (strcmp(*argv
, "dev") == 0) {
149 strncpy(medium
, *argv
, IFNAMSIZ
- 1);
150 } else if (strcmp(*argv
, "encaplimit") == 0) {
152 if (strcmp(*argv
, "none") == 0) {
153 p
->flags
|= IP6_TNL_F_IGN_ENCAP_LIMIT
;
156 if (get_u8(&uval
, *argv
, 0) < -1)
157 invarg("invalid ELIM", *argv
);
158 p
->encap_limit
= uval
;
160 } else if (strcmp(*argv
, "hoplimit") == 0 ||
161 strcmp(*argv
, "ttl") == 0 ||
162 strcmp(*argv
, "hlim") == 0) {
165 if (get_u8(&uval
, *argv
, 0))
166 invarg("invalid TTL", *argv
);
168 } else if (strcmp(*argv
, "tclass") == 0 ||
169 strcmp(*argv
, "tc") == 0 ||
170 strcmp(*argv
, "tos") == 0 ||
171 matches(*argv
, "dsfield") == 0) {
174 if (strcmp(*argv
, "inherit") == 0)
175 p
->flags
|= IP6_TNL_F_USE_ORIG_TCLASS
;
177 if (get_u8(&uval
, *argv
, 16))
178 invarg("invalid TClass", *argv
);
179 p
->flowinfo
|= htonl((__u32
)uval
<< 20) & IP6_FLOWINFO_TCLASS
;
180 p
->flags
&= ~IP6_TNL_F_USE_ORIG_TCLASS
;
182 } else if (strcmp(*argv
, "flowlabel") == 0 ||
183 strcmp(*argv
, "fl") == 0) {
186 if (strcmp(*argv
, "inherit") == 0)
187 p
->flags
|= IP6_TNL_F_USE_ORIG_FLOWLABEL
;
189 if (get_u32(&uval
, *argv
, 16))
190 invarg("invalid Flowlabel", *argv
);
192 invarg("invalid Flowlabel", *argv
);
193 p
->flowinfo
|= htonl(uval
) & IP6_FLOWINFO_FLOWLABEL
;
194 p
->flags
&= ~IP6_TNL_F_USE_ORIG_FLOWLABEL
;
196 } else if (strcmp(*argv
, "dscp") == 0) {
198 if (strcmp(*argv
, "inherit") != 0)
199 invarg("not inherit", *argv
);
200 p
->flags
|= IP6_TNL_F_RCV_DSCP_COPY
;
202 if (strcmp(*argv
, "name") == 0) {
205 if (matches(*argv
, "help") == 0)
208 duparg2("name", *argv
);
209 strncpy(p
->name
, *argv
, IFNAMSIZ
- 1);
214 p
->link
= ll_name_to_index(medium
);
221 static void ip6_tnl_parm_init(struct ip6_tnl_parm
*p
, int apply_default
)
223 memset(p
, 0, sizeof(*p
));
224 p
->proto
= IPPROTO_IPV6
;
226 p
->hop_limit
= DEFAULT_TNL_HOP_LIMIT
;
227 p
->encap_limit
= IPV6_DEFAULT_TNL_ENCAP_LIMIT
;
232 * @p1: user specified parameter
233 * @p2: database entry
235 static int ip6_tnl_parm_match(const struct ip6_tnl_parm
*p1
,
236 const struct ip6_tnl_parm
*p2
)
238 return ((!p1
->link
|| p1
->link
== p2
->link
) &&
239 (!p1
->name
[0] || strcmp(p1
->name
, p2
->name
) == 0) &&
240 (memcmp(&p1
->laddr
, &in6addr_any
, sizeof(p1
->laddr
)) == 0 ||
241 memcmp(&p1
->laddr
, &p2
->laddr
, sizeof(p1
->laddr
)) == 0) &&
242 (memcmp(&p1
->raddr
, &in6addr_any
, sizeof(p1
->raddr
)) == 0 ||
243 memcmp(&p1
->raddr
, &p2
->raddr
, sizeof(p1
->raddr
)) == 0) &&
244 (!p1
->proto
|| !p2
->proto
|| p1
->proto
== p2
->proto
) &&
245 (!p1
->encap_limit
|| p1
->encap_limit
== p2
->encap_limit
) &&
246 (!p1
->hop_limit
|| p1
->hop_limit
== p2
->hop_limit
) &&
247 (!(p1
->flowinfo
& IP6_FLOWINFO_TCLASS
) ||
248 !((p1
->flowinfo
^ p2
->flowinfo
) & IP6_FLOWINFO_TCLASS
)) &&
249 (!(p1
->flowinfo
& IP6_FLOWINFO_FLOWLABEL
) ||
250 !((p1
->flowinfo
^ p2
->flowinfo
) & IP6_FLOWINFO_FLOWLABEL
)) &&
251 (!p1
->flags
|| (p1
->flags
& p2
->flags
)));
254 static int do_tunnels_list(struct ip6_tnl_parm
*p
)
258 FILE *fp
= fopen("/proc/net/dev", "r");
264 /* skip two lines at the begenning of the file */
265 if (!fgets(buf
, sizeof(buf
), fp
) ||
266 !fgets(buf
, sizeof(buf
), fp
)) {
267 fprintf(stderr
, "/proc/net/dev read error\n");
271 while (fgets(buf
, sizeof(buf
), fp
) != NULL
) {
274 unsigned long rx_bytes
, rx_packets
, rx_errs
, rx_drops
,
276 tx_bytes
, tx_packets
, tx_errs
, tx_drops
,
277 tx_fifo
, tx_colls
, tx_carrier
, rx_multi
;
278 struct ip6_tnl_parm p1
;
281 buf
[sizeof(buf
) - 1] = '\0';
282 if ((ptr
= strchr(buf
, ':')) == NULL
||
283 (*ptr
++ = 0, sscanf(buf
, "%s", name
) != 1)) {
284 fprintf(stderr
, "Wrong format of /proc/net/dev. Sorry.\n");
287 if (sscanf(ptr
, "%ld%ld%ld%ld%ld%ld%ld%*d%ld%ld%ld%ld%ld%ld%ld",
288 &rx_bytes
, &rx_packets
, &rx_errs
, &rx_drops
,
289 &rx_fifo
, &rx_frame
, &rx_multi
,
290 &tx_bytes
, &tx_packets
, &tx_errs
, &tx_drops
,
291 &tx_fifo
, &tx_colls
, &tx_carrier
) != 14)
293 if (p
->name
[0] && strcmp(p
->name
, name
))
295 index
= ll_name_to_index(name
);
298 type
= ll_index_to_type(index
);
300 fprintf(stderr
, "Failed to get type of [%s]\n", name
);
303 if (type
!= ARPHRD_TUNNEL6
)
305 memset(&p1
, 0, sizeof(p1
));
306 ip6_tnl_parm_init(&p1
, 0);
307 strcpy(p1
.name
, name
);
308 p1
.link
= ll_name_to_index(p1
.name
);
311 if (tnl_get_ioctl(p1
.name
, &p1
))
313 if (!ip6_tnl_parm_match(p
, &p1
))
318 printf("RX: Packets Bytes Errors CsumErrs OutOfSeq Mcasts%s", _SL_
);
319 printf(" %-10ld %-12ld %-6ld %-8ld %-8ld %-8ld%s",
320 rx_packets
, rx_bytes
, rx_errs
, rx_frame
, rx_fifo
, rx_multi
, _SL_
);
321 printf("TX: Packets Bytes Errors DeadLoop NoRoute NoBufs%s", _SL_
);
322 printf(" %-10ld %-12ld %-6ld %-8ld %-8ld %-6ld",
323 tx_packets
, tx_bytes
, tx_errs
, tx_colls
, tx_carrier
, tx_drops
);
335 static int do_show(int argc
, char **argv
)
337 struct ip6_tnl_parm p
;
340 ip6_tnl_parm_init(&p
, 0);
341 p
.proto
= 0; /* default to any */
343 if (parse_args(argc
, argv
, &p
) < 0)
346 if (!p
.name
[0] || show_stats
)
349 if (tnl_get_ioctl(p
.name
, &p
))
358 static int do_add(int cmd
, int argc
, char **argv
)
360 struct ip6_tnl_parm p
;
362 ip6_tnl_parm_init(&p
, 1);
364 if (parse_args(argc
, argv
, &p
) < 0)
367 return tnl_add_ioctl(cmd
,
368 cmd
== SIOCCHGTUNNEL
&& p
.name
[0] ?
369 p
.name
: "ip6tnl0", p
.name
, &p
);
372 static int do_del(int argc
, char **argv
)
374 struct ip6_tnl_parm p
;
376 ip6_tnl_parm_init(&p
, 1);
378 if (parse_args(argc
, argv
, &p
) < 0)
381 return tnl_del_ioctl(p
.name
[0] ? p
.name
: "ip6tnl0", p
.name
, &p
);
384 int do_ip6tunnel(int argc
, char **argv
)
386 switch (preferred_family
) {
388 preferred_family
= AF_INET6
;
393 fprintf(stderr
, "Unsupported family:%d\n", preferred_family
);
398 if (matches(*argv
, "add") == 0)
399 return do_add(SIOCADDTUNNEL
, argc
- 1, argv
+ 1);
400 if (matches(*argv
, "change") == 0)
401 return do_add(SIOCCHGTUNNEL
, argc
- 1, argv
+ 1);
402 if (matches(*argv
, "del") == 0)
403 return do_del(argc
- 1, argv
+ 1);
404 if (matches(*argv
, "show") == 0 ||
405 matches(*argv
, "lst") == 0 ||
406 matches(*argv
, "list") == 0)
407 return do_show(argc
- 1, argv
+ 1);
408 if (matches(*argv
, "help") == 0)
411 return do_show(0, NULL
);
413 fprintf(stderr
, "Command \"%s\" is unknown, try \"ip -f inet6 tunnel help\".\n", *argv
);