]> git.proxmox.com Git - mirror_iproute2.git/blame - ip/ipl2tp.c
v3.3.0
[mirror_iproute2.git] / ip / ipl2tp.c
CommitLineData
38cd311a
SH
1/*
2 * ipl2tp.c "ip l2tp"
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 * Original Author: James Chapman <jchapman@katalix.com>
10 *
11 */
12
13#include <stdio.h>
14#include <stdlib.h>
15#include <string.h>
16#include <unistd.h>
17#include <errno.h>
18#include <sys/types.h>
19#include <sys/socket.h>
20#include <arpa/inet.h>
21#include <sys/ioctl.h>
22#include <linux/if.h>
23#include <linux/if_arp.h>
24#include <linux/ip.h>
25
38cd311a
SH
26#include <linux/genetlink.h>
27#include <linux/l2tp.h>
28
29#include "utils.h"
30#include "ip_common.h"
31
32enum {
33 L2TP_ADD,
34 L2TP_CHG,
35 L2TP_DEL,
36 L2TP_GET
37};
38
39struct l2tp_parm {
40 uint32_t tunnel_id;
41 uint32_t peer_tunnel_id;
42 uint32_t session_id;
43 uint32_t peer_session_id;
44 uint32_t offset;
45 uint32_t peer_offset;
46 enum l2tp_encap_type encap;
47 uint16_t local_udp_port;
48 uint16_t peer_udp_port;
49 int cookie_len;
50 uint8_t cookie[8];
51 int peer_cookie_len;
52 uint8_t peer_cookie[8];
53 struct in_addr local_ip;
54 struct in_addr peer_ip;
55
56 uint16_t pw_type;
57 uint16_t mtu;
58 int udp_csum:1;
59 int recv_seq:1;
60 int send_seq:1;
61 int lns_mode:1;
62 int data_seq:2;
63 int tunnel:1;
64 int session:1;
65 int reorder_timeout;
66 const char *ifname;
67};
68
69struct l2tp_stats {
70 uint64_t data_rx_packets;
71 uint64_t data_rx_bytes;
72 uint64_t data_rx_errors;
73 uint64_t data_rx_oos_packets;
74 uint64_t data_rx_oos_discards;
75 uint64_t data_tx_packets;
76 uint64_t data_tx_bytes;
77 uint64_t data_tx_errors;
78};
79
80struct l2tp_data {
81 struct l2tp_parm config;
82 struct l2tp_stats stats;
83};
84
85/* netlink socket */
86static struct rtnl_handle genl_rth;
87static int genl_family = -1;
88
89/*****************************************************************************
90 * Netlink actions
91 *****************************************************************************/
92
93static int create_tunnel(struct l2tp_parm *p)
94{
95 struct {
96 struct nlmsghdr n;
97 struct genlmsghdr g;
98 char buf[1024];
99 } req;
100
101 memset(&req, 0, sizeof(req));
102 req.n.nlmsg_type = genl_family;
103 req.n.nlmsg_flags = NLM_F_REQUEST | NLM_F_ACK;
104 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
105 req.g.cmd = L2TP_CMD_TUNNEL_CREATE;
106 req.g.version = L2TP_GENL_VERSION;
107
108 addattr32(&req.n, 1024, L2TP_ATTR_CONN_ID, p->tunnel_id);
109 addattr32(&req.n, 1024, L2TP_ATTR_PEER_CONN_ID, p->peer_tunnel_id);
110 addattr8(&req.n, 1024, L2TP_ATTR_PROTO_VERSION, 3);
111 addattr16(&req.n, 1024, L2TP_ATTR_ENCAP_TYPE, p->encap);
112
113 addattr32(&req.n, 1024, L2TP_ATTR_IP_SADDR, p->local_ip.s_addr);
114 addattr32(&req.n, 1024, L2TP_ATTR_IP_DADDR, p->peer_ip.s_addr);
115 if (p->encap == L2TP_ENCAPTYPE_UDP) {
116 addattr16(&req.n, 1024, L2TP_ATTR_UDP_SPORT, p->local_udp_port);
117 addattr16(&req.n, 1024, L2TP_ATTR_UDP_DPORT, p->peer_udp_port);
118 }
119
120 if (rtnl_talk(&genl_rth, &req.n, 0, 0, NULL) < 0)
121 return -2;
122
123 return 0;
124}
125
126static int delete_tunnel(struct l2tp_parm *p)
127{
128 struct {
129 struct nlmsghdr n;
130 struct genlmsghdr g;
131 char buf[128];
132 } req;
133
134 memset(&req, 0, sizeof(req));
135 req.n.nlmsg_type = genl_family;
136 req.n.nlmsg_flags = NLM_F_REQUEST | NLM_F_ACK;
137 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
138 req.g.cmd = L2TP_CMD_TUNNEL_DELETE;
139 req.g.version = L2TP_GENL_VERSION;
140
141 addattr32(&req.n, 128, L2TP_ATTR_CONN_ID, p->tunnel_id);
142
143 if (rtnl_talk(&genl_rth, &req.n, 0, 0, NULL) < 0)
144 return -2;
145
146 return 0;
147}
148
149static int create_session(struct l2tp_parm *p)
150{
151 struct {
152 struct nlmsghdr n;
153 struct genlmsghdr g;
154 char buf[1024];
155 } req;
156
157 memset(&req, 0, sizeof(req));
158 req.n.nlmsg_type = genl_family;
159 req.n.nlmsg_flags = NLM_F_REQUEST | NLM_F_ACK;
160 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
161 req.g.cmd = L2TP_CMD_SESSION_CREATE;
162 req.g.version = L2TP_GENL_VERSION;
163
164 addattr32(&req.n, 1024, L2TP_ATTR_CONN_ID, p->tunnel_id);
165 addattr32(&req.n, 1024, L2TP_ATTR_PEER_CONN_ID, p->peer_tunnel_id);
166 addattr32(&req.n, 1024, L2TP_ATTR_SESSION_ID, p->session_id);
167 addattr32(&req.n, 1024, L2TP_ATTR_PEER_SESSION_ID, p->peer_session_id);
168 addattr16(&req.n, 1024, L2TP_ATTR_PW_TYPE, p->pw_type);
169
170 if (p->mtu) addattr16(&req.n, 1024, L2TP_ATTR_MTU, p->mtu);
171 if (p->recv_seq) addattr(&req.n, 1024, L2TP_ATTR_RECV_SEQ);
172 if (p->send_seq) addattr(&req.n, 1024, L2TP_ATTR_SEND_SEQ);
173 if (p->lns_mode) addattr(&req.n, 1024, L2TP_ATTR_LNS_MODE);
174 if (p->data_seq) addattr8(&req.n, 1024, L2TP_ATTR_DATA_SEQ, p->data_seq);
175 if (p->reorder_timeout) addattr64(&req.n, 1024, L2TP_ATTR_RECV_TIMEOUT,
176 p->reorder_timeout);
177 if (p->offset) addattr16(&req.n, 1024, L2TP_ATTR_OFFSET, p->offset);
178 if (p->cookie_len) addattr_l(&req.n, 1024, L2TP_ATTR_COOKIE,
179 p->cookie, p->cookie_len);
180 if (p->peer_cookie_len) addattr_l(&req.n, 1024, L2TP_ATTR_PEER_COOKIE,
181 p->peer_cookie, p->peer_cookie_len);
182 if (p->ifname && p->ifname[0])
183 addattrstrz(&req.n, 1024, L2TP_ATTR_IFNAME, p->ifname);
184
185 if (rtnl_talk(&genl_rth, &req.n, 0, 0, NULL) < 0)
186 return -2;
187
188 return 0;
189}
190
191static int delete_session(struct l2tp_parm *p)
192{
193 struct {
194 struct nlmsghdr n;
195 struct genlmsghdr g;
196 char buf[128];
197 } req;
198
199 memset(&req, 0, sizeof(req));
200 req.n.nlmsg_type = genl_family;
201 req.n.nlmsg_flags = NLM_F_REQUEST | NLM_F_ACK;
202 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
203 req.g.cmd = L2TP_CMD_SESSION_DELETE;
204 req.g.version = L2TP_GENL_VERSION;
205
206 addattr32(&req.n, 1024, L2TP_ATTR_CONN_ID, p->tunnel_id);
207 addattr32(&req.n, 1024, L2TP_ATTR_SESSION_ID, p->session_id);
208 if (rtnl_talk(&genl_rth, &req.n, 0, 0, NULL) < 0)
209 return -2;
210
211 return 0;
212}
213
214static void print_cookie(char *name, const uint8_t *cookie, int len)
215{
216 printf(" %s %02x%02x%02x%02x", name,
217 cookie[0], cookie[1],
218 cookie[2], cookie[3]);
219 if (len == 8)
220 printf("%02x%02x%02x%02x",
221 cookie[4], cookie[5],
222 cookie[6], cookie[7]);
223}
224
225static void print_tunnel(const struct l2tp_data *data)
226{
227 const struct l2tp_parm *p = &data->config;
228
229 printf("Tunnel %u, encap %s\n",
230 p->tunnel_id,
231 p->encap == L2TP_ENCAPTYPE_UDP ? "UDP" :
232 p->encap == L2TP_ENCAPTYPE_IP ? "IP" : "??");
233 printf(" From %s ", inet_ntoa(p->local_ip));
234 printf("to %s\n", inet_ntoa(p->peer_ip));
235 printf(" Peer tunnel %u\n",
236 p->peer_tunnel_id);
237
238 if (p->encap == L2TP_ENCAPTYPE_UDP)
239 printf(" UDP source / dest ports: %hu/%hu\n",
240 p->local_udp_port, p->peer_udp_port);
241}
242
243static void print_session(struct l2tp_data *data)
244{
245 struct l2tp_parm *p = &data->config;
246
247 printf("Session %u in tunnel %u\n",
248 p->session_id, p->tunnel_id);
249 printf(" Peer session %u, tunnel %u\n",
250 p->peer_session_id, p->peer_tunnel_id);
251
252 if (p->ifname != NULL) {
253 printf(" interface name: %s\n", p->ifname);
254 }
255 printf(" offset %u, peer offset %u\n",
256 p->offset, p->peer_offset);
257 if (p->cookie_len > 0)
258 print_cookie("cookie", p->cookie, p->cookie_len);
259 if (p->peer_cookie_len > 0)
260 print_cookie("peer cookie", p->peer_cookie, p->peer_cookie_len);
261
262 if (p->reorder_timeout != 0) {
263 printf(" reorder timeout: %u\n", p->reorder_timeout);
264 }
265}
266
267static int get_response(struct nlmsghdr *n, void *arg)
268{
269 struct genlmsghdr *ghdr;
270 struct l2tp_data *data = arg;
271 struct l2tp_parm *p = &data->config;
272 struct rtattr *attrs[L2TP_ATTR_MAX + 1];
273 struct rtattr *nla_stats;
274 int len;
275
276 /* Validate message and parse attributes */
277 if (n->nlmsg_type == NLMSG_ERROR)
278 return -EBADMSG;
279
280 ghdr = NLMSG_DATA(n);
281 len = n->nlmsg_len - NLMSG_LENGTH(sizeof(*ghdr));
282 if (len < 0)
283 return -1;
284
285 parse_rtattr(attrs, L2TP_ATTR_MAX, (void *)ghdr + GENL_HDRLEN, len);
286
287 if (attrs[L2TP_ATTR_PW_TYPE])
288 p->pw_type = rta_getattr_u16(attrs[L2TP_ATTR_PW_TYPE]);
289 if (attrs[L2TP_ATTR_ENCAP_TYPE])
290 p->encap = rta_getattr_u16(attrs[L2TP_ATTR_ENCAP_TYPE]);
291 if (attrs[L2TP_ATTR_OFFSET])
292 p->offset = rta_getattr_u16(attrs[L2TP_ATTR_OFFSET]);
293 if (attrs[L2TP_ATTR_DATA_SEQ])
294 p->data_seq = rta_getattr_u16(attrs[L2TP_ATTR_DATA_SEQ]);
295 if (attrs[L2TP_ATTR_CONN_ID])
296 p->tunnel_id = rta_getattr_u32(attrs[L2TP_ATTR_CONN_ID]);
297 if (attrs[L2TP_ATTR_PEER_CONN_ID])
298 p->peer_tunnel_id = rta_getattr_u32(attrs[L2TP_ATTR_PEER_CONN_ID]);
299 if (attrs[L2TP_ATTR_SESSION_ID])
300 p->session_id = rta_getattr_u32(attrs[L2TP_ATTR_SESSION_ID]);
301 if (attrs[L2TP_ATTR_PEER_SESSION_ID])
302 p->peer_session_id = rta_getattr_u32(attrs[L2TP_ATTR_PEER_SESSION_ID]);
303
304 p->udp_csum = !!attrs[L2TP_ATTR_UDP_CSUM];
305 if (attrs[L2TP_ATTR_COOKIE])
306 memcpy(p->cookie, RTA_DATA(attrs[L2TP_ATTR_COOKIE]),
307 p->cookie_len = RTA_PAYLOAD(attrs[L2TP_ATTR_COOKIE]));
308
309 if (attrs[L2TP_ATTR_PEER_COOKIE])
310 memcpy(p->peer_cookie, RTA_DATA(attrs[L2TP_ATTR_PEER_COOKIE]),
311 p->peer_cookie_len = RTA_PAYLOAD(attrs[L2TP_ATTR_PEER_COOKIE]));
312
313 p->recv_seq = !!attrs[L2TP_ATTR_RECV_SEQ];
314 p->send_seq = !!attrs[L2TP_ATTR_SEND_SEQ];
315
316 if (attrs[L2TP_ATTR_RECV_TIMEOUT])
317 p->reorder_timeout = rta_getattr_u64(attrs[L2TP_ATTR_RECV_TIMEOUT]);
318 if (attrs[L2TP_ATTR_IP_SADDR])
319 p->local_ip.s_addr = rta_getattr_u32(attrs[L2TP_ATTR_IP_SADDR]);
320 if (attrs[L2TP_ATTR_IP_DADDR])
321 p->peer_ip.s_addr = rta_getattr_u32(attrs[L2TP_ATTR_IP_DADDR]);
322 if (attrs[L2TP_ATTR_UDP_SPORT])
323 p->local_udp_port = rta_getattr_u16(attrs[L2TP_ATTR_UDP_SPORT]);
324 if (attrs[L2TP_ATTR_UDP_DPORT])
325 p->peer_udp_port = rta_getattr_u16(attrs[L2TP_ATTR_UDP_DPORT]);
326 if (attrs[L2TP_ATTR_MTU])
327 p->mtu = rta_getattr_u16(attrs[L2TP_ATTR_MTU]);
328 if (attrs[L2TP_ATTR_IFNAME])
329 p->ifname = rta_getattr_str(attrs[L2TP_ATTR_IFNAME]);
330
331 nla_stats = attrs[L2TP_ATTR_STATS];
332 if (nla_stats) {
333 struct rtattr *tb[L2TP_ATTR_STATS_MAX + 1];
334
335 parse_rtattr_nested(tb, L2TP_ATTR_STATS_MAX, nla_stats);
336
337 if (tb[L2TP_ATTR_TX_PACKETS])
338 data->stats.data_tx_packets = rta_getattr_u64(tb[L2TP_ATTR_TX_PACKETS]);
339 if (tb[L2TP_ATTR_TX_BYTES])
340 data->stats.data_tx_bytes = rta_getattr_u64(tb[L2TP_ATTR_TX_BYTES]);
341 if (tb[L2TP_ATTR_TX_ERRORS])
342 data->stats.data_tx_errors = rta_getattr_u64(tb[L2TP_ATTR_TX_ERRORS]);
343 if (tb[L2TP_ATTR_RX_PACKETS])
344 data->stats.data_rx_packets = rta_getattr_u64(tb[L2TP_ATTR_RX_PACKETS]);
345 if (tb[L2TP_ATTR_RX_BYTES])
346 data->stats.data_rx_bytes = rta_getattr_u64(tb[L2TP_ATTR_RX_BYTES]);
347 if (tb[L2TP_ATTR_RX_ERRORS])
348 data->stats.data_rx_errors = rta_getattr_u64(tb[L2TP_ATTR_RX_ERRORS]);
349 if (tb[L2TP_ATTR_RX_SEQ_DISCARDS])
350 data->stats.data_rx_oos_discards = rta_getattr_u64(tb[L2TP_ATTR_RX_SEQ_DISCARDS]);
351 if (tb[L2TP_ATTR_RX_OOS_PACKETS])
352 data->stats.data_rx_oos_packets = rta_getattr_u64(tb[L2TP_ATTR_RX_OOS_PACKETS]);
353 }
354
355 return 0;
356}
357
358static int session_nlmsg(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
359{
360 int ret = get_response(n, arg);
361
362 if (ret == 0)
363 print_session(arg);
364
365 return ret;
366}
367
368static int get_session(struct l2tp_data *p)
369{
370 struct {
371 struct nlmsghdr n;
372 struct genlmsghdr g;
373 char buf[128];
374 } req;
375
376 memset(&req, 0, sizeof(req));
377 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
378 req.n.nlmsg_type = genl_family;
379 req.n.nlmsg_flags = NLM_F_ROOT|NLM_F_MATCH|NLM_F_REQUEST;
380 req.n.nlmsg_seq = genl_rth.dump = ++genl_rth.seq;
381
382 req.g.cmd = L2TP_CMD_SESSION_GET;
383 req.g.version = L2TP_GENL_VERSION;
384
385 if (p->config.tunnel_id && p->config.session_id) {
386 addattr32(&req.n, 128, L2TP_ATTR_CONN_ID, p->config.tunnel_id);
387 addattr32(&req.n, 128, L2TP_ATTR_SESSION_ID, p->config.session_id);
388 }
389
390 if (rtnl_send(&genl_rth, &req, req.n.nlmsg_len) < 0)
391 return -2;
392
393 if (rtnl_dump_filter(&genl_rth, session_nlmsg, p) < 0) {
394 fprintf(stderr, "Dump terminated\n");
395 exit(1);
396 }
397
398 return 0;
399}
400
401static int tunnel_nlmsg(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
402{
403 int ret = get_response(n, arg);
404
405 if (ret == 0)
406 print_tunnel(arg);
407
408 return ret;
409}
410
411static int get_tunnel(struct l2tp_data *p)
412{
413 struct {
414 struct nlmsghdr n;
415 struct genlmsghdr g;
416 char buf[1024];
417 } req;
418
419 memset(&req, 0, sizeof(req));
420 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
421 req.n.nlmsg_type = genl_family;
422 req.n.nlmsg_flags = NLM_F_ROOT|NLM_F_MATCH|NLM_F_REQUEST;
423 req.n.nlmsg_seq = genl_rth.dump = ++genl_rth.seq;
424
425 req.g.cmd = L2TP_CMD_TUNNEL_GET;
426 req.g.version = L2TP_GENL_VERSION;
427
428 if (p->config.tunnel_id)
429 addattr32(&req.n, 1024, L2TP_ATTR_CONN_ID, p->config.tunnel_id);
430
431 if (rtnl_send(&genl_rth, &req, req.n.nlmsg_len) < 0)
432 return -2;
433
434 if (rtnl_dump_filter(&genl_rth, tunnel_nlmsg, p) < 0) {
435 fprintf(stderr, "Dump terminated\n");
436 exit(1);
437 }
438
439 return 0;
440}
441
442/*****************************************************************************
443 * Command parser
444 *****************************************************************************/
445
446static int hex(char ch)
447{
448 if ((ch >= 'a') && (ch <= 'f'))
449 return ch - 'a' + 10;
450 if ((ch >= '0') && (ch <= '9'))
451 return ch - '0';
452 if ((ch >= 'A') && (ch <= 'F'))
453 return ch - 'A' + 10;
454 return -1;
455}
456
457static int hex2mem(const char *buf, uint8_t *mem, int count)
458{
459 int i, j;
460 int c;
461
462 for (i = 0, j = 0; i < count; i++, j += 2) {
463 c = hex(buf[j]);
464 if (c < 0)
465 goto err;
466
467 mem[i] = c << 4;
468
469 c = hex(buf[j + 1]);
470 if (c < 0)
471 goto err;
472
473 mem[i] |= c;
474 }
475
476 return 0;
477
478err:
479 return -1;
480}
481
482static void usage(void) __attribute__((noreturn));
483
484static void usage(void)
485{
486 fprintf(stderr, "Usage: ip l2tp add tunnel\n");
487 fprintf(stderr, " remote ADDR local ADDR\n");
488 fprintf(stderr, " tunnel_id ID peer_tunnel_id ID\n");
489 fprintf(stderr, " [ encap { ip | udp } ]\n");
490 fprintf(stderr, " [ udp_sport PORT ] [ udp_dport PORT ]\n");
491 fprintf(stderr, "Usage: ip l2tp add session\n");
492 fprintf(stderr, " tunnel_id ID\n");
493 fprintf(stderr, " session_id ID peer_session_id ID\n");
494 fprintf(stderr, " [ cookie HEXSTR ] [ peer_cookie HEXSTR ]\n");
495 fprintf(stderr, " [ offset OFFSET ] [ peer_offset OFFSET ]\n");
496 fprintf(stderr, " ip l2tp del tunnel tunnel_id ID\n");
497 fprintf(stderr, " ip l2tp del session tunnel_id ID session_id ID\n");
498 fprintf(stderr, " ip l2tp show tunnel [ tunnel_id ID ]\n");
499 fprintf(stderr, " ip l2tp show session [ tunnel_id ID ] [ session_id ID ]\n");
500 fprintf(stderr, "\n");
501 fprintf(stderr, "Where: NAME := STRING\n");
502 fprintf(stderr, " ADDR := { IP_ADDRESS | any }\n");
503 fprintf(stderr, " PORT := { 0..65535 }\n");
504 fprintf(stderr, " ID := { 1..4294967295 }\n");
505 fprintf(stderr, " HEXSTR := { 8 or 16 hex digits (4 / 8 bytes) }\n");
506 exit(-1);
507}
508
509static int parse_args(int argc, char **argv, int cmd, struct l2tp_parm *p)
510{
511 memset(p, 0, sizeof(*p));
512
513 if (argc == 0)
514 usage();
515
516 while (argc > 0) {
517 if (strcmp(*argv, "encap") == 0) {
518 NEXT_ARG();
519 if (strcmp(*argv, "ip") == 0) {
520 p->encap = L2TP_ENCAPTYPE_IP;
521 } else if (strcmp(*argv, "udp") == 0) {
522 p->encap = L2TP_ENCAPTYPE_UDP;
523 } else {
524 fprintf(stderr, "Unknown tunnel encapsulation.\n");
525 exit(-1);
526 }
527 } else if (strcmp(*argv, "remote") == 0) {
528 NEXT_ARG();
529 p->peer_ip.s_addr = get_addr32(*argv);
530 } else if (strcmp(*argv, "local") == 0) {
531 NEXT_ARG();
532 p->local_ip.s_addr = get_addr32(*argv);
533 } else if ((strcmp(*argv, "tunnel_id") == 0) ||
534 (strcmp(*argv, "tid") == 0)) {
535 __u32 uval;
536 NEXT_ARG();
537 if (get_u32(&uval, *argv, 0))
538 invarg("invalid ID\n", *argv);
539 p->tunnel_id = uval;
540 } else if ((strcmp(*argv, "peer_tunnel_id") == 0) ||
541 (strcmp(*argv, "ptid") == 0)) {
542 __u32 uval;
543 NEXT_ARG();
544 if (get_u32(&uval, *argv, 0))
545 invarg("invalid ID\n", *argv);
546 p->peer_tunnel_id = uval;
547 } else if ((strcmp(*argv, "session_id") == 0) ||
548 (strcmp(*argv, "sid") == 0)) {
549 __u32 uval;
550 NEXT_ARG();
551 if (get_u32(&uval, *argv, 0))
552 invarg("invalid ID\n", *argv);
553 p->session_id = uval;
554 } else if ((strcmp(*argv, "peer_session_id") == 0) ||
555 (strcmp(*argv, "psid") == 0)) {
556 __u32 uval;
557 NEXT_ARG();
558 if (get_u32(&uval, *argv, 0))
559 invarg("invalid ID\n", *argv);
560 p->peer_session_id = uval;
561 } else if (strcmp(*argv, "udp_sport") == 0) {
562 __u16 uval;
563 NEXT_ARG();
564 if (get_u16(&uval, *argv, 0))
565 invarg("invalid port\n", *argv);
566 p->local_udp_port = uval;
567 } else if (strcmp(*argv, "udp_dport") == 0) {
568 __u16 uval;
569 NEXT_ARG();
570 if (get_u16(&uval, *argv, 0))
571 invarg("invalid port\n", *argv);
572 p->peer_udp_port = uval;
573 } else if (strcmp(*argv, "offset") == 0) {
574 __u8 uval;
575 NEXT_ARG();
576 if (get_u8(&uval, *argv, 0))
577 invarg("invalid offset\n", *argv);
578 p->offset = uval;
579 } else if (strcmp(*argv, "peer_offset") == 0) {
580 __u8 uval;
581 NEXT_ARG();
582 if (get_u8(&uval, *argv, 0))
583 invarg("invalid offset\n", *argv);
584 p->peer_offset = uval;
585 } else if (strcmp(*argv, "cookie") == 0) {
586 int slen;
587 NEXT_ARG();
588 slen = strlen(*argv);
589 if ((slen != 8) && (slen != 16))
590 invarg("cookie must be either 8 or 16 hex digits\n", *argv);
591
592 p->cookie_len = slen / 2;
593 if (hex2mem(*argv, p->cookie, p->cookie_len) < 0)
594 invarg("cookie must be a hex string\n", *argv);
595 } else if (strcmp(*argv, "peer_cookie") == 0) {
596 int slen;
597 NEXT_ARG();
598 slen = strlen(*argv);
599 if ((slen != 8) && (slen != 16))
600 invarg("cookie must be either 8 or 16 hex digits\n", *argv);
601
602 p->peer_cookie_len = slen / 2;
603 if (hex2mem(*argv, p->peer_cookie, p->peer_cookie_len) < 0)
604 invarg("cookie must be a hex string\n", *argv);
605 } else if (strcmp(*argv, "tunnel") == 0) {
606 p->tunnel = 1;
607 } else if (strcmp(*argv, "session") == 0) {
608 p->session = 1;
609 } else if (matches(*argv, "help") == 0) {
610 usage();
611 } else {
612 fprintf(stderr, "Unknown command: %s\n", *argv);
613 usage();
614 }
615
616 argc--; argv++;
617 }
618
619 return 0;
620}
621
622
623static int do_add(int argc, char **argv)
624{
625 struct l2tp_parm p;
626 int ret = 0;
627
628 if (parse_args(argc, argv, L2TP_ADD, &p) < 0)
629 return -1;
630
631 if (!p.tunnel && !p.session)
632 missarg("tunnel or session");
633
634 if (p.tunnel_id == 0)
635 missarg("tunnel_id");
636
637 /* session_id and peer_session_id must be provided for sessions */
638 if ((p.session) && (p.peer_session_id == 0))
639 missarg("peer_session_id");
640 if ((p.session) && (p.session_id == 0))
641 missarg("session_id");
642
643 /* peer_tunnel_id is needed for tunnels */
644 if ((p.tunnel) && (p.peer_tunnel_id == 0))
645 missarg("peer_tunnel_id");
646
647 if (p.tunnel) {
648 if (p.local_ip.s_addr == 0)
649 missarg("local");
650
651 if (p.peer_ip.s_addr == 0)
652 missarg("remote");
653
654 if (p.encap == L2TP_ENCAPTYPE_UDP) {
655 if (p.local_udp_port == 0)
656 missarg("udp_sport");
657 if (p.peer_udp_port == 0)
658 missarg("udp_dport");
659 }
660
661 ret = create_tunnel(&p);
662 }
663
664 if (p.session) {
665 /* Only ethernet pseudowires supported */
666 p.pw_type = L2TP_PWTYPE_ETH;
667
668 ret = create_session(&p);
669 }
670
671 return ret;
672}
673
674static int do_del(int argc, char **argv)
675{
676 struct l2tp_parm p;
677
678 if (parse_args(argc, argv, L2TP_DEL, &p) < 0)
679 return -1;
680
681 if (!p.tunnel && !p.session)
682 missarg("tunnel or session");
683
684 if ((p.tunnel) && (p.tunnel_id == 0))
685 missarg("tunnel_id");
686 if ((p.session) && (p.session_id == 0))
687 missarg("session_id");
688
689 if (p.session_id)
690 return delete_session(&p);
691 else
692 return delete_tunnel(&p);
693
694 return -1;
695}
696
697static int do_show(int argc, char **argv)
698{
699 struct l2tp_data data;
700 struct l2tp_parm *p = &data.config;
701
702 if (parse_args(argc, argv, L2TP_GET, p) < 0)
703 return -1;
704
705 if (!p->tunnel && !p->session)
706 missarg("tunnel or session");
707
708 if (p->session)
709 get_session(&data);
710 else
711 get_tunnel(&data);
712
713 return 0;
714}
715
716static int genl_parse_getfamily(struct nlmsghdr *nlh)
717{
718 struct rtattr *tb[CTRL_ATTR_MAX + 1];
719 struct genlmsghdr *ghdr = NLMSG_DATA(nlh);
720 int len = nlh->nlmsg_len;
721 struct rtattr *attrs;
722
723 if (nlh->nlmsg_type != GENL_ID_CTRL) {
724 fprintf(stderr, "Not a controller message, nlmsg_len=%d "
725 "nlmsg_type=0x%x\n", nlh->nlmsg_len, nlh->nlmsg_type);
726 return -1;
727 }
728
729 if (ghdr->cmd != CTRL_CMD_NEWFAMILY) {
730 fprintf(stderr, "Unknown controller command %d\n", ghdr->cmd);
731 return -1;
732 }
733
734 len -= NLMSG_LENGTH(GENL_HDRLEN);
735
736 if (len < 0) {
737 fprintf(stderr, "wrong controller message len %d\n", len);
738 return -1;
739 }
740
741 attrs = (struct rtattr *) ((char *) ghdr + GENL_HDRLEN);
742 parse_rtattr(tb, CTRL_ATTR_MAX, attrs, len);
743
744 if (tb[CTRL_ATTR_FAMILY_ID] == NULL) {
745 fprintf(stderr, "Missing family id TLV\n");
746 return -1;
747 }
748
749 return rta_getattr_u16(tb[CTRL_ATTR_FAMILY_ID]);
750}
751
752int genl_ctrl_resolve_family(const char *family)
753{
754 struct {
755 struct nlmsghdr n;
756 struct genlmsghdr g;
757 char buf[1024];
758 } req;
759
760 memset(&req, 0, sizeof(req));
761 req.n.nlmsg_len = NLMSG_LENGTH(GENL_HDRLEN);
762 req.n.nlmsg_flags = NLM_F_REQUEST;
763 req.n.nlmsg_type = GENL_ID_CTRL;
764 req.g.cmd = CTRL_CMD_GETFAMILY;
765
766 addattr_l(&req.n, 1024, CTRL_ATTR_FAMILY_NAME,
767 family, strlen(family) + 1);
768
769 if (rtnl_talk(&genl_rth, &req.n, 0, 0, &req.n) < 0) {
770 fprintf(stderr, "Error talking to the kernel\n");
771 return -2;
772 }
773
774 return genl_parse_getfamily(&req.n);
775}
776
777int do_ipl2tp(int argc, char **argv)
778{
779 if (genl_family < 0) {
780 if (rtnl_open_byproto(&genl_rth, 0, NETLINK_GENERIC) < 0) {
781 fprintf(stderr, "Cannot open generic netlink socket\n");
782 exit(1);
783 }
784
785 genl_family = genl_ctrl_resolve_family(L2TP_GENL_NAME);
786 if (genl_family < 0)
787 exit(1);
788 }
789
790 if (argc < 1)
791 usage();
792
793 if (matches(*argv, "add") == 0)
794 return do_add(argc-1, argv+1);
795 if (matches(*argv, "del") == 0)
796 return do_del(argc-1, argv+1);
797 if (matches(*argv, "show") == 0 ||
798 matches(*argv, "lst") == 0 ||
799 matches(*argv, "list") == 0)
800 return do_show(argc-1, argv+1);
801 if (matches(*argv, "help") == 0)
802 usage();
803
804 fprintf(stderr, "Command \"%s\" is unknown, try \"ip l2tp help\".\n", *argv);
805 exit(-1);
806}