]>
git.proxmox.com Git - mirror_iproute2.git/blob - ip/iprule.c
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.
9 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
18 #include <sys/socket.h>
19 #include <netinet/in.h>
20 #include <netinet/ip.h>
21 #include <arpa/inet.h>
23 #include <linux/fib_rules.h>
28 #include "ip_common.h"
30 extern struct rtnl_handle rth
;
32 static void usage(void) __attribute__((noreturn
));
34 static void usage(void)
36 fprintf(stderr
, "Usage: ip rule { add | del } SELECTOR ACTION\n");
37 fprintf(stderr
, " ip rule { flush | save | restore }\n");
38 fprintf(stderr
, " ip rule [ list ]\n");
39 fprintf(stderr
, "SELECTOR := [ not ] [ from PREFIX ] [ to PREFIX ] [ tos TOS ] [ fwmark FWMARK[/MASK] ]\n");
40 fprintf(stderr
, " [ iif STRING ] [ oif STRING ] [ pref NUMBER ] [ l3mdev ]\n");
41 fprintf(stderr
, "ACTION := [ table TABLE_ID ]\n");
42 fprintf(stderr
, " [ nat ADDRESS ]\n");
43 fprintf(stderr
, " [ realms [SRCREALM/]DSTREALM ]\n");
44 fprintf(stderr
, " [ goto NUMBER ]\n");
45 fprintf(stderr
, " SUPPRESSOR\n");
46 fprintf(stderr
, "SUPPRESSOR := [ suppress_prefixlength NUMBER ]\n");
47 fprintf(stderr
, " [ suppress_ifgroup DEVGROUP ]\n");
48 fprintf(stderr
, "TABLE_ID := [ local | main | default | NUMBER ]\n");
52 int print_rule(const struct sockaddr_nl
*who
, struct nlmsghdr
*n
, void *arg
)
54 FILE *fp
= (FILE *)arg
;
55 struct rtmsg
*r
= NLMSG_DATA(n
);
56 int len
= n
->nlmsg_len
;
59 struct rtattr
*tb
[FRA_MAX
+1];
63 if (n
->nlmsg_type
!= RTM_NEWRULE
&& n
->nlmsg_type
!= RTM_DELRULE
)
66 len
-= NLMSG_LENGTH(sizeof(*r
));
70 parse_rtattr(tb
, FRA_MAX
, RTM_RTA(r
), len
);
72 host_len
= af_bit_len(r
->rtm_family
);
74 if (n
->nlmsg_type
== RTM_DELRULE
)
75 fprintf(fp
, "Deleted ");
79 rta_getattr_u32(tb
[FRA_PRIORITY
]));
83 if (r
->rtm_flags
& FIB_RULE_INVERT
)
87 if (r
->rtm_src_len
!= host_len
) {
88 fprintf(fp
, "from %s/%u ",
89 rt_addr_n2a_rta(r
->rtm_family
, tb
[FRA_SRC
]),
92 fprintf(fp
, "from %s ",
93 format_host_rta(r
->rtm_family
, tb
[FRA_SRC
]));
95 } else if (r
->rtm_src_len
) {
96 fprintf(fp
, "from 0/%d ", r
->rtm_src_len
);
98 fprintf(fp
, "from all ");
102 if (r
->rtm_dst_len
!= host_len
) {
103 fprintf(fp
, "to %s/%u ",
104 rt_addr_n2a_rta(r
->rtm_family
, tb
[FRA_DST
]),
107 fprintf(fp
, "to %s ",
108 format_host_rta(r
->rtm_family
, tb
[FRA_DST
]));
110 } else if (r
->rtm_dst_len
) {
111 fprintf(fp
, "to 0/%d ", r
->rtm_dst_len
);
116 fprintf(fp
, "tos %s ",
117 rtnl_dsfield_n2a(r
->rtm_tos
, b1
, sizeof(b1
)));
120 if (tb
[FRA_FWMARK
] || tb
[FRA_FWMASK
]) {
121 __u32 mark
= 0, mask
= 0;
124 mark
= rta_getattr_u32(tb
[FRA_FWMARK
]);
126 if (tb
[FRA_FWMASK
] &&
127 (mask
= rta_getattr_u32(tb
[FRA_FWMASK
])) != 0xFFFFFFFF)
128 fprintf(fp
, "fwmark 0x%x/0x%x ", mark
, mask
);
130 fprintf(fp
, "fwmark 0x%x ", mark
);
133 if (tb
[FRA_IFNAME
]) {
134 fprintf(fp
, "iif %s ", rta_getattr_str(tb
[FRA_IFNAME
]));
135 if (r
->rtm_flags
& FIB_RULE_IIF_DETACHED
)
136 fprintf(fp
, "[detached] ");
139 if (tb
[FRA_OIFNAME
]) {
140 fprintf(fp
, "oif %s ", rta_getattr_str(tb
[FRA_OIFNAME
]));
141 if (r
->rtm_flags
& FIB_RULE_OIF_DETACHED
)
142 fprintf(fp
, "[detached] ");
145 if (tb
[FRA_L3MDEV
]) {
146 if (rta_getattr_u8(tb
[FRA_L3MDEV
]))
147 fprintf(fp
, "lookup [l3mdev-table] ");
150 table
= rtm_get_table(r
, tb
);
152 fprintf(fp
, "lookup %s ",
153 rtnl_rttable_n2a(table
, b1
, sizeof(b1
)));
155 if (tb
[FRA_SUPPRESS_PREFIXLEN
]) {
156 int pl
= rta_getattr_u32(tb
[FRA_SUPPRESS_PREFIXLEN
]);
159 fprintf(fp
, "suppress_prefixlength %d ", pl
);
161 if (tb
[FRA_SUPPRESS_IFGROUP
]) {
162 int group
= rta_getattr_u32(tb
[FRA_SUPPRESS_IFGROUP
]);
166 fprintf(fp
, "suppress_ifgroup %s ",
167 rtnl_group_n2a(group
, b1
, sizeof(b1
)));
173 __u32 to
= rta_getattr_u32(tb
[FRA_FLOW
]);
178 fprintf(fp
, "realms %s/",
179 rtnl_rtrealm_n2a(from
, b1
, sizeof(b1
)));
182 rtnl_rtrealm_n2a(to
, b1
, sizeof(b1
)));
185 if (r
->rtm_type
== RTN_NAT
) {
186 if (tb
[RTA_GATEWAY
]) {
187 fprintf(fp
, "map-to %s ",
188 format_host_rta(r
->rtm_family
,
191 fprintf(fp
, "masquerade");
192 } else if (r
->rtm_type
== FR_ACT_GOTO
) {
193 fprintf(fp
, "goto ");
195 fprintf(fp
, "%u", rta_getattr_u32(tb
[FRA_GOTO
]));
198 if (r
->rtm_flags
& FIB_RULE_UNRESOLVED
)
199 fprintf(fp
, " [unresolved]");
200 } else if (r
->rtm_type
== FR_ACT_NOP
)
202 else if (r
->rtm_type
!= RTN_UNICAST
)
204 rtnl_rtntype_n2a(r
->rtm_type
,
212 static __u32 rule_dump_magic
= 0x71706986;
214 static int save_rule_prep(void)
218 if (isatty(STDOUT_FILENO
)) {
219 fprintf(stderr
, "Not sending a binary stream to stdout\n");
223 ret
= write(STDOUT_FILENO
, &rule_dump_magic
, sizeof(rule_dump_magic
));
224 if (ret
!= sizeof(rule_dump_magic
)) {
225 fprintf(stderr
, "Can't write magic to dump file\n");
232 static int save_rule(const struct sockaddr_nl
*who
,
233 struct nlmsghdr
*n
, void *arg
)
237 ret
= write(STDOUT_FILENO
, n
, n
->nlmsg_len
);
238 if ((ret
> 0) && (ret
!= n
->nlmsg_len
)) {
239 fprintf(stderr
, "Short write while saving nlmsg\n");
243 return ret
== n
->nlmsg_len
? 0 : ret
;
246 static int iprule_list_or_save(int argc
, char **argv
, int save
)
248 rtnl_filter_t filter
= print_rule
;
249 int af
= preferred_family
;
255 fprintf(stderr
, "\"ip rule %s\" does not take any arguments.\n",
256 save
? "save" : "show");
261 if (save_rule_prep())
266 if (rtnl_wilddump_request(&rth
, af
, RTM_GETRULE
) < 0) {
267 perror("Cannot send dump request");
271 if (rtnl_dump_filter(&rth
, filter
, stdout
) < 0) {
272 fprintf(stderr
, "Dump terminated\n");
279 static int rule_dump_check_magic(void)
284 if (isatty(STDIN_FILENO
)) {
285 fprintf(stderr
, "Can't restore rule dump from a terminal\n");
289 ret
= fread(&magic
, sizeof(magic
), 1, stdin
);
290 if (magic
!= rule_dump_magic
) {
291 fprintf(stderr
, "Magic mismatch (%d elems, %x magic)\n",
299 static int restore_handler(const struct sockaddr_nl
*nl
,
300 struct rtnl_ctrl_data
*ctrl
,
301 struct nlmsghdr
*n
, void *arg
)
305 n
->nlmsg_flags
|= NLM_F_REQUEST
| NLM_F_CREATE
| NLM_F_ACK
;
309 ret
= rtnl_talk(&rth
, n
, n
, sizeof(*n
));
310 if ((ret
< 0) && (errno
== EEXIST
))
317 static int iprule_restore(void)
319 if (rule_dump_check_magic())
322 exit(rtnl_from_file(stdin
, &restore_handler
, NULL
));
325 static int iprule_modify(int cmd
, int argc
, char **argv
)
336 memset(&req
, 0, sizeof(req
));
338 req
.n
.nlmsg_type
= cmd
;
339 req
.n
.nlmsg_len
= NLMSG_LENGTH(sizeof(struct rtmsg
));
340 req
.n
.nlmsg_flags
= NLM_F_REQUEST
;
341 req
.r
.rtm_family
= preferred_family
;
342 req
.r
.rtm_protocol
= RTPROT_BOOT
;
343 req
.r
.rtm_scope
= RT_SCOPE_UNIVERSE
;
345 req
.r
.rtm_type
= RTN_UNSPEC
;
348 if (cmd
== RTM_NEWRULE
) {
349 req
.n
.nlmsg_flags
|= NLM_F_CREATE
|NLM_F_EXCL
;
350 req
.r
.rtm_type
= RTN_UNICAST
;
354 if (strcmp(*argv
, "not") == 0) {
355 req
.r
.rtm_flags
|= FIB_RULE_INVERT
;
356 } else if (strcmp(*argv
, "from") == 0) {
360 get_prefix(&dst
, *argv
, req
.r
.rtm_family
);
361 req
.r
.rtm_src_len
= dst
.bitlen
;
362 addattr_l(&req
.n
, sizeof(req
), FRA_SRC
,
363 &dst
.data
, dst
.bytelen
);
364 } else if (strcmp(*argv
, "to") == 0) {
368 get_prefix(&dst
, *argv
, req
.r
.rtm_family
);
369 req
.r
.rtm_dst_len
= dst
.bitlen
;
370 addattr_l(&req
.n
, sizeof(req
), FRA_DST
,
371 &dst
.data
, dst
.bytelen
);
372 } else if (matches(*argv
, "preference") == 0 ||
373 matches(*argv
, "order") == 0 ||
374 matches(*argv
, "priority") == 0) {
378 if (get_u32(&pref
, *argv
, 0))
379 invarg("preference value is invalid\n", *argv
);
380 addattr32(&req
.n
, sizeof(req
), FRA_PRIORITY
, pref
);
381 } else if (strcmp(*argv
, "tos") == 0 ||
382 matches(*argv
, "dsfield") == 0) {
386 if (rtnl_dsfield_a2n(&tos
, *argv
))
387 invarg("TOS value is invalid\n", *argv
);
389 } else if (strcmp(*argv
, "fwmark") == 0) {
391 __u32 fwmark
, fwmask
;
395 slash
= strchr(*argv
, '/');
398 if (get_u32(&fwmark
, *argv
, 0))
399 invarg("fwmark value is invalid\n", *argv
);
400 addattr32(&req
.n
, sizeof(req
), FRA_FWMARK
, fwmark
);
402 if (get_u32(&fwmask
, slash
+1, 0))
403 invarg("fwmask value is invalid\n",
405 addattr32(&req
.n
, sizeof(req
),
408 } else if (matches(*argv
, "realms") == 0) {
412 if (get_rt_realms_or_raw(&realm
, *argv
))
413 invarg("invalid realms\n", *argv
);
414 addattr32(&req
.n
, sizeof(req
), FRA_FLOW
, realm
);
415 } else if (matches(*argv
, "table") == 0 ||
416 strcmp(*argv
, "lookup") == 0) {
418 if (rtnl_rttable_a2n(&tid
, *argv
))
419 invarg("invalid table ID\n", *argv
);
421 req
.r
.rtm_table
= tid
;
423 req
.r
.rtm_table
= RT_TABLE_UNSPEC
;
424 addattr32(&req
.n
, sizeof(req
), FRA_TABLE
, tid
);
427 } else if (matches(*argv
, "suppress_prefixlength") == 0 ||
428 strcmp(*argv
, "sup_pl") == 0) {
432 if (get_s32(&pl
, *argv
, 0) || pl
< 0)
433 invarg("suppress_prefixlength value is invalid\n",
435 addattr32(&req
.n
, sizeof(req
),
436 FRA_SUPPRESS_PREFIXLEN
, pl
);
437 } else if (matches(*argv
, "suppress_ifgroup") == 0 ||
438 strcmp(*argv
, "sup_group") == 0) {
442 if (rtnl_group_a2n(&group
, *argv
))
443 invarg("Invalid \"suppress_ifgroup\" value\n",
445 addattr32(&req
.n
, sizeof(req
),
446 FRA_SUPPRESS_IFGROUP
, group
);
447 } else if (strcmp(*argv
, "dev") == 0 ||
448 strcmp(*argv
, "iif") == 0) {
450 addattr_l(&req
.n
, sizeof(req
), FRA_IFNAME
,
451 *argv
, strlen(*argv
)+1);
452 } else if (strcmp(*argv
, "oif") == 0) {
454 addattr_l(&req
.n
, sizeof(req
), FRA_OIFNAME
,
455 *argv
, strlen(*argv
)+1);
456 } else if (strcmp(*argv
, "l3mdev") == 0) {
457 addattr8(&req
.n
, sizeof(req
), FRA_L3MDEV
, 1);
460 } else if (strcmp(*argv
, "nat") == 0 ||
461 matches(*argv
, "map-to") == 0) {
463 fprintf(stderr
, "Warning: route NAT is deprecated\n");
464 addattr32(&req
.n
, sizeof(req
), RTA_GATEWAY
,
466 req
.r
.rtm_type
= RTN_NAT
;
470 if (strcmp(*argv
, "type") == 0)
473 if (matches(*argv
, "help") == 0)
475 else if (matches(*argv
, "goto") == 0) {
480 if (get_u32(&target
, *argv
, 0))
481 invarg("invalid target\n", *argv
);
482 addattr32(&req
.n
, sizeof(req
),
484 } else if (matches(*argv
, "nop") == 0)
486 else if (rtnl_rtntype_a2n(&type
, *argv
))
487 invarg("Failed to parse rule type", *argv
);
488 req
.r
.rtm_type
= type
;
495 if (l3mdev_rule
&& tid
!= 0) {
497 "table can not be specified for l3mdev rules\n");
501 if (req
.r
.rtm_family
== AF_UNSPEC
)
502 req
.r
.rtm_family
= AF_INET
;
504 if (!table_ok
&& cmd
== RTM_NEWRULE
)
505 req
.r
.rtm_table
= RT_TABLE_MAIN
;
507 if (rtnl_talk(&rth
, &req
.n
, NULL
, 0) < 0)
514 static int flush_rule(const struct sockaddr_nl
*who
, struct nlmsghdr
*n
,
517 struct rtnl_handle rth2
;
518 struct rtmsg
*r
= NLMSG_DATA(n
);
519 int len
= n
->nlmsg_len
;
520 struct rtattr
*tb
[FRA_MAX
+1];
522 len
-= NLMSG_LENGTH(sizeof(*r
));
526 parse_rtattr(tb
, FRA_MAX
, RTM_RTA(r
), len
);
528 if (tb
[FRA_PRIORITY
]) {
529 n
->nlmsg_type
= RTM_DELRULE
;
530 n
->nlmsg_flags
= NLM_F_REQUEST
;
532 if (rtnl_open(&rth2
, 0) < 0)
535 if (rtnl_talk(&rth2
, n
, NULL
, 0) < 0)
544 static int iprule_flush(int argc
, char **argv
)
546 int af
= preferred_family
;
552 fprintf(stderr
, "\"ip rule flush\" does not allow arguments\n");
556 if (rtnl_wilddump_request(&rth
, af
, RTM_GETRULE
) < 0) {
557 perror("Cannot send dump request");
561 if (rtnl_dump_filter(&rth
, flush_rule
, NULL
) < 0) {
562 fprintf(stderr
, "Flush terminated\n");
569 int do_iprule(int argc
, char **argv
)
572 return iprule_list_or_save(0, NULL
, 0);
573 } else if (matches(argv
[0], "list") == 0 ||
574 matches(argv
[0], "lst") == 0 ||
575 matches(argv
[0], "show") == 0) {
576 return iprule_list_or_save(argc
-1, argv
+1, 0);
577 } else if (matches(argv
[0], "save") == 0) {
578 return iprule_list_or_save(argc
-1, argv
+1, 1);
579 } else if (matches(argv
[0], "restore") == 0) {
580 return iprule_restore();
581 } else if (matches(argv
[0], "add") == 0) {
582 return iprule_modify(RTM_NEWRULE
, argc
-1, argv
+1);
583 } else if (matches(argv
[0], "delete") == 0) {
584 return iprule_modify(RTM_DELRULE
, argc
-1, argv
+1);
585 } else if (matches(argv
[0], "flush") == 0) {
586 return iprule_flush(argc
-1, argv
+1);
587 } else if (matches(argv
[0], "help") == 0)
591 "Command \"%s\" is unknown, try \"ip rule help\".\n", *argv
);
595 int do_multirule(int argc
, char **argv
)
597 switch (preferred_family
) {
600 preferred_family
= RTNL_FAMILY_IPMR
;
603 preferred_family
= RTNL_FAMILY_IP6MR
;
605 case RTNL_FAMILY_IPMR
:
606 case RTNL_FAMILY_IP6MR
:
610 "Multicast rules are only supported for IPv4/IPv6, was: %i\n",
615 return do_iprule(argc
, argv
);