]> git.proxmox.com Git - mirror_iproute2.git/blame - ip/iproute.c
Merge git://git.kernel.org/pub/scm/network/iproute2/iproute2-next
[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>
aba5acdf
SH
16#include <fcntl.h>
17#include <string.h>
33551240 18#include <time.h>
aba5acdf
SH
19#include <sys/time.h>
20#include <sys/socket.h>
21#include <netinet/in.h>
22#include <netinet/ip.h>
23#include <arpa/inet.h>
24#include <linux/in_route.h>
194e9b85 25#include <linux/icmpv6.h>
f4ff11e3 26#include <errno.h>
aba5acdf
SH
27
28#include "rt_names.h"
29#include "utils.h"
30#include "ip_common.h"
31
32#ifndef RTAX_RTTVAR
33#define RTAX_RTTVAR RTAX_HOPS
34#endif
35
f4ff11e3
DS
36enum list_action {
37 IPROUTE_LIST,
38 IPROUTE_FLUSH,
39 IPROUTE_SAVE,
40};
f38c7334 41static const char *mx_names[RTAX_MAX+1] = {
e54ed380
CP
42 [RTAX_MTU] = "mtu",
43 [RTAX_WINDOW] = "window",
44 [RTAX_RTT] = "rtt",
45 [RTAX_RTTVAR] = "rttvar",
46 [RTAX_SSTHRESH] = "ssthresh",
47 [RTAX_CWND] = "cwnd",
48 [RTAX_ADVMSS] = "advmss",
49 [RTAX_REORDERING] = "reordering",
50 [RTAX_HOPLIMIT] = "hoplimit",
51 [RTAX_INITCWND] = "initcwnd",
52 [RTAX_FEATURES] = "features",
53 [RTAX_RTO_MIN] = "rto_min",
54 [RTAX_INITRWND] = "initrwnd",
55 [RTAX_QUICKACK] = "quickack",
56 [RTAX_CC_ALGO] = "congctl",
57 [RTAX_FASTOPEN_NO_COOKIE] = "fastopen_no_cookie"
f38c7334 58};
aba5acdf
SH
59static void usage(void) __attribute__((noreturn));
60
61static void usage(void)
62{
21fef525
SH
63 fprintf(stderr,
64 "Usage: ip route { list | flush } SELECTOR\n"
65 " ip route save SELECTOR\n"
66 " ip route restore\n"
67 " ip route showdump\n"
68 " ip route get [ ROUTE_GET_FLAGS ] ADDRESS\n"
69 " [ from ADDRESS iif STRING ]\n"
70 " [ oif STRING ] [ tos TOS ]\n"
71 " [ mark NUMBER ] [ vrf NAME ]\n"
804c7fff
RP
72 " [ uid NUMBER ] [ ipproto PROTOCOL ]\n"
73 " [ sport NUMBER ] [ dport NUMBER ]\n"
21fef525
SH
74 " ip route { add | del | change | append | replace } ROUTE\n"
75 "SELECTOR := [ root PREFIX ] [ match PREFIX ] [ exact PREFIX ]\n"
76 " [ table TABLE_ID ] [ vrf NAME ] [ proto RTPROTO ]\n"
77 " [ type TYPE ] [ scope SCOPE ]\n"
78 "ROUTE := NODE_SPEC [ INFO_SPEC ]\n"
79 "NODE_SPEC := [ TYPE ] PREFIX [ tos TOS ]\n"
80 " [ table TABLE_ID ] [ proto RTPROTO ]\n"
81 " [ scope SCOPE ] [ metric METRIC ]\n"
82 " [ ttl-propagate { enabled | disabled } ]\n"
12387e2c 83 "INFO_SPEC := { NH | nhid ID } OPTIONS FLAGS [ nexthop NH ]...\n"
21fef525
SH
84 "NH := [ encap ENCAPTYPE ENCAPHDR ] [ via [ FAMILY ] ADDRESS ]\n"
85 " [ dev STRING ] [ weight NUMBER ] NHFLAGS\n"
738aebe5 86 "FAMILY := [ inet | inet6 | mpls | bridge | link ]\n"
21fef525
SH
87 "OPTIONS := FLAGS [ mtu NUMBER ] [ advmss NUMBER ] [ as [ to ] ADDRESS ]\n"
88 " [ rtt TIME ] [ rttvar TIME ] [ reordering NUMBER ]\n"
89 " [ window NUMBER ] [ cwnd NUMBER ] [ initcwnd NUMBER ]\n"
90 " [ ssthresh NUMBER ] [ realms REALM ] [ src ADDRESS ]\n"
91 " [ rto_min TIME ] [ hoplimit NUMBER ] [ initrwnd NUMBER ]\n"
92 " [ features FEATURES ] [ quickack BOOL ] [ congctl NAME ]\n"
e54ed380 93 " [ pref PREF ] [ expires TIME ] [ fastopen_no_cookie BOOL ]\n"
21fef525
SH
94 "TYPE := { unicast | local | broadcast | multicast | throw |\n"
95 " unreachable | prohibit | blackhole | nat }\n"
96 "TABLE_ID := [ local | main | default | all | NUMBER ]\n"
97 "SCOPE := [ host | link | global | NUMBER ]\n"
98 "NHFLAGS := [ onlink | pervasive ]\n"
99 "RTPROTO := [ kernel | boot | static | NUMBER ]\n"
100 "PREF := [ low | medium | high ]\n"
101 "TIME := NUMBER[s|ms]\n"
102 "BOOL := [1|0]\n"
103 "FEATURES := ecn\n"
9f91f1b7 104 "ENCAPTYPE := [ mpls | ip | ip6 | seg6 | seg6local | rpl ]\n"
21fef525
SH
105 "ENCAPHDR := [ MPLSLABEL | SEG6HDR ]\n"
106 "SEG6HDR := [ mode SEGMODE ] segs ADDR1,ADDRi,ADDRn [hmac HMACKEYID] [cleanup]\n"
107 "SEGMODE := [ encap | inline ]\n"
108 "ROUTE_GET_FLAGS := [ fibmatch ]\n");
aba5acdf
SH
109 exit(-1);
110}
111
112
113static struct
114{
caae16b3 115 unsigned int tb;
bd4bcdad 116 int cloned;
aba5acdf
SH
117 int flushed;
118 char *flushb;
119 int flushp;
120 int flushe;
aba5acdf
SH
121 int protocol, protocolmask;
122 int scope, scopemask;
d84b1878 123 __u64 typemask;
aba5acdf
SH
124 int tos, tosmask;
125 int iif, iifmask;
126 int oif, oifmask;
b0373bfb 127 int mark, markmask;
aba5acdf 128 int realm, realmmask;
ed7fdc95 129 __u32 metric, metricmask;
aba5acdf
SH
130 inet_prefix rprefsrc;
131 inet_prefix rvia;
132 inet_prefix rdst;
133 inet_prefix mdst;
134 inet_prefix rsrc;
135 inet_prefix msrc;
136} filter;
137
138static int flush_update(void)
139{
f31a37f7 140 if (rtnl_send_check(&rth, filter.flushb, filter.flushp) < 0) {
1fb0a998 141 perror("Failed to send flush request");
2f406f2d 142 return -2;
aba5acdf
SH
143 }
144 filter.flushp = 0;
145 return 0;
146}
147
d1f28cf1 148static int filter_nlmsg(struct nlmsghdr *n, struct rtattr **tb, int host_len)
aba5acdf 149{
aba5acdf 150 struct rtmsg *r = NLMSG_DATA(n);
d17b136f
PS
151 inet_prefix dst = { .family = r->rtm_family };
152 inet_prefix src = { .family = r->rtm_family };
153 inet_prefix via = { .family = r->rtm_family };
154 inet_prefix prefsrc = { .family = r->rtm_family };
34e95647 155 __u32 table;
f4ff11e3 156 static int ip6_multiple_tables;
aba5acdf 157
34e95647
PM
158 table = rtm_get_table(r, tb);
159
5b9ac190
AV
160 if (preferred_family != AF_UNSPEC && r->rtm_family != preferred_family)
161 return 0;
162
34e95647 163 if (r->rtm_family == AF_INET6 && table != RT_TABLE_MAIN)
e0b29fe7
PM
164 ip6_multiple_tables = 1;
165
80d1c528 166 if (filter.cloned == !(r->rtm_flags & RTM_F_CLONED))
44792827
UW
167 return 0;
168
e0b29fe7 169 if (r->rtm_family == AF_INET6 && !ip6_multiple_tables) {
aba5acdf 170 if (filter.tb) {
bd4bcdad
PM
171 if (filter.tb == RT_TABLE_LOCAL) {
172 if (r->rtm_type != RTN_LOCAL)
aba5acdf 173 return 0;
bd4bcdad
PM
174 } else if (filter.tb == RT_TABLE_MAIN) {
175 if (r->rtm_type == RTN_LOCAL)
aba5acdf 176 return 0;
bd4bcdad
PM
177 } else {
178 return 0;
aba5acdf
SH
179 }
180 }
181 } else {
34e95647 182 if (filter.tb > 0 && filter.tb != table)
aba5acdf
SH
183 return 0;
184 }
185 if ((filter.protocol^r->rtm_protocol)&filter.protocolmask)
186 return 0;
187 if ((filter.scope^r->rtm_scope)&filter.scopemask)
188 return 0;
d84b1878
DA
189
190 if (filter.typemask && !(filter.typemask & (1 << r->rtm_type)))
aba5acdf
SH
191 return 0;
192 if ((filter.tos^r->rtm_tos)&filter.tosmask)
193 return 0;
c1218072
AZ
194 if (filter.rdst.family) {
195 if (r->rtm_family != filter.rdst.family ||
196 filter.rdst.bitlen > r->rtm_dst_len)
197 return 0;
198 } else if (filter.rdst.flags & PREFIXLEN_SPECIFIED) {
199 if (filter.rdst.bitlen > r->rtm_dst_len)
200 return 0;
201 }
202 if (filter.mdst.family) {
203 if (r->rtm_family != filter.mdst.family ||
204 (filter.mdst.bitlen >= 0 &&
205 filter.mdst.bitlen < r->rtm_dst_len))
206 return 0;
207 } else if (filter.mdst.flags & PREFIXLEN_SPECIFIED) {
208 if (filter.mdst.bitlen >= 0 &&
209 filter.mdst.bitlen < r->rtm_dst_len)
210 return 0;
211 }
212 if (filter.rsrc.family) {
213 if (r->rtm_family != filter.rsrc.family ||
214 filter.rsrc.bitlen > r->rtm_src_len)
215 return 0;
216 } else if (filter.rsrc.flags & PREFIXLEN_SPECIFIED) {
217 if (filter.rsrc.bitlen > r->rtm_src_len)
218 return 0;
219 }
220 if (filter.msrc.family) {
221 if (r->rtm_family != filter.msrc.family ||
222 (filter.msrc.bitlen >= 0 &&
223 filter.msrc.bitlen < r->rtm_src_len))
224 return 0;
225 } else if (filter.msrc.flags & PREFIXLEN_SPECIFIED) {
226 if (filter.msrc.bitlen >= 0 &&
227 filter.msrc.bitlen < r->rtm_src_len)
228 return 0;
229 }
93ae2835
EB
230 if (filter.rvia.family) {
231 int family = r->rtm_family;
56f5daac 232
93ae2835
EB
233 if (tb[RTA_VIA]) {
234 struct rtvia *via = RTA_DATA(tb[RTA_VIA]);
56f5daac 235
93ae2835
EB
236 family = via->rtvia_family;
237 }
238 if (family != filter.rvia.family)
239 return 0;
240 }
aba5acdf
SH
241 if (filter.rprefsrc.family && r->rtm_family != filter.rprefsrc.family)
242 return 0;
243
aba5acdf
SH
244 if (tb[RTA_DST])
245 memcpy(&dst.data, RTA_DATA(tb[RTA_DST]), (r->rtm_dst_len+7)/8);
c1218072
AZ
246 if (filter.rsrc.family || filter.msrc.family ||
247 filter.rsrc.flags & PREFIXLEN_SPECIFIED ||
248 filter.msrc.flags & PREFIXLEN_SPECIFIED) {
aba5acdf
SH
249 if (tb[RTA_SRC])
250 memcpy(&src.data, RTA_DATA(tb[RTA_SRC]), (r->rtm_src_len+7)/8);
251 }
56f5daac 252 if (filter.rvia.bitlen > 0) {
aba5acdf 253 if (tb[RTA_GATEWAY])
7849fb55 254 memcpy(&via.data, RTA_DATA(tb[RTA_GATEWAY]), host_len/8);
93ae2835
EB
255 if (tb[RTA_VIA]) {
256 size_t len = RTA_PAYLOAD(tb[RTA_VIA]) - 2;
257 struct rtvia *rtvia = RTA_DATA(tb[RTA_VIA]);
56f5daac 258
93ae2835
EB
259 via.family = rtvia->rtvia_family;
260 memcpy(&via.data, rtvia->rtvia_addr, len);
261 }
aba5acdf 262 }
56f5daac 263 if (filter.rprefsrc.bitlen > 0) {
aba5acdf 264 if (tb[RTA_PREFSRC])
7849fb55 265 memcpy(&prefsrc.data, RTA_DATA(tb[RTA_PREFSRC]), host_len/8);
aba5acdf
SH
266 }
267
c1218072
AZ
268 if ((filter.rdst.family || filter.rdst.flags & PREFIXLEN_SPECIFIED) &&
269 inet_addr_match(&dst, &filter.rdst, filter.rdst.bitlen))
aba5acdf 270 return 0;
c1218072 271 if ((filter.mdst.family || filter.mdst.flags & PREFIXLEN_SPECIFIED) &&
aba5acdf
SH
272 inet_addr_match(&dst, &filter.mdst, r->rtm_dst_len))
273 return 0;
274
c1218072
AZ
275 if ((filter.rsrc.family || filter.rsrc.flags & PREFIXLEN_SPECIFIED) &&
276 inet_addr_match(&src, &filter.rsrc, filter.rsrc.bitlen))
aba5acdf 277 return 0;
c1218072
AZ
278 if ((filter.msrc.family || filter.msrc.flags & PREFIXLEN_SPECIFIED) &&
279 filter.msrc.bitlen >= 0 &&
aba5acdf
SH
280 inet_addr_match(&src, &filter.msrc, r->rtm_src_len))
281 return 0;
282
283 if (filter.rvia.family && inet_addr_match(&via, &filter.rvia, filter.rvia.bitlen))
284 return 0;
285 if (filter.rprefsrc.family && inet_addr_match(&prefsrc, &filter.rprefsrc, filter.rprefsrc.bitlen))
286 return 0;
287 if (filter.realmmask) {
288 __u32 realms = 0;
56f5daac 289
aba5acdf 290 if (tb[RTA_FLOW])
ff24746c 291 realms = rta_getattr_u32(tb[RTA_FLOW]);
aba5acdf
SH
292 if ((realms^filter.realm)&filter.realmmask)
293 return 0;
294 }
295 if (filter.iifmask) {
296 int iif = 0;
56f5daac 297
aba5acdf 298 if (tb[RTA_IIF])
9f1370c0 299 iif = rta_getattr_u32(tb[RTA_IIF]);
aba5acdf
SH
300 if ((iif^filter.iif)&filter.iifmask)
301 return 0;
302 }
303 if (filter.oifmask) {
304 int oif = 0;
56f5daac 305
aba5acdf 306 if (tb[RTA_OIF])
9f1370c0 307 oif = rta_getattr_u32(tb[RTA_OIF]);
aba5acdf
SH
308 if ((oif^filter.oif)&filter.oifmask)
309 return 0;
310 }
b0373bfb
ED
311 if (filter.markmask) {
312 int mark = 0;
56f5daac 313
b0373bfb 314 if (tb[RTA_MARK])
9f1370c0 315 mark = rta_getattr_u32(tb[RTA_MARK]);
b0373bfb
ED
316 if ((mark ^ filter.mark) & filter.markmask)
317 return 0;
318 }
ed7fdc95
AZ
319 if (filter.metricmask) {
320 __u32 metric = 0;
321
322 if (tb[RTA_PRIORITY])
323 metric = rta_getattr_u32(tb[RTA_PRIORITY]);
324 if ((metric ^ filter.metric) & filter.metricmask)
325 return 0;
326 }
ae665a52 327 if (filter.flushb &&
aba5acdf
SH
328 r->rtm_family == AF_INET6 &&
329 r->rtm_dst_len == 0 &&
330 r->rtm_type == RTN_UNREACHABLE &&
331 tb[RTA_PRIORITY] &&
9f1370c0 332 rta_getattr_u32(tb[RTA_PRIORITY]) == -1)
aba5acdf
SH
333 return 0;
334
f4ff11e3
DS
335 return 1;
336}
337
29d1f730
FW
338static void print_rtax_features(FILE *fp, unsigned int features)
339{
340 unsigned int of = features;
341
342 if (features & RTAX_FEATURE_ECN) {
663c3cb2 343 print_null(PRINT_ANY, "ecn", "ecn ", NULL);
29d1f730
FW
344 features &= ~RTAX_FEATURE_ECN;
345 }
346
347 if (features)
663c3cb2 348 print_0xhex(PRINT_ANY,
90c5c969 349 "features", "%#llx ", of);
29d1f730
FW
350}
351
48a1e96d 352void print_rt_flags(FILE *fp, unsigned int flags)
b3ab1e68 353{
663c3cb2
SH
354 open_json_array(PRINT_JSON,
355 is_json_context() ? "flags" : "");
356
b3ab1e68 357 if (flags & RTNH_F_DEAD)
663c3cb2 358 print_string(PRINT_ANY, NULL, "%s ", "dead");
b3ab1e68 359 if (flags & RTNH_F_ONLINK)
663c3cb2 360 print_string(PRINT_ANY, NULL, "%s ", "onlink");
b3ab1e68 361 if (flags & RTNH_F_PERVASIVE)
663c3cb2 362 print_string(PRINT_ANY, NULL, "%s ", "pervasive");
b3ab1e68 363 if (flags & RTNH_F_OFFLOAD)
663c3cb2 364 print_string(PRINT_ANY, NULL, "%s ", "offload");
3de35f41
IS
365 if (flags & RTNH_F_TRAP)
366 print_string(PRINT_ANY, NULL, "%s ", "trap");
663c3cb2
SH
367 if (flags & RTM_F_NOTIFY)
368 print_string(PRINT_ANY, NULL, "%s ", "notify");
b3ab1e68 369 if (flags & RTNH_F_LINKDOWN)
663c3cb2 370 print_string(PRINT_ANY, NULL, "%s ", "linkdown");
b3ab1e68 371 if (flags & RTNH_F_UNRESOLVED)
663c3cb2 372 print_string(PRINT_ANY, NULL, "%s ", "unresolved");
ed81a2a0
IS
373 if (flags & RTM_F_OFFLOAD)
374 print_string(PRINT_ANY, NULL, "%s ", "rt_offload");
375 if (flags & RTM_F_TRAP)
376 print_string(PRINT_ANY, NULL, "%s ", "rt_trap");
33e2471e
AC
377 if (flags & RTM_F_OFFLOAD_FAILED)
378 print_string(PRINT_ANY, NULL, "%s ", "rt_offload_failed");
663c3cb2
SH
379
380 close_json_array(PRINT_JSON, NULL);
b3ab1e68
SH
381}
382
8cfc2d47
SH
383static void print_rt_pref(FILE *fp, unsigned int pref)
384{
8cfc2d47
SH
385
386 switch (pref) {
387 case ICMPV6_ROUTER_PREF_LOW:
663c3cb2
SH
388 print_string(PRINT_ANY,
389 "pref", "pref %s", "low");
8cfc2d47
SH
390 break;
391 case ICMPV6_ROUTER_PREF_MEDIUM:
663c3cb2
SH
392 print_string(PRINT_ANY,
393 "pref", "pref %s", "medium");
8cfc2d47
SH
394 break;
395 case ICMPV6_ROUTER_PREF_HIGH:
663c3cb2
SH
396 print_string(PRINT_ANY,
397 "pref", "pref %s", "high");
8cfc2d47
SH
398 break;
399 default:
663c3cb2
SH
400 print_uint(PRINT_ANY,
401 "pref", "%u", pref);
8cfc2d47
SH
402 }
403}
404
48a1e96d 405void print_rta_if(FILE *fp, const struct rtattr *rta, const char *prefix)
1506d8d3
SH
406{
407 const char *ifname = ll_index_to_name(rta_getattr_u32(rta));
408
663c3cb2
SH
409 if (is_json_context())
410 print_string(PRINT_JSON, prefix, NULL, ifname);
411 else {
412 fprintf(fp, "%s ", prefix);
413 color_fprintf(fp, COLOR_IFNAME, "%s ", ifname);
414 }
1506d8d3
SH
415}
416
daf30f6f
SH
417static void print_cache_flags(FILE *fp, __u32 flags)
418{
663c3cb2 419 json_writer_t *jw = get_json_writer();
daf30f6f
SH
420 flags &= ~0xFFFF;
421
663c3cb2
SH
422 if (jw) {
423 jsonw_name(jw, "cache");
424 jsonw_start_array(jw);
425 } else {
426 fprintf(fp, "%s cache ", _SL_);
427 if (flags == 0)
428 return;
429 putc('<', fp);
430 }
daf30f6f
SH
431
432#define PRTFL(fl, flname) \
433 if (flags & RTCF_##fl) { \
434 flags &= ~RTCF_##fl; \
663c3cb2
SH
435 if (jw) \
436 jsonw_string(jw, flname); \
437 else \
438 fprintf(fp, "%s%s", flname, flags ? "," : "> "); \
daf30f6f
SH
439 }
440
441 PRTFL(LOCAL, "local");
442 PRTFL(REJECT, "reject");
443 PRTFL(MULTICAST, "mc");
444 PRTFL(BROADCAST, "brd");
445 PRTFL(DNAT, "dst-nat");
446 PRTFL(SNAT, "src-nat");
447 PRTFL(MASQ, "masq");
448 PRTFL(DIRECTDST, "dst-direct");
449 PRTFL(DIRECTSRC, "src-direct");
450 PRTFL(REDIRECTED, "redirected");
451 PRTFL(DOREDIRECT, "redirect");
452 PRTFL(FAST, "fastroute");
453 PRTFL(NOTIFY, "notify");
454 PRTFL(TPROXY, "proxy");
455#undef PRTFL
456
457 if (flags)
663c3cb2
SH
458 print_hex(PRINT_ANY, "flags", "%x>", flags);
459
a0a639d9 460 if (jw)
663c3cb2 461 jsonw_end_array(jw);
daf30f6f
SH
462}
463
6e41810e
SH
464static void print_rta_cacheinfo(FILE *fp, const struct rta_cacheinfo *ci)
465{
466 static int hz;
467
468 if (!hz)
469 hz = get_user_hz();
663c3cb2 470
6e41810e 471 if (ci->rta_expires != 0)
39d16a02
DA
472 print_int(PRINT_ANY, "expires",
473 "expires %dsec ", ci->rta_expires/hz);
6e41810e 474 if (ci->rta_error != 0)
663c3cb2
SH
475 print_uint(PRINT_ANY, "error",
476 "error %u ", ci->rta_error);
477
6e41810e
SH
478 if (show_stats) {
479 if (ci->rta_clntref)
663c3cb2
SH
480 print_uint(PRINT_ANY, "users",
481 "users %u ", ci->rta_clntref);
6e41810e 482 if (ci->rta_used != 0)
663c3cb2
SH
483 print_uint(PRINT_ANY, "used",
484 "used %u ", ci->rta_used);
6e41810e 485 if (ci->rta_lastuse != 0)
663c3cb2
SH
486 print_uint(PRINT_ANY, "age",
487 "age %usec ", ci->rta_lastuse/hz);
6e41810e
SH
488 }
489 if (ci->rta_id)
663c3cb2 490 print_0xhex(PRINT_ANY, "ipid",
90c5c969 491 "ipid 0x%04llx ", ci->rta_id);
663c3cb2
SH
492 if (ci->rta_ts || ci->rta_tsage) {
493 print_0xhex(PRINT_ANY, "ts",
90c5c969 494 "ts 0x%llx", ci->rta_ts);
663c3cb2
SH
495 print_uint(PRINT_ANY, "tsage",
496 "tsage %usec ", ci->rta_tsage);
497 }
6e41810e
SH
498}
499
5782965a
SH
500static void print_rta_flow(FILE *fp, const struct rtattr *rta)
501{
502 __u32 to = rta_getattr_u32(rta);
503 __u32 from = to >> 16;
504 SPRINT_BUF(b1);
505
506 to &= 0xFFFF;
663c3cb2
SH
507 if (is_json_context()) {
508 open_json_object("flow");
509
510 if (from)
511 print_string(PRINT_JSON, "from", NULL,
512 rtnl_rtrealm_n2a(from, b1, sizeof(b1)));
513 print_string(PRINT_JSON, "to", NULL,
514 rtnl_rtrealm_n2a(to, b1, sizeof(b1)));
515 close_json_object();
516 } else {
517 fprintf(fp, "realm%s ", from ? "s" : "");
518
519 if (from)
520 print_string(PRINT_FP, NULL, "%s/",
521 rtnl_rtrealm_n2a(from, b1, sizeof(b1)));
522 print_string(PRINT_FP, NULL, "%s ",
523 rtnl_rtrealm_n2a(to, b1, sizeof(b1)));
5782965a 524 }
5782965a
SH
525}
526
a3484a9f
SH
527static void print_rta_newdst(FILE *fp, const struct rtmsg *r,
528 const struct rtattr *rta)
529{
530 const char *newdst = format_host_rta(r->rtm_family, rta);
531
663c3cb2
SH
532 if (is_json_context())
533 print_string(PRINT_JSON, "to", NULL, newdst);
534 else {
535 fprintf(fp, "as to ");
536 print_color_string(PRINT_FP,
537 ifa_family_color(r->rtm_family),
538 NULL, "%s ", newdst);
539 }
a3484a9f
SH
540}
541
48a1e96d 542void print_rta_gateway(FILE *fp, unsigned char family, const struct rtattr *rta)
a3484a9f 543{
48a1e96d 544 const char *gateway = format_host_rta(family, rta);
a3484a9f 545
663c3cb2
SH
546 if (is_json_context())
547 print_string(PRINT_JSON, "gateway", NULL, gateway);
548 else {
549 fprintf(fp, "via ");
550 print_color_string(PRINT_FP,
48a1e96d 551 ifa_family_color(family),
663c3cb2
SH
552 NULL, "%s ", gateway);
553 }
a3484a9f
SH
554}
555
556static void print_rta_via(FILE *fp, const struct rtattr *rta)
557{
663c3cb2 558 size_t len = RTA_PAYLOAD(rta) - 2;
a3484a9f 559 const struct rtvia *via = RTA_DATA(rta);
a3484a9f 560
663c3cb2
SH
561 if (is_json_context()) {
562 open_json_object("via");
563 print_string(PRINT_JSON, "family", NULL,
564 family_name(via->rtvia_family));
565 print_string(PRINT_JSON, "host", NULL,
566 format_host(via->rtvia_family, len,
567 via->rtvia_addr));
568 close_json_object();
569 } else {
570 print_string(PRINT_FP, NULL, "via %s ",
571 family_name(via->rtvia_family));
572 print_color_string(PRINT_FP,
573 ifa_family_color(via->rtvia_family),
574 NULL, "%s ",
575 format_host(via->rtvia_family,
576 len, via->rtvia_addr));
577 }
a3484a9f
SH
578}
579
968272e7
SH
580static void print_rta_metrics(FILE *fp, const struct rtattr *rta)
581{
582 struct rtattr *mxrta[RTAX_MAX+1];
583 unsigned int mxlock = 0;
584 int i;
585
663c3cb2 586 open_json_array(PRINT_JSON, "metrics");
89ce8012 587 open_json_object(NULL);
663c3cb2 588
968272e7
SH
589 parse_rtattr(mxrta, RTAX_MAX, RTA_DATA(rta), RTA_PAYLOAD(rta));
590
591 if (mxrta[RTAX_LOCK])
592 mxlock = rta_getattr_u32(mxrta[RTAX_LOCK]);
593
594 for (i = 2; i <= RTAX_MAX; i++) {
595 __u32 val = 0U;
596
597 if (mxrta[i] == NULL && !(mxlock & (1 << i)))
598 continue;
599
600 if (mxrta[i] != NULL && i != RTAX_CC_ALGO)
601 val = rta_getattr_u32(mxrta[i]);
602
603 if (i == RTAX_HOPLIMIT && (int)val == -1)
604 continue;
605
663c3cb2
SH
606 if (!is_json_context()) {
607 if (i < sizeof(mx_names)/sizeof(char *) && mx_names[i])
608 fprintf(fp, "%s ", mx_names[i]);
609 else
610 fprintf(fp, "metric %d ", i);
968272e7 611
663c3cb2
SH
612 if (mxlock & (1<<i))
613 fprintf(fp, "lock ");
614 }
968272e7
SH
615
616 switch (i) {
617 case RTAX_FEATURES:
618 print_rtax_features(fp, val);
619 break;
620 default:
89ce8012 621 print_uint(PRINT_ANY, mx_names[i], "%u ", val);
968272e7
SH
622 break;
623
624 case RTAX_RTT:
625 case RTAX_RTTVAR:
626 case RTAX_RTO_MIN:
627 if (i == RTAX_RTT)
628 val /= 8;
629 else if (i == RTAX_RTTVAR)
630 val /= 4;
631
663c3cb2
SH
632 if (is_json_context())
633 print_uint(PRINT_JSON, mx_names[i],
634 NULL, val);
635 else {
636 if (val >= 1000)
637 fprintf(fp, "%gs ", val/1e3);
638 else
639 fprintf(fp, "%ums ", val);
640 }
968272e7
SH
641 break;
642 case RTAX_CC_ALGO:
663c3cb2
SH
643 print_string(PRINT_ANY, "congestion",
644 "%s ", rta_getattr_str(mxrta[i]));
968272e7
SH
645 break;
646 }
647 }
663c3cb2 648
89ce8012 649 close_json_object();
663c3cb2 650 close_json_array(PRINT_JSON, NULL);
968272e7
SH
651}
652
f48e1488
SH
653static void print_rta_multipath(FILE *fp, const struct rtmsg *r,
654 struct rtattr *rta)
655{
656 const struct rtnexthop *nh = RTA_DATA(rta);
657 int len = RTA_PAYLOAD(rta);
658 int first = 1;
659
4ecefff3
JF
660 open_json_array(PRINT_JSON, "nexthops");
661
c0ec7c9f 662 while (len >= sizeof(*nh)) {
f48e1488
SH
663 struct rtattr *tb[RTA_MAX + 1];
664
665 if (nh->rtnh_len > len)
666 break;
667
4ecefff3
JF
668 open_json_object(NULL);
669
670 if ((r->rtm_flags & RTM_F_CLONED) &&
671 r->rtm_type == RTN_MULTICAST) {
672 if (first) {
673 print_string(PRINT_FP, NULL, "Oifs: ", NULL);
674 first = 0;
675 } else {
676 print_string(PRINT_FP, NULL, " ", NULL);
677 }
678 } else
679 print_string(PRINT_FP, NULL, "%s\tnexthop ", _SL_);
f48e1488
SH
680
681 if (nh->rtnh_len > sizeof(*nh)) {
682 parse_rtattr(tb, RTA_MAX, RTNH_DATA(nh),
683 nh->rtnh_len - sizeof(*nh));
684
685 if (tb[RTA_ENCAP])
686 lwt_print_encap(fp,
687 tb[RTA_ENCAP_TYPE],
688 tb[RTA_ENCAP]);
689 if (tb[RTA_NEWDST])
690 print_rta_newdst(fp, r, tb[RTA_NEWDST]);
691 if (tb[RTA_GATEWAY])
48a1e96d
DA
692 print_rta_gateway(fp, r->rtm_family,
693 tb[RTA_GATEWAY]);
f48e1488
SH
694 if (tb[RTA_VIA])
695 print_rta_via(fp, tb[RTA_VIA]);
696 if (tb[RTA_FLOW])
697 print_rta_flow(fp, tb[RTA_FLOW]);
698 }
699
80d1c528
SH
700 if ((r->rtm_flags & RTM_F_CLONED) &&
701 r->rtm_type == RTN_MULTICAST) {
4ecefff3
JF
702 print_string(PRINT_ANY, "dev",
703 "%s", ll_index_to_name(nh->rtnh_ifindex));
704
f48e1488 705 if (nh->rtnh_hops != 1)
4ecefff3
JF
706 print_int(PRINT_ANY, "ttl", "(ttl>%d)", nh->rtnh_hops);
707
708 print_string(PRINT_FP, NULL, " ", NULL);
f48e1488 709 } else {
4ecefff3
JF
710 print_string(PRINT_ANY, "dev",
711 "dev %s ", ll_index_to_name(nh->rtnh_ifindex));
712
f48e1488 713 if (r->rtm_family != AF_MPLS)
4ecefff3
JF
714 print_int(PRINT_ANY, "weight",
715 "weight %d ", nh->rtnh_hops + 1);
f48e1488
SH
716 }
717
718 print_rt_flags(fp, nh->rtnh_flags);
719
720 len -= NLMSG_ALIGN(nh->rtnh_len);
721 nh = RTNH_NEXT(nh);
4ecefff3
JF
722
723 close_json_object();
f48e1488 724 }
4ecefff3 725 close_json_array(PRINT_JSON, NULL);
f48e1488
SH
726}
727
cd554f2c 728int print_route(struct nlmsghdr *n, void *arg)
f4ff11e3 729{
56f5daac 730 FILE *fp = (FILE *)arg;
f4ff11e3
DS
731 struct rtmsg *r = NLMSG_DATA(n);
732 int len = n->nlmsg_len;
56f5daac 733 struct rtattr *tb[RTA_MAX+1];
663c3cb2 734 int family, color, host_len;
f4ff11e3 735 __u32 table;
2f406f2d 736 int ret;
56f5daac 737
f4ff11e3 738 SPRINT_BUF(b1);
f4ff11e3
DS
739
740 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
741 fprintf(stderr, "Not a route: %08x %08x %08x\n",
742 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
ba7b9777 743 return -1;
f4ff11e3
DS
744 }
745 if (filter.flushb && n->nlmsg_type != RTM_NEWROUTE)
746 return 0;
747 len -= NLMSG_LENGTH(sizeof(*r));
748 if (len < 0) {
749 fprintf(stderr, "BUG: wrong nlmsg len %d\n", len);
750 return -1;
751 }
752
f3a2ddc1 753 host_len = af_bit_len(r->rtm_family);
f4ff11e3
DS
754
755 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
756 table = rtm_get_table(r, tb);
757
758 if (!filter_nlmsg(n, tb, host_len))
759 return 0;
760
aba5acdf
SH
761 if (filter.flushb) {
762 struct nlmsghdr *fn;
56f5daac 763
aba5acdf 764 if (NLMSG_ALIGN(filter.flushp) + n->nlmsg_len > filter.flushe) {
cc560825
SH
765 ret = flush_update();
766 if (ret < 0)
2f406f2d 767 return ret;
aba5acdf 768 }
56f5daac 769 fn = (struct nlmsghdr *)(filter.flushb + NLMSG_ALIGN(filter.flushp));
aba5acdf
SH
770 memcpy(fn, n, n->nlmsg_len);
771 fn->nlmsg_type = RTM_DELROUTE;
772 fn->nlmsg_flags = NLM_F_REQUEST;
351efcde 773 fn->nlmsg_seq = ++rth.seq;
56f5daac 774 filter.flushp = (((char *)fn) + n->nlmsg_len) - filter.flushb;
aba5acdf
SH
775 filter.flushed++;
776 if (show_stats < 2)
777 return 0;
778 }
779
663c3cb2 780 open_json_object(NULL);
aba5acdf 781 if (n->nlmsg_type == RTM_DELROUTE)
663c3cb2
SH
782 print_bool(PRINT_ANY, "deleted", "Deleted ", true);
783
d84b1878
DA
784 if ((r->rtm_type != RTN_UNICAST || show_details > 0) &&
785 (!filter.typemask || (filter.typemask & (1 << r->rtm_type))))
07366177 786 print_string(PRINT_ANY, "type", "%s ",
663c3cb2 787 rtnl_rtntype_n2a(r->rtm_type, b1, sizeof(b1)));
aba5acdf 788
663c3cb2 789 color = COLOR_NONE;
aba5acdf 790 if (tb[RTA_DST]) {
56e3eb4c 791 family = get_real_family(r->rtm_type, r->rtm_family);
663c3cb2
SH
792 color = ifa_family_color(family);
793
aba5acdf 794 if (r->rtm_dst_len != host_len) {
663c3cb2
SH
795 snprintf(b1, sizeof(b1),
796 "%s/%u", rt_addr_n2a_rta(family, tb[RTA_DST]),
797 r->rtm_dst_len);
aba5acdf 798 } else {
663c3cb2
SH
799 format_host_rta_r(family, tb[RTA_DST],
800 b1, sizeof(b1));
801
aba5acdf
SH
802 }
803 } else if (r->rtm_dst_len) {
663c3cb2 804 snprintf(b1, sizeof(b1), "0/%d ", r->rtm_dst_len);
aba5acdf 805 } else {
663c3cb2 806 strncpy(b1, "default", sizeof(b1));
aba5acdf 807 }
663c3cb2
SH
808 print_color_string(PRINT_ANY, color,
809 "dst", "%s ", b1);
810
aba5acdf 811 if (tb[RTA_SRC]) {
56e3eb4c 812 family = get_real_family(r->rtm_type, r->rtm_family);
663c3cb2
SH
813 color = ifa_family_color(family);
814
aba5acdf 815 if (r->rtm_src_len != host_len) {
663c3cb2
SH
816 snprintf(b1, sizeof(b1),
817 "%s/%u",
818 rt_addr_n2a_rta(family, tb[RTA_SRC]),
819 r->rtm_src_len);
aba5acdf 820 } else {
663c3cb2
SH
821 format_host_rta_r(family, tb[RTA_SRC],
822 b1, sizeof(b1));
aba5acdf 823 }
663c3cb2
SH
824 print_color_string(PRINT_ANY, color,
825 "from", "from %s ", b1);
aba5acdf 826 } else if (r->rtm_src_len) {
663c3cb2
SH
827 snprintf(b1, sizeof(b1), "0/%u", r->rtm_src_len);
828
829 print_string(PRINT_ANY, "src", "from %s ", b1);
aba5acdf 830 }
a3484a9f 831
12387e2c
DA
832 if (tb[RTA_NH_ID])
833 print_uint(PRINT_ANY, "nhid", "nhid %u ",
834 rta_getattr_u32(tb[RTA_NH_ID]));
835
a3484a9f
SH
836 if (tb[RTA_NEWDST])
837 print_rta_newdst(fp, r, tb[RTA_NEWDST]);
1e529305
RP
838
839 if (tb[RTA_ENCAP])
840 lwt_print_encap(fp, tb[RTA_ENCAP_TYPE], tb[RTA_ENCAP]);
841
aba5acdf 842 if (r->rtm_tos && filter.tosmask != -1) {
663c3cb2
SH
843 print_string(PRINT_ANY, "tos", "tos %s ",
844 rtnl_dsfield_n2a(r->rtm_tos, b1, sizeof(b1)));
aba5acdf 845 }
02d2ae55 846
a3484a9f 847 if (tb[RTA_GATEWAY] && filter.rvia.bitlen != host_len)
48a1e96d 848 print_rta_gateway(fp, r->rtm_family, tb[RTA_GATEWAY]);
a3484a9f
SH
849
850 if (tb[RTA_VIA])
851 print_rta_via(fp, tb[RTA_VIA]);
56f5daac 852
aba5acdf 853 if (tb[RTA_OIF] && filter.oifmask != -1)
663c3cb2 854 print_rta_if(fp, tb[RTA_OIF], "dev");
aba5acdf 855
bc234301 856 if (table && (table != RT_TABLE_MAIN || show_details > 0) && !filter.tb)
663c3cb2
SH
857 print_string(PRINT_ANY,
858 "table", "table %s ",
859 rtnl_rttable_n2a(table, b1, sizeof(b1)));
860
80d1c528 861 if (!(r->rtm_flags & RTM_F_CLONED)) {
663c3cb2
SH
862 if ((r->rtm_protocol != RTPROT_BOOT || show_details > 0) &&
863 filter.protocolmask != -1)
864 print_string(PRINT_ANY,
865 "protocol", "proto %s ",
866 rtnl_rtprot_n2a(r->rtm_protocol,
867 b1, sizeof(b1)));
868
869 if ((r->rtm_scope != RT_SCOPE_UNIVERSE || show_details > 0) &&
870 filter.scopemask != -1)
871 print_string(PRINT_ANY,
872 "scope", "scope %s ",
873 rtnl_rtscope_n2a(r->rtm_scope,
874 b1, sizeof(b1)));
aba5acdf 875 }
663c3cb2 876
aba5acdf 877 if (tb[RTA_PREFSRC] && filter.rprefsrc.bitlen != host_len) {
663c3cb2
SH
878 const char *psrc
879 = rt_addr_n2a_rta(r->rtm_family, tb[RTA_PREFSRC]);
880
aba5acdf
SH
881 /* Do not use format_host(). It is our local addr
882 and symbolic name will not be useful.
663c3cb2
SH
883 */
884 if (is_json_context())
885 print_string(PRINT_JSON, "prefsrc", NULL, psrc);
886 else {
887 fprintf(fp, "src ");
888 print_color_string(PRINT_FP,
889 ifa_family_color(r->rtm_family),
890 NULL, "%s ", psrc);
891 }
892
aba5acdf 893 }
663c3cb2 894
ed7fdc95 895 if (tb[RTA_PRIORITY] && filter.metricmask != -1)
663c3cb2
SH
896 print_uint(PRINT_ANY, "metric", "metric %u ",
897 rta_getattr_u32(tb[RTA_PRIORITY]));
b3ab1e68
SH
898
899 print_rt_flags(fp, r->rtm_flags);
900
b0373bfb 901 if (tb[RTA_MARK]) {
9f1370c0 902 unsigned int mark = rta_getattr_u32(tb[RTA_MARK]);
56f5daac 903
b0373bfb 904 if (mark) {
663c3cb2
SH
905 if (is_json_context())
906 print_uint(PRINT_JSON, "mark", NULL, mark);
907 else if (mark >= 16)
908 print_0xhex(PRINT_FP, NULL,
90c5c969 909 "mark 0x%llx ", mark);
b0373bfb 910 else
663c3cb2
SH
911 print_uint(PRINT_FP, NULL,
912 "mark %u ", mark);
b0373bfb
ED
913 }
914 }
aba5acdf 915
5782965a
SH
916 if (tb[RTA_FLOW] && filter.realmmask != ~0U)
917 print_rta_flow(fp, tb[RTA_FLOW]);
82252cdc
LC
918
919 if (tb[RTA_UID])
663c3cb2
SH
920 print_uint(PRINT_ANY, "uid", "uid %u ",
921 rta_getattr_u32(tb[RTA_UID]));
daf30f6f 922
663c3cb2 923 if (r->rtm_family == AF_INET) {
9107c425 924 if (r->rtm_flags & RTM_F_CLONED)
663c3cb2 925 print_cache_flags(fp, r->rtm_flags);
6e41810e 926
9107c425
DA
927 if (tb[RTA_CACHEINFO])
928 print_rta_cacheinfo(fp, RTA_DATA(tb[RTA_CACHEINFO]));
aba5acdf 929 } else if (r->rtm_family == AF_INET6) {
9107c425
DA
930 if (tb[RTA_CACHEINFO])
931 print_rta_cacheinfo(fp, RTA_DATA(tb[RTA_CACHEINFO]));
aba5acdf 932 }
6e41810e 933
968272e7
SH
934 if (tb[RTA_METRICS])
935 print_rta_metrics(fp, tb[RTA_METRICS]);
aba5acdf 936
1506d8d3
SH
937 if (tb[RTA_IIF] && filter.iifmask != -1)
938 print_rta_if(fp, tb[RTA_IIF], "iif");
b3ab1e68 939
8cfc2d47
SH
940 if (tb[RTA_PREF])
941 print_rt_pref(fp, rta_getattr_u8(tb[RTA_PREF]));
942
c44d18ea 943 if (tb[RTA_TTL_PROPAGATE]) {
94b0c901 944 bool propagate = rta_getattr_u8(tb[RTA_TTL_PROPAGATE]);
663c3cb2
SH
945
946 if (is_json_context())
947 print_bool(PRINT_JSON, "ttl-propogate", NULL,
94b0c901 948 propagate);
c44d18ea 949 else
663c3cb2
SH
950 print_string(PRINT_FP, NULL,
951 "ttl-propogate %s",
94b0c901 952 propagate ? "enabled" : "disabled");
c44d18ea 953 }
663c3cb2 954
320c5c6e
DS
955 if (tb[RTA_MULTIPATH])
956 print_rta_multipath(fp, r, tb[RTA_MULTIPATH]);
957
958 /* If you are adding new route RTA_XXXX then place it above
959 * the RTA_MULTIPATH else it will appear that the last nexthop
960 * in the ECMP has new attributes
961 */
962
663c3cb2
SH
963 print_string(PRINT_FP, NULL, "\n", NULL);
964 close_json_object();
aba5acdf
SH
965 fflush(fp);
966 return 0;
967}
968
1e529305 969static int parse_one_nh(struct nlmsghdr *n, struct rtmsg *r,
bd59e5b1 970 struct rtattr *rta, size_t len, struct rtnexthop *rtnh,
d1f28cf1 971 int *argcp, char ***argvp)
aba5acdf
SH
972{
973 int argc = *argcp;
974 char **argv = *argvp;
975
976 while (++argv, --argc > 0) {
977 if (strcmp(*argv, "via") == 0) {
4d6c3796 978 inet_prefix addr;
93ae2835 979 int family;
56f5daac 980
aba5acdf 981 NEXT_ARG();
93ae2835
EB
982 family = read_family(*argv);
983 if (family == AF_UNSPEC)
984 family = r->rtm_family;
985 else
986 NEXT_ARG();
987 get_addr(&addr, *argv, family);
4d6c3796
VB
988 if (r->rtm_family == AF_UNSPEC)
989 r->rtm_family = addr.family;
93ae2835 990 if (addr.family == r->rtm_family) {
bd59e5b1
PS
991 if (rta_addattr_l(rta, len, RTA_GATEWAY,
992 &addr.data, addr.bytelen))
993 return -1;
994 rtnh->rtnh_len += sizeof(struct rtattr)
995 + addr.bytelen;
93ae2835 996 } else {
bd59e5b1
PS
997 if (rta_addattr_l(rta, len, RTA_VIA,
998 &addr.family, addr.bytelen + 2))
999 return -1;
1000 rtnh->rtnh_len += RTA_SPACE(addr.bytelen + 2);
93ae2835 1001 }
aba5acdf
SH
1002 } else if (strcmp(*argv, "dev") == 0) {
1003 NEXT_ARG();
cc560825 1004 rtnh->rtnh_ifindex = ll_name_to_index(*argv);
fe99adbc
SP
1005 if (!rtnh->rtnh_ifindex)
1006 return nodev(*argv);
aba5acdf 1007 } else if (strcmp(*argv, "weight") == 0) {
56f5daac
SH
1008 unsigned int w;
1009
aba5acdf
SH
1010 NEXT_ARG();
1011 if (get_unsigned(&w, *argv, 0) || w == 0 || w > 256)
1012 invarg("\"weight\" is invalid\n", *argv);
1013 rtnh->rtnh_hops = w - 1;
1014 } else if (strcmp(*argv, "onlink") == 0) {
1015 rtnh->rtnh_flags |= RTNH_F_ONLINK;
f4f6d640
PM
1016 } else if (matches(*argv, "realms") == 0) {
1017 __u32 realm;
56f5daac 1018
f4f6d640 1019 NEXT_ARG();
d583e88e 1020 if (get_rt_realms_or_raw(&realm, *argv))
f4f6d640 1021 invarg("\"realm\" value is invalid\n", *argv);
bd59e5b1
PS
1022 if (rta_addattr32(rta, len, RTA_FLOW, realm))
1023 return -1;
f4f6d640 1024 rtnh->rtnh_len += sizeof(struct rtattr) + 4;
1e529305 1025 } else if (strcmp(*argv, "encap") == 0) {
bd59e5b1 1026 int old_len = rta->rta_len;
1e529305 1027
73924010
DA
1028 if (lwt_parse_encap(rta, len, &argc, &argv,
1029 RTA_ENCAP, RTA_ENCAP_TYPE))
bd59e5b1
PS
1030 return -1;
1031 rtnh->rtnh_len += rta->rta_len - old_len;
ecc509f9
RP
1032 } else if (strcmp(*argv, "as") == 0) {
1033 inet_prefix addr;
1034
1035 NEXT_ARG();
1036 if (strcmp(*argv, "to") == 0)
1037 NEXT_ARG();
1038 get_addr(&addr, *argv, r->rtm_family);
bd59e5b1
PS
1039 if (rta_addattr_l(rta, len, RTA_NEWDST,
1040 &addr.data, addr.bytelen))
1041 return -1;
ecc509f9 1042 rtnh->rtnh_len += sizeof(struct rtattr) + addr.bytelen;
aba5acdf
SH
1043 } else
1044 break;
1045 }
1046 *argcp = argc;
1047 *argvp = argv;
1048 return 0;
1049}
1050
d1f28cf1
SH
1051static int parse_nexthops(struct nlmsghdr *n, struct rtmsg *r,
1052 int argc, char **argv)
aba5acdf 1053{
bd59e5b1 1054 char buf[4096];
56f5daac 1055 struct rtattr *rta = (void *)buf;
aba5acdf
SH
1056 struct rtnexthop *rtnh;
1057
1058 rta->rta_type = RTA_MULTIPATH;
1059 rta->rta_len = RTA_LENGTH(0);
1060 rtnh = RTA_DATA(rta);
1061
1062 while (argc > 0) {
1063 if (strcmp(*argv, "nexthop") != 0) {
1064 fprintf(stderr, "Error: \"nexthop\" or end of line is expected instead of \"%s\"\n", *argv);
1065 exit(-1);
1066 }
1067 if (argc <= 1) {
1068 fprintf(stderr, "Error: unexpected end of line after \"nexthop\"\n");
1069 exit(-1);
1070 }
1071 memset(rtnh, 0, sizeof(*rtnh));
1072 rtnh->rtnh_len = sizeof(*rtnh);
1073 rta->rta_len += rtnh->rtnh_len;
bd59e5b1 1074 if (parse_one_nh(n, r, rta, 4096, rtnh, &argc, &argv)) {
ee53b42f
JS
1075 fprintf(stderr, "Error: cannot parse nexthop\n");
1076 exit(-1);
1077 }
aba5acdf
SH
1078 rtnh = RTNH_NEXT(rtnh);
1079 }
1080
1081 if (rta->rta_len > RTA_LENGTH(0))
bd59e5b1
PS
1082 return addattr_l(n, 4096, RTA_MULTIPATH,
1083 RTA_DATA(rta), RTA_PAYLOAD(rta));
aba5acdf
SH
1084 return 0;
1085}
1086
56f5daac 1087static int iproute_modify(int cmd, unsigned int flags, int argc, char **argv)
aba5acdf 1088{
aba5acdf 1089 struct {
4806867a
SH
1090 struct nlmsghdr n;
1091 struct rtmsg r;
bd59e5b1 1092 char buf[4096];
d17b136f
PS
1093 } req = {
1094 .n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg)),
1095 .n.nlmsg_flags = NLM_F_REQUEST | flags,
1096 .n.nlmsg_type = cmd,
1097 .r.rtm_family = preferred_family,
1098 .r.rtm_table = RT_TABLE_MAIN,
1099 .r.rtm_scope = RT_SCOPE_NOWHERE,
1100 };
aba5acdf 1101 char mxbuf[256];
56f5daac
SH
1102 struct rtattr *mxrta = (void *)mxbuf;
1103 unsigned int mxlock = 0;
aba5acdf
SH
1104 char *d = NULL;
1105 int gw_ok = 0;
1106 int dst_ok = 0;
1107 int nhs_ok = 0;
1108 int scope_ok = 0;
1109 int table_ok = 0;
54e0b2e7 1110 int raw = 0;
f638e9f7 1111 int type_ok = 0;
12387e2c 1112 __u32 nhid = 0;
aba5acdf 1113
aba5acdf
SH
1114 if (cmd != RTM_DELROUTE) {
1115 req.r.rtm_protocol = RTPROT_BOOT;
1116 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
1117 req.r.rtm_type = RTN_UNICAST;
1118 }
1119
1120 mxrta->rta_type = RTA_METRICS;
1121 mxrta->rta_len = RTA_LENGTH(0);
1122
1123 while (argc > 0) {
1124 if (strcmp(*argv, "src") == 0) {
1125 inet_prefix addr;
56f5daac 1126
aba5acdf
SH
1127 NEXT_ARG();
1128 get_addr(&addr, *argv, req.r.rtm_family);
1129 if (req.r.rtm_family == AF_UNSPEC)
1130 req.r.rtm_family = addr.family;
21fef525
SH
1131 addattr_l(&req.n, sizeof(req),
1132 RTA_PREFSRC, &addr.data, addr.bytelen);
6f7a9f4d
EB
1133 } else if (strcmp(*argv, "as") == 0) {
1134 inet_prefix addr;
56f5daac 1135
6f7a9f4d
EB
1136 NEXT_ARG();
1137 if (strcmp(*argv, "to") == 0) {
1138 NEXT_ARG();
1139 }
1140 get_addr(&addr, *argv, req.r.rtm_family);
1141 if (req.r.rtm_family == AF_UNSPEC)
1142 req.r.rtm_family = addr.family;
21fef525
SH
1143 addattr_l(&req.n, sizeof(req),
1144 RTA_NEWDST, &addr.data, addr.bytelen);
aba5acdf
SH
1145 } else if (strcmp(*argv, "via") == 0) {
1146 inet_prefix addr;
93ae2835 1147 int family;
56f5daac 1148
11f2c753
DA
1149 if (gw_ok) {
1150 invarg("use nexthop syntax to specify multiple via\n",
1151 *argv);
1152 }
aba5acdf
SH
1153 gw_ok = 1;
1154 NEXT_ARG();
93ae2835
EB
1155 family = read_family(*argv);
1156 if (family == AF_UNSPEC)
1157 family = req.r.rtm_family;
1158 else
1159 NEXT_ARG();
1160 get_addr(&addr, *argv, family);
aba5acdf
SH
1161 if (req.r.rtm_family == AF_UNSPEC)
1162 req.r.rtm_family = addr.family;
93ae2835 1163 if (addr.family == req.r.rtm_family)
ecc509f9
RP
1164 addattr_l(&req.n, sizeof(req), RTA_GATEWAY,
1165 &addr.data, addr.bytelen);
93ae2835 1166 else
ecc509f9
RP
1167 addattr_l(&req.n, sizeof(req), RTA_VIA,
1168 &addr.family, addr.bytelen+2);
aba5acdf
SH
1169 } else if (strcmp(*argv, "from") == 0) {
1170 inet_prefix addr;
56f5daac 1171
aba5acdf
SH
1172 NEXT_ARG();
1173 get_prefix(&addr, *argv, req.r.rtm_family);
1174 if (req.r.rtm_family == AF_UNSPEC)
1175 req.r.rtm_family = addr.family;
1176 if (addr.bytelen)
1177 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
1178 req.r.rtm_src_len = addr.bitlen;
1179 } else if (strcmp(*argv, "tos") == 0 ||
1180 matches(*argv, "dsfield") == 0) {
1181 __u32 tos;
56f5daac 1182
aba5acdf
SH
1183 NEXT_ARG();
1184 if (rtnl_dsfield_a2n(&tos, *argv))
1185 invarg("\"tos\" value is invalid\n", *argv);
1186 req.r.rtm_tos = tos;
56f5daac 1187 } else if (strcmp(*argv, "expires") == 0) {
68eede25 1188 __u32 expires;
56f5daac 1189
68eede25
HL
1190 NEXT_ARG();
1191 if (get_u32(&expires, *argv, 0))
1192 invarg("\"expires\" value is invalid\n", *argv);
eecc0069 1193 addattr32(&req.n, sizeof(req), RTA_EXPIRES, expires);
aba5acdf
SH
1194 } else if (matches(*argv, "metric") == 0 ||
1195 matches(*argv, "priority") == 0 ||
194e9b85 1196 strcmp(*argv, "preference") == 0) {
aba5acdf 1197 __u32 metric;
56f5daac 1198
aba5acdf
SH
1199 NEXT_ARG();
1200 if (get_u32(&metric, *argv, 0))
1201 invarg("\"metric\" value is invalid\n", *argv);
1202 addattr32(&req.n, sizeof(req), RTA_PRIORITY, metric);
1203 } else if (strcmp(*argv, "scope") == 0) {
f332d169 1204 __u32 scope = 0;
56f5daac 1205
aba5acdf
SH
1206 NEXT_ARG();
1207 if (rtnl_rtscope_a2n(&scope, *argv))
1208 invarg("invalid \"scope\" value\n", *argv);
1209 req.r.rtm_scope = scope;
1210 scope_ok = 1;
1211 } else if (strcmp(*argv, "mtu") == 0) {
56f5daac
SH
1212 unsigned int mtu;
1213
aba5acdf
SH
1214 NEXT_ARG();
1215 if (strcmp(*argv, "lock") == 0) {
1216 mxlock |= (1<<RTAX_MTU);
1217 NEXT_ARG();
1218 }
1219 if (get_unsigned(&mtu, *argv, 0))
1220 invarg("\"mtu\" value is invalid\n", *argv);
1221 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
71e58151 1222 } else if (strcmp(*argv, "hoplimit") == 0) {
56f5daac
SH
1223 unsigned int hoplimit;
1224
71e58151
GBY
1225 NEXT_ARG();
1226 if (strcmp(*argv, "lock") == 0) {
1227 mxlock |= (1<<RTAX_HOPLIMIT);
1228 NEXT_ARG();
1229 }
ea6cbab7 1230 if (get_unsigned(&hoplimit, *argv, 0) || hoplimit > 255)
71e58151
GBY
1231 invarg("\"hoplimit\" value is invalid\n", *argv);
1232 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_HOPLIMIT, hoplimit);
aba5acdf 1233 } else if (strcmp(*argv, "advmss") == 0) {
56f5daac
SH
1234 unsigned int mss;
1235
aba5acdf
SH
1236 NEXT_ARG();
1237 if (strcmp(*argv, "lock") == 0) {
1238 mxlock |= (1<<RTAX_ADVMSS);
1239 NEXT_ARG();
1240 }
1241 if (get_unsigned(&mss, *argv, 0))
1242 invarg("\"mss\" value is invalid\n", *argv);
1243 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_ADVMSS, mss);
aba5acdf 1244 } else if (matches(*argv, "reordering") == 0) {
56f5daac
SH
1245 unsigned int reord;
1246
aba5acdf
SH
1247 NEXT_ARG();
1248 if (strcmp(*argv, "lock") == 0) {
1249 mxlock |= (1<<RTAX_REORDERING);
1250 NEXT_ARG();
1251 }
1252 if (get_unsigned(&reord, *argv, 0))
1253 invarg("\"reordering\" value is invalid\n", *argv);
1254 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_REORDERING, reord);
aba5acdf 1255 } else if (strcmp(*argv, "rtt") == 0) {
56f5daac
SH
1256 unsigned int rtt;
1257
aba5acdf
SH
1258 NEXT_ARG();
1259 if (strcmp(*argv, "lock") == 0) {
1260 mxlock |= (1<<RTAX_RTT);
1261 NEXT_ARG();
1262 }
81d03dc3 1263 if (get_time_rtt(&rtt, *argv, &raw))
aba5acdf 1264 invarg("\"rtt\" value is invalid\n", *argv);
0612519e 1265 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTT,
54e0b2e7
RJ
1266 (raw) ? rtt : rtt * 8);
1267 } else if (strcmp(*argv, "rto_min") == 0) {
56f5daac
SH
1268 unsigned int rto_min;
1269
54e0b2e7
RJ
1270 NEXT_ARG();
1271 mxlock |= (1<<RTAX_RTO_MIN);
81d03dc3 1272 if (get_time_rtt(&rto_min, *argv, &raw))
54e0b2e7
RJ
1273 invarg("\"rto_min\" value is invalid\n",
1274 *argv);
1275 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTO_MIN,
1276 rto_min);
aba5acdf 1277 } else if (matches(*argv, "window") == 0) {
56f5daac
SH
1278 unsigned int win;
1279
aba5acdf
SH
1280 NEXT_ARG();
1281 if (strcmp(*argv, "lock") == 0) {
1282 mxlock |= (1<<RTAX_WINDOW);
1283 NEXT_ARG();
1284 }
1285 if (get_unsigned(&win, *argv, 0))
1286 invarg("\"window\" value is invalid\n", *argv);
1287 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_WINDOW, win);
1288 } else if (matches(*argv, "cwnd") == 0) {
56f5daac
SH
1289 unsigned int win;
1290
aba5acdf
SH
1291 NEXT_ARG();
1292 if (strcmp(*argv, "lock") == 0) {
1293 mxlock |= (1<<RTAX_CWND);
1294 NEXT_ARG();
1295 }
1296 if (get_unsigned(&win, *argv, 0))
1297 invarg("\"cwnd\" value is invalid\n", *argv);
1298 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_CWND, win);
a1f1143e 1299 } else if (matches(*argv, "initcwnd") == 0) {
56f5daac
SH
1300 unsigned int win;
1301
a1f1143e
VW
1302 NEXT_ARG();
1303 if (strcmp(*argv, "lock") == 0) {
1304 mxlock |= (1<<RTAX_INITCWND);
1305 NEXT_ARG();
1306 }
1307 if (get_unsigned(&win, *argv, 0))
1308 invarg("\"initcwnd\" value is invalid\n", *argv);
21fef525
SH
1309 rta_addattr32(mxrta, sizeof(mxbuf),
1310 RTAX_INITCWND, win);
f5fd8003 1311 } else if (matches(*argv, "initrwnd") == 0) {
56f5daac
SH
1312 unsigned int win;
1313
f5fd8003 1314 NEXT_ARG();
1315 if (strcmp(*argv, "lock") == 0) {
1316 mxlock |= (1<<RTAX_INITRWND);
1317 NEXT_ARG();
1318 }
1319 if (get_unsigned(&win, *argv, 0))
1320 invarg("\"initrwnd\" value is invalid\n", *argv);
21fef525
SH
1321 rta_addattr32(mxrta, sizeof(mxbuf),
1322 RTAX_INITRWND, win);
29d1f730
FW
1323 } else if (matches(*argv, "features") == 0) {
1324 unsigned int features = 0;
1325
1326 while (argc > 0) {
1327 NEXT_ARG();
1328
1329 if (strcmp(*argv, "ecn") == 0)
1330 features |= RTAX_FEATURE_ECN;
1331 else
1332 invarg("\"features\" value not valid\n", *argv);
1333 break;
1334 }
1335
21fef525
SH
1336 rta_addattr32(mxrta, sizeof(mxbuf),
1337 RTAX_FEATURES, features);
b37f2c89 1338 } else if (matches(*argv, "quickack") == 0) {
56f5daac
SH
1339 unsigned int quickack;
1340
b37f2c89
CW
1341 NEXT_ARG();
1342 if (get_unsigned(&quickack, *argv, 0))
1343 invarg("\"quickack\" value is invalid\n", *argv);
1344 if (quickack != 1 && quickack != 0)
1345 invarg("\"quickack\" value should be 0 or 1\n", *argv);
21fef525
SH
1346 rta_addattr32(mxrta, sizeof(mxbuf),
1347 RTAX_QUICKACK, quickack);
6ef87f9c
DB
1348 } else if (matches(*argv, "congctl") == 0) {
1349 NEXT_ARG();
1350 if (strcmp(*argv, "lock") == 0) {
1351 mxlock |= 1 << RTAX_CC_ALGO;
1352 NEXT_ARG();
1353 }
1354 rta_addattr_l(mxrta, sizeof(mxbuf), RTAX_CC_ALGO, *argv,
1355 strlen(*argv));
aba5acdf 1356 } else if (matches(*argv, "rttvar") == 0) {
56f5daac
SH
1357 unsigned int win;
1358
aba5acdf
SH
1359 NEXT_ARG();
1360 if (strcmp(*argv, "lock") == 0) {
1361 mxlock |= (1<<RTAX_RTTVAR);
1362 NEXT_ARG();
1363 }
81d03dc3 1364 if (get_time_rtt(&win, *argv, &raw))
aba5acdf 1365 invarg("\"rttvar\" value is invalid\n", *argv);
54e0b2e7
RJ
1366 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTTVAR,
1367 (raw) ? win : win * 4);
aba5acdf 1368 } else if (matches(*argv, "ssthresh") == 0) {
56f5daac
SH
1369 unsigned int win;
1370
aba5acdf
SH
1371 NEXT_ARG();
1372 if (strcmp(*argv, "lock") == 0) {
1373 mxlock |= (1<<RTAX_SSTHRESH);
1374 NEXT_ARG();
1375 }
1376 if (get_unsigned(&win, *argv, 0))
1377 invarg("\"ssthresh\" value is invalid\n", *argv);
1378 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_SSTHRESH, win);
1379 } else if (matches(*argv, "realms") == 0) {
1380 __u32 realm;
56f5daac 1381
aba5acdf 1382 NEXT_ARG();
d583e88e 1383 if (get_rt_realms_or_raw(&realm, *argv))
aba5acdf
SH
1384 invarg("\"realm\" value is invalid\n", *argv);
1385 addattr32(&req.n, sizeof(req), RTA_FLOW, realm);
1386 } else if (strcmp(*argv, "onlink") == 0) {
1387 req.r.rtm_flags |= RTNH_F_ONLINK;
aba5acdf
SH
1388 } else if (strcmp(*argv, "nexthop") == 0) {
1389 nhs_ok = 1;
1390 break;
12387e2c
DA
1391 } else if (!strcmp(*argv, "nhid")) {
1392 NEXT_ARG();
1393 if (get_u32(&nhid, *argv, 0))
1394 invarg("\"id\" value is invalid\n", *argv);
1395 addattr32(&req.n, sizeof(req), RTA_NH_ID, nhid);
aba5acdf 1396 } else if (matches(*argv, "protocol") == 0) {
f332d169 1397 __u32 prot;
56f5daac 1398
aba5acdf
SH
1399 NEXT_ARG();
1400 if (rtnl_rtprot_a2n(&prot, *argv))
1401 invarg("\"protocol\" value is invalid\n", *argv);
1402 req.r.rtm_protocol = prot;
aba5acdf 1403 } else if (matches(*argv, "table") == 0) {
f332d169 1404 __u32 tid;
56f5daac 1405
aba5acdf
SH
1406 NEXT_ARG();
1407 if (rtnl_rttable_a2n(&tid, *argv))
1408 invarg("\"table\" value is invalid\n", *argv);
34e95647
PM
1409 if (tid < 256)
1410 req.r.rtm_table = tid;
1411 else {
1412 req.r.rtm_table = RT_TABLE_UNSPEC;
1413 addattr32(&req.n, sizeof(req), RTA_TABLE, tid);
1414 }
aba5acdf 1415 table_ok = 1;
0130f012
DA
1416 } else if (matches(*argv, "vrf") == 0) {
1417 __u32 tid;
1418
1419 NEXT_ARG();
1420 tid = ipvrf_get_table(*argv);
1421 if (tid == 0)
1422 invarg("Invalid VRF\n", *argv);
1423 if (tid < 256)
1424 req.r.rtm_table = tid;
1425 else {
1426 req.r.rtm_table = RT_TABLE_UNSPEC;
1427 addattr32(&req.n, sizeof(req), RTA_TABLE, tid);
1428 }
1429 table_ok = 1;
aba5acdf
SH
1430 } else if (strcmp(*argv, "dev") == 0 ||
1431 strcmp(*argv, "oif") == 0) {
1432 NEXT_ARG();
1433 d = *argv;
194e9b85
LR
1434 } else if (matches(*argv, "pref") == 0) {
1435 __u8 pref;
56f5daac 1436
194e9b85
LR
1437 NEXT_ARG();
1438 if (strcmp(*argv, "low") == 0)
1439 pref = ICMPV6_ROUTER_PREF_LOW;
1440 else if (strcmp(*argv, "medium") == 0)
1441 pref = ICMPV6_ROUTER_PREF_MEDIUM;
1442 else if (strcmp(*argv, "high") == 0)
1443 pref = ICMPV6_ROUTER_PREF_HIGH;
1444 else if (get_u8(&pref, *argv, 0))
1445 invarg("\"pref\" value is invalid\n", *argv);
1446 addattr8(&req.n, sizeof(req), RTA_PREF, pref);
1e529305
RP
1447 } else if (strcmp(*argv, "encap") == 0) {
1448 char buf[1024];
56f5daac 1449 struct rtattr *rta = (void *)buf;
1e529305
RP
1450
1451 rta->rta_type = RTA_ENCAP;
1452 rta->rta_len = RTA_LENGTH(0);
1453
73924010
DA
1454 lwt_parse_encap(rta, sizeof(buf), &argc, &argv,
1455 RTA_ENCAP, RTA_ENCAP_TYPE);
1e529305
RP
1456
1457 if (rta->rta_len > RTA_LENGTH(0))
21fef525
SH
1458 addraw_l(&req.n, 1024
1459 , RTA_DATA(rta), RTA_PAYLOAD(rta));
c44d18ea
RS
1460 } else if (strcmp(*argv, "ttl-propagate") == 0) {
1461 __u8 ttl_prop;
1462
1463 NEXT_ARG();
1464 if (matches(*argv, "enabled") == 0)
1465 ttl_prop = 1;
1466 else if (matches(*argv, "disabled") == 0)
1467 ttl_prop = 0;
1468 else
1469 invarg("\"ttl-propagate\" value is invalid\n",
1470 *argv);
1471
1472 addattr8(&req.n, sizeof(req), RTA_TTL_PROPAGATE,
1473 ttl_prop);
e54ed380
CP
1474 } else if (matches(*argv, "fastopen_no_cookie") == 0) {
1475 unsigned int fastopen_no_cookie;
1476
1477 NEXT_ARG();
1478 if (get_unsigned(&fastopen_no_cookie, *argv, 0))
1479 invarg("\"fastopen_no_cookie\" value is invalid\n", *argv);
1480 if (fastopen_no_cookie != 1 && fastopen_no_cookie != 0)
1481 invarg("\"fastopen_no_cookie\" value should be 0 or 1\n", *argv);
1482 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_FASTOPEN_NO_COOKIE, fastopen_no_cookie);
aba5acdf
SH
1483 } else {
1484 int type;
1485 inet_prefix dst;
1486
1487 if (strcmp(*argv, "to") == 0) {
1488 NEXT_ARG();
1489 }
1490 if ((**argv < '0' || **argv > '9') &&
1491 rtnl_rtntype_a2n(&type, *argv) == 0) {
1492 NEXT_ARG();
1493 req.r.rtm_type = type;
f638e9f7 1494 type_ok = 1;
aba5acdf
SH
1495 }
1496
1497 if (matches(*argv, "help") == 0)
1498 usage();
1499 if (dst_ok)
1500 duparg2("to", *argv);
1501 get_prefix(&dst, *argv, req.r.rtm_family);
1502 if (req.r.rtm_family == AF_UNSPEC)
1503 req.r.rtm_family = dst.family;
1504 req.r.rtm_dst_len = dst.bitlen;
1505 dst_ok = 1;
1506 if (dst.bytelen)
21fef525
SH
1507 addattr_l(&req.n, sizeof(req),
1508 RTA_DST, &dst.data, dst.bytelen);
aba5acdf
SH
1509 }
1510 argc--; argv++;
1511 }
1512
922b4822
PS
1513 if (!dst_ok)
1514 usage();
1515
7b201d60 1516 if (d) {
cc560825 1517 int idx = ll_name_to_index(d);
aba5acdf 1518
fe99adbc
SP
1519 if (!idx)
1520 return nodev(d);
7b201d60 1521 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
aba5acdf
SH
1522 }
1523
1524 if (mxrta->rta_len > RTA_LENGTH(0)) {
1525 if (mxlock)
1526 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
1527 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
1528 }
1529
bd59e5b1
PS
1530 if (nhs_ok && parse_nexthops(&req.n, &req.r, argc, argv))
1531 return -1;
aba5acdf 1532
f638e9f7
RP
1533 if (req.r.rtm_family == AF_UNSPEC)
1534 req.r.rtm_family = AF_INET;
1535
aba5acdf
SH
1536 if (!table_ok) {
1537 if (req.r.rtm_type == RTN_LOCAL ||
1538 req.r.rtm_type == RTN_BROADCAST ||
1539 req.r.rtm_type == RTN_NAT ||
1540 req.r.rtm_type == RTN_ANYCAST)
1541 req.r.rtm_table = RT_TABLE_LOCAL;
1542 }
1543 if (!scope_ok) {
f638e9f7
RP
1544 if (req.r.rtm_family == AF_INET6 ||
1545 req.r.rtm_family == AF_MPLS)
1546 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
1547 else if (req.r.rtm_type == RTN_LOCAL ||
1548 req.r.rtm_type == RTN_NAT)
aba5acdf
SH
1549 req.r.rtm_scope = RT_SCOPE_HOST;
1550 else if (req.r.rtm_type == RTN_BROADCAST ||
1551 req.r.rtm_type == RTN_MULTICAST ||
1552 req.r.rtm_type == RTN_ANYCAST)
1553 req.r.rtm_scope = RT_SCOPE_LINK;
1554 else if (req.r.rtm_type == RTN_UNICAST ||
1555 req.r.rtm_type == RTN_UNSPEC) {
1556 if (cmd == RTM_DELROUTE)
1557 req.r.rtm_scope = RT_SCOPE_NOWHERE;
12387e2c 1558 else if (!gw_ok && !nhs_ok && !nhid)
aba5acdf
SH
1559 req.r.rtm_scope = RT_SCOPE_LINK;
1560 }
1561 }
1562
f638e9f7
RP
1563 if (!type_ok && req.r.rtm_family == AF_MPLS)
1564 req.r.rtm_type = RTN_UNICAST;
aba5acdf 1565
86bf43c7 1566 if (rtnl_talk(&rth, &req.n, NULL) < 0)
d58ba4ba 1567 return -2;
aba5acdf
SH
1568
1569 return 0;
1570}
1571
aba5acdf
SH
1572static int iproute_flush_cache(void)
1573{
1574#define ROUTE_FLUSH_PATH "/proc/sys/net/ipv4/route/flush"
1575
1576 int len;
56f5daac 1577 int flush_fd = open(ROUTE_FLUSH_PATH, O_WRONLY);
aba5acdf
SH
1578 char *buffer = "-1";
1579
1580 if (flush_fd < 0) {
56f5daac 1581 fprintf(stderr, "Cannot open \"%s\": %s\n",
9827fa57 1582 ROUTE_FLUSH_PATH, strerror(errno));
aba5acdf
SH
1583 return -1;
1584 }
1585
56f5daac 1586 len = strlen(buffer);
ae665a52 1587
56f5daac
SH
1588 if ((write(flush_fd, (void *)buffer, len)) < len) {
1589 fprintf(stderr, "Cannot flush routing cache\n");
25352af7 1590 close(flush_fd);
aba5acdf
SH
1591 return -1;
1592 }
1593 close(flush_fd);
1594 return 0;
1595}
1596
76c61b34
PE
1597static __u32 route_dump_magic = 0x45311224;
1598
cd554f2c 1599static int save_route(struct nlmsghdr *n, void *arg)
f4ff11e3
DS
1600{
1601 int ret;
1602 int len = n->nlmsg_len;
1603 struct rtmsg *r = NLMSG_DATA(n);
1604 struct rtattr *tb[RTA_MAX+1];
f3a2ddc1 1605 int host_len;
f4ff11e3 1606
f3a2ddc1 1607 host_len = af_bit_len(r->rtm_family);
f4ff11e3
DS
1608 len -= NLMSG_LENGTH(sizeof(*r));
1609 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
1610
1611 if (!filter_nlmsg(n, tb, host_len))
1612 return 0;
1613
1614 ret = write(STDOUT_FILENO, n, n->nlmsg_len);
1615 if ((ret > 0) && (ret != n->nlmsg_len)) {
1616 fprintf(stderr, "Short write while saving nlmsg\n");
1617 ret = -EIO;
1618 }
1619
1620 return ret == n->nlmsg_len ? 0 : ret;
1621}
aba5acdf 1622
76c61b34
PE
1623static int save_route_prep(void)
1624{
1625 int ret;
1626
1627 if (isatty(STDOUT_FILENO)) {
14645ec2 1628 fprintf(stderr, "Not sending a binary stream to stdout\n");
76c61b34
PE
1629 return -1;
1630 }
1631
1632 ret = write(STDOUT_FILENO, &route_dump_magic, sizeof(route_dump_magic));
1633 if (ret != sizeof(route_dump_magic)) {
1634 fprintf(stderr, "Can't write magic to dump file\n");
1635 return -1;
1636 }
1637
1638 return 0;
1639}
1640
b5cf2636
SB
1641static int iproute_dump_filter(struct nlmsghdr *nlh, int reqlen)
1642{
1643 struct rtmsg *rtm = NLMSG_DATA(nlh);
1644 int err;
1645
1646 rtm->rtm_protocol = filter.protocol;
1647 if (filter.cloned)
1648 rtm->rtm_flags |= RTM_F_CLONED;
1649
1650 if (filter.tb) {
1651 err = addattr32(nlh, reqlen, RTA_TABLE, filter.tb);
1652 if (err)
1653 return err;
1654 }
1655
1656 if (filter.oif) {
1657 err = addattr32(nlh, reqlen, RTA_OIF, filter.oif);
1658 if (err)
1659 return err;
1660 }
1661
1662 return 0;
1663}
1664
8d4f35de 1665static int iproute_flush(int family, rtnl_filter_t filter_fn)
432e5f97
SH
1666{
1667 time_t start = time(0);
1668 char flushb[4096-512];
1669 int round = 0;
1670 int ret;
1671
1672 if (filter.cloned) {
8d4f35de 1673 if (family != AF_INET6) {
432e5f97
SH
1674 iproute_flush_cache();
1675 if (show_stats)
1676 printf("*** IPv4 routing cache is flushed.\n");
1677 }
8d4f35de 1678 if (family == AF_INET)
432e5f97
SH
1679 return 0;
1680 }
1681
1682 filter.flushb = flushb;
1683 filter.flushp = 0;
1684 filter.flushe = sizeof(flushb);
1685
1686 for (;;) {
b5cf2636 1687 if (rtnl_routedump_req(&rth, family, iproute_dump_filter) < 0) {
432e5f97
SH
1688 perror("Cannot send dump request");
1689 return -2;
1690 }
1691 filter.flushed = 0;
1692 if (rtnl_dump_filter(&rth, filter_fn, stdout) < 0) {
1693 fprintf(stderr, "Flush terminated\n");
1694 return -2;
1695 }
1696 if (filter.flushed == 0) {
1697 if (show_stats) {
1698 if (round == 0 &&
8d4f35de 1699 (!filter.cloned || family == AF_INET6))
432e5f97
SH
1700 printf("Nothing to flush.\n");
1701 else
1702 printf("*** Flush is complete after %d round%s ***\n",
1703 round, round > 1 ? "s" : "");
1704 }
1705 fflush(stdout);
1706 return 0;
1707 }
1708 round++;
1709 ret = flush_update();
1710 if (ret < 0)
1711 return ret;
1712
1713 if (time(0) - start > 30) {
1714 printf("\n*** Flush not completed after %ld seconds, %d entries remain ***\n",
1715 (long)(time(0) - start), filter.flushed);
1716 return -1;
1717 }
1718
1719 if (show_stats) {
1720 printf("\n*** Round %d, deleting %d entries ***\n",
1721 round, filter.flushed);
1722 fflush(stdout);
1723 }
1724 }
1725}
1726
f4ff11e3 1727static int iproute_list_flush_or_save(int argc, char **argv, int action)
aba5acdf 1728{
8d4f35de 1729 int dump_family = preferred_family;
aba5acdf
SH
1730 char *id = NULL;
1731 char *od = NULL;
b0373bfb 1732 unsigned int mark = 0;
f4ff11e3
DS
1733 rtnl_filter_t filter_fn;
1734
76c61b34
PE
1735 if (action == IPROUTE_SAVE) {
1736 if (save_route_prep())
1737 return -1;
1738
f4ff11e3 1739 filter_fn = save_route;
76c61b34 1740 } else
f4ff11e3 1741 filter_fn = print_route;
aba5acdf 1742
093b7646 1743 iproute_reset_filter(0);
aba5acdf
SH
1744 filter.tb = RT_TABLE_MAIN;
1745
f4ff11e3 1746 if ((action == IPROUTE_FLUSH) && argc <= 0) {
aba5acdf
SH
1747 fprintf(stderr, "\"ip route flush\" requires arguments.\n");
1748 return -1;
1749 }
1750
1751 while (argc > 0) {
1752 if (matches(*argv, "table") == 0) {
f332d169 1753 __u32 tid;
56f5daac 1754
aba5acdf
SH
1755 NEXT_ARG();
1756 if (rtnl_rttable_a2n(&tid, *argv)) {
1757 if (strcmp(*argv, "all") == 0) {
bd4bcdad 1758 filter.tb = 0;
aba5acdf 1759 } else if (strcmp(*argv, "cache") == 0) {
bd4bcdad 1760 filter.cloned = 1;
aba5acdf
SH
1761 } else if (strcmp(*argv, "help") == 0) {
1762 usage();
1763 } else {
1764 invarg("table id value is invalid\n", *argv);
1765 }
bd4bcdad
PM
1766 } else
1767 filter.tb = tid;
0130f012
DA
1768 } else if (matches(*argv, "vrf") == 0) {
1769 __u32 tid;
1770
1771 NEXT_ARG();
1772 tid = ipvrf_get_table(*argv);
1773 if (tid == 0)
1774 invarg("Invalid VRF\n", *argv);
1775 filter.tb = tid;
1776 filter.typemask = ~(1 << RTN_LOCAL | 1<<RTN_BROADCAST);
aba5acdf
SH
1777 } else if (matches(*argv, "cached") == 0 ||
1778 matches(*argv, "cloned") == 0) {
bd4bcdad 1779 filter.cloned = 1;
aba5acdf
SH
1780 } else if (strcmp(*argv, "tos") == 0 ||
1781 matches(*argv, "dsfield") == 0) {
1782 __u32 tos;
56f5daac 1783
aba5acdf
SH
1784 NEXT_ARG();
1785 if (rtnl_dsfield_a2n(&tos, *argv))
1786 invarg("TOS value is invalid\n", *argv);
1787 filter.tos = tos;
1788 filter.tosmask = -1;
1789 } else if (matches(*argv, "protocol") == 0) {
f332d169 1790 __u32 prot = 0;
56f5daac 1791
aba5acdf
SH
1792 NEXT_ARG();
1793 filter.protocolmask = -1;
1794 if (rtnl_rtprot_a2n(&prot, *argv)) {
1795 if (strcmp(*argv, "all") != 0)
1796 invarg("invalid \"protocol\"\n", *argv);
1797 prot = 0;
1798 filter.protocolmask = 0;
1799 }
1800 filter.protocol = prot;
1801 } else if (matches(*argv, "scope") == 0) {
f332d169 1802 __u32 scope = 0;
56f5daac 1803
aba5acdf
SH
1804 NEXT_ARG();
1805 filter.scopemask = -1;
1806 if (rtnl_rtscope_a2n(&scope, *argv)) {
1807 if (strcmp(*argv, "all") != 0)
1808 invarg("invalid \"scope\"\n", *argv);
1809 scope = RT_SCOPE_NOWHERE;
1810 filter.scopemask = 0;
1811 }
1812 filter.scope = scope;
1813 } else if (matches(*argv, "type") == 0) {
1814 int type;
56f5daac 1815
aba5acdf 1816 NEXT_ARG();
aba5acdf
SH
1817 if (rtnl_rtntype_a2n(&type, *argv))
1818 invarg("node type value is invalid\n", *argv);
d84b1878 1819 filter.typemask = (1<<type);
aba5acdf
SH
1820 } else if (strcmp(*argv, "dev") == 0 ||
1821 strcmp(*argv, "oif") == 0) {
1822 NEXT_ARG();
1823 od = *argv;
1824 } else if (strcmp(*argv, "iif") == 0) {
1825 NEXT_ARG();
1826 id = *argv;
b0373bfb
ED
1827 } else if (strcmp(*argv, "mark") == 0) {
1828 NEXT_ARG();
7c66d898
PS
1829 if (get_unsigned(&mark, *argv, 0))
1830 invarg("invalid mark value", *argv);
b0373bfb 1831 filter.markmask = -1;
ed7fdc95 1832 } else if (matches(*argv, "metric") == 0 ||
80d1c528
SH
1833 matches(*argv, "priority") == 0 ||
1834 strcmp(*argv, "preference") == 0) {
ed7fdc95
AZ
1835 __u32 metric;
1836
1837 NEXT_ARG();
1838 if (get_u32(&metric, *argv, 0))
1839 invarg("\"metric\" value is invalid\n", *argv);
1840 filter.metric = metric;
1841 filter.metricmask = -1;
aba5acdf 1842 } else if (strcmp(*argv, "via") == 0) {
93ae2835 1843 int family;
56f5daac 1844
aba5acdf 1845 NEXT_ARG();
93ae2835
EB
1846 family = read_family(*argv);
1847 if (family == AF_UNSPEC)
8d4f35de 1848 family = dump_family;
93ae2835
EB
1849 else
1850 NEXT_ARG();
1851 get_prefix(&filter.rvia, *argv, family);
aba5acdf
SH
1852 } else if (strcmp(*argv, "src") == 0) {
1853 NEXT_ARG();
8d4f35de 1854 get_prefix(&filter.rprefsrc, *argv, dump_family);
aba5acdf
SH
1855 } else if (matches(*argv, "realms") == 0) {
1856 __u32 realm;
56f5daac 1857
aba5acdf 1858 NEXT_ARG();
d583e88e 1859 if (get_rt_realms_or_raw(&realm, *argv))
aba5acdf
SH
1860 invarg("invalid realms\n", *argv);
1861 filter.realm = realm;
1862 filter.realmmask = ~0U;
1863 if ((filter.realm&0xFFFF) == 0 &&
1864 (*argv)[strlen(*argv) - 1] == '/')
1865 filter.realmmask &= ~0xFFFF;
1866 if ((filter.realm&0xFFFF0000U) == 0 &&
1867 (strchr(*argv, '/') == NULL ||
1868 (*argv)[0] == '/'))
1869 filter.realmmask &= ~0xFFFF0000U;
1870 } else if (matches(*argv, "from") == 0) {
1871 NEXT_ARG();
1872 if (matches(*argv, "root") == 0) {
1873 NEXT_ARG();
8d4f35de 1874 get_prefix(&filter.rsrc, *argv, dump_family);
aba5acdf
SH
1875 } else if (matches(*argv, "match") == 0) {
1876 NEXT_ARG();
8d4f35de 1877 get_prefix(&filter.msrc, *argv, dump_family);
aba5acdf
SH
1878 } else {
1879 if (matches(*argv, "exact") == 0) {
1880 NEXT_ARG();
1881 }
8d4f35de 1882 get_prefix(&filter.msrc, *argv, dump_family);
aba5acdf
SH
1883 filter.rsrc = filter.msrc;
1884 }
1885 } else {
1886 if (matches(*argv, "to") == 0) {
1887 NEXT_ARG();
1888 }
1889 if (matches(*argv, "root") == 0) {
1890 NEXT_ARG();
8d4f35de 1891 get_prefix(&filter.rdst, *argv, dump_family);
aba5acdf
SH
1892 } else if (matches(*argv, "match") == 0) {
1893 NEXT_ARG();
8d4f35de 1894 get_prefix(&filter.mdst, *argv, dump_family);
aba5acdf
SH
1895 } else {
1896 if (matches(*argv, "exact") == 0) {
1897 NEXT_ARG();
1898 }
8d4f35de 1899 get_prefix(&filter.mdst, *argv, dump_family);
aba5acdf
SH
1900 filter.rdst = filter.mdst;
1901 }
1902 }
1903 argc--; argv++;
1904 }
1905
8d4f35de
DA
1906 if (dump_family == AF_UNSPEC && filter.tb)
1907 dump_family = AF_INET;
aba5acdf 1908
aba5acdf
SH
1909 if (id || od) {
1910 int idx;
1911
1912 if (id) {
cc560825 1913 idx = ll_name_to_index(id);
fe99adbc
SP
1914 if (!idx)
1915 return nodev(id);
aba5acdf
SH
1916 filter.iif = idx;
1917 filter.iifmask = -1;
1918 }
1919 if (od) {
cc560825 1920 idx = ll_name_to_index(od);
fe99adbc
SP
1921 if (!idx)
1922 return nodev(od);
aba5acdf
SH
1923 filter.oif = idx;
1924 filter.oifmask = -1;
1925 }
1926 }
b0373bfb 1927 filter.mark = mark;
aba5acdf 1928
432e5f97 1929 if (action == IPROUTE_FLUSH)
8d4f35de 1930 return iproute_flush(dump_family, filter_fn);
aba5acdf 1931
8d4f35de 1932 if (rtnl_routedump_req(&rth, dump_family, iproute_dump_filter) < 0) {
43fd93ae
DA
1933 perror("Cannot send dump request");
1934 return -2;
aba5acdf
SH
1935 }
1936
663c3cb2
SH
1937 new_json_obj(json);
1938
cd70f3f5 1939 if (rtnl_dump_filter(&rth, filter_fn, stdout) < 0) {
aba5acdf 1940 fprintf(stderr, "Dump terminated\n");
2f406f2d 1941 return -2;
aba5acdf
SH
1942 }
1943
663c3cb2
SH
1944 delete_json_obj();
1945 fflush(stdout);
2f406f2d 1946 return 0;
aba5acdf
SH
1947}
1948
1949
d1f28cf1 1950static int iproute_get(int argc, char **argv)
aba5acdf 1951{
aba5acdf 1952 struct {
4806867a
SH
1953 struct nlmsghdr n;
1954 struct rtmsg r;
56f5daac 1955 char buf[1024];
d17b136f
PS
1956 } req = {
1957 .n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg)),
1958 .n.nlmsg_flags = NLM_F_REQUEST,
1959 .n.nlmsg_type = RTM_GETROUTE,
1960 .r.rtm_family = preferred_family,
1961 };
aba5acdf
SH
1962 char *idev = NULL;
1963 char *odev = NULL;
86bf43c7 1964 struct nlmsghdr *answer;
aba5acdf 1965 int connected = 0;
aa883d86 1966 int fib_match = 0;
aba5acdf 1967 int from_ok = 0;
b0373bfb 1968 unsigned int mark = 0;
c2f9dc14 1969 bool address_found = false;
aba5acdf 1970
093b7646 1971 iproute_reset_filter(0);
c73f3e02 1972 filter.cloned = 2;
aba5acdf 1973
aba5acdf
SH
1974 while (argc > 0) {
1975 if (strcmp(*argv, "tos") == 0 ||
1976 matches(*argv, "dsfield") == 0) {
1977 __u32 tos;
56f5daac 1978
aba5acdf
SH
1979 NEXT_ARG();
1980 if (rtnl_dsfield_a2n(&tos, *argv))
1981 invarg("TOS value is invalid\n", *argv);
1982 req.r.rtm_tos = tos;
1983 } else if (matches(*argv, "from") == 0) {
1984 inet_prefix addr;
56f5daac 1985
aba5acdf
SH
1986 NEXT_ARG();
1987 if (matches(*argv, "help") == 0)
1988 usage();
1989 from_ok = 1;
1990 get_prefix(&addr, *argv, req.r.rtm_family);
1991 if (req.r.rtm_family == AF_UNSPEC)
1992 req.r.rtm_family = addr.family;
1993 if (addr.bytelen)
21fef525
SH
1994 addattr_l(&req.n, sizeof(req), RTA_SRC,
1995 &addr.data, addr.bytelen);
aba5acdf
SH
1996 req.r.rtm_src_len = addr.bitlen;
1997 } else if (matches(*argv, "iif") == 0) {
1998 NEXT_ARG();
1999 idev = *argv;
b0373bfb
ED
2000 } else if (matches(*argv, "mark") == 0) {
2001 NEXT_ARG();
7c66d898
PS
2002 if (get_unsigned(&mark, *argv, 0))
2003 invarg("invalid mark value", *argv);
aba5acdf
SH
2004 } else if (matches(*argv, "oif") == 0 ||
2005 strcmp(*argv, "dev") == 0) {
2006 NEXT_ARG();
2007 odev = *argv;
2008 } else if (matches(*argv, "notify") == 0) {
2009 req.r.rtm_flags |= RTM_F_NOTIFY;
2010 } else if (matches(*argv, "connected") == 0) {
2011 connected = 1;
0130f012
DA
2012 } else if (matches(*argv, "vrf") == 0) {
2013 NEXT_ARG();
2014 if (!name_is_vrf(*argv))
2015 invarg("Invalid VRF\n", *argv);
2016 odev = *argv;
82252cdc
LC
2017 } else if (matches(*argv, "uid") == 0) {
2018 uid_t uid;
2019
2020 NEXT_ARG();
2021 if (get_unsigned(&uid, *argv, 0))
2022 invarg("invalid UID\n", *argv);
2023 addattr32(&req.n, sizeof(req), RTA_UID, uid);
aa883d86
RP
2024 } else if (matches(*argv, "fibmatch") == 0) {
2025 fib_match = 1;
2e86ed54
RP
2026 } else if (strcmp(*argv, "as") == 0) {
2027 inet_prefix addr;
2028
2029 NEXT_ARG();
2030 if (strcmp(*argv, "to") == 0)
2031 NEXT_ARG();
2032 get_addr(&addr, *argv, req.r.rtm_family);
2033 if (req.r.rtm_family == AF_UNSPEC)
2034 req.r.rtm_family = addr.family;
21fef525
SH
2035 addattr_l(&req.n, sizeof(req), RTA_NEWDST,
2036 &addr.data, addr.bytelen);
804c7fff
RP
2037 } else if (matches(*argv, "sport") == 0) {
2038 __be16 sport;
2039
2040 NEXT_ARG();
2041 if (get_be16(&sport, *argv, 0))
2042 invarg("invalid sport\n", *argv);
2043 addattr16(&req.n, sizeof(req), RTA_SPORT, sport);
2044 } else if (matches(*argv, "dport") == 0) {
2045 __be16 dport;
2046
2047 NEXT_ARG();
2048 if (get_be16(&dport, *argv, 0))
2049 invarg("invalid dport\n", *argv);
2050 addattr16(&req.n, sizeof(req), RTA_DPORT, dport);
2051 } else if (matches(*argv, "ipproto") == 0) {
2052 int ipproto;
2053
2054 NEXT_ARG();
2055 ipproto = inet_proto_a2n(*argv);
2056 if (ipproto < 0)
2057 invarg("Invalid \"ipproto\" value\n",
2058 *argv);
2059 addattr8(&req.n, sizeof(req), RTA_IP_PROTO, ipproto);
aba5acdf
SH
2060 } else {
2061 inet_prefix addr;
56f5daac 2062
aba5acdf
SH
2063 if (strcmp(*argv, "to") == 0) {
2064 NEXT_ARG();
2065 }
2066 if (matches(*argv, "help") == 0)
2067 usage();
2068 get_prefix(&addr, *argv, req.r.rtm_family);
2069 if (req.r.rtm_family == AF_UNSPEC)
2070 req.r.rtm_family = addr.family;
2071 if (addr.bytelen)
21fef525
SH
2072 addattr_l(&req.n, sizeof(req),
2073 RTA_DST, &addr.data, addr.bytelen);
5a37254b
LB
2074 if (req.r.rtm_family == AF_INET && addr.bitlen != 32) {
2075 fprintf(stderr,
2076 "Warning: /%u as prefix is invalid, only /32 (or none) is supported.\n",
2077 addr.bitlen);
2078 req.r.rtm_dst_len = 32;
2079 } else if (req.r.rtm_family == AF_INET6 && addr.bitlen != 128) {
2080 fprintf(stderr,
2081 "Warning: /%u as prefix is invalid, only /128 (or none) is supported.\n",
2082 addr.bitlen);
2083 req.r.rtm_dst_len = 128;
2084 } else
2085 req.r.rtm_dst_len = addr.bitlen;
c2f9dc14 2086 address_found = true;
aba5acdf
SH
2087 }
2088 argc--; argv++;
2089 }
2090
c2f9dc14 2091 if (!address_found) {
14645ec2 2092 fprintf(stderr, "need at least a destination address\n");
2f406f2d 2093 return -1;
aba5acdf
SH
2094 }
2095
aba5acdf
SH
2096 if (idev || odev) {
2097 int idx;
2098
2099 if (idev) {
cc560825 2100 idx = ll_name_to_index(idev);
fe99adbc
SP
2101 if (!idx)
2102 return nodev(idev);
aba5acdf
SH
2103 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
2104 }
2105 if (odev) {
cc560825 2106 idx = ll_name_to_index(odev);
fe99adbc
SP
2107 if (!idx)
2108 return nodev(odev);
aba5acdf
SH
2109 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
2110 }
2111 }
b0373bfb
ED
2112 if (mark)
2113 addattr32(&req.n, sizeof(req), RTA_MARK, mark);
aba5acdf
SH
2114
2115 if (req.r.rtm_family == AF_UNSPEC)
2116 req.r.rtm_family = AF_INET;
2117
8513f4a9
JK
2118 /* Only IPv4 supports the RTM_F_LOOKUP_TABLE flag */
2119 if (req.r.rtm_family == AF_INET)
2120 req.r.rtm_flags |= RTM_F_LOOKUP_TABLE;
aa883d86
RP
2121 if (fib_match)
2122 req.r.rtm_flags |= RTM_F_FIB_MATCH;
bc234301 2123
86bf43c7 2124 if (rtnl_talk(&rth, &req.n, &answer) < 0)
8b21cef1 2125 return -2;
aba5acdf 2126
a0a639d9
MC
2127 new_json_obj(json);
2128
aba5acdf 2129 if (connected && !from_ok) {
86bf43c7
HL
2130 struct rtmsg *r = NLMSG_DATA(answer);
2131 int len = answer->nlmsg_len;
56f5daac 2132 struct rtattr *tb[RTA_MAX+1];
aba5acdf 2133
cd554f2c 2134 if (print_route(answer, (void *)stdout) < 0) {
aba5acdf 2135 fprintf(stderr, "An error :-)\n");
86bf43c7 2136 free(answer);
8be29558 2137 return -1;
aba5acdf
SH
2138 }
2139
86bf43c7 2140 if (answer->nlmsg_type != RTM_NEWROUTE) {
aba5acdf 2141 fprintf(stderr, "Not a route?\n");
86bf43c7 2142 free(answer);
aba5acdf
SH
2143 return -1;
2144 }
2145 len -= NLMSG_LENGTH(sizeof(*r));
2146 if (len < 0) {
2147 fprintf(stderr, "Wrong len %d\n", len);
86bf43c7 2148 free(answer);
aba5acdf
SH
2149 return -1;
2150 }
2151
aba5acdf
SH
2152 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
2153
2154 if (tb[RTA_PREFSRC]) {
2155 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
2156 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
2157 } else if (!tb[RTA_SRC]) {
2158 fprintf(stderr, "Failed to connect the route\n");
86bf43c7 2159 free(answer);
aba5acdf
SH
2160 return -1;
2161 }
2162 if (!odev && tb[RTA_OIF])
2163 tb[RTA_OIF]->rta_type = 0;
2164 if (tb[RTA_GATEWAY])
2165 tb[RTA_GATEWAY]->rta_type = 0;
93ae2835
EB
2166 if (tb[RTA_VIA])
2167 tb[RTA_VIA]->rta_type = 0;
aba5acdf
SH
2168 if (!idev && tb[RTA_IIF])
2169 tb[RTA_IIF]->rta_type = 0;
2170 req.n.nlmsg_flags = NLM_F_REQUEST;
2171 req.n.nlmsg_type = RTM_GETROUTE;
2172
a0a639d9 2173 delete_json_obj();
86bf43c7
HL
2174 free(answer);
2175 if (rtnl_talk(&rth, &req.n, &answer) < 0)
56d8ff0a 2176 return -2;
aba5acdf
SH
2177 }
2178
cd554f2c 2179 if (print_route(answer, (void *)stdout) < 0) {
aba5acdf 2180 fprintf(stderr, "An error :-)\n");
86bf43c7 2181 free(answer);
56d8ff0a 2182 return -1;
aba5acdf
SH
2183 }
2184
a0a639d9 2185 delete_json_obj();
86bf43c7 2186 free(answer);
56d8ff0a 2187 return 0;
aba5acdf
SH
2188}
2189
79f4a393 2190static int rtattr_cmp(const struct rtattr *rta1, const struct rtattr *rta2)
74af8dd9
XL
2191{
2192 if (!rta1 || !rta2 || rta1->rta_len != rta2->rta_len)
2193 return 1;
2194
2195 return memcmp(RTA_DATA(rta1), RTA_DATA(rta2), RTA_PAYLOAD(rta1));
2196}
2197
cd554f2c 2198static int restore_handler(struct rtnl_ctrl_data *ctrl,
0628cddd 2199 struct nlmsghdr *n, void *arg)
f4ff11e3 2200{
74af8dd9
XL
2201 struct rtmsg *r = NLMSG_DATA(n);
2202 struct rtattr *tb[RTA_MAX+1];
2203 int len = n->nlmsg_len - NLMSG_LENGTH(sizeof(*r));
2204 int ret, prio = *(int *)arg;
2205
2206 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
f4ff11e3 2207
74af8dd9
XL
2208 /* Restore routes in correct order:
2209 * 0. ones for local addresses,
2210 * 1. ones for local networks,
2211 * 2. others (remote networks/hosts).
2212 */
2213 if (!prio && !tb[RTA_GATEWAY] && (!tb[RTA_PREFSRC] ||
2214 !rtattr_cmp(tb[RTA_PREFSRC], tb[RTA_DST])))
2215 goto restore;
c85703bb 2216 else if (prio == 1 && !tb[RTA_GATEWAY] && tb[RTA_PREFSRC] &&
74af8dd9
XL
2217 rtattr_cmp(tb[RTA_PREFSRC], tb[RTA_DST]))
2218 goto restore;
2219 else if (prio == 2 && tb[RTA_GATEWAY])
2220 goto restore;
2221
2222 return 0;
2223
2224restore:
f4ff11e3
DS
2225 n->nlmsg_flags |= NLM_F_REQUEST | NLM_F_CREATE | NLM_F_ACK;
2226
2227 ll_init_map(&rth);
2228
86bf43c7 2229 ret = rtnl_talk(&rth, n, NULL);
f4ff11e3
DS
2230 if ((ret < 0) && (errno == EEXIST))
2231 ret = 0;
2232
2233 return ret;
2234}
2235
76c61b34
PE
2236static int route_dump_check_magic(void)
2237{
2238 int ret;
2239 __u32 magic = 0;
2240
2241 if (isatty(STDIN_FILENO)) {
2242 fprintf(stderr, "Can't restore route dump from a terminal\n");
2243 return -1;
2244 }
2245
2246 ret = fread(&magic, sizeof(magic), 1, stdin);
2247 if (magic != route_dump_magic) {
2248 fprintf(stderr, "Magic mismatch (%d elems, %x magic)\n", ret, magic);
2249 return -1;
2250 }
2251
2252 return 0;
2253}
2254
d1f28cf1 2255static int iproute_restore(void)
f4ff11e3 2256{
74af8dd9
XL
2257 int pos, prio;
2258
76c61b34 2259 if (route_dump_check_magic())
2f406f2d 2260 return -1;
76c61b34 2261
74af8dd9 2262 pos = ftell(stdin);
bffb68b6
HL
2263 if (pos == -1) {
2264 perror("Failed to restore: ftell");
2f406f2d 2265 return -1;
bffb68b6
HL
2266 }
2267
74af8dd9
XL
2268 for (prio = 0; prio < 3; prio++) {
2269 int err;
2270
2271 err = rtnl_from_file(stdin, &restore_handler, &prio);
2272 if (err)
2f406f2d 2273 return -2;
74af8dd9 2274
bffb68b6
HL
2275 if (fseek(stdin, pos, SEEK_SET) == -1) {
2276 perror("Failed to restore: fseek");
2f406f2d 2277 return -1;
bffb68b6 2278 }
74af8dd9
XL
2279 }
2280
2f406f2d 2281 return 0;
f4ff11e3
DS
2282}
2283
cd554f2c 2284static int show_handler(struct rtnl_ctrl_data *ctrl,
0628cddd 2285 struct nlmsghdr *n, void *arg)
93b79863 2286{
cd554f2c 2287 print_route(n, stdout);
93b79863
PE
2288 return 0;
2289}
2290
2291static int iproute_showdump(void)
2292{
2293 if (route_dump_check_magic())
2f406f2d 2294 return -1;
93b79863 2295
2f406f2d
ÉB
2296 if (rtnl_from_file(stdin, &show_handler, NULL))
2297 return -2;
2298
2299 return 0;
93b79863
PE
2300}
2301
093b7646 2302void iproute_reset_filter(int ifindex)
aba5acdf
SH
2303{
2304 memset(&filter, 0, sizeof(filter));
2305 filter.mdst.bitlen = -1;
2306 filter.msrc.bitlen = -1;
093b7646 2307 filter.oif = ifindex;
2308 if (filter.oif > 0)
2309 filter.oifmask = -1;
aba5acdf
SH
2310}
2311
2312int do_iproute(int argc, char **argv)
2313{
2314 if (argc < 1)
f4ff11e3 2315 return iproute_list_flush_or_save(0, NULL, IPROUTE_LIST);
ae665a52 2316
aba5acdf
SH
2317 if (matches(*argv, "add") == 0)
2318 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_EXCL,
2319 argc-1, argv+1);
2320 if (matches(*argv, "change") == 0 || strcmp(*argv, "chg") == 0)
2321 return iproute_modify(RTM_NEWROUTE, NLM_F_REPLACE,
2322 argc-1, argv+1);
2323 if (matches(*argv, "replace") == 0)
2324 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_REPLACE,
2325 argc-1, argv+1);
2326 if (matches(*argv, "prepend") == 0)
2327 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE,
2328 argc-1, argv+1);
2329 if (matches(*argv, "append") == 0)
2330 return iproute_modify(RTM_NEWROUTE, NLM_F_CREATE|NLM_F_APPEND,
2331 argc-1, argv+1);
2332 if (matches(*argv, "test") == 0)
2333 return iproute_modify(RTM_NEWROUTE, NLM_F_EXCL,
2334 argc-1, argv+1);
2335 if (matches(*argv, "delete") == 0)
2336 return iproute_modify(RTM_DELROUTE, 0,
2337 argc-1, argv+1);
2338 if (matches(*argv, "list") == 0 || matches(*argv, "show") == 0
2339 || matches(*argv, "lst") == 0)
f4ff11e3 2340 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_LIST);
aba5acdf
SH
2341 if (matches(*argv, "get") == 0)
2342 return iproute_get(argc-1, argv+1);
2343 if (matches(*argv, "flush") == 0)
f4ff11e3
DS
2344 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_FLUSH);
2345 if (matches(*argv, "save") == 0)
2346 return iproute_list_flush_or_save(argc-1, argv+1, IPROUTE_SAVE);
2347 if (matches(*argv, "restore") == 0)
2348 return iproute_restore();
93b79863
PE
2349 if (matches(*argv, "showdump") == 0)
2350 return iproute_showdump();
aba5acdf
SH
2351 if (matches(*argv, "help") == 0)
2352 usage();
80d1c528
SH
2353
2354 fprintf(stderr,
2355 "Command \"%s\" is unknown, try \"ip route help\".\n", *argv);
aba5acdf
SH
2356 exit(-1);
2357}