]> git.proxmox.com Git - mirror_iproute2.git/blame - ip/iproute.c
projects / mirror_iproute2.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
lwtunnel: Add encapsulation support to ip route
[mirror_iproute2.git] / ip / iproute.c
CommitLineData
aba5acdf
SH		 1/*
2 * iproute.c "ip route".
3 *
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; either version
7 * 2 of the License, or (at your option) any later version.
8 *
9 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
10 *
aba5acdf
SH		 11 */
12
13#include <stdio.h>
14#include <stdlib.h>
15#include <unistd.h>
16#include <syslog.h>
17#include <fcntl.h>
18#include <string.h>
33551240 19#include <time.h>
aba5acdf
SH		 20#include <sys/time.h>
21#include <sys/socket.h>
22#include <netinet/in.h>
23#include <netinet/ip.h>
24#include <arpa/inet.h>
25#include <linux/in_route.h>
194e9b85 26#include <linux/icmpv6.h>
f4ff11e3 27#include <errno.h>
aba5acdf
SH		 28
29#include "rt_names.h"
30#include "utils.h"
31#include "ip_common.h"
1e529305 32#include "iproute_lwtunnel.h"
aba5acdf
SH		 33
34#ifndef RTAX_RTTVAR
35#define RTAX_RTTVAR RTAX_HOPS
36#endif
37
f4ff11e3
DS		 38enum list_action {
39 IPROUTE_LIST,
40 IPROUTE_FLUSH,
41 IPROUTE_SAVE,
42};
f38c7334
SH		 43static const char *mx_names[RTAX_MAX+1] = {
44 [RTAX_MTU] = "mtu",
45 [RTAX_WINDOW] = "window",
46 [RTAX_RTT] = "rtt",
47 [RTAX_RTTVAR] = "rttvar",
48 [RTAX_SSTHRESH] = "ssthresh",
49 [RTAX_CWND] = "cwnd",
50 [RTAX_ADVMSS] = "advmss",
51 [RTAX_REORDERING]="reordering",
52 [RTAX_HOPLIMIT] = "hoplimit",
53 [RTAX_INITCWND] = "initcwnd",
54 [RTAX_FEATURES] = "features",
54e0b2e7 55 [RTAX_RTO_MIN] = "rto_min",
f5fd8003 56 [RTAX_INITRWND] = "initrwnd",
b37f2c89 57 [RTAX_QUICKACK] = "quickack",
6ef87f9c 58 [RTAX_CC_ALGO] = "congctl",
f38c7334 59};
aba5acdf
SH		 60static void usage(void) __attribute__((noreturn));
61
62static void usage(void)
63{
64 fprintf(stderr, "Usage: ip route { list | flush } SELECTOR\n");
f4ff11e3
DS		 65 fprintf(stderr, " ip route save SELECTOR\n");
66 fprintf(stderr, " ip route restore\n");
93b79863 67 fprintf(stderr, " ip route showdump\n");
aba5acdf 68 fprintf(stderr, " ip route get ADDRESS [ from ADDRESS iif STRING ]\n");
8f480637 69 fprintf(stderr, " [ oif STRING ] [ tos TOS ]\n");
b0373bfb 70 fprintf(stderr, " [ mark NUMBER ]\n");
c0c44bfe 71 fprintf(stderr, " ip route { add | del | change | append | replace } ROUTE\n");
aba5acdf
SH		 72 fprintf(stderr, "SELECTOR := [ root PREFIX ] [ match PREFIX ] [ exact PREFIX ]\n");
73 fprintf(stderr, " [ table TABLE_ID ] [ proto RTPROTO ]\n");
74 fprintf(stderr, " [ type TYPE ] [ scope SCOPE ]\n");
75 fprintf(stderr, "ROUTE := NODE_SPEC [ INFO_SPEC ]\n");
76 fprintf(stderr, "NODE_SPEC := [ TYPE ] PREFIX [ tos TOS ]\n");
77 fprintf(stderr, " [ table TABLE_ID ] [ proto RTPROTO ]\n");
78 fprintf(stderr, " [ scope SCOPE ] [ metric METRIC ]\n");
79 fprintf(stderr, "INFO_SPEC := NH OPTIONS FLAGS [ nexthop NH ]...\n");
1e529305
RP		 80 fprintf(stderr, "NH := [ encap ENCAPTYPE ENCAPHDR ] [ via [ FAMILY ] ADDRESS ]\n");
81 fprintf(stderr, " [ dev STRING ] [ weight NUMBER ] NHFLAGS\n");
38a7f268 82 fprintf(stderr, "FAMILY := [ inet | inet6 | ipx | dnet | mpls | bridge | link ]\n");
6f7a9f4d 83 fprintf(stderr, "OPTIONS := FLAGS [ mtu NUMBER ] [ advmss NUMBER ] [ as [ to ] ADDRESS ]\n");
8f480637 84 fprintf(stderr, " [ rtt TIME ] [ rttvar TIME ] [ reordering NUMBER ]\n");
a1f1143e 85 fprintf(stderr, " [ window NUMBER] [ cwnd NUMBER ] [ initcwnd NUMBER ]\n");
576c63ee 86 fprintf(stderr, " [ ssthresh NUMBER ] [ realms REALM ] [ src ADDRESS ]\n");
f5fd8003 87 fprintf(stderr, " [ rto_min TIME ] [ hoplimit NUMBER ] [ initrwnd NUMBER ]\n");
6ef87f9c 88 fprintf(stderr, " [ features FEATURES ] [ quickack BOOL ] [ congctl NAME ]\n");
194e9b85 89 fprintf(stderr, " [ pref PREF ]\n");
aba5acdf
SH		 90 fprintf(stderr, "TYPE := [ unicast | local | broadcast | multicast | throw |\n");
91 fprintf(stderr, " unreachable | prohibit | blackhole | nat ]\n");
92 fprintf(stderr, "TABLE_ID := [ local | main | default | all | NUMBER ]\n");
93 fprintf(stderr, "SCOPE := [ host | link | global | NUMBER ]\n");
aba5acdf
SH		 94 fprintf(stderr, "NHFLAGS := [ onlink | pervasive ]\n");
95 fprintf(stderr, "RTPROTO := [ kernel | boot | static | NUMBER ]\n");
194e9b85 96 fprintf(stderr, "PREF := [ low | medium | high ]\n");
9b2cdc00 97 fprintf(stderr, "TIME := NUMBER[s|ms]\n");
b37f2c89 98 fprintf(stderr, "BOOL := [1|0]\n");
29d1f730 99 fprintf(stderr, "FEATURES := ecn\n");
1e529305
RP		 100 fprintf(stderr, "ENCAPTYPE := [ mpls | ip | ip6 ]\n");
101 fprintf(stderr, "ENCAPHDR := [ MPLSLABEL ]\n");
aba5acdf
SH		 102 exit(-1);
103}
104
105
106static struct
107{
caae16b3 108 unsigned int tb;
bd4bcdad 109 int cloned;
aba5acdf
SH		 110 int flushed;
111 char *flushb;
112 int flushp;
113 int flushe;
aba5acdf
SH		 114 int protocol, protocolmask;
115 int scope, scopemask;
116 int type, typemask;
117 int tos, tosmask;
118 int iif, iifmask;
119 int oif, oifmask;
b0373bfb 120 int mark, markmask;
aba5acdf
SH		 121 int realm, realmmask;
122 inet_prefix rprefsrc;
123 inet_prefix rvia;
124 inet_prefix rdst;
125 inet_prefix mdst;
126 inet_prefix rsrc;
127 inet_prefix msrc;
128} filter;
129
130static int flush_update(void)
131{
f31a37f7 132 if (rtnl_send_check(&rth, filter.flushb, filter.flushp) < 0) {
1fb0a998 133 perror("Failed to send flush request");
aba5acdf
SH		 134 return -1;
135 }
136 filter.flushp = 0;
137 return 0;
138}
139
d1f28cf1 140static int filter_nlmsg(struct nlmsghdr *n, struct rtattr **tb, int host_len)
aba5acdf 141{
aba5acdf 142 struct rtmsg *r = NLMSG_DATA(n);
aba5acdf
SH		 143 inet_prefix dst;
144 inet_prefix src;
aba5acdf 145 inet_prefix via;
f4ff11e3 146 inet_prefix prefsrc;
34e95647 147 __u32 table;
f4ff11e3 148 static int ip6_multiple_tables;
aba5acdf 149
34e95647
PM		 150 table = rtm_get_table(r, tb);
151
5b9ac190
AV		 152 if (preferred_family != AF_UNSPEC && r->rtm_family != preferred_family)
153 return 0;
154
34e95647 155 if (r->rtm_family == AF_INET6 && table != RT_TABLE_MAIN)
e0b29fe7
PM		 156 ip6_multiple_tables = 1;
157
44792827
UW		 158 if (filter.cloned == !(r->rtm_flags&RTM_F_CLONED))
159 return 0;
160
e0b29fe7 161 if (r->rtm_family == AF_INET6 && !ip6_multiple_tables) {
aba5acdf 162 if (filter.tb) {
bd4bcdad
PM		 163 if (filter.tb == RT_TABLE_LOCAL) {
164 if (r->rtm_type != RTN_LOCAL)
aba5acdf 165 return 0;
bd4bcdad
PM		 166 } else if (filter.tb == RT_TABLE_MAIN) {
167 if (r->rtm_type == RTN_LOCAL)
aba5acdf 168 return 0;
bd4bcdad
PM		 169 } else {
170 return 0;
aba5acdf
SH		 171 }
172 }
173 } else {
34e95647 174 if (filter.tb > 0 && filter.tb != table)
aba5acdf
SH		 175 return 0;
176 }
177 if ((filter.protocol^r->rtm_protocol)&filter.protocolmask)
178 return 0;
179 if ((filter.scope^r->rtm_scope)&filter.scopemask)
180 return 0;
181 if ((filter.type^r->rtm_type)&filter.typemask)
182 return 0;
183 if ((filter.tos^r->rtm_tos)&filter.tosmask)
184 return 0;
185 if (filter.rdst.family &&
186 (r->rtm_family != filter.rdst.family || filter.rdst.bitlen > r->rtm_dst_len))
187 return 0;
188 if (filter.mdst.family &&
189 (r->rtm_family != filter.mdst.family ||
190 (filter.mdst.bitlen >= 0 && filter.mdst.bitlen < r->rtm_dst_len)))
191 return 0;
192 if (filter.rsrc.family &&
193 (r->rtm_family != filter.rsrc.family || filter.rsrc.bitlen > r->rtm_src_len))
194 return 0;
195 if (filter.msrc.family &&
196 (r->rtm_family != filter.msrc.family ||
197 (filter.msrc.bitlen >= 0 && filter.msrc.bitlen < r->rtm_src_len)))
198 return 0;
93ae2835
EB		 199 if (filter.rvia.family) {
200 int family = r->rtm_family;
201 if (tb[RTA_VIA]) {
202 struct rtvia *via = RTA_DATA(tb[RTA_VIA]);
203 family = via->rtvia_family;
204 }
205 if (family != filter.rvia.family)
206 return 0;
207 }
aba5acdf
SH		 208 if (filter.rprefsrc.family && r->rtm_family != filter.rprefsrc.family)
209 return 0;
210
aba5acdf
SH		 211 memset(&dst, 0, sizeof(dst));
212 dst.family = r->rtm_family;
213 if (tb[RTA_DST])
214 memcpy(&dst.data, RTA_DATA(tb[RTA_DST]), (r->rtm_dst_len+7)/8);
215 if (filter.rsrc.family || filter.msrc.family) {
216 memset(&src, 0, sizeof(src));
217 src.family = r->rtm_family;
218 if (tb[RTA_SRC])
219 memcpy(&src.data, RTA_DATA(tb[RTA_SRC]), (r->rtm_src_len+7)/8);
220 }
221 if (filter.rvia.bitlen>0) {
222 memset(&via, 0, sizeof(via));
223 via.family = r->rtm_family;
224 if (tb[RTA_GATEWAY])
7849fb55 225 memcpy(&via.data, RTA_DATA(tb[RTA_GATEWAY]), host_len/8);
93ae2835
EB		 226 if (tb[RTA_VIA]) {
227 size_t len = RTA_PAYLOAD(tb[RTA_VIA]) - 2;
228 struct rtvia *rtvia = RTA_DATA(tb[RTA_VIA]);
229 via.family = rtvia->rtvia_family;
230 memcpy(&via.data, rtvia->rtvia_addr, len);
231 }
aba5acdf
SH		 232 }
233 if (filter.rprefsrc.bitlen>0) {
234 memset(&prefsrc, 0, sizeof(prefsrc));
235 prefsrc.family = r->rtm_family;
236 if (tb[RTA_PREFSRC])
7849fb55 237 memcpy(&prefsrc.data, RTA_DATA(tb[RTA_PREFSRC]), host_len/8);
aba5acdf
SH		 238 }
239
240 if (filter.rdst.family && inet_addr_match(&dst, &filter.rdst, filter.rdst.bitlen))
241 return 0;
242 if (filter.mdst.family && filter.mdst.bitlen >= 0 &&
243 inet_addr_match(&dst, &filter.mdst, r->rtm_dst_len))
244 return 0;
245
246 if (filter.rsrc.family && inet_addr_match(&src, &filter.rsrc, filter.rsrc.bitlen))
247 return 0;
248 if (filter.msrc.family && filter.msrc.bitlen >= 0 &&
249 inet_addr_match(&src, &filter.msrc, r->rtm_src_len))
250 return 0;
251
252 if (filter.rvia.family && inet_addr_match(&via, &filter.rvia, filter.rvia.bitlen))
253 return 0;
254 if (filter.rprefsrc.family && inet_addr_match(&prefsrc, &filter.rprefsrc, filter.rprefsrc.bitlen))
255 return 0;
256 if (filter.realmmask) {
257 __u32 realms = 0;
258 if (tb[RTA_FLOW])
ff24746c 259 realms = rta_getattr_u32(tb[RTA_FLOW]);
aba5acdf
SH		 260 if ((realms^filter.realm)&filter.realmmask)
261 return 0;
262 }
263 if (filter.iifmask) {
264 int iif = 0;
265 if (tb[RTA_IIF])
266 iif = *(int*)RTA_DATA(tb[RTA_IIF]);
267 if ((iif^filter.iif)&filter.iifmask)
268 return 0;
269 }
270 if (filter.oifmask) {
271 int oif = 0;
272 if (tb[RTA_OIF])
273 oif = *(int*)RTA_DATA(tb[RTA_OIF]);
274 if ((oif^filter.oif)&filter.oifmask)
275 return 0;
276 }
b0373bfb
ED		 277 if (filter.markmask) {
278 int mark = 0;
279 if (tb[RTA_MARK])
280 mark = *(int *)RTA_DATA(tb[RTA_MARK]);
281 if ((mark ^ filter.mark) & filter.markmask)
282 return 0;
283 }
ae665a52 284 if (filter.flushb &&
aba5acdf
SH		 285 r->rtm_family == AF_INET6 &&
286 r->rtm_dst_len == 0 &&
287 r->rtm_type == RTN_UNREACHABLE &&
288 tb[RTA_PRIORITY] &&
289 *(int*)RTA_DATA(tb[RTA_PRIORITY]) == -1)
290 return 0;
291
f4ff11e3
DS		 292 return 1;
293}
294
29d1f730
FW		 295static void print_rtax_features(FILE *fp, unsigned int features)
296{
297 unsigned int of = features;
298
299 if (features & RTAX_FEATURE_ECN) {
300 fprintf(fp, " ecn");
301 features &= ~RTAX_FEATURE_ECN;
302 }
303
304 if (features)
305 fprintf(fp, " 0x%x", of);
306}
307
f4ff11e3
DS		 308int print_route(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
309{
310 FILE *fp = (FILE*)arg;
311 struct rtmsg *r = NLMSG_DATA(n);
312 int len = n->nlmsg_len;
313 struct rtattr * tb[RTA_MAX+1];
314 char abuf[256];
f3a2ddc1 315 int host_len;
f4ff11e3
DS		 316 __u32 table;
317 SPRINT_BUF(b1);
318 static int hz;
319
320 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
321 fprintf(stderr, "Not a route: %08x %08x %08x\n",
322 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
323 return 0;
324 }
325 if (filter.flushb && n->nlmsg_type != RTM_NEWROUTE)
326 return 0;
327 len -= NLMSG_LENGTH(sizeof(*r));
328 if (len < 0) {
329 fprintf(stderr, "BUG: wrong nlmsg len %d\n", len);
330 return -1;
331 }
332
f3a2ddc1 333 host_len = af_bit_len(r->rtm_family);
f4ff11e3
DS		 334
335 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
336 table = rtm_get_table(r, tb);
337
338 if (!filter_nlmsg(n, tb, host_len))
339 return 0;
340
aba5acdf
SH		 341 if (filter.flushb) {
342 struct nlmsghdr *fn;
343 if (NLMSG_ALIGN(filter.flushp) + n->nlmsg_len > filter.flushe) {
344 if (flush_update())
345 return -1;
346 }
347 fn = (struct nlmsghdr*)(filter.flushb + NLMSG_ALIGN(filter.flushp));
348 memcpy(fn, n, n->nlmsg_len);
349 fn->nlmsg_type = RTM_DELROUTE;
350 fn->nlmsg_flags = NLM_F_REQUEST;
351efcde 351 fn->nlmsg_seq = ++rth.seq;
aba5acdf
SH		 352 filter.flushp = (((char*)fn) + n->nlmsg_len) - filter.flushb;
353 filter.flushed++;
354 if (show_stats < 2)
355 return 0;
356 }
357
358 if (n->nlmsg_type == RTM_DELROUTE)
359 fprintf(fp, "Deleted ");
577e5a53 360 if ((r->rtm_type != RTN_UNICAST || show_details > 0) && !filter.type)
aba5acdf
SH		 361 fprintf(fp, "%s ", rtnl_rtntype_n2a(r->rtm_type, b1, sizeof(b1)));
362
363 if (tb[RTA_DST]) {
364 if (r->rtm_dst_len != host_len) {
365 fprintf(fp, "%s/%u ", rt_addr_n2a(r->rtm_family,
26dcdf3a
EB		 366 RTA_PAYLOAD(tb[RTA_DST]),
367 RTA_DATA(tb[RTA_DST]),
368 abuf, sizeof(abuf)),
aba5acdf
SH		 369 r->rtm_dst_len
370 );
371 } else {
372 fprintf(fp, "%s ", format_host(r->rtm_family,
373 RTA_PAYLOAD(tb[RTA_DST]),
374 RTA_DATA(tb[RTA_DST]),
375 abuf, sizeof(abuf))
376 );
377 }
378 } else if (r->rtm_dst_len) {
379 fprintf(fp, "0/%d ", r->rtm_dst_len);
380 } else {
381 fprintf(fp, "default ");
382 }
383 if (tb[RTA_SRC]) {
384 if (r->rtm_src_len != host_len) {
385 fprintf(fp, "from %s/%u ", rt_addr_n2a(r->rtm_family,
26dcdf3a
EB		 386 RTA_PAYLOAD(tb[RTA_SRC]),
387 RTA_DATA(tb[RTA_SRC]),
388 abuf, sizeof(abuf)),
aba5acdf
SH		 389 r->rtm_src_len
390 );
391 } else {
392 fprintf(fp, "from %s ", format_host(r->rtm_family,
393 RTA_PAYLOAD(tb[RTA_SRC]),
394 RTA_DATA(tb[RTA_SRC]),
395 abuf, sizeof(abuf))
396 );
397 }
398 } else if (r->rtm_src_len) {
399 fprintf(fp, "from 0/%u ", r->rtm_src_len);
400 }
6f7a9f4d
EB		 401 if (tb[RTA_NEWDST]) {
402 fprintf(fp, "as to %s ", format_host(r->rtm_family,
403 RTA_PAYLOAD(tb[RTA_NEWDST]),
404 RTA_DATA(tb[RTA_NEWDST]),
405 abuf, sizeof(abuf))
406 );
407 }
1e529305
RP		 408
409 if (tb[RTA_ENCAP])
410 lwt_print_encap(fp, tb[RTA_ENCAP_TYPE], tb[RTA_ENCAP]);
411
aba5acdf
SH		 412 if (r->rtm_tos && filter.tosmask != -1) {
413 SPRINT_BUF(b1);
414 fprintf(fp, "tos %s ", rtnl_dsfield_n2a(r->rtm_tos, b1, sizeof(b1)));
415 }
02d2ae55 416
aba5acdf 417 if (tb[RTA_GATEWAY] && filter.rvia.bitlen != host_len) {
ae665a52 418 fprintf(fp, "via %s ",
aba5acdf
SH		 419 format_host(r->rtm_family,
420 RTA_PAYLOAD(tb[RTA_GATEWAY]),
421 RTA_DATA(tb[RTA_GATEWAY]),
422 abuf, sizeof(abuf)));
423 }
93ae2835
EB		 424 if (tb[RTA_VIA]) {
425 size_t len = RTA_PAYLOAD(tb[RTA_VIA]) - 2;
426 struct rtvia *via = RTA_DATA(tb[RTA_VIA]);
427 fprintf(fp, "via %s %s ",
428 family_name(via->rtvia_family),
429 format_host(via->rtvia_family, len, via->rtvia_addr,
430 abuf, sizeof(abuf)));
431 }
aba5acdf
SH		 432 if (tb[RTA_OIF] && filter.oifmask != -1)
433 fprintf(fp, "dev %s ", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_OIF])));
434
bc234301
DA		 435 if (table && (table != RT_TABLE_MAIN || show_details > 0) && !filter.tb)
436 fprintf(fp, " table %s ", rtnl_rttable_n2a(table, b1, sizeof(b1)));
aba5acdf 437 if (!(r->rtm_flags&RTM_F_CLONED)) {
577e5a53 438 if ((r->rtm_protocol != RTPROT_BOOT || show_details > 0) && filter.protocolmask != -1)
aba5acdf 439 fprintf(fp, " proto %s ", rtnl_rtprot_n2a(r->rtm_protocol, b1, sizeof(b1)));
577e5a53 440 if ((r->rtm_scope != RT_SCOPE_UNIVERSE || show_details > 0) && filter.scopemask != -1)
aba5acdf
SH		 441 fprintf(fp, " scope %s ", rtnl_rtscope_n2a(r->rtm_scope, b1, sizeof(b1)));
442 }
443 if (tb[RTA_PREFSRC] && filter.rprefsrc.bitlen != host_len) {
444 /* Do not use format_host(). It is our local addr
445 and symbolic name will not be useful.
446 */
ae665a52 447 fprintf(fp, " src %s ",
aba5acdf 448 rt_addr_n2a(r->rtm_family,
26dcdf3a 449 RTA_PAYLOAD(tb[RTA_PREFSRC]),
aba5acdf
SH		 450 RTA_DATA(tb[RTA_PREFSRC]),
451 abuf, sizeof(abuf)));
452 }
453 if (tb[RTA_PRIORITY])
ff24746c 454 fprintf(fp, " metric %u ", rta_getattr_u32(tb[RTA_PRIORITY]));
aba5acdf
SH		 455 if (r->rtm_flags & RTNH_F_DEAD)
456 fprintf(fp, "dead ");
457 if (r->rtm_flags & RTNH_F_ONLINK)
458 fprintf(fp, "onlink ");
459 if (r->rtm_flags & RTNH_F_PERVASIVE)
460 fprintf(fp, "pervasive ");
c52827e9 461 if (r->rtm_flags & RTNH_F_OFFLOAD)
aa05b988 462 fprintf(fp, "offload ");
aba5acdf
SH		 463 if (r->rtm_flags & RTM_F_NOTIFY)
464 fprintf(fp, "notify ");
528c2551
AG		 465 if (r->rtm_flags & RTNH_F_LINKDOWN)
466 fprintf(fp, "linkdown ");
b0373bfb
ED		 467 if (tb[RTA_MARK]) {
468 unsigned int mark = *(unsigned int*)RTA_DATA(tb[RTA_MARK]);
469 if (mark) {
470 if (mark >= 16)
471 fprintf(fp, " mark 0x%x", mark);
472 else
473 fprintf(fp, " mark %u", mark);
474 }
475 }
aba5acdf
SH		 476
477 if (tb[RTA_FLOW] && filter.realmmask != ~0U) {
ff24746c 478 __u32 to = rta_getattr_u32(tb[RTA_FLOW]);
aba5acdf
SH		 479 __u32 from = to>>16;
480 to &= 0xFFFF;
481 fprintf(fp, "realm%s ", from ? "s" : "");
482 if (from) {
483 fprintf(fp, "%s/",
484 rtnl_rtrealm_n2a(from, b1, sizeof(b1)));
485 }
486 fprintf(fp, "%s ",
487 rtnl_rtrealm_n2a(to, b1, sizeof(b1)));
488 }
489 if ((r->rtm_flags&RTM_F_CLONED) && r->rtm_family == AF_INET) {
490 __u32 flags = r->rtm_flags&~0xFFFF;
491 int first = 1;
492
493 fprintf(fp, "%s cache ", _SL_);
494
495#define PRTFL(fl,flname) if (flags&RTCF_##fl) { \
496 flags &= ~RTCF_##fl; \
497 fprintf(fp, "%s" flname "%s", first ? "<" : "", flags ? "," : "> "); \
498 first = 0; }
499 PRTFL(LOCAL, "local");
500 PRTFL(REJECT, "reject");
501 PRTFL(MULTICAST, "mc");
502 PRTFL(BROADCAST, "brd");
503 PRTFL(DNAT, "dst-nat");
504 PRTFL(SNAT, "src-nat");
505 PRTFL(MASQ, "masq");
506 PRTFL(DIRECTDST, "dst-direct");
507 PRTFL(DIRECTSRC, "src-direct");
508 PRTFL(REDIRECTED, "redirected");
509 PRTFL(DOREDIRECT, "redirect");
510 PRTFL(FAST, "fastroute");
511 PRTFL(NOTIFY, "notify");
512 PRTFL(TPROXY, "proxy");
63a0f20a 513
aba5acdf
SH		 514 if (flags)
515 fprintf(fp, "%s%x> ", first ? "<" : "", flags);
516 if (tb[RTA_CACHEINFO]) {
517 struct rta_cacheinfo *ci = RTA_DATA(tb[RTA_CACHEINFO]);
aba5acdf 518 if (!hz)
5e8bc631 519 hz = get_user_hz();
aba5acdf
SH		 520 if (ci->rta_expires != 0)
521 fprintf(fp, " expires %dsec", ci->rta_expires/hz);
522 if (ci->rta_error != 0)
523 fprintf(fp, " error %d", ci->rta_error);
524 if (show_stats) {
525 if (ci->rta_clntref)
526 fprintf(fp, " users %d", ci->rta_clntref);
527 if (ci->rta_used != 0)
528 fprintf(fp, " used %d", ci->rta_used);
529 if (ci->rta_lastuse != 0)
530 fprintf(fp, " age %dsec", ci->rta_lastuse/hz);
531 }
aba5acdf
SH		 532 if (ci->rta_id)
533 fprintf(fp, " ipid 0x%04x", ci->rta_id);
534 if (ci->rta_ts || ci->rta_tsage)
d5b7420a
SH		 535 fprintf(fp, " ts 0x%x tsage %dsec",
536 ci->rta_ts, ci->rta_tsage);
aba5acdf
SH		 537 }
538 } else if (r->rtm_family == AF_INET6) {
539 struct rta_cacheinfo *ci = NULL;
540 if (tb[RTA_CACHEINFO])
541 ci = RTA_DATA(tb[RTA_CACHEINFO]);
542 if ((r->rtm_flags & RTM_F_CLONED) || (ci && ci->rta_expires)) {
aba5acdf 543 if (!hz)
5e8bc631 544 hz = get_user_hz();
aba5acdf
SH		 545 if (r->rtm_flags & RTM_F_CLONED)
546 fprintf(fp, "%s cache ", _SL_);
547 if (ci->rta_expires)
548 fprintf(fp, " expires %dsec", ci->rta_expires/hz);
549 if (ci->rta_error != 0)
550 fprintf(fp, " error %d", ci->rta_error);
551 if (show_stats) {
552 if (ci->rta_clntref)
553 fprintf(fp, " users %d", ci->rta_clntref);
554 if (ci->rta_used != 0)
555 fprintf(fp, " used %d", ci->rta_used);
556 if (ci->rta_lastuse != 0)
557 fprintf(fp, " age %dsec", ci->rta_lastuse/hz);
558 }
559 } else if (ci) {
560 if (ci->rta_error != 0)
561 fprintf(fp, " error %d", ci->rta_error);
562 }
563 }
564 if (tb[RTA_METRICS]) {
565 int i;
566 unsigned mxlock = 0;
567 struct rtattr *mxrta[RTAX_MAX+1];
568
aba5acdf
SH		 569 parse_rtattr(mxrta, RTAX_MAX, RTA_DATA(tb[RTA_METRICS]),
570 RTA_PAYLOAD(tb[RTA_METRICS]));
571 if (mxrta[RTAX_LOCK])
572 mxlock = *(unsigned*)RTA_DATA(mxrta[RTAX_LOCK]);
573
f38c7334 574 for (i=2; i<= RTAX_MAX; i++) {
6ef87f9c 575 __u32 val;
ced61d7d 576
aba5acdf
SH		 577 if (mxrta[i] == NULL)
578 continue;
6a79240b
SH		 579
580 if (i < sizeof(mx_names)/sizeof(char*) && mx_names[i])
581 fprintf(fp, " %s", mx_names[i]);
aba5acdf 582 else
5e8bc631 583 fprintf(fp, " metric %d", i);
6ef87f9c 584
aba5acdf
SH		 585 if (mxlock & (1<<i))
586 fprintf(fp, " lock");
6ef87f9c
DB		 587 if (i != RTAX_CC_ALGO)
588 val = rta_getattr_u32(mxrta[i]);
aba5acdf 589
ced61d7d 590 switch (i) {
29d1f730
FW		 591 case RTAX_FEATURES:
592 print_rtax_features(fp, val);
593 break;
ced61d7d 594 case RTAX_HOPLIMIT:
62011a0b 595 if ((int)val == -1)
ced61d7d
SH		 596 val = 0;
597 /* fall through */
598 default:
599 fprintf(fp, " %u", val);
600 break;
aba5acdf 601
ced61d7d
SH		 602 case RTAX_RTT:
603 case RTAX_RTTVAR:
604 case RTAX_RTO_MIN:
aba5acdf
SH		 605 if (i == RTAX_RTT)
606 val /= 8;
54e0b2e7 607 else if (i == RTAX_RTTVAR)
aba5acdf 608 val /= 4;
ced61d7d 609
9b2cdc00
GR		 610 if (val >= 1000)
611 fprintf(fp, " %gs", val/1e3);
aba5acdf 612 else
9b2cdc00 613 fprintf(fp, " %ums", val);
6ef87f9c
DB		 614 break;
615 case RTAX_CC_ALGO:
616 fprintf(fp, " %s", rta_getattr_str(mxrta[i]));
617 break;
aba5acdf
SH		 618 }
619 }
620 }
621 if (tb[RTA_IIF] && filter.iifmask != -1) {
622 fprintf(fp, " iif %s", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_IIF])));
623 }
624 if (tb[RTA_MULTIPATH]) {
625 struct rtnexthop *nh = RTA_DATA(tb[RTA_MULTIPATH]);
626 int first = 0;
627
628 len = RTA_PAYLOAD(tb[RTA_MULTIPATH]);
629
630 for (;;) {
631 if (len < sizeof(*nh))
632 break;
633 if (nh->rtnh_len > len)
634 break;
635 if (r->rtm_flags&RTM_F_CLONED && r->rtm_type == RTN_MULTICAST) {
636 if (first)
637 fprintf(fp, " Oifs:");
638 else
639 fprintf(fp, " ");
640 } else
641 fprintf(fp, "%s\tnexthop", _SL_);
642 if (nh->rtnh_len > sizeof(*nh)) {
aba5acdf 643 parse_rtattr(tb, RTA_MAX, RTNH_DATA(nh), nh->rtnh_len - sizeof(*nh));
1e529305
RP		 644
645 if (tb[RTA_ENCAP])
646 lwt_print_encap(fp,
647 tb[RTA_ENCAP_TYPE],
648 tb[RTA_ENCAP]);
649
aba5acdf 650 if (tb[RTA_GATEWAY]) {
ae665a52 651 fprintf(fp, " via %s ",
aba5acdf
SH		 652 format_host(r->rtm_family,
653 RTA_PAYLOAD(tb[RTA_GATEWAY]),
654 RTA_DATA(tb[RTA_GATEWAY]),
655 abuf, sizeof(abuf)));
656 }
93ae2835
EB		 657 if (tb[RTA_VIA]) {
658 size_t len = RTA_PAYLOAD(tb[RTA_VIA]) - 2;
659 struct rtvia *via = RTA_DATA(tb[RTA_VIA]);
660 fprintf(fp, "via %s %s ",
661 family_name(via->rtvia_family),
662 format_host(via->rtvia_family, len, via->rtvia_addr,
663 abuf, sizeof(abuf)));
664 }
f4f6d640 665 if (tb[RTA_FLOW]) {
ff24746c 666 __u32 to = rta_getattr_u32(tb[RTA_FLOW]);
f4f6d640
PM		 667 __u32 from = to>>16;
668 to &= 0xFFFF;
669 fprintf(fp, " realm%s ", from ? "s" : "");
670 if (from) {
671 fprintf(fp, "%s/",
672 rtnl_rtrealm_n2a(from, b1, sizeof(b1)));
673 }
674 fprintf(fp, "%s",
675 rtnl_rtrealm_n2a(to, b1, sizeof(b1)));
676 }
aba5acdf
SH		 677 }
678 if (r->rtm_flags&RTM_F_CLONED && r->rtm_type == RTN_MULTICAST) {
679 fprintf(fp, " %s", ll_index_to_name(nh->rtnh_ifindex));
680 if (nh->rtnh_hops != 1)
681 fprintf(fp, "(ttl>%d)", nh->rtnh_hops);
682 } else {
683 fprintf(fp, " dev %s", ll_index_to_name(nh->rtnh_ifindex));
684 fprintf(fp, " weight %d", nh->rtnh_hops+1);
685 }
686 if (nh->rtnh_flags & RTNH_F_DEAD)
687 fprintf(fp, " dead");
688 if (nh->rtnh_flags & RTNH_F_ONLINK)
689 fprintf(fp, " onlink");
690 if (nh->rtnh_flags & RTNH_F_PERVASIVE)
691 fprintf(fp, " pervasive");
528c2551
AG		 692 if (nh->rtnh_flags & RTNH_F_LINKDOWN)
693 fprintf(fp, " linkdown");
aba5acdf
SH		 694 len -= NLMSG_ALIGN(nh->rtnh_len);
695 nh = RTNH_NEXT(nh);
696 }
697 }
194e9b85
LR		 698 if (tb[RTA_PREF]) {
699 unsigned int pref = rta_getattr_u8(tb[RTA_PREF]);
700 fprintf(fp, " pref ");
701
702 switch (pref) {
703 case ICMPV6_ROUTER_PREF_LOW:
704 fprintf(fp, "low");
705 break;
706 case ICMPV6_ROUTER_PREF_MEDIUM:
707 fprintf(fp, "medium");
708 break;
709 case ICMPV6_ROUTER_PREF_HIGH:
710 fprintf(fp, "high");
711 break;
712 default:
713 fprintf(fp, "%u", pref);
714 }
715 }
aba5acdf
SH		 716 fprintf(fp, "\n");
717 fflush(fp);
718 return 0;
719}
720
1e529305
RP		 721static int parse_one_nh(struct nlmsghdr *n, struct rtmsg *r,
722 struct rtattr *rta, struct rtnexthop *rtnh,
d1f28cf1 723 int *argcp, char ***argvp)
aba5acdf
SH		 724{
725 int argc = *argcp;
726 char **argv = *argvp;
727
728 while (++argv, --argc > 0) {
729 if (strcmp(*argv, "via") == 0) {
4d6c3796 730 inet_prefix addr;
93ae2835 731 int family;
aba5acdf 732 NEXT_ARG();
93ae2835
EB		 733 family = read_family(*argv);
734 if (family == AF_UNSPEC)
735 family = r->rtm_family;
736 else
737 NEXT_ARG();
738 get_addr(&addr, *argv, family);
4d6c3796
VB		 739 if (r->rtm_family == AF_UNSPEC)
740 r->rtm_family = addr.family;
93ae2835
EB		 741 if (addr.family == r->rtm_family) {
742 rta_addattr_l(rta, 4096, RTA_GATEWAY, &addr.data, addr.bytelen);
743 rtnh->rtnh_len += sizeof(struct rtattr) + addr.bytelen;
744 } else {
745 rta_addattr_l(rta, 4096, RTA_VIA, &addr.family, addr.bytelen+2);
746 rtnh->rtnh_len += sizeof(struct rtattr) + addr.bytelen+2;
747 }
aba5acdf
SH		 748 } else if (strcmp(*argv, "dev") == 0) {
749 NEXT_ARG();
750 if ((rtnh->rtnh_ifindex = ll_name_to_index(*argv)) == 0) {
751 fprintf(stderr, "Cannot find device \"%s\"\n", *argv);
752 exit(1);
753 }
754 } else if (strcmp(*argv, "weight") == 0) {
755 unsigned w;
756 NEXT_ARG();
757 if (get_unsigned(&w, *argv, 0) || w == 0 || w > 256)
758 invarg("\"weight\" is invalid\n", *argv);
759 rtnh->rtnh_hops = w - 1;
760 } else if (strcmp(*argv, "onlink") == 0) {
761 rtnh->rtnh_flags |= RTNH_F_ONLINK;
f4f6d640
PM		 762 } else if (matches(*argv, "realms") == 0) {
763 __u32 realm;
764 NEXT_ARG();
765 if (get_rt_realms(&realm, *argv))
766 invarg("\"realm\" value is invalid\n", *argv);
767 rta_addattr32(rta, 4096, RTA_FLOW, realm);
768 rtnh->rtnh_len += sizeof(struct rtattr) + 4;
1e529305
RP		 769 } else if (strcmp(*argv, "encap") == 0) {
770 int len = rta->rta_len;
771
772 lwt_parse_encap(rta, 4096, &argc, &argv);
773 rtnh->rtnh_len += rta->rta_len - len;
aba5acdf
SH		 774 } else
775 break;
776 }
777 *argcp = argc;
778 *argvp = argv;
779 return 0;
780}
781
d1f28cf1
SH		 782static int parse_nexthops(struct nlmsghdr *n, struct rtmsg *r,
783 int argc, char **argv)
aba5acdf
SH		 784{
785 char buf[1024];
786 struct rtattr *rta = (void*)buf;
787 struct rtnexthop *rtnh;
788
789 rta->rta_type = RTA_MULTIPATH;
790 rta->rta_len = RTA_LENGTH(0);
791 rtnh = RTA_DATA(rta);
792
793 while (argc > 0) {
794 if (strcmp(*argv, "nexthop") != 0) {
795 fprintf(stderr, "Error: \"nexthop\" or end of line is expected instead of \"%s\"\n", *argv);
796 exit(-1);
797 }
798 if (argc <= 1) {
799 fprintf(stderr, "Error: unexpected end of line after \"nexthop\"\n");
800 exit(-1);
801 }
802 memset(rtnh, 0, sizeof(*rtnh));
803 rtnh->rtnh_len = sizeof(*rtnh);
804 rta->rta_len += rtnh->rtnh_len;
1e529305 805 parse_one_nh(n, r, rta, rtnh, &argc, &argv);
aba5acdf
SH		 806 rtnh = RTNH_NEXT(rtnh);
807 }
808
809 if (rta->rta_len > RTA_LENGTH(0))
810 addattr_l(n, 1024, RTA_MULTIPATH, RTA_DATA(rta), RTA_PAYLOAD(rta));
811 return 0;
812}
813
d1f28cf1 814static int iproute_modify(int cmd, unsigned flags, int argc, char **argv)
aba5acdf 815{
aba5acdf 816 struct {
4806867a
SH		 817 struct nlmsghdr n;
818 struct rtmsg r;
819 char buf[1024];
aba5acdf
SH		 820 } req;
821 char mxbuf[256];
822 struct rtattr * mxrta = (void*)mxbuf;
823 unsigned mxlock = 0;
824 char *d = NULL;
825 int gw_ok = 0;
826 int dst_ok = 0;
827 int nhs_ok = 0;
828 int scope_ok = 0;
829 int table_ok = 0;
54e0b2e7 830 int raw = 0;
f638e9f7 831 int type_ok = 0;
aba5acdf
SH		 832
833 memset(&req, 0, sizeof(req));
834
835 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
836 req.n.nlmsg_flags = NLM_F_REQUEST|flags;
837 req.n.nlmsg_type = cmd;
838 req.r.rtm_family = preferred_family;
839 req.r.rtm_table = RT_TABLE_MAIN;
840 req.r.rtm_scope = RT_SCOPE_NOWHERE;
841
842 if (cmd != RTM_DELROUTE) {
843 req.r.rtm_protocol = RTPROT_BOOT;
844 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
845 req.r.rtm_type = RTN_UNICAST;
846 }
847
848 mxrta->rta_type = RTA_METRICS;
849 mxrta->rta_len = RTA_LENGTH(0);
850
851 while (argc > 0) {
852 if (strcmp(*argv, "src") == 0) {
853 inet_prefix addr;
854 NEXT_ARG();
855 get_addr(&addr, *argv, req.r.rtm_family);
856 if (req.r.rtm_family == AF_UNSPEC)
857 req.r.rtm_family = addr.family;
858 addattr_l(&req.n, sizeof(req), RTA_PREFSRC, &addr.data, addr.bytelen);
6f7a9f4d
EB		 859 } else if (strcmp(*argv, "as") == 0) {
860 inet_prefix addr;
861 NEXT_ARG();
862 if (strcmp(*argv, "to") == 0) {
863 NEXT_ARG();
864 }
865 get_addr(&addr, *argv, req.r.rtm_family);
866 if (req.r.rtm_family == AF_UNSPEC)
867 req.r.rtm_family = addr.family;
868 addattr_l(&req.n, sizeof(req), RTA_NEWDST, &addr.data, addr.bytelen);
aba5acdf
SH		 869 } else if (strcmp(*argv, "via") == 0) {
870 inet_prefix addr;
93ae2835 871 int family;
aba5acdf
SH		 872 gw_ok = 1;
873 NEXT_ARG();
93ae2835
EB		 874 family = read_family(*argv);
875 if (family == AF_UNSPEC)
876 family = req.r.rtm_family;
877 else
878 NEXT_ARG();
879 get_addr(&addr, *argv, family);
aba5acdf
SH		 880 if (req.r.rtm_family == AF_UNSPEC)
881 req.r.rtm_family = addr.family;
93ae2835
EB		 882 if (addr.family == req.r.rtm_family)
883 addattr_l(&req.n, sizeof(req), RTA_GATEWAY, &addr.data, addr.bytelen);
884 else
885 addattr_l(&req.n, sizeof(req), RTA_VIA, &addr.family, addr.bytelen+2);
aba5acdf
SH		 886 } else if (strcmp(*argv, "from") == 0) {
887 inet_prefix addr;
888 NEXT_ARG();
889 get_prefix(&addr, *argv, req.r.rtm_family);
890 if (req.r.rtm_family == AF_UNSPEC)
891 req.r.rtm_family = addr.family;
892 if (addr.bytelen)
893 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
894 req.r.rtm_src_len = addr.bitlen;
895 } else if (strcmp(*argv, "tos") == 0 ||
896 matches(*argv, "dsfield") == 0) {
897 __u32 tos;
898 NEXT_ARG();
899 if (rtnl_dsfield_a2n(&tos, *argv))
900 invarg("\"tos\" value is invalid\n", *argv);
901 req.r.rtm_tos = tos;
902 } else if (matches(*argv, "metric") == 0 ||
903 matches(*argv, "priority") == 0 ||
194e9b85 904 strcmp(*argv, "preference") == 0) {
aba5acdf
SH		 905 __u32 metric;
906 NEXT_ARG();
907 if (get_u32(&metric, *argv, 0))
908 invarg("\"metric\" value is invalid\n", *argv);
909 addattr32(&req.n, sizeof(req), RTA_PRIORITY, metric);
910 } else if (strcmp(*argv, "scope") == 0) {
f332d169 911 __u32 scope = 0;
aba5acdf
SH		 912 NEXT_ARG();
913 if (rtnl_rtscope_a2n(&scope, *argv))
914 invarg("invalid \"scope\" value\n", *argv);
915 req.r.rtm_scope = scope;
916 scope_ok = 1;
917 } else if (strcmp(*argv, "mtu") == 0) {
918 unsigned mtu;
919 NEXT_ARG();
920 if (strcmp(*argv, "lock") == 0) {
921 mxlock |= (1<<RTAX_MTU);
922 NEXT_ARG();
923 }
924 if (get_unsigned(&mtu, *argv, 0))
925 invarg("\"mtu\" value is invalid\n", *argv);
926 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
71e58151
GBY		 927 } else if (strcmp(*argv, "hoplimit") == 0) {
928 unsigned hoplimit;
929 NEXT_ARG();
930 if (strcmp(*argv, "lock") == 0) {
931 mxlock |= (1<<RTAX_HOPLIMIT);
932 NEXT_ARG();
933 }
934 if (get_unsigned(&hoplimit, *argv, 0))
935 invarg("\"hoplimit\" value is invalid\n", *argv);
936 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_HOPLIMIT, hoplimit);
aba5acdf
SH		 937 } else if (strcmp(*argv, "advmss") == 0) {
938 unsigned mss;
939 NEXT_ARG();
940 if (strcmp(*argv, "lock") == 0) {
941 mxlock |= (1<<RTAX_ADVMSS);
942 NEXT_ARG();
943 }
944 if (get_unsigned(&mss, *argv, 0))
945 invarg("\"mss\" value is invalid\n", *argv);
946 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_ADVMSS, mss);
aba5acdf
SH		 947 } else if (matches(*argv, "reordering") == 0) {
948 unsigned reord;
949 NEXT_ARG();
950 if (strcmp(*argv, "lock") == 0) {
951 mxlock |= (1<<RTAX_REORDERING);
952 NEXT_ARG();
953 }
954 if (get_unsigned(&reord, *argv, 0))
955 invarg("\"reordering\" value is invalid\n", *argv);
956 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_REORDERING, reord);
aba5acdf
SH		 957 } else if (strcmp(*argv, "rtt") == 0) {
958 unsigned rtt;
959 NEXT_ARG();
960 if (strcmp(*argv, "lock") == 0) {
961 mxlock |= (1<<RTAX_RTT);
962 NEXT_ARG();
963 }
81d03dc3 964 if (get_time_rtt(&rtt, *argv, &raw))
aba5acdf 965 invarg("\"rtt\" value is invalid\n", *argv);
0612519e 966 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTT,
54e0b2e7
RJ		 967 (raw) ? rtt : rtt * 8);
968 } else if (strcmp(*argv, "rto_min") == 0) {
969 unsigned rto_min;
970 NEXT_ARG();
971 mxlock |= (1<<RTAX_RTO_MIN);
81d03dc3 972 if (get_time_rtt(&rto_min, *argv, &raw))
54e0b2e7
RJ		 973 invarg("\"rto_min\" value is invalid\n",
974 *argv);
975 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTO_MIN,
976 rto_min);
aba5acdf
SH		 977 } else if (matches(*argv, "window") == 0) {
978 unsigned win;
979 NEXT_ARG();
980 if (strcmp(*argv, "lock") == 0) {
981 mxlock |= (1<<RTAX_WINDOW);
982 NEXT_ARG();
983 }
984 if (get_unsigned(&win, *argv, 0))
985 invarg("\"window\" value is invalid\n", *argv);
986 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_WINDOW, win);
987 } else if (matches(*argv, "cwnd") == 0) {
988 unsigned win;
989 NEXT_ARG();
990 if (strcmp(*argv, "lock") == 0) {
991 mxlock |= (1<<RTAX_CWND);
992 NEXT_ARG();
993 }
994 if (get_unsigned(&win, *argv, 0))
995 invarg("\"cwnd\" value is invalid\n", *argv);
996 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_CWND, win);
a1f1143e
VW		 997 } else if (matches(*argv, "initcwnd") == 0) {
998 unsigned win;
999 NEXT_ARG();
1000 if (strcmp(*argv, "lock") == 0) {
1001 mxlock |= (1<<RTAX_INITCWND);
1002 NEXT_ARG();
1003 }
1004 if (get_unsigned(&win, *argv, 0))
1005 invarg("\"initcwnd\" value is invalid\n", *argv);
1006 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_INITCWND, win);
f5fd8003 1007 } else if (matches(*argv, "initrwnd") == 0) {
1008 unsigned win;
1009 NEXT_ARG();
1010 if (strcmp(*argv, "lock") == 0) {
1011 mxlock |= (1<<RTAX_INITRWND);
1012 NEXT_ARG();
1013 }
1014 if (get_unsigned(&win, *argv, 0))
1015 invarg("\"initrwnd\" value is invalid\n", *argv);
1016 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_INITRWND, win);
29d1f730
FW		 1017 } else if (matches(*argv, "features") == 0) {
1018 unsigned int features = 0;
1019
1020 while (argc > 0) {
1021 NEXT_ARG();
1022
1023 if (strcmp(*argv, "ecn") == 0)
1024 features |= RTAX_FEATURE_ECN;
1025 else
1026 invarg("\"features\" value not valid\n", *argv);
1027 break;
1028 }
1029
1030 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_FEATURES, features);
b37f2c89
CW		 1031 } else if (matches(*argv, "quickack") == 0) {
1032 unsigned quickack;
1033 NEXT_ARG();
1034 if (get_unsigned(&quickack, *argv, 0))
1035 invarg("\"quickack\" value is invalid\n", *argv);
1036 if (quickack != 1 && quickack != 0)
1037 invarg("\"quickack\" value should be 0 or 1\n", *argv);
1038 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_QUICKACK, quickack);
6ef87f9c
DB		 1039 } else if (matches(*argv, "congctl") == 0) {
1040 NEXT_ARG();
1041 if (strcmp(*argv, "lock") == 0) {
1042 mxlock |= 1 << RTAX_CC_ALGO;
1043 NEXT_ARG();
1044 }
1045 rta_addattr_l(mxrta, sizeof(mxbuf), RTAX_CC_ALGO, *argv,
1046 strlen(*argv));
aba5acdf
SH		 1047 } else if (matches(*argv, "rttvar") == 0) {
1048 unsigned win;
1049 NEXT_ARG();
1050 if (strcmp(*argv, "lock") == 0) {
1051 mxlock |= (1<<RTAX_RTTVAR);
1052 NEXT_ARG();
1053 }
81d03dc3 1054 if (get_time_rtt(&win, *argv, &raw))
aba5acdf 1055 invarg("\"rttvar\" value is invalid\n", *argv);
54e0b2e7
RJ		 1056 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTTVAR,
1057 (raw) ? win : win * 4);
aba5acdf
SH		 1058 } else if (matches(*argv, "ssthresh") == 0) {
1059 unsigned win;
1060 NEXT_ARG();
1061 if (strcmp(*argv, "lock") == 0) {
1062 mxlock |= (1<<RTAX_SSTHRESH);
1063 NEXT_ARG();
1064 }
1065 if (get_unsigned(&win, *argv, 0))
1066 invarg("\"ssthresh\" value is invalid\n", *argv);
1067 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_SSTHRESH, win);
1068 } else if (matches(*argv, "realms") == 0) {
1069 __u32 realm;
1070 NEXT_ARG();
1071 if (get_rt_realms(&realm, *argv))
1072 invarg("\"realm\" value is invalid\n", *argv);
1073 addattr32(&req.n, sizeof(req), RTA_FLOW, realm);
1074 } else if (strcmp(*argv, "onlink") == 0) {
1075 req.r.rtm_flags |= RTNH_F_ONLINK;
aba5acdf
SH		 1076 } else if (strcmp(*argv, "nexthop") == 0) {
1077 nhs_ok = 1;
1078 break;
1079 } else if (matches(*argv, "protocol") == 0) {
f332d169 1080 __u32 prot;
aba5acdf
SH		 1081 NEXT_ARG();
1082 if (rtnl_rtprot_a2n(&prot, *argv))
1083 invarg("\"protocol\" value is invalid\n", *argv);
1084 req.r.rtm_protocol = prot;
aba5acdf 1085 } else if (matches(*argv, "table") == 0) {
f332d169 1086 __u32 tid;
aba5acdf
SH		 1087 NEXT_ARG();
1088 if (rtnl_rttable_a2n(&tid, *argv))
1089 invarg("\"table\" value is invalid\n", *argv);
34e95647
PM		 1090 if (tid < 256)
1091 req.r.rtm_table = tid;
1092 else {
1093 req.r.rtm_table = RT_TABLE_UNSPEC;
1094 addattr32(&req.n, sizeof(req), RTA_TABLE, tid);
1095 }
aba5acdf
SH		 1096 table_ok = 1;
1097 } else if (strcmp(*argv, "dev") == 0 ||
1098 strcmp(*argv, "oif") == 0) {
1099 NEXT_ARG();
1100 d = *argv;
194e9b85
LR		 1101 } else if (matches(*argv, "pref") == 0) {
1102 __u8 pref;
1103 NEXT_ARG();
1104 if (strcmp(*argv, "low") == 0)
1105 pref = ICMPV6_ROUTER_PREF_LOW;
1106 else if (strcmp(*argv, "medium") == 0)
1107 pref = ICMPV6_ROUTER_PREF_MEDIUM;
1108 else if (strcmp(*argv, "high") == 0)
1109 pref = ICMPV6_ROUTER_PREF_HIGH;
1110 else if (get_u8(&pref, *argv, 0))
1111 invarg("\"pref\" value is invalid\n", *argv);
1112 addattr8(&req.n, sizeof(req), RTA_PREF, pref);
1e529305
RP		 1113 } else if (strcmp(*argv, "encap") == 0) {
1114 char buf[1024];
1115 struct rtattr *rta = (void*)buf;
1116
1117 rta->rta_type = RTA_ENCAP;
1118 rta->rta_len = RTA_LENGTH(0);
1119
1120 lwt_parse_encap(rta, sizeof(buf), &argc, &argv);
1121
1122 if (rta->rta_len > RTA_LENGTH(0))
1123 addraw_l(&req.n, 1024, RTA_DATA(rta), RTA_PAYLOAD(rta));
aba5acdf
SH		 1124 } else {
1125 int type;
1126 inet_prefix dst;
1127
1128 if (strcmp(*argv, "to") == 0) {
1129 NEXT_ARG();
1130 }
1131 if ((**argv < '0' || **argv > '9') &&
1132 rtnl_rtntype_a2n(&type, *argv) == 0) {
1133 NEXT_ARG();
1134 req.r.rtm_type = type;
f638e9f7 1135 type_ok = 1;
aba5acdf
SH		 1136 }
1137
1138 if (matches(*argv, "help") == 0)
1139 usage();
1140 if (dst_ok)
1141 duparg2("to", *argv);
1142 get_prefix(&dst, *argv, req.r.rtm_family);
1143 if (req.r.rtm_family == AF_UNSPEC)
1144 req.r.rtm_family = dst.family;
1145 req.r.rtm_dst_len = dst.bitlen;
1146 dst_ok = 1;
1147 if (dst.bytelen)
1148 addattr_l(&req.n, sizeof(req), RTA_DST, &dst.data, dst.bytelen);
1149 }
1150 argc--; argv++;
1151 }
1152
922b4822
PS		 1153 if (!dst_ok)
1154 usage();
1155
aba5acdf
SH		 1156 if (d || nhs_ok) {
1157 int idx;
1158
aba5acdf
SH		 1159 if (d) {
1160 if ((idx = ll_name_to_index(d)) == 0) {
1161 fprintf(stderr, "Cannot find device \"%s\"\n", d);
1162 return -1;
1163 }
1164 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
1165 }
1166 }
1167
1168 if (mxrta->rta_len > RTA_LENGTH(0)) {
1169 if (mxlock)
1170 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
1171 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
1172 }
1173
1174 if (nhs_ok)
1175 parse_nexthops(&req.n, &req.r, argc, argv);
1176
f638e9f7
RP		 1177 if (req.r.rtm_family == AF_UNSPEC)
1178 req.r.rtm_family = AF_INET;
1179
aba5acdf
SH		 1180 if (!table_ok) {
1181 if (req.r.rtm_type == RTN_LOCAL ||
1182 req.r.rtm_type == RTN_BROADCAST ||
1183 req.r.rtm_type == RTN_NAT ||
1184 req.r.rtm_type == RTN_ANYCAST)
1185 req.r.rtm_table = RT_TABLE_LOCAL;
1186 }
1187 if (!scope_ok) {
f638e9f7
RP		 1188 if (req.r.rtm_family == AF_INET6 ||
1189 req.r.rtm_family == AF_MPLS)
1190 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
1191 else if (req.r.rtm_type == RTN_LOCAL ||
1192 req.r.rtm_type == RTN_NAT)
aba5acdf
SH		 1193 req.r.rtm_scope = RT_SCOPE_HOST;
1194 else if (req.r.rtm_type == RTN_BROADCAST ||
1195 req.r.rtm_type == RTN_MULTICAST ||
1196 req.r.rtm_type == RTN_ANYCAST)
1197 req.r.rtm_scope = RT_SCOPE_LINK;
1198 else if (req.r.rtm_type == RTN_UNICAST ||
1199 req.r.rtm_type == RTN_UNSPEC) {
1200 if (cmd == RTM_DELROUTE)
1201 req.r.rtm_scope = RT_SCOPE_NOWHERE;
1202 else if (!gw_ok && !nhs_ok)
1203 req.r.rtm_scope = RT_SCOPE_LINK;
1204 }
1205 }
1206
f638e9f7
RP		 1207 if (!type_ok && req.r.rtm_family == AF_MPLS)
1208 req.r.rtm_type = RTN_UNICAST;
aba5acdf 1209
c079e121 1210 if (rtnl_talk(&rth, &req.n, NULL, 0) < 0)
d58ba4ba 1211 return -2;
aba5acdf
SH		 1212
1213 return 0;
1214}
1215
1216static int rtnl_rtcache_request(struct rtnl_handle *rth, int family)
1217{
1218 struct {
1219 struct nlmsghdr nlh;
1220 struct rtmsg rtm;
1221 } req;
1222 struct sockaddr_nl nladdr;
1223
1224 memset(&nladdr, 0, sizeof(nladdr));
1225 memset(&req, 0, sizeof(req));
1226 nladdr.nl_family = AF_NETLINK;
1227
1228 req.nlh.nlmsg_len = sizeof(req);
1229 req.nlh.nlmsg_type = RTM_GETROUTE;
1230 req.nlh.nlmsg_flags = NLM_F_ROOT|NLM_F_REQUEST;
1231 req.nlh.nlmsg_pid = 0;
1232 req.nlh.nlmsg_seq = rth->dump = ++rth->seq;
1233 req.rtm.rtm_family = family;
1234 req.rtm.rtm_flags |= RTM_F_CLONED;
1235
1236 return sendto(rth->fd, (void*)&req, sizeof(req), 0, (struct sockaddr*)&nladdr, sizeof(nladdr));
1237}
1238
1239static int iproute_flush_cache(void)
1240{
1241#define ROUTE_FLUSH_PATH "/proc/sys/net/ipv4/route/flush"
1242
1243 int len;
1244 int flush_fd = open (ROUTE_FLUSH_PATH, O_WRONLY);
1245 char *buffer = "-1";
1246
1247 if (flush_fd < 0) {
9827fa57
DK		 1248 fprintf (stderr, "Cannot open \"%s\": %s\n",
1249 ROUTE_FLUSH_PATH, strerror(errno));
aba5acdf
SH		 1250 return -1;
1251 }
1252
1253 len = strlen (buffer);
ae665a52 1254
aba5acdf
SH		 1255 if ((write (flush_fd, (void *)buffer, len)) < len) {
1256 fprintf (stderr, "Cannot flush routing cache\n");
25352af7 1257 close(flush_fd);
aba5acdf
SH		 1258 return -1;
1259 }
1260 close(flush_fd);
1261 return 0;
1262}
1263
76c61b34
PE		 1264static __u32 route_dump_magic = 0x45311224;
1265
d1f28cf1
SH		 1266static int save_route(const struct sockaddr_nl *who, struct nlmsghdr *n,
1267 void *arg)
f4ff11e3
DS		 1268{
1269 int ret;
1270 int len = n->nlmsg_len;
1271 struct rtmsg *r = NLMSG_DATA(n);
1272 struct rtattr *tb[RTA_MAX+1];
f3a2ddc1 1273 int host_len;
f4ff11e3 1274
f3a2ddc1 1275 host_len = af_bit_len(r->rtm_family);
f4ff11e3
DS		 1276 len -= NLMSG_LENGTH(sizeof(*r));
1277 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
1278
1279 if (!filter_nlmsg(n, tb, host_len))
1280 return 0;
1281
1282 ret = write(STDOUT_FILENO, n, n->nlmsg_len);
1283 if ((ret > 0) && (ret != n->nlmsg_len)) {
1284 fprintf(stderr, "Short write while saving nlmsg\n");
1285 ret = -EIO;
1286 }
1287
1288 return ret == n->nlmsg_len ? 0 : ret;
1289}
aba5acdf 1290
76c61b34
PE		 1291static int save_route_prep(void)
1292{
1293 int ret;
1294
1295 if (isatty(STDOUT_FILENO)) {
14645ec2 1296 fprintf(stderr, "Not sending a binary stream to stdout\n");
76c61b34
PE		 1297 return -1;
1298 }
1299
1300 ret = write(STDOUT_FILENO, &route_dump_magic, sizeof(route_dump_magic));
1301 if (ret != sizeof(route_dump_magic)) {
1302 fprintf(stderr, "Can't write magic to dump file\n");
1303 return -1;
1304 }
1305
1306 return 0;
1307}
1308
f4ff11e3 1309static int iproute_list_flush_or_save(int argc, char **argv, int action)
aba5acdf
SH		 1310{
1311 int do_ipv6 = preferred_family;
aba5acdf
SH		 1312 char *id = NULL;
1313 char *od = NULL;
b0373bfb 1314 unsigned int mark = 0;
f4ff11e3
DS		 1315 rtnl_filter_t filter_fn;
1316
76c61b34
PE		 1317 if (action == IPROUTE_SAVE) {
1318 if (save_route_prep())
1319 return -1;
1320
f4ff11e3 1321 filter_fn = save_route;
76c61b34 1322 } else
f4ff11e3 1323 filter_fn = print_route;
aba5acdf 1324
093b7646 1325 iproute_reset_filter(0);
aba5acdf
SH		 1326 filter.tb = RT_TABLE_MAIN;
1327
f4ff11e3 1328 if ((action == IPROUTE_FLUSH) && argc <= 0) {
aba5acdf
SH		 1329 fprintf(stderr, "\"ip route flush\" requires arguments.\n");
1330 return -1;
1331 }
1332
1333 while (argc > 0) {
1334 if (matches(*argv, "table") == 0) {
f332d169 1335 __u32 tid;
aba5acdf
SH		 1336 NEXT_ARG();
1337 if (rtnl_rttable_a2n(&tid, *argv)) {
1338 if (strcmp(*argv, "all") == 0) {
bd4bcdad 1339 filter.tb = 0;
aba5acdf 1340 } else if (strcmp(*argv, "cache") == 0) {
bd4bcdad 1341 filter.cloned = 1;
aba5acdf
SH		 1342 } else if (strcmp(*argv, "help") == 0) {
1343 usage();
1344 } else {
1345 invarg("table id value is invalid\n", *argv);
1346 }
bd4bcdad
PM		 1347 } else
1348 filter.tb = tid;
aba5acdf
SH		 1349 } else if (matches(*argv, "cached") == 0 ||
1350 matches(*argv, "cloned") == 0) {
bd4bcdad 1351 filter.cloned = 1;
aba5acdf
SH		 1352 } else if (strcmp(*argv, "tos") == 0 ||
1353 matches(*argv, "dsfield") == 0) {
1354 __u32 tos;
1355 NEXT_ARG();
1356 if (rtnl_dsfield_a2n(&tos, *argv))
1357 invarg("TOS value is invalid\n", *argv);
1358 filter.tos = tos;
1359 filter.tosmask = -1;
1360 } else if (matches(*argv, "protocol") == 0) {
f332d169 1361 __u32 prot = 0;
aba5acdf
SH		 1362 NEXT_ARG();
1363 filter.protocolmask = -1;
1364 if (rtnl_rtprot_a2n(&prot, *argv)) {
1365 if (strcmp(*argv, "all") != 0)
1366 invarg("invalid \"protocol\"\n", *argv);
1367 prot = 0;
1368 filter.protocolmask = 0;
1369 }
1370 filter.protocol = prot;
1371 } else if (matches(*argv, "scope") == 0) {
f332d169 1372 __u32 scope = 0;
aba5acdf
SH		 1373 NEXT_ARG();
1374 filter.scopemask = -1;
1375 if (rtnl_rtscope_a2n(&scope, *argv)) {
1376 if (strcmp(*argv, "all") != 0)
1377 invarg("invalid \"scope\"\n", *argv);
1378 scope = RT_SCOPE_NOWHERE;
1379 filter.scopemask = 0;
1380 }
1381 filter.scope = scope;
1382 } else if (matches(*argv, "type") == 0) {
1383 int type;
1384 NEXT_ARG();
1385 filter.typemask = -1;
1386 if (rtnl_rtntype_a2n(&type, *argv))
1387 invarg("node type value is invalid\n", *argv);
1388 filter.type = type;
1389 } else if (strcmp(*argv, "dev") == 0 ||
1390 strcmp(*argv, "oif") == 0) {
1391 NEXT_ARG();
1392 od = *argv;
1393 } else if (strcmp(*argv, "iif") == 0) {
1394 NEXT_ARG();
1395 id = *argv;
b0373bfb
ED		 1396 } else if (strcmp(*argv, "mark") == 0) {
1397 NEXT_ARG();
1398 get_unsigned(&mark, *argv, 0);
1399 filter.markmask = -1;
aba5acdf 1400 } else if (strcmp(*argv, "via") == 0) {
93ae2835 1401 int family;
aba5acdf 1402 NEXT_ARG();
93ae2835
EB		 1403 family = read_family(*argv);
1404 if (family == AF_UNSPEC)
1405 family = do_ipv6;
1406 else
1407 NEXT_ARG();
1408 get_prefix(&filter.rvia, *argv, family);
aba5acdf
SH		 1409 } else if (strcmp(*argv, "src") == 0) {
1410 NEXT_ARG();
1411 get_prefix(&filter.rprefsrc, *argv, do_ipv6);
1412 } else if (matches(*argv, "realms") == 0) {
1413 __u32 realm;
1414 NEXT_ARG();
1415 if (get_rt_realms(&realm, *argv))
1416 invarg("invalid realms\n", *argv);
1417 filter.realm = realm;
1418 filter.realmmask = ~0U;
1419 if ((filter.realm&0xFFFF) == 0 &&
1420 (*argv)[strlen(*argv) - 1] == '/')
1421 filter.realmmask &= ~0xFFFF;
1422 if ((filter.realm&0xFFFF0000U) == 0 &&
1423 (strchr(*argv, '/') == NULL ||
1424 (*argv)[0] == '/'))
1425 filter.realmmask &= ~0xFFFF0000U;
1426 } else if (matches(*argv, "from") == 0) {
1427 NEXT_ARG();
1428 if (matches(*argv, "root") == 0) {
1429 NEXT_ARG();
1430 get_prefix(&filter.rsrc, *argv, do_ipv6);
1431 } else if (matches(*argv, "match") == 0) {
1432 NEXT_ARG();
1433 get_prefix(&filter.msrc, *argv, do_ipv6);
1434 } else {
1435 if (matches(*argv, "exact") == 0) {
1436 NEXT_ARG();
1437 }
1438 get_prefix(&filter.msrc, *argv, do_ipv6);
1439 filter.rsrc = filter.msrc;
1440 }
1441 } else {
1442 if (matches(*argv, "to") == 0) {
1443 NEXT_ARG();
1444 }
1445 if (matches(*argv, "root") == 0) {
1446 NEXT_ARG();
1447 get_prefix(&filter.rdst, *argv, do_ipv6);
1448 } else if (matches(*argv, "match") == 0) {
1449 NEXT_ARG();
1450 get_prefix(&filter.mdst, *argv, do_ipv6);
1451 } else {
1452 if (matches(*argv, "exact") == 0) {
1453 NEXT_ARG();
1454 }
1455 get_prefix(&filter.mdst, *argv, do_ipv6);
1456 filter.rdst = filter.mdst;
1457 }
1458 }
1459 argc--; argv++;
1460 }
1461
1462 if (do_ipv6 == AF_UNSPEC && filter.tb)
1463 do_ipv6 = AF_INET;
1464
aba5acdf
SH		 1465 if (id || od) {
1466 int idx;
1467
1468 if (id) {
1469 if ((idx = ll_name_to_index(id)) == 0) {
1470 fprintf(stderr, "Cannot find device \"%s\"\n", id);
1471 return -1;
1472 }
1473 filter.iif = idx;
1474 filter.iifmask = -1;
1475 }
1476 if (od) {
1477 if ((idx = ll_name_to_index(od)) == 0) {
1478 fprintf(stderr, "Cannot find device \"%s\"\n", od);
1479 return -1;
1480 }
1481 filter.oif = idx;
1482 filter.oifmask = -1;
1483 }
1484 }
b0373bfb 1485 filter.mark = mark;
aba5acdf 1486
f4ff11e3 1487 if (action == IPROUTE_FLUSH) {
aba5acdf
SH		 1488 int round = 0;
1489 char flushb[4096-512];
33551240 1490 time_t start = time(0);
aba5acdf 1491
bd4bcdad 1492 if (filter.cloned) {
aba5acdf
SH		 1493 if (do_ipv6 != AF_INET6) {
1494 iproute_flush_cache();
1495 if (show_stats)
1496 printf("*** IPv4 routing cache is flushed.\n");
1497 }
1498 if (do_ipv6 == AF_INET)
1499 return 0;
1500 }
1501
1502 filter.flushb = flushb;
1503 filter.flushp = 0;
1504 filter.flushe = sizeof(flushb);
aba5acdf
SH		 1505
1506 for (;;) {
1507 if (rtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE) < 0) {
1508 perror("Cannot send dump request");
1509 exit(1);
1510 }
1511 filter.flushed = 0;
cd70f3f5 1512 if (rtnl_dump_filter(&rth, filter_fn, stdout) < 0) {
aba5acdf
SH		 1513 fprintf(stderr, "Flush terminated\n");
1514 exit(1);
1515 }
1516 if (filter.flushed == 0) {
f0b34d2d
AH		 1517 if (show_stats) {
1518 if (round == 0 && (!filter.cloned || do_ipv6 == AF_INET6))
1519 printf("Nothing to flush.\n");
1520 else
1521 printf("*** Flush is complete after %d round%s ***\n", round, round>1?"s":"");
1522 }
aba5acdf
SH		 1523 fflush(stdout);
1524 return 0;
1525 }
1526 round++;
1527 if (flush_update() < 0)
1528 exit(1);
33551240
SH		 1529
1530 if (time(0) - start > 30) {
1531 printf("\n*** Flush not completed after %ld seconds, %d entries remain ***\n",
5d8a7529 1532 (long)(time(0) - start), filter.flushed);
33551240
SH		 1533 exit(1);
1534 }
1535
aba5acdf
SH		 1536 if (show_stats) {
1537 printf("\n*** Round %d, deleting %d entries ***\n", round, filter.flushed);
1538 fflush(stdout);
1539 }
1540 }
1541 }
1542
bd4bcdad 1543 if (!filter.cloned) {
aba5acdf
SH		 1544 if (rtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE) < 0) {
1545 perror("Cannot send dump request");
1546 exit(1);
1547 }
1548 } else {
1549 if (rtnl_rtcache_request(&rth, do_ipv6) < 0) {
1550 perror("Cannot send dump request");
1551 exit(1);
1552 }
1553 }
1554
cd70f3f5 1555 if (rtnl_dump_filter(&rth, filter_fn, stdout) < 0) {
aba5acdf
SH		 1556 fprintf(stderr, "Dump terminated\n");
1557 exit(1);
1558 }
1559
1560 exit(0);
1561}
1562
1563
d1f28cf1 1564static int iproute_get(int argc, char **argv)
aba5acdf 1565{
aba5acdf 1566 struct {
4806867a
SH		 1567 struct nlmsghdr n;
1568 struct rtmsg r;
1569 char buf[1024];
aba5acdf
SH		 1570 } req;
1571 char *idev = NULL;
1572 char *odev = NULL;
1573 int connected = 0;
1574 int from_ok = 0;
b0373bfb 1575 unsigned int mark = 0;
aba5acdf
SH		 1576
1577 memset(&req, 0, sizeof(req));
1578
093b7646 1579 iproute_reset_filter(0);
c73f3e02 1580 filter.cloned = 2;
aba5acdf
SH		 1581
1582 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
1583 req.n.nlmsg_flags = NLM_F_REQUEST;
1584 req.n.nlmsg_type = RTM_GETROUTE;
1585 req.r.rtm_family = preferred_family;
1586 req.r.rtm_table = 0;
1587 req.r.rtm_protocol = 0;
1588 req.r.rtm_scope = 0;
1589 req.r.rtm_type = 0;
1590 req.r.rtm_src_len = 0;
1591 req.r.rtm_dst_len = 0;
1592 req.r.rtm_tos = 0;
ae665a52 1593
aba5acdf
SH		 1594 while (argc > 0) {
1595 if (strcmp(*argv, "tos") == 0 ||
1596 matches(*argv, "dsfield") == 0) {
1597 __u32 tos;
1598 NEXT_ARG();
1599 if (rtnl_dsfield_a2n(&tos, *argv))
1600 invarg("TOS value is invalid\n", *argv);
1601 req.r.rtm_tos = tos;
1602 } else if (matches(*argv, "from") == 0) {
1603 inet_prefix addr;
1604 NEXT_ARG();
1605 if (matches(*argv, "help") == 0)
1606 usage();
1607 from_ok = 1;
1608 get_prefix(&addr, *argv, req.r.rtm_family);
1609 if (req.r.rtm_family == AF_UNSPEC)
1610 req.r.rtm_family = addr.family;
1611 if (addr.bytelen)
1612 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
1613 req.r.rtm_src_len = addr.bitlen;
1614 } else if (matches(*argv, "iif") == 0) {
1615 NEXT_ARG();
1616 idev = *argv;
b0373bfb
ED		 1617 } else if (matches(*argv, "mark") == 0) {
1618 NEXT_ARG();
1619 get_unsigned(&mark, *argv, 0);
aba5acdf
SH		 1620 } else if (matches(*argv, "oif") == 0 ||
1621 strcmp(*argv, "dev") == 0) {
1622 NEXT_ARG();
1623 odev = *argv;
1624 } else if (matches(*argv, "notify") == 0) {
1625 req.r.rtm_flags |= RTM_F_NOTIFY;
1626 } else if (matches(*argv, "connected") == 0) {
1627 connected = 1;
1628 } else {
1629 inet_prefix addr;
1630 if (strcmp(*argv, "to") == 0) {
1631 NEXT_ARG();
1632 }
1633 if (matches(*argv, "help") == 0)
1634 usage();
1635 get_prefix(&addr, *argv, req.r.rtm_family);
1636 if (req.r.rtm_family == AF_UNSPEC)
1637 req.r.rtm_family = addr.family;
1638 if (addr.bytelen)
1639 addattr_l(&req.n, sizeof(req), RTA_DST, &addr.data, addr.bytelen);
1640 req.r.rtm_dst_len = addr.bitlen;
1641 }
1642 argc--; argv++;
1643 }
1644
1645 if (req.r.rtm_dst_len == 0) {
14645ec2 1646 fprintf(stderr, "need at least a destination address\n");
aba5acdf
SH		 1647 exit(1);
1648 }
1649
aba5acdf
SH		 1650 if (idev || odev) {
1651 int idx;
1652
1653 if (idev) {
1654 if ((idx = ll_name_to_index(idev)) == 0) {
1655 fprintf(stderr, "Cannot find device \"%s\"\n", idev);
1656 return -1;
1657 }
1658 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
1659 }
1660 if (odev) {
1661 if ((idx = ll_name_to_index(odev)) == 0) {
1662 fprintf(stderr, "Cannot find device \"%s\"\n", odev);
1663 return -1;
1664 }
1665 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
1666 }
1667 }
b0373bfb
ED		 1668 if (mark)
1669 addattr32(&req.n, sizeof(req), RTA_MARK, mark);
aba5acdf
SH		 1670
1671 if (req.r.rtm_family == AF_UNSPEC)
1672 req.r.rtm_family = AF_INET;
1673
bc234301
DA		 1674 req.r.rtm_flags |= RTM_F_LOOKUP_TABLE;
1675
c079e121 1676 if (rtnl_talk(&rth, &req.n, &req.n, sizeof(req)) < 0)
aba5acdf
SH		 1677 exit(2);
1678
1679 if (connected && !from_ok) {
1680 struct rtmsg *r = NLMSG_DATA(&req.n);
1681 int len = req.n.nlmsg_len;
1682 struct rtattr * tb[RTA_MAX+1];
1683
1684 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
1685 fprintf(stderr, "An error :-)\n");
1686 exit(1);
1687 }
1688
1689 if (req.n.nlmsg_type != RTM_NEWROUTE) {
1690 fprintf(stderr, "Not a route?\n");
1691 return -1;
1692 }
1693 len -= NLMSG_LENGTH(sizeof(*r));
1694 if (len < 0) {
1695 fprintf(stderr, "Wrong len %d\n", len);
1696 return -1;
1697 }
1698
aba5acdf
SH		 1699 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
1700
1701 if (tb[RTA_PREFSRC]) {
1702 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
1703 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
1704 } else if (!tb[RTA_SRC]) {
1705 fprintf(stderr, "Failed to connect the route\n");
1706 return -1;
1707 }
1708 if (!odev && tb[RTA_OIF])
1709 tb[RTA_OIF]->rta_type = 0;
1710 if (tb[RTA_GATEWAY])
1711 tb[RTA_GATEWAY]->rta_type = 0;
93ae2835
EB		 1712 if (tb[RTA_VIA])
1713 tb[RTA_VIA]->rta_type = 0;
aba5acdf
SH		 1714 if (!idev && tb[RTA_IIF])
1715 tb[RTA_IIF]->rta_type = 0;
1716 req.n.nlmsg_flags = NLM_F_REQUEST;
1717 req.n.nlmsg_type = RTM_GETROUTE;
1718
c079e121 1719 if (rtnl_talk(&rth, &req.n, &req.n, sizeof(req)) < 0)
56d8ff0a 1720 return -2;
aba5acdf
SH		 1721 }
1722
1723 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
1724 fprintf(stderr, "An error :-)\n");
56d8ff0a 1725 return -1;
aba5acdf
SH		 1726 }
1727
56d8ff0a 1728 return 0;
aba5acdf
SH		 1729}
1730
0628cddd
ND		 1731static int restore_handler(const struct sockaddr_nl *nl,
1732 struct rtnl_ctrl_data *ctrl,
1733 struct nlmsghdr *n, void *arg)
f4ff11e3
DS		 1734{
1735 int ret;
1736
1737 n->nlmsg_flags |= NLM_F_REQUEST | NLM_F_CREATE | NLM_F_ACK;
1738
1739 ll_init_map(&rth);
1740
c079e121 1741 ret = rtnl_talk(&rth, n, n, sizeof(*n));
f4ff11e3
DS		 1742 if ((ret < 0) && (errno == EEXIST))
1743 ret = 0;
1744
1745 return ret;
1746}
1747
76c61b34
PE		 1748static int route_dump_check_magic(void)
1749{
1750 int ret;
1751 __u32 magic = 0;
1752
1753 if (isatty(STDIN_FILENO)) {
1754 fprintf(stderr, "Can't restore route dump from a terminal\n");
1755 return -1;
1756 }
1757
1758 ret = fread(&magic, sizeof(magic), 1, stdin);
1759 if (magic != route_dump_magic) {
1760 fprintf(stderr, "Magic mismatch (%d elems, %x magic)\n", ret, magic);
1761 return -1;
1762 }
1763
1764 return 0;
1765}
1766
d1f28cf1 1767static int iproute_restore(void)
f4ff11e3 1768{
76c61b34
PE		 1769 if (route_dump_check_magic())
1770 exit(-1);
1771
f4ff11e3
DS		 1772 exit(rtnl_from_file(stdin, &restore_handler, NULL));
1773}
1774
0628cddd
ND		 1775static int show_handler(const struct sockaddr_nl *nl,
1776 struct rtnl_ctrl_data *ctrl,
1777 struct nlmsghdr *n, void *arg)
93b79863
PE		 1778{
1779 print_route(nl, n, stdout);
1780 return 0;
1781}
1782
1783static int iproute_showdump(void)
1784{
1785 if (route_dump_check_magic())
1786 exit(-1);
1787
1788 exit(rtnl_from_file(stdin, &show_handler, NULL));
1789}
1790
093b7646 1791void iproute_reset_filter(int ifindex)
aba5acdf
SH		 1792{
1793 memset(&filter, 0, sizeof(filter));
1794 filter.mdst.bitlen = -1;
1795 filter.msrc.bitlen = -1;
093b7646 1796 filter.oif = ifindex;
1797 if (filter.oif > 0)
1798 filter.oifmask = -1;
aba5acdf
SH		 1799}
1800
1801int do_iproute(int argc, char **argv)
1802{
1803 if (argc < 1)
f4ff11e3 1804 return iproute_list_flush_or_save(0, NULL, IPROUTE_LIST);
ae665a52 1805
aba5acdf
SH		 1806 if (matches(*argv, "add") == 0)
1807 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_EXCL,
1808 argc-1, argv+1);
1809 if (matches(*argv, "change") == 0 || strcmp(*argv, "chg") == 0)
1810 return iproute_modify(RTM_NEWROUTE, NLM_F_REPLACE,
1811 argc-1, argv+1);
1812 if (matches(*argv, "replace") == 0)
1813 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_REPLACE,
1814 argc-1, argv+1);
1815 if (matches(*argv, "prepend") == 0)
1816 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE,
1817 argc-1, argv+1);
1818 if (matches(*argv, "append") == 0)
1819 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_APPEND,
1820 argc-1, argv+1);
1821 if (matches(*argv, "test") == 0)
1822 return iproute_modify(RTM_NEWROUTE, NLM_F_EXCL,
1823 argc-1, argv+1);
1824 if (matches(*argv, "delete") == 0)
1825 return iproute_modify(RTM_DELROUTE, 0,
1826 argc-1, argv+1);
1827 if (matches(*argv, "list") == 0 || matches(*argv, "show") == 0
1828 || matches(*argv, "lst") == 0)
f4ff11e3 1829 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_LIST);
aba5acdf
SH		 1830 if (matches(*argv, "get") == 0)
1831 return iproute_get(argc-1, argv+1);
1832 if (matches(*argv, "flush") == 0)
f4ff11e3
DS		 1833 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_FLUSH);
1834 if (matches(*argv, "save") == 0)
1835 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_SAVE);
1836 if (matches(*argv, "restore") == 0)
1837 return iproute_restore();
93b79863
PE		 1838 if (matches(*argv, "showdump") == 0)
1839 return iproute_showdump();
aba5acdf
SH		 1840 if (matches(*argv, "help") == 0)
1841 usage();
1842 fprintf(stderr, "Command \"%s\" is unknown, try \"ip route help\".\n", *argv);
1843 exit(-1);
1844}
1845
Upstream mirror of iproute2