1 /* $USAGI: $ */
2 
3 /*
4  * Copyright (C)2004 USAGI/WIDE Project
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, see <http://www.gnu.org/licenses>.
18  */
19 /*
20  * based on iproute.c
21  */
22 /*
23  * Authors:
24  *	Masahide NAKAMURA @USAGI
25  */
26 
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #include <netdb.h>
31 #include <linux/netlink.h>
32 #include "utils.h"
33 #include "xfrm.h"
34 #include "ip_common.h"
35 
36 /* #define NLMSG_DELETEALL_BUF_SIZE (4096-512) */
37 #define NLMSG_DELETEALL_BUF_SIZE 8192
38 
39 /*
40  * Receiving buffer defines:
41  * nlmsg
42  *   data = struct xfrm_userpolicy_info
43  *   rtattr
44  *     data = struct xfrm_user_tmpl[]
45  */
46 #define NLMSG_BUF_SIZE 4096
47 #define RTA_BUF_SIZE 2048
48 #define XFRM_TMPLS_BUF_SIZE 1024
49 #define CTX_BUF_SIZE 256
50 
51 static void usage(void) __attribute__((noreturn));
52 
usage(void)53 static void usage(void)
54 {
55 	fprintf(stderr, "Usage: ip xfrm policy { add | update } SELECTOR dir DIR [ ctx CTX ]\n");
56 	fprintf(stderr, "        [ mark MARK [ mask MASK ] ] [ index INDEX ] [ ptype PTYPE ]\n");
57 	fprintf(stderr, "        [ action ACTION ] [ priority PRIORITY ] [ flag FLAG-LIST ]\n");
58 	fprintf(stderr, "        [ LIMIT-LIST ] [ TMPL-LIST ]\n");
59 	fprintf(stderr, "Usage: ip xfrm policy { delete | get } { SELECTOR | index INDEX } dir DIR\n");
60 	fprintf(stderr, "        [ ctx CTX ] [ mark MARK [ mask MASK ] ] [ ptype PTYPE ]\n");
61 	fprintf(stderr, "Usage: ip xfrm policy { deleteall | list } [ nosock ] [ SELECTOR ] [ dir DIR ]\n");
62 	fprintf(stderr, "        [ index INDEX ] [ ptype PTYPE ] [ action ACTION ] [ priority PRIORITY ]\n");
63 	fprintf(stderr, "        [ flag FLAG-LIST ]\n");
64 	fprintf(stderr, "Usage: ip xfrm policy flush [ ptype PTYPE ]\n");
65 	fprintf(stderr, "Usage: ip xfrm policy count\n");
66 	fprintf(stderr, "Usage: ip xfrm policy set [ hthresh4 LBITS RBITS ] [ hthresh6 LBITS RBITS ]\n");
67 	fprintf(stderr, "SELECTOR := [ src ADDR[/PLEN] ] [ dst ADDR[/PLEN] ] [ dev DEV ] [ UPSPEC ]\n");
68 	fprintf(stderr, "UPSPEC := proto { { ");
69 	fprintf(stderr, "%s | ", strxf_proto(IPPROTO_TCP));
70 	fprintf(stderr, "%s | ", strxf_proto(IPPROTO_UDP));
71 	fprintf(stderr, "%s | ", strxf_proto(IPPROTO_SCTP));
72 	fprintf(stderr, "%s", strxf_proto(IPPROTO_DCCP));
73 	fprintf(stderr, " } [ sport PORT ] [ dport PORT ] |\n");
74 	fprintf(stderr, "                  { ");
75 	fprintf(stderr, "%s | ", strxf_proto(IPPROTO_ICMP));
76 	fprintf(stderr, "%s | ", strxf_proto(IPPROTO_ICMPV6));
77 	fprintf(stderr, "%s", strxf_proto(IPPROTO_MH));
78 	fprintf(stderr, " } [ type NUMBER ] [ code NUMBER ] |\n");
79 	fprintf(stderr, "                  %s", strxf_proto(IPPROTO_GRE));
80 	fprintf(stderr, " [ key { DOTTED-QUAD | NUMBER } ] | PROTO }\n");
81 	fprintf(stderr, "DIR := in | out | fwd\n");
82 	fprintf(stderr, "PTYPE := main | sub\n");
83 	fprintf(stderr, "ACTION := allow | block\n");
84 	fprintf(stderr, "FLAG-LIST := [ FLAG-LIST ] FLAG\n");
85 	fprintf(stderr, "FLAG := localok | icmp\n");
86 	fprintf(stderr, "LIMIT-LIST := [ LIMIT-LIST ] limit LIMIT\n");
87 	fprintf(stderr, "LIMIT := { time-soft | time-hard | time-use-soft | time-use-hard } SECONDS |\n");
88 	fprintf(stderr, "         { byte-soft | byte-hard } SIZE | { packet-soft | packet-hard } COUNT\n");
89 	fprintf(stderr, "TMPL-LIST := [ TMPL-LIST ] tmpl TMPL\n");
90 	fprintf(stderr, "TMPL := ID [ mode MODE ] [ reqid REQID ] [ level LEVEL ]\n");
91 	fprintf(stderr, "ID := [ src ADDR ] [ dst ADDR ] [ proto XFRM-PROTO ] [ spi SPI ]\n");
92 	fprintf(stderr, "XFRM-PROTO := ");
93 	fprintf(stderr, "%s | ", strxf_xfrmproto(IPPROTO_ESP));
94 	fprintf(stderr, "%s | ", strxf_xfrmproto(IPPROTO_AH));
95 	fprintf(stderr, "%s | ", strxf_xfrmproto(IPPROTO_COMP));
96 	fprintf(stderr, "%s | ", strxf_xfrmproto(IPPROTO_ROUTING));
97 	fprintf(stderr, "%s\n", strxf_xfrmproto(IPPROTO_DSTOPTS));
98 	fprintf(stderr, "MODE := transport | tunnel | beet | ro | in_trigger\n");
99 	fprintf(stderr, "LEVEL := required | use\n");
100 
101 	exit(-1);
102 }
103 
xfrm_policy_dir_parse(__u8 * dir,int * argcp,char *** argvp)104 static int xfrm_policy_dir_parse(__u8 *dir, int *argcp, char ***argvp)
105 {
106 	int argc = *argcp;
107 	char **argv = *argvp;
108 
109 	if (strcmp(*argv, "in") == 0)
110 		*dir = XFRM_POLICY_IN;
111 	else if (strcmp(*argv, "out") == 0)
112 		*dir = XFRM_POLICY_OUT;
113 	else if (strcmp(*argv, "fwd") == 0)
114 		*dir = XFRM_POLICY_FWD;
115 	else
116 		invarg("DIR value is invalid", *argv);
117 
118 	*argcp = argc;
119 	*argvp = argv;
120 
121 	return 0;
122 }
123 
xfrm_policy_ptype_parse(__u8 * ptype,int * argcp,char *** argvp)124 static int xfrm_policy_ptype_parse(__u8 *ptype, int *argcp, char ***argvp)
125 {
126 	int argc = *argcp;
127 	char **argv = *argvp;
128 
129 	if (strcmp(*argv, "main") == 0)
130 		*ptype = XFRM_POLICY_TYPE_MAIN;
131 	else if (strcmp(*argv, "sub") == 0)
132 		*ptype = XFRM_POLICY_TYPE_SUB;
133 	else
134 		invarg("PTYPE value is invalid", *argv);
135 
136 	*argcp = argc;
137 	*argvp = argv;
138 
139 	return 0;
140 }
141 
xfrm_policy_flag_parse(__u8 * flags,int * argcp,char *** argvp)142 static int xfrm_policy_flag_parse(__u8 *flags, int *argcp, char ***argvp)
143 {
144 	int argc = *argcp;
145 	char **argv = *argvp;
146 	int len = strlen(*argv);
147 
148 	if (len > 2 && strncmp(*argv, "0x", 2) == 0) {
149 		__u8 val = 0;
150 
151 		if (get_u8(&val, *argv, 16))
152 			invarg("FLAG value is invalid", *argv);
153 		*flags = val;
154 	} else {
155 		while (1) {
156 			if (strcmp(*argv, "localok") == 0)
157 				*flags |= XFRM_POLICY_LOCALOK;
158 			else if (strcmp(*argv, "icmp") == 0)
159 				*flags |= XFRM_POLICY_ICMP;
160 			else {
161 				PREV_ARG(); /* back track */
162 				break;
163 			}
164 
165 			if (!NEXT_ARG_OK())
166 				break;
167 			NEXT_ARG();
168 		}
169 	}
170 
171 	*argcp = argc;
172 	*argvp = argv;
173 
174 	return 0;
175 }
176 
xfrm_tmpl_parse(struct xfrm_user_tmpl * tmpl,int * argcp,char *** argvp)177 static int xfrm_tmpl_parse(struct xfrm_user_tmpl *tmpl,
178 			   int *argcp, char ***argvp)
179 {
180 	int argc = *argcp;
181 	char **argv = *argvp;
182 	char *idp = NULL;
183 
184 	while (1) {
185 		if (strcmp(*argv, "mode") == 0) {
186 			NEXT_ARG();
187 			xfrm_mode_parse(&tmpl->mode,  &argc, &argv);
188 		} else if (strcmp(*argv, "reqid") == 0) {
189 			NEXT_ARG();
190 			xfrm_reqid_parse(&tmpl->reqid, &argc, &argv);
191 		} else if (strcmp(*argv, "level") == 0) {
192 			NEXT_ARG();
193 
194 			if (strcmp(*argv, "required") == 0)
195 				tmpl->optional = 0;
196 			else if (strcmp(*argv, "use") == 0)
197 				tmpl->optional = 1;
198 			else
199 				invarg("LEVEL value is invalid\n", *argv);
200 
201 		} else {
202 			if (idp) {
203 				PREV_ARG(); /* back track */
204 				break;
205 			}
206 			idp = *argv;
207 			preferred_family = AF_UNSPEC;
208 			xfrm_id_parse(&tmpl->saddr, &tmpl->id, &tmpl->family,
209 				      0, &argc, &argv);
210 			preferred_family = tmpl->family;
211 		}
212 
213 		if (!NEXT_ARG_OK())
214 			break;
215 
216 		NEXT_ARG();
217 	}
218 	if (argc == *argcp)
219 		missarg("TMPL");
220 
221 	*argcp = argc;
222 	*argvp = argv;
223 
224 	return 0;
225 }
226 
xfrm_sctx_parse(char * ctxstr,char * s,struct xfrm_user_sec_ctx * sctx)227 int xfrm_sctx_parse(char *ctxstr, char *s,
228 			   struct xfrm_user_sec_ctx *sctx)
229 {
230 	int slen;
231 
232 	slen = strlen(s) + 1;
233 
234 	sctx->exttype = XFRMA_SEC_CTX;
235 	sctx->ctx_doi = 1;
236 	sctx->ctx_alg = 1;
237 	sctx->ctx_len = slen;
238 	sctx->len = sizeof(struct xfrm_user_sec_ctx) + slen;
239 	memcpy(ctxstr, s, slen);
240 
241 	return 0;
242 }
243 
xfrm_policy_modify(int cmd,unsigned int flags,int argc,char ** argv)244 static int xfrm_policy_modify(int cmd, unsigned int flags, int argc, char **argv)
245 {
246 	struct rtnl_handle rth;
247 	struct {
248 		struct nlmsghdr			n;
249 		struct xfrm_userpolicy_info	xpinfo;
250 		char				buf[RTA_BUF_SIZE];
251 	} req = {
252 		.n.nlmsg_len = NLMSG_LENGTH(sizeof(req.xpinfo)),
253 		.n.nlmsg_flags = NLM_F_REQUEST | flags,
254 		.n.nlmsg_type = cmd,
255 		.xpinfo.sel.family = preferred_family,
256 		.xpinfo.lft.soft_byte_limit = XFRM_INF,
257 		.xpinfo.lft.hard_byte_limit = XFRM_INF,
258 		.xpinfo.lft.soft_packet_limit = XFRM_INF,
259 		.xpinfo.lft.hard_packet_limit = XFRM_INF,
260 	};
261 	char *dirp = NULL;
262 	char *selp = NULL;
263 	char *ptypep = NULL;
264 	char *sctxp = NULL;
265 	struct xfrm_userpolicy_type upt = {};
266 	char tmpls_buf[XFRM_TMPLS_BUF_SIZE] = {};
267 	int tmpls_len = 0;
268 	struct xfrm_mark mark = {0, 0};
269 	struct {
270 		struct xfrm_user_sec_ctx sctx;
271 		char	str[CTX_BUF_SIZE];
272 	} ctx = {};
273 
274 	while (argc > 0) {
275 		if (strcmp(*argv, "dir") == 0) {
276 			if (dirp)
277 				duparg("dir", *argv);
278 			dirp = *argv;
279 
280 			NEXT_ARG();
281 			xfrm_policy_dir_parse(&req.xpinfo.dir, &argc, &argv);
282 		} else if (strcmp(*argv, "ctx") == 0) {
283 			char *context;
284 
285 			if (sctxp)
286 				duparg("ctx", *argv);
287 			sctxp = *argv;
288 			NEXT_ARG();
289 			context = *argv;
290 			xfrm_sctx_parse((char *)&ctx.str, context, &ctx.sctx);
291 		} else if (strcmp(*argv, "mark") == 0) {
292 			xfrm_parse_mark(&mark, &argc, &argv);
293 		} else if (strcmp(*argv, "index") == 0) {
294 			NEXT_ARG();
295 			if (get_u32(&req.xpinfo.index, *argv, 0))
296 				invarg("INDEX value is invalid", *argv);
297 		} else if (strcmp(*argv, "ptype") == 0) {
298 			if (ptypep)
299 				duparg("ptype", *argv);
300 			ptypep = *argv;
301 
302 			NEXT_ARG();
303 			xfrm_policy_ptype_parse(&upt.type, &argc, &argv);
304 		} else if (strcmp(*argv, "action") == 0) {
305 			NEXT_ARG();
306 			if (strcmp(*argv, "allow") == 0)
307 				req.xpinfo.action = XFRM_POLICY_ALLOW;
308 			else if (strcmp(*argv, "block") == 0)
309 				req.xpinfo.action = XFRM_POLICY_BLOCK;
310 			else
311 				invarg("ACTION value is invalid\n", *argv);
312 		} else if (strcmp(*argv, "priority") == 0) {
313 			NEXT_ARG();
314 			if (get_u32(&req.xpinfo.priority, *argv, 0))
315 				invarg("PRIORITY value is invalid", *argv);
316 		} else if (strcmp(*argv, "flag") == 0) {
317 			NEXT_ARG();
318 			xfrm_policy_flag_parse(&req.xpinfo.flags, &argc,
319 					       &argv);
320 		} else if (strcmp(*argv, "limit") == 0) {
321 			NEXT_ARG();
322 			xfrm_lifetime_cfg_parse(&req.xpinfo.lft, &argc, &argv);
323 		} else if (strcmp(*argv, "tmpl") == 0) {
324 			struct xfrm_user_tmpl *tmpl;
325 
326 			if (tmpls_len + sizeof(*tmpl) > sizeof(tmpls_buf)) {
327 				fprintf(stderr, "Too many tmpls: buffer overflow\n");
328 				exit(1);
329 			}
330 			tmpl = (struct xfrm_user_tmpl *)((char *)tmpls_buf + tmpls_len);
331 
332 			tmpl->family = preferred_family;
333 			tmpl->aalgos = (~(__u32)0);
334 			tmpl->ealgos = (~(__u32)0);
335 			tmpl->calgos = (~(__u32)0);
336 
337 			NEXT_ARG();
338 			xfrm_tmpl_parse(tmpl, &argc, &argv);
339 
340 			tmpls_len += sizeof(*tmpl);
341 		} else {
342 			if (selp)
343 				duparg("unknown", *argv);
344 			selp = *argv;
345 
346 			xfrm_selector_parse(&req.xpinfo.sel, &argc, &argv);
347 			if (preferred_family == AF_UNSPEC)
348 				preferred_family = req.xpinfo.sel.family;
349 		}
350 
351 		argc--; argv++;
352 	}
353 
354 	if (!dirp) {
355 		fprintf(stderr, "Not enough information: DIR is required.\n");
356 		exit(1);
357 	}
358 
359 	if (ptypep) {
360 		addattr_l(&req.n, sizeof(req), XFRMA_POLICY_TYPE,
361 			  (void *)&upt, sizeof(upt));
362 	}
363 
364 	if (tmpls_len > 0) {
365 		addattr_l(&req.n, sizeof(req), XFRMA_TMPL,
366 			  (void *)tmpls_buf, tmpls_len);
367 	}
368 
369 	if (mark.m) {
370 		int r = addattr_l(&req.n, sizeof(req.buf), XFRMA_MARK,
371 				  (void *)&mark, sizeof(mark));
372 		if (r < 0) {
373 			fprintf(stderr, "%s: XFRMA_MARK failed\n", __func__);
374 			exit(1);
375 		}
376 	}
377 
378 	if (sctxp) {
379 		addattr_l(&req.n, sizeof(req), XFRMA_SEC_CTX,
380 			  (void *)&ctx, ctx.sctx.len);
381 	}
382 
383 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
384 		exit(1);
385 
386 	if (req.xpinfo.sel.family == AF_UNSPEC)
387 		req.xpinfo.sel.family = AF_INET;
388 
389 	if (rtnl_talk(&rth, &req.n, NULL, 0) < 0)
390 		exit(2);
391 
392 	rtnl_close(&rth);
393 
394 	return 0;
395 }
396 
xfrm_policy_filter_match(struct xfrm_userpolicy_info * xpinfo,__u8 ptype)397 static int xfrm_policy_filter_match(struct xfrm_userpolicy_info *xpinfo,
398 				    __u8 ptype)
399 {
400 	if (!filter.use)
401 		return 1;
402 
403 	if ((xpinfo->dir^filter.xpinfo.dir)&filter.dir_mask)
404 		return 0;
405 
406 	if (filter.filter_socket && (xpinfo->dir >= XFRM_POLICY_MAX))
407 		return 0;
408 
409 	if ((ptype^filter.ptype)&filter.ptype_mask)
410 		return 0;
411 
412 	if (filter.sel_src_mask) {
413 		if (xfrm_addr_match(&xpinfo->sel.saddr, &filter.xpinfo.sel.saddr,
414 				    filter.sel_src_mask))
415 			return 0;
416 	}
417 
418 	if (filter.sel_dst_mask) {
419 		if (xfrm_addr_match(&xpinfo->sel.daddr, &filter.xpinfo.sel.daddr,
420 				    filter.sel_dst_mask))
421 			return 0;
422 	}
423 
424 	if ((xpinfo->sel.ifindex^filter.xpinfo.sel.ifindex)&filter.sel_dev_mask)
425 		return 0;
426 
427 	if ((xpinfo->sel.proto^filter.xpinfo.sel.proto)&filter.upspec_proto_mask)
428 		return 0;
429 
430 	if (filter.upspec_sport_mask) {
431 		if ((xpinfo->sel.sport^filter.xpinfo.sel.sport)&filter.upspec_sport_mask)
432 			return 0;
433 	}
434 
435 	if (filter.upspec_dport_mask) {
436 		if ((xpinfo->sel.dport^filter.xpinfo.sel.dport)&filter.upspec_dport_mask)
437 			return 0;
438 	}
439 
440 	if ((xpinfo->index^filter.xpinfo.index)&filter.index_mask)
441 		return 0;
442 
443 	if ((xpinfo->action^filter.xpinfo.action)&filter.action_mask)
444 		return 0;
445 
446 	if ((xpinfo->priority^filter.xpinfo.priority)&filter.priority_mask)
447 		return 0;
448 
449 	if (filter.policy_flags_mask)
450 		if ((xpinfo->flags & filter.xpinfo.flags) == 0)
451 			return 0;
452 
453 	return 1;
454 }
455 
xfrm_policy_print(const struct sockaddr_nl * who,struct nlmsghdr * n,void * arg)456 int xfrm_policy_print(const struct sockaddr_nl *who, struct nlmsghdr *n,
457 		      void *arg)
458 {
459 	struct rtattr *tb[XFRMA_MAX+1];
460 	struct rtattr *rta;
461 	struct xfrm_userpolicy_info *xpinfo = NULL;
462 	struct xfrm_user_polexpire *xpexp = NULL;
463 	struct xfrm_userpolicy_id *xpid = NULL;
464 	__u8 ptype = XFRM_POLICY_TYPE_MAIN;
465 	FILE *fp = (FILE *)arg;
466 	int len = n->nlmsg_len;
467 
468 	if (n->nlmsg_type != XFRM_MSG_NEWPOLICY &&
469 	    n->nlmsg_type != XFRM_MSG_DELPOLICY &&
470 	    n->nlmsg_type != XFRM_MSG_UPDPOLICY &&
471 	    n->nlmsg_type != XFRM_MSG_POLEXPIRE) {
472 		fprintf(stderr, "Not a policy: %08x %08x %08x\n",
473 			n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
474 		return 0;
475 	}
476 
477 	if (n->nlmsg_type == XFRM_MSG_DELPOLICY)  {
478 		xpid = NLMSG_DATA(n);
479 		len -= NLMSG_SPACE(sizeof(*xpid));
480 	} else if (n->nlmsg_type == XFRM_MSG_POLEXPIRE) {
481 		xpexp = NLMSG_DATA(n);
482 		xpinfo = &xpexp->pol;
483 		len -= NLMSG_SPACE(sizeof(*xpexp));
484 	} else {
485 		xpexp = NULL;
486 		xpinfo = NLMSG_DATA(n);
487 		len -= NLMSG_SPACE(sizeof(*xpinfo));
488 	}
489 
490 	if (len < 0) {
491 		fprintf(stderr, "BUG: wrong nlmsg len %d\n", len);
492 		return -1;
493 	}
494 
495 	if (n->nlmsg_type == XFRM_MSG_DELPOLICY)
496 		rta = XFRMPID_RTA(xpid);
497 	else if (n->nlmsg_type == XFRM_MSG_POLEXPIRE)
498 		rta = XFRMPEXP_RTA(xpexp);
499 	else
500 		rta = XFRMP_RTA(xpinfo);
501 
502 	parse_rtattr(tb, XFRMA_MAX, rta, len);
503 
504 	if (tb[XFRMA_POLICY_TYPE]) {
505 		struct xfrm_userpolicy_type *upt;
506 
507 		if (RTA_PAYLOAD(tb[XFRMA_POLICY_TYPE]) < sizeof(*upt)) {
508 			fprintf(stderr, "too short XFRMA_POLICY_TYPE len\n");
509 			return -1;
510 		}
511 		upt = RTA_DATA(tb[XFRMA_POLICY_TYPE]);
512 		ptype = upt->type;
513 	}
514 
515 	if (xpinfo && !xfrm_policy_filter_match(xpinfo, ptype))
516 		return 0;
517 
518 	if (n->nlmsg_type == XFRM_MSG_DELPOLICY)
519 		fprintf(fp, "Deleted ");
520 	else if (n->nlmsg_type == XFRM_MSG_UPDPOLICY)
521 		fprintf(fp, "Updated ");
522 	else if (n->nlmsg_type == XFRM_MSG_POLEXPIRE)
523 		fprintf(fp, "Expired ");
524 
525 	if (n->nlmsg_type == XFRM_MSG_DELPOLICY) {
526 		/* xfrm_policy_id_print(); */
527 		if (!tb[XFRMA_POLICY]) {
528 			fprintf(stderr, "Buggy XFRM_MSG_DELPOLICY: no XFRMA_POLICY\n");
529 			return -1;
530 		}
531 		if (RTA_PAYLOAD(tb[XFRMA_POLICY]) < sizeof(*xpinfo)) {
532 			fprintf(stderr, "Buggy XFRM_MSG_DELPOLICY: too short XFRMA_POLICY len\n");
533 			return -1;
534 		}
535 		xpinfo = RTA_DATA(tb[XFRMA_POLICY]);
536 	}
537 
538 	xfrm_policy_info_print(xpinfo, tb, fp, NULL, NULL);
539 
540 	if (n->nlmsg_type == XFRM_MSG_POLEXPIRE) {
541 		fprintf(fp, "\t");
542 		fprintf(fp, "hard %u", xpexp->hard);
543 		fprintf(fp, "%s", _SL_);
544 	}
545 
546 	if (oneline)
547 		fprintf(fp, "\n");
548 	fflush(fp);
549 
550 	return 0;
551 }
552 
xfrm_policy_get_or_delete(int argc,char ** argv,int delete,void * res_nlbuf,size_t res_size)553 static int xfrm_policy_get_or_delete(int argc, char **argv, int delete,
554 				     void *res_nlbuf, size_t res_size)
555 {
556 	struct rtnl_handle rth;
557 	struct {
558 		struct nlmsghdr			n;
559 		struct xfrm_userpolicy_id	xpid;
560 		char				buf[RTA_BUF_SIZE];
561 	} req = {
562 		.n.nlmsg_len = NLMSG_LENGTH(sizeof(req.xpid)),
563 		.n.nlmsg_flags = NLM_F_REQUEST,
564 		.n.nlmsg_type = delete ? XFRM_MSG_DELPOLICY
565 				       : XFRM_MSG_GETPOLICY,
566 	};
567 	char *dirp = NULL;
568 	char *selp = NULL;
569 	char *indexp = NULL;
570 	char *ptypep = NULL;
571 	char *sctxp = NULL;
572 	struct xfrm_userpolicy_type upt = {};
573 	struct xfrm_mark mark = {0, 0};
574 	struct {
575 		struct xfrm_user_sec_ctx sctx;
576 		char    str[CTX_BUF_SIZE];
577 	} ctx = {};
578 
579 	while (argc > 0) {
580 		if (strcmp(*argv, "dir") == 0) {
581 			if (dirp)
582 				duparg("dir", *argv);
583 			dirp = *argv;
584 
585 			NEXT_ARG();
586 			xfrm_policy_dir_parse(&req.xpid.dir, &argc, &argv);
587 
588 		} else if (strcmp(*argv, "ctx") == 0) {
589 			char *context;
590 
591 			if (sctxp)
592 				duparg("ctx", *argv);
593 			sctxp = *argv;
594 			NEXT_ARG();
595 			context = *argv;
596 			xfrm_sctx_parse((char *)&ctx.str, context, &ctx.sctx);
597 		} else if (strcmp(*argv, "mark") == 0) {
598 			xfrm_parse_mark(&mark, &argc, &argv);
599 		} else if (strcmp(*argv, "index") == 0) {
600 			if (indexp)
601 				duparg("index", *argv);
602 			indexp = *argv;
603 
604 			NEXT_ARG();
605 			if (get_u32(&req.xpid.index, *argv, 0))
606 				invarg("INDEX value is invalid", *argv);
607 
608 		} else if (strcmp(*argv, "ptype") == 0) {
609 			if (ptypep)
610 				duparg("ptype", *argv);
611 			ptypep = *argv;
612 
613 			NEXT_ARG();
614 			xfrm_policy_ptype_parse(&upt.type, &argc, &argv);
615 
616 		} else {
617 			if (selp)
618 				invarg("unknown", *argv);
619 			selp = *argv;
620 
621 			xfrm_selector_parse(&req.xpid.sel, &argc, &argv);
622 			if (preferred_family == AF_UNSPEC)
623 				preferred_family = req.xpid.sel.family;
624 
625 		}
626 
627 		argc--; argv++;
628 	}
629 
630 	if (!dirp) {
631 		fprintf(stderr, "Not enough information: DIR is required.\n");
632 		exit(1);
633 	}
634 	if (ptypep) {
635 		addattr_l(&req.n, sizeof(req), XFRMA_POLICY_TYPE,
636 			  (void *)&upt, sizeof(upt));
637 	}
638 	if (!selp && !indexp) {
639 		fprintf(stderr, "Not enough information: either SELECTOR or INDEX is required.\n");
640 		exit(1);
641 	}
642 	if (selp && indexp)
643 		duparg2("SELECTOR", "INDEX");
644 
645 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
646 		exit(1);
647 
648 	if (req.xpid.sel.family == AF_UNSPEC)
649 		req.xpid.sel.family = AF_INET;
650 
651 	if (mark.m & mark.v) {
652 		int r = addattr_l(&req.n, sizeof(req.buf), XFRMA_MARK,
653 				  (void *)&mark, sizeof(mark));
654 		if (r < 0) {
655 			fprintf(stderr, "%s: XFRMA_MARK failed\n", __func__);
656 			exit(1);
657 		}
658 	}
659 
660 	if (sctxp) {
661 		addattr_l(&req.n, sizeof(req), XFRMA_SEC_CTX,
662 			  (void *)&ctx, ctx.sctx.len);
663 	}
664 
665 	if (rtnl_talk(&rth, &req.n, res_nlbuf, res_size) < 0)
666 		exit(2);
667 
668 	rtnl_close(&rth);
669 
670 	return 0;
671 }
672 
xfrm_policy_delete(int argc,char ** argv)673 static int xfrm_policy_delete(int argc, char **argv)
674 {
675 	return xfrm_policy_get_or_delete(argc, argv, 1, NULL, 0);
676 }
677 
xfrm_policy_get(int argc,char ** argv)678 static int xfrm_policy_get(int argc, char **argv)
679 {
680 	char buf[NLMSG_BUF_SIZE] = {};
681 	struct nlmsghdr *n = (struct nlmsghdr *)buf;
682 
683 	xfrm_policy_get_or_delete(argc, argv, 0, n, sizeof(buf));
684 
685 	if (xfrm_policy_print(NULL, n, (void *)stdout) < 0) {
686 		fprintf(stderr, "An error :-)\n");
687 		exit(1);
688 	}
689 
690 	return 0;
691 }
692 
693 /*
694  * With an existing policy of nlmsg, make new nlmsg for deleting the policy
695  * and store it to buffer.
696  */
xfrm_policy_keep(const struct sockaddr_nl * who,struct nlmsghdr * n,void * arg)697 static int xfrm_policy_keep(const struct sockaddr_nl *who,
698 			    struct nlmsghdr *n,
699 			    void *arg)
700 {
701 	struct xfrm_buffer *xb = (struct xfrm_buffer *)arg;
702 	struct rtnl_handle *rth = xb->rth;
703 	struct xfrm_userpolicy_info *xpinfo = NLMSG_DATA(n);
704 	int len = n->nlmsg_len;
705 	struct rtattr *tb[XFRMA_MAX+1];
706 	__u8 ptype = XFRM_POLICY_TYPE_MAIN;
707 	struct nlmsghdr *new_n;
708 	struct xfrm_userpolicy_id *xpid;
709 
710 	if (n->nlmsg_type != XFRM_MSG_NEWPOLICY) {
711 		fprintf(stderr, "Not a policy: %08x %08x %08x\n",
712 			n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
713 		return 0;
714 	}
715 
716 	len -= NLMSG_LENGTH(sizeof(*xpinfo));
717 	if (len < 0) {
718 		fprintf(stderr, "BUG: wrong nlmsg len %d\n", len);
719 		return -1;
720 	}
721 
722 	parse_rtattr(tb, XFRMA_MAX, XFRMP_RTA(xpinfo), len);
723 
724 	if (tb[XFRMA_POLICY_TYPE]) {
725 		struct xfrm_userpolicy_type *upt;
726 
727 		if (RTA_PAYLOAD(tb[XFRMA_POLICY_TYPE]) < sizeof(*upt)) {
728 			fprintf(stderr, "too short XFRMA_POLICY_TYPE len\n");
729 			return -1;
730 		}
731 		upt = RTA_DATA(tb[XFRMA_POLICY_TYPE]);
732 		ptype = upt->type;
733 	}
734 
735 	if (!xfrm_policy_filter_match(xpinfo, ptype))
736 		return 0;
737 
738 	/* can't delete socket policies */
739 	if (xpinfo->dir >= XFRM_POLICY_MAX)
740 		return 0;
741 
742 	if (xb->offset + NLMSG_LENGTH(sizeof(*xpid)) > xb->size)
743 		return 0;
744 
745 	new_n = (struct nlmsghdr *)(xb->buf + xb->offset);
746 	new_n->nlmsg_len = NLMSG_LENGTH(sizeof(*xpid));
747 	new_n->nlmsg_flags = NLM_F_REQUEST;
748 	new_n->nlmsg_type = XFRM_MSG_DELPOLICY;
749 	new_n->nlmsg_seq = ++rth->seq;
750 
751 	xpid = NLMSG_DATA(new_n);
752 	memcpy(&xpid->sel, &xpinfo->sel, sizeof(xpid->sel));
753 	xpid->dir = xpinfo->dir;
754 	xpid->index = xpinfo->index;
755 
756 	if (tb[XFRMA_MARK]) {
757 		int r = addattr_l(new_n, xb->size, XFRMA_MARK,
758 				(void *)RTA_DATA(tb[XFRMA_MARK]), tb[XFRMA_MARK]->rta_len);
759 		if (r < 0) {
760 			fprintf(stderr, "%s: XFRMA_MARK failed\n", __func__);
761 			exit(1);
762 		}
763 	}
764 
765 	xb->offset += new_n->nlmsg_len;
766 	xb->nlmsg_count++;
767 
768 	return 0;
769 }
770 
xfrm_policy_list_or_deleteall(int argc,char ** argv,int deleteall)771 static int xfrm_policy_list_or_deleteall(int argc, char **argv, int deleteall)
772 {
773 	char *selp = NULL;
774 	struct rtnl_handle rth;
775 
776 	if (argc > 0)
777 		filter.use = 1;
778 	filter.xpinfo.sel.family = preferred_family;
779 
780 	while (argc > 0) {
781 		if (strcmp(*argv, "dir") == 0) {
782 			NEXT_ARG();
783 			xfrm_policy_dir_parse(&filter.xpinfo.dir, &argc, &argv);
784 
785 			filter.dir_mask = XFRM_FILTER_MASK_FULL;
786 
787 		} else if (strcmp(*argv, "index") == 0) {
788 			NEXT_ARG();
789 			if (get_u32(&filter.xpinfo.index, *argv, 0))
790 				invarg("INDEX value is invalid", *argv);
791 
792 			filter.index_mask = XFRM_FILTER_MASK_FULL;
793 
794 		} else if (strcmp(*argv, "ptype") == 0) {
795 			NEXT_ARG();
796 			xfrm_policy_ptype_parse(&filter.ptype, &argc, &argv);
797 
798 			filter.ptype_mask = XFRM_FILTER_MASK_FULL;
799 
800 		} else if (strcmp(*argv, "action") == 0) {
801 			NEXT_ARG();
802 			if (strcmp(*argv, "allow") == 0)
803 				filter.xpinfo.action = XFRM_POLICY_ALLOW;
804 			else if (strcmp(*argv, "block") == 0)
805 				filter.xpinfo.action = XFRM_POLICY_BLOCK;
806 			else
807 				invarg("ACTION value is invalid\n", *argv);
808 
809 			filter.action_mask = XFRM_FILTER_MASK_FULL;
810 
811 		} else if (strcmp(*argv, "priority") == 0) {
812 			NEXT_ARG();
813 			if (get_u32(&filter.xpinfo.priority, *argv, 0))
814 				invarg("PRIORITY value is invalid", *argv);
815 
816 			filter.priority_mask = XFRM_FILTER_MASK_FULL;
817 
818 		} else if (strcmp(*argv, "flag") == 0) {
819 			NEXT_ARG();
820 			xfrm_policy_flag_parse(&filter.xpinfo.flags, &argc,
821 					       &argv);
822 
823 			filter.policy_flags_mask = XFRM_FILTER_MASK_FULL;
824 
825 		} else if (strcmp(*argv, "nosock") == 0) {
826 			/* filter all socket-based policies */
827 			filter.filter_socket = 1;
828 		} else {
829 			if (selp)
830 				invarg("unknown", *argv);
831 			selp = *argv;
832 
833 			xfrm_selector_parse(&filter.xpinfo.sel, &argc, &argv);
834 			if (preferred_family == AF_UNSPEC)
835 				preferred_family = filter.xpinfo.sel.family;
836 
837 		}
838 
839 		argc--; argv++;
840 	}
841 
842 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
843 		exit(1);
844 
845 	if (deleteall) {
846 		struct xfrm_buffer xb;
847 		char buf[NLMSG_DELETEALL_BUF_SIZE];
848 		int i;
849 
850 		xb.buf = buf;
851 		xb.size = sizeof(buf);
852 		xb.rth = &rth;
853 
854 		for (i = 0; ; i++) {
855 			struct {
856 				struct nlmsghdr n;
857 				char buf[NLMSG_BUF_SIZE];
858 			} req = {
859 				.n.nlmsg_len = NLMSG_HDRLEN,
860 				.n.nlmsg_flags = NLM_F_DUMP | NLM_F_REQUEST,
861 				.n.nlmsg_type = XFRM_MSG_GETPOLICY,
862 				.n.nlmsg_seq = rth.dump = ++rth.seq,
863 			};
864 
865 			xb.offset = 0;
866 			xb.nlmsg_count = 0;
867 
868 			if (show_stats > 1)
869 				fprintf(stderr, "Delete-all round = %d\n", i);
870 
871 			if (rtnl_send(&rth, (void *)&req, req.n.nlmsg_len) < 0) {
872 				perror("Cannot send dump request");
873 				exit(1);
874 			}
875 
876 			if (rtnl_dump_filter(&rth, xfrm_policy_keep, &xb) < 0) {
877 				fprintf(stderr, "Delete-all terminated\n");
878 				exit(1);
879 			}
880 			if (xb.nlmsg_count == 0) {
881 				if (show_stats > 1)
882 					fprintf(stderr, "Delete-all completed\n");
883 				break;
884 			}
885 
886 			if (rtnl_send_check(&rth, xb.buf, xb.offset) < 0) {
887 				perror("Failed to send delete-all request");
888 				exit(1);
889 			}
890 			if (show_stats > 1)
891 				fprintf(stderr, "Delete-all nlmsg count = %d\n", xb.nlmsg_count);
892 
893 			xb.offset = 0;
894 			xb.nlmsg_count = 0;
895 		}
896 	} else {
897 		struct {
898 			struct nlmsghdr n;
899 			char buf[NLMSG_BUF_SIZE];
900 		} req = {
901 			.n.nlmsg_len = NLMSG_HDRLEN,
902 			.n.nlmsg_flags = NLM_F_DUMP | NLM_F_REQUEST,
903 			.n.nlmsg_type = XFRM_MSG_GETPOLICY,
904 			.n.nlmsg_seq = rth.dump = ++rth.seq,
905 		};
906 
907 		if (rtnl_send(&rth, (void *)&req, req.n.nlmsg_len) < 0) {
908 			perror("Cannot send dump request");
909 			exit(1);
910 		}
911 
912 		if (rtnl_dump_filter(&rth, xfrm_policy_print, stdout) < 0) {
913 			fprintf(stderr, "Dump terminated\n");
914 			exit(1);
915 		}
916 	}
917 
918 	rtnl_close(&rth);
919 
920 	exit(0);
921 }
922 
print_spdinfo(struct nlmsghdr * n,void * arg)923 static int print_spdinfo(struct nlmsghdr *n, void *arg)
924 {
925 	FILE *fp = (FILE *)arg;
926 	__u32 *f = NLMSG_DATA(n);
927 	struct rtattr *tb[XFRMA_SPD_MAX+1];
928 	struct rtattr *rta;
929 
930 	int len = n->nlmsg_len;
931 
932 	len -= NLMSG_LENGTH(sizeof(__u32));
933 	if (len < 0) {
934 		fprintf(stderr, "SPDinfo: Wrong len %d\n", len);
935 		return -1;
936 	}
937 
938 	rta = XFRMSAPD_RTA(f);
939 	parse_rtattr(tb, XFRMA_SPD_MAX, rta, len);
940 
941 	fprintf(fp, "\t SPD");
942 	if (tb[XFRMA_SPD_INFO]) {
943 		struct xfrmu_spdinfo *si;
944 
945 		if (RTA_PAYLOAD(tb[XFRMA_SPD_INFO]) < sizeof(*si)) {
946 			fprintf(stderr, "SPDinfo: Wrong len %d\n", len);
947 			return -1;
948 		}
949 		si = RTA_DATA(tb[XFRMA_SPD_INFO]);
950 		fprintf(fp, " IN  %d", si->incnt);
951 		fprintf(fp, " OUT %d", si->outcnt);
952 		fprintf(fp, " FWD %d", si->fwdcnt);
953 
954 		if (show_stats) {
955 			fprintf(fp, " (Sock:");
956 			fprintf(fp, " IN %d", si->inscnt);
957 			fprintf(fp, " OUT %d", si->outscnt);
958 			fprintf(fp, " FWD %d", si->fwdscnt);
959 			fprintf(fp, ")");
960 		}
961 
962 		fprintf(fp, "%s", _SL_);
963 	}
964 	if (show_stats > 1) {
965 		struct xfrmu_spdhinfo *sh;
966 
967 		if (tb[XFRMA_SPD_HINFO]) {
968 			if (RTA_PAYLOAD(tb[XFRMA_SPD_HINFO]) < sizeof(*sh)) {
969 				fprintf(stderr, "SPDinfo: Wrong len %d\n", len);
970 				return -1;
971 			}
972 			sh = RTA_DATA(tb[XFRMA_SPD_HINFO]);
973 			fprintf(fp, "\t SPD buckets:");
974 			fprintf(fp, " count %d", sh->spdhcnt);
975 			fprintf(fp, " Max %d", sh->spdhmcnt);
976 			fprintf(fp, "%s", _SL_);
977 		}
978 		if (tb[XFRMA_SPD_IPV4_HTHRESH]) {
979 			struct xfrmu_spdhthresh *th;
980 
981 			if (RTA_PAYLOAD(tb[XFRMA_SPD_IPV4_HTHRESH]) < sizeof(*th)) {
982 				fprintf(stderr, "SPDinfo: Wrong len %d\n", len);
983 				return -1;
984 			}
985 			th = RTA_DATA(tb[XFRMA_SPD_IPV4_HTHRESH]);
986 			fprintf(fp, "\t SPD IPv4 thresholds:");
987 			fprintf(fp, " local %d", th->lbits);
988 			fprintf(fp, " remote %d", th->rbits);
989 			fprintf(fp, "%s", _SL_);
990 
991 		}
992 		if (tb[XFRMA_SPD_IPV6_HTHRESH]) {
993 			struct xfrmu_spdhthresh *th;
994 
995 			if (RTA_PAYLOAD(tb[XFRMA_SPD_IPV6_HTHRESH]) < sizeof(*th)) {
996 				fprintf(stderr, "SPDinfo: Wrong len %d\n", len);
997 				return -1;
998 			}
999 			th = RTA_DATA(tb[XFRMA_SPD_IPV6_HTHRESH]);
1000 			fprintf(fp, "\t SPD IPv6 thresholds:");
1001 			fprintf(fp, " local %d", th->lbits);
1002 			fprintf(fp, " remote %d", th->rbits);
1003 			fprintf(fp, "%s", _SL_);
1004 		}
1005 	}
1006 
1007 	if (oneline)
1008 		fprintf(fp, "\n");
1009 
1010 	return 0;
1011 }
1012 
xfrm_spd_setinfo(int argc,char ** argv)1013 static int xfrm_spd_setinfo(int argc, char **argv)
1014 {
1015 	struct rtnl_handle rth;
1016 	struct {
1017 		struct nlmsghdr			n;
1018 		__u32				flags;
1019 		char				buf[RTA_BUF_SIZE];
1020 	} req = {
1021 		.n.nlmsg_len = NLMSG_LENGTH(sizeof(__u32)),
1022 		.n.nlmsg_flags = NLM_F_REQUEST,
1023 		.n.nlmsg_type = XFRM_MSG_NEWSPDINFO,
1024 		.flags = 0XFFFFFFFF,
1025 	};
1026 
1027 	char *thr4 = NULL;
1028 	char *thr6 = NULL;
1029 
1030 	while (argc > 0) {
1031 		if (strcmp(*argv, "hthresh4") == 0) {
1032 			struct xfrmu_spdhthresh thr;
1033 
1034 			if (thr4)
1035 				duparg("hthresh4", *argv);
1036 			thr4 = *argv;
1037 			NEXT_ARG();
1038 			if (get_u8(&thr.lbits, *argv, 0) || thr.lbits > 32)
1039 				invarg("hthresh4 LBITS value is invalid", *argv);
1040 			NEXT_ARG();
1041 			if (get_u8(&thr.rbits, *argv, 0) || thr.rbits > 32)
1042 				invarg("hthresh4 RBITS value is invalid", *argv);
1043 
1044 			addattr_l(&req.n, sizeof(req), XFRMA_SPD_IPV4_HTHRESH,
1045 				  (void *)&thr, sizeof(thr));
1046 		} else if (strcmp(*argv, "hthresh6") == 0) {
1047 			struct xfrmu_spdhthresh thr;
1048 
1049 			if (thr6)
1050 				duparg("hthresh6", *argv);
1051 			thr6 = *argv;
1052 			NEXT_ARG();
1053 			if (get_u8(&thr.lbits, *argv, 0) || thr.lbits > 128)
1054 				invarg("hthresh6 LBITS value is invalid", *argv);
1055 			NEXT_ARG();
1056 			if (get_u8(&thr.rbits, *argv, 0) || thr.rbits > 128)
1057 				invarg("hthresh6 RBITS value is invalid", *argv);
1058 
1059 			addattr_l(&req.n, sizeof(req), XFRMA_SPD_IPV6_HTHRESH,
1060 				  (void *)&thr, sizeof(thr));
1061 		} else {
1062 			invarg("unknown", *argv);
1063 		}
1064 
1065 		argc--; argv++;
1066 	}
1067 
1068 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
1069 		exit(1);
1070 
1071 	if (rtnl_talk(&rth, &req.n, NULL, 0) < 0)
1072 		exit(2);
1073 
1074 	rtnl_close(&rth);
1075 
1076 	return 0;
1077 }
1078 
xfrm_spd_getinfo(int argc,char ** argv)1079 static int xfrm_spd_getinfo(int argc, char **argv)
1080 {
1081 	struct rtnl_handle rth;
1082 	struct {
1083 		struct nlmsghdr			n;
1084 		__u32				flags;
1085 		char				ans[128];
1086 	} req = {
1087 		.n.nlmsg_len = NLMSG_LENGTH(sizeof(__u32)),
1088 		.n.nlmsg_flags = NLM_F_REQUEST,
1089 		.n.nlmsg_type = XFRM_MSG_GETSPDINFO,
1090 		.flags = 0XFFFFFFFF,
1091 	};
1092 
1093 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
1094 		exit(1);
1095 
1096 	if (rtnl_talk(&rth, &req.n, &req.n, sizeof(req)) < 0)
1097 		exit(2);
1098 
1099 	print_spdinfo(&req.n, (void *)stdout);
1100 
1101 	rtnl_close(&rth);
1102 
1103 	return 0;
1104 }
1105 
xfrm_policy_flush(int argc,char ** argv)1106 static int xfrm_policy_flush(int argc, char **argv)
1107 {
1108 	struct rtnl_handle rth;
1109 	struct {
1110 		struct nlmsghdr	n;
1111 		char		buf[RTA_BUF_SIZE];
1112 	} req = {
1113 		.n.nlmsg_len = NLMSG_LENGTH(0), /* nlmsg data is nothing */
1114 		.n.nlmsg_flags = NLM_F_REQUEST,
1115 		.n.nlmsg_type = XFRM_MSG_FLUSHPOLICY,
1116 	};
1117 	char *ptypep = NULL;
1118 	struct xfrm_userpolicy_type upt = {};
1119 
1120 	while (argc > 0) {
1121 		if (strcmp(*argv, "ptype") == 0) {
1122 			if (ptypep)
1123 				duparg("ptype", *argv);
1124 			ptypep = *argv;
1125 
1126 			NEXT_ARG();
1127 			xfrm_policy_ptype_parse(&upt.type, &argc, &argv);
1128 		} else
1129 			invarg("unknown", *argv);
1130 
1131 		argc--; argv++;
1132 	}
1133 
1134 	if (ptypep) {
1135 		addattr_l(&req.n, sizeof(req), XFRMA_POLICY_TYPE,
1136 			  (void *)&upt, sizeof(upt));
1137 	}
1138 
1139 	if (rtnl_open_byproto(&rth, 0, NETLINK_XFRM) < 0)
1140 		exit(1);
1141 
1142 	if (show_stats > 1)
1143 		fprintf(stderr, "Flush policy\n");
1144 
1145 	if (rtnl_talk(&rth, &req.n, NULL, 0) < 0)
1146 		exit(2);
1147 
1148 	rtnl_close(&rth);
1149 
1150 	return 0;
1151 }
1152 
do_xfrm_policy(int argc,char ** argv)1153 int do_xfrm_policy(int argc, char **argv)
1154 {
1155 	if (argc < 1)
1156 		return xfrm_policy_list_or_deleteall(0, NULL, 0);
1157 
1158 	if (matches(*argv, "add") == 0)
1159 		return xfrm_policy_modify(XFRM_MSG_NEWPOLICY, 0,
1160 					  argc-1, argv+1);
1161 	if (matches(*argv, "update") == 0)
1162 		return xfrm_policy_modify(XFRM_MSG_UPDPOLICY, 0,
1163 					  argc-1, argv+1);
1164 	if (matches(*argv, "delete") == 0)
1165 		return xfrm_policy_delete(argc-1, argv+1);
1166 	if (matches(*argv, "deleteall") == 0 || matches(*argv, "delall") == 0)
1167 		return xfrm_policy_list_or_deleteall(argc-1, argv+1, 1);
1168 	if (matches(*argv, "list") == 0 || matches(*argv, "show") == 0
1169 	    || matches(*argv, "lst") == 0)
1170 		return xfrm_policy_list_or_deleteall(argc-1, argv+1, 0);
1171 	if (matches(*argv, "get") == 0)
1172 		return xfrm_policy_get(argc-1, argv+1);
1173 	if (matches(*argv, "flush") == 0)
1174 		return xfrm_policy_flush(argc-1, argv+1);
1175 	if (matches(*argv, "count") == 0)
1176 		return xfrm_spd_getinfo(argc, argv);
1177 	if (matches(*argv, "set") == 0)
1178 		return xfrm_spd_setinfo(argc-1, argv+1);
1179 	if (matches(*argv, "help") == 0)
1180 		usage();
1181 	fprintf(stderr, "Command \"%s\" is unknown, try \"ip xfrm policy help\".\n", *argv);
1182 	exit(-1);
1183 }
1184