]>
Commit | Line | Data |
---|---|---|
aba5acdf SH |
1 | /* |
2 | * ipmroute.c "ip mroute". | |
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 | * | |
11 | */ | |
12 | ||
13 | #include <stdio.h> | |
14 | #include <stdlib.h> | |
15 | #include <unistd.h> | |
16 | #include <syslog.h> | |
17 | #include <fcntl.h> | |
e34d3dcc | 18 | #include <inttypes.h> |
aba5acdf SH |
19 | #include <sys/ioctl.h> |
20 | #include <sys/socket.h> | |
03156410 SH |
21 | #include <netinet/in.h> |
22 | #include <arpa/inet.h> | |
23 | #include <string.h> | |
24 | ||
aba5acdf SH |
25 | #include <linux/netdevice.h> |
26 | #include <linux/if.h> | |
27 | #include <linux/if_arp.h> | |
28 | #include <linux/sockios.h> | |
aba5acdf | 29 | |
e34d3dcc | 30 | #include <rt_names.h> |
aba5acdf | 31 | #include "utils.h" |
e34d3dcc | 32 | #include "ip_common.h" |
aba5acdf SH |
33 | |
34 | static void usage(void) __attribute__((noreturn)); | |
35 | ||
36 | static void usage(void) | |
37 | { | |
e34d3dcc | 38 | fprintf(stderr, "Usage: ip mroute show [ [ to ] PREFIX ] [ from PREFIX ] [ iif DEVICE ]\n"); |
2a898320 ND |
39 | fprintf(stderr, " [ table TABLE_ID ]\n"); |
40 | fprintf(stderr, "TABLE_ID := [ local | main | default | all | NUMBER ]\n"); | |
aba5acdf SH |
41 | #if 0 |
42 | fprintf(stderr, "Usage: ip mroute [ add | del ] DESTINATION from SOURCE [ iif DEVICE ] [ oif DEVICE ]\n"); | |
43 | #endif | |
44 | exit(-1); | |
45 | } | |
46 | ||
aba5acdf SH |
47 | struct rtfilter |
48 | { | |
e34d3dcc ND |
49 | int tb; |
50 | int af; | |
51 | int iif; | |
aba5acdf SH |
52 | inet_prefix mdst; |
53 | inet_prefix msrc; | |
54 | } filter; | |
55 | ||
e34d3dcc | 56 | int print_mroute(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg) |
aba5acdf | 57 | { |
e34d3dcc ND |
58 | FILE *fp = (FILE*)arg; |
59 | struct rtmsg *r = NLMSG_DATA(n); | |
60 | int len = n->nlmsg_len; | |
61 | struct rtattr * tb[RTA_MAX+1]; | |
62 | char abuf[256]; | |
63 | char obuf[256]; | |
64 | SPRINT_BUF(b1); | |
65 | __u32 table; | |
66 | int iif = 0; | |
67 | int family; | |
68 | ||
69 | if ((n->nlmsg_type != RTM_NEWROUTE && | |
70 | n->nlmsg_type != RTM_DELROUTE) || | |
71 | !(n->nlmsg_flags & NLM_F_MULTI)) { | |
72 | fprintf(stderr, "Not a multicast route: %08x %08x %08x\n", | |
73 | n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags); | |
74 | return 0; | |
67ef60a2 | 75 | } |
e34d3dcc ND |
76 | len -= NLMSG_LENGTH(sizeof(*r)); |
77 | if (len < 0) { | |
78 | fprintf(stderr, "BUG: wrong nlmsg len %d\n", len); | |
79 | return -1; | |
aba5acdf | 80 | } |
e34d3dcc ND |
81 | if (r->rtm_type != RTN_MULTICAST) { |
82 | fprintf(stderr, "Not a multicast route (type: %s)\n", | |
83 | rtnl_rtntype_n2a(r->rtm_type, b1, sizeof(b1))); | |
84 | return 0; | |
e588a7db | 85 | } |
aba5acdf | 86 | |
e34d3dcc ND |
87 | parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len); |
88 | table = rtm_get_table(r, tb); | |
89 | ||
90 | if (filter.tb > 0 && filter.tb != table) | |
91 | return 0; | |
92 | ||
93 | if (tb[RTA_IIF]) | |
94 | iif = *(int*)RTA_DATA(tb[RTA_IIF]); | |
95 | if (filter.iif && filter.iif != iif) | |
96 | return 0; | |
97 | ||
98 | if (filter.af && filter.af != r->rtm_family) | |
99 | return 0; | |
100 | ||
101 | if (tb[RTA_DST] && | |
102 | filter.mdst.bitlen > 0 && | |
103 | inet_addr_match(RTA_DATA(tb[RTA_DST]), &filter.mdst, filter.mdst.bitlen)) | |
104 | return 0; | |
105 | ||
106 | if (tb[RTA_SRC] && | |
107 | filter.msrc.bitlen > 0 && | |
108 | inet_addr_match(RTA_DATA(tb[RTA_SRC]), &filter.msrc, filter.msrc.bitlen)) | |
109 | return 0; | |
110 | ||
111 | family = r->rtm_family == RTNL_FAMILY_IPMR ? AF_INET : AF_INET6; | |
112 | ||
113 | if (n->nlmsg_type == RTM_DELROUTE) | |
114 | fprintf(fp, "Deleted "); | |
115 | ||
116 | if (tb[RTA_SRC]) | |
117 | len = snprintf(obuf, sizeof(obuf), | |
118 | "(%s, ", rt_addr_n2a(family, | |
26dcdf3a | 119 | RTA_PAYLOAD(tb[RTA_SRC]), |
e34d3dcc ND |
120 | RTA_DATA(tb[RTA_SRC]), |
121 | abuf, sizeof(abuf))); | |
122 | else | |
123 | len = sprintf(obuf, "(unknown, "); | |
124 | if (tb[RTA_DST]) | |
125 | snprintf(obuf + len, sizeof(obuf) - len, | |
656111b2 | 126 | "%s)", rt_addr_n2a(family, |
26dcdf3a | 127 | RTA_PAYLOAD(tb[RTA_DST]), |
e34d3dcc ND |
128 | RTA_DATA(tb[RTA_DST]), |
129 | abuf, sizeof(abuf))); | |
130 | else | |
131 | snprintf(obuf + len, sizeof(obuf) - len, "unknown) "); | |
132 | ||
133 | fprintf(fp, "%-32s Iif: ", obuf); | |
134 | if (iif) | |
135 | fprintf(fp, "%-10s ", ll_index_to_name(iif)); | |
136 | else | |
137 | fprintf(fp, "unresolved "); | |
138 | ||
139 | if (tb[RTA_MULTIPATH]) { | |
140 | struct rtnexthop *nh = RTA_DATA(tb[RTA_MULTIPATH]); | |
141 | int first = 1; | |
142 | ||
143 | len = RTA_PAYLOAD(tb[RTA_MULTIPATH]); | |
144 | ||
145 | for (;;) { | |
146 | if (len < sizeof(*nh)) | |
147 | break; | |
148 | if (nh->rtnh_len > len) | |
149 | break; | |
150 | ||
151 | if (first) { | |
152 | fprintf(fp, "Oifs: "); | |
153 | first = 0; | |
aba5acdf | 154 | } |
e34d3dcc ND |
155 | fprintf(fp, "%s", ll_index_to_name(nh->rtnh_ifindex)); |
156 | if (nh->rtnh_hops > 1) | |
157 | fprintf(fp, "(ttl %d) ", nh->rtnh_hops); | |
158 | else | |
159 | fprintf(fp, " "); | |
160 | len -= NLMSG_ALIGN(nh->rtnh_len); | |
161 | nh = RTNH_NEXT(nh); | |
aba5acdf | 162 | } |
aba5acdf | 163 | } |
e34d3dcc ND |
164 | if (show_stats && tb[RTA_MFC_STATS]) { |
165 | struct rta_mfc_stats *mfcs = RTA_DATA(tb[RTA_MFC_STATS]); | |
166 | ||
167 | fprintf(fp, "%s %"PRIu64" packets, %"PRIu64" bytes", _SL_, | |
168 | (uint64_t)mfcs->mfcs_packets, | |
169 | (uint64_t)mfcs->mfcs_bytes); | |
170 | if (mfcs->mfcs_wrong_if) | |
171 | fprintf(fp, ", %"PRIu64" arrived on wrong iif.", | |
172 | (uint64_t)mfcs->mfcs_wrong_if); | |
173 | } | |
174 | fprintf(fp, "\n"); | |
175 | fflush(fp); | |
176 | return 0; | |
aba5acdf SH |
177 | } |
178 | ||
093b7646 | 179 | void ipmroute_reset_filter(int ifindex) |
e34d3dcc ND |
180 | { |
181 | memset(&filter, 0, sizeof(filter)); | |
182 | filter.mdst.bitlen = -1; | |
183 | filter.msrc.bitlen = -1; | |
093b7646 | 184 | filter.iif = ifindex; |
e34d3dcc | 185 | } |
aba5acdf SH |
186 | |
187 | static int mroute_list(int argc, char **argv) | |
188 | { | |
e34d3dcc ND |
189 | char *id = NULL; |
190 | int family; | |
191 | ||
093b7646 | 192 | ipmroute_reset_filter(0); |
e34d3dcc ND |
193 | if (preferred_family == AF_UNSPEC) |
194 | family = AF_INET; | |
195 | else | |
196 | family = AF_INET6; | |
197 | if (family == AF_INET) { | |
198 | filter.af = RTNL_FAMILY_IPMR; | |
199 | filter.tb = RT_TABLE_DEFAULT; /* for backward compatibility */ | |
200 | } else | |
201 | filter.af = RTNL_FAMILY_IP6MR; | |
202 | ||
aba5acdf | 203 | while (argc > 0) { |
e34d3dcc ND |
204 | if (matches(*argv, "table") == 0) { |
205 | __u32 tid; | |
aba5acdf | 206 | NEXT_ARG(); |
e34d3dcc ND |
207 | if (rtnl_rttable_a2n(&tid, *argv)) { |
208 | if (strcmp(*argv, "all") == 0) { | |
209 | filter.tb = 0; | |
210 | } else if (strcmp(*argv, "help") == 0) { | |
211 | usage(); | |
212 | } else { | |
213 | invarg("table id value is invalid\n", *argv); | |
214 | } | |
215 | } else | |
216 | filter.tb = tid; | |
217 | } else if (strcmp(*argv, "iif") == 0) { | |
218 | NEXT_ARG(); | |
219 | id = *argv; | |
aba5acdf SH |
220 | } else if (matches(*argv, "from") == 0) { |
221 | NEXT_ARG(); | |
e34d3dcc | 222 | get_prefix(&filter.msrc, *argv, family); |
aba5acdf SH |
223 | } else { |
224 | if (strcmp(*argv, "to") == 0) { | |
225 | NEXT_ARG(); | |
226 | } | |
227 | if (matches(*argv, "help") == 0) | |
228 | usage(); | |
e34d3dcc | 229 | get_prefix(&filter.mdst, *argv, family); |
aba5acdf | 230 | } |
e34d3dcc | 231 | argc--; argv++; |
aba5acdf SH |
232 | } |
233 | ||
e34d3dcc ND |
234 | ll_init_map(&rth); |
235 | ||
236 | if (id) { | |
237 | int idx; | |
238 | ||
239 | if ((idx = ll_name_to_index(id)) == 0) { | |
240 | fprintf(stderr, "Cannot find device \"%s\"\n", id); | |
241 | return -1; | |
242 | } | |
243 | filter.iif = idx; | |
244 | } | |
245 | ||
246 | if (rtnl_wilddump_request(&rth, filter.af, RTM_GETROUTE) < 0) { | |
247 | perror("Cannot send dump request"); | |
248 | return 1; | |
249 | } | |
250 | ||
251 | if (rtnl_dump_filter(&rth, print_mroute, stdout) < 0) { | |
252 | fprintf(stderr, "Dump terminated\n"); | |
253 | exit(1); | |
254 | } | |
255 | ||
256 | exit(0); | |
aba5acdf SH |
257 | } |
258 | ||
259 | int do_multiroute(int argc, char **argv) | |
260 | { | |
261 | if (argc < 1) | |
262 | return mroute_list(0, NULL); | |
263 | #if 0 | |
264 | if (matches(*argv, "add") == 0) | |
265 | return mroute_modify(RTM_NEWADDR, argc-1, argv+1); | |
266 | if (matches(*argv, "delete") == 0) | |
267 | return mroute_modify(RTM_DELADDR, argc-1, argv+1); | |
268 | if (matches(*argv, "get") == 0) | |
269 | return mroute_get(argc-1, argv+1); | |
270 | #endif | |
271 | if (matches(*argv, "list") == 0 || matches(*argv, "show") == 0 | |
272 | || matches(*argv, "lst") == 0) | |
273 | return mroute_list(argc-1, argv+1); | |
274 | if (matches(*argv, "help") == 0) | |
275 | usage(); | |
276 | fprintf(stderr, "Command \"%s\" is unknown, try \"ip mroute help\".\n", *argv); | |
277 | exit(-1); | |
278 | } |