datapath: More flexible kernel/userspace tunneling attribute.
[cascardo/ovs.git] / datapath / datapath.c
1 /*
2  * Copyright (c) 2007-2012 Nicira, Inc.
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of version 2 of the GNU General Public
6  * License as published by the Free Software Foundation.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License
14  * along with this program; if not, write to the Free Software
15  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
16  * 02110-1301, USA
17  */
18
19 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
20
21 #include <linux/init.h>
22 #include <linux/module.h>
23 #include <linux/if_arp.h>
24 #include <linux/if_vlan.h>
25 #include <linux/in.h>
26 #include <linux/ip.h>
27 #include <linux/jhash.h>
28 #include <linux/delay.h>
29 #include <linux/time.h>
30 #include <linux/etherdevice.h>
31 #include <linux/genetlink.h>
32 #include <linux/kernel.h>
33 #include <linux/kthread.h>
34 #include <linux/mutex.h>
35 #include <linux/percpu.h>
36 #include <linux/rcupdate.h>
37 #include <linux/tcp.h>
38 #include <linux/udp.h>
39 #include <linux/version.h>
40 #include <linux/ethtool.h>
41 #include <linux/wait.h>
42 #include <asm/div64.h>
43 #include <linux/highmem.h>
44 #include <linux/netfilter_bridge.h>
45 #include <linux/netfilter_ipv4.h>
46 #include <linux/inetdevice.h>
47 #include <linux/list.h>
48 #include <linux/openvswitch.h>
49 #include <linux/rculist.h>
50 #include <linux/dmi.h>
51 #include <net/genetlink.h>
52 #include <net/net_namespace.h>
53 #include <net/netns/generic.h>
54
55 #include "checksum.h"
56 #include "datapath.h"
57 #include "flow.h"
58 #include "genl_exec.h"
59 #include "vlan.h"
60 #include "tunnel.h"
61 #include "vport-internal_dev.h"
62
63 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,18) || \
64     LINUX_VERSION_CODE >= KERNEL_VERSION(3,9,0)
65 #error Kernels before 2.6.18 or after 3.8 are not supported by this version of Open vSwitch.
66 #endif
67
68 #define REHASH_FLOW_INTERVAL (10 * 60 * HZ)
69 static void rehash_flow_table(struct work_struct *work);
70 static DECLARE_DELAYED_WORK(rehash_flow_wq, rehash_flow_table);
71
72 int ovs_net_id __read_mostly;
73
74 int (*ovs_dp_ioctl_hook)(struct net_device *dev, struct ifreq *rq, int cmd);
75 EXPORT_SYMBOL(ovs_dp_ioctl_hook);
76
77 /**
78  * DOC: Locking:
79  *
80  * Writes to device state (add/remove datapath, port, set operations on vports,
81  * etc.) are protected by RTNL.
82  *
83  * Writes to other state (flow table modifications, set miscellaneous datapath
84  * parameters, etc.) are protected by genl_mutex.  The RTNL lock nests inside
85  * genl_mutex.
86  *
87  * Reads are protected by RCU.
88  *
89  * There are a few special cases (mostly stats) that have their own
90  * synchronization but they nest under all of above and don't interact with
91  * each other.
92  */
93
94 static struct vport *new_vport(const struct vport_parms *);
95 static int queue_gso_packets(struct net *, int dp_ifindex, struct sk_buff *,
96                              const struct dp_upcall_info *);
97 static int queue_userspace_packet(struct net *, int dp_ifindex,
98                                   struct sk_buff *,
99                                   const struct dp_upcall_info *);
100
101 /* Must be called with rcu_read_lock, genl_mutex, or RTNL lock. */
102 static struct datapath *get_dp(struct net *net, int dp_ifindex)
103 {
104         struct datapath *dp = NULL;
105         struct net_device *dev;
106
107         rcu_read_lock();
108         dev = dev_get_by_index_rcu(net, dp_ifindex);
109         if (dev) {
110                 struct vport *vport = ovs_internal_dev_get_vport(dev);
111                 if (vport)
112                         dp = vport->dp;
113         }
114         rcu_read_unlock();
115
116         return dp;
117 }
118
119 /* Must be called with rcu_read_lock or RTNL lock. */
120 const char *ovs_dp_name(const struct datapath *dp)
121 {
122         struct vport *vport = ovs_vport_rtnl_rcu(dp, OVSP_LOCAL);
123         return vport->ops->get_name(vport);
124 }
125
126 static int get_dpifindex(struct datapath *dp)
127 {
128         struct vport *local;
129         int ifindex;
130
131         rcu_read_lock();
132
133         local = ovs_vport_rcu(dp, OVSP_LOCAL);
134         if (local)
135                 ifindex = local->ops->get_ifindex(local);
136         else
137                 ifindex = 0;
138
139         rcu_read_unlock();
140
141         return ifindex;
142 }
143
144 static size_t br_nlmsg_size(void)
145 {
146         return NLMSG_ALIGN(sizeof(struct ifinfomsg))
147                + nla_total_size(IFNAMSIZ) /* IFLA_IFNAME */
148                + nla_total_size(MAX_ADDR_LEN) /* IFLA_ADDRESS */
149                + nla_total_size(4) /* IFLA_MASTER */
150                + nla_total_size(4) /* IFLA_MTU */
151                + nla_total_size(1); /* IFLA_OPERSTATE */
152 }
153
154 /* Caller must hold RTNL lock. */
155 static int dp_fill_ifinfo(struct sk_buff *skb,
156                           const struct vport *port,
157                           int event, unsigned int flags)
158 {
159         struct datapath *dp = port->dp;
160         struct ifinfomsg *hdr;
161         struct nlmsghdr *nlh;
162
163         if (!port->ops->get_ifindex)
164                 return -ENODEV;
165
166         nlh = nlmsg_put(skb, 0, 0, event, sizeof(*hdr), flags);
167         if (nlh == NULL)
168                 return -EMSGSIZE;
169
170         hdr = nlmsg_data(nlh);
171         hdr->ifi_family = AF_BRIDGE;
172         hdr->__ifi_pad = 0;
173         hdr->ifi_type = ARPHRD_ETHER;
174         hdr->ifi_index = port->ops->get_ifindex(port);
175         hdr->ifi_flags = port->ops->get_dev_flags(port);
176         hdr->ifi_change = 0;
177
178         if (nla_put_string(skb, IFLA_IFNAME, port->ops->get_name(port)) ||
179             nla_put_u32(skb, IFLA_MASTER, get_dpifindex(dp)) ||
180             nla_put_u32(skb, IFLA_MTU, port->ops->get_mtu(port)) ||
181 #ifdef IFLA_OPERSTATE
182             nla_put_u8(skb, IFLA_OPERSTATE,
183                        port->ops->is_running(port) ?
184                                 port->ops->get_operstate(port) :
185                                 IF_OPER_DOWN) ||
186 #endif
187             nla_put(skb, IFLA_ADDRESS, ETH_ALEN, port->ops->get_addr(port)))
188                 goto nla_put_failure;
189
190         return nlmsg_end(skb, nlh);
191
192 nla_put_failure:
193         nlmsg_cancel(skb, nlh);
194         return -EMSGSIZE;
195 }
196
197 /* Caller must hold RTNL lock. */
198 static void dp_ifinfo_notify(int event, struct vport *port)
199 {
200         struct sk_buff *skb;
201         int err;
202
203         skb = nlmsg_new(br_nlmsg_size(), GFP_KERNEL);
204         if (!skb) {
205                 err = -ENOBUFS;
206                 goto err;
207         }
208
209         err = dp_fill_ifinfo(skb, port, event, 0);
210         if (err < 0) {
211                 if (err == -ENODEV) {
212                         goto out;
213                 } else {
214                         /* -EMSGSIZE implies BUG in br_nlmsg_size() */
215                         WARN_ON(err == -EMSGSIZE);
216                         goto err;
217                 }
218         }
219
220         rtnl_notify(skb, ovs_dp_get_net(port->dp), 0, RTNLGRP_LINK, NULL, GFP_KERNEL);
221
222         return;
223 err:
224         rtnl_set_sk_err(ovs_dp_get_net(port->dp), RTNLGRP_LINK, err);
225 out:
226         kfree_skb(skb);
227 }
228
229 static void release_dp(struct kobject *kobj)
230 {
231         struct datapath *dp = container_of(kobj, struct datapath, ifobj);
232         kfree(dp);
233 }
234
235 static struct kobj_type dp_ktype = {
236         .release = release_dp
237 };
238
239 static void destroy_dp_rcu(struct rcu_head *rcu)
240 {
241         struct datapath *dp = container_of(rcu, struct datapath, rcu);
242
243         ovs_flow_tbl_destroy((__force struct flow_table *)dp->table);
244         free_percpu(dp->stats_percpu);
245         release_net(ovs_dp_get_net(dp));
246         kfree(dp->ports);
247         kobject_put(&dp->ifobj);
248 }
249
250 static struct hlist_head *vport_hash_bucket(const struct datapath *dp,
251                                             u16 port_no)
252 {
253         return &dp->ports[port_no & (DP_VPORT_HASH_BUCKETS - 1)];
254 }
255
256 struct vport *ovs_lookup_vport(const struct datapath *dp, u16 port_no)
257 {
258         struct vport *vport;
259         struct hlist_node *n;
260         struct hlist_head *head;
261
262         head = vport_hash_bucket(dp, port_no);
263         hlist_for_each_entry_rcu(vport, n, head, dp_hash_node) {
264                 if (vport->port_no == port_no)
265                         return vport;
266         }
267         return NULL;
268 }
269
270 /* Called with RTNL lock and genl_lock. */
271 static struct vport *new_vport(const struct vport_parms *parms)
272 {
273         struct vport *vport;
274
275         vport = ovs_vport_add(parms);
276         if (!IS_ERR(vport)) {
277                 struct datapath *dp = parms->dp;
278                 struct hlist_head *head = vport_hash_bucket(dp, vport->port_no);
279
280                 hlist_add_head_rcu(&vport->dp_hash_node, head);
281                 dp_ifinfo_notify(RTM_NEWLINK, vport);
282         }
283         return vport;
284 }
285
286 /* Called with RTNL lock. */
287 void ovs_dp_detach_port(struct vport *p)
288 {
289         ASSERT_RTNL();
290
291         if (p->port_no != OVSP_LOCAL)
292                 ovs_dp_sysfs_del_if(p);
293
294         dp_ifinfo_notify(RTM_DELLINK, p);
295
296         /* First drop references to device. */
297         hlist_del_rcu(&p->dp_hash_node);
298
299         /* Then destroy it. */
300         ovs_vport_del(p);
301 }
302
303 /* Must be called with rcu_read_lock. */
304 void ovs_dp_process_received_packet(struct vport *p, struct sk_buff *skb)
305 {
306         struct datapath *dp = p->dp;
307         struct sw_flow *flow;
308         struct dp_stats_percpu *stats;
309         u64 *stats_counter;
310         int error;
311
312         stats = per_cpu_ptr(dp->stats_percpu, smp_processor_id());
313
314         if (!OVS_CB(skb)->flow) {
315                 struct sw_flow_key key;
316                 int key_len;
317
318                 /* Extract flow from 'skb' into 'key'. */
319                 error = ovs_flow_extract(skb, p->port_no, &key, &key_len);
320                 if (unlikely(error)) {
321                         kfree_skb(skb);
322                         return;
323                 }
324
325                 /* Look up flow. */
326                 flow = ovs_flow_tbl_lookup(rcu_dereference(dp->table),
327                                            &key, key_len);
328                 if (unlikely(!flow)) {
329                         struct dp_upcall_info upcall;
330
331                         upcall.cmd = OVS_PACKET_CMD_MISS;
332                         upcall.key = &key;
333                         upcall.userdata = NULL;
334                         upcall.portid = p->upcall_portid;
335                         ovs_dp_upcall(dp, skb, &upcall);
336                         consume_skb(skb);
337                         stats_counter = &stats->n_missed;
338                         goto out;
339                 }
340
341                 OVS_CB(skb)->flow = flow;
342         }
343
344         stats_counter = &stats->n_hit;
345         ovs_flow_used(OVS_CB(skb)->flow, skb);
346         ovs_execute_actions(dp, skb);
347
348 out:
349         /* Update datapath statistics. */
350         u64_stats_update_begin(&stats->sync);
351         (*stats_counter)++;
352         u64_stats_update_end(&stats->sync);
353 }
354
355 static struct genl_family dp_packet_genl_family = {
356         .id = GENL_ID_GENERATE,
357         .hdrsize = sizeof(struct ovs_header),
358         .name = OVS_PACKET_FAMILY,
359         .version = OVS_PACKET_VERSION,
360         .maxattr = OVS_PACKET_ATTR_MAX,
361          SET_NETNSOK
362 };
363
364 int ovs_dp_upcall(struct datapath *dp, struct sk_buff *skb,
365                   const struct dp_upcall_info *upcall_info)
366 {
367         struct dp_stats_percpu *stats;
368         int dp_ifindex;
369         int err;
370
371         if (upcall_info->portid == 0) {
372                 err = -ENOTCONN;
373                 goto err;
374         }
375
376         dp_ifindex = get_dpifindex(dp);
377         if (!dp_ifindex) {
378                 err = -ENODEV;
379                 goto err;
380         }
381
382         forward_ip_summed(skb, true);
383
384         if (!skb_is_gso(skb))
385                 err = queue_userspace_packet(ovs_dp_get_net(dp), dp_ifindex, skb, upcall_info);
386         else
387                 err = queue_gso_packets(ovs_dp_get_net(dp), dp_ifindex, skb, upcall_info);
388         if (err)
389                 goto err;
390
391         return 0;
392
393 err:
394         stats = per_cpu_ptr(dp->stats_percpu, smp_processor_id());
395
396         u64_stats_update_begin(&stats->sync);
397         stats->n_lost++;
398         u64_stats_update_end(&stats->sync);
399
400         return err;
401 }
402
403 static int queue_gso_packets(struct net *net, int dp_ifindex,
404                              struct sk_buff *skb,
405                              const struct dp_upcall_info *upcall_info)
406 {
407         unsigned short gso_type = skb_shinfo(skb)->gso_type;
408         struct dp_upcall_info later_info;
409         struct sw_flow_key later_key;
410         struct sk_buff *segs, *nskb;
411         int err;
412
413         segs = skb_gso_segment(skb, NETIF_F_SG | NETIF_F_HW_CSUM);
414         if (IS_ERR(segs))
415                 return PTR_ERR(segs);
416
417         /* Queue all of the segments. */
418         skb = segs;
419         do {
420                 err = queue_userspace_packet(net, dp_ifindex, skb, upcall_info);
421                 if (err)
422                         break;
423
424                 if (skb == segs && gso_type & SKB_GSO_UDP) {
425                         /* The initial flow key extracted by ovs_flow_extract()
426                          * in this case is for a first fragment, so we need to
427                          * properly mark later fragments.
428                          */
429                         later_key = *upcall_info->key;
430                         later_key.ip.frag = OVS_FRAG_TYPE_LATER;
431
432                         later_info = *upcall_info;
433                         later_info.key = &later_key;
434                         upcall_info = &later_info;
435                 }
436         } while ((skb = skb->next));
437
438         /* Free all of the segments. */
439         skb = segs;
440         do {
441                 nskb = skb->next;
442                 if (err)
443                         kfree_skb(skb);
444                 else
445                         consume_skb(skb);
446         } while ((skb = nskb));
447         return err;
448 }
449
450 static int queue_userspace_packet(struct net *net, int dp_ifindex,
451                                   struct sk_buff *skb,
452                                   const struct dp_upcall_info *upcall_info)
453 {
454         struct ovs_header *upcall;
455         struct sk_buff *nskb = NULL;
456         struct sk_buff *user_skb; /* to be queued to userspace */
457         struct nlattr *nla;
458         unsigned int len;
459         int err;
460
461         if (vlan_tx_tag_present(skb)) {
462                 nskb = skb_clone(skb, GFP_ATOMIC);
463                 if (!nskb)
464                         return -ENOMEM;
465                 
466                 err = vlan_deaccel_tag(nskb);
467                 if (err)
468                         return err;
469
470                 skb = nskb;
471         }
472
473         if (nla_attr_size(skb->len) > USHRT_MAX) {
474                 err = -EFBIG;
475                 goto out;
476         }
477
478         len = sizeof(struct ovs_header);
479         len += nla_total_size(skb->len);
480         len += nla_total_size(FLOW_BUFSIZE);
481         if (upcall_info->cmd == OVS_PACKET_CMD_ACTION)
482                 len += nla_total_size(8);
483
484         user_skb = genlmsg_new(len, GFP_ATOMIC);
485         if (!user_skb) {
486                 err = -ENOMEM;
487                 goto out;
488         }
489
490         upcall = genlmsg_put(user_skb, 0, 0, &dp_packet_genl_family,
491                              0, upcall_info->cmd);
492         upcall->dp_ifindex = dp_ifindex;
493
494         nla = nla_nest_start(user_skb, OVS_PACKET_ATTR_KEY);
495         ovs_flow_to_nlattrs(upcall_info->key, user_skb);
496         nla_nest_end(user_skb, nla);
497
498         if (upcall_info->userdata)
499                 nla_put_u64(user_skb, OVS_PACKET_ATTR_USERDATA,
500                             nla_get_u64(upcall_info->userdata));
501
502         nla = __nla_reserve(user_skb, OVS_PACKET_ATTR_PACKET, skb->len);
503
504         skb_copy_and_csum_dev(skb, nla_data(nla));
505
506         err = genlmsg_unicast(net, user_skb, upcall_info->portid);
507
508 out:
509         kfree_skb(nskb);
510         return err;
511 }
512
513 /* Called with genl_mutex. */
514 static int flush_flows(struct datapath *dp)
515 {
516         struct flow_table *old_table;
517         struct flow_table *new_table;
518
519         old_table = genl_dereference(dp->table);
520         new_table = ovs_flow_tbl_alloc(TBL_MIN_BUCKETS);
521         if (!new_table)
522                 return -ENOMEM;
523
524         rcu_assign_pointer(dp->table, new_table);
525
526         ovs_flow_tbl_deferred_destroy(old_table);
527         return 0;
528 }
529
530 static struct nlattr *reserve_sfa_size(struct sw_flow_actions **sfa, int attr_len)
531 {
532
533         struct sw_flow_actions *acts;
534         int new_acts_size;
535         int req_size = NLA_ALIGN(attr_len);
536         int next_offset = offsetof(struct sw_flow_actions, actions) +
537                                         (*sfa)->actions_len;
538
539         if (req_size <= (ksize(*sfa) - next_offset))
540                 goto out;
541
542         new_acts_size = ksize(*sfa) * 2;
543
544         if (new_acts_size > MAX_ACTIONS_BUFSIZE) {
545                 if ((MAX_ACTIONS_BUFSIZE - next_offset) < req_size)
546                         return ERR_PTR(-EMSGSIZE);
547                 new_acts_size = MAX_ACTIONS_BUFSIZE;
548         }
549
550         acts = ovs_flow_actions_alloc(new_acts_size);
551         if (IS_ERR(acts))
552                 return (void *)acts;
553
554         memcpy(acts->actions, (*sfa)->actions, (*sfa)->actions_len);
555         acts->actions_len = (*sfa)->actions_len;
556         kfree(*sfa);
557         *sfa = acts;
558
559 out:
560         (*sfa)->actions_len += req_size;
561         return  (struct nlattr *) ((unsigned char *)(*sfa) + next_offset);
562 }
563
564 static int add_action(struct sw_flow_actions **sfa, int attrtype, void *data, int len)
565 {
566         struct nlattr *a;
567
568         a = reserve_sfa_size(sfa, nla_attr_size(len));
569         if (IS_ERR(a))
570                 return PTR_ERR(a);
571
572         a->nla_type = attrtype;
573         a->nla_len = nla_attr_size(len);
574
575         if (data)
576                 memcpy(nla_data(a), data, len);
577         memset((unsigned char *) a + a->nla_len, 0, nla_padlen(len));
578
579         return 0;
580 }
581
582 static inline int add_nested_action_start(struct sw_flow_actions **sfa, int attrtype)
583 {
584         int used = (*sfa)->actions_len;
585         int err;
586
587         err = add_action(sfa, attrtype, NULL, 0);
588         if (err)
589                 return err;
590
591         return used;
592 }
593
594 static inline void add_nested_action_end(struct sw_flow_actions *sfa, int st_offset)
595 {
596         struct nlattr *a = (struct nlattr *) ((unsigned char *)sfa->actions + st_offset);
597
598         a->nla_len = sfa->actions_len - st_offset;
599 }
600
601 static int validate_and_copy_actions(const struct nlattr *attr,
602                                 const struct sw_flow_key *key, int depth,
603                                 struct sw_flow_actions **sfa);
604
605 static int validate_and_copy_sample(const struct nlattr *attr,
606                            const struct sw_flow_key *key, int depth,
607                            struct sw_flow_actions **sfa)
608 {
609         const struct nlattr *attrs[OVS_SAMPLE_ATTR_MAX + 1];
610         const struct nlattr *probability, *actions;
611         const struct nlattr *a;
612         int rem, start, err, st_acts;
613
614         memset(attrs, 0, sizeof(attrs));
615         nla_for_each_nested(a, attr, rem) {
616                 int type = nla_type(a);
617                 if (!type || type > OVS_SAMPLE_ATTR_MAX || attrs[type])
618                         return -EINVAL;
619                 attrs[type] = a;
620         }
621         if (rem)
622                 return -EINVAL;
623
624         probability = attrs[OVS_SAMPLE_ATTR_PROBABILITY];
625         if (!probability || nla_len(probability) != sizeof(u32))
626                 return -EINVAL;
627
628         actions = attrs[OVS_SAMPLE_ATTR_ACTIONS];
629         if (!actions || (nla_len(actions) && nla_len(actions) < NLA_HDRLEN))
630                 return -EINVAL;
631
632         /* validation done, copy sample action. */
633         start = add_nested_action_start(sfa, OVS_ACTION_ATTR_SAMPLE);
634         if (start < 0)
635                 return start;
636         err = add_action(sfa, OVS_SAMPLE_ATTR_PROBABILITY, nla_data(probability), sizeof(u32));
637         if (err)
638                 return err;
639         st_acts = add_nested_action_start(sfa, OVS_SAMPLE_ATTR_ACTIONS);
640         if (st_acts < 0)
641                 return st_acts;
642
643         err = validate_and_copy_actions(actions, key, depth + 1, sfa);
644         if (err)
645                 return err;
646
647         add_nested_action_end(*sfa, st_acts);
648         add_nested_action_end(*sfa, start);
649
650         return 0;
651 }
652
653 static int validate_tp_port(const struct sw_flow_key *flow_key)
654 {
655         if (flow_key->eth.type == htons(ETH_P_IP)) {
656                 if (flow_key->ipv4.tp.src || flow_key->ipv4.tp.dst)
657                         return 0;
658         } else if (flow_key->eth.type == htons(ETH_P_IPV6)) {
659                 if (flow_key->ipv6.tp.src || flow_key->ipv6.tp.dst)
660                         return 0;
661         }
662
663         return -EINVAL;
664 }
665
666 static int validate_and_copy_set_tun(const struct nlattr *attr,
667                                      struct sw_flow_actions **sfa)
668 {
669         struct ovs_key_ipv4_tunnel tun_key;
670         int err, start;
671
672         err = ipv4_tun_from_nlattr(nla_data(attr), &tun_key);
673         if (err)
674                 return err;
675
676         start = add_nested_action_start(sfa, OVS_ACTION_ATTR_SET);
677         if (start < 0)
678                 return start;
679
680         err = add_action(sfa, OVS_KEY_ATTR_IPV4_TUNNEL, &tun_key, sizeof(tun_key));
681         add_nested_action_end(*sfa, start);
682
683         return err;
684 }
685
686 static int validate_set(const struct nlattr *a,
687                         const struct sw_flow_key *flow_key,
688                         struct sw_flow_actions **sfa,
689                         bool *set_tun)
690 {
691         const struct nlattr *ovs_key = nla_data(a);
692         int key_type = nla_type(ovs_key);
693
694         /* There can be only one key in a action */
695         if (nla_total_size(nla_len(ovs_key)) != nla_len(a))
696                 return -EINVAL;
697
698         if (key_type > OVS_KEY_ATTR_MAX ||
699             (ovs_key_lens[key_type] != nla_len(ovs_key) &&
700              ovs_key_lens[key_type] != -1))
701                 return -EINVAL;
702
703         switch (key_type) {
704         const struct ovs_key_ipv4 *ipv4_key;
705         const struct ovs_key_ipv6 *ipv6_key;
706         int err;
707
708         case OVS_KEY_ATTR_PRIORITY:
709         case OVS_KEY_ATTR_TUN_ID:
710         case OVS_KEY_ATTR_ETHERNET:
711                 break;
712
713         case OVS_KEY_ATTR_SKB_MARK:
714 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,20) && !defined(CONFIG_NETFILTER)
715                 if (nla_get_u32(ovs_key) != 0)
716                         return -EINVAL;
717 #endif
718                 break;
719
720         case OVS_KEY_ATTR_TUNNEL:
721                 *set_tun = true;
722                 err = validate_and_copy_set_tun(a, sfa);
723                 if (err)
724                         return err;
725                 break;
726
727         case OVS_KEY_ATTR_IPV4:
728                 if (flow_key->eth.type != htons(ETH_P_IP))
729                         return -EINVAL;
730
731                 if (!flow_key->ip.proto)
732                         return -EINVAL;
733
734                 ipv4_key = nla_data(ovs_key);
735                 if (ipv4_key->ipv4_proto != flow_key->ip.proto)
736                         return -EINVAL;
737
738                 if (ipv4_key->ipv4_frag != flow_key->ip.frag)
739                         return -EINVAL;
740
741                 break;
742
743         case OVS_KEY_ATTR_IPV6:
744                 if (flow_key->eth.type != htons(ETH_P_IPV6))
745                         return -EINVAL;
746
747                 if (!flow_key->ip.proto)
748                         return -EINVAL;
749
750                 ipv6_key = nla_data(ovs_key);
751                 if (ipv6_key->ipv6_proto != flow_key->ip.proto)
752                         return -EINVAL;
753
754                 if (ipv6_key->ipv6_frag != flow_key->ip.frag)
755                         return -EINVAL;
756
757                 if (ntohl(ipv6_key->ipv6_label) & 0xFFF00000)
758                         return -EINVAL;
759
760                 break;
761
762         case OVS_KEY_ATTR_TCP:
763                 if (flow_key->ip.proto != IPPROTO_TCP)
764                         return -EINVAL;
765
766                 return validate_tp_port(flow_key);
767
768         case OVS_KEY_ATTR_UDP:
769                 if (flow_key->ip.proto != IPPROTO_UDP)
770                         return -EINVAL;
771
772                 return validate_tp_port(flow_key);
773
774         default:
775                 return -EINVAL;
776         }
777
778         return 0;
779 }
780
781 static int validate_userspace(const struct nlattr *attr)
782 {
783         static const struct nla_policy userspace_policy[OVS_USERSPACE_ATTR_MAX + 1] =   {
784                 [OVS_USERSPACE_ATTR_PID] = {.type = NLA_U32 },
785                 [OVS_USERSPACE_ATTR_USERDATA] = {.type = NLA_U64 },
786         };
787         struct nlattr *a[OVS_USERSPACE_ATTR_MAX + 1];
788         int error;
789
790         error = nla_parse_nested(a, OVS_USERSPACE_ATTR_MAX,
791                                  attr, userspace_policy);
792         if (error)
793                 return error;
794
795         if (!a[OVS_USERSPACE_ATTR_PID] ||
796             !nla_get_u32(a[OVS_USERSPACE_ATTR_PID]))
797                 return -EINVAL;
798
799         return 0;
800 }
801
802 static int copy_action(const struct nlattr *from,
803                       struct sw_flow_actions **sfa)
804 {
805         int totlen = NLA_ALIGN(from->nla_len);
806         struct nlattr *to;
807
808         to = reserve_sfa_size(sfa, from->nla_len);
809         if (IS_ERR(to))
810                 return PTR_ERR(to);
811
812         memcpy(to, from, totlen);
813         return 0;
814 }
815
816 static int validate_and_copy_actions(const struct nlattr *attr,
817                                 const struct sw_flow_key *key,
818                                 int depth,
819                                 struct sw_flow_actions **sfa)
820 {
821         const struct nlattr *a;
822         int rem, err;
823
824         if (depth >= SAMPLE_ACTION_DEPTH)
825                 return -EOVERFLOW;
826
827         nla_for_each_nested(a, attr, rem) {
828                 /* Expected argument lengths, (u32)-1 for variable length. */
829                 static const u32 action_lens[OVS_ACTION_ATTR_MAX + 1] = {
830                         [OVS_ACTION_ATTR_OUTPUT] = sizeof(u32),
831                         [OVS_ACTION_ATTR_USERSPACE] = (u32)-1,
832                         [OVS_ACTION_ATTR_PUSH_VLAN] = sizeof(struct ovs_action_push_vlan),
833                         [OVS_ACTION_ATTR_POP_VLAN] = 0,
834                         [OVS_ACTION_ATTR_SET] = (u32)-1,
835                         [OVS_ACTION_ATTR_SAMPLE] = (u32)-1
836                 };
837                 const struct ovs_action_push_vlan *vlan;
838                 int type = nla_type(a);
839                 bool skip_copy;
840
841                 if (type > OVS_ACTION_ATTR_MAX ||
842                     (action_lens[type] != nla_len(a) &&
843                      action_lens[type] != (u32)-1))
844                         return -EINVAL;
845
846                 skip_copy = false;
847                 switch (type) {
848                 case OVS_ACTION_ATTR_UNSPEC:
849                         return -EINVAL;
850
851                 case OVS_ACTION_ATTR_USERSPACE:
852                         err = validate_userspace(a);
853                         if (err)
854                                 return err;
855                         break;
856
857                 case OVS_ACTION_ATTR_OUTPUT:
858                         if (nla_get_u32(a) >= DP_MAX_PORTS)
859                                 return -EINVAL;
860                         break;
861
862
863                 case OVS_ACTION_ATTR_POP_VLAN:
864                         break;
865
866                 case OVS_ACTION_ATTR_PUSH_VLAN:
867                         vlan = nla_data(a);
868                         if (vlan->vlan_tpid != htons(ETH_P_8021Q))
869                                 return -EINVAL;
870                         if (!(vlan->vlan_tci & htons(VLAN_TAG_PRESENT)))
871                                 return -EINVAL;
872                         break;
873
874                 case OVS_ACTION_ATTR_SET:
875                         err = validate_set(a, key, sfa, &skip_copy);
876                         if (err)
877                                 return err;
878                         break;
879
880                 case OVS_ACTION_ATTR_SAMPLE:
881                         err = validate_and_copy_sample(a, key, depth, sfa);
882                         if (err)
883                                 return err;
884                         skip_copy = true;
885                         break;
886
887                 default:
888                         return -EINVAL;
889                 }
890                 if (!skip_copy) {
891                         err = copy_action(a, sfa);
892                         if (err)
893                                 return err;
894                 }
895         }
896
897         if (rem > 0)
898                 return -EINVAL;
899
900         return 0;
901 }
902
903 static void clear_stats(struct sw_flow *flow)
904 {
905         flow->used = 0;
906         flow->tcp_flags = 0;
907         flow->packet_count = 0;
908         flow->byte_count = 0;
909 }
910
911 static int ovs_packet_cmd_execute(struct sk_buff *skb, struct genl_info *info)
912 {
913         struct ovs_header *ovs_header = info->userhdr;
914         struct nlattr **a = info->attrs;
915         struct sw_flow_actions *acts;
916         struct sk_buff *packet;
917         struct sw_flow *flow;
918         struct datapath *dp;
919         struct ethhdr *eth;
920         int len;
921         int err;
922         int key_len;
923
924         err = -EINVAL;
925         if (!a[OVS_PACKET_ATTR_PACKET] || !a[OVS_PACKET_ATTR_KEY] ||
926             !a[OVS_PACKET_ATTR_ACTIONS] ||
927             nla_len(a[OVS_PACKET_ATTR_PACKET]) < ETH_HLEN)
928                 goto err;
929
930         len = nla_len(a[OVS_PACKET_ATTR_PACKET]);
931         packet = __dev_alloc_skb(NET_IP_ALIGN + len, GFP_KERNEL);
932         err = -ENOMEM;
933         if (!packet)
934                 goto err;
935         skb_reserve(packet, NET_IP_ALIGN);
936
937         memcpy(__skb_put(packet, len), nla_data(a[OVS_PACKET_ATTR_PACKET]), len);
938
939         skb_reset_mac_header(packet);
940         eth = eth_hdr(packet);
941
942         /* Normally, setting the skb 'protocol' field would be handled by a
943          * call to eth_type_trans(), but it assumes there's a sending
944          * device, which we may not have. */
945         if (ntohs(eth->h_proto) >= 1536)
946                 packet->protocol = eth->h_proto;
947         else
948                 packet->protocol = htons(ETH_P_802_2);
949
950         /* Build an sw_flow for sending this packet. */
951         flow = ovs_flow_alloc();
952         err = PTR_ERR(flow);
953         if (IS_ERR(flow))
954                 goto err_kfree_skb;
955
956         err = ovs_flow_extract(packet, -1, &flow->key, &key_len);
957         if (err)
958                 goto err_flow_free;
959
960         err = ovs_flow_metadata_from_nlattrs(flow, key_len, a[OVS_PACKET_ATTR_KEY]);
961         if (err)
962                 goto err_flow_free;
963         acts = ovs_flow_actions_alloc(nla_len(a[OVS_PACKET_ATTR_ACTIONS]));
964         err = PTR_ERR(acts);
965         if (IS_ERR(acts))
966                 goto err_flow_free;
967
968         err = validate_and_copy_actions(a[OVS_PACKET_ATTR_ACTIONS], &flow->key, 0, &acts);
969         rcu_assign_pointer(flow->sf_acts, acts);
970         if (err)
971                 goto err_flow_free;
972
973         OVS_CB(packet)->flow = flow;
974         packet->priority = flow->key.phy.priority;
975         skb_set_mark(packet, flow->key.phy.skb_mark);
976
977         rcu_read_lock();
978         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
979         err = -ENODEV;
980         if (!dp)
981                 goto err_unlock;
982
983         local_bh_disable();
984         err = ovs_execute_actions(dp, packet);
985         local_bh_enable();
986         rcu_read_unlock();
987
988         ovs_flow_free(flow);
989         return err;
990
991 err_unlock:
992         rcu_read_unlock();
993 err_flow_free:
994         ovs_flow_free(flow);
995 err_kfree_skb:
996         kfree_skb(packet);
997 err:
998         return err;
999 }
1000
1001 static const struct nla_policy packet_policy[OVS_PACKET_ATTR_MAX + 1] = {
1002         [OVS_PACKET_ATTR_PACKET] = { .type = NLA_UNSPEC },
1003         [OVS_PACKET_ATTR_KEY] = { .type = NLA_NESTED },
1004         [OVS_PACKET_ATTR_ACTIONS] = { .type = NLA_NESTED },
1005 };
1006
1007 static struct genl_ops dp_packet_genl_ops[] = {
1008         { .cmd = OVS_PACKET_CMD_EXECUTE,
1009           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1010           .policy = packet_policy,
1011           .doit = ovs_packet_cmd_execute
1012         }
1013 };
1014
1015 static void get_dp_stats(struct datapath *dp, struct ovs_dp_stats *stats)
1016 {
1017         int i;
1018         struct flow_table *table = genl_dereference(dp->table);
1019
1020         stats->n_flows = ovs_flow_tbl_count(table);
1021
1022         stats->n_hit = stats->n_missed = stats->n_lost = 0;
1023         for_each_possible_cpu(i) {
1024                 const struct dp_stats_percpu *percpu_stats;
1025                 struct dp_stats_percpu local_stats;
1026                 unsigned int start;
1027
1028                 percpu_stats = per_cpu_ptr(dp->stats_percpu, i);
1029
1030                 do {
1031                         start = u64_stats_fetch_begin_bh(&percpu_stats->sync);
1032                         local_stats = *percpu_stats;
1033                 } while (u64_stats_fetch_retry_bh(&percpu_stats->sync, start));
1034
1035                 stats->n_hit += local_stats.n_hit;
1036                 stats->n_missed += local_stats.n_missed;
1037                 stats->n_lost += local_stats.n_lost;
1038         }
1039 }
1040
1041 static const struct nla_policy flow_policy[OVS_FLOW_ATTR_MAX + 1] = {
1042         [OVS_FLOW_ATTR_KEY] = { .type = NLA_NESTED },
1043         [OVS_FLOW_ATTR_ACTIONS] = { .type = NLA_NESTED },
1044         [OVS_FLOW_ATTR_CLEAR] = { .type = NLA_FLAG },
1045 };
1046
1047 static struct genl_family dp_flow_genl_family = {
1048         .id = GENL_ID_GENERATE,
1049         .hdrsize = sizeof(struct ovs_header),
1050         .name = OVS_FLOW_FAMILY,
1051         .version = OVS_FLOW_VERSION,
1052         .maxattr = OVS_FLOW_ATTR_MAX,
1053          SET_NETNSOK
1054 };
1055
1056 static struct genl_multicast_group ovs_dp_flow_multicast_group = {
1057         .name = OVS_FLOW_MCGROUP
1058 };
1059
1060 static int actions_to_attr(const struct nlattr *attr, int len, struct sk_buff *skb);
1061 static int sample_action_to_attr(const struct nlattr *attr, struct sk_buff *skb)
1062 {
1063         const struct nlattr *a;
1064         struct nlattr *start;
1065         int err = 0, rem;
1066
1067         start = nla_nest_start(skb, OVS_ACTION_ATTR_SAMPLE);
1068         if (!start)
1069                 return -EMSGSIZE;
1070
1071         nla_for_each_nested(a, attr, rem) {
1072                 int type = nla_type(a);
1073                 struct nlattr *st_sample;
1074
1075                 switch (type) {
1076                 case OVS_SAMPLE_ATTR_PROBABILITY:
1077                         if (nla_put(skb, OVS_SAMPLE_ATTR_PROBABILITY, sizeof(u32), nla_data(a)))
1078                                 return -EMSGSIZE;
1079                         break;
1080                 case OVS_SAMPLE_ATTR_ACTIONS:
1081                         st_sample = nla_nest_start(skb, OVS_SAMPLE_ATTR_ACTIONS);
1082                         if (!st_sample)
1083                                 return -EMSGSIZE;
1084                         err = actions_to_attr(nla_data(a), nla_len(a), skb);
1085                         if (err)
1086                                 return err;
1087                         nla_nest_end(skb, st_sample);
1088                         break;
1089                 }
1090         }
1091
1092         nla_nest_end(skb, start);
1093         return err;
1094 }
1095
1096 static int set_action_to_attr(const struct nlattr *a, struct sk_buff *skb)
1097 {
1098         const struct nlattr *ovs_key = nla_data(a);
1099         int key_type = nla_type(ovs_key);
1100         struct nlattr *start;
1101         int err;
1102
1103         switch (key_type) {
1104         case OVS_KEY_ATTR_IPV4_TUNNEL:
1105                 start = nla_nest_start(skb, OVS_ACTION_ATTR_SET);
1106                 if (!start)
1107                         return -EMSGSIZE;
1108
1109                 err = ipv4_tun_to_nlattr(skb, nla_data(ovs_key));
1110                 if (err)
1111                         return err;
1112                 nla_nest_end(skb, start);
1113                 break;
1114         default:
1115                 if (nla_put(skb, OVS_ACTION_ATTR_SET, nla_len(a), ovs_key))
1116                         return -EMSGSIZE;
1117                 break;
1118         }
1119
1120         return 0;
1121 }
1122
1123 static int actions_to_attr(const struct nlattr *attr, int len, struct sk_buff *skb)
1124 {
1125         const struct nlattr *a;
1126         int rem, err;
1127
1128         nla_for_each_attr(a, attr, len, rem) {
1129                 int type = nla_type(a);
1130
1131                 switch (type) {
1132                 case OVS_ACTION_ATTR_SET:
1133                         err = set_action_to_attr(a, skb);
1134                         if (err)
1135                                 return err;
1136                         break;
1137
1138                 case OVS_ACTION_ATTR_SAMPLE:
1139                         err = sample_action_to_attr(a, skb);
1140                         if (err)
1141                                 return err;
1142                         break;
1143                 default:
1144                         if (nla_put(skb, type, nla_len(a), nla_data(a)))
1145                                 return -EMSGSIZE;
1146                         break;
1147                 }
1148         }
1149
1150         return 0;
1151 }
1152
1153 /* Called with genl_lock. */
1154 static int ovs_flow_cmd_fill_info(struct sw_flow *flow, struct datapath *dp,
1155                                   struct sk_buff *skb, u32 portid,
1156                                   u32 seq, u32 flags, u8 cmd)
1157 {
1158         const int skb_orig_len = skb->len;
1159         const struct sw_flow_actions *sf_acts;
1160         struct nlattr *start;
1161         struct ovs_flow_stats stats;
1162         struct ovs_header *ovs_header;
1163         struct nlattr *nla;
1164         unsigned long used;
1165         u8 tcp_flags;
1166         int err;
1167
1168         sf_acts = rcu_dereference_protected(flow->sf_acts,
1169                                             lockdep_genl_is_held());
1170
1171         ovs_header = genlmsg_put(skb, portid, seq, &dp_flow_genl_family, flags, cmd);
1172         if (!ovs_header)
1173                 return -EMSGSIZE;
1174
1175         ovs_header->dp_ifindex = get_dpifindex(dp);
1176
1177         nla = nla_nest_start(skb, OVS_FLOW_ATTR_KEY);
1178         if (!nla)
1179                 goto nla_put_failure;
1180         err = ovs_flow_to_nlattrs(&flow->key, skb);
1181         if (err)
1182                 goto error;
1183         nla_nest_end(skb, nla);
1184
1185         spin_lock_bh(&flow->lock);
1186         used = flow->used;
1187         stats.n_packets = flow->packet_count;
1188         stats.n_bytes = flow->byte_count;
1189         tcp_flags = flow->tcp_flags;
1190         spin_unlock_bh(&flow->lock);
1191
1192         if (used &&
1193             nla_put_u64(skb, OVS_FLOW_ATTR_USED, ovs_flow_used_time(used)))
1194                 goto nla_put_failure;
1195
1196         if (stats.n_packets &&
1197             nla_put(skb, OVS_FLOW_ATTR_STATS,
1198                     sizeof(struct ovs_flow_stats), &stats))
1199                 goto nla_put_failure;
1200
1201         if (tcp_flags &&
1202             nla_put_u8(skb, OVS_FLOW_ATTR_TCP_FLAGS, tcp_flags))
1203                 goto nla_put_failure;
1204
1205         /* If OVS_FLOW_ATTR_ACTIONS doesn't fit, skip dumping the actions if
1206          * this is the first flow to be dumped into 'skb'.  This is unusual for
1207          * Netlink but individual action lists can be longer than
1208          * NLMSG_GOODSIZE and thus entirely undumpable if we didn't do this.
1209          * The userspace caller can always fetch the actions separately if it
1210          * really wants them.  (Most userspace callers in fact don't care.)
1211          *
1212          * This can only fail for dump operations because the skb is always
1213          * properly sized for single flows.
1214          */
1215         start = nla_nest_start(skb, OVS_FLOW_ATTR_ACTIONS);
1216         err = actions_to_attr(sf_acts->actions, sf_acts->actions_len, skb);
1217         if (err < 0 && skb_orig_len)
1218                 goto error;
1219         nla_nest_end(skb, start);
1220
1221         return genlmsg_end(skb, ovs_header);
1222
1223 nla_put_failure:
1224         err = -EMSGSIZE;
1225 error:
1226         genlmsg_cancel(skb, ovs_header);
1227         return err;
1228 }
1229
1230 static struct sk_buff *ovs_flow_cmd_alloc_info(struct sw_flow *flow)
1231 {
1232         const struct sw_flow_actions *sf_acts;
1233         int len;
1234
1235         sf_acts = rcu_dereference_protected(flow->sf_acts,
1236                                             lockdep_genl_is_held());
1237
1238         /* OVS_FLOW_ATTR_KEY */
1239         len = nla_total_size(FLOW_BUFSIZE);
1240         /* OVS_FLOW_ATTR_ACTIONS */
1241         len += nla_total_size(sf_acts->actions_len);
1242         /* OVS_FLOW_ATTR_STATS */
1243         len += nla_total_size(sizeof(struct ovs_flow_stats));
1244         /* OVS_FLOW_ATTR_TCP_FLAGS */
1245         len += nla_total_size(1);
1246         /* OVS_FLOW_ATTR_USED */
1247         len += nla_total_size(8);
1248
1249         len += NLMSG_ALIGN(sizeof(struct ovs_header));
1250
1251         return genlmsg_new(len, GFP_KERNEL);
1252 }
1253
1254 static struct sk_buff *ovs_flow_cmd_build_info(struct sw_flow *flow,
1255                                                struct datapath *dp,
1256                                                u32 portid, u32 seq, u8 cmd)
1257 {
1258         struct sk_buff *skb;
1259         int retval;
1260
1261         skb = ovs_flow_cmd_alloc_info(flow);
1262         if (!skb)
1263                 return ERR_PTR(-ENOMEM);
1264
1265         retval = ovs_flow_cmd_fill_info(flow, dp, skb, portid, seq, 0, cmd);
1266         BUG_ON(retval < 0);
1267         return skb;
1268 }
1269
1270 static int ovs_flow_cmd_new_or_set(struct sk_buff *skb, struct genl_info *info)
1271 {
1272         struct nlattr **a = info->attrs;
1273         struct ovs_header *ovs_header = info->userhdr;
1274         struct sw_flow_key key;
1275         struct sw_flow *flow;
1276         struct sk_buff *reply;
1277         struct datapath *dp;
1278         struct flow_table *table;
1279         struct sw_flow_actions *acts = NULL;
1280         int error;
1281         int key_len;
1282
1283         /* Extract key. */
1284         error = -EINVAL;
1285         if (!a[OVS_FLOW_ATTR_KEY])
1286                 goto error;
1287         error = ovs_flow_from_nlattrs(&key, &key_len, a[OVS_FLOW_ATTR_KEY]);
1288         if (error)
1289                 goto error;
1290
1291         /* Validate actions. */
1292         if (a[OVS_FLOW_ATTR_ACTIONS]) {
1293                 acts = ovs_flow_actions_alloc(nla_len(a[OVS_FLOW_ATTR_ACTIONS]));
1294                 error = PTR_ERR(acts);
1295                 if (IS_ERR(acts))
1296                         goto error;
1297
1298                 error = validate_and_copy_actions(a[OVS_FLOW_ATTR_ACTIONS], &key,  0, &acts);
1299                 if (error)
1300                         goto err_kfree;
1301         } else if (info->genlhdr->cmd == OVS_FLOW_CMD_NEW) {
1302                 error = -EINVAL;
1303                 goto error;
1304         }
1305
1306         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
1307         error = -ENODEV;
1308         if (!dp)
1309                 goto err_kfree;
1310
1311         table = genl_dereference(dp->table);
1312         flow = ovs_flow_tbl_lookup(table, &key, key_len);
1313         if (!flow) {
1314                 /* Bail out if we're not allowed to create a new flow. */
1315                 error = -ENOENT;
1316                 if (info->genlhdr->cmd == OVS_FLOW_CMD_SET)
1317                         goto err_kfree;
1318
1319                 /* Expand table, if necessary, to make room. */
1320                 if (ovs_flow_tbl_need_to_expand(table)) {
1321                         struct flow_table *new_table;
1322
1323                         new_table = ovs_flow_tbl_expand(table);
1324                         if (!IS_ERR(new_table)) {
1325                                 rcu_assign_pointer(dp->table, new_table);
1326                                 ovs_flow_tbl_deferred_destroy(table);
1327                                 table = genl_dereference(dp->table);
1328                         }
1329                 }
1330
1331                 /* Allocate flow. */
1332                 flow = ovs_flow_alloc();
1333                 if (IS_ERR(flow)) {
1334                         error = PTR_ERR(flow);
1335                         goto err_kfree;
1336                 }
1337                 clear_stats(flow);
1338
1339                 rcu_assign_pointer(flow->sf_acts, acts);
1340
1341                 /* Put flow in bucket. */
1342                 ovs_flow_tbl_insert(table, flow, &key, key_len);
1343
1344                 reply = ovs_flow_cmd_build_info(flow, dp, info->snd_portid,
1345                                                 info->snd_seq,
1346                                                 OVS_FLOW_CMD_NEW);
1347         } else {
1348                 /* We found a matching flow. */
1349                 struct sw_flow_actions *old_acts;
1350
1351                 /* Bail out if we're not allowed to modify an existing flow.
1352                  * We accept NLM_F_CREATE in place of the intended NLM_F_EXCL
1353                  * because Generic Netlink treats the latter as a dump
1354                  * request.  We also accept NLM_F_EXCL in case that bug ever
1355                  * gets fixed.
1356                  */
1357                 error = -EEXIST;
1358                 if (info->genlhdr->cmd == OVS_FLOW_CMD_NEW &&
1359                     info->nlhdr->nlmsg_flags & (NLM_F_CREATE | NLM_F_EXCL))
1360                         goto err_kfree;
1361
1362                 /* Update actions. */
1363                 old_acts = rcu_dereference_protected(flow->sf_acts,
1364                                                      lockdep_genl_is_held());
1365                 rcu_assign_pointer(flow->sf_acts, acts);
1366                 ovs_flow_deferred_free_acts(old_acts);
1367
1368                 reply = ovs_flow_cmd_build_info(flow, dp, info->snd_portid,
1369                                                info->snd_seq, OVS_FLOW_CMD_NEW);
1370
1371                 /* Clear stats. */
1372                 if (a[OVS_FLOW_ATTR_CLEAR]) {
1373                         spin_lock_bh(&flow->lock);
1374                         clear_stats(flow);
1375                         spin_unlock_bh(&flow->lock);
1376                 }
1377         }
1378
1379         if (!IS_ERR(reply))
1380                 genl_notify(reply, genl_info_net(info), info->snd_portid,
1381                            ovs_dp_flow_multicast_group.id, info->nlhdr,
1382                            GFP_KERNEL);
1383         else
1384                 netlink_set_err(GENL_SOCK(sock_net(skb->sk)), 0,
1385                                 ovs_dp_flow_multicast_group.id, PTR_ERR(reply));
1386         return 0;
1387
1388 err_kfree:
1389         kfree(acts);
1390 error:
1391         return error;
1392 }
1393
1394 static int ovs_flow_cmd_get(struct sk_buff *skb, struct genl_info *info)
1395 {
1396         struct nlattr **a = info->attrs;
1397         struct ovs_header *ovs_header = info->userhdr;
1398         struct sw_flow_key key;
1399         struct sk_buff *reply;
1400         struct sw_flow *flow;
1401         struct datapath *dp;
1402         struct flow_table *table;
1403         int err;
1404         int key_len;
1405
1406         if (!a[OVS_FLOW_ATTR_KEY])
1407                 return -EINVAL;
1408         err = ovs_flow_from_nlattrs(&key, &key_len, a[OVS_FLOW_ATTR_KEY]);
1409         if (err)
1410                 return err;
1411
1412         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
1413         if (!dp)
1414                 return -ENODEV;
1415
1416         table = genl_dereference(dp->table);
1417         flow = ovs_flow_tbl_lookup(table, &key, key_len);
1418         if (!flow)
1419                 return -ENOENT;
1420
1421         reply = ovs_flow_cmd_build_info(flow, dp, info->snd_portid,
1422                                         info->snd_seq, OVS_FLOW_CMD_NEW);
1423         if (IS_ERR(reply))
1424                 return PTR_ERR(reply);
1425
1426         return genlmsg_reply(reply, info);
1427 }
1428
1429 static int ovs_flow_cmd_del(struct sk_buff *skb, struct genl_info *info)
1430 {
1431         struct nlattr **a = info->attrs;
1432         struct ovs_header *ovs_header = info->userhdr;
1433         struct sw_flow_key key;
1434         struct sk_buff *reply;
1435         struct sw_flow *flow;
1436         struct datapath *dp;
1437         struct flow_table *table;
1438         int err;
1439         int key_len;
1440
1441         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
1442         if (!dp)
1443                 return -ENODEV;
1444
1445         if (!a[OVS_FLOW_ATTR_KEY])
1446                 return flush_flows(dp);
1447
1448         err = ovs_flow_from_nlattrs(&key, &key_len, a[OVS_FLOW_ATTR_KEY]);
1449         if (err)
1450                 return err;
1451
1452         table = genl_dereference(dp->table);
1453         flow = ovs_flow_tbl_lookup(table, &key, key_len);
1454         if (!flow)
1455                 return -ENOENT;
1456
1457         reply = ovs_flow_cmd_alloc_info(flow);
1458         if (!reply)
1459                 return -ENOMEM;
1460
1461         ovs_flow_tbl_remove(table, flow);
1462
1463         err = ovs_flow_cmd_fill_info(flow, dp, reply, info->snd_portid,
1464                                      info->snd_seq, 0, OVS_FLOW_CMD_DEL);
1465         BUG_ON(err < 0);
1466
1467         ovs_flow_deferred_free(flow);
1468
1469         genl_notify(reply, genl_info_net(info), info->snd_portid,
1470                     ovs_dp_flow_multicast_group.id, info->nlhdr, GFP_KERNEL);
1471         return 0;
1472 }
1473
1474 static int ovs_flow_cmd_dump(struct sk_buff *skb, struct netlink_callback *cb)
1475 {
1476         struct ovs_header *ovs_header = genlmsg_data(nlmsg_data(cb->nlh));
1477         struct datapath *dp;
1478         struct flow_table *table;
1479
1480         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
1481         if (!dp)
1482                 return -ENODEV;
1483
1484         table = genl_dereference(dp->table);
1485
1486         for (;;) {
1487                 struct sw_flow *flow;
1488                 u32 bucket, obj;
1489
1490                 bucket = cb->args[0];
1491                 obj = cb->args[1];
1492                 flow = ovs_flow_tbl_next(table, &bucket, &obj);
1493                 if (!flow)
1494                         break;
1495
1496                 if (ovs_flow_cmd_fill_info(flow, dp, skb,
1497                                            NETLINK_CB(cb->skb).portid,
1498                                            cb->nlh->nlmsg_seq, NLM_F_MULTI,
1499                                            OVS_FLOW_CMD_NEW) < 0)
1500                         break;
1501
1502                 cb->args[0] = bucket;
1503                 cb->args[1] = obj;
1504         }
1505         return skb->len;
1506 }
1507
1508 static struct genl_ops dp_flow_genl_ops[] = {
1509         { .cmd = OVS_FLOW_CMD_NEW,
1510           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1511           .policy = flow_policy,
1512           .doit = ovs_flow_cmd_new_or_set
1513         },
1514         { .cmd = OVS_FLOW_CMD_DEL,
1515           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1516           .policy = flow_policy,
1517           .doit = ovs_flow_cmd_del
1518         },
1519         { .cmd = OVS_FLOW_CMD_GET,
1520           .flags = 0,               /* OK for unprivileged users. */
1521           .policy = flow_policy,
1522           .doit = ovs_flow_cmd_get,
1523           .dumpit = ovs_flow_cmd_dump
1524         },
1525         { .cmd = OVS_FLOW_CMD_SET,
1526           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1527           .policy = flow_policy,
1528           .doit = ovs_flow_cmd_new_or_set,
1529         },
1530 };
1531
1532 static const struct nla_policy datapath_policy[OVS_DP_ATTR_MAX + 1] = {
1533 #ifdef HAVE_NLA_NUL_STRING
1534         [OVS_DP_ATTR_NAME] = { .type = NLA_NUL_STRING, .len = IFNAMSIZ - 1 },
1535 #endif
1536         [OVS_DP_ATTR_UPCALL_PID] = { .type = NLA_U32 },
1537 };
1538
1539 static struct genl_family dp_datapath_genl_family = {
1540         .id = GENL_ID_GENERATE,
1541         .hdrsize = sizeof(struct ovs_header),
1542         .name = OVS_DATAPATH_FAMILY,
1543         .version = OVS_DATAPATH_VERSION,
1544         .maxattr = OVS_DP_ATTR_MAX,
1545          SET_NETNSOK
1546 };
1547
1548 static struct genl_multicast_group ovs_dp_datapath_multicast_group = {
1549         .name = OVS_DATAPATH_MCGROUP
1550 };
1551
1552 static int ovs_dp_cmd_fill_info(struct datapath *dp, struct sk_buff *skb,
1553                                 u32 portid, u32 seq, u32 flags, u8 cmd)
1554 {
1555         struct ovs_header *ovs_header;
1556         struct ovs_dp_stats dp_stats;
1557         int err;
1558
1559         ovs_header = genlmsg_put(skb, portid, seq, &dp_datapath_genl_family,
1560                                    flags, cmd);
1561         if (!ovs_header)
1562                 goto error;
1563
1564         ovs_header->dp_ifindex = get_dpifindex(dp);
1565
1566         rcu_read_lock();
1567         err = nla_put_string(skb, OVS_DP_ATTR_NAME, ovs_dp_name(dp));
1568         rcu_read_unlock();
1569         if (err)
1570                 goto nla_put_failure;
1571
1572         get_dp_stats(dp, &dp_stats);
1573         if (nla_put(skb, OVS_DP_ATTR_STATS, sizeof(struct ovs_dp_stats), &dp_stats))
1574                 goto nla_put_failure;
1575
1576         return genlmsg_end(skb, ovs_header);
1577
1578 nla_put_failure:
1579         genlmsg_cancel(skb, ovs_header);
1580 error:
1581         return -EMSGSIZE;
1582 }
1583
1584 static struct sk_buff *ovs_dp_cmd_build_info(struct datapath *dp, u32 portid,
1585                                              u32 seq, u8 cmd)
1586 {
1587         struct sk_buff *skb;
1588         int retval;
1589
1590         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1591         if (!skb)
1592                 return ERR_PTR(-ENOMEM);
1593
1594         retval = ovs_dp_cmd_fill_info(dp, skb, portid, seq, 0, cmd);
1595         if (retval < 0) {
1596                 kfree_skb(skb);
1597                 return ERR_PTR(retval);
1598         }
1599         return skb;
1600 }
1601
1602 static int ovs_dp_cmd_validate(struct nlattr *a[OVS_DP_ATTR_MAX + 1])
1603 {
1604         return CHECK_NUL_STRING(a[OVS_DP_ATTR_NAME], IFNAMSIZ - 1);
1605 }
1606
1607 /* Called with genl_mutex and optionally with RTNL lock also. */
1608 static struct datapath *lookup_datapath(struct net *net,
1609                                         struct ovs_header *ovs_header,
1610                                         struct nlattr *a[OVS_DP_ATTR_MAX + 1])
1611 {
1612         struct datapath *dp;
1613
1614         if (!a[OVS_DP_ATTR_NAME])
1615                 dp = get_dp(net, ovs_header->dp_ifindex);
1616         else {
1617                 struct vport *vport;
1618
1619                 rcu_read_lock();
1620                 vport = ovs_vport_locate(net, nla_data(a[OVS_DP_ATTR_NAME]));
1621                 dp = vport && vport->port_no == OVSP_LOCAL ? vport->dp : NULL;
1622                 rcu_read_unlock();
1623         }
1624         return dp ? dp : ERR_PTR(-ENODEV);
1625 }
1626
1627 static int ovs_dp_cmd_new(struct sk_buff *skb, struct genl_info *info)
1628 {
1629         struct nlattr **a = info->attrs;
1630         struct vport_parms parms;
1631         struct sk_buff *reply;
1632         struct datapath *dp;
1633         struct vport *vport;
1634         struct ovs_net *ovs_net;
1635         int err, i;
1636
1637         err = -EINVAL;
1638         if (!a[OVS_DP_ATTR_NAME] || !a[OVS_DP_ATTR_UPCALL_PID])
1639                 goto err;
1640
1641         err = ovs_dp_cmd_validate(a);
1642         if (err)
1643                 goto err;
1644
1645         rtnl_lock();
1646
1647         err = -ENOMEM;
1648         dp = kzalloc(sizeof(*dp), GFP_KERNEL);
1649         if (dp == NULL)
1650                 goto err_unlock_rtnl;
1651
1652         /* Initialize kobject for bridge.  This will be added as
1653          * /sys/class/net/<devname>/brif later, if sysfs is enabled. */
1654         dp->ifobj.kset = NULL;
1655         kobject_init(&dp->ifobj, &dp_ktype);
1656
1657         ovs_dp_set_net(dp, hold_net(sock_net(skb->sk)));
1658
1659         /* Allocate table. */
1660         err = -ENOMEM;
1661         rcu_assign_pointer(dp->table, ovs_flow_tbl_alloc(TBL_MIN_BUCKETS));
1662         if (!dp->table)
1663                 goto err_free_dp;
1664
1665         dp->stats_percpu = alloc_percpu(struct dp_stats_percpu);
1666         if (!dp->stats_percpu) {
1667                 err = -ENOMEM;
1668                 goto err_destroy_table;
1669         }
1670
1671         dp->ports = kmalloc(DP_VPORT_HASH_BUCKETS * sizeof(struct hlist_head),
1672                             GFP_KERNEL);
1673         if (!dp->ports) {
1674                 err = -ENOMEM;
1675                 goto err_destroy_percpu;
1676         }
1677
1678         for (i = 0; i < DP_VPORT_HASH_BUCKETS; i++)
1679                 INIT_HLIST_HEAD(&dp->ports[i]);
1680
1681         /* Set up our datapath device. */
1682         parms.name = nla_data(a[OVS_DP_ATTR_NAME]);
1683         parms.type = OVS_VPORT_TYPE_INTERNAL;
1684         parms.options = NULL;
1685         parms.dp = dp;
1686         parms.port_no = OVSP_LOCAL;
1687         parms.upcall_portid = nla_get_u32(a[OVS_DP_ATTR_UPCALL_PID]);
1688
1689         vport = new_vport(&parms);
1690         if (IS_ERR(vport)) {
1691                 err = PTR_ERR(vport);
1692                 if (err == -EBUSY)
1693                         err = -EEXIST;
1694
1695                 goto err_destroy_ports_array;
1696         }
1697
1698         reply = ovs_dp_cmd_build_info(dp, info->snd_portid,
1699                                       info->snd_seq, OVS_DP_CMD_NEW);
1700         err = PTR_ERR(reply);
1701         if (IS_ERR(reply))
1702                 goto err_destroy_local_port;
1703
1704         ovs_net = net_generic(ovs_dp_get_net(dp), ovs_net_id);
1705         list_add_tail(&dp->list_node, &ovs_net->dps);
1706         ovs_dp_sysfs_add_dp(dp);
1707
1708         rtnl_unlock();
1709
1710         genl_notify(reply, genl_info_net(info), info->snd_portid,
1711                     ovs_dp_datapath_multicast_group.id, info->nlhdr,
1712                     GFP_KERNEL);
1713         return 0;
1714
1715 err_destroy_local_port:
1716         ovs_dp_detach_port(ovs_vport_rtnl(dp, OVSP_LOCAL));
1717 err_destroy_ports_array:
1718         kfree(dp->ports);
1719 err_destroy_percpu:
1720         free_percpu(dp->stats_percpu);
1721 err_destroy_table:
1722         ovs_flow_tbl_destroy(genl_dereference(dp->table));
1723 err_free_dp:
1724         release_net(ovs_dp_get_net(dp));
1725         kfree(dp);
1726 err_unlock_rtnl:
1727         rtnl_unlock();
1728 err:
1729         return err;
1730 }
1731
1732 /* Called with genl_mutex. */
1733 static void __dp_destroy(struct datapath *dp)
1734 {
1735         int i;
1736
1737         rtnl_lock();
1738
1739         for (i = 0; i < DP_VPORT_HASH_BUCKETS; i++) {
1740                 struct vport *vport;
1741                 struct hlist_node *node, *n;
1742
1743                 hlist_for_each_entry_safe(vport, node, n, &dp->ports[i], dp_hash_node)
1744                         if (vport->port_no != OVSP_LOCAL)
1745                                 ovs_dp_detach_port(vport);
1746         }
1747
1748         ovs_dp_sysfs_del_dp(dp);
1749         list_del(&dp->list_node);
1750         ovs_dp_detach_port(ovs_vport_rtnl(dp, OVSP_LOCAL));
1751
1752         /* rtnl_unlock() will wait until all the references to devices that
1753          * are pending unregistration have been dropped.  We do it here to
1754          * ensure that any internal devices (which contain DP pointers) are
1755          * fully destroyed before freeing the datapath.
1756          */
1757         rtnl_unlock();
1758
1759         call_rcu(&dp->rcu, destroy_dp_rcu);
1760 }
1761
1762 static int ovs_dp_cmd_del(struct sk_buff *skb, struct genl_info *info)
1763 {
1764         struct sk_buff *reply;
1765         struct datapath *dp;
1766         int err;
1767
1768         err = ovs_dp_cmd_validate(info->attrs);
1769         if (err)
1770                 return err;
1771
1772         dp = lookup_datapath(sock_net(skb->sk), info->userhdr, info->attrs);
1773         err = PTR_ERR(dp);
1774         if (IS_ERR(dp))
1775                 return err;
1776
1777         reply = ovs_dp_cmd_build_info(dp, info->snd_portid,
1778                                       info->snd_seq, OVS_DP_CMD_DEL);
1779         err = PTR_ERR(reply);
1780         if (IS_ERR(reply))
1781                 return err;
1782
1783         __dp_destroy(dp);
1784
1785         genl_notify(reply, genl_info_net(info), info->snd_portid,
1786                     ovs_dp_datapath_multicast_group.id, info->nlhdr,
1787                     GFP_KERNEL);
1788
1789         return 0;
1790 }
1791
1792 static int ovs_dp_cmd_set(struct sk_buff *skb, struct genl_info *info)
1793 {
1794         struct sk_buff *reply;
1795         struct datapath *dp;
1796         int err;
1797
1798         err = ovs_dp_cmd_validate(info->attrs);
1799         if (err)
1800                 return err;
1801
1802         dp = lookup_datapath(sock_net(skb->sk), info->userhdr, info->attrs);
1803         if (IS_ERR(dp))
1804                 return PTR_ERR(dp);
1805
1806         reply = ovs_dp_cmd_build_info(dp, info->snd_portid,
1807                                       info->snd_seq, OVS_DP_CMD_NEW);
1808         if (IS_ERR(reply)) {
1809                 err = PTR_ERR(reply);
1810                 netlink_set_err(GENL_SOCK(sock_net(skb->sk)), 0,
1811                                 ovs_dp_datapath_multicast_group.id, err);
1812                 return 0;
1813         }
1814
1815         genl_notify(reply, genl_info_net(info), info->snd_portid,
1816                     ovs_dp_datapath_multicast_group.id, info->nlhdr,
1817                     GFP_KERNEL);
1818
1819         return 0;
1820 }
1821
1822 static int ovs_dp_cmd_get(struct sk_buff *skb, struct genl_info *info)
1823 {
1824         struct sk_buff *reply;
1825         struct datapath *dp;
1826         int err;
1827
1828         err = ovs_dp_cmd_validate(info->attrs);
1829         if (err)
1830                 return err;
1831
1832         dp = lookup_datapath(sock_net(skb->sk), info->userhdr, info->attrs);
1833         if (IS_ERR(dp))
1834                 return PTR_ERR(dp);
1835
1836         reply = ovs_dp_cmd_build_info(dp, info->snd_portid,
1837                                       info->snd_seq, OVS_DP_CMD_NEW);
1838         if (IS_ERR(reply))
1839                 return PTR_ERR(reply);
1840
1841         return genlmsg_reply(reply, info);
1842 }
1843
1844 static int ovs_dp_cmd_dump(struct sk_buff *skb, struct netlink_callback *cb)
1845 {
1846         struct ovs_net *ovs_net = net_generic(sock_net(skb->sk), ovs_net_id);
1847         struct datapath *dp;
1848         int skip = cb->args[0];
1849         int i = 0;
1850
1851         list_for_each_entry(dp, &ovs_net->dps, list_node) {
1852                 if (i >= skip &&
1853                     ovs_dp_cmd_fill_info(dp, skb, NETLINK_CB(cb->skb).portid,
1854                                          cb->nlh->nlmsg_seq, NLM_F_MULTI,
1855                                          OVS_DP_CMD_NEW) < 0)
1856                         break;
1857                 i++;
1858         }
1859
1860         cb->args[0] = i;
1861
1862         return skb->len;
1863 }
1864
1865 static struct genl_ops dp_datapath_genl_ops[] = {
1866         { .cmd = OVS_DP_CMD_NEW,
1867           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1868           .policy = datapath_policy,
1869           .doit = ovs_dp_cmd_new
1870         },
1871         { .cmd = OVS_DP_CMD_DEL,
1872           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1873           .policy = datapath_policy,
1874           .doit = ovs_dp_cmd_del
1875         },
1876         { .cmd = OVS_DP_CMD_GET,
1877           .flags = 0,               /* OK for unprivileged users. */
1878           .policy = datapath_policy,
1879           .doit = ovs_dp_cmd_get,
1880           .dumpit = ovs_dp_cmd_dump
1881         },
1882         { .cmd = OVS_DP_CMD_SET,
1883           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
1884           .policy = datapath_policy,
1885           .doit = ovs_dp_cmd_set,
1886         },
1887 };
1888
1889 static const struct nla_policy vport_policy[OVS_VPORT_ATTR_MAX + 1] = {
1890 #ifdef HAVE_NLA_NUL_STRING
1891         [OVS_VPORT_ATTR_NAME] = { .type = NLA_NUL_STRING, .len = IFNAMSIZ - 1 },
1892         [OVS_VPORT_ATTR_STATS] = { .len = sizeof(struct ovs_vport_stats) },
1893         [OVS_VPORT_ATTR_ADDRESS] = { .len = ETH_ALEN },
1894 #else
1895         [OVS_VPORT_ATTR_STATS] = { .minlen = sizeof(struct ovs_vport_stats) },
1896         [OVS_VPORT_ATTR_ADDRESS] = { .minlen = ETH_ALEN },
1897 #endif
1898         [OVS_VPORT_ATTR_PORT_NO] = { .type = NLA_U32 },
1899         [OVS_VPORT_ATTR_TYPE] = { .type = NLA_U32 },
1900         [OVS_VPORT_ATTR_UPCALL_PID] = { .type = NLA_U32 },
1901         [OVS_VPORT_ATTR_OPTIONS] = { .type = NLA_NESTED },
1902 };
1903
1904 static struct genl_family dp_vport_genl_family = {
1905         .id = GENL_ID_GENERATE,
1906         .hdrsize = sizeof(struct ovs_header),
1907         .name = OVS_VPORT_FAMILY,
1908         .version = OVS_VPORT_VERSION,
1909         .maxattr = OVS_VPORT_ATTR_MAX,
1910          SET_NETNSOK
1911 };
1912
1913 struct genl_multicast_group ovs_dp_vport_multicast_group = {
1914         .name = OVS_VPORT_MCGROUP
1915 };
1916
1917 /* Called with RTNL lock or RCU read lock. */
1918 static int ovs_vport_cmd_fill_info(struct vport *vport, struct sk_buff *skb,
1919                                    u32 portid, u32 seq, u32 flags, u8 cmd)
1920 {
1921         struct ovs_header *ovs_header;
1922         struct ovs_vport_stats vport_stats;
1923         int err;
1924
1925         ovs_header = genlmsg_put(skb, portid, seq, &dp_vport_genl_family,
1926                                  flags, cmd);
1927         if (!ovs_header)
1928                 return -EMSGSIZE;
1929
1930         ovs_header->dp_ifindex = get_dpifindex(vport->dp);
1931
1932         if (nla_put_u32(skb, OVS_VPORT_ATTR_PORT_NO, vport->port_no) ||
1933             nla_put_u32(skb, OVS_VPORT_ATTR_TYPE, vport->ops->type) ||
1934             nla_put_string(skb, OVS_VPORT_ATTR_NAME, vport->ops->get_name(vport)) ||
1935             nla_put_u32(skb, OVS_VPORT_ATTR_UPCALL_PID, vport->upcall_portid))
1936                 goto nla_put_failure;
1937
1938         ovs_vport_get_stats(vport, &vport_stats);
1939         if (nla_put(skb, OVS_VPORT_ATTR_STATS, sizeof(struct ovs_vport_stats),
1940                     &vport_stats))
1941                 goto nla_put_failure;
1942
1943         if (nla_put(skb, OVS_VPORT_ATTR_ADDRESS, ETH_ALEN,
1944                     vport->ops->get_addr(vport)))
1945                 goto nla_put_failure;
1946
1947         err = ovs_vport_get_options(vport, skb);
1948         if (err == -EMSGSIZE)
1949                 goto error;
1950
1951         return genlmsg_end(skb, ovs_header);
1952
1953 nla_put_failure:
1954         err = -EMSGSIZE;
1955 error:
1956         genlmsg_cancel(skb, ovs_header);
1957         return err;
1958 }
1959
1960 /* Called with RTNL lock or RCU read lock. */
1961 struct sk_buff *ovs_vport_cmd_build_info(struct vport *vport, u32 portid,
1962                                          u32 seq, u8 cmd)
1963 {
1964         struct sk_buff *skb;
1965         int retval;
1966
1967         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
1968         if (!skb)
1969                 return ERR_PTR(-ENOMEM);
1970
1971         retval = ovs_vport_cmd_fill_info(vport, skb, portid, seq, 0, cmd);
1972         if (retval < 0) {
1973                 kfree_skb(skb);
1974                 return ERR_PTR(retval);
1975         }
1976         return skb;
1977 }
1978
1979 static int ovs_vport_cmd_validate(struct nlattr *a[OVS_VPORT_ATTR_MAX + 1])
1980 {
1981         return CHECK_NUL_STRING(a[OVS_VPORT_ATTR_NAME], IFNAMSIZ - 1);
1982 }
1983
1984 /* Called with RTNL lock or RCU read lock. */
1985 static struct vport *lookup_vport(struct net *net,
1986                                   struct ovs_header *ovs_header,
1987                                   struct nlattr *a[OVS_VPORT_ATTR_MAX + 1])
1988 {
1989         struct datapath *dp;
1990         struct vport *vport;
1991
1992         if (a[OVS_VPORT_ATTR_NAME]) {
1993                 vport = ovs_vport_locate(net, nla_data(a[OVS_VPORT_ATTR_NAME]));
1994                 if (!vport)
1995                         return ERR_PTR(-ENODEV);
1996                 if (ovs_header->dp_ifindex &&
1997                     ovs_header->dp_ifindex != get_dpifindex(vport->dp))
1998                         return ERR_PTR(-ENODEV);
1999                 return vport;
2000         } else if (a[OVS_VPORT_ATTR_PORT_NO]) {
2001                 u32 port_no = nla_get_u32(a[OVS_VPORT_ATTR_PORT_NO]);
2002
2003                 if (port_no >= DP_MAX_PORTS)
2004                         return ERR_PTR(-EFBIG);
2005
2006                 dp = get_dp(net, ovs_header->dp_ifindex);
2007                 if (!dp)
2008                         return ERR_PTR(-ENODEV);
2009
2010                 vport = ovs_vport_rtnl_rcu(dp, port_no);
2011                 if (!vport)
2012                         return ERR_PTR(-ENOENT);
2013                 return vport;
2014         } else
2015                 return ERR_PTR(-EINVAL);
2016 }
2017
2018 /* Called with RTNL lock. */
2019 static int change_vport(struct vport *vport,
2020                         struct nlattr *a[OVS_VPORT_ATTR_MAX + 1])
2021 {
2022         int err = 0;
2023
2024         if (a[OVS_VPORT_ATTR_STATS])
2025                 ovs_vport_set_stats(vport, nla_data(a[OVS_VPORT_ATTR_STATS]));
2026
2027         if (a[OVS_VPORT_ATTR_ADDRESS])
2028                 err = ovs_vport_set_addr(vport, nla_data(a[OVS_VPORT_ATTR_ADDRESS]));
2029
2030         return err;
2031 }
2032
2033 static int ovs_vport_cmd_new(struct sk_buff *skb, struct genl_info *info)
2034 {
2035         struct nlattr **a = info->attrs;
2036         struct ovs_header *ovs_header = info->userhdr;
2037         struct vport_parms parms;
2038         struct sk_buff *reply;
2039         struct vport *vport;
2040         struct datapath *dp;
2041         u32 port_no;
2042         int err;
2043
2044         err = -EINVAL;
2045         if (!a[OVS_VPORT_ATTR_NAME] || !a[OVS_VPORT_ATTR_TYPE] ||
2046             !a[OVS_VPORT_ATTR_UPCALL_PID])
2047                 goto exit;
2048
2049         err = ovs_vport_cmd_validate(a);
2050         if (err)
2051                 goto exit;
2052
2053         rtnl_lock();
2054         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
2055         err = -ENODEV;
2056         if (!dp)
2057                 goto exit_unlock;
2058
2059         if (a[OVS_VPORT_ATTR_PORT_NO]) {
2060                 port_no = nla_get_u32(a[OVS_VPORT_ATTR_PORT_NO]);
2061
2062                 err = -EFBIG;
2063                 if (port_no >= DP_MAX_PORTS)
2064                         goto exit_unlock;
2065
2066                 vport = ovs_vport_rtnl(dp, port_no);
2067                 err = -EBUSY;
2068                 if (vport)
2069                         goto exit_unlock;
2070         } else {
2071                 for (port_no = 1; ; port_no++) {
2072                         if (port_no >= DP_MAX_PORTS) {
2073                                 err = -EFBIG;
2074                                 goto exit_unlock;
2075                         }
2076                         vport = ovs_vport_rtnl(dp, port_no);
2077                         if (!vport)
2078                                 break;
2079                 }
2080         }
2081
2082         parms.name = nla_data(a[OVS_VPORT_ATTR_NAME]);
2083         parms.type = nla_get_u32(a[OVS_VPORT_ATTR_TYPE]);
2084         parms.options = a[OVS_VPORT_ATTR_OPTIONS];
2085         parms.dp = dp;
2086         parms.port_no = port_no;
2087         parms.upcall_portid = nla_get_u32(a[OVS_VPORT_ATTR_UPCALL_PID]);
2088
2089         vport = new_vport(&parms);
2090         err = PTR_ERR(vport);
2091         if (IS_ERR(vport))
2092                 goto exit_unlock;
2093
2094         ovs_dp_sysfs_add_if(vport);
2095
2096         err = change_vport(vport, a);
2097         if (!err) {
2098                 reply = ovs_vport_cmd_build_info(vport, info->snd_portid,
2099                                                  info->snd_seq,
2100                                                  OVS_VPORT_CMD_NEW);
2101                 if (IS_ERR(reply))
2102                         err = PTR_ERR(reply);
2103         }
2104         if (err) {
2105                 ovs_dp_detach_port(vport);
2106                 goto exit_unlock;
2107         }
2108         genl_notify(reply, genl_info_net(info), info->snd_portid,
2109                     ovs_dp_vport_multicast_group.id, info->nlhdr, GFP_KERNEL);
2110
2111 exit_unlock:
2112         rtnl_unlock();
2113 exit:
2114         return err;
2115 }
2116
2117 static int ovs_vport_cmd_set(struct sk_buff *skb, struct genl_info *info)
2118 {
2119         struct nlattr **a = info->attrs;
2120         struct sk_buff *reply;
2121         struct vport *vport;
2122         int err;
2123
2124         err = ovs_vport_cmd_validate(a);
2125         if (err)
2126                 goto exit;
2127
2128         rtnl_lock();
2129         vport = lookup_vport(sock_net(skb->sk), info->userhdr, a);
2130         err = PTR_ERR(vport);
2131         if (IS_ERR(vport))
2132                 goto exit_unlock;
2133
2134         err = 0;
2135         if (a[OVS_VPORT_ATTR_TYPE] &&
2136             nla_get_u32(a[OVS_VPORT_ATTR_TYPE]) != vport->ops->type)
2137                 err = -EINVAL;
2138
2139         if (!err && a[OVS_VPORT_ATTR_OPTIONS])
2140                 err = ovs_vport_set_options(vport, a[OVS_VPORT_ATTR_OPTIONS]);
2141         if (!err)
2142                 err = change_vport(vport, a);
2143         else
2144                 goto exit_unlock;
2145         if (!err && a[OVS_VPORT_ATTR_UPCALL_PID])
2146                 vport->upcall_portid = nla_get_u32(a[OVS_VPORT_ATTR_UPCALL_PID]);
2147
2148         reply = ovs_vport_cmd_build_info(vport, info->snd_portid,
2149                                          info->snd_seq, OVS_VPORT_CMD_NEW);
2150         if (IS_ERR(reply)) {
2151                 netlink_set_err(GENL_SOCK(sock_net(skb->sk)), 0,
2152                                 ovs_dp_vport_multicast_group.id, PTR_ERR(reply));
2153                 goto exit_unlock;
2154         }
2155
2156         genl_notify(reply, genl_info_net(info), info->snd_portid,
2157                     ovs_dp_vport_multicast_group.id, info->nlhdr, GFP_KERNEL);
2158
2159 exit_unlock:
2160         rtnl_unlock();
2161 exit:
2162         return err;
2163 }
2164
2165 static int ovs_vport_cmd_del(struct sk_buff *skb, struct genl_info *info)
2166 {
2167         struct nlattr **a = info->attrs;
2168         struct sk_buff *reply;
2169         struct vport *vport;
2170         int err;
2171
2172         err = ovs_vport_cmd_validate(a);
2173         if (err)
2174                 goto exit;
2175
2176         rtnl_lock();
2177         vport = lookup_vport(sock_net(skb->sk), info->userhdr, a);
2178         err = PTR_ERR(vport);
2179         if (IS_ERR(vport))
2180                 goto exit_unlock;
2181
2182         if (vport->port_no == OVSP_LOCAL) {
2183                 err = -EINVAL;
2184                 goto exit_unlock;
2185         }
2186
2187         reply = ovs_vport_cmd_build_info(vport, info->snd_portid,
2188                                          info->snd_seq, OVS_VPORT_CMD_DEL);
2189         err = PTR_ERR(reply);
2190         if (IS_ERR(reply))
2191                 goto exit_unlock;
2192
2193         ovs_dp_detach_port(vport);
2194
2195         genl_notify(reply, genl_info_net(info), info->snd_portid,
2196                     ovs_dp_vport_multicast_group.id, info->nlhdr, GFP_KERNEL);
2197
2198 exit_unlock:
2199         rtnl_unlock();
2200 exit:
2201         return err;
2202 }
2203
2204 static int ovs_vport_cmd_get(struct sk_buff *skb, struct genl_info *info)
2205 {
2206         struct nlattr **a = info->attrs;
2207         struct ovs_header *ovs_header = info->userhdr;
2208         struct sk_buff *reply;
2209         struct vport *vport;
2210         int err;
2211
2212         err = ovs_vport_cmd_validate(a);
2213         if (err)
2214                 goto exit;
2215
2216         rcu_read_lock();
2217         vport = lookup_vport(sock_net(skb->sk), ovs_header, a);
2218         err = PTR_ERR(vport);
2219         if (IS_ERR(vport))
2220                 goto exit_unlock;
2221
2222         reply = ovs_vport_cmd_build_info(vport, info->snd_portid,
2223                                          info->snd_seq, OVS_VPORT_CMD_NEW);
2224         err = PTR_ERR(reply);
2225         if (IS_ERR(reply))
2226                 goto exit_unlock;
2227
2228         rcu_read_unlock();
2229
2230         return genlmsg_reply(reply, info);
2231
2232 exit_unlock:
2233         rcu_read_unlock();
2234 exit:
2235         return err;
2236 }
2237
2238 static int ovs_vport_cmd_dump(struct sk_buff *skb, struct netlink_callback *cb)
2239 {
2240         struct ovs_header *ovs_header = genlmsg_data(nlmsg_data(cb->nlh));
2241         struct datapath *dp;
2242         int bucket = cb->args[0], skip = cb->args[1];
2243         int i, j = 0;
2244
2245         dp = get_dp(sock_net(skb->sk), ovs_header->dp_ifindex);
2246         if (!dp)
2247                 return -ENODEV;
2248
2249         rcu_read_lock();
2250         for (i = bucket; i < DP_VPORT_HASH_BUCKETS; i++) {
2251                 struct vport *vport;
2252                 struct hlist_node *n;
2253
2254                 j = 0;
2255                 hlist_for_each_entry_rcu(vport, n, &dp->ports[i], dp_hash_node) {
2256                         if (j >= skip &&
2257                             ovs_vport_cmd_fill_info(vport, skb,
2258                                                     NETLINK_CB(cb->skb).portid,
2259                                                     cb->nlh->nlmsg_seq,
2260                                                     NLM_F_MULTI,
2261                                                     OVS_VPORT_CMD_NEW) < 0)
2262                                 goto out;
2263
2264                         j++;
2265                 }
2266                 skip = 0;
2267         }
2268 out:
2269         rcu_read_unlock();
2270
2271         cb->args[0] = i;
2272         cb->args[1] = j;
2273
2274         return skb->len;
2275 }
2276
2277 static struct genl_ops dp_vport_genl_ops[] = {
2278         { .cmd = OVS_VPORT_CMD_NEW,
2279           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
2280           .policy = vport_policy,
2281           .doit = ovs_vport_cmd_new
2282         },
2283         { .cmd = OVS_VPORT_CMD_DEL,
2284           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
2285           .policy = vport_policy,
2286           .doit = ovs_vport_cmd_del
2287         },
2288         { .cmd = OVS_VPORT_CMD_GET,
2289           .flags = 0,               /* OK for unprivileged users. */
2290           .policy = vport_policy,
2291           .doit = ovs_vport_cmd_get,
2292           .dumpit = ovs_vport_cmd_dump
2293         },
2294         { .cmd = OVS_VPORT_CMD_SET,
2295           .flags = GENL_ADMIN_PERM, /* Requires CAP_NET_ADMIN privilege. */
2296           .policy = vport_policy,
2297           .doit = ovs_vport_cmd_set,
2298         },
2299 };
2300
2301 struct genl_family_and_ops {
2302         struct genl_family *family;
2303         struct genl_ops *ops;
2304         int n_ops;
2305         struct genl_multicast_group *group;
2306 };
2307
2308 static const struct genl_family_and_ops dp_genl_families[] = {
2309         { &dp_datapath_genl_family,
2310           dp_datapath_genl_ops, ARRAY_SIZE(dp_datapath_genl_ops),
2311           &ovs_dp_datapath_multicast_group },
2312         { &dp_vport_genl_family,
2313           dp_vport_genl_ops, ARRAY_SIZE(dp_vport_genl_ops),
2314           &ovs_dp_vport_multicast_group },
2315         { &dp_flow_genl_family,
2316           dp_flow_genl_ops, ARRAY_SIZE(dp_flow_genl_ops),
2317           &ovs_dp_flow_multicast_group },
2318         { &dp_packet_genl_family,
2319           dp_packet_genl_ops, ARRAY_SIZE(dp_packet_genl_ops),
2320           NULL },
2321 };
2322
2323 static void dp_unregister_genl(int n_families)
2324 {
2325         int i;
2326
2327         for (i = 0; i < n_families; i++)
2328                 genl_unregister_family(dp_genl_families[i].family);
2329 }
2330
2331 static int dp_register_genl(void)
2332 {
2333         int n_registered;
2334         int err;
2335         int i;
2336
2337         n_registered = 0;
2338         for (i = 0; i < ARRAY_SIZE(dp_genl_families); i++) {
2339                 const struct genl_family_and_ops *f = &dp_genl_families[i];
2340
2341                 err = genl_register_family_with_ops(f->family, f->ops,
2342                                                     f->n_ops);
2343                 if (err)
2344                         goto error;
2345                 n_registered++;
2346
2347                 if (f->group) {
2348                         err = genl_register_mc_group(f->family, f->group);
2349                         if (err)
2350                                 goto error;
2351                 }
2352         }
2353
2354         return 0;
2355
2356 error:
2357         dp_unregister_genl(n_registered);
2358         return err;
2359 }
2360
2361 static int __rehash_flow_table(void *dummy)
2362 {
2363         struct datapath *dp;
2364         struct net *net;
2365
2366         rtnl_lock();
2367         for_each_net(net) {
2368                 struct ovs_net *ovs_net = net_generic(net, ovs_net_id);
2369
2370                 list_for_each_entry(dp, &ovs_net->dps, list_node) {
2371                         struct flow_table *old_table = genl_dereference(dp->table);
2372                         struct flow_table *new_table;
2373
2374                         new_table = ovs_flow_tbl_rehash(old_table);
2375                         if (!IS_ERR(new_table)) {
2376                                 rcu_assign_pointer(dp->table, new_table);
2377                                 ovs_flow_tbl_deferred_destroy(old_table);
2378                         }
2379                 }
2380         }
2381         rtnl_unlock();
2382         return 0;
2383 }
2384
2385 static void rehash_flow_table(struct work_struct *work)
2386 {
2387         genl_exec(__rehash_flow_table, NULL);
2388         schedule_delayed_work(&rehash_flow_wq, REHASH_FLOW_INTERVAL);
2389 }
2390
2391 static int dp_destroy_all(void *data)
2392 {
2393         struct datapath *dp, *dp_next;
2394         struct ovs_net *ovs_net = data;
2395
2396         list_for_each_entry_safe(dp, dp_next, &ovs_net->dps, list_node)
2397                 __dp_destroy(dp);
2398
2399         return 0;
2400 }
2401
2402 static int __net_init ovs_init_net(struct net *net)
2403 {
2404         struct ovs_net *ovs_net = net_generic(net, ovs_net_id);
2405
2406         INIT_LIST_HEAD(&ovs_net->dps);
2407         return 0;
2408 }
2409
2410 static void __net_exit ovs_exit_net(struct net *net)
2411 {
2412         struct ovs_net *ovs_net = net_generic(net, ovs_net_id);
2413
2414         genl_exec(dp_destroy_all, ovs_net);
2415 }
2416
2417 static struct pernet_operations ovs_net_ops = {
2418         .init = ovs_init_net,
2419         .exit = ovs_exit_net,
2420         .id   = &ovs_net_id,
2421         .size = sizeof(struct ovs_net),
2422 };
2423
2424 static int __init dp_init(void)
2425 {
2426         struct sk_buff *dummy_skb;
2427         int err;
2428
2429         BUILD_BUG_ON(sizeof(struct ovs_skb_cb) > sizeof(dummy_skb->cb));
2430
2431         pr_info("Open vSwitch switching datapath %s, built "__DATE__" "__TIME__"\n",
2432                 VERSION);
2433
2434         err = genl_exec_init();
2435         if (err)
2436                 goto error;
2437
2438         err = ovs_workqueues_init();
2439         if (err)
2440                 goto error_genl_exec;
2441
2442         err = ovs_tnl_init();
2443         if (err)
2444                 goto error_wq;
2445
2446         err = ovs_flow_init();
2447         if (err)
2448                 goto error_tnl_exit;
2449
2450         err = ovs_vport_init();
2451         if (err)
2452                 goto error_flow_exit;
2453
2454         err = register_pernet_device(&ovs_net_ops);
2455         if (err)
2456                 goto error_vport_exit;
2457
2458         err = register_netdevice_notifier(&ovs_dp_device_notifier);
2459         if (err)
2460                 goto error_netns_exit;
2461
2462         err = dp_register_genl();
2463         if (err < 0)
2464                 goto error_unreg_notifier;
2465
2466         schedule_delayed_work(&rehash_flow_wq, REHASH_FLOW_INTERVAL);
2467
2468         return 0;
2469
2470 error_unreg_notifier:
2471         unregister_netdevice_notifier(&ovs_dp_device_notifier);
2472 error_netns_exit:
2473         unregister_pernet_device(&ovs_net_ops);
2474 error_vport_exit:
2475         ovs_vport_exit();
2476 error_flow_exit:
2477         ovs_flow_exit();
2478 error_tnl_exit:
2479         ovs_tnl_exit();
2480 error_wq:
2481         ovs_workqueues_exit();
2482 error_genl_exec:
2483         genl_exec_exit();
2484 error:
2485         return err;
2486 }
2487
2488 static void dp_cleanup(void)
2489 {
2490         cancel_delayed_work_sync(&rehash_flow_wq);
2491         dp_unregister_genl(ARRAY_SIZE(dp_genl_families));
2492         unregister_netdevice_notifier(&ovs_dp_device_notifier);
2493         unregister_pernet_device(&ovs_net_ops);
2494         rcu_barrier();
2495         ovs_vport_exit();
2496         ovs_flow_exit();
2497         ovs_tnl_exit();
2498         ovs_workqueues_exit();
2499         genl_exec_exit();
2500 }
2501
2502 module_init(dp_init);
2503 module_exit(dp_cleanup);
2504
2505 MODULE_DESCRIPTION("Open vSwitch switching datapath");
2506 MODULE_LICENSE("GPL");
2507 MODULE_VERSION(VERSION);