1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * Copyright (C) 2001 - 2007 Jeff Dike (jdike@{addtoit,linux.intel}.com)
4 */
5
6 #include <stdbool.h>
7 #include <stdio.h>
8 #include <unistd.h>
9 #include <stdarg.h>
10 #include <errno.h>
11 #include <stddef.h>
12 #include <string.h>
13 #include <sys/ioctl.h>
14 #include <net/if.h>
15 #include <linux/if_tun.h>
16 #include <arpa/inet.h>
17 #include <sys/types.h>
18 #include <sys/stat.h>
19 #include <fcntl.h>
20 #include <sys/socket.h>
21 #include <sys/un.h>
22 #include <netinet/ip.h>
23 #include <linux/if_ether.h>
24 #include <linux/if_packet.h>
25 #include <sys/wait.h>
26 #include <sys/uio.h>
27 #include <linux/virtio_net.h>
28 #include <netdb.h>
29 #include <stdlib.h>
30 #include <os.h>
31 #include <limits.h>
32 #include <um_malloc.h>
33 #include "vector_user.h"
34
35 #define ID_GRE 0
36 #define ID_L2TPV3 1
37 #define ID_BESS 2
38 #define ID_MAX 2
39
40 #define TOKEN_IFNAME "ifname"
41 #define TOKEN_SCRIPT "ifup"
42
43 #define TRANS_RAW "raw"
44 #define TRANS_RAW_LEN strlen(TRANS_RAW)
45
46 #define TRANS_FD "fd"
47 #define TRANS_FD_LEN strlen(TRANS_FD)
48
49 #define VNET_HDR_FAIL "could not enable vnet headers on fd %d"
50 #define TUN_GET_F_FAIL "tapraw: TUNGETFEATURES failed: %s"
51 #define L2TPV3_BIND_FAIL "l2tpv3_open : could not bind socket err=%i"
52 #define UNIX_BIND_FAIL "unix_open : could not bind socket err=%i"
53 #define BPF_ATTACH_FAIL "Failed to attach filter size %d prog %px to %d, err %d\n"
54 #define BPF_DETACH_FAIL "Failed to detach filter size %d prog %px to %d, err %d\n"
55
56 #define MAX_UN_LEN 107
57
58 static const char padchar[] = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
59 static const char *template = "tapXXXXXX";
60
61 /* This is very ugly and brute force lookup, but it is done
62 * only once at initialization so not worth doing hashes or
63 * anything more intelligent
64 */
65
uml_vector_fetch_arg(struct arglist * ifspec,char * token)66 char *uml_vector_fetch_arg(struct arglist *ifspec, char *token)
67 {
68 int i;
69
70 for (i = 0; i < ifspec->numargs; i++) {
71 if (strcmp(ifspec->tokens[i], token) == 0)
72 return ifspec->values[i];
73 }
74 return NULL;
75
76 }
77
uml_parse_vector_ifspec(char * arg)78 struct arglist *uml_parse_vector_ifspec(char *arg)
79 {
80 struct arglist *result;
81 int pos, len;
82 bool parsing_token = true, next_starts = true;
83
84 if (arg == NULL)
85 return NULL;
86 result = uml_kmalloc(sizeof(struct arglist), UM_GFP_KERNEL);
87 if (result == NULL)
88 return NULL;
89 result->numargs = 0;
90 len = strlen(arg);
91 for (pos = 0; pos < len; pos++) {
92 if (next_starts) {
93 if (parsing_token) {
94 result->tokens[result->numargs] = arg + pos;
95 } else {
96 result->values[result->numargs] = arg + pos;
97 result->numargs++;
98 }
99 next_starts = false;
100 }
101 if (*(arg + pos) == '=') {
102 if (parsing_token)
103 parsing_token = false;
104 else
105 goto cleanup;
106 next_starts = true;
107 (*(arg + pos)) = '\0';
108 }
109 if (*(arg + pos) == ',') {
110 parsing_token = true;
111 next_starts = true;
112 (*(arg + pos)) = '\0';
113 }
114 }
115 return result;
116 cleanup:
117 printk(UM_KERN_ERR "vector_setup - Couldn't parse '%s'\n", arg);
118 kfree(result);
119 return NULL;
120 }
121
122 /*
123 * Socket/FD configuration functions. These return an structure
124 * of rx and tx descriptors to cover cases where these are not
125 * the same (f.e. read via raw socket and write via tap).
126 */
127
128 #define PATH_NET_TUN "/dev/net/tun"
129
130
create_tap_fd(char * iface)131 static int create_tap_fd(char *iface)
132 {
133 struct ifreq ifr;
134 int fd = -1;
135 int err = -ENOMEM, offload;
136
137 fd = open(PATH_NET_TUN, O_RDWR);
138 if (fd < 0) {
139 printk(UM_KERN_ERR "uml_tap: failed to open tun device\n");
140 goto tap_fd_cleanup;
141 }
142 memset(&ifr, 0, sizeof(ifr));
143 ifr.ifr_flags = IFF_TAP | IFF_NO_PI | IFF_VNET_HDR;
144 strncpy((char *)&ifr.ifr_name, iface, sizeof(ifr.ifr_name) - 1);
145
146 err = ioctl(fd, TUNSETIFF, (void *) &ifr);
147 if (err != 0) {
148 printk(UM_KERN_ERR "uml_tap: failed to select tap interface\n");
149 goto tap_fd_cleanup;
150 }
151
152 offload = TUN_F_CSUM | TUN_F_TSO4 | TUN_F_TSO6;
153 ioctl(fd, TUNSETOFFLOAD, offload);
154 return fd;
155 tap_fd_cleanup:
156 if (fd >= 0)
157 os_close_file(fd);
158 return err;
159 }
160
create_raw_fd(char * iface,int flags,int proto)161 static int create_raw_fd(char *iface, int flags, int proto)
162 {
163 struct ifreq ifr;
164 int fd = -1;
165 struct sockaddr_ll sock;
166 int err = -ENOMEM;
167
168 fd = socket(AF_PACKET, SOCK_RAW, flags);
169 if (fd == -1) {
170 err = -errno;
171 goto raw_fd_cleanup;
172 }
173 memset(&ifr, 0, sizeof(ifr));
174 strncpy((char *)&ifr.ifr_name, iface, sizeof(ifr.ifr_name) - 1);
175 if (ioctl(fd, SIOCGIFINDEX, (void *) &ifr) < 0) {
176 err = -errno;
177 goto raw_fd_cleanup;
178 }
179
180 sock.sll_family = AF_PACKET;
181 sock.sll_protocol = htons(proto);
182 sock.sll_ifindex = ifr.ifr_ifindex;
183
184 if (bind(fd,
185 (struct sockaddr *) &sock, sizeof(struct sockaddr_ll)) < 0) {
186 err = -errno;
187 goto raw_fd_cleanup;
188 }
189 return fd;
190 raw_fd_cleanup:
191 printk(UM_KERN_ERR "user_init_raw: init failed, error %d", err);
192 if (fd >= 0)
193 os_close_file(fd);
194 return err;
195 }
196
197
user_init_tap_fds(struct arglist * ifspec)198 static struct vector_fds *user_init_tap_fds(struct arglist *ifspec)
199 {
200 int fd = -1, i;
201 char *iface;
202 struct vector_fds *result = NULL;
203 bool dynamic = false;
204 char dynamic_ifname[IFNAMSIZ];
205 char *argv[] = {NULL, NULL, NULL, NULL};
206
207 iface = uml_vector_fetch_arg(ifspec, TOKEN_IFNAME);
208 if (iface == NULL) {
209 dynamic = true;
210 iface = dynamic_ifname;
211 srand(getpid());
212 }
213
214 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
215 if (result == NULL) {
216 printk(UM_KERN_ERR "uml_tap: failed to allocate file descriptors\n");
217 goto tap_cleanup;
218 }
219 result->rx_fd = -1;
220 result->tx_fd = -1;
221 result->remote_addr = NULL;
222 result->remote_addr_size = 0;
223
224 /* TAP */
225 do {
226 if (dynamic) {
227 strcpy(iface, template);
228 for (i = 0; i < strlen(iface); i++) {
229 if (iface[i] == 'X') {
230 iface[i] = padchar[rand() % strlen(padchar)];
231 }
232 }
233 }
234 fd = create_tap_fd(iface);
235 if ((fd < 0) && (!dynamic)) {
236 printk(UM_KERN_ERR "uml_tap: failed to create tun interface\n");
237 goto tap_cleanup;
238 }
239 result->tx_fd = fd;
240 result->rx_fd = fd;
241 } while (fd < 0);
242
243 argv[0] = uml_vector_fetch_arg(ifspec, TOKEN_SCRIPT);
244 if (argv[0]) {
245 argv[1] = iface;
246 run_helper(NULL, NULL, argv);
247 }
248
249 return result;
250 tap_cleanup:
251 printk(UM_KERN_ERR "user_init_tap: init failed, error %d", fd);
252 kfree(result);
253 return NULL;
254 }
255
user_init_hybrid_fds(struct arglist * ifspec)256 static struct vector_fds *user_init_hybrid_fds(struct arglist *ifspec)
257 {
258 char *iface;
259 struct vector_fds *result = NULL;
260 char *argv[] = {NULL, NULL, NULL, NULL};
261
262 iface = uml_vector_fetch_arg(ifspec, TOKEN_IFNAME);
263 if (iface == NULL) {
264 printk(UM_KERN_ERR "uml_tap: failed to parse interface spec\n");
265 goto hybrid_cleanup;
266 }
267
268 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
269 if (result == NULL) {
270 printk(UM_KERN_ERR "uml_tap: failed to allocate file descriptors\n");
271 goto hybrid_cleanup;
272 }
273 result->rx_fd = -1;
274 result->tx_fd = -1;
275 result->remote_addr = NULL;
276 result->remote_addr_size = 0;
277
278 /* TAP */
279
280 result->tx_fd = create_tap_fd(iface);
281 if (result->tx_fd < 0) {
282 printk(UM_KERN_ERR "uml_tap: failed to create tun interface: %i\n", result->tx_fd);
283 goto hybrid_cleanup;
284 }
285
286 /* RAW */
287
288 result->rx_fd = create_raw_fd(iface, ETH_P_ALL, ETH_P_ALL);
289 if (result->rx_fd == -1) {
290 printk(UM_KERN_ERR
291 "uml_tap: failed to create paired raw socket: %i\n", result->rx_fd);
292 goto hybrid_cleanup;
293 }
294
295 argv[0] = uml_vector_fetch_arg(ifspec, TOKEN_SCRIPT);
296 if (argv[0]) {
297 argv[1] = iface;
298 run_helper(NULL, NULL, argv);
299 }
300 return result;
301 hybrid_cleanup:
302 printk(UM_KERN_ERR "user_init_hybrid: init failed");
303 kfree(result);
304 return NULL;
305 }
306
user_init_unix_fds(struct arglist * ifspec,int id)307 static struct vector_fds *user_init_unix_fds(struct arglist *ifspec, int id)
308 {
309 int fd = -1;
310 int socktype;
311 char *src, *dst;
312 struct vector_fds *result = NULL;
313 struct sockaddr_un *local_addr = NULL, *remote_addr = NULL;
314
315 src = uml_vector_fetch_arg(ifspec, "src");
316 dst = uml_vector_fetch_arg(ifspec, "dst");
317 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
318 if (result == NULL) {
319 printk(UM_KERN_ERR "unix open:cannot allocate remote addr");
320 goto unix_cleanup;
321 }
322 remote_addr = uml_kmalloc(sizeof(struct sockaddr_un), UM_GFP_KERNEL);
323 if (remote_addr == NULL) {
324 printk(UM_KERN_ERR "unix open:cannot allocate remote addr");
325 goto unix_cleanup;
326 }
327
328 switch (id) {
329 case ID_BESS:
330 socktype = SOCK_SEQPACKET;
331 if ((src != NULL) && (strlen(src) <= MAX_UN_LEN)) {
332 local_addr = uml_kmalloc(sizeof(struct sockaddr_un), UM_GFP_KERNEL);
333 if (local_addr == NULL) {
334 printk(UM_KERN_ERR "bess open:cannot allocate local addr");
335 goto unix_cleanup;
336 }
337 local_addr->sun_family = AF_UNIX;
338 memcpy(local_addr->sun_path, src, strlen(src) + 1);
339 }
340 if ((dst == NULL) || (strlen(dst) > MAX_UN_LEN))
341 goto unix_cleanup;
342 remote_addr->sun_family = AF_UNIX;
343 memcpy(remote_addr->sun_path, dst, strlen(dst) + 1);
344 break;
345 default:
346 printk(KERN_ERR "Unsupported unix socket type\n");
347 return NULL;
348 }
349
350 fd = socket(AF_UNIX, socktype, 0);
351 if (fd == -1) {
352 printk(UM_KERN_ERR
353 "unix open: could not open socket, error = %d",
354 -errno
355 );
356 goto unix_cleanup;
357 }
358 if (local_addr != NULL) {
359 if (bind(fd, (struct sockaddr *) local_addr, sizeof(struct sockaddr_un))) {
360 printk(UM_KERN_ERR UNIX_BIND_FAIL, errno);
361 goto unix_cleanup;
362 }
363 }
364 switch (id) {
365 case ID_BESS:
366 if (connect(fd, (const struct sockaddr *) remote_addr, sizeof(struct sockaddr_un)) < 0) {
367 printk(UM_KERN_ERR "bess open:cannot connect to %s %i", remote_addr->sun_path, -errno);
368 goto unix_cleanup;
369 }
370 break;
371 }
372 result->rx_fd = fd;
373 result->tx_fd = fd;
374 result->remote_addr_size = sizeof(struct sockaddr_un);
375 result->remote_addr = remote_addr;
376 return result;
377 unix_cleanup:
378 if (fd >= 0)
379 os_close_file(fd);
380 kfree(remote_addr);
381 kfree(result);
382 return NULL;
383 }
384
strtofd(const char * nptr)385 static int strtofd(const char *nptr)
386 {
387 long fd;
388 char *endptr;
389
390 if (nptr == NULL)
391 return -1;
392
393 errno = 0;
394 fd = strtol(nptr, &endptr, 10);
395 if (nptr == endptr ||
396 errno != 0 ||
397 *endptr != '\0' ||
398 fd < 0 ||
399 fd > INT_MAX) {
400 return -1;
401 }
402 return fd;
403 }
404
user_init_fd_fds(struct arglist * ifspec)405 static struct vector_fds *user_init_fd_fds(struct arglist *ifspec)
406 {
407 int fd = -1;
408 char *fdarg = NULL;
409 struct vector_fds *result = NULL;
410
411 fdarg = uml_vector_fetch_arg(ifspec, "fd");
412 fd = strtofd(fdarg);
413 if (fd == -1) {
414 printk(UM_KERN_ERR "fd open: bad or missing fd argument");
415 goto fd_cleanup;
416 }
417
418 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
419 if (result == NULL) {
420 printk(UM_KERN_ERR "fd open: allocation failed");
421 goto fd_cleanup;
422 }
423
424 result->rx_fd = fd;
425 result->tx_fd = fd;
426 result->remote_addr_size = 0;
427 result->remote_addr = NULL;
428 return result;
429
430 fd_cleanup:
431 if (fd >= 0)
432 os_close_file(fd);
433 kfree(result);
434 return NULL;
435 }
436
user_init_raw_fds(struct arglist * ifspec)437 static struct vector_fds *user_init_raw_fds(struct arglist *ifspec)
438 {
439 int rxfd = -1, txfd = -1;
440 int err = -ENOMEM;
441 char *iface;
442 struct vector_fds *result = NULL;
443 char *argv[] = {NULL, NULL, NULL, NULL};
444
445 iface = uml_vector_fetch_arg(ifspec, TOKEN_IFNAME);
446 if (iface == NULL)
447 goto raw_cleanup;
448
449 rxfd = create_raw_fd(iface, ETH_P_ALL, ETH_P_ALL);
450 if (rxfd == -1) {
451 err = -errno;
452 goto raw_cleanup;
453 }
454 txfd = create_raw_fd(iface, 0, ETH_P_IP); /* Turn off RX on this fd */
455 if (txfd == -1) {
456 err = -errno;
457 goto raw_cleanup;
458 }
459 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
460 if (result != NULL) {
461 result->rx_fd = rxfd;
462 result->tx_fd = txfd;
463 result->remote_addr = NULL;
464 result->remote_addr_size = 0;
465 }
466 argv[0] = uml_vector_fetch_arg(ifspec, TOKEN_SCRIPT);
467 if (argv[0]) {
468 argv[1] = iface;
469 run_helper(NULL, NULL, argv);
470 }
471 return result;
472 raw_cleanup:
473 printk(UM_KERN_ERR "user_init_raw: init failed, error %d", err);
474 kfree(result);
475 return NULL;
476 }
477
478
uml_raw_enable_qdisc_bypass(int fd)479 bool uml_raw_enable_qdisc_bypass(int fd)
480 {
481 int optval = 1;
482
483 if (setsockopt(fd,
484 SOL_PACKET, PACKET_QDISC_BYPASS,
485 &optval, sizeof(optval)) != 0) {
486 return false;
487 }
488 return true;
489 }
490
uml_raw_enable_vnet_headers(int fd)491 bool uml_raw_enable_vnet_headers(int fd)
492 {
493 int optval = 1;
494
495 if (setsockopt(fd,
496 SOL_PACKET, PACKET_VNET_HDR,
497 &optval, sizeof(optval)) != 0) {
498 printk(UM_KERN_INFO VNET_HDR_FAIL, fd);
499 return false;
500 }
501 return true;
502 }
uml_tap_enable_vnet_headers(int fd)503 bool uml_tap_enable_vnet_headers(int fd)
504 {
505 unsigned int features;
506 int len = sizeof(struct virtio_net_hdr);
507
508 if (ioctl(fd, TUNGETFEATURES, &features) == -1) {
509 printk(UM_KERN_INFO TUN_GET_F_FAIL, strerror(errno));
510 return false;
511 }
512 if ((features & IFF_VNET_HDR) == 0) {
513 printk(UM_KERN_INFO "tapraw: No VNET HEADER support");
514 return false;
515 }
516 ioctl(fd, TUNSETVNETHDRSZ, &len);
517 return true;
518 }
519
user_init_socket_fds(struct arglist * ifspec,int id)520 static struct vector_fds *user_init_socket_fds(struct arglist *ifspec, int id)
521 {
522 int err = -ENOMEM;
523 int fd = -1, gairet;
524 struct addrinfo srchints;
525 struct addrinfo dsthints;
526 bool v6, udp;
527 char *value;
528 char *src, *dst, *srcport, *dstport;
529 struct addrinfo *gairesult = NULL;
530 struct vector_fds *result = NULL;
531
532
533 value = uml_vector_fetch_arg(ifspec, "v6");
534 v6 = false;
535 udp = false;
536 if (value != NULL) {
537 if (strtol((const char *) value, NULL, 10) > 0)
538 v6 = true;
539 }
540
541 value = uml_vector_fetch_arg(ifspec, "udp");
542 if (value != NULL) {
543 if (strtol((const char *) value, NULL, 10) > 0)
544 udp = true;
545 }
546 src = uml_vector_fetch_arg(ifspec, "src");
547 dst = uml_vector_fetch_arg(ifspec, "dst");
548 srcport = uml_vector_fetch_arg(ifspec, "srcport");
549 dstport = uml_vector_fetch_arg(ifspec, "dstport");
550
551 memset(&dsthints, 0, sizeof(dsthints));
552
553 if (v6)
554 dsthints.ai_family = AF_INET6;
555 else
556 dsthints.ai_family = AF_INET;
557
558 switch (id) {
559 case ID_GRE:
560 dsthints.ai_socktype = SOCK_RAW;
561 dsthints.ai_protocol = IPPROTO_GRE;
562 break;
563 case ID_L2TPV3:
564 if (udp) {
565 dsthints.ai_socktype = SOCK_DGRAM;
566 dsthints.ai_protocol = 0;
567 } else {
568 dsthints.ai_socktype = SOCK_RAW;
569 dsthints.ai_protocol = IPPROTO_L2TP;
570 }
571 break;
572 default:
573 printk(KERN_ERR "Unsupported socket type\n");
574 return NULL;
575 }
576 memcpy(&srchints, &dsthints, sizeof(struct addrinfo));
577
578 gairet = getaddrinfo(src, srcport, &dsthints, &gairesult);
579 if ((gairet != 0) || (gairesult == NULL)) {
580 printk(UM_KERN_ERR
581 "socket_open : could not resolve src, error = %s",
582 gai_strerror(gairet)
583 );
584 return NULL;
585 }
586 fd = socket(gairesult->ai_family,
587 gairesult->ai_socktype, gairesult->ai_protocol);
588 if (fd == -1) {
589 printk(UM_KERN_ERR
590 "socket_open : could not open socket, error = %d",
591 -errno
592 );
593 goto cleanup;
594 }
595 if (bind(fd,
596 (struct sockaddr *) gairesult->ai_addr,
597 gairesult->ai_addrlen)) {
598 printk(UM_KERN_ERR L2TPV3_BIND_FAIL, errno);
599 goto cleanup;
600 }
601
602 if (gairesult != NULL)
603 freeaddrinfo(gairesult);
604
605 gairesult = NULL;
606
607 gairet = getaddrinfo(dst, dstport, &dsthints, &gairesult);
608 if ((gairet != 0) || (gairesult == NULL)) {
609 printk(UM_KERN_ERR
610 "socket_open : could not resolve dst, error = %s",
611 gai_strerror(gairet)
612 );
613 return NULL;
614 }
615
616 result = uml_kmalloc(sizeof(struct vector_fds), UM_GFP_KERNEL);
617 if (result != NULL) {
618 result->rx_fd = fd;
619 result->tx_fd = fd;
620 result->remote_addr = uml_kmalloc(
621 gairesult->ai_addrlen, UM_GFP_KERNEL);
622 if (result->remote_addr == NULL)
623 goto cleanup;
624 result->remote_addr_size = gairesult->ai_addrlen;
625 memcpy(
626 result->remote_addr,
627 gairesult->ai_addr,
628 gairesult->ai_addrlen
629 );
630 }
631 freeaddrinfo(gairesult);
632 return result;
633 cleanup:
634 if (gairesult != NULL)
635 freeaddrinfo(gairesult);
636 printk(UM_KERN_ERR "user_init_socket: init failed, error %d", err);
637 if (fd >= 0)
638 os_close_file(fd);
639 if (result != NULL) {
640 kfree(result->remote_addr);
641 kfree(result);
642 }
643 return NULL;
644 }
645
uml_vector_user_open(int unit,struct arglist * parsed)646 struct vector_fds *uml_vector_user_open(
647 int unit,
648 struct arglist *parsed
649 )
650 {
651 char *transport;
652
653 if (parsed == NULL) {
654 printk(UM_KERN_ERR "no parsed config for unit %d\n", unit);
655 return NULL;
656 }
657 transport = uml_vector_fetch_arg(parsed, "transport");
658 if (transport == NULL) {
659 printk(UM_KERN_ERR "missing transport for unit %d\n", unit);
660 return NULL;
661 }
662 if (strncmp(transport, TRANS_RAW, TRANS_RAW_LEN) == 0)
663 return user_init_raw_fds(parsed);
664 if (strncmp(transport, TRANS_HYBRID, TRANS_HYBRID_LEN) == 0)
665 return user_init_hybrid_fds(parsed);
666 if (strncmp(transport, TRANS_TAP, TRANS_TAP_LEN) == 0)
667 return user_init_tap_fds(parsed);
668 if (strncmp(transport, TRANS_GRE, TRANS_GRE_LEN) == 0)
669 return user_init_socket_fds(parsed, ID_GRE);
670 if (strncmp(transport, TRANS_L2TPV3, TRANS_L2TPV3_LEN) == 0)
671 return user_init_socket_fds(parsed, ID_L2TPV3);
672 if (strncmp(transport, TRANS_BESS, TRANS_BESS_LEN) == 0)
673 return user_init_unix_fds(parsed, ID_BESS);
674 if (strncmp(transport, TRANS_FD, TRANS_FD_LEN) == 0)
675 return user_init_fd_fds(parsed);
676 return NULL;
677 }
678
679
uml_vector_sendmsg(int fd,void * hdr,int flags)680 int uml_vector_sendmsg(int fd, void *hdr, int flags)
681 {
682 int n;
683
684 CATCH_EINTR(n = sendmsg(fd, (struct msghdr *) hdr, flags));
685 if ((n < 0) && (errno == EAGAIN))
686 return 0;
687 if (n >= 0)
688 return n;
689 else
690 return -errno;
691 }
692
uml_vector_recvmsg(int fd,void * hdr,int flags)693 int uml_vector_recvmsg(int fd, void *hdr, int flags)
694 {
695 int n;
696 struct msghdr *msg = (struct msghdr *) hdr;
697
698 CATCH_EINTR(n = readv(fd, msg->msg_iov, msg->msg_iovlen));
699 if ((n < 0) && (errno == EAGAIN))
700 return 0;
701 if (n >= 0)
702 return n;
703 else
704 return -errno;
705 }
706
uml_vector_writev(int fd,void * hdr,int iovcount)707 int uml_vector_writev(int fd, void *hdr, int iovcount)
708 {
709 int n;
710
711 CATCH_EINTR(n = writev(fd, (struct iovec *) hdr, iovcount));
712 if ((n < 0) && ((errno == EAGAIN) || (errno == ENOBUFS)))
713 return 0;
714 if (n >= 0)
715 return n;
716 else
717 return -errno;
718 }
719
uml_vector_sendmmsg(int fd,void * msgvec,unsigned int vlen,unsigned int flags)720 int uml_vector_sendmmsg(
721 int fd,
722 void *msgvec,
723 unsigned int vlen,
724 unsigned int flags)
725 {
726 int n;
727
728 CATCH_EINTR(n = sendmmsg(fd, (struct mmsghdr *) msgvec, vlen, flags));
729 if ((n < 0) && ((errno == EAGAIN) || (errno == ENOBUFS)))
730 return 0;
731 if (n >= 0)
732 return n;
733 else
734 return -errno;
735 }
736
uml_vector_recvmmsg(int fd,void * msgvec,unsigned int vlen,unsigned int flags)737 int uml_vector_recvmmsg(
738 int fd,
739 void *msgvec,
740 unsigned int vlen,
741 unsigned int flags)
742 {
743 int n;
744
745 CATCH_EINTR(
746 n = recvmmsg(fd, (struct mmsghdr *) msgvec, vlen, flags, 0));
747 if ((n < 0) && (errno == EAGAIN))
748 return 0;
749 if (n >= 0)
750 return n;
751 else
752 return -errno;
753 }
uml_vector_attach_bpf(int fd,void * bpf)754 int uml_vector_attach_bpf(int fd, void *bpf)
755 {
756 struct sock_fprog *prog = bpf;
757
758 int err = setsockopt(fd, SOL_SOCKET, SO_ATTACH_FILTER, bpf, sizeof(struct sock_fprog));
759
760 if (err < 0)
761 printk(KERN_ERR BPF_ATTACH_FAIL, prog->len, prog->filter, fd, -errno);
762 return err;
763 }
764
uml_vector_detach_bpf(int fd,void * bpf)765 int uml_vector_detach_bpf(int fd, void *bpf)
766 {
767 struct sock_fprog *prog = bpf;
768
769 int err = setsockopt(fd, SOL_SOCKET, SO_DETACH_FILTER, bpf, sizeof(struct sock_fprog));
770 if (err < 0)
771 printk(KERN_ERR BPF_DETACH_FAIL, prog->len, prog->filter, fd, -errno);
772 return err;
773 }
uml_vector_default_bpf(const void * mac)774 void *uml_vector_default_bpf(const void *mac)
775 {
776 struct sock_filter *bpf;
777 uint32_t *mac1 = (uint32_t *)(mac + 2);
778 uint16_t *mac2 = (uint16_t *) mac;
779 struct sock_fprog *bpf_prog;
780
781 bpf_prog = uml_kmalloc(sizeof(struct sock_fprog), UM_GFP_KERNEL);
782 if (bpf_prog) {
783 bpf_prog->len = DEFAULT_BPF_LEN;
784 bpf_prog->filter = NULL;
785 } else {
786 return NULL;
787 }
788 bpf = uml_kmalloc(
789 sizeof(struct sock_filter) * DEFAULT_BPF_LEN, UM_GFP_KERNEL);
790 if (bpf) {
791 bpf_prog->filter = bpf;
792 /* ld [8] */
793 bpf[0] = (struct sock_filter){ 0x20, 0, 0, 0x00000008 };
794 /* jeq #0xMAC[2-6] jt 2 jf 5*/
795 bpf[1] = (struct sock_filter){ 0x15, 0, 3, ntohl(*mac1)};
796 /* ldh [6] */
797 bpf[2] = (struct sock_filter){ 0x28, 0, 0, 0x00000006 };
798 /* jeq #0xMAC[0-1] jt 4 jf 5 */
799 bpf[3] = (struct sock_filter){ 0x15, 0, 1, ntohs(*mac2)};
800 /* ret #0 */
801 bpf[4] = (struct sock_filter){ 0x6, 0, 0, 0x00000000 };
802 /* ret #0x40000 */
803 bpf[5] = (struct sock_filter){ 0x6, 0, 0, 0x00040000 };
804 } else {
805 kfree(bpf_prog);
806 bpf_prog = NULL;
807 }
808 return bpf_prog;
809 }
810
811 /* Note - this function requires a valid mac being passed as an arg */
812
uml_vector_user_bpf(char * filename)813 void *uml_vector_user_bpf(char *filename)
814 {
815 struct sock_filter *bpf;
816 struct sock_fprog *bpf_prog;
817 struct stat statbuf;
818 int res, ffd = -1;
819
820 if (filename == NULL)
821 return NULL;
822
823 if (stat(filename, &statbuf) < 0) {
824 printk(KERN_ERR "Error %d reading bpf file", -errno);
825 return false;
826 }
827 bpf_prog = uml_kmalloc(sizeof(struct sock_fprog), UM_GFP_KERNEL);
828 if (bpf_prog == NULL) {
829 printk(KERN_ERR "Failed to allocate bpf prog buffer");
830 return NULL;
831 }
832 bpf_prog->len = statbuf.st_size / sizeof(struct sock_filter);
833 bpf_prog->filter = NULL;
834 ffd = os_open_file(filename, of_read(OPENFLAGS()), 0);
835 if (ffd < 0) {
836 printk(KERN_ERR "Error %d opening bpf file", -errno);
837 goto bpf_failed;
838 }
839 bpf = uml_kmalloc(statbuf.st_size, UM_GFP_KERNEL);
840 if (bpf == NULL) {
841 printk(KERN_ERR "Failed to allocate bpf buffer");
842 goto bpf_failed;
843 }
844 bpf_prog->filter = bpf;
845 res = os_read_file(ffd, bpf, statbuf.st_size);
846 if (res < statbuf.st_size) {
847 printk(KERN_ERR "Failed to read bpf program %s, error %d", filename, res);
848 kfree(bpf);
849 goto bpf_failed;
850 }
851 os_close_file(ffd);
852 return bpf_prog;
853 bpf_failed:
854 if (ffd > 0)
855 os_close_file(ffd);
856 kfree(bpf_prog);
857 return NULL;
858 }
859