]> git.proxmox.com Git - mirror_ubuntu-bionic-kernel.git/blob - drivers/net/tun.c
tun: properly test for IFF_UP
[mirror_ubuntu-bionic-kernel.git] / drivers / net / tun.c
1 /*
2 * TUN - Universal TUN/TAP device driver.
3 * Copyright (C) 1999-2002 Maxim Krasnyansky <maxk@qualcomm.com>
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * $Id: tun.c,v 1.15 2002/03/01 02:44:24 maxk Exp $
16 */
17
18 /*
19 * Changes:
20 *
21 * Mike Kershaw <dragorn@kismetwireless.net> 2005/08/14
22 * Add TUNSETLINK ioctl to set the link encapsulation
23 *
24 * Mark Smith <markzzzsmith@yahoo.com.au>
25 * Use eth_random_addr() for tap MAC address.
26 *
27 * Harald Roelle <harald.roelle@ifi.lmu.de> 2004/04/20
28 * Fixes in packet dropping, queue length setting and queue wakeup.
29 * Increased default tx queue length.
30 * Added ethtool API.
31 * Minor cleanups
32 *
33 * Daniel Podlejski <underley@underley.eu.org>
34 * Modifications for 2.3.99-pre5 kernel.
35 */
36
37 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
38
39 #define DRV_NAME "tun"
40 #define DRV_VERSION "1.6"
41 #define DRV_DESCRIPTION "Universal TUN/TAP device driver"
42 #define DRV_COPYRIGHT "(C) 1999-2004 Max Krasnyansky <maxk@qualcomm.com>"
43
44 #include <linux/module.h>
45 #include <linux/errno.h>
46 #include <linux/kernel.h>
47 #include <linux/sched/signal.h>
48 #include <linux/major.h>
49 #include <linux/slab.h>
50 #include <linux/poll.h>
51 #include <linux/fcntl.h>
52 #include <linux/init.h>
53 #include <linux/skbuff.h>
54 #include <linux/netdevice.h>
55 #include <linux/etherdevice.h>
56 #include <linux/miscdevice.h>
57 #include <linux/ethtool.h>
58 #include <linux/rtnetlink.h>
59 #include <linux/compat.h>
60 #include <linux/if.h>
61 #include <linux/if_arp.h>
62 #include <linux/if_ether.h>
63 #include <linux/if_tun.h>
64 #include <linux/if_vlan.h>
65 #include <linux/crc32.h>
66 #include <linux/nsproxy.h>
67 #include <linux/virtio_net.h>
68 #include <linux/rcupdate.h>
69 #include <net/net_namespace.h>
70 #include <net/netns/generic.h>
71 #include <net/rtnetlink.h>
72 #include <net/sock.h>
73 #include <linux/seq_file.h>
74 #include <linux/uio.h>
75 #include <linux/skb_array.h>
76 #include <linux/bpf.h>
77 #include <linux/bpf_trace.h>
78 #include <linux/mutex.h>
79
80 #include <linux/uaccess.h>
81
82 /* Uncomment to enable debugging */
83 /* #define TUN_DEBUG 1 */
84
85 #ifdef TUN_DEBUG
86 static int debug;
87
88 #define tun_debug(level, tun, fmt, args...) \
89 do { \
90 if (tun->debug) \
91 netdev_printk(level, tun->dev, fmt, ##args); \
92 } while (0)
93 #define DBG1(level, fmt, args...) \
94 do { \
95 if (debug == 2) \
96 printk(level fmt, ##args); \
97 } while (0)
98 #else
99 #define tun_debug(level, tun, fmt, args...) \
100 do { \
101 if (0) \
102 netdev_printk(level, tun->dev, fmt, ##args); \
103 } while (0)
104 #define DBG1(level, fmt, args...) \
105 do { \
106 if (0) \
107 printk(level fmt, ##args); \
108 } while (0)
109 #endif
110
111 #define TUN_HEADROOM 256
112 #define TUN_RX_PAD (NET_IP_ALIGN + NET_SKB_PAD)
113
114 /* TUN device flags */
115
116 /* IFF_ATTACH_QUEUE is never stored in device flags,
117 * overload it to mean fasync when stored there.
118 */
119 #define TUN_FASYNC IFF_ATTACH_QUEUE
120 /* High bits in flags field are unused. */
121 #define TUN_VNET_LE 0x80000000
122 #define TUN_VNET_BE 0x40000000
123
124 #define TUN_FEATURES (IFF_NO_PI | IFF_ONE_QUEUE | IFF_VNET_HDR | \
125 IFF_MULTI_QUEUE | IFF_NAPI | IFF_NAPI_FRAGS)
126
127 #define GOODCOPY_LEN 128
128
129 #define FLT_EXACT_COUNT 8
130 struct tap_filter {
131 unsigned int count; /* Number of addrs. Zero means disabled */
132 u32 mask[2]; /* Mask of the hashed addrs */
133 unsigned char addr[FLT_EXACT_COUNT][ETH_ALEN];
134 };
135
136 /* MAX_TAP_QUEUES 256 is chosen to allow rx/tx queues to be equal
137 * to max number of VCPUs in guest. */
138 #define MAX_TAP_QUEUES 256
139 #define MAX_TAP_FLOWS 4096
140
141 #define TUN_FLOW_EXPIRE (3 * HZ)
142
143 struct tun_pcpu_stats {
144 u64 rx_packets;
145 u64 rx_bytes;
146 u64 tx_packets;
147 u64 tx_bytes;
148 struct u64_stats_sync syncp;
149 u32 rx_dropped;
150 u32 tx_dropped;
151 u32 rx_frame_errors;
152 };
153
154 /* A tun_file connects an open character device to a tuntap netdevice. It
155 * also contains all socket related structures (except sock_fprog and tap_filter)
156 * to serve as one transmit queue for tuntap device. The sock_fprog and
157 * tap_filter were kept in tun_struct since they were used for filtering for the
158 * netdevice not for a specific queue (at least I didn't see the requirement for
159 * this).
160 *
161 * RCU usage:
162 * The tun_file and tun_struct are loosely coupled, the pointer from one to the
163 * other can only be read while rcu_read_lock or rtnl_lock is held.
164 */
165 struct tun_file {
166 struct sock sk;
167 struct socket socket;
168 struct socket_wq wq;
169 struct tun_struct __rcu *tun;
170 struct fasync_struct *fasync;
171 /* only used for fasnyc */
172 unsigned int flags;
173 union {
174 u16 queue_index;
175 unsigned int ifindex;
176 };
177 struct napi_struct napi;
178 bool napi_enabled;
179 bool napi_frags_enabled;
180 struct mutex napi_mutex; /* Protects access to the above napi */
181 struct list_head next;
182 struct tun_struct *detached;
183 struct skb_array tx_array;
184 };
185
186 struct tun_flow_entry {
187 struct hlist_node hash_link;
188 struct rcu_head rcu;
189 struct tun_struct *tun;
190
191 u32 rxhash;
192 u32 rps_rxhash;
193 int queue_index;
194 unsigned long updated;
195 };
196
197 #define TUN_NUM_FLOW_ENTRIES 1024
198
199 /* Since the socket were moved to tun_file, to preserve the behavior of persist
200 * device, socket filter, sndbuf and vnet header size were restore when the
201 * file were attached to a persist device.
202 */
203 struct tun_struct {
204 struct tun_file __rcu *tfiles[MAX_TAP_QUEUES];
205 unsigned int numqueues;
206 unsigned int flags;
207 kuid_t owner;
208 kgid_t group;
209
210 struct net_device *dev;
211 netdev_features_t set_features;
212 #define TUN_USER_FEATURES (NETIF_F_HW_CSUM|NETIF_F_TSO_ECN|NETIF_F_TSO| \
213 NETIF_F_TSO6)
214
215 int align;
216 int vnet_hdr_sz;
217 int sndbuf;
218 struct tap_filter txflt;
219 struct sock_fprog fprog;
220 /* protected by rtnl lock */
221 bool filter_attached;
222 #ifdef TUN_DEBUG
223 int debug;
224 #endif
225 spinlock_t lock;
226 struct hlist_head flows[TUN_NUM_FLOW_ENTRIES];
227 struct timer_list flow_gc_timer;
228 unsigned long ageing_time;
229 unsigned int numdisabled;
230 struct list_head disabled;
231 void *security;
232 u32 flow_count;
233 u32 rx_batched;
234 struct tun_pcpu_stats __percpu *pcpu_stats;
235 struct bpf_prog __rcu *xdp_prog;
236 };
237
238 static int tun_napi_receive(struct napi_struct *napi, int budget)
239 {
240 struct tun_file *tfile = container_of(napi, struct tun_file, napi);
241 struct sk_buff_head *queue = &tfile->sk.sk_write_queue;
242 struct sk_buff_head process_queue;
243 struct sk_buff *skb;
244 int received = 0;
245
246 __skb_queue_head_init(&process_queue);
247
248 spin_lock(&queue->lock);
249 skb_queue_splice_tail_init(queue, &process_queue);
250 spin_unlock(&queue->lock);
251
252 while (received < budget && (skb = __skb_dequeue(&process_queue))) {
253 napi_gro_receive(napi, skb);
254 ++received;
255 }
256
257 if (!skb_queue_empty(&process_queue)) {
258 spin_lock(&queue->lock);
259 skb_queue_splice(&process_queue, queue);
260 spin_unlock(&queue->lock);
261 }
262
263 return received;
264 }
265
266 static int tun_napi_poll(struct napi_struct *napi, int budget)
267 {
268 unsigned int received;
269
270 received = tun_napi_receive(napi, budget);
271
272 if (received < budget)
273 napi_complete_done(napi, received);
274
275 return received;
276 }
277
278 static void tun_napi_init(struct tun_struct *tun, struct tun_file *tfile,
279 bool napi_en, bool napi_frags)
280 {
281 tfile->napi_enabled = napi_en;
282 tfile->napi_frags_enabled = napi_en && napi_frags;
283 if (napi_en) {
284 netif_napi_add(tun->dev, &tfile->napi, tun_napi_poll,
285 NAPI_POLL_WEIGHT);
286 napi_enable(&tfile->napi);
287 }
288 }
289
290 static void tun_napi_disable(struct tun_file *tfile)
291 {
292 if (tfile->napi_enabled)
293 napi_disable(&tfile->napi);
294 }
295
296 static void tun_napi_del(struct tun_file *tfile)
297 {
298 if (tfile->napi_enabled)
299 netif_napi_del(&tfile->napi);
300 }
301
302 static bool tun_napi_frags_enabled(const struct tun_file *tfile)
303 {
304 return tfile->napi_frags_enabled;
305 }
306
307 #ifdef CONFIG_TUN_VNET_CROSS_LE
308 static inline bool tun_legacy_is_little_endian(struct tun_struct *tun)
309 {
310 return tun->flags & TUN_VNET_BE ? false :
311 virtio_legacy_is_little_endian();
312 }
313
314 static long tun_get_vnet_be(struct tun_struct *tun, int __user *argp)
315 {
316 int be = !!(tun->flags & TUN_VNET_BE);
317
318 if (put_user(be, argp))
319 return -EFAULT;
320
321 return 0;
322 }
323
324 static long tun_set_vnet_be(struct tun_struct *tun, int __user *argp)
325 {
326 int be;
327
328 if (get_user(be, argp))
329 return -EFAULT;
330
331 if (be)
332 tun->flags |= TUN_VNET_BE;
333 else
334 tun->flags &= ~TUN_VNET_BE;
335
336 return 0;
337 }
338 #else
339 static inline bool tun_legacy_is_little_endian(struct tun_struct *tun)
340 {
341 return virtio_legacy_is_little_endian();
342 }
343
344 static long tun_get_vnet_be(struct tun_struct *tun, int __user *argp)
345 {
346 return -EINVAL;
347 }
348
349 static long tun_set_vnet_be(struct tun_struct *tun, int __user *argp)
350 {
351 return -EINVAL;
352 }
353 #endif /* CONFIG_TUN_VNET_CROSS_LE */
354
355 static inline bool tun_is_little_endian(struct tun_struct *tun)
356 {
357 return tun->flags & TUN_VNET_LE ||
358 tun_legacy_is_little_endian(tun);
359 }
360
361 static inline u16 tun16_to_cpu(struct tun_struct *tun, __virtio16 val)
362 {
363 return __virtio16_to_cpu(tun_is_little_endian(tun), val);
364 }
365
366 static inline __virtio16 cpu_to_tun16(struct tun_struct *tun, u16 val)
367 {
368 return __cpu_to_virtio16(tun_is_little_endian(tun), val);
369 }
370
371 static inline u32 tun_hashfn(u32 rxhash)
372 {
373 return rxhash & 0x3ff;
374 }
375
376 static struct tun_flow_entry *tun_flow_find(struct hlist_head *head, u32 rxhash)
377 {
378 struct tun_flow_entry *e;
379
380 hlist_for_each_entry_rcu(e, head, hash_link) {
381 if (e->rxhash == rxhash)
382 return e;
383 }
384 return NULL;
385 }
386
387 static struct tun_flow_entry *tun_flow_create(struct tun_struct *tun,
388 struct hlist_head *head,
389 u32 rxhash, u16 queue_index)
390 {
391 struct tun_flow_entry *e = kmalloc(sizeof(*e), GFP_ATOMIC);
392
393 if (e) {
394 tun_debug(KERN_INFO, tun, "create flow: hash %u index %u\n",
395 rxhash, queue_index);
396 e->updated = jiffies;
397 e->rxhash = rxhash;
398 e->rps_rxhash = 0;
399 e->queue_index = queue_index;
400 e->tun = tun;
401 hlist_add_head_rcu(&e->hash_link, head);
402 ++tun->flow_count;
403 }
404 return e;
405 }
406
407 static void tun_flow_delete(struct tun_struct *tun, struct tun_flow_entry *e)
408 {
409 tun_debug(KERN_INFO, tun, "delete flow: hash %u index %u\n",
410 e->rxhash, e->queue_index);
411 hlist_del_rcu(&e->hash_link);
412 kfree_rcu(e, rcu);
413 --tun->flow_count;
414 }
415
416 static void tun_flow_flush(struct tun_struct *tun)
417 {
418 int i;
419
420 spin_lock_bh(&tun->lock);
421 for (i = 0; i < TUN_NUM_FLOW_ENTRIES; i++) {
422 struct tun_flow_entry *e;
423 struct hlist_node *n;
424
425 hlist_for_each_entry_safe(e, n, &tun->flows[i], hash_link)
426 tun_flow_delete(tun, e);
427 }
428 spin_unlock_bh(&tun->lock);
429 }
430
431 static void tun_flow_delete_by_queue(struct tun_struct *tun, u16 queue_index)
432 {
433 int i;
434
435 spin_lock_bh(&tun->lock);
436 for (i = 0; i < TUN_NUM_FLOW_ENTRIES; i++) {
437 struct tun_flow_entry *e;
438 struct hlist_node *n;
439
440 hlist_for_each_entry_safe(e, n, &tun->flows[i], hash_link) {
441 if (e->queue_index == queue_index)
442 tun_flow_delete(tun, e);
443 }
444 }
445 spin_unlock_bh(&tun->lock);
446 }
447
448 static void tun_flow_cleanup(struct timer_list *t)
449 {
450 struct tun_struct *tun = from_timer(tun, t, flow_gc_timer);
451 unsigned long delay = tun->ageing_time;
452 unsigned long next_timer = jiffies + delay;
453 unsigned long count = 0;
454 int i;
455
456 tun_debug(KERN_INFO, tun, "tun_flow_cleanup\n");
457
458 spin_lock(&tun->lock);
459 for (i = 0; i < TUN_NUM_FLOW_ENTRIES; i++) {
460 struct tun_flow_entry *e;
461 struct hlist_node *n;
462
463 hlist_for_each_entry_safe(e, n, &tun->flows[i], hash_link) {
464 unsigned long this_timer;
465
466 this_timer = e->updated + delay;
467 if (time_before_eq(this_timer, jiffies)) {
468 tun_flow_delete(tun, e);
469 continue;
470 }
471 count++;
472 if (time_before(this_timer, next_timer))
473 next_timer = this_timer;
474 }
475 }
476
477 if (count)
478 mod_timer(&tun->flow_gc_timer, round_jiffies_up(next_timer));
479 spin_unlock(&tun->lock);
480 }
481
482 static void tun_flow_update(struct tun_struct *tun, u32 rxhash,
483 struct tun_file *tfile)
484 {
485 struct hlist_head *head;
486 struct tun_flow_entry *e;
487 unsigned long delay = tun->ageing_time;
488 u16 queue_index = tfile->queue_index;
489
490 if (!rxhash)
491 return;
492 else
493 head = &tun->flows[tun_hashfn(rxhash)];
494
495 rcu_read_lock();
496
497 /* We may get a very small possibility of OOO during switching, not
498 * worth to optimize.*/
499 if (tun->numqueues == 1 || tfile->detached)
500 goto unlock;
501
502 e = tun_flow_find(head, rxhash);
503 if (likely(e)) {
504 /* TODO: keep queueing to old queue until it's empty? */
505 e->queue_index = queue_index;
506 e->updated = jiffies;
507 sock_rps_record_flow_hash(e->rps_rxhash);
508 } else {
509 spin_lock_bh(&tun->lock);
510 if (!tun_flow_find(head, rxhash) &&
511 tun->flow_count < MAX_TAP_FLOWS)
512 tun_flow_create(tun, head, rxhash, queue_index);
513
514 if (!timer_pending(&tun->flow_gc_timer))
515 mod_timer(&tun->flow_gc_timer,
516 round_jiffies_up(jiffies + delay));
517 spin_unlock_bh(&tun->lock);
518 }
519
520 unlock:
521 rcu_read_unlock();
522 }
523
524 /**
525 * Save the hash received in the stack receive path and update the
526 * flow_hash table accordingly.
527 */
528 static inline void tun_flow_save_rps_rxhash(struct tun_flow_entry *e, u32 hash)
529 {
530 if (unlikely(e->rps_rxhash != hash))
531 e->rps_rxhash = hash;
532 }
533
534 /* We try to identify a flow through its rxhash first. The reason that
535 * we do not check rxq no. is because some cards(e.g 82599), chooses
536 * the rxq based on the txq where the last packet of the flow comes. As
537 * the userspace application move between processors, we may get a
538 * different rxq no. here. If we could not get rxhash, then we would
539 * hope the rxq no. may help here.
540 */
541 static u16 tun_select_queue(struct net_device *dev, struct sk_buff *skb,
542 void *accel_priv, select_queue_fallback_t fallback)
543 {
544 struct tun_struct *tun = netdev_priv(dev);
545 struct tun_flow_entry *e;
546 u32 txq = 0;
547 u32 numqueues = 0;
548
549 rcu_read_lock();
550 numqueues = READ_ONCE(tun->numqueues);
551
552 txq = __skb_get_hash_symmetric(skb);
553 if (txq) {
554 e = tun_flow_find(&tun->flows[tun_hashfn(txq)], txq);
555 if (e) {
556 tun_flow_save_rps_rxhash(e, txq);
557 txq = e->queue_index;
558 } else
559 /* use multiply and shift instead of expensive divide */
560 txq = ((u64)txq * numqueues) >> 32;
561 } else if (likely(skb_rx_queue_recorded(skb))) {
562 txq = skb_get_rx_queue(skb);
563 while (unlikely(txq >= numqueues))
564 txq -= numqueues;
565 }
566
567 rcu_read_unlock();
568 return txq;
569 }
570
571 static inline bool tun_not_capable(struct tun_struct *tun)
572 {
573 const struct cred *cred = current_cred();
574 struct net *net = dev_net(tun->dev);
575
576 return ((uid_valid(tun->owner) && !uid_eq(cred->euid, tun->owner)) ||
577 (gid_valid(tun->group) && !in_egroup_p(tun->group))) &&
578 !ns_capable(net->user_ns, CAP_NET_ADMIN);
579 }
580
581 static void tun_set_real_num_queues(struct tun_struct *tun)
582 {
583 netif_set_real_num_tx_queues(tun->dev, tun->numqueues);
584 netif_set_real_num_rx_queues(tun->dev, tun->numqueues);
585 }
586
587 static void tun_disable_queue(struct tun_struct *tun, struct tun_file *tfile)
588 {
589 tfile->detached = tun;
590 list_add_tail(&tfile->next, &tun->disabled);
591 ++tun->numdisabled;
592 }
593
594 static struct tun_struct *tun_enable_queue(struct tun_file *tfile)
595 {
596 struct tun_struct *tun = tfile->detached;
597
598 tfile->detached = NULL;
599 list_del_init(&tfile->next);
600 --tun->numdisabled;
601 return tun;
602 }
603
604 static void tun_queue_purge(struct tun_file *tfile)
605 {
606 struct sk_buff *skb;
607
608 while ((skb = skb_array_consume(&tfile->tx_array)) != NULL)
609 kfree_skb(skb);
610
611 skb_queue_purge(&tfile->sk.sk_write_queue);
612 skb_queue_purge(&tfile->sk.sk_error_queue);
613 }
614
615 static void __tun_detach(struct tun_file *tfile, bool clean)
616 {
617 struct tun_file *ntfile;
618 struct tun_struct *tun;
619
620 tun = rtnl_dereference(tfile->tun);
621
622 if (tun && clean) {
623 tun_napi_disable(tfile);
624 tun_napi_del(tfile);
625 }
626
627 if (tun && !tfile->detached) {
628 u16 index = tfile->queue_index;
629 BUG_ON(index >= tun->numqueues);
630
631 rcu_assign_pointer(tun->tfiles[index],
632 tun->tfiles[tun->numqueues - 1]);
633 ntfile = rtnl_dereference(tun->tfiles[index]);
634 ntfile->queue_index = index;
635
636 --tun->numqueues;
637 if (clean) {
638 RCU_INIT_POINTER(tfile->tun, NULL);
639 sock_put(&tfile->sk);
640 } else
641 tun_disable_queue(tun, tfile);
642
643 synchronize_net();
644 tun_flow_delete_by_queue(tun, tun->numqueues + 1);
645 /* Drop read queue */
646 tun_queue_purge(tfile);
647 tun_set_real_num_queues(tun);
648 } else if (tfile->detached && clean) {
649 tun = tun_enable_queue(tfile);
650 sock_put(&tfile->sk);
651 }
652
653 if (clean) {
654 if (tun && tun->numqueues == 0 && tun->numdisabled == 0) {
655 netif_carrier_off(tun->dev);
656
657 if (!(tun->flags & IFF_PERSIST) &&
658 tun->dev->reg_state == NETREG_REGISTERED)
659 unregister_netdevice(tun->dev);
660 }
661 skb_array_cleanup(&tfile->tx_array);
662 sock_put(&tfile->sk);
663 }
664 }
665
666 static void tun_detach(struct tun_file *tfile, bool clean)
667 {
668 rtnl_lock();
669 __tun_detach(tfile, clean);
670 rtnl_unlock();
671 }
672
673 static void tun_detach_all(struct net_device *dev)
674 {
675 struct tun_struct *tun = netdev_priv(dev);
676 struct bpf_prog *xdp_prog = rtnl_dereference(tun->xdp_prog);
677 struct tun_file *tfile, *tmp;
678 int i, n = tun->numqueues;
679
680 for (i = 0; i < n; i++) {
681 tfile = rtnl_dereference(tun->tfiles[i]);
682 BUG_ON(!tfile);
683 tun_napi_disable(tfile);
684 tfile->socket.sk->sk_shutdown = RCV_SHUTDOWN;
685 tfile->socket.sk->sk_data_ready(tfile->socket.sk);
686 RCU_INIT_POINTER(tfile->tun, NULL);
687 --tun->numqueues;
688 }
689 list_for_each_entry(tfile, &tun->disabled, next) {
690 tfile->socket.sk->sk_shutdown = RCV_SHUTDOWN;
691 tfile->socket.sk->sk_data_ready(tfile->socket.sk);
692 RCU_INIT_POINTER(tfile->tun, NULL);
693 }
694 BUG_ON(tun->numqueues != 0);
695
696 synchronize_net();
697 for (i = 0; i < n; i++) {
698 tfile = rtnl_dereference(tun->tfiles[i]);
699 tun_napi_del(tfile);
700 /* Drop read queue */
701 tun_queue_purge(tfile);
702 sock_put(&tfile->sk);
703 }
704 list_for_each_entry_safe(tfile, tmp, &tun->disabled, next) {
705 tun_enable_queue(tfile);
706 tun_queue_purge(tfile);
707 sock_put(&tfile->sk);
708 }
709 BUG_ON(tun->numdisabled != 0);
710
711 if (xdp_prog)
712 bpf_prog_put(xdp_prog);
713
714 if (tun->flags & IFF_PERSIST)
715 module_put(THIS_MODULE);
716 }
717
718 static int tun_attach(struct tun_struct *tun, struct file *file,
719 bool skip_filter, bool napi, bool napi_frags)
720 {
721 struct tun_file *tfile = file->private_data;
722 struct net_device *dev = tun->dev;
723 int err;
724
725 err = security_tun_dev_attach(tfile->socket.sk, tun->security);
726 if (err < 0)
727 goto out;
728
729 err = -EINVAL;
730 if (rtnl_dereference(tfile->tun) && !tfile->detached)
731 goto out;
732
733 err = -EBUSY;
734 if (!(tun->flags & IFF_MULTI_QUEUE) && tun->numqueues == 1)
735 goto out;
736
737 err = -E2BIG;
738 if (!tfile->detached &&
739 tun->numqueues + tun->numdisabled == MAX_TAP_QUEUES)
740 goto out;
741
742 err = 0;
743
744 /* Re-attach the filter to persist device */
745 if (!skip_filter && (tun->filter_attached == true)) {
746 lock_sock(tfile->socket.sk);
747 err = sk_attach_filter(&tun->fprog, tfile->socket.sk);
748 release_sock(tfile->socket.sk);
749 if (!err)
750 goto out;
751 }
752
753 if (!tfile->detached &&
754 skb_array_resize(&tfile->tx_array, dev->tx_queue_len, GFP_KERNEL)) {
755 err = -ENOMEM;
756 goto out;
757 }
758
759 tfile->queue_index = tun->numqueues;
760 tfile->socket.sk->sk_shutdown &= ~RCV_SHUTDOWN;
761 if (tfile->detached) {
762 tun_enable_queue(tfile);
763 } else {
764 sock_hold(&tfile->sk);
765 tun_napi_init(tun, tfile, napi, napi_frags);
766 }
767
768 /* device is allowed to go away first, so no need to hold extra
769 * refcnt.
770 */
771
772 /* Publish tfile->tun and tun->tfiles only after we've fully
773 * initialized tfile; otherwise we risk using half-initialized
774 * object.
775 */
776 rcu_assign_pointer(tfile->tun, tun);
777 rcu_assign_pointer(tun->tfiles[tun->numqueues], tfile);
778 tun->numqueues++;
779 tun_set_real_num_queues(tun);
780 out:
781 return err;
782 }
783
784 static struct tun_struct *tun_get(struct tun_file *tfile)
785 {
786 struct tun_struct *tun;
787
788 rcu_read_lock();
789 tun = rcu_dereference(tfile->tun);
790 if (tun)
791 dev_hold(tun->dev);
792 rcu_read_unlock();
793
794 return tun;
795 }
796
797 static void tun_put(struct tun_struct *tun)
798 {
799 dev_put(tun->dev);
800 }
801
802 /* TAP filtering */
803 static void addr_hash_set(u32 *mask, const u8 *addr)
804 {
805 int n = ether_crc(ETH_ALEN, addr) >> 26;
806 mask[n >> 5] |= (1 << (n & 31));
807 }
808
809 static unsigned int addr_hash_test(const u32 *mask, const u8 *addr)
810 {
811 int n = ether_crc(ETH_ALEN, addr) >> 26;
812 return mask[n >> 5] & (1 << (n & 31));
813 }
814
815 static int update_filter(struct tap_filter *filter, void __user *arg)
816 {
817 struct { u8 u[ETH_ALEN]; } *addr;
818 struct tun_filter uf;
819 int err, alen, n, nexact;
820
821 if (copy_from_user(&uf, arg, sizeof(uf)))
822 return -EFAULT;
823
824 if (!uf.count) {
825 /* Disabled */
826 filter->count = 0;
827 return 0;
828 }
829
830 alen = ETH_ALEN * uf.count;
831 addr = memdup_user(arg + sizeof(uf), alen);
832 if (IS_ERR(addr))
833 return PTR_ERR(addr);
834
835 /* The filter is updated without holding any locks. Which is
836 * perfectly safe. We disable it first and in the worst
837 * case we'll accept a few undesired packets. */
838 filter->count = 0;
839 wmb();
840
841 /* Use first set of addresses as an exact filter */
842 for (n = 0; n < uf.count && n < FLT_EXACT_COUNT; n++)
843 memcpy(filter->addr[n], addr[n].u, ETH_ALEN);
844
845 nexact = n;
846
847 /* Remaining multicast addresses are hashed,
848 * unicast will leave the filter disabled. */
849 memset(filter->mask, 0, sizeof(filter->mask));
850 for (; n < uf.count; n++) {
851 if (!is_multicast_ether_addr(addr[n].u)) {
852 err = 0; /* no filter */
853 goto free_addr;
854 }
855 addr_hash_set(filter->mask, addr[n].u);
856 }
857
858 /* For ALLMULTI just set the mask to all ones.
859 * This overrides the mask populated above. */
860 if ((uf.flags & TUN_FLT_ALLMULTI))
861 memset(filter->mask, ~0, sizeof(filter->mask));
862
863 /* Now enable the filter */
864 wmb();
865 filter->count = nexact;
866
867 /* Return the number of exact filters */
868 err = nexact;
869 free_addr:
870 kfree(addr);
871 return err;
872 }
873
874 /* Returns: 0 - drop, !=0 - accept */
875 static int run_filter(struct tap_filter *filter, const struct sk_buff *skb)
876 {
877 /* Cannot use eth_hdr(skb) here because skb_mac_hdr() is incorrect
878 * at this point. */
879 struct ethhdr *eh = (struct ethhdr *) skb->data;
880 int i;
881
882 /* Exact match */
883 for (i = 0; i < filter->count; i++)
884 if (ether_addr_equal(eh->h_dest, filter->addr[i]))
885 return 1;
886
887 /* Inexact match (multicast only) */
888 if (is_multicast_ether_addr(eh->h_dest))
889 return addr_hash_test(filter->mask, eh->h_dest);
890
891 return 0;
892 }
893
894 /*
895 * Checks whether the packet is accepted or not.
896 * Returns: 0 - drop, !=0 - accept
897 */
898 static int check_filter(struct tap_filter *filter, const struct sk_buff *skb)
899 {
900 if (!filter->count)
901 return 1;
902
903 return run_filter(filter, skb);
904 }
905
906 /* Network device part of the driver */
907
908 static const struct ethtool_ops tun_ethtool_ops;
909
910 /* Net device detach from fd. */
911 static void tun_net_uninit(struct net_device *dev)
912 {
913 tun_detach_all(dev);
914 }
915
916 /* Net device open. */
917 static int tun_net_open(struct net_device *dev)
918 {
919 struct tun_struct *tun = netdev_priv(dev);
920 int i;
921
922 netif_tx_start_all_queues(dev);
923
924 for (i = 0; i < tun->numqueues; i++) {
925 struct tun_file *tfile;
926
927 tfile = rtnl_dereference(tun->tfiles[i]);
928 tfile->socket.sk->sk_write_space(tfile->socket.sk);
929 }
930
931 return 0;
932 }
933
934 /* Net device close. */
935 static int tun_net_close(struct net_device *dev)
936 {
937 netif_tx_stop_all_queues(dev);
938 return 0;
939 }
940
941 /* Net device start xmit */
942 static netdev_tx_t tun_net_xmit(struct sk_buff *skb, struct net_device *dev)
943 {
944 struct tun_struct *tun = netdev_priv(dev);
945 int txq = skb->queue_mapping;
946 struct tun_file *tfile;
947 u32 numqueues = 0;
948
949 rcu_read_lock();
950 tfile = rcu_dereference(tun->tfiles[txq]);
951 numqueues = READ_ONCE(tun->numqueues);
952
953 /* Drop packet if interface is not attached */
954 if (txq >= numqueues)
955 goto drop;
956
957 #ifdef CONFIG_RPS
958 if (numqueues == 1 && static_key_false(&rps_needed)) {
959 /* Select queue was not called for the skbuff, so we extract the
960 * RPS hash and save it into the flow_table here.
961 */
962 __u32 rxhash;
963
964 rxhash = __skb_get_hash_symmetric(skb);
965 if (rxhash) {
966 struct tun_flow_entry *e;
967 e = tun_flow_find(&tun->flows[tun_hashfn(rxhash)],
968 rxhash);
969 if (e)
970 tun_flow_save_rps_rxhash(e, rxhash);
971 }
972 }
973 #endif
974
975 tun_debug(KERN_INFO, tun, "tun_net_xmit %d\n", skb->len);
976
977 BUG_ON(!tfile);
978
979 /* Drop if the filter does not like it.
980 * This is a noop if the filter is disabled.
981 * Filter can be enabled only for the TAP devices. */
982 if (!check_filter(&tun->txflt, skb))
983 goto drop;
984
985 if (tfile->socket.sk->sk_filter &&
986 sk_filter(tfile->socket.sk, skb))
987 goto drop;
988
989 if (unlikely(skb_orphan_frags_rx(skb, GFP_ATOMIC)))
990 goto drop;
991
992 skb_tx_timestamp(skb);
993
994 /* Orphan the skb - required as we might hang on to it
995 * for indefinite time.
996 */
997 skb_orphan(skb);
998
999 nf_reset(skb);
1000
1001 if (skb_array_produce(&tfile->tx_array, skb))
1002 goto drop;
1003
1004 /* Notify and wake up reader process */
1005 if (tfile->flags & TUN_FASYNC)
1006 kill_fasync(&tfile->fasync, SIGIO, POLL_IN);
1007 tfile->socket.sk->sk_data_ready(tfile->socket.sk);
1008
1009 rcu_read_unlock();
1010 return NETDEV_TX_OK;
1011
1012 drop:
1013 this_cpu_inc(tun->pcpu_stats->tx_dropped);
1014 skb_tx_error(skb);
1015 kfree_skb(skb);
1016 rcu_read_unlock();
1017 return NET_XMIT_DROP;
1018 }
1019
1020 static void tun_net_mclist(struct net_device *dev)
1021 {
1022 /*
1023 * This callback is supposed to deal with mc filter in
1024 * _rx_ path and has nothing to do with the _tx_ path.
1025 * In rx path we always accept everything userspace gives us.
1026 */
1027 }
1028
1029 static netdev_features_t tun_net_fix_features(struct net_device *dev,
1030 netdev_features_t features)
1031 {
1032 struct tun_struct *tun = netdev_priv(dev);
1033
1034 return (features & tun->set_features) | (features & ~TUN_USER_FEATURES);
1035 }
1036 #ifdef CONFIG_NET_POLL_CONTROLLER
1037 static void tun_poll_controller(struct net_device *dev)
1038 {
1039 /*
1040 * Tun only receives frames when:
1041 * 1) the char device endpoint gets data from user space
1042 * 2) the tun socket gets a sendmsg call from user space
1043 * If NAPI is not enabled, since both of those are synchronous
1044 * operations, we are guaranteed never to have pending data when we poll
1045 * for it so there is nothing to do here but return.
1046 * We need this though so netpoll recognizes us as an interface that
1047 * supports polling, which enables bridge devices in virt setups to
1048 * still use netconsole
1049 * If NAPI is enabled, however, we need to schedule polling for all
1050 * queues unless we are using napi_gro_frags(), which we call in
1051 * process context and not in NAPI context.
1052 */
1053 struct tun_struct *tun = netdev_priv(dev);
1054
1055 if (tun->flags & IFF_NAPI) {
1056 struct tun_file *tfile;
1057 int i;
1058
1059 rcu_read_lock();
1060 for (i = 0; i < tun->numqueues; i++) {
1061 tfile = rcu_dereference(tun->tfiles[i]);
1062 if (!tun_napi_frags_enabled(tfile) &&
1063 tfile->napi_enabled)
1064 napi_schedule(&tfile->napi);
1065 }
1066 rcu_read_unlock();
1067 }
1068 return;
1069 }
1070 #endif
1071
1072 static void tun_set_headroom(struct net_device *dev, int new_hr)
1073 {
1074 struct tun_struct *tun = netdev_priv(dev);
1075
1076 if (new_hr < NET_SKB_PAD)
1077 new_hr = NET_SKB_PAD;
1078
1079 tun->align = new_hr;
1080 }
1081
1082 static void
1083 tun_net_get_stats64(struct net_device *dev, struct rtnl_link_stats64 *stats)
1084 {
1085 u32 rx_dropped = 0, tx_dropped = 0, rx_frame_errors = 0;
1086 struct tun_struct *tun = netdev_priv(dev);
1087 struct tun_pcpu_stats *p;
1088 int i;
1089
1090 for_each_possible_cpu(i) {
1091 u64 rxpackets, rxbytes, txpackets, txbytes;
1092 unsigned int start;
1093
1094 p = per_cpu_ptr(tun->pcpu_stats, i);
1095 do {
1096 start = u64_stats_fetch_begin(&p->syncp);
1097 rxpackets = p->rx_packets;
1098 rxbytes = p->rx_bytes;
1099 txpackets = p->tx_packets;
1100 txbytes = p->tx_bytes;
1101 } while (u64_stats_fetch_retry(&p->syncp, start));
1102
1103 stats->rx_packets += rxpackets;
1104 stats->rx_bytes += rxbytes;
1105 stats->tx_packets += txpackets;
1106 stats->tx_bytes += txbytes;
1107
1108 /* u32 counters */
1109 rx_dropped += p->rx_dropped;
1110 rx_frame_errors += p->rx_frame_errors;
1111 tx_dropped += p->tx_dropped;
1112 }
1113 stats->rx_dropped = rx_dropped;
1114 stats->rx_frame_errors = rx_frame_errors;
1115 stats->tx_dropped = tx_dropped;
1116 }
1117
1118 static int tun_xdp_set(struct net_device *dev, struct bpf_prog *prog,
1119 struct netlink_ext_ack *extack)
1120 {
1121 struct tun_struct *tun = netdev_priv(dev);
1122 struct bpf_prog *old_prog;
1123
1124 old_prog = rtnl_dereference(tun->xdp_prog);
1125 rcu_assign_pointer(tun->xdp_prog, prog);
1126 if (old_prog)
1127 bpf_prog_put(old_prog);
1128
1129 return 0;
1130 }
1131
1132 static u32 tun_xdp_query(struct net_device *dev)
1133 {
1134 struct tun_struct *tun = netdev_priv(dev);
1135 const struct bpf_prog *xdp_prog;
1136
1137 xdp_prog = rtnl_dereference(tun->xdp_prog);
1138 if (xdp_prog)
1139 return xdp_prog->aux->id;
1140
1141 return 0;
1142 }
1143
1144 static int tun_xdp(struct net_device *dev, struct netdev_bpf *xdp)
1145 {
1146 switch (xdp->command) {
1147 case XDP_SETUP_PROG:
1148 return tun_xdp_set(dev, xdp->prog, xdp->extack);
1149 case XDP_QUERY_PROG:
1150 xdp->prog_id = tun_xdp_query(dev);
1151 xdp->prog_attached = !!xdp->prog_id;
1152 return 0;
1153 default:
1154 return -EINVAL;
1155 }
1156 }
1157
1158 static int tun_net_change_carrier(struct net_device *dev, bool new_carrier)
1159 {
1160 if (new_carrier) {
1161 struct tun_struct *tun = netdev_priv(dev);
1162
1163 if (!tun->numqueues)
1164 return -EPERM;
1165
1166 netif_carrier_on(dev);
1167 } else {
1168 netif_carrier_off(dev);
1169 }
1170 return 0;
1171 }
1172
1173 static const struct net_device_ops tun_netdev_ops = {
1174 .ndo_uninit = tun_net_uninit,
1175 .ndo_open = tun_net_open,
1176 .ndo_stop = tun_net_close,
1177 .ndo_start_xmit = tun_net_xmit,
1178 .ndo_fix_features = tun_net_fix_features,
1179 .ndo_select_queue = tun_select_queue,
1180 #ifdef CONFIG_NET_POLL_CONTROLLER
1181 .ndo_poll_controller = tun_poll_controller,
1182 #endif
1183 .ndo_set_rx_headroom = tun_set_headroom,
1184 .ndo_get_stats64 = tun_net_get_stats64,
1185 .ndo_change_carrier = tun_net_change_carrier,
1186 };
1187
1188 static const struct net_device_ops tap_netdev_ops = {
1189 .ndo_uninit = tun_net_uninit,
1190 .ndo_open = tun_net_open,
1191 .ndo_stop = tun_net_close,
1192 .ndo_start_xmit = tun_net_xmit,
1193 .ndo_fix_features = tun_net_fix_features,
1194 .ndo_set_rx_mode = tun_net_mclist,
1195 .ndo_set_mac_address = eth_mac_addr,
1196 .ndo_validate_addr = eth_validate_addr,
1197 .ndo_select_queue = tun_select_queue,
1198 #ifdef CONFIG_NET_POLL_CONTROLLER
1199 .ndo_poll_controller = tun_poll_controller,
1200 #endif
1201 .ndo_features_check = passthru_features_check,
1202 .ndo_set_rx_headroom = tun_set_headroom,
1203 .ndo_get_stats64 = tun_net_get_stats64,
1204 .ndo_bpf = tun_xdp,
1205 .ndo_change_carrier = tun_net_change_carrier,
1206 };
1207
1208 static void tun_flow_init(struct tun_struct *tun)
1209 {
1210 int i;
1211
1212 for (i = 0; i < TUN_NUM_FLOW_ENTRIES; i++)
1213 INIT_HLIST_HEAD(&tun->flows[i]);
1214
1215 tun->ageing_time = TUN_FLOW_EXPIRE;
1216 timer_setup(&tun->flow_gc_timer, tun_flow_cleanup, 0);
1217 mod_timer(&tun->flow_gc_timer,
1218 round_jiffies_up(jiffies + tun->ageing_time));
1219 }
1220
1221 static void tun_flow_uninit(struct tun_struct *tun)
1222 {
1223 del_timer_sync(&tun->flow_gc_timer);
1224 tun_flow_flush(tun);
1225 }
1226
1227 #define MIN_MTU 68
1228 #define MAX_MTU 65535
1229
1230 /* Initialize net device. */
1231 static void tun_net_init(struct net_device *dev)
1232 {
1233 struct tun_struct *tun = netdev_priv(dev);
1234
1235 switch (tun->flags & TUN_TYPE_MASK) {
1236 case IFF_TUN:
1237 dev->netdev_ops = &tun_netdev_ops;
1238
1239 /* Point-to-Point TUN Device */
1240 dev->hard_header_len = 0;
1241 dev->addr_len = 0;
1242 dev->mtu = 1500;
1243
1244 /* Zero header length */
1245 dev->type = ARPHRD_NONE;
1246 dev->flags = IFF_POINTOPOINT | IFF_NOARP | IFF_MULTICAST;
1247 break;
1248
1249 case IFF_TAP:
1250 dev->netdev_ops = &tap_netdev_ops;
1251 /* Ethernet TAP Device */
1252 ether_setup(dev);
1253 dev->priv_flags &= ~IFF_TX_SKB_SHARING;
1254 dev->priv_flags |= IFF_LIVE_ADDR_CHANGE;
1255
1256 eth_hw_addr_random(dev);
1257
1258 break;
1259 }
1260
1261 dev->min_mtu = MIN_MTU;
1262 dev->max_mtu = MAX_MTU - dev->hard_header_len;
1263 }
1264
1265 /* Character device part */
1266
1267 /* Poll */
1268 static unsigned int tun_chr_poll(struct file *file, poll_table *wait)
1269 {
1270 struct tun_file *tfile = file->private_data;
1271 struct tun_struct *tun = tun_get(tfile);
1272 struct sock *sk;
1273 unsigned int mask = 0;
1274
1275 if (!tun)
1276 return POLLERR;
1277
1278 sk = tfile->socket.sk;
1279
1280 tun_debug(KERN_INFO, tun, "tun_chr_poll\n");
1281
1282 poll_wait(file, sk_sleep(sk), wait);
1283
1284 if (!skb_array_empty(&tfile->tx_array))
1285 mask |= POLLIN | POLLRDNORM;
1286
1287 if (tun->dev->flags & IFF_UP &&
1288 (sock_writeable(sk) ||
1289 (!test_and_set_bit(SOCKWQ_ASYNC_NOSPACE, &sk->sk_socket->flags) &&
1290 sock_writeable(sk))))
1291 mask |= POLLOUT | POLLWRNORM;
1292
1293 if (tun->dev->reg_state != NETREG_REGISTERED)
1294 mask = POLLERR;
1295
1296 tun_put(tun);
1297 return mask;
1298 }
1299
1300 static struct sk_buff *tun_napi_alloc_frags(struct tun_file *tfile,
1301 size_t len,
1302 const struct iov_iter *it)
1303 {
1304 struct sk_buff *skb;
1305 size_t linear;
1306 int err;
1307 int i;
1308
1309 if (it->nr_segs > MAX_SKB_FRAGS + 1)
1310 return ERR_PTR(-ENOMEM);
1311
1312 local_bh_disable();
1313 skb = napi_get_frags(&tfile->napi);
1314 local_bh_enable();
1315 if (!skb)
1316 return ERR_PTR(-ENOMEM);
1317
1318 linear = iov_iter_single_seg_count(it);
1319 err = __skb_grow(skb, linear);
1320 if (err)
1321 goto free;
1322
1323 skb->len = len;
1324 skb->data_len = len - linear;
1325 skb->truesize += skb->data_len;
1326
1327 for (i = 1; i < it->nr_segs; i++) {
1328 struct page_frag *pfrag = &current->task_frag;
1329 size_t fragsz = it->iov[i].iov_len;
1330
1331 if (fragsz == 0 || fragsz > PAGE_SIZE) {
1332 err = -EINVAL;
1333 goto free;
1334 }
1335
1336 if (!skb_page_frag_refill(fragsz, pfrag, GFP_KERNEL)) {
1337 err = -ENOMEM;
1338 goto free;
1339 }
1340
1341 skb_fill_page_desc(skb, i - 1, pfrag->page,
1342 pfrag->offset, fragsz);
1343 page_ref_inc(pfrag->page);
1344 pfrag->offset += fragsz;
1345 }
1346
1347 return skb;
1348 free:
1349 /* frees skb and all frags allocated with napi_alloc_frag() */
1350 napi_free_frags(&tfile->napi);
1351 return ERR_PTR(err);
1352 }
1353
1354 /* prepad is the amount to reserve at front. len is length after that.
1355 * linear is a hint as to how much to copy (usually headers). */
1356 static struct sk_buff *tun_alloc_skb(struct tun_file *tfile,
1357 size_t prepad, size_t len,
1358 size_t linear, int noblock)
1359 {
1360 struct sock *sk = tfile->socket.sk;
1361 struct sk_buff *skb;
1362 int err;
1363
1364 /* Under a page? Don't bother with paged skb. */
1365 if (prepad + len < PAGE_SIZE || !linear)
1366 linear = len;
1367
1368 skb = sock_alloc_send_pskb(sk, prepad + linear, len - linear, noblock,
1369 &err, 0);
1370 if (!skb)
1371 return ERR_PTR(err);
1372
1373 skb_reserve(skb, prepad);
1374 skb_put(skb, linear);
1375 skb->data_len = len - linear;
1376 skb->len += len - linear;
1377
1378 return skb;
1379 }
1380
1381 static void tun_rx_batched(struct tun_struct *tun, struct tun_file *tfile,
1382 struct sk_buff *skb, int more)
1383 {
1384 struct sk_buff_head *queue = &tfile->sk.sk_write_queue;
1385 struct sk_buff_head process_queue;
1386 u32 rx_batched = tun->rx_batched;
1387 bool rcv = false;
1388
1389 if (!rx_batched || (!more && skb_queue_empty(queue))) {
1390 local_bh_disable();
1391 skb_record_rx_queue(skb, tfile->queue_index);
1392 netif_receive_skb(skb);
1393 local_bh_enable();
1394 return;
1395 }
1396
1397 spin_lock(&queue->lock);
1398 if (!more || skb_queue_len(queue) == rx_batched) {
1399 __skb_queue_head_init(&process_queue);
1400 skb_queue_splice_tail_init(queue, &process_queue);
1401 rcv = true;
1402 } else {
1403 __skb_queue_tail(queue, skb);
1404 }
1405 spin_unlock(&queue->lock);
1406
1407 if (rcv) {
1408 struct sk_buff *nskb;
1409
1410 local_bh_disable();
1411 while ((nskb = __skb_dequeue(&process_queue))) {
1412 skb_record_rx_queue(nskb, tfile->queue_index);
1413 netif_receive_skb(nskb);
1414 }
1415 skb_record_rx_queue(skb, tfile->queue_index);
1416 netif_receive_skb(skb);
1417 local_bh_enable();
1418 }
1419 }
1420
1421 static bool tun_can_build_skb(struct tun_struct *tun, struct tun_file *tfile,
1422 int len, int noblock, bool zerocopy)
1423 {
1424 if ((tun->flags & TUN_TYPE_MASK) != IFF_TAP)
1425 return false;
1426
1427 if (tfile->socket.sk->sk_sndbuf != INT_MAX)
1428 return false;
1429
1430 if (!noblock)
1431 return false;
1432
1433 if (zerocopy)
1434 return false;
1435
1436 if (SKB_DATA_ALIGN(len + TUN_RX_PAD) +
1437 SKB_DATA_ALIGN(sizeof(struct skb_shared_info)) > PAGE_SIZE)
1438 return false;
1439
1440 return true;
1441 }
1442
1443 static struct sk_buff *tun_build_skb(struct tun_struct *tun,
1444 struct tun_file *tfile,
1445 struct iov_iter *from,
1446 struct virtio_net_hdr *hdr,
1447 int len, int *skb_xdp)
1448 {
1449 struct page_frag *alloc_frag = &current->task_frag;
1450 struct sk_buff *skb;
1451 struct bpf_prog *xdp_prog;
1452 int buflen = SKB_DATA_ALIGN(sizeof(struct skb_shared_info));
1453 unsigned int delta = 0;
1454 char *buf;
1455 size_t copied;
1456 bool xdp_xmit = false;
1457 int err, pad = TUN_RX_PAD;
1458
1459 rcu_read_lock();
1460 xdp_prog = rcu_dereference(tun->xdp_prog);
1461 if (xdp_prog)
1462 pad += TUN_HEADROOM;
1463 buflen += SKB_DATA_ALIGN(len + pad);
1464 rcu_read_unlock();
1465
1466 alloc_frag->offset = ALIGN((u64)alloc_frag->offset, SMP_CACHE_BYTES);
1467 if (unlikely(!skb_page_frag_refill(buflen, alloc_frag, GFP_KERNEL)))
1468 return ERR_PTR(-ENOMEM);
1469
1470 buf = (char *)page_address(alloc_frag->page) + alloc_frag->offset;
1471 copied = copy_page_from_iter(alloc_frag->page,
1472 alloc_frag->offset + pad,
1473 len, from);
1474 if (copied != len)
1475 return ERR_PTR(-EFAULT);
1476
1477 /* There's a small window that XDP may be set after the check
1478 * of xdp_prog above, this should be rare and for simplicity
1479 * we do XDP on skb in case the headroom is not enough.
1480 */
1481 if (hdr->gso_type || !xdp_prog)
1482 *skb_xdp = 1;
1483 else
1484 *skb_xdp = 0;
1485
1486 local_bh_disable();
1487 rcu_read_lock();
1488 xdp_prog = rcu_dereference(tun->xdp_prog);
1489 if (xdp_prog && !*skb_xdp) {
1490 struct xdp_buff xdp;
1491 void *orig_data;
1492 u32 act;
1493
1494 xdp.data_hard_start = buf;
1495 xdp.data = buf + pad;
1496 xdp_set_data_meta_invalid(&xdp);
1497 xdp.data_end = xdp.data + len;
1498 orig_data = xdp.data;
1499 act = bpf_prog_run_xdp(xdp_prog, &xdp);
1500
1501 switch (act) {
1502 case XDP_REDIRECT:
1503 get_page(alloc_frag->page);
1504 alloc_frag->offset += buflen;
1505 err = xdp_do_redirect(tun->dev, &xdp, xdp_prog);
1506 xdp_do_flush_map();
1507 if (err)
1508 goto err_redirect;
1509 rcu_read_unlock();
1510 local_bh_enable();
1511 return NULL;
1512 case XDP_TX:
1513 xdp_xmit = true;
1514 /* fall through */
1515 case XDP_PASS:
1516 delta = orig_data - xdp.data;
1517 break;
1518 default:
1519 bpf_warn_invalid_xdp_action(act);
1520 /* fall through */
1521 case XDP_ABORTED:
1522 trace_xdp_exception(tun->dev, xdp_prog, act);
1523 /* fall through */
1524 case XDP_DROP:
1525 goto err_xdp;
1526 }
1527 }
1528
1529 skb = build_skb(buf, buflen);
1530 if (!skb) {
1531 rcu_read_unlock();
1532 local_bh_enable();
1533 return ERR_PTR(-ENOMEM);
1534 }
1535
1536 skb_reserve(skb, pad - delta);
1537 skb_put(skb, len + delta);
1538 get_page(alloc_frag->page);
1539 alloc_frag->offset += buflen;
1540
1541 if (xdp_xmit) {
1542 skb->dev = tun->dev;
1543 generic_xdp_tx(skb, xdp_prog);
1544 rcu_read_unlock();
1545 local_bh_enable();
1546 return NULL;
1547 }
1548
1549 rcu_read_unlock();
1550 local_bh_enable();
1551
1552 return skb;
1553
1554 err_redirect:
1555 put_page(alloc_frag->page);
1556 err_xdp:
1557 rcu_read_unlock();
1558 local_bh_enable();
1559 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1560 return NULL;
1561 }
1562
1563 /* Get packet from user space buffer */
1564 static ssize_t tun_get_user(struct tun_struct *tun, struct tun_file *tfile,
1565 void *msg_control, struct iov_iter *from,
1566 int noblock, bool more)
1567 {
1568 struct tun_pi pi = { 0, cpu_to_be16(ETH_P_IP) };
1569 struct sk_buff *skb;
1570 size_t total_len = iov_iter_count(from);
1571 size_t len = total_len, align = tun->align, linear;
1572 struct virtio_net_hdr gso = { 0 };
1573 struct tun_pcpu_stats *stats;
1574 int good_linear;
1575 int copylen;
1576 bool zerocopy = false;
1577 int err;
1578 u32 rxhash;
1579 int skb_xdp = 1;
1580 bool frags = tun_napi_frags_enabled(tfile);
1581
1582 if (!(tun->flags & IFF_NO_PI)) {
1583 if (len < sizeof(pi))
1584 return -EINVAL;
1585 len -= sizeof(pi);
1586
1587 if (!copy_from_iter_full(&pi, sizeof(pi), from))
1588 return -EFAULT;
1589 }
1590
1591 if (tun->flags & IFF_VNET_HDR) {
1592 int vnet_hdr_sz = READ_ONCE(tun->vnet_hdr_sz);
1593
1594 if (len < vnet_hdr_sz)
1595 return -EINVAL;
1596 len -= vnet_hdr_sz;
1597
1598 if (!copy_from_iter_full(&gso, sizeof(gso), from))
1599 return -EFAULT;
1600
1601 if ((gso.flags & VIRTIO_NET_HDR_F_NEEDS_CSUM) &&
1602 tun16_to_cpu(tun, gso.csum_start) + tun16_to_cpu(tun, gso.csum_offset) + 2 > tun16_to_cpu(tun, gso.hdr_len))
1603 gso.hdr_len = cpu_to_tun16(tun, tun16_to_cpu(tun, gso.csum_start) + tun16_to_cpu(tun, gso.csum_offset) + 2);
1604
1605 if (tun16_to_cpu(tun, gso.hdr_len) > len)
1606 return -EINVAL;
1607 iov_iter_advance(from, vnet_hdr_sz - sizeof(gso));
1608 }
1609
1610 if ((tun->flags & TUN_TYPE_MASK) == IFF_TAP) {
1611 align += NET_IP_ALIGN;
1612 if (unlikely(len < ETH_HLEN ||
1613 (gso.hdr_len && tun16_to_cpu(tun, gso.hdr_len) < ETH_HLEN)))
1614 return -EINVAL;
1615 }
1616
1617 good_linear = SKB_MAX_HEAD(align);
1618
1619 if (msg_control) {
1620 struct iov_iter i = *from;
1621
1622 /* There are 256 bytes to be copied in skb, so there is
1623 * enough room for skb expand head in case it is used.
1624 * The rest of the buffer is mapped from userspace.
1625 */
1626 copylen = gso.hdr_len ? tun16_to_cpu(tun, gso.hdr_len) : GOODCOPY_LEN;
1627 if (copylen > good_linear)
1628 copylen = good_linear;
1629 linear = copylen;
1630 iov_iter_advance(&i, copylen);
1631 if (iov_iter_npages(&i, INT_MAX) <= MAX_SKB_FRAGS)
1632 zerocopy = true;
1633 }
1634
1635 if (!frags && tun_can_build_skb(tun, tfile, len, noblock, zerocopy)) {
1636 /* For the packet that is not easy to be processed
1637 * (e.g gso or jumbo packet), we will do it at after
1638 * skb was created with generic XDP routine.
1639 */
1640 skb = tun_build_skb(tun, tfile, from, &gso, len, &skb_xdp);
1641 if (IS_ERR(skb)) {
1642 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1643 return PTR_ERR(skb);
1644 }
1645 if (!skb)
1646 return total_len;
1647 } else {
1648 if (!zerocopy) {
1649 copylen = len;
1650 if (tun16_to_cpu(tun, gso.hdr_len) > good_linear)
1651 linear = good_linear;
1652 else
1653 linear = tun16_to_cpu(tun, gso.hdr_len);
1654 }
1655
1656 if (frags) {
1657 mutex_lock(&tfile->napi_mutex);
1658 skb = tun_napi_alloc_frags(tfile, copylen, from);
1659 /* tun_napi_alloc_frags() enforces a layout for the skb.
1660 * If zerocopy is enabled, then this layout will be
1661 * overwritten by zerocopy_sg_from_iter().
1662 */
1663 zerocopy = false;
1664 } else {
1665 skb = tun_alloc_skb(tfile, align, copylen, linear,
1666 noblock);
1667 }
1668
1669 if (IS_ERR(skb)) {
1670 if (PTR_ERR(skb) != -EAGAIN)
1671 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1672 if (frags)
1673 mutex_unlock(&tfile->napi_mutex);
1674 return PTR_ERR(skb);
1675 }
1676
1677 if (zerocopy)
1678 err = zerocopy_sg_from_iter(skb, from);
1679 else
1680 err = skb_copy_datagram_from_iter(skb, 0, from, len);
1681
1682 if (err) {
1683 err = -EFAULT;
1684 drop:
1685 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1686 kfree_skb(skb);
1687 if (frags) {
1688 tfile->napi.skb = NULL;
1689 mutex_unlock(&tfile->napi_mutex);
1690 }
1691
1692 return err;
1693 }
1694 }
1695
1696 if (virtio_net_hdr_to_skb(skb, &gso, tun_is_little_endian(tun))) {
1697 this_cpu_inc(tun->pcpu_stats->rx_frame_errors);
1698 kfree_skb(skb);
1699 if (frags) {
1700 tfile->napi.skb = NULL;
1701 mutex_unlock(&tfile->napi_mutex);
1702 }
1703
1704 return -EINVAL;
1705 }
1706
1707 switch (tun->flags & TUN_TYPE_MASK) {
1708 case IFF_TUN:
1709 if (tun->flags & IFF_NO_PI) {
1710 u8 ip_version = skb->len ? (skb->data[0] >> 4) : 0;
1711
1712 switch (ip_version) {
1713 case 4:
1714 pi.proto = htons(ETH_P_IP);
1715 break;
1716 case 6:
1717 pi.proto = htons(ETH_P_IPV6);
1718 break;
1719 default:
1720 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1721 kfree_skb(skb);
1722 return -EINVAL;
1723 }
1724 }
1725
1726 skb_reset_mac_header(skb);
1727 skb->protocol = pi.proto;
1728 skb->dev = tun->dev;
1729 break;
1730 case IFF_TAP:
1731 if (!frags)
1732 skb->protocol = eth_type_trans(skb, tun->dev);
1733 break;
1734 }
1735
1736 /* copy skb_ubuf_info for callback when skb has no error */
1737 if (zerocopy) {
1738 skb_shinfo(skb)->destructor_arg = msg_control;
1739 skb_shinfo(skb)->tx_flags |= SKBTX_DEV_ZEROCOPY;
1740 skb_shinfo(skb)->tx_flags |= SKBTX_SHARED_FRAG;
1741 } else if (msg_control) {
1742 struct ubuf_info *uarg = msg_control;
1743 uarg->callback(uarg, false);
1744 }
1745
1746 skb_reset_network_header(skb);
1747 skb_probe_transport_header(skb, 0);
1748
1749 if (skb_xdp) {
1750 struct bpf_prog *xdp_prog;
1751 int ret;
1752
1753 local_bh_disable();
1754 rcu_read_lock();
1755 xdp_prog = rcu_dereference(tun->xdp_prog);
1756 if (xdp_prog) {
1757 ret = do_xdp_generic(xdp_prog, skb);
1758 if (ret != XDP_PASS) {
1759 rcu_read_unlock();
1760 local_bh_enable();
1761 return total_len;
1762 }
1763 }
1764 rcu_read_unlock();
1765 local_bh_enable();
1766 }
1767
1768 rxhash = __skb_get_hash_symmetric(skb);
1769
1770 rcu_read_lock();
1771 if (unlikely(!(tun->dev->flags & IFF_UP))) {
1772 err = -EIO;
1773 goto drop;
1774 }
1775
1776 if (frags) {
1777 /* Exercise flow dissector code path. */
1778 u32 headlen = eth_get_headlen(skb->data, skb_headlen(skb));
1779
1780 if (unlikely(headlen > skb_headlen(skb))) {
1781 this_cpu_inc(tun->pcpu_stats->rx_dropped);
1782 napi_free_frags(&tfile->napi);
1783 rcu_read_unlock();
1784 mutex_unlock(&tfile->napi_mutex);
1785 WARN_ON(1);
1786 return -ENOMEM;
1787 }
1788
1789 local_bh_disable();
1790 napi_gro_frags(&tfile->napi);
1791 local_bh_enable();
1792 mutex_unlock(&tfile->napi_mutex);
1793 } else if (tfile->napi_enabled) {
1794 struct sk_buff_head *queue = &tfile->sk.sk_write_queue;
1795 int queue_len;
1796
1797 spin_lock_bh(&queue->lock);
1798 __skb_queue_tail(queue, skb);
1799 queue_len = skb_queue_len(queue);
1800 spin_unlock(&queue->lock);
1801
1802 if (!more || queue_len > NAPI_POLL_WEIGHT)
1803 napi_schedule(&tfile->napi);
1804
1805 local_bh_enable();
1806 } else if (!IS_ENABLED(CONFIG_4KSTACKS)) {
1807 tun_rx_batched(tun, tfile, skb, more);
1808 } else {
1809 netif_rx_ni(skb);
1810 }
1811 rcu_read_unlock();
1812
1813 stats = get_cpu_ptr(tun->pcpu_stats);
1814 u64_stats_update_begin(&stats->syncp);
1815 stats->rx_packets++;
1816 stats->rx_bytes += len;
1817 u64_stats_update_end(&stats->syncp);
1818 put_cpu_ptr(stats);
1819
1820 tun_flow_update(tun, rxhash, tfile);
1821 return total_len;
1822 }
1823
1824 static ssize_t tun_chr_write_iter(struct kiocb *iocb, struct iov_iter *from)
1825 {
1826 struct file *file = iocb->ki_filp;
1827 struct tun_file *tfile = file->private_data;
1828 struct tun_struct *tun = tun_get(tfile);
1829 ssize_t result;
1830
1831 if (!tun)
1832 return -EBADFD;
1833
1834 result = tun_get_user(tun, tfile, NULL, from,
1835 file->f_flags & O_NONBLOCK, false);
1836
1837 tun_put(tun);
1838 return result;
1839 }
1840
1841 /* Put packet to the user space buffer */
1842 static ssize_t tun_put_user(struct tun_struct *tun,
1843 struct tun_file *tfile,
1844 struct sk_buff *skb,
1845 struct iov_iter *iter)
1846 {
1847 struct tun_pi pi = { 0, skb->protocol };
1848 struct tun_pcpu_stats *stats;
1849 ssize_t total;
1850 int vlan_offset = 0;
1851 int vlan_hlen = 0;
1852 int vnet_hdr_sz = 0;
1853
1854 if (skb_vlan_tag_present(skb))
1855 vlan_hlen = VLAN_HLEN;
1856
1857 if (tun->flags & IFF_VNET_HDR)
1858 vnet_hdr_sz = READ_ONCE(tun->vnet_hdr_sz);
1859
1860 total = skb->len + vlan_hlen + vnet_hdr_sz;
1861
1862 if (!(tun->flags & IFF_NO_PI)) {
1863 if (iov_iter_count(iter) < sizeof(pi))
1864 return -EINVAL;
1865
1866 total += sizeof(pi);
1867 if (iov_iter_count(iter) < total) {
1868 /* Packet will be striped */
1869 pi.flags |= TUN_PKT_STRIP;
1870 }
1871
1872 if (copy_to_iter(&pi, sizeof(pi), iter) != sizeof(pi))
1873 return -EFAULT;
1874 }
1875
1876 if (vnet_hdr_sz) {
1877 struct virtio_net_hdr gso;
1878
1879 if (iov_iter_count(iter) < vnet_hdr_sz)
1880 return -EINVAL;
1881
1882 if (virtio_net_hdr_from_skb(skb, &gso,
1883 tun_is_little_endian(tun), true,
1884 vlan_hlen)) {
1885 struct skb_shared_info *sinfo = skb_shinfo(skb);
1886 pr_err("unexpected GSO type: "
1887 "0x%x, gso_size %d, hdr_len %d\n",
1888 sinfo->gso_type, tun16_to_cpu(tun, gso.gso_size),
1889 tun16_to_cpu(tun, gso.hdr_len));
1890 print_hex_dump(KERN_ERR, "tun: ",
1891 DUMP_PREFIX_NONE,
1892 16, 1, skb->head,
1893 min((int)tun16_to_cpu(tun, gso.hdr_len), 64), true);
1894 WARN_ON_ONCE(1);
1895 return -EINVAL;
1896 }
1897
1898 if (copy_to_iter(&gso, sizeof(gso), iter) != sizeof(gso))
1899 return -EFAULT;
1900
1901 iov_iter_advance(iter, vnet_hdr_sz - sizeof(gso));
1902 }
1903
1904 if (vlan_hlen) {
1905 int ret;
1906 struct {
1907 __be16 h_vlan_proto;
1908 __be16 h_vlan_TCI;
1909 } veth;
1910
1911 veth.h_vlan_proto = skb->vlan_proto;
1912 veth.h_vlan_TCI = htons(skb_vlan_tag_get(skb));
1913
1914 vlan_offset = offsetof(struct vlan_ethhdr, h_vlan_proto);
1915
1916 ret = skb_copy_datagram_iter(skb, 0, iter, vlan_offset);
1917 if (ret || !iov_iter_count(iter))
1918 goto done;
1919
1920 ret = copy_to_iter(&veth, sizeof(veth), iter);
1921 if (ret != sizeof(veth) || !iov_iter_count(iter))
1922 goto done;
1923 }
1924
1925 skb_copy_datagram_iter(skb, vlan_offset, iter, skb->len - vlan_offset);
1926
1927 done:
1928 /* caller is in process context, */
1929 stats = get_cpu_ptr(tun->pcpu_stats);
1930 u64_stats_update_begin(&stats->syncp);
1931 stats->tx_packets++;
1932 stats->tx_bytes += skb->len + vlan_hlen;
1933 u64_stats_update_end(&stats->syncp);
1934 put_cpu_ptr(tun->pcpu_stats);
1935
1936 return total;
1937 }
1938
1939 static struct sk_buff *tun_ring_recv(struct tun_file *tfile, int noblock,
1940 int *err)
1941 {
1942 DECLARE_WAITQUEUE(wait, current);
1943 struct sk_buff *skb = NULL;
1944 int error = 0;
1945
1946 skb = skb_array_consume(&tfile->tx_array);
1947 if (skb)
1948 goto out;
1949 if (noblock) {
1950 error = -EAGAIN;
1951 goto out;
1952 }
1953
1954 add_wait_queue(&tfile->wq.wait, &wait);
1955
1956 while (1) {
1957 set_current_state(TASK_INTERRUPTIBLE);
1958 skb = skb_array_consume(&tfile->tx_array);
1959 if (skb)
1960 break;
1961 if (signal_pending(current)) {
1962 error = -ERESTARTSYS;
1963 break;
1964 }
1965 if (tfile->socket.sk->sk_shutdown & RCV_SHUTDOWN) {
1966 error = -EFAULT;
1967 break;
1968 }
1969
1970 schedule();
1971 }
1972
1973 __set_current_state(TASK_RUNNING);
1974 remove_wait_queue(&tfile->wq.wait, &wait);
1975
1976 out:
1977 *err = error;
1978 return skb;
1979 }
1980
1981 static ssize_t tun_do_read(struct tun_struct *tun, struct tun_file *tfile,
1982 struct iov_iter *to,
1983 int noblock, struct sk_buff *skb)
1984 {
1985 ssize_t ret;
1986 int err;
1987
1988 tun_debug(KERN_INFO, tun, "tun_do_read\n");
1989
1990 if (!iov_iter_count(to)) {
1991 if (skb)
1992 kfree_skb(skb);
1993 return 0;
1994 }
1995
1996 if (!skb) {
1997 /* Read frames from ring */
1998 skb = tun_ring_recv(tfile, noblock, &err);
1999 if (!skb)
2000 return err;
2001 }
2002
2003 ret = tun_put_user(tun, tfile, skb, to);
2004 if (unlikely(ret < 0))
2005 kfree_skb(skb);
2006 else
2007 consume_skb(skb);
2008
2009 return ret;
2010 }
2011
2012 static ssize_t tun_chr_read_iter(struct kiocb *iocb, struct iov_iter *to)
2013 {
2014 struct file *file = iocb->ki_filp;
2015 struct tun_file *tfile = file->private_data;
2016 struct tun_struct *tun = tun_get(tfile);
2017 ssize_t len = iov_iter_count(to), ret;
2018
2019 if (!tun)
2020 return -EBADFD;
2021 ret = tun_do_read(tun, tfile, to, file->f_flags & O_NONBLOCK, NULL);
2022 ret = min_t(ssize_t, ret, len);
2023 if (ret > 0)
2024 iocb->ki_pos = ret;
2025 tun_put(tun);
2026 return ret;
2027 }
2028
2029 static void tun_free_netdev(struct net_device *dev)
2030 {
2031 struct tun_struct *tun = netdev_priv(dev);
2032
2033 BUG_ON(!(list_empty(&tun->disabled)));
2034 free_percpu(tun->pcpu_stats);
2035 tun_flow_uninit(tun);
2036 security_tun_dev_free_security(tun->security);
2037 }
2038
2039 static void tun_setup(struct net_device *dev)
2040 {
2041 struct tun_struct *tun = netdev_priv(dev);
2042
2043 tun->owner = INVALID_UID;
2044 tun->group = INVALID_GID;
2045
2046 dev->ethtool_ops = &tun_ethtool_ops;
2047 dev->needs_free_netdev = true;
2048 dev->priv_destructor = tun_free_netdev;
2049 /* We prefer our own queue length */
2050 dev->tx_queue_len = TUN_READQ_SIZE;
2051 }
2052
2053 /* Trivial set of netlink ops to allow deleting tun or tap
2054 * device with netlink.
2055 */
2056 static int tun_validate(struct nlattr *tb[], struct nlattr *data[],
2057 struct netlink_ext_ack *extack)
2058 {
2059 NL_SET_ERR_MSG(extack,
2060 "tun/tap creation via rtnetlink is not supported.");
2061 return -EOPNOTSUPP;
2062 }
2063
2064 static struct rtnl_link_ops tun_link_ops __read_mostly = {
2065 .kind = DRV_NAME,
2066 .priv_size = sizeof(struct tun_struct),
2067 .setup = tun_setup,
2068 .validate = tun_validate,
2069 };
2070
2071 static void tun_sock_write_space(struct sock *sk)
2072 {
2073 struct tun_file *tfile;
2074 wait_queue_head_t *wqueue;
2075
2076 if (!sock_writeable(sk))
2077 return;
2078
2079 if (!test_and_clear_bit(SOCKWQ_ASYNC_NOSPACE, &sk->sk_socket->flags))
2080 return;
2081
2082 wqueue = sk_sleep(sk);
2083 if (wqueue && waitqueue_active(wqueue))
2084 wake_up_interruptible_sync_poll(wqueue, POLLOUT |
2085 POLLWRNORM | POLLWRBAND);
2086
2087 tfile = container_of(sk, struct tun_file, sk);
2088 kill_fasync(&tfile->fasync, SIGIO, POLL_OUT);
2089 }
2090
2091 static int tun_sendmsg(struct socket *sock, struct msghdr *m, size_t total_len)
2092 {
2093 int ret;
2094 struct tun_file *tfile = container_of(sock, struct tun_file, socket);
2095 struct tun_struct *tun = tun_get(tfile);
2096
2097 if (!tun)
2098 return -EBADFD;
2099
2100 ret = tun_get_user(tun, tfile, m->msg_control, &m->msg_iter,
2101 m->msg_flags & MSG_DONTWAIT,
2102 m->msg_flags & MSG_MORE);
2103 tun_put(tun);
2104 return ret;
2105 }
2106
2107 static int tun_recvmsg(struct socket *sock, struct msghdr *m, size_t total_len,
2108 int flags)
2109 {
2110 struct tun_file *tfile = container_of(sock, struct tun_file, socket);
2111 struct tun_struct *tun = tun_get(tfile);
2112 struct sk_buff *skb = m->msg_control;
2113 int ret;
2114
2115 if (!tun) {
2116 ret = -EBADFD;
2117 goto out_free_skb;
2118 }
2119
2120 if (flags & ~(MSG_DONTWAIT|MSG_TRUNC|MSG_ERRQUEUE)) {
2121 ret = -EINVAL;
2122 goto out_put_tun;
2123 }
2124 if (flags & MSG_ERRQUEUE) {
2125 ret = sock_recv_errqueue(sock->sk, m, total_len,
2126 SOL_PACKET, TUN_TX_TIMESTAMP);
2127 goto out;
2128 }
2129 ret = tun_do_read(tun, tfile, &m->msg_iter, flags & MSG_DONTWAIT, skb);
2130 if (ret > (ssize_t)total_len) {
2131 m->msg_flags |= MSG_TRUNC;
2132 ret = flags & MSG_TRUNC ? ret : total_len;
2133 }
2134 out:
2135 tun_put(tun);
2136 return ret;
2137
2138 out_put_tun:
2139 tun_put(tun);
2140 out_free_skb:
2141 if (skb)
2142 kfree_skb(skb);
2143 return ret;
2144 }
2145
2146 static int tun_peek_len(struct socket *sock)
2147 {
2148 struct tun_file *tfile = container_of(sock, struct tun_file, socket);
2149 struct tun_struct *tun;
2150 int ret = 0;
2151
2152 tun = tun_get(tfile);
2153 if (!tun)
2154 return 0;
2155
2156 ret = skb_array_peek_len(&tfile->tx_array);
2157 tun_put(tun);
2158
2159 return ret;
2160 }
2161
2162 /* Ops structure to mimic raw sockets with tun */
2163 static const struct proto_ops tun_socket_ops = {
2164 .peek_len = tun_peek_len,
2165 .sendmsg = tun_sendmsg,
2166 .recvmsg = tun_recvmsg,
2167 };
2168
2169 static struct proto tun_proto = {
2170 .name = "tun",
2171 .owner = THIS_MODULE,
2172 .obj_size = sizeof(struct tun_file),
2173 };
2174
2175 static int tun_flags(struct tun_struct *tun)
2176 {
2177 return tun->flags & (TUN_FEATURES | IFF_PERSIST | IFF_TUN | IFF_TAP);
2178 }
2179
2180 static ssize_t tun_show_flags(struct device *dev, struct device_attribute *attr,
2181 char *buf)
2182 {
2183 struct tun_struct *tun = netdev_priv(to_net_dev(dev));
2184 return sprintf(buf, "0x%x\n", tun_flags(tun));
2185 }
2186
2187 static ssize_t tun_show_owner(struct device *dev, struct device_attribute *attr,
2188 char *buf)
2189 {
2190 struct tun_struct *tun = netdev_priv(to_net_dev(dev));
2191 return uid_valid(tun->owner)?
2192 sprintf(buf, "%u\n",
2193 from_kuid_munged(current_user_ns(), tun->owner)):
2194 sprintf(buf, "-1\n");
2195 }
2196
2197 static ssize_t tun_show_group(struct device *dev, struct device_attribute *attr,
2198 char *buf)
2199 {
2200 struct tun_struct *tun = netdev_priv(to_net_dev(dev));
2201 return gid_valid(tun->group) ?
2202 sprintf(buf, "%u\n",
2203 from_kgid_munged(current_user_ns(), tun->group)):
2204 sprintf(buf, "-1\n");
2205 }
2206
2207 static DEVICE_ATTR(tun_flags, 0444, tun_show_flags, NULL);
2208 static DEVICE_ATTR(owner, 0444, tun_show_owner, NULL);
2209 static DEVICE_ATTR(group, 0444, tun_show_group, NULL);
2210
2211 static struct attribute *tun_dev_attrs[] = {
2212 &dev_attr_tun_flags.attr,
2213 &dev_attr_owner.attr,
2214 &dev_attr_group.attr,
2215 NULL
2216 };
2217
2218 static const struct attribute_group tun_attr_group = {
2219 .attrs = tun_dev_attrs
2220 };
2221
2222 static int tun_set_iff(struct net *net, struct file *file, struct ifreq *ifr)
2223 {
2224 struct tun_struct *tun;
2225 struct tun_file *tfile = file->private_data;
2226 struct net_device *dev;
2227 int err;
2228
2229 if (tfile->detached)
2230 return -EINVAL;
2231
2232 if ((ifr->ifr_flags & IFF_NAPI_FRAGS)) {
2233 if (!capable(CAP_NET_ADMIN))
2234 return -EPERM;
2235
2236 if (!(ifr->ifr_flags & IFF_NAPI) ||
2237 (ifr->ifr_flags & TUN_TYPE_MASK) != IFF_TAP)
2238 return -EINVAL;
2239 }
2240
2241 dev = __dev_get_by_name(net, ifr->ifr_name);
2242 if (dev) {
2243 if (ifr->ifr_flags & IFF_TUN_EXCL)
2244 return -EBUSY;
2245 if ((ifr->ifr_flags & IFF_TUN) && dev->netdev_ops == &tun_netdev_ops)
2246 tun = netdev_priv(dev);
2247 else if ((ifr->ifr_flags & IFF_TAP) && dev->netdev_ops == &tap_netdev_ops)
2248 tun = netdev_priv(dev);
2249 else
2250 return -EINVAL;
2251
2252 if (!!(ifr->ifr_flags & IFF_MULTI_QUEUE) !=
2253 !!(tun->flags & IFF_MULTI_QUEUE))
2254 return -EINVAL;
2255
2256 if (tun_not_capable(tun))
2257 return -EPERM;
2258 err = security_tun_dev_open(tun->security);
2259 if (err < 0)
2260 return err;
2261
2262 err = tun_attach(tun, file, ifr->ifr_flags & IFF_NOFILTER,
2263 ifr->ifr_flags & IFF_NAPI,
2264 ifr->ifr_flags & IFF_NAPI_FRAGS);
2265 if (err < 0)
2266 return err;
2267
2268 if (tun->flags & IFF_MULTI_QUEUE &&
2269 (tun->numqueues + tun->numdisabled > 1)) {
2270 /* One or more queue has already been attached, no need
2271 * to initialize the device again.
2272 */
2273 return 0;
2274 }
2275 }
2276 else {
2277 char *name;
2278 unsigned long flags = 0;
2279 int queues = ifr->ifr_flags & IFF_MULTI_QUEUE ?
2280 MAX_TAP_QUEUES : 1;
2281
2282 if (!ns_capable(net->user_ns, CAP_NET_ADMIN))
2283 return -EPERM;
2284 err = security_tun_dev_create();
2285 if (err < 0)
2286 return err;
2287
2288 /* Set dev type */
2289 if (ifr->ifr_flags & IFF_TUN) {
2290 /* TUN device */
2291 flags |= IFF_TUN;
2292 name = "tun%d";
2293 } else if (ifr->ifr_flags & IFF_TAP) {
2294 /* TAP device */
2295 flags |= IFF_TAP;
2296 name = "tap%d";
2297 } else
2298 return -EINVAL;
2299
2300 if (*ifr->ifr_name)
2301 name = ifr->ifr_name;
2302
2303 dev = alloc_netdev_mqs(sizeof(struct tun_struct), name,
2304 NET_NAME_UNKNOWN, tun_setup, queues,
2305 queues);
2306
2307 if (!dev)
2308 return -ENOMEM;
2309 err = dev_get_valid_name(net, dev, name);
2310 if (err < 0)
2311 goto err_free_dev;
2312
2313 dev_net_set(dev, net);
2314 dev->rtnl_link_ops = &tun_link_ops;
2315 dev->ifindex = tfile->ifindex;
2316 dev->sysfs_groups[0] = &tun_attr_group;
2317
2318 tun = netdev_priv(dev);
2319 tun->dev = dev;
2320 tun->flags = flags;
2321 tun->txflt.count = 0;
2322 tun->vnet_hdr_sz = sizeof(struct virtio_net_hdr);
2323
2324 tun->align = NET_SKB_PAD;
2325 tun->filter_attached = false;
2326 tun->sndbuf = tfile->socket.sk->sk_sndbuf;
2327 tun->rx_batched = 0;
2328
2329 tun->pcpu_stats = netdev_alloc_pcpu_stats(struct tun_pcpu_stats);
2330 if (!tun->pcpu_stats) {
2331 err = -ENOMEM;
2332 goto err_free_dev;
2333 }
2334
2335 spin_lock_init(&tun->lock);
2336
2337 err = security_tun_dev_alloc_security(&tun->security);
2338 if (err < 0)
2339 goto err_free_stat;
2340
2341 tun_net_init(dev);
2342 tun_flow_init(tun);
2343
2344 dev->hw_features = NETIF_F_SG | NETIF_F_FRAGLIST |
2345 TUN_USER_FEATURES | NETIF_F_HW_VLAN_CTAG_TX |
2346 NETIF_F_HW_VLAN_STAG_TX;
2347 dev->features = dev->hw_features | NETIF_F_LLTX;
2348 dev->vlan_features = dev->features &
2349 ~(NETIF_F_HW_VLAN_CTAG_TX |
2350 NETIF_F_HW_VLAN_STAG_TX);
2351
2352 INIT_LIST_HEAD(&tun->disabled);
2353 err = tun_attach(tun, file, false, ifr->ifr_flags & IFF_NAPI,
2354 ifr->ifr_flags & IFF_NAPI_FRAGS);
2355 if (err < 0)
2356 goto err_free_flow;
2357
2358 err = register_netdevice(tun->dev);
2359 if (err < 0)
2360 goto err_detach;
2361 }
2362
2363 netif_carrier_on(tun->dev);
2364
2365 tun_debug(KERN_INFO, tun, "tun_set_iff\n");
2366
2367 tun->flags = (tun->flags & ~TUN_FEATURES) |
2368 (ifr->ifr_flags & TUN_FEATURES);
2369
2370 /* Make sure persistent devices do not get stuck in
2371 * xoff state.
2372 */
2373 if (netif_running(tun->dev))
2374 netif_tx_wake_all_queues(tun->dev);
2375
2376 strcpy(ifr->ifr_name, tun->dev->name);
2377 return 0;
2378
2379 err_detach:
2380 tun_detach_all(dev);
2381 /* register_netdevice() already called tun_free_netdev() */
2382 goto err_free_dev;
2383
2384 err_free_flow:
2385 tun_flow_uninit(tun);
2386 security_tun_dev_free_security(tun->security);
2387 err_free_stat:
2388 free_percpu(tun->pcpu_stats);
2389 err_free_dev:
2390 free_netdev(dev);
2391 return err;
2392 }
2393
2394 static void tun_get_iff(struct net *net, struct tun_struct *tun,
2395 struct ifreq *ifr)
2396 {
2397 tun_debug(KERN_INFO, tun, "tun_get_iff\n");
2398
2399 strcpy(ifr->ifr_name, tun->dev->name);
2400
2401 ifr->ifr_flags = tun_flags(tun);
2402
2403 }
2404
2405 /* This is like a cut-down ethtool ops, except done via tun fd so no
2406 * privs required. */
2407 static int set_offload(struct tun_struct *tun, unsigned long arg)
2408 {
2409 netdev_features_t features = 0;
2410
2411 if (arg & TUN_F_CSUM) {
2412 features |= NETIF_F_HW_CSUM;
2413 arg &= ~TUN_F_CSUM;
2414
2415 if (arg & (TUN_F_TSO4|TUN_F_TSO6)) {
2416 if (arg & TUN_F_TSO_ECN) {
2417 features |= NETIF_F_TSO_ECN;
2418 arg &= ~TUN_F_TSO_ECN;
2419 }
2420 if (arg & TUN_F_TSO4)
2421 features |= NETIF_F_TSO;
2422 if (arg & TUN_F_TSO6)
2423 features |= NETIF_F_TSO6;
2424 arg &= ~(TUN_F_TSO4|TUN_F_TSO6);
2425 }
2426
2427 arg &= ~TUN_F_UFO;
2428 }
2429
2430 /* This gives the user a way to test for new features in future by
2431 * trying to set them. */
2432 if (arg)
2433 return -EINVAL;
2434
2435 tun->set_features = features;
2436 tun->dev->wanted_features &= ~TUN_USER_FEATURES;
2437 tun->dev->wanted_features |= features;
2438 netdev_update_features(tun->dev);
2439
2440 return 0;
2441 }
2442
2443 static void tun_detach_filter(struct tun_struct *tun, int n)
2444 {
2445 int i;
2446 struct tun_file *tfile;
2447
2448 for (i = 0; i < n; i++) {
2449 tfile = rtnl_dereference(tun->tfiles[i]);
2450 lock_sock(tfile->socket.sk);
2451 sk_detach_filter(tfile->socket.sk);
2452 release_sock(tfile->socket.sk);
2453 }
2454
2455 tun->filter_attached = false;
2456 }
2457
2458 static int tun_attach_filter(struct tun_struct *tun)
2459 {
2460 int i, ret = 0;
2461 struct tun_file *tfile;
2462
2463 for (i = 0; i < tun->numqueues; i++) {
2464 tfile = rtnl_dereference(tun->tfiles[i]);
2465 lock_sock(tfile->socket.sk);
2466 ret = sk_attach_filter(&tun->fprog, tfile->socket.sk);
2467 release_sock(tfile->socket.sk);
2468 if (ret) {
2469 tun_detach_filter(tun, i);
2470 return ret;
2471 }
2472 }
2473
2474 tun->filter_attached = true;
2475 return ret;
2476 }
2477
2478 static void tun_set_sndbuf(struct tun_struct *tun)
2479 {
2480 struct tun_file *tfile;
2481 int i;
2482
2483 for (i = 0; i < tun->numqueues; i++) {
2484 tfile = rtnl_dereference(tun->tfiles[i]);
2485 tfile->socket.sk->sk_sndbuf = tun->sndbuf;
2486 }
2487 }
2488
2489 static int tun_set_queue(struct file *file, struct ifreq *ifr)
2490 {
2491 struct tun_file *tfile = file->private_data;
2492 struct tun_struct *tun;
2493 int ret = 0;
2494
2495 rtnl_lock();
2496
2497 if (ifr->ifr_flags & IFF_ATTACH_QUEUE) {
2498 tun = tfile->detached;
2499 if (!tun) {
2500 ret = -EINVAL;
2501 goto unlock;
2502 }
2503 ret = security_tun_dev_attach_queue(tun->security);
2504 if (ret < 0)
2505 goto unlock;
2506 ret = tun_attach(tun, file, false, tun->flags & IFF_NAPI,
2507 tun->flags & IFF_NAPI_FRAGS);
2508 } else if (ifr->ifr_flags & IFF_DETACH_QUEUE) {
2509 tun = rtnl_dereference(tfile->tun);
2510 if (!tun || !(tun->flags & IFF_MULTI_QUEUE) || tfile->detached)
2511 ret = -EINVAL;
2512 else
2513 __tun_detach(tfile, false);
2514 } else
2515 ret = -EINVAL;
2516
2517 unlock:
2518 rtnl_unlock();
2519 return ret;
2520 }
2521
2522 static long __tun_chr_ioctl(struct file *file, unsigned int cmd,
2523 unsigned long arg, int ifreq_len)
2524 {
2525 struct tun_file *tfile = file->private_data;
2526 struct tun_struct *tun;
2527 void __user* argp = (void __user*)arg;
2528 unsigned int ifindex, carrier;
2529 struct ifreq ifr;
2530 kuid_t owner;
2531 kgid_t group;
2532 int sndbuf;
2533 int vnet_hdr_sz;
2534 int le;
2535 int ret;
2536
2537 if (cmd == TUNSETIFF || cmd == TUNSETQUEUE || _IOC_TYPE(cmd) == SOCK_IOC_TYPE) {
2538 if (copy_from_user(&ifr, argp, ifreq_len))
2539 return -EFAULT;
2540 } else {
2541 memset(&ifr, 0, sizeof(ifr));
2542 }
2543 if (cmd == TUNGETFEATURES) {
2544 /* Currently this just means: "what IFF flags are valid?".
2545 * This is needed because we never checked for invalid flags on
2546 * TUNSETIFF.
2547 */
2548 return put_user(IFF_TUN | IFF_TAP | TUN_FEATURES,
2549 (unsigned int __user*)argp);
2550 } else if (cmd == TUNSETQUEUE)
2551 return tun_set_queue(file, &ifr);
2552
2553 ret = 0;
2554 rtnl_lock();
2555
2556 tun = tun_get(tfile);
2557 if (cmd == TUNSETIFF) {
2558 ret = -EEXIST;
2559 if (tun)
2560 goto unlock;
2561
2562 ifr.ifr_name[IFNAMSIZ-1] = '\0';
2563
2564 ret = tun_set_iff(sock_net(&tfile->sk), file, &ifr);
2565
2566 if (ret)
2567 goto unlock;
2568
2569 if (copy_to_user(argp, &ifr, ifreq_len))
2570 ret = -EFAULT;
2571 goto unlock;
2572 }
2573 if (cmd == TUNSETIFINDEX) {
2574 ret = -EPERM;
2575 if (tun)
2576 goto unlock;
2577
2578 ret = -EFAULT;
2579 if (copy_from_user(&ifindex, argp, sizeof(ifindex)))
2580 goto unlock;
2581
2582 ret = 0;
2583 tfile->ifindex = ifindex;
2584 goto unlock;
2585 }
2586
2587 ret = -EBADFD;
2588 if (!tun)
2589 goto unlock;
2590
2591 tun_debug(KERN_INFO, tun, "tun_chr_ioctl cmd %u\n", cmd);
2592
2593 ret = 0;
2594 switch (cmd) {
2595 case TUNGETIFF:
2596 tun_get_iff(current->nsproxy->net_ns, tun, &ifr);
2597
2598 if (tfile->detached)
2599 ifr.ifr_flags |= IFF_DETACH_QUEUE;
2600 if (!tfile->socket.sk->sk_filter)
2601 ifr.ifr_flags |= IFF_NOFILTER;
2602
2603 if (copy_to_user(argp, &ifr, ifreq_len))
2604 ret = -EFAULT;
2605 break;
2606
2607 case TUNSETNOCSUM:
2608 /* Disable/Enable checksum */
2609
2610 /* [unimplemented] */
2611 tun_debug(KERN_INFO, tun, "ignored: set checksum %s\n",
2612 arg ? "disabled" : "enabled");
2613 break;
2614
2615 case TUNSETPERSIST:
2616 /* Disable/Enable persist mode. Keep an extra reference to the
2617 * module to prevent the module being unprobed.
2618 */
2619 if (arg && !(tun->flags & IFF_PERSIST)) {
2620 tun->flags |= IFF_PERSIST;
2621 __module_get(THIS_MODULE);
2622 }
2623 if (!arg && (tun->flags & IFF_PERSIST)) {
2624 tun->flags &= ~IFF_PERSIST;
2625 module_put(THIS_MODULE);
2626 }
2627
2628 tun_debug(KERN_INFO, tun, "persist %s\n",
2629 arg ? "enabled" : "disabled");
2630 break;
2631
2632 case TUNSETOWNER:
2633 /* Set owner of the device */
2634 owner = make_kuid(current_user_ns(), arg);
2635 if (!uid_valid(owner)) {
2636 ret = -EINVAL;
2637 break;
2638 }
2639 tun->owner = owner;
2640 tun_debug(KERN_INFO, tun, "owner set to %u\n",
2641 from_kuid(&init_user_ns, tun->owner));
2642 break;
2643
2644 case TUNSETGROUP:
2645 /* Set group of the device */
2646 group = make_kgid(current_user_ns(), arg);
2647 if (!gid_valid(group)) {
2648 ret = -EINVAL;
2649 break;
2650 }
2651 tun->group = group;
2652 tun_debug(KERN_INFO, tun, "group set to %u\n",
2653 from_kgid(&init_user_ns, tun->group));
2654 break;
2655
2656 case TUNSETLINK:
2657 /* Only allow setting the type when the interface is down */
2658 if (tun->dev->flags & IFF_UP) {
2659 tun_debug(KERN_INFO, tun,
2660 "Linktype set failed because interface is up\n");
2661 ret = -EBUSY;
2662 } else {
2663 tun->dev->type = (int) arg;
2664 tun_debug(KERN_INFO, tun, "linktype set to %d\n",
2665 tun->dev->type);
2666 ret = 0;
2667 }
2668 break;
2669
2670 #ifdef TUN_DEBUG
2671 case TUNSETDEBUG:
2672 tun->debug = arg;
2673 break;
2674 #endif
2675 case TUNSETOFFLOAD:
2676 ret = set_offload(tun, arg);
2677 break;
2678
2679 case TUNSETTXFILTER:
2680 /* Can be set only for TAPs */
2681 ret = -EINVAL;
2682 if ((tun->flags & TUN_TYPE_MASK) != IFF_TAP)
2683 break;
2684 ret = update_filter(&tun->txflt, (void __user *)arg);
2685 break;
2686
2687 case SIOCGIFHWADDR:
2688 /* Get hw address */
2689 memcpy(ifr.ifr_hwaddr.sa_data, tun->dev->dev_addr, ETH_ALEN);
2690 ifr.ifr_hwaddr.sa_family = tun->dev->type;
2691 if (copy_to_user(argp, &ifr, ifreq_len))
2692 ret = -EFAULT;
2693 break;
2694
2695 case SIOCSIFHWADDR:
2696 /* Set hw address */
2697 tun_debug(KERN_DEBUG, tun, "set hw address: %pM\n",
2698 ifr.ifr_hwaddr.sa_data);
2699
2700 ret = dev_set_mac_address(tun->dev, &ifr.ifr_hwaddr);
2701 break;
2702
2703 case TUNGETSNDBUF:
2704 sndbuf = tfile->socket.sk->sk_sndbuf;
2705 if (copy_to_user(argp, &sndbuf, sizeof(sndbuf)))
2706 ret = -EFAULT;
2707 break;
2708
2709 case TUNSETSNDBUF:
2710 if (copy_from_user(&sndbuf, argp, sizeof(sndbuf))) {
2711 ret = -EFAULT;
2712 break;
2713 }
2714 if (sndbuf <= 0) {
2715 ret = -EINVAL;
2716 break;
2717 }
2718
2719 tun->sndbuf = sndbuf;
2720 tun_set_sndbuf(tun);
2721 break;
2722
2723 case TUNGETVNETHDRSZ:
2724 vnet_hdr_sz = tun->vnet_hdr_sz;
2725 if (copy_to_user(argp, &vnet_hdr_sz, sizeof(vnet_hdr_sz)))
2726 ret = -EFAULT;
2727 break;
2728
2729 case TUNSETVNETHDRSZ:
2730 if (copy_from_user(&vnet_hdr_sz, argp, sizeof(vnet_hdr_sz))) {
2731 ret = -EFAULT;
2732 break;
2733 }
2734 if (vnet_hdr_sz < (int)sizeof(struct virtio_net_hdr)) {
2735 ret = -EINVAL;
2736 break;
2737 }
2738
2739 tun->vnet_hdr_sz = vnet_hdr_sz;
2740 break;
2741
2742 case TUNGETVNETLE:
2743 le = !!(tun->flags & TUN_VNET_LE);
2744 if (put_user(le, (int __user *)argp))
2745 ret = -EFAULT;
2746 break;
2747
2748 case TUNSETVNETLE:
2749 if (get_user(le, (int __user *)argp)) {
2750 ret = -EFAULT;
2751 break;
2752 }
2753 if (le)
2754 tun->flags |= TUN_VNET_LE;
2755 else
2756 tun->flags &= ~TUN_VNET_LE;
2757 break;
2758
2759 case TUNGETVNETBE:
2760 ret = tun_get_vnet_be(tun, argp);
2761 break;
2762
2763 case TUNSETVNETBE:
2764 ret = tun_set_vnet_be(tun, argp);
2765 break;
2766
2767 case TUNATTACHFILTER:
2768 /* Can be set only for TAPs */
2769 ret = -EINVAL;
2770 if ((tun->flags & TUN_TYPE_MASK) != IFF_TAP)
2771 break;
2772 ret = -EFAULT;
2773 if (copy_from_user(&tun->fprog, argp, sizeof(tun->fprog)))
2774 break;
2775
2776 ret = tun_attach_filter(tun);
2777 break;
2778
2779 case TUNDETACHFILTER:
2780 /* Can be set only for TAPs */
2781 ret = -EINVAL;
2782 if ((tun->flags & TUN_TYPE_MASK) != IFF_TAP)
2783 break;
2784 ret = 0;
2785 tun_detach_filter(tun, tun->numqueues);
2786 break;
2787
2788 case TUNGETFILTER:
2789 ret = -EINVAL;
2790 if ((tun->flags & TUN_TYPE_MASK) != IFF_TAP)
2791 break;
2792 ret = -EFAULT;
2793 if (copy_to_user(argp, &tun->fprog, sizeof(tun->fprog)))
2794 break;
2795 ret = 0;
2796 break;
2797
2798 case TUNSETCARRIER:
2799 ret = -EFAULT;
2800 if (copy_from_user(&carrier, argp, sizeof(carrier)))
2801 goto unlock;
2802
2803 ret = tun_net_change_carrier(tun->dev, (bool)carrier);
2804 break;
2805
2806 default:
2807 ret = -EINVAL;
2808 break;
2809 }
2810
2811 unlock:
2812 rtnl_unlock();
2813 if (tun)
2814 tun_put(tun);
2815 return ret;
2816 }
2817
2818 static long tun_chr_ioctl(struct file *file,
2819 unsigned int cmd, unsigned long arg)
2820 {
2821 return __tun_chr_ioctl(file, cmd, arg, sizeof (struct ifreq));
2822 }
2823
2824 #ifdef CONFIG_COMPAT
2825 static long tun_chr_compat_ioctl(struct file *file,
2826 unsigned int cmd, unsigned long arg)
2827 {
2828 switch (cmd) {
2829 case TUNSETIFF:
2830 case TUNGETIFF:
2831 case TUNSETTXFILTER:
2832 case TUNGETSNDBUF:
2833 case TUNSETSNDBUF:
2834 case SIOCGIFHWADDR:
2835 case SIOCSIFHWADDR:
2836 arg = (unsigned long)compat_ptr(arg);
2837 break;
2838 default:
2839 arg = (compat_ulong_t)arg;
2840 break;
2841 }
2842
2843 /*
2844 * compat_ifreq is shorter than ifreq, so we must not access beyond
2845 * the end of that structure. All fields that are used in this
2846 * driver are compatible though, we don't need to convert the
2847 * contents.
2848 */
2849 return __tun_chr_ioctl(file, cmd, arg, sizeof(struct compat_ifreq));
2850 }
2851 #endif /* CONFIG_COMPAT */
2852
2853 static int tun_chr_fasync(int fd, struct file *file, int on)
2854 {
2855 struct tun_file *tfile = file->private_data;
2856 int ret;
2857
2858 if ((ret = fasync_helper(fd, file, on, &tfile->fasync)) < 0)
2859 goto out;
2860
2861 if (on) {
2862 __f_setown(file, task_pid(current), PIDTYPE_PID, 0);
2863 tfile->flags |= TUN_FASYNC;
2864 } else
2865 tfile->flags &= ~TUN_FASYNC;
2866 ret = 0;
2867 out:
2868 return ret;
2869 }
2870
2871 static int tun_chr_open(struct inode *inode, struct file * file)
2872 {
2873 struct net *net = current->nsproxy->net_ns;
2874 struct tun_file *tfile;
2875
2876 DBG1(KERN_INFO, "tunX: tun_chr_open\n");
2877
2878 tfile = (struct tun_file *)sk_alloc(net, AF_UNSPEC, GFP_KERNEL,
2879 &tun_proto, 0);
2880 if (!tfile)
2881 return -ENOMEM;
2882 if (skb_array_init(&tfile->tx_array, 0, GFP_KERNEL)) {
2883 sk_free(&tfile->sk);
2884 return -ENOMEM;
2885 }
2886
2887 mutex_init(&tfile->napi_mutex);
2888 RCU_INIT_POINTER(tfile->tun, NULL);
2889 tfile->flags = 0;
2890 tfile->ifindex = 0;
2891
2892 init_waitqueue_head(&tfile->wq.wait);
2893 RCU_INIT_POINTER(tfile->socket.wq, &tfile->wq);
2894
2895 tfile->socket.file = file;
2896 tfile->socket.ops = &tun_socket_ops;
2897
2898 sock_init_data(&tfile->socket, &tfile->sk);
2899
2900 tfile->sk.sk_write_space = tun_sock_write_space;
2901 tfile->sk.sk_sndbuf = INT_MAX;
2902
2903 file->private_data = tfile;
2904 INIT_LIST_HEAD(&tfile->next);
2905
2906 sock_set_flag(&tfile->sk, SOCK_ZEROCOPY);
2907
2908 return 0;
2909 }
2910
2911 static int tun_chr_close(struct inode *inode, struct file *file)
2912 {
2913 struct tun_file *tfile = file->private_data;
2914
2915 tun_detach(tfile, true);
2916
2917 return 0;
2918 }
2919
2920 #ifdef CONFIG_PROC_FS
2921 static void tun_chr_show_fdinfo(struct seq_file *m, struct file *file)
2922 {
2923 struct tun_file *tfile = file->private_data;
2924 struct tun_struct *tun;
2925 struct ifreq ifr;
2926
2927 memset(&ifr, 0, sizeof(ifr));
2928
2929 rtnl_lock();
2930 tun = tun_get(tfile);
2931 if (tun)
2932 tun_get_iff(current->nsproxy->net_ns, tun, &ifr);
2933 rtnl_unlock();
2934
2935 if (tun)
2936 tun_put(tun);
2937
2938 seq_printf(m, "iff:\t%s\n", ifr.ifr_name);
2939 }
2940 #endif
2941
2942 static const struct file_operations tun_fops = {
2943 .owner = THIS_MODULE,
2944 .llseek = no_llseek,
2945 .read_iter = tun_chr_read_iter,
2946 .write_iter = tun_chr_write_iter,
2947 .poll = tun_chr_poll,
2948 .unlocked_ioctl = tun_chr_ioctl,
2949 #ifdef CONFIG_COMPAT
2950 .compat_ioctl = tun_chr_compat_ioctl,
2951 #endif
2952 .open = tun_chr_open,
2953 .release = tun_chr_close,
2954 .fasync = tun_chr_fasync,
2955 #ifdef CONFIG_PROC_FS
2956 .show_fdinfo = tun_chr_show_fdinfo,
2957 #endif
2958 };
2959
2960 static struct miscdevice tun_miscdev = {
2961 .minor = TUN_MINOR,
2962 .name = "tun",
2963 .nodename = "net/tun",
2964 .fops = &tun_fops,
2965 };
2966
2967 /* ethtool interface */
2968
2969 static int tun_get_link_ksettings(struct net_device *dev,
2970 struct ethtool_link_ksettings *cmd)
2971 {
2972 ethtool_link_ksettings_zero_link_mode(cmd, supported);
2973 ethtool_link_ksettings_zero_link_mode(cmd, advertising);
2974 cmd->base.speed = SPEED_10;
2975 cmd->base.duplex = DUPLEX_FULL;
2976 cmd->base.port = PORT_TP;
2977 cmd->base.phy_address = 0;
2978 cmd->base.autoneg = AUTONEG_DISABLE;
2979 return 0;
2980 }
2981
2982 static void tun_get_drvinfo(struct net_device *dev, struct ethtool_drvinfo *info)
2983 {
2984 struct tun_struct *tun = netdev_priv(dev);
2985
2986 strlcpy(info->driver, DRV_NAME, sizeof(info->driver));
2987 strlcpy(info->version, DRV_VERSION, sizeof(info->version));
2988
2989 switch (tun->flags & TUN_TYPE_MASK) {
2990 case IFF_TUN:
2991 strlcpy(info->bus_info, "tun", sizeof(info->bus_info));
2992 break;
2993 case IFF_TAP:
2994 strlcpy(info->bus_info, "tap", sizeof(info->bus_info));
2995 break;
2996 }
2997 }
2998
2999 static u32 tun_get_msglevel(struct net_device *dev)
3000 {
3001 #ifdef TUN_DEBUG
3002 struct tun_struct *tun = netdev_priv(dev);
3003 return tun->debug;
3004 #else
3005 return -EOPNOTSUPP;
3006 #endif
3007 }
3008
3009 static void tun_set_msglevel(struct net_device *dev, u32 value)
3010 {
3011 #ifdef TUN_DEBUG
3012 struct tun_struct *tun = netdev_priv(dev);
3013 tun->debug = value;
3014 #endif
3015 }
3016
3017 static int tun_get_coalesce(struct net_device *dev,
3018 struct ethtool_coalesce *ec)
3019 {
3020 struct tun_struct *tun = netdev_priv(dev);
3021
3022 ec->rx_max_coalesced_frames = tun->rx_batched;
3023
3024 return 0;
3025 }
3026
3027 static int tun_set_coalesce(struct net_device *dev,
3028 struct ethtool_coalesce *ec)
3029 {
3030 struct tun_struct *tun = netdev_priv(dev);
3031
3032 if (ec->rx_max_coalesced_frames > NAPI_POLL_WEIGHT)
3033 tun->rx_batched = NAPI_POLL_WEIGHT;
3034 else
3035 tun->rx_batched = ec->rx_max_coalesced_frames;
3036
3037 return 0;
3038 }
3039
3040 static const struct ethtool_ops tun_ethtool_ops = {
3041 .get_drvinfo = tun_get_drvinfo,
3042 .get_msglevel = tun_get_msglevel,
3043 .set_msglevel = tun_set_msglevel,
3044 .get_link = ethtool_op_get_link,
3045 .get_ts_info = ethtool_op_get_ts_info,
3046 .get_coalesce = tun_get_coalesce,
3047 .set_coalesce = tun_set_coalesce,
3048 .get_link_ksettings = tun_get_link_ksettings,
3049 };
3050
3051 static int tun_queue_resize(struct tun_struct *tun)
3052 {
3053 struct net_device *dev = tun->dev;
3054 struct tun_file *tfile;
3055 struct skb_array **arrays;
3056 int n = tun->numqueues + tun->numdisabled;
3057 int ret, i;
3058
3059 arrays = kmalloc_array(n, sizeof(*arrays), GFP_KERNEL);
3060 if (!arrays)
3061 return -ENOMEM;
3062
3063 for (i = 0; i < tun->numqueues; i++) {
3064 tfile = rtnl_dereference(tun->tfiles[i]);
3065 arrays[i] = &tfile->tx_array;
3066 }
3067 list_for_each_entry(tfile, &tun->disabled, next)
3068 arrays[i++] = &tfile->tx_array;
3069
3070 ret = skb_array_resize_multiple(arrays, n,
3071 dev->tx_queue_len, GFP_KERNEL);
3072
3073 kfree(arrays);
3074 return ret;
3075 }
3076
3077 static int tun_device_event(struct notifier_block *unused,
3078 unsigned long event, void *ptr)
3079 {
3080 struct net_device *dev = netdev_notifier_info_to_dev(ptr);
3081 struct tun_struct *tun = netdev_priv(dev);
3082
3083 if (dev->rtnl_link_ops != &tun_link_ops)
3084 return NOTIFY_DONE;
3085
3086 switch (event) {
3087 case NETDEV_CHANGE_TX_QUEUE_LEN:
3088 if (tun_queue_resize(tun))
3089 return NOTIFY_BAD;
3090 break;
3091 default:
3092 break;
3093 }
3094
3095 return NOTIFY_DONE;
3096 }
3097
3098 static struct notifier_block tun_notifier_block __read_mostly = {
3099 .notifier_call = tun_device_event,
3100 };
3101
3102 static int __init tun_init(void)
3103 {
3104 int ret = 0;
3105
3106 pr_info("%s, %s\n", DRV_DESCRIPTION, DRV_VERSION);
3107
3108 ret = rtnl_link_register(&tun_link_ops);
3109 if (ret) {
3110 pr_err("Can't register link_ops\n");
3111 goto err_linkops;
3112 }
3113
3114 ret = misc_register(&tun_miscdev);
3115 if (ret) {
3116 pr_err("Can't register misc device %d\n", TUN_MINOR);
3117 goto err_misc;
3118 }
3119
3120 ret = register_netdevice_notifier(&tun_notifier_block);
3121 if (ret) {
3122 pr_err("Can't register netdevice notifier\n");
3123 goto err_notifier;
3124 }
3125
3126 return 0;
3127
3128 err_notifier:
3129 misc_deregister(&tun_miscdev);
3130 err_misc:
3131 rtnl_link_unregister(&tun_link_ops);
3132 err_linkops:
3133 return ret;
3134 }
3135
3136 static void tun_cleanup(void)
3137 {
3138 misc_deregister(&tun_miscdev);
3139 rtnl_link_unregister(&tun_link_ops);
3140 unregister_netdevice_notifier(&tun_notifier_block);
3141 }
3142
3143 /* Get an underlying socket object from tun file. Returns error unless file is
3144 * attached to a device. The returned object works like a packet socket, it
3145 * can be used for sock_sendmsg/sock_recvmsg. The caller is responsible for
3146 * holding a reference to the file for as long as the socket is in use. */
3147 struct socket *tun_get_socket(struct file *file)
3148 {
3149 struct tun_file *tfile;
3150 if (file->f_op != &tun_fops)
3151 return ERR_PTR(-EINVAL);
3152 tfile = file->private_data;
3153 if (!tfile)
3154 return ERR_PTR(-EBADFD);
3155 return &tfile->socket;
3156 }
3157 EXPORT_SYMBOL_GPL(tun_get_socket);
3158
3159 struct skb_array *tun_get_skb_array(struct file *file)
3160 {
3161 struct tun_file *tfile;
3162
3163 if (file->f_op != &tun_fops)
3164 return ERR_PTR(-EINVAL);
3165 tfile = file->private_data;
3166 if (!tfile)
3167 return ERR_PTR(-EBADFD);
3168 return &tfile->tx_array;
3169 }
3170 EXPORT_SYMBOL_GPL(tun_get_skb_array);
3171
3172 module_init(tun_init);
3173 module_exit(tun_cleanup);
3174 MODULE_DESCRIPTION(DRV_DESCRIPTION);
3175 MODULE_AUTHOR(DRV_COPYRIGHT);
3176 MODULE_LICENSE("GPL");
3177 MODULE_ALIAS_MISCDEV(TUN_MINOR);
3178 MODULE_ALIAS("devname:net/tun");