46497c690a446a6a27418aba9d5b9ca92c501d1d
[sliver-openvswitch.git] / datapath / datapath.c
1 /*
2  * Copyright (c) 2007, 2008, 2009, 2010 Nicira Networks.
3  * Distributed under the terms of the GNU GPL version 2.
4  *
5  * Significant portions of this file may be copied from parts of the Linux
6  * kernel, by Linus Torvalds and others.
7  */
8
9 /* Functions for managing the dp interface/device. */
10
11 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
12
13 #include <linux/init.h>
14 #include <linux/module.h>
15 #include <linux/fs.h>
16 #include <linux/if_arp.h>
17 #include <linux/if_vlan.h>
18 #include <linux/in.h>
19 #include <linux/ip.h>
20 #include <linux/delay.h>
21 #include <linux/time.h>
22 #include <linux/etherdevice.h>
23 #include <linux/kernel.h>
24 #include <linux/kthread.h>
25 #include <linux/mutex.h>
26 #include <linux/percpu.h>
27 #include <linux/rcupdate.h>
28 #include <linux/tcp.h>
29 #include <linux/udp.h>
30 #include <linux/version.h>
31 #include <linux/ethtool.h>
32 #include <linux/wait.h>
33 #include <asm/system.h>
34 #include <asm/div64.h>
35 #include <asm/bug.h>
36 #include <linux/highmem.h>
37 #include <linux/netfilter_bridge.h>
38 #include <linux/netfilter_ipv4.h>
39 #include <linux/inetdevice.h>
40 #include <linux/list.h>
41 #include <linux/rculist.h>
42 #include <linux/dmi.h>
43 #include <net/inet_ecn.h>
44 #include <linux/compat.h>
45
46 #include "openvswitch/datapath-protocol.h"
47 #include "datapath.h"
48 #include "actions.h"
49 #include "flow.h"
50 #include "odp-compat.h"
51 #include "table.h"
52 #include "vport-internal_dev.h"
53
54 #include "compat.h"
55
56
57 int (*dp_ioctl_hook)(struct net_device *dev, struct ifreq *rq, int cmd);
58 EXPORT_SYMBOL(dp_ioctl_hook);
59
60 /* Datapaths.  Protected on the read side by rcu_read_lock, on the write side
61  * by dp_mutex.
62  *
63  * dp_mutex nests inside the RTNL lock: if you need both you must take the RTNL
64  * lock first.
65  *
66  * It is safe to access the datapath and dp_port structures with just
67  * dp_mutex.
68  */
69 static struct datapath *dps[ODP_MAX];
70 static DEFINE_MUTEX(dp_mutex);
71
72 /* We limit the number of times that we pass into dp_process_received_packet()
73  * to avoid blowing out the stack in the event that we have a loop. */
74 struct loop_counter {
75         int count;              /* Count. */
76         bool looping;           /* Loop detected? */
77 };
78
79 #define DP_MAX_LOOPS 5
80
81 /* We use a separate counter for each CPU for both interrupt and non-interrupt
82  * context in order to keep the limit deterministic for a given packet. */
83 struct percpu_loop_counters {
84         struct loop_counter counters[2];
85 };
86
87 static DEFINE_PER_CPU(struct percpu_loop_counters, dp_loop_counters);
88
89 static int new_dp_port(struct datapath *, struct odp_port *, int port_no);
90
91 /* Must be called with rcu_read_lock or dp_mutex. */
92 struct datapath *get_dp(int dp_idx)
93 {
94         if (dp_idx < 0 || dp_idx >= ODP_MAX)
95                 return NULL;
96         return rcu_dereference(dps[dp_idx]);
97 }
98 EXPORT_SYMBOL_GPL(get_dp);
99
100 static struct datapath *get_dp_locked(int dp_idx)
101 {
102         struct datapath *dp;
103
104         mutex_lock(&dp_mutex);
105         dp = get_dp(dp_idx);
106         if (dp)
107                 mutex_lock(&dp->mutex);
108         mutex_unlock(&dp_mutex);
109         return dp;
110 }
111
112 /* Must be called with rcu_read_lock or RTNL lock. */
113 const char *dp_name(const struct datapath *dp)
114 {
115         return vport_get_name(dp->ports[ODPP_LOCAL]->vport);
116 }
117
118 static inline size_t br_nlmsg_size(void)
119 {
120         return NLMSG_ALIGN(sizeof(struct ifinfomsg))
121                + nla_total_size(IFNAMSIZ) /* IFLA_IFNAME */
122                + nla_total_size(MAX_ADDR_LEN) /* IFLA_ADDRESS */
123                + nla_total_size(4) /* IFLA_MASTER */
124                + nla_total_size(4) /* IFLA_MTU */
125                + nla_total_size(4) /* IFLA_LINK */
126                + nla_total_size(1); /* IFLA_OPERSTATE */
127 }
128
129 static int dp_fill_ifinfo(struct sk_buff *skb,
130                           const struct dp_port *port,
131                           int event, unsigned int flags)
132 {
133         const struct datapath *dp = port->dp;
134         int ifindex = vport_get_ifindex(port->vport);
135         int iflink = vport_get_iflink(port->vport);
136         struct ifinfomsg *hdr;
137         struct nlmsghdr *nlh;
138
139         if (ifindex < 0)
140                 return ifindex;
141
142         if (iflink < 0)
143                 return iflink;
144
145         nlh = nlmsg_put(skb, 0, 0, event, sizeof(*hdr), flags);
146         if (nlh == NULL)
147                 return -EMSGSIZE;
148
149         hdr = nlmsg_data(nlh);
150         hdr->ifi_family = AF_BRIDGE;
151         hdr->__ifi_pad = 0;
152         hdr->ifi_type = ARPHRD_ETHER;
153         hdr->ifi_index = ifindex;
154         hdr->ifi_flags = vport_get_flags(port->vport);
155         hdr->ifi_change = 0;
156
157         NLA_PUT_STRING(skb, IFLA_IFNAME, vport_get_name(port->vport));
158         NLA_PUT_U32(skb, IFLA_MASTER, vport_get_ifindex(dp->ports[ODPP_LOCAL]->vport));
159         NLA_PUT_U32(skb, IFLA_MTU, vport_get_mtu(port->vport));
160 #ifdef IFLA_OPERSTATE
161         NLA_PUT_U8(skb, IFLA_OPERSTATE,
162                    vport_is_running(port->vport)
163                         ? vport_get_operstate(port->vport)
164                         : IF_OPER_DOWN);
165 #endif
166
167         NLA_PUT(skb, IFLA_ADDRESS, ETH_ALEN,
168                                         vport_get_addr(port->vport));
169
170         if (ifindex != iflink)
171                 NLA_PUT_U32(skb, IFLA_LINK,iflink);
172
173         return nlmsg_end(skb, nlh);
174
175 nla_put_failure:
176         nlmsg_cancel(skb, nlh);
177         return -EMSGSIZE;
178 }
179
180 static void dp_ifinfo_notify(int event, struct dp_port *port)
181 {
182         struct sk_buff *skb;
183         int err = -ENOBUFS;
184
185         skb = nlmsg_new(br_nlmsg_size(), GFP_KERNEL);
186         if (skb == NULL)
187                 goto errout;
188
189         err = dp_fill_ifinfo(skb, port, event, 0);
190         if (err < 0) {
191                 /* -EMSGSIZE implies BUG in br_nlmsg_size() */
192                 WARN_ON(err == -EMSGSIZE);
193                 kfree_skb(skb);
194                 goto errout;
195         }
196         rtnl_notify(skb, &init_net, 0, RTNLGRP_LINK, NULL, GFP_KERNEL);
197         return;
198 errout:
199         if (err < 0)
200                 rtnl_set_sk_err(&init_net, RTNLGRP_LINK, err);
201 }
202
203 static void release_dp(struct kobject *kobj)
204 {
205         struct datapath *dp = container_of(kobj, struct datapath, ifobj);
206         kfree(dp);
207 }
208
209 static struct kobj_type dp_ktype = {
210         .release = release_dp
211 };
212
213 static int create_dp(int dp_idx, const char __user *devnamep)
214 {
215         struct odp_port internal_dev_port;
216         char devname[IFNAMSIZ];
217         struct datapath *dp;
218         int err;
219         int i;
220
221         if (devnamep) {
222                 int retval = strncpy_from_user(devname, devnamep, IFNAMSIZ);
223                 if (retval < 0) {
224                         err = -EFAULT;
225                         goto err;
226                 } else if (retval >= IFNAMSIZ) {
227                         err = -ENAMETOOLONG;
228                         goto err;
229                 }
230         } else {
231                 snprintf(devname, sizeof devname, "of%d", dp_idx);
232         }
233
234         rtnl_lock();
235         mutex_lock(&dp_mutex);
236         err = -ENODEV;
237         if (!try_module_get(THIS_MODULE))
238                 goto err_unlock;
239
240         /* Exit early if a datapath with that number already exists.
241          * (We don't use -EEXIST because that's ambiguous with 'devname'
242          * conflicting with an existing network device name.) */
243         err = -EBUSY;
244         if (get_dp(dp_idx))
245                 goto err_put_module;
246
247         err = -ENOMEM;
248         dp = kzalloc(sizeof *dp, GFP_KERNEL);
249         if (dp == NULL)
250                 goto err_put_module;
251         INIT_LIST_HEAD(&dp->port_list);
252         mutex_init(&dp->mutex);
253         dp->dp_idx = dp_idx;
254         for (i = 0; i < DP_N_QUEUES; i++)
255                 skb_queue_head_init(&dp->queues[i]);
256         init_waitqueue_head(&dp->waitqueue);
257
258         /* Initialize kobject for bridge.  This will be added as
259          * /sys/class/net/<devname>/brif later, if sysfs is enabled. */
260         dp->ifobj.kset = NULL;
261         kobject_init(&dp->ifobj, &dp_ktype);
262
263         /* Allocate table. */
264         err = -ENOMEM;
265         rcu_assign_pointer(dp->table, tbl_create(0));
266         if (!dp->table)
267                 goto err_free_dp;
268
269         /* Set up our datapath device. */
270         BUILD_BUG_ON(sizeof(internal_dev_port.devname) != sizeof(devname));
271         strcpy(internal_dev_port.devname, devname);
272         internal_dev_port.flags = ODP_PORT_INTERNAL;
273         err = new_dp_port(dp, &internal_dev_port, ODPP_LOCAL);
274         if (err) {
275                 if (err == -EBUSY)
276                         err = -EEXIST;
277
278                 goto err_destroy_table;
279         }
280
281         dp->drop_frags = 0;
282         dp->stats_percpu = alloc_percpu(struct dp_stats_percpu);
283         if (!dp->stats_percpu)
284                 goto err_destroy_local_port;
285
286         rcu_assign_pointer(dps[dp_idx], dp);
287         mutex_unlock(&dp_mutex);
288         rtnl_unlock();
289
290         dp_sysfs_add_dp(dp);
291
292         return 0;
293
294 err_destroy_local_port:
295         dp_detach_port(dp->ports[ODPP_LOCAL], 1);
296 err_destroy_table:
297         tbl_destroy(dp->table, NULL);
298 err_free_dp:
299         kfree(dp);
300 err_put_module:
301         module_put(THIS_MODULE);
302 err_unlock:
303         mutex_unlock(&dp_mutex);
304         rtnl_unlock();
305 err:
306         return err;
307 }
308
309 static void do_destroy_dp(struct datapath *dp)
310 {
311         struct dp_port *p, *n;
312         int i;
313
314         list_for_each_entry_safe (p, n, &dp->port_list, node)
315                 if (p->port_no != ODPP_LOCAL)
316                         dp_detach_port(p, 1);
317
318         dp_sysfs_del_dp(dp);
319
320         rcu_assign_pointer(dps[dp->dp_idx], NULL);
321
322         dp_detach_port(dp->ports[ODPP_LOCAL], 1);
323
324         tbl_destroy(dp->table, flow_free_tbl);
325
326         for (i = 0; i < DP_N_QUEUES; i++)
327                 skb_queue_purge(&dp->queues[i]);
328         free_percpu(dp->stats_percpu);
329         kobject_put(&dp->ifobj);
330         module_put(THIS_MODULE);
331 }
332
333 static int destroy_dp(int dp_idx)
334 {
335         struct datapath *dp;
336         int err;
337
338         rtnl_lock();
339         mutex_lock(&dp_mutex);
340         dp = get_dp(dp_idx);
341         err = -ENODEV;
342         if (!dp)
343                 goto err_unlock;
344
345         do_destroy_dp(dp);
346         err = 0;
347
348 err_unlock:
349         mutex_unlock(&dp_mutex);
350         rtnl_unlock();
351         return err;
352 }
353
354 static void release_dp_port(struct kobject *kobj)
355 {
356         struct dp_port *p = container_of(kobj, struct dp_port, kobj);
357         kfree(p);
358 }
359
360 static struct kobj_type brport_ktype = {
361 #ifdef CONFIG_SYSFS
362         .sysfs_ops = &brport_sysfs_ops,
363 #endif
364         .release = release_dp_port
365 };
366
367 /* Called with RTNL lock and dp_mutex. */
368 static int new_dp_port(struct datapath *dp, struct odp_port *odp_port, int port_no)
369 {
370         struct vport *vport;
371         struct dp_port *p;
372         int err;
373
374         vport = vport_locate(odp_port->devname);
375         if (!vport) {
376                 vport_lock();
377
378                 if (odp_port->flags & ODP_PORT_INTERNAL)
379                         vport = vport_add(odp_port->devname, "internal", NULL);
380                 else
381                         vport = vport_add(odp_port->devname, "netdev", NULL);
382
383                 vport_unlock();
384
385                 if (IS_ERR(vport))
386                         return PTR_ERR(vport);
387         }
388
389         p = kzalloc(sizeof(*p), GFP_KERNEL);
390         if (!p)
391                 return -ENOMEM;
392
393         p->port_no = port_no;
394         p->dp = dp;
395         p->vport = vport;
396         atomic_set(&p->sflow_pool, 0);
397
398         err = vport_attach(vport, p);
399         if (err) {
400                 kfree(p);
401                 return err;
402         }
403
404         rcu_assign_pointer(dp->ports[port_no], p);
405         list_add_rcu(&p->node, &dp->port_list);
406         dp->n_ports++;
407
408         /* Initialize kobject for bridge.  This will be added as
409          * /sys/class/net/<devname>/brport later, if sysfs is enabled. */
410         p->kobj.kset = NULL;
411         kobject_init(&p->kobj, &brport_ktype);
412
413         dp_ifinfo_notify(RTM_NEWLINK, p);
414
415         return 0;
416 }
417
418 static int attach_port(int dp_idx, struct odp_port __user *portp)
419 {
420         struct datapath *dp;
421         struct odp_port port;
422         int port_no;
423         int err;
424
425         err = -EFAULT;
426         if (copy_from_user(&port, portp, sizeof port))
427                 goto out;
428         port.devname[IFNAMSIZ - 1] = '\0';
429
430         rtnl_lock();
431         dp = get_dp_locked(dp_idx);
432         err = -ENODEV;
433         if (!dp)
434                 goto out_unlock_rtnl;
435
436         for (port_no = 1; port_no < DP_MAX_PORTS; port_no++)
437                 if (!dp->ports[port_no])
438                         goto got_port_no;
439         err = -EFBIG;
440         goto out_unlock_dp;
441
442 got_port_no:
443         err = new_dp_port(dp, &port, port_no);
444         if (err)
445                 goto out_unlock_dp;
446
447         set_internal_devs_mtu(dp);
448         dp_sysfs_add_if(dp->ports[port_no]);
449
450         err = put_user(port_no, &portp->port);
451
452 out_unlock_dp:
453         mutex_unlock(&dp->mutex);
454 out_unlock_rtnl:
455         rtnl_unlock();
456 out:
457         return err;
458 }
459
460 int dp_detach_port(struct dp_port *p, int may_delete)
461 {
462         struct vport *vport = p->vport;
463         int err;
464
465         ASSERT_RTNL();
466
467         if (p->port_no != ODPP_LOCAL)
468                 dp_sysfs_del_if(p);
469         dp_ifinfo_notify(RTM_DELLINK, p);
470
471         /* First drop references to device. */
472         p->dp->n_ports--;
473         list_del_rcu(&p->node);
474         rcu_assign_pointer(p->dp->ports[p->port_no], NULL);
475
476         err = vport_detach(vport);
477         if (err)
478                 return err;
479
480         /* Then wait until no one is still using it, and destroy it. */
481         synchronize_rcu();
482
483         if (may_delete) {
484                 const char *port_type = vport_get_type(vport);
485
486                 if (!strcmp(port_type, "netdev") || !strcmp(port_type, "internal")) {
487                         vport_lock();
488                         vport_del(vport);
489                         vport_unlock();
490                 }
491         }
492
493         kobject_put(&p->kobj);
494
495         return 0;
496 }
497
498 static int detach_port(int dp_idx, int port_no)
499 {
500         struct dp_port *p;
501         struct datapath *dp;
502         int err;
503
504         err = -EINVAL;
505         if (port_no < 0 || port_no >= DP_MAX_PORTS || port_no == ODPP_LOCAL)
506                 goto out;
507
508         rtnl_lock();
509         dp = get_dp_locked(dp_idx);
510         err = -ENODEV;
511         if (!dp)
512                 goto out_unlock_rtnl;
513
514         p = dp->ports[port_no];
515         err = -ENOENT;
516         if (!p)
517                 goto out_unlock_dp;
518
519         err = dp_detach_port(p, 1);
520
521 out_unlock_dp:
522         mutex_unlock(&dp->mutex);
523 out_unlock_rtnl:
524         rtnl_unlock();
525 out:
526         return err;
527 }
528
529 static void suppress_loop(struct datapath *dp, struct sw_flow_actions *actions)
530 {
531         if (net_ratelimit())
532                 pr_warn("%s: flow looped %d times, dropping\n",
533                         dp_name(dp), DP_MAX_LOOPS);
534         actions->n_actions = 0;
535 }
536
537 /* Must be called with rcu_read_lock. */
538 void dp_process_received_packet(struct dp_port *p, struct sk_buff *skb)
539 {
540         struct datapath *dp = p->dp;
541         struct dp_stats_percpu *stats;
542         int stats_counter_off;
543         struct sw_flow_actions *acts;
544         struct loop_counter *loop;
545         int error;
546
547         OVS_CB(skb)->dp_port = p;
548
549         if (!OVS_CB(skb)->flow) {
550                 struct odp_flow_key key;
551                 struct tbl_node *flow_node;
552                 bool is_frag;
553
554                 /* Extract flow from 'skb' into 'key'. */
555                 error = flow_extract(skb, p ? p->port_no : ODPP_NONE, &key, &is_frag);
556                 if (unlikely(error)) {
557                         kfree_skb(skb);
558                         return;
559                 }
560
561                 if (is_frag && dp->drop_frags) {
562                         kfree_skb(skb);
563                         stats_counter_off = offsetof(struct dp_stats_percpu, n_frags);
564                         goto out;
565                 }
566
567                 /* Look up flow. */
568                 flow_node = tbl_lookup(rcu_dereference(dp->table), &key,
569                                         flow_hash(&key), flow_cmp);
570                 if (unlikely(!flow_node)) {
571                         dp_output_control(dp, skb, _ODPL_MISS_NR, OVS_CB(skb)->tun_id);
572                         stats_counter_off = offsetof(struct dp_stats_percpu, n_missed);
573                         goto out;
574                 }
575
576                 OVS_CB(skb)->flow = flow_cast(flow_node);
577         }
578
579         flow_used(OVS_CB(skb)->flow, skb);
580
581         acts = rcu_dereference(OVS_CB(skb)->flow->sf_acts);
582
583         /* Check whether we've looped too much. */
584         loop = &get_cpu_var(dp_loop_counters).counters[!!in_interrupt()];
585         if (unlikely(++loop->count > DP_MAX_LOOPS))
586                 loop->looping = true;
587         if (unlikely(loop->looping)) {
588                 suppress_loop(dp, acts);
589                 goto out_loop;
590         }
591
592         /* Execute actions. */
593         execute_actions(dp, skb, &OVS_CB(skb)->flow->key, acts->actions,
594                         acts->n_actions, GFP_ATOMIC);
595         stats_counter_off = offsetof(struct dp_stats_percpu, n_hit);
596
597         /* Check whether sub-actions looped too much. */
598         if (unlikely(loop->looping))
599                 suppress_loop(dp, acts);
600
601 out_loop:
602         /* Decrement loop counter. */
603         if (!--loop->count)
604                 loop->looping = false;
605         put_cpu_var(dp_loop_counters);
606
607 out:
608         /* Update datapath statistics. */
609         local_bh_disable();
610         stats = per_cpu_ptr(dp->stats_percpu, smp_processor_id());
611
612         write_seqcount_begin(&stats->seqlock);
613         (*(u64 *)((u8 *)stats + stats_counter_off))++;
614         write_seqcount_end(&stats->seqlock);
615
616         local_bh_enable();
617 }
618
619 #if defined(CONFIG_XEN) && defined(HAVE_PROTO_DATA_VALID)
620 /* This code is based on skb_checksum_setup() from Xen's net/dev/core.c.  We
621  * can't call this function directly because it isn't exported in all
622  * versions. */
623 int vswitch_skb_checksum_setup(struct sk_buff *skb)
624 {
625         struct iphdr *iph;
626         unsigned char *th;
627         int err = -EPROTO;
628         __u16 csum_start, csum_offset;
629
630         if (!skb->proto_csum_blank)
631                 return 0;
632
633         if (skb->protocol != htons(ETH_P_IP))
634                 goto out;
635
636         if (!pskb_may_pull(skb, skb_network_header(skb) + sizeof(struct iphdr) - skb->data))
637                 goto out;
638
639         iph = ip_hdr(skb);
640         th = skb_network_header(skb) + 4 * iph->ihl;
641
642         csum_start = th - skb->head;
643         switch (iph->protocol) {
644         case IPPROTO_TCP:
645                 csum_offset = offsetof(struct tcphdr, check);
646                 break;
647         case IPPROTO_UDP:
648                 csum_offset = offsetof(struct udphdr, check);
649                 break;
650         default:
651                 if (net_ratelimit())
652                         pr_err("Attempting to checksum a non-TCP/UDP packet, "
653                                "dropping a protocol %d packet",
654                                iph->protocol);
655                 goto out;
656         }
657
658         if (!pskb_may_pull(skb, th + csum_offset + 2 - skb->data))
659                 goto out;
660
661         skb->ip_summed = CHECKSUM_PARTIAL;
662         skb->proto_csum_blank = 0;
663
664 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,22)
665         skb->csum_start = csum_start;
666         skb->csum_offset = csum_offset;
667 #else
668         skb_set_transport_header(skb, csum_start - skb_headroom(skb));
669         skb->csum = csum_offset;
670 #endif
671
672         err = 0;
673
674 out:
675         return err;
676 }
677 #endif /* CONFIG_XEN && HAVE_PROTO_DATA_VALID */
678
679  /* Types of checksums that we can receive (these all refer to L4 checksums):
680  * 1. CHECKSUM_NONE: Device that did not compute checksum, contains full
681  *      (though not verified) checksum in packet but not in skb->csum.  Packets
682  *      from the bridge local port will also have this type.
683  * 2. CHECKSUM_COMPLETE (CHECKSUM_HW): Good device that computes checksums,
684  *      also the GRE module.  This is the same as CHECKSUM_NONE, except it has
685  *      a valid skb->csum.  Importantly, both contain a full checksum (not
686  *      verified) in the packet itself.  The only difference is that if the
687  *      packet gets to L4 processing on this machine (not in DomU) we won't
688  *      have to recompute the checksum to verify.  Most hardware devices do not
689  *      produce packets with this type, even if they support receive checksum
690  *      offloading (they produce type #5).
691  * 3. CHECKSUM_PARTIAL (CHECKSUM_HW): Packet without full checksum and needs to
692  *      be computed if it is sent off box.  Unfortunately on earlier kernels,
693  *      this case is impossible to distinguish from #2, despite having opposite
694  *      meanings.  Xen adds an extra field on earlier kernels (see #4) in order
695  *      to distinguish the different states.
696  * 4. CHECKSUM_UNNECESSARY (with proto_csum_blank true): This packet was
697  *      generated locally by a Xen DomU and has a partial checksum.  If it is
698  *      handled on this machine (Dom0 or DomU), then the checksum will not be
699  *      computed.  If it goes off box, the checksum in the packet needs to be
700  *      completed.  Calling skb_checksum_setup converts this to CHECKSUM_HW
701  *      (CHECKSUM_PARTIAL) so that the checksum can be completed.  In later
702  *      kernels, this combination is replaced with CHECKSUM_PARTIAL.
703  * 5. CHECKSUM_UNNECESSARY (with proto_csum_blank false): Packet with a correct
704  *      full checksum or using a protocol without a checksum.  skb->csum is
705  *      undefined.  This is common from devices with receive checksum
706  *      offloading.  This is somewhat similar to CHECKSUM_NONE, except that
707  *      nobody will try to verify the checksum with CHECKSUM_UNNECESSARY.
708  *
709  * Note that on earlier kernels, CHECKSUM_COMPLETE and CHECKSUM_PARTIAL are
710  * both defined as CHECKSUM_HW.  Normally the meaning of CHECKSUM_HW is clear
711  * based on whether it is on the transmit or receive path.  After the datapath
712  * it will be intepreted as CHECKSUM_PARTIAL.  If the packet already has a
713  * checksum, we will panic.  Since we can receive packets with checksums, we
714  * assume that all CHECKSUM_HW packets have checksums and map them to
715  * CHECKSUM_NONE, which has a similar meaning (the it is only different if the
716  * packet is processed by the local IP stack, in which case it will need to
717  * be reverified).  If we receive a packet with CHECKSUM_HW that really means
718  * CHECKSUM_PARTIAL, it will be sent with the wrong checksum.  However, there
719  * shouldn't be any devices that do this with bridging. */
720 void compute_ip_summed(struct sk_buff *skb, bool xmit)
721 {
722         /* For our convenience these defines change repeatedly between kernel
723          * versions, so we can't just copy them over... */
724         switch (skb->ip_summed) {
725         case CHECKSUM_NONE:
726                 OVS_CB(skb)->ip_summed = OVS_CSUM_NONE;
727                 break;
728         case CHECKSUM_UNNECESSARY:
729                 OVS_CB(skb)->ip_summed = OVS_CSUM_UNNECESSARY;
730                 break;
731 #ifdef CHECKSUM_HW
732         /* In theory this could be either CHECKSUM_PARTIAL or CHECKSUM_COMPLETE.
733          * However, on the receive side we should only get CHECKSUM_PARTIAL
734          * packets from Xen, which uses some special fields to represent this
735          * (see below).  Since we can only make one type work, pick the one
736          * that actually happens in practice.
737          *
738          * On the transmit side (basically after skb_checksum_setup()
739          * has been run or on internal dev transmit), packets with
740          * CHECKSUM_COMPLETE aren't generated, so assume CHECKSUM_PARTIAL. */
741         case CHECKSUM_HW:
742                 if (!xmit)
743                         OVS_CB(skb)->ip_summed = OVS_CSUM_COMPLETE;
744                 else
745                         OVS_CB(skb)->ip_summed = OVS_CSUM_PARTIAL;
746
747                 break;
748 #else
749         case CHECKSUM_COMPLETE:
750                 OVS_CB(skb)->ip_summed = OVS_CSUM_COMPLETE;
751                 break;
752         case CHECKSUM_PARTIAL:
753                 OVS_CB(skb)->ip_summed = OVS_CSUM_PARTIAL;
754                 break;
755 #endif
756         default:
757                 pr_err("unknown checksum type %d\n", skb->ip_summed);
758                 /* None seems the safest... */
759                 OVS_CB(skb)->ip_summed = OVS_CSUM_NONE;
760         }
761
762 #if defined(CONFIG_XEN) && defined(HAVE_PROTO_DATA_VALID)
763         /* Xen has a special way of representing CHECKSUM_PARTIAL on older
764          * kernels. It should not be set on the transmit path though. */
765         if (skb->proto_csum_blank)
766                 OVS_CB(skb)->ip_summed = OVS_CSUM_PARTIAL;
767
768         WARN_ON_ONCE(skb->proto_csum_blank && xmit);
769 #endif
770 }
771
772 /* This function closely resembles skb_forward_csum() used by the bridge.  It
773  * is slightly different because we are only concerned with bridging and not
774  * other types of forwarding and can get away with slightly more optimal
775  * behavior.*/
776 void forward_ip_summed(struct sk_buff *skb)
777 {
778 #ifdef CHECKSUM_HW
779         if (OVS_CB(skb)->ip_summed == OVS_CSUM_COMPLETE)
780                 skb->ip_summed = CHECKSUM_NONE;
781 #endif
782 }
783
784 /* Append each packet in 'skb' list to 'queue'.  There will be only one packet
785  * unless we broke up a GSO packet. */
786 static int queue_control_packets(struct sk_buff *skb, struct sk_buff_head *queue,
787                                  int queue_no, u32 arg)
788 {
789         struct sk_buff *nskb;
790         int port_no;
791         int err;
792
793         if (OVS_CB(skb)->dp_port)
794                 port_no = OVS_CB(skb)->dp_port->port_no;
795         else
796                 port_no = ODPP_LOCAL;
797
798         do {
799                 struct odp_msg *header;
800
801                 nskb = skb->next;
802                 skb->next = NULL;
803
804                 err = skb_cow(skb, sizeof *header);
805                 if (err)
806                         goto err_kfree_skbs;
807
808                 header = (struct odp_msg*)__skb_push(skb, sizeof *header);
809                 header->type = queue_no;
810                 header->length = skb->len;
811                 header->port = port_no;
812                 header->reserved = 0;
813                 header->arg = arg;
814                 skb_queue_tail(queue, skb);
815
816                 skb = nskb;
817         } while (skb);
818         return 0;
819
820 err_kfree_skbs:
821         kfree_skb(skb);
822         while ((skb = nskb) != NULL) {
823                 nskb = skb->next;
824                 kfree_skb(skb);
825         }
826         return err;
827 }
828
829 int dp_output_control(struct datapath *dp, struct sk_buff *skb, int queue_no,
830                       u32 arg)
831 {
832         struct dp_stats_percpu *stats;
833         struct sk_buff_head *queue;
834         int err;
835
836         WARN_ON_ONCE(skb_shared(skb));
837         BUG_ON(queue_no != _ODPL_MISS_NR && queue_no != _ODPL_ACTION_NR && queue_no != _ODPL_SFLOW_NR);
838         queue = &dp->queues[queue_no];
839         err = -ENOBUFS;
840         if (skb_queue_len(queue) >= DP_MAX_QUEUE_LEN)
841                 goto err_kfree_skb;
842
843         forward_ip_summed(skb);
844
845         err = vswitch_skb_checksum_setup(skb);
846         if (err)
847                 goto err_kfree_skb;
848
849         /* Break apart GSO packets into their component pieces.  Otherwise
850          * userspace may try to stuff a 64kB packet into a 1500-byte MTU. */
851         if (skb_is_gso(skb)) {
852                 struct sk_buff *nskb = skb_gso_segment(skb, NETIF_F_SG | NETIF_F_HW_CSUM);
853                 if (nskb) {
854                         kfree_skb(skb);
855                         skb = nskb;
856                         if (unlikely(IS_ERR(skb))) {
857                                 err = PTR_ERR(skb);
858                                 goto err;
859                         }
860                 } else {
861                         /* XXX This case might not be possible.  It's hard to
862                          * tell from the skb_gso_segment() code and comment. */
863                 }
864         }
865
866         err = queue_control_packets(skb, queue, queue_no, arg);
867         wake_up_interruptible(&dp->waitqueue);
868         return err;
869
870 err_kfree_skb:
871         kfree_skb(skb);
872 err:
873         local_bh_disable();
874         stats = per_cpu_ptr(dp->stats_percpu, smp_processor_id());
875
876         write_seqcount_begin(&stats->seqlock);
877         stats->n_lost++;
878         write_seqcount_end(&stats->seqlock);
879
880         local_bh_enable();
881
882         return err;
883 }
884
885 static int flush_flows(struct datapath *dp)
886 {
887         struct tbl *old_table = rcu_dereference(dp->table);
888         struct tbl *new_table;
889
890         new_table = tbl_create(0);
891         if (!new_table)
892                 return -ENOMEM;
893
894         rcu_assign_pointer(dp->table, new_table);
895
896         tbl_deferred_destroy(old_table, flow_free_tbl);
897
898         return 0;
899 }
900
901 static int validate_actions(const struct sw_flow_actions *actions)
902 {
903         unsigned int i;
904
905         for (i = 0; i < actions->n_actions; i++) {
906                 const union odp_action *a = &actions->actions[i];
907                 __be16 mask;
908
909                 switch (a->type) {
910                 case ODPAT_CONTROLLER:
911                 case ODPAT_STRIP_VLAN:
912                 case ODPAT_SET_DL_SRC:
913                 case ODPAT_SET_DL_DST:
914                 case ODPAT_SET_NW_SRC:
915                 case ODPAT_SET_NW_DST:
916                 case ODPAT_SET_TP_SRC:
917                 case ODPAT_SET_TP_DST:
918                 case ODPAT_SET_TUNNEL:
919                 case ODPAT_SET_PRIORITY:
920                 case ODPAT_POP_PRIORITY:
921                 case ODPAT_DROP_SPOOFED_ARP:
922                         /* No validation needed. */
923                         break;
924
925                 case ODPAT_OUTPUT:
926                         if (a->output.port >= DP_MAX_PORTS)
927                                 return -EINVAL;
928                         break;
929
930                 case ODPAT_SET_DL_TCI:
931                         mask = a->dl_tci.mask;
932                         if (mask != htons(VLAN_VID_MASK) &&
933                             mask != htons(VLAN_PCP_MASK) &&
934                             mask != htons(VLAN_VID_MASK | VLAN_PCP_MASK))
935                                 return -EINVAL;
936                         if (a->dl_tci.tci & ~mask)
937                                 return -EINVAL;
938                         break;
939
940                 case ODPAT_SET_NW_TOS:
941                         if (a->nw_tos.nw_tos & INET_ECN_MASK)
942                                 return -EINVAL;
943                         break;
944
945                 default:
946                         return -EOPNOTSUPP;
947                 }
948         }
949
950         return 0;
951 }
952
953 static struct sw_flow_actions *get_actions(const struct odp_flow *flow)
954 {
955         struct sw_flow_actions *actions;
956         int error;
957
958         actions = flow_actions_alloc(flow->n_actions);
959         error = PTR_ERR(actions);
960         if (IS_ERR(actions))
961                 goto error;
962
963         error = -EFAULT;
964         if (copy_from_user(actions->actions, flow->actions,
965                            flow->n_actions * sizeof(union odp_action)))
966                 goto error_free_actions;
967         error = validate_actions(actions);
968         if (error)
969                 goto error_free_actions;
970
971         return actions;
972
973 error_free_actions:
974         kfree(actions);
975 error:
976         return ERR_PTR(error);
977 }
978
979 static struct timespec get_time_offset(void)
980 {
981         struct timespec now_mono, now_jiffies;
982
983         ktime_get_ts(&now_mono);
984         jiffies_to_timespec(jiffies, &now_jiffies);
985         return timespec_sub(now_mono, now_jiffies);
986 }
987
988 static void get_stats(struct sw_flow *flow, struct odp_flow_stats *stats,
989                       struct timespec time_offset)
990 {
991         if (flow->used) {
992                 struct timespec flow_ts, used;
993
994                 jiffies_to_timespec(flow->used, &flow_ts);
995                 set_normalized_timespec(&used, flow_ts.tv_sec + time_offset.tv_sec,
996                                         flow_ts.tv_nsec + time_offset.tv_nsec);
997
998                 stats->used_sec = used.tv_sec;
999                 stats->used_nsec = used.tv_nsec;
1000         } else {
1001                 stats->used_sec = 0;
1002                 stats->used_nsec = 0;
1003         }
1004
1005         stats->n_packets = flow->packet_count;
1006         stats->n_bytes = flow->byte_count;
1007         stats->reserved = 0;
1008         stats->tcp_flags = flow->tcp_flags;
1009         stats->error = 0;
1010 }
1011
1012 static void clear_stats(struct sw_flow *flow)
1013 {
1014         flow->used = 0;
1015         flow->tcp_flags = 0;
1016         flow->packet_count = 0;
1017         flow->byte_count = 0;
1018 }
1019
1020 static int expand_table(struct datapath *dp)
1021 {
1022         struct tbl *old_table = rcu_dereference(dp->table);
1023         struct tbl *new_table;
1024
1025         new_table = tbl_expand(old_table);
1026         if (IS_ERR(new_table))
1027                 return PTR_ERR(new_table);
1028
1029         rcu_assign_pointer(dp->table, new_table);
1030         tbl_deferred_destroy(old_table, NULL);
1031
1032         return 0;
1033 }
1034
1035 static int do_put_flow(struct datapath *dp, struct odp_flow_put *uf,
1036                        struct odp_flow_stats *stats)
1037 {
1038         struct tbl_node *flow_node;
1039         struct sw_flow *flow;
1040         struct tbl *table;
1041         int error;
1042
1043         table = rcu_dereference(dp->table);
1044         flow_node = tbl_lookup(table, &uf->flow.key, flow_hash(&uf->flow.key), flow_cmp);
1045         if (!flow_node) {
1046                 /* No such flow. */
1047                 struct sw_flow_actions *acts;
1048
1049                 error = -ENOENT;
1050                 if (!(uf->flags & ODPPF_CREATE))
1051                         goto error;
1052
1053                 /* Expand table, if necessary, to make room. */
1054                 if (tbl_count(table) >= tbl_n_buckets(table)) {
1055                         error = expand_table(dp);
1056                         if (error)
1057                                 goto error;
1058                         table = rcu_dereference(dp->table);
1059                 }
1060
1061                 /* Allocate flow. */
1062                 flow = flow_alloc();
1063                 if (IS_ERR(flow)) {
1064                         error = PTR_ERR(flow);
1065                         goto error;
1066                 }
1067                 flow->key = uf->flow.key;
1068                 clear_stats(flow);
1069
1070                 /* Obtain actions. */
1071                 acts = get_actions(&uf->flow);
1072                 error = PTR_ERR(acts);
1073                 if (IS_ERR(acts))
1074                         goto error_free_flow;
1075                 rcu_assign_pointer(flow->sf_acts, acts);
1076
1077                 /* Put flow in bucket. */
1078                 error = tbl_insert(table, &flow->tbl_node, flow_hash(&flow->key));
1079                 if (error)
1080                         goto error_free_flow_acts;
1081
1082                 memset(stats, 0, sizeof(struct odp_flow_stats));
1083         } else {
1084                 /* We found a matching flow. */
1085                 struct sw_flow_actions *old_acts, *new_acts;
1086
1087                 flow = flow_cast(flow_node);
1088
1089                 /* Bail out if we're not allowed to modify an existing flow. */
1090                 error = -EEXIST;
1091                 if (!(uf->flags & ODPPF_MODIFY))
1092                         goto error;
1093
1094                 /* Swap actions. */
1095                 new_acts = get_actions(&uf->flow);
1096                 error = PTR_ERR(new_acts);
1097                 if (IS_ERR(new_acts))
1098                         goto error;
1099                 old_acts = rcu_dereference(flow->sf_acts);
1100                 if (old_acts->n_actions != new_acts->n_actions ||
1101                     memcmp(old_acts->actions, new_acts->actions,
1102                            sizeof(union odp_action) * old_acts->n_actions)) {
1103                         rcu_assign_pointer(flow->sf_acts, new_acts);
1104                         flow_deferred_free_acts(old_acts);
1105                 } else {
1106                         kfree(new_acts);
1107                 }
1108
1109                 /* Fetch stats, then clear them if necessary. */
1110                 spin_lock_bh(&flow->lock);
1111                 get_stats(flow, stats, get_time_offset());
1112                 if (uf->flags & ODPPF_ZERO_STATS)
1113                         clear_stats(flow);
1114                 spin_unlock_bh(&flow->lock);
1115         }
1116
1117         return 0;
1118
1119 error_free_flow_acts:
1120         kfree(flow->sf_acts);
1121 error_free_flow:
1122         flow->sf_acts = NULL;
1123         flow_put(flow);
1124 error:
1125         return error;
1126 }
1127
1128 static int put_flow(struct datapath *dp, struct odp_flow_put __user *ufp)
1129 {
1130         struct odp_flow_stats stats;
1131         struct odp_flow_put uf;
1132         int error;
1133
1134         if (copy_from_user(&uf, ufp, sizeof(struct odp_flow_put)))
1135                 return -EFAULT;
1136
1137         error = do_put_flow(dp, &uf, &stats);
1138         if (error)
1139                 return error;
1140
1141         if (copy_to_user(&ufp->flow.stats, &stats,
1142                          sizeof(struct odp_flow_stats)))
1143                 return -EFAULT;
1144
1145         return 0;
1146 }
1147
1148 static int do_answer_query(struct sw_flow *flow, u32 query_flags,
1149                            struct timespec time_offset,
1150                            struct odp_flow_stats __user *ustats,
1151                            union odp_action __user *actions,
1152                            u32 __user *n_actionsp)
1153 {
1154         struct sw_flow_actions *sf_acts;
1155         struct odp_flow_stats stats;
1156         u32 n_actions;
1157
1158         spin_lock_bh(&flow->lock);
1159         get_stats(flow, &stats, time_offset);
1160         if (query_flags & ODPFF_ZERO_TCP_FLAGS)
1161                 flow->tcp_flags = 0;
1162
1163         spin_unlock_bh(&flow->lock);
1164
1165         if (copy_to_user(ustats, &stats, sizeof(struct odp_flow_stats)) ||
1166             get_user(n_actions, n_actionsp))
1167                 return -EFAULT;
1168
1169         if (!n_actions)
1170                 return 0;
1171
1172         sf_acts = rcu_dereference(flow->sf_acts);
1173         if (put_user(sf_acts->n_actions, n_actionsp) ||
1174             (actions && copy_to_user(actions, sf_acts->actions,
1175                                      sizeof(union odp_action) *
1176                                      min(sf_acts->n_actions, n_actions))))
1177                 return -EFAULT;
1178
1179         return 0;
1180 }
1181
1182 static int answer_query(struct sw_flow *flow, u32 query_flags,
1183                         struct timespec time_offset,
1184                         struct odp_flow __user *ufp)
1185 {
1186         union odp_action *actions;
1187
1188         if (get_user(actions, &ufp->actions))
1189                 return -EFAULT;
1190
1191         return do_answer_query(flow, query_flags, time_offset,
1192                                &ufp->stats, actions, &ufp->n_actions);
1193 }
1194
1195 static struct sw_flow *do_del_flow(struct datapath *dp, struct odp_flow_key *key)
1196 {
1197         struct tbl *table = rcu_dereference(dp->table);
1198         struct tbl_node *flow_node;
1199         int error;
1200
1201         flow_node = tbl_lookup(table, key, flow_hash(key), flow_cmp);
1202         if (!flow_node)
1203                 return ERR_PTR(-ENOENT);
1204
1205         error = tbl_remove(table, flow_node);
1206         if (error)
1207                 return ERR_PTR(error);
1208
1209         /* XXX Returned flow_node's statistics might lose a few packets, since
1210          * other CPUs can be using this flow.  We used to synchronize_rcu() to
1211          * make sure that we get completely accurate stats, but that blows our
1212          * performance, badly. */
1213         return flow_cast(flow_node);
1214 }
1215
1216 static int del_flow(struct datapath *dp, struct odp_flow __user *ufp)
1217 {
1218         struct sw_flow *flow;
1219         struct odp_flow uf;
1220         int error;
1221
1222         if (copy_from_user(&uf, ufp, sizeof uf))
1223                 return -EFAULT;
1224
1225         flow = do_del_flow(dp, &uf.key);
1226         if (IS_ERR(flow))
1227                 return PTR_ERR(flow);
1228
1229         error = answer_query(flow, 0, get_time_offset(), ufp);
1230         flow_deferred_free(flow);
1231         return error;
1232 }
1233
1234 static int do_query_flows(struct datapath *dp, const struct odp_flowvec *flowvec)
1235 {
1236         struct tbl *table = rcu_dereference(dp->table);
1237         struct timespec time_offset;
1238         u32 i;
1239
1240         time_offset = get_time_offset();
1241
1242         for (i = 0; i < flowvec->n_flows; i++) {
1243                 struct odp_flow __user *ufp = &flowvec->flows[i];
1244                 struct odp_flow uf;
1245                 struct tbl_node *flow_node;
1246                 int error;
1247
1248                 if (copy_from_user(&uf, ufp, sizeof uf))
1249                         return -EFAULT;
1250
1251                 flow_node = tbl_lookup(table, &uf.key, flow_hash(&uf.key), flow_cmp);
1252                 if (!flow_node)
1253                         error = put_user(ENOENT, &ufp->stats.error);
1254                 else
1255                         error = answer_query(flow_cast(flow_node), uf.flags, time_offset, ufp);
1256                 if (error)
1257                         return -EFAULT;
1258         }
1259         return flowvec->n_flows;
1260 }
1261
1262 struct list_flows_cbdata {
1263         struct odp_flow __user *uflows;
1264         u32 n_flows;
1265         u32 listed_flows;
1266         struct timespec time_offset;
1267 };
1268
1269 static int list_flow(struct tbl_node *node, void *cbdata_)
1270 {
1271         struct sw_flow *flow = flow_cast(node);
1272         struct list_flows_cbdata *cbdata = cbdata_;
1273         struct odp_flow __user *ufp = &cbdata->uflows[cbdata->listed_flows++];
1274         int error;
1275
1276         if (copy_to_user(&ufp->key, &flow->key, sizeof flow->key))
1277                 return -EFAULT;
1278         error = answer_query(flow, 0, cbdata->time_offset, ufp);
1279         if (error)
1280                 return error;
1281
1282         if (cbdata->listed_flows >= cbdata->n_flows)
1283                 return cbdata->listed_flows;
1284         return 0;
1285 }
1286
1287 static int do_list_flows(struct datapath *dp, const struct odp_flowvec *flowvec)
1288 {
1289         struct list_flows_cbdata cbdata;
1290         int error;
1291
1292         if (!flowvec->n_flows)
1293                 return 0;
1294
1295         cbdata.uflows = flowvec->flows;
1296         cbdata.n_flows = flowvec->n_flows;
1297         cbdata.listed_flows = 0;
1298         cbdata.time_offset = get_time_offset();
1299
1300         error = tbl_foreach(rcu_dereference(dp->table), list_flow, &cbdata);
1301         return error ? error : cbdata.listed_flows;
1302 }
1303
1304 static int do_flowvec_ioctl(struct datapath *dp, unsigned long argp,
1305                             int (*function)(struct datapath *,
1306                                             const struct odp_flowvec *))
1307 {
1308         struct odp_flowvec __user *uflowvec;
1309         struct odp_flowvec flowvec;
1310         int retval;
1311
1312         uflowvec = (struct odp_flowvec __user *)argp;
1313         if (copy_from_user(&flowvec, uflowvec, sizeof flowvec))
1314                 return -EFAULT;
1315
1316         if (flowvec.n_flows > INT_MAX / sizeof(struct odp_flow))
1317                 return -EINVAL;
1318
1319         retval = function(dp, &flowvec);
1320         return (retval < 0 ? retval
1321                 : retval == flowvec.n_flows ? 0
1322                 : put_user(retval, &uflowvec->n_flows));
1323 }
1324
1325 static int do_execute(struct datapath *dp, const struct odp_execute *execute)
1326 {
1327         struct odp_flow_key key;
1328         struct sk_buff *skb;
1329         struct sw_flow_actions *actions;
1330         struct ethhdr *eth;
1331         bool is_frag;
1332         int err;
1333
1334         err = -EINVAL;
1335         if (execute->length < ETH_HLEN || execute->length > 65535)
1336                 goto error;
1337
1338         actions = flow_actions_alloc(execute->n_actions);
1339         if (IS_ERR(actions)) {
1340                 err = PTR_ERR(actions);
1341                 goto error;
1342         }
1343
1344         err = -EFAULT;
1345         if (copy_from_user(actions->actions, execute->actions,
1346                            execute->n_actions * sizeof *execute->actions))
1347                 goto error_free_actions;
1348
1349         err = validate_actions(actions);
1350         if (err)
1351                 goto error_free_actions;
1352
1353         err = -ENOMEM;
1354         skb = alloc_skb(execute->length, GFP_KERNEL);
1355         if (!skb)
1356                 goto error_free_actions;
1357
1358         err = -EFAULT;
1359         if (copy_from_user(skb_put(skb, execute->length), execute->data,
1360                            execute->length))
1361                 goto error_free_skb;
1362
1363         skb_reset_mac_header(skb);
1364         eth = eth_hdr(skb);
1365
1366         /* Normally, setting the skb 'protocol' field would be handled by a
1367          * call to eth_type_trans(), but it assumes there's a sending
1368          * device, which we may not have. */
1369         if (ntohs(eth->h_proto) >= 1536)
1370                 skb->protocol = eth->h_proto;
1371         else
1372                 skb->protocol = htons(ETH_P_802_2);
1373
1374         err = flow_extract(skb, -1, &key, &is_frag);
1375         if (err)
1376                 goto error_free_skb;
1377
1378         rcu_read_lock();
1379         err = execute_actions(dp, skb, &key, actions->actions,
1380                               actions->n_actions, GFP_KERNEL);
1381         rcu_read_unlock();
1382
1383         kfree(actions);
1384         return err;
1385
1386 error_free_skb:
1387         kfree_skb(skb);
1388 error_free_actions:
1389         kfree(actions);
1390 error:
1391         return err;
1392 }
1393
1394 static int execute_packet(struct datapath *dp, const struct odp_execute __user *executep)
1395 {
1396         struct odp_execute execute;
1397
1398         if (copy_from_user(&execute, executep, sizeof execute))
1399                 return -EFAULT;
1400
1401         return do_execute(dp, &execute);
1402 }
1403
1404 static int get_dp_stats(struct datapath *dp, struct odp_stats __user *statsp)
1405 {
1406         struct tbl *table = rcu_dereference(dp->table);
1407         struct odp_stats stats;
1408         int i;
1409
1410         stats.n_flows = tbl_count(table);
1411         stats.cur_capacity = tbl_n_buckets(table);
1412         stats.max_capacity = TBL_MAX_BUCKETS;
1413         stats.n_ports = dp->n_ports;
1414         stats.max_ports = DP_MAX_PORTS;
1415         stats.n_frags = stats.n_hit = stats.n_missed = stats.n_lost = 0;
1416         for_each_possible_cpu(i) {
1417                 const struct dp_stats_percpu *percpu_stats;
1418                 struct dp_stats_percpu local_stats;
1419                 unsigned seqcount;
1420
1421                 percpu_stats = per_cpu_ptr(dp->stats_percpu, i);
1422
1423                 do {
1424                         seqcount = read_seqcount_begin(&percpu_stats->seqlock);
1425                         local_stats = *percpu_stats;
1426                 } while (read_seqcount_retry(&percpu_stats->seqlock, seqcount));
1427
1428                 stats.n_frags += local_stats.n_frags;
1429                 stats.n_hit += local_stats.n_hit;
1430                 stats.n_missed += local_stats.n_missed;
1431                 stats.n_lost += local_stats.n_lost;
1432         }
1433         stats.max_miss_queue = DP_MAX_QUEUE_LEN;
1434         stats.max_action_queue = DP_MAX_QUEUE_LEN;
1435         return copy_to_user(statsp, &stats, sizeof stats) ? -EFAULT : 0;
1436 }
1437
1438 /* MTU of the dp pseudo-device: ETH_DATA_LEN or the minimum of the ports */
1439 int dp_min_mtu(const struct datapath *dp)
1440 {
1441         struct dp_port *p;
1442         int mtu = 0;
1443
1444         ASSERT_RTNL();
1445
1446         list_for_each_entry_rcu (p, &dp->port_list, node) {
1447                 int dev_mtu;
1448
1449                 /* Skip any internal ports, since that's what we're trying to
1450                  * set. */
1451                 if (is_internal_vport(p->vport))
1452                         continue;
1453
1454                 dev_mtu = vport_get_mtu(p->vport);
1455                 if (!mtu || dev_mtu < mtu)
1456                         mtu = dev_mtu;
1457         }
1458
1459         return mtu ? mtu : ETH_DATA_LEN;
1460 }
1461
1462 /* Sets the MTU of all datapath devices to the minimum of the ports.  Must
1463  * be called with RTNL lock. */
1464 void set_internal_devs_mtu(const struct datapath *dp)
1465 {
1466         struct dp_port *p;
1467         int mtu;
1468
1469         ASSERT_RTNL();
1470
1471         mtu = dp_min_mtu(dp);
1472
1473         list_for_each_entry_rcu (p, &dp->port_list, node) {
1474                 if (is_internal_vport(p->vport))
1475                         vport_set_mtu(p->vport, mtu);
1476         }
1477 }
1478
1479 static int put_port(const struct dp_port *p, struct odp_port __user *uop)
1480 {
1481         struct odp_port op;
1482
1483         memset(&op, 0, sizeof op);
1484
1485         rcu_read_lock();
1486         strncpy(op.devname, vport_get_name(p->vport), sizeof op.devname);
1487         rcu_read_unlock();
1488
1489         op.port = p->port_no;
1490         op.flags = is_internal_vport(p->vport) ? ODP_PORT_INTERNAL : 0;
1491
1492         return copy_to_user(uop, &op, sizeof op) ? -EFAULT : 0;
1493 }
1494
1495 static int query_port(struct datapath *dp, struct odp_port __user *uport)
1496 {
1497         struct odp_port port;
1498
1499         if (copy_from_user(&port, uport, sizeof port))
1500                 return -EFAULT;
1501
1502         if (port.devname[0]) {
1503                 struct vport *vport;
1504                 struct dp_port *dp_port;
1505                 int err = 0;
1506
1507                 port.devname[IFNAMSIZ - 1] = '\0';
1508
1509                 vport_lock();
1510                 rcu_read_lock();
1511
1512                 vport = vport_locate(port.devname);
1513                 if (!vport) {
1514                         err = -ENODEV;
1515                         goto error_unlock;
1516                 }
1517
1518                 dp_port = vport_get_dp_port(vport);
1519                 if (!dp_port || dp_port->dp != dp) {
1520                         err = -ENOENT;
1521                         goto error_unlock;
1522                 }
1523
1524                 port.port = dp_port->port_no;
1525
1526 error_unlock:
1527                 rcu_read_unlock();
1528                 vport_unlock();
1529
1530                 if (err)
1531                         return err;
1532         } else {
1533                 if (port.port >= DP_MAX_PORTS)
1534                         return -EINVAL;
1535                 if (!dp->ports[port.port])
1536                         return -ENOENT;
1537         }
1538
1539         return put_port(dp->ports[port.port], uport);
1540 }
1541
1542 static int do_list_ports(struct datapath *dp, struct odp_port __user *uports,
1543                          int n_ports)
1544 {
1545         int idx = 0;
1546         if (n_ports) {
1547                 struct dp_port *p;
1548
1549                 list_for_each_entry_rcu (p, &dp->port_list, node) {
1550                         if (put_port(p, &uports[idx]))
1551                                 return -EFAULT;
1552                         if (idx++ >= n_ports)
1553                                 break;
1554                 }
1555         }
1556         return idx;
1557 }
1558
1559 static int list_ports(struct datapath *dp, struct odp_portvec __user *upv)
1560 {
1561         struct odp_portvec pv;
1562         int retval;
1563
1564         if (copy_from_user(&pv, upv, sizeof pv))
1565                 return -EFAULT;
1566
1567         retval = do_list_ports(dp, pv.ports, pv.n_ports);
1568         if (retval < 0)
1569                 return retval;
1570
1571         return put_user(retval, &upv->n_ports);
1572 }
1573
1574 static int get_listen_mask(const struct file *f)
1575 {
1576         return (long)f->private_data;
1577 }
1578
1579 static void set_listen_mask(struct file *f, int listen_mask)
1580 {
1581         f->private_data = (void*)(long)listen_mask;
1582 }
1583
1584 static long openvswitch_ioctl(struct file *f, unsigned int cmd,
1585                            unsigned long argp)
1586 {
1587         int dp_idx = iminor(f->f_dentry->d_inode);
1588         struct datapath *dp;
1589         int drop_frags, listeners, port_no;
1590         unsigned int sflow_probability;
1591         int err;
1592
1593         /* Handle commands with special locking requirements up front. */
1594         switch (cmd) {
1595         case ODP_DP_CREATE:
1596                 err = create_dp(dp_idx, (char __user *)argp);
1597                 goto exit;
1598
1599         case ODP_DP_DESTROY:
1600                 err = destroy_dp(dp_idx);
1601                 goto exit;
1602
1603         case ODP_PORT_ATTACH:
1604                 err = attach_port(dp_idx, (struct odp_port __user *)argp);
1605                 goto exit;
1606
1607         case ODP_PORT_DETACH:
1608                 err = get_user(port_no, (int __user *)argp);
1609                 if (!err)
1610                         err = detach_port(dp_idx, port_no);
1611                 goto exit;
1612
1613         case ODP_VPORT_ADD:
1614                 err = vport_user_add((struct odp_vport_add __user *)argp);
1615                 goto exit;
1616
1617         case ODP_VPORT_MOD:
1618                 err = vport_user_mod((struct odp_vport_mod __user *)argp);
1619                 goto exit;
1620
1621         case ODP_VPORT_DEL:
1622                 err = vport_user_del((char __user *)argp);
1623                 goto exit;
1624
1625         case ODP_VPORT_STATS_GET:
1626                 err = vport_user_stats_get((struct odp_vport_stats_req __user *)argp);
1627                 goto exit;
1628
1629         case ODP_VPORT_STATS_SET:
1630                 err = vport_user_stats_set((struct odp_vport_stats_req __user *)argp);
1631                 goto exit;
1632
1633         case ODP_VPORT_ETHER_GET:
1634                 err = vport_user_ether_get((struct odp_vport_ether __user *)argp);
1635                 goto exit;
1636
1637         case ODP_VPORT_ETHER_SET:
1638                 err = vport_user_ether_set((struct odp_vport_ether __user *)argp);
1639                 goto exit;
1640
1641         case ODP_VPORT_MTU_GET:
1642                 err = vport_user_mtu_get((struct odp_vport_mtu __user *)argp);
1643                 goto exit;
1644
1645         case ODP_VPORT_MTU_SET:
1646                 err = vport_user_mtu_set((struct odp_vport_mtu __user *)argp);
1647                 goto exit;
1648         }
1649
1650         dp = get_dp_locked(dp_idx);
1651         err = -ENODEV;
1652         if (!dp)
1653                 goto exit;
1654
1655         switch (cmd) {
1656         case ODP_DP_STATS:
1657                 err = get_dp_stats(dp, (struct odp_stats __user *)argp);
1658                 break;
1659
1660         case ODP_GET_DROP_FRAGS:
1661                 err = put_user(dp->drop_frags, (int __user *)argp);
1662                 break;
1663
1664         case ODP_SET_DROP_FRAGS:
1665                 err = get_user(drop_frags, (int __user *)argp);
1666                 if (err)
1667                         break;
1668                 err = -EINVAL;
1669                 if (drop_frags != 0 && drop_frags != 1)
1670                         break;
1671                 dp->drop_frags = drop_frags;
1672                 err = 0;
1673                 break;
1674
1675         case ODP_GET_LISTEN_MASK:
1676                 err = put_user(get_listen_mask(f), (int __user *)argp);
1677                 break;
1678
1679         case ODP_SET_LISTEN_MASK:
1680                 err = get_user(listeners, (int __user *)argp);
1681                 if (err)
1682                         break;
1683                 err = -EINVAL;
1684                 if (listeners & ~ODPL_ALL)
1685                         break;
1686                 err = 0;
1687                 set_listen_mask(f, listeners);
1688                 break;
1689
1690         case ODP_GET_SFLOW_PROBABILITY:
1691                 err = put_user(dp->sflow_probability, (unsigned int __user *)argp);
1692                 break;
1693
1694         case ODP_SET_SFLOW_PROBABILITY:
1695                 err = get_user(sflow_probability, (unsigned int __user *)argp);
1696                 if (!err)
1697                         dp->sflow_probability = sflow_probability;
1698                 break;
1699
1700         case ODP_PORT_QUERY:
1701                 err = query_port(dp, (struct odp_port __user *)argp);
1702                 break;
1703
1704         case ODP_PORT_LIST:
1705                 err = list_ports(dp, (struct odp_portvec __user *)argp);
1706                 break;
1707
1708         case ODP_FLOW_FLUSH:
1709                 err = flush_flows(dp);
1710                 break;
1711
1712         case ODP_FLOW_PUT:
1713                 err = put_flow(dp, (struct odp_flow_put __user *)argp);
1714                 break;
1715
1716         case ODP_FLOW_DEL:
1717                 err = del_flow(dp, (struct odp_flow __user *)argp);
1718                 break;
1719
1720         case ODP_FLOW_GET:
1721                 err = do_flowvec_ioctl(dp, argp, do_query_flows);
1722                 break;
1723
1724         case ODP_FLOW_LIST:
1725                 err = do_flowvec_ioctl(dp, argp, do_list_flows);
1726                 break;
1727
1728         case ODP_EXECUTE:
1729                 err = execute_packet(dp, (struct odp_execute __user *)argp);
1730                 break;
1731
1732         default:
1733                 err = -ENOIOCTLCMD;
1734                 break;
1735         }
1736         mutex_unlock(&dp->mutex);
1737 exit:
1738         return err;
1739 }
1740
1741 static int dp_has_packet_of_interest(struct datapath *dp, int listeners)
1742 {
1743         int i;
1744         for (i = 0; i < DP_N_QUEUES; i++) {
1745                 if (listeners & (1 << i) && !skb_queue_empty(&dp->queues[i]))
1746                         return 1;
1747         }
1748         return 0;
1749 }
1750
1751 #ifdef CONFIG_COMPAT
1752 static int compat_list_ports(struct datapath *dp, struct compat_odp_portvec __user *upv)
1753 {
1754         struct compat_odp_portvec pv;
1755         int retval;
1756
1757         if (copy_from_user(&pv, upv, sizeof pv))
1758                 return -EFAULT;
1759
1760         retval = do_list_ports(dp, compat_ptr(pv.ports), pv.n_ports);
1761         if (retval < 0)
1762                 return retval;
1763
1764         return put_user(retval, &upv->n_ports);
1765 }
1766
1767 static int compat_get_flow(struct odp_flow *flow, const struct compat_odp_flow __user *compat)
1768 {
1769         compat_uptr_t actions;
1770
1771         if (!access_ok(VERIFY_READ, compat, sizeof(struct compat_odp_flow)) ||
1772             __copy_from_user(&flow->stats, &compat->stats, sizeof(struct odp_flow_stats)) ||
1773             __copy_from_user(&flow->key, &compat->key, sizeof(struct odp_flow_key)) ||
1774             __get_user(actions, &compat->actions) ||
1775             __get_user(flow->n_actions, &compat->n_actions) ||
1776             __get_user(flow->flags, &compat->flags))
1777                 return -EFAULT;
1778
1779         flow->actions = compat_ptr(actions);
1780         return 0;
1781 }
1782
1783 static int compat_put_flow(struct datapath *dp, struct compat_odp_flow_put __user *ufp)
1784 {
1785         struct odp_flow_stats stats;
1786         struct odp_flow_put fp;
1787         int error;
1788
1789         if (compat_get_flow(&fp.flow, &ufp->flow) ||
1790             get_user(fp.flags, &ufp->flags))
1791                 return -EFAULT;
1792
1793         error = do_put_flow(dp, &fp, &stats);
1794         if (error)
1795                 return error;
1796
1797         if (copy_to_user(&ufp->flow.stats, &stats,
1798                          sizeof(struct odp_flow_stats)))
1799                 return -EFAULT;
1800
1801         return 0;
1802 }
1803
1804 static int compat_answer_query(struct sw_flow *flow, u32 query_flags,
1805                                struct timespec time_offset,
1806                                struct compat_odp_flow __user *ufp)
1807 {
1808         compat_uptr_t actions;
1809
1810         if (get_user(actions, &ufp->actions))
1811                 return -EFAULT;
1812
1813         return do_answer_query(flow, query_flags, time_offset, &ufp->stats,
1814                                compat_ptr(actions), &ufp->n_actions);
1815 }
1816
1817 static int compat_del_flow(struct datapath *dp, struct compat_odp_flow __user *ufp)
1818 {
1819         struct sw_flow *flow;
1820         struct odp_flow uf;
1821         int error;
1822
1823         if (compat_get_flow(&uf, ufp))
1824                 return -EFAULT;
1825
1826         flow = do_del_flow(dp, &uf.key);
1827         if (IS_ERR(flow))
1828                 return PTR_ERR(flow);
1829
1830         error = compat_answer_query(flow, 0, get_time_offset(), ufp);
1831         flow_deferred_free(flow);
1832         return error;
1833 }
1834
1835 static int compat_query_flows(struct datapath *dp, struct compat_odp_flow *flows, u32 n_flows)
1836 {
1837         struct tbl *table = rcu_dereference(dp->table);
1838         struct timespec time_offset;
1839         u32 i;
1840
1841         time_offset = get_time_offset();
1842
1843         for (i = 0; i < n_flows; i++) {
1844                 struct compat_odp_flow __user *ufp = &flows[i];
1845                 struct odp_flow uf;
1846                 struct tbl_node *flow_node;
1847                 int error;
1848
1849                 if (compat_get_flow(&uf, ufp))
1850                         return -EFAULT;
1851                 memset(uf.key.reserved, 0, sizeof uf.key.reserved);
1852
1853                 flow_node = tbl_lookup(table, &uf.key, flow_hash(&uf.key), flow_cmp);
1854                 if (!flow_node)
1855                         error = put_user(ENOENT, &ufp->stats.error);
1856                 else
1857                         error = compat_answer_query(flow_cast(flow_node), uf.flags, time_offset, ufp);
1858                 if (error)
1859                         return -EFAULT;
1860         }
1861         return n_flows;
1862 }
1863
1864 struct compat_list_flows_cbdata {
1865         struct compat_odp_flow __user *uflows;
1866         u32 n_flows;
1867         u32 listed_flows;
1868         struct timespec time_offset;
1869 };
1870
1871 static int compat_list_flow(struct tbl_node *node, void *cbdata_)
1872 {
1873         struct sw_flow *flow = flow_cast(node);
1874         struct compat_list_flows_cbdata *cbdata = cbdata_;
1875         struct compat_odp_flow __user *ufp = &cbdata->uflows[cbdata->listed_flows++];
1876         int error;
1877
1878         if (copy_to_user(&ufp->key, &flow->key, sizeof flow->key))
1879                 return -EFAULT;
1880         error = compat_answer_query(flow, 0, cbdata->time_offset, ufp);
1881         if (error)
1882                 return error;
1883
1884         if (cbdata->listed_flows >= cbdata->n_flows)
1885                 return cbdata->listed_flows;
1886         return 0;
1887 }
1888
1889 static int compat_list_flows(struct datapath *dp, struct compat_odp_flow *flows, u32 n_flows)
1890 {
1891         struct compat_list_flows_cbdata cbdata;
1892         int error;
1893
1894         if (!n_flows)
1895                 return 0;
1896
1897         cbdata.uflows = flows;
1898         cbdata.n_flows = n_flows;
1899         cbdata.listed_flows = 0;
1900         cbdata.time_offset = get_time_offset();
1901
1902         error = tbl_foreach(rcu_dereference(dp->table), compat_list_flow, &cbdata);
1903         return error ? error : cbdata.listed_flows;
1904 }
1905
1906 static int compat_flowvec_ioctl(struct datapath *dp, unsigned long argp,
1907                                 int (*function)(struct datapath *,
1908                                                 struct compat_odp_flow *,
1909                                                 u32 n_flows))
1910 {
1911         struct compat_odp_flowvec __user *uflowvec;
1912         struct compat_odp_flow __user *flows;
1913         struct compat_odp_flowvec flowvec;
1914         int retval;
1915
1916         uflowvec = compat_ptr(argp);
1917         if (!access_ok(VERIFY_WRITE, uflowvec, sizeof *uflowvec) ||
1918             copy_from_user(&flowvec, uflowvec, sizeof flowvec))
1919                 return -EFAULT;
1920
1921         if (flowvec.n_flows > INT_MAX / sizeof(struct compat_odp_flow))
1922                 return -EINVAL;
1923
1924         flows = compat_ptr(flowvec.flows);
1925         if (!access_ok(VERIFY_WRITE, flows,
1926                        flowvec.n_flows * sizeof(struct compat_odp_flow)))
1927                 return -EFAULT;
1928
1929         retval = function(dp, flows, flowvec.n_flows);
1930         return (retval < 0 ? retval
1931                 : retval == flowvec.n_flows ? 0
1932                 : put_user(retval, &uflowvec->n_flows));
1933 }
1934
1935 static int compat_execute(struct datapath *dp, const struct compat_odp_execute __user *uexecute)
1936 {
1937         struct odp_execute execute;
1938         compat_uptr_t actions;
1939         compat_uptr_t data;
1940
1941         if (!access_ok(VERIFY_READ, uexecute, sizeof(struct compat_odp_execute)) ||
1942             __get_user(actions, &uexecute->actions) ||
1943             __get_user(execute.n_actions, &uexecute->n_actions) ||
1944             __get_user(data, &uexecute->data) ||
1945             __get_user(execute.length, &uexecute->length))
1946                 return -EFAULT;
1947
1948         execute.actions = compat_ptr(actions);
1949         execute.data = compat_ptr(data);
1950
1951         return do_execute(dp, &execute);
1952 }
1953
1954 static long openvswitch_compat_ioctl(struct file *f, unsigned int cmd, unsigned long argp)
1955 {
1956         int dp_idx = iminor(f->f_dentry->d_inode);
1957         struct datapath *dp;
1958         int err;
1959
1960         switch (cmd) {
1961         case ODP_DP_DESTROY:
1962         case ODP_FLOW_FLUSH:
1963                 /* Ioctls that don't need any translation at all. */
1964                 return openvswitch_ioctl(f, cmd, argp);
1965
1966         case ODP_DP_CREATE:
1967         case ODP_PORT_ATTACH:
1968         case ODP_PORT_DETACH:
1969         case ODP_VPORT_DEL:
1970         case ODP_VPORT_MTU_SET:
1971         case ODP_VPORT_MTU_GET:
1972         case ODP_VPORT_ETHER_SET:
1973         case ODP_VPORT_ETHER_GET:
1974         case ODP_VPORT_STATS_SET:
1975         case ODP_VPORT_STATS_GET:
1976         case ODP_DP_STATS:
1977         case ODP_GET_DROP_FRAGS:
1978         case ODP_SET_DROP_FRAGS:
1979         case ODP_SET_LISTEN_MASK:
1980         case ODP_GET_LISTEN_MASK:
1981         case ODP_SET_SFLOW_PROBABILITY:
1982         case ODP_GET_SFLOW_PROBABILITY:
1983         case ODP_PORT_QUERY:
1984                 /* Ioctls that just need their pointer argument extended. */
1985                 return openvswitch_ioctl(f, cmd, (unsigned long)compat_ptr(argp));
1986
1987         case ODP_VPORT_ADD32:
1988                 return compat_vport_user_add(compat_ptr(argp));
1989
1990         case ODP_VPORT_MOD32:
1991                 return compat_vport_user_mod(compat_ptr(argp));
1992         }
1993
1994         dp = get_dp_locked(dp_idx);
1995         err = -ENODEV;
1996         if (!dp)
1997                 goto exit;
1998
1999         switch (cmd) {
2000         case ODP_PORT_LIST32:
2001                 err = compat_list_ports(dp, compat_ptr(argp));
2002                 break;
2003
2004         case ODP_FLOW_PUT32:
2005                 err = compat_put_flow(dp, compat_ptr(argp));
2006                 break;
2007
2008         case ODP_FLOW_DEL32:
2009                 err = compat_del_flow(dp, compat_ptr(argp));
2010                 break;
2011
2012         case ODP_FLOW_GET32:
2013                 err = compat_flowvec_ioctl(dp, argp, compat_query_flows);
2014                 break;
2015
2016         case ODP_FLOW_LIST32:
2017                 err = compat_flowvec_ioctl(dp, argp, compat_list_flows);
2018                 break;
2019
2020         case ODP_EXECUTE32:
2021                 err = compat_execute(dp, compat_ptr(argp));
2022                 break;
2023
2024         default:
2025                 err = -ENOIOCTLCMD;
2026                 break;
2027         }
2028         mutex_unlock(&dp->mutex);
2029 exit:
2030         return err;
2031 }
2032 #endif
2033
2034 /* Unfortunately this function is not exported so this is a verbatim copy
2035  * from net/core/datagram.c in 2.6.30. */
2036 static int skb_copy_and_csum_datagram(const struct sk_buff *skb, int offset,
2037                                       u8 __user *to, int len,
2038                                       __wsum *csump)
2039 {
2040         int start = skb_headlen(skb);
2041         int pos = 0;
2042         int i, copy = start - offset;
2043
2044         /* Copy header. */
2045         if (copy > 0) {
2046                 int err = 0;
2047                 if (copy > len)
2048                         copy = len;
2049                 *csump = csum_and_copy_to_user(skb->data + offset, to, copy,
2050                                                *csump, &err);
2051                 if (err)
2052                         goto fault;
2053                 if ((len -= copy) == 0)
2054                         return 0;
2055                 offset += copy;
2056                 to += copy;
2057                 pos = copy;
2058         }
2059
2060         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
2061                 int end;
2062
2063                 WARN_ON(start > offset + len);
2064
2065                 end = start + skb_shinfo(skb)->frags[i].size;
2066                 if ((copy = end - offset) > 0) {
2067                         __wsum csum2;
2068                         int err = 0;
2069                         u8  *vaddr;
2070                         skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
2071                         struct page *page = frag->page;
2072
2073                         if (copy > len)
2074                                 copy = len;
2075                         vaddr = kmap(page);
2076                         csum2 = csum_and_copy_to_user(vaddr +
2077                                                         frag->page_offset +
2078                                                         offset - start,
2079                                                       to, copy, 0, &err);
2080                         kunmap(page);
2081                         if (err)
2082                                 goto fault;
2083                         *csump = csum_block_add(*csump, csum2, pos);
2084                         if (!(len -= copy))
2085                                 return 0;
2086                         offset += copy;
2087                         to += copy;
2088                         pos += copy;
2089                 }
2090                 start = end;
2091         }
2092
2093         if (skb_shinfo(skb)->frag_list) {
2094                 struct sk_buff *list = skb_shinfo(skb)->frag_list;
2095
2096                 for (; list; list=list->next) {
2097                         int end;
2098
2099                         WARN_ON(start > offset + len);
2100
2101                         end = start + list->len;
2102                         if ((copy = end - offset) > 0) {
2103                                 __wsum csum2 = 0;
2104                                 if (copy > len)
2105                                         copy = len;
2106                                 if (skb_copy_and_csum_datagram(list,
2107                                                                offset - start,
2108                                                                to, copy,
2109                                                                &csum2))
2110                                         goto fault;
2111                                 *csump = csum_block_add(*csump, csum2, pos);
2112                                 if ((len -= copy) == 0)
2113                                         return 0;
2114                                 offset += copy;
2115                                 to += copy;
2116                                 pos += copy;
2117                         }
2118                         start = end;
2119                 }
2120         }
2121         if (!len)
2122                 return 0;
2123
2124 fault:
2125         return -EFAULT;
2126 }
2127
2128 ssize_t openvswitch_read(struct file *f, char __user *buf, size_t nbytes,
2129                       loff_t *ppos)
2130 {
2131         /* XXX is there sufficient synchronization here? */
2132         int listeners = get_listen_mask(f);
2133         int dp_idx = iminor(f->f_dentry->d_inode);
2134         struct datapath *dp = get_dp(dp_idx);
2135         struct sk_buff *skb;
2136         size_t copy_bytes, tot_copy_bytes;
2137         int retval;
2138
2139         if (!dp)
2140                 return -ENODEV;
2141
2142         if (nbytes == 0 || !listeners)
2143                 return 0;
2144
2145         for (;;) {
2146                 int i;
2147
2148                 for (i = 0; i < DP_N_QUEUES; i++) {
2149                         if (listeners & (1 << i)) {
2150                                 skb = skb_dequeue(&dp->queues[i]);
2151                                 if (skb)
2152                                         goto success;
2153                         }
2154                 }
2155
2156                 if (f->f_flags & O_NONBLOCK) {
2157                         retval = -EAGAIN;
2158                         goto error;
2159                 }
2160
2161                 wait_event_interruptible(dp->waitqueue,
2162                                          dp_has_packet_of_interest(dp,
2163                                                                    listeners));
2164
2165                 if (signal_pending(current)) {
2166                         retval = -ERESTARTSYS;
2167                         goto error;
2168                 }
2169         }
2170 success:
2171         copy_bytes = tot_copy_bytes = min_t(size_t, skb->len, nbytes);
2172
2173         retval = 0;
2174         if (skb->ip_summed == CHECKSUM_PARTIAL) {
2175                 if (copy_bytes == skb->len) {
2176                         __wsum csum = 0;
2177                         unsigned int csum_start, csum_offset;
2178
2179 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,22)
2180                         csum_start = skb->csum_start - skb_headroom(skb);
2181                         csum_offset = skb->csum_offset;
2182 #else
2183                         csum_start = skb_transport_header(skb) - skb->data;
2184                         csum_offset = skb->csum;
2185 #endif
2186                         BUG_ON(csum_start >= skb_headlen(skb));
2187                         retval = skb_copy_and_csum_datagram(skb, csum_start, buf + csum_start,
2188                                                             copy_bytes - csum_start, &csum);
2189                         if (!retval) {
2190                                 __sum16 __user *csump;
2191
2192                                 copy_bytes = csum_start;
2193                                 csump = (__sum16 __user *)(buf + csum_start + csum_offset);
2194
2195                                 BUG_ON((char *)csump + sizeof(__sum16) > buf + nbytes);
2196                                 put_user(csum_fold(csum), csump);
2197                         }
2198                 } else
2199                         retval = skb_checksum_help(skb);
2200         }
2201
2202         if (!retval) {
2203                 struct iovec __user iov;
2204
2205                 iov.iov_base = buf;
2206                 iov.iov_len = copy_bytes;
2207                 retval = skb_copy_datagram_iovec(skb, 0, &iov, iov.iov_len);
2208         }
2209
2210         if (!retval)
2211                 retval = tot_copy_bytes;
2212
2213         kfree_skb(skb);
2214
2215 error:
2216         return retval;
2217 }
2218
2219 static unsigned int openvswitch_poll(struct file *file, poll_table *wait)
2220 {
2221         /* XXX is there sufficient synchronization here? */
2222         int dp_idx = iminor(file->f_dentry->d_inode);
2223         struct datapath *dp = get_dp(dp_idx);
2224         unsigned int mask;
2225
2226         if (dp) {
2227                 mask = 0;
2228                 poll_wait(file, &dp->waitqueue, wait);
2229                 if (dp_has_packet_of_interest(dp, get_listen_mask(file)))
2230                         mask |= POLLIN | POLLRDNORM;
2231         } else {
2232                 mask = POLLIN | POLLRDNORM | POLLHUP;
2233         }
2234         return mask;
2235 }
2236
2237 struct file_operations openvswitch_fops = {
2238         /* XXX .aio_read = openvswitch_aio_read, */
2239         .read  = openvswitch_read,
2240         .poll  = openvswitch_poll,
2241         .unlocked_ioctl = openvswitch_ioctl,
2242 #ifdef CONFIG_COMPAT
2243         .compat_ioctl = openvswitch_compat_ioctl,
2244 #endif
2245         /* XXX .fasync = openvswitch_fasync, */
2246 };
2247
2248 static int major;
2249
2250 static int __init dp_init(void)
2251 {
2252         struct sk_buff *dummy_skb;
2253         int err;
2254
2255         BUILD_BUG_ON(sizeof(struct ovs_skb_cb) > sizeof(dummy_skb->cb));
2256
2257         printk("Open vSwitch %s, built "__DATE__" "__TIME__"\n", VERSION BUILDNR);
2258
2259         err = flow_init();
2260         if (err)
2261                 goto error;
2262
2263         err = vport_init();
2264         if (err)
2265                 goto error_flow_exit;
2266
2267         err = register_netdevice_notifier(&dp_device_notifier);
2268         if (err)
2269                 goto error_vport_exit;
2270
2271         major = register_chrdev(0, "openvswitch", &openvswitch_fops);
2272         if (err < 0)
2273                 goto error_unreg_notifier;
2274
2275         return 0;
2276
2277 error_unreg_notifier:
2278         unregister_netdevice_notifier(&dp_device_notifier);
2279 error_vport_exit:
2280         vport_exit();
2281 error_flow_exit:
2282         flow_exit();
2283 error:
2284         return err;
2285 }
2286
2287 static void dp_cleanup(void)
2288 {
2289         rcu_barrier();
2290         unregister_chrdev(major, "openvswitch");
2291         unregister_netdevice_notifier(&dp_device_notifier);
2292         vport_exit();
2293         flow_exit();
2294 }
2295
2296 module_init(dp_init);
2297 module_exit(dp_cleanup);
2298
2299 MODULE_DESCRIPTION("Open vSwitch switching datapath");
2300 MODULE_LICENSE("GPL");