vswitchd: Dump QoS with appctl.
[openvswitch] / vswitchd / bridge.c
1 /* Copyright (c) 2008, 2009, 2010, 2011 Nicira Networks
2  *
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at:
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License.
14  */
15
16 #include <config.h>
17 #include "bridge.h"
18 #include "byte-order.h"
19 #include <assert.h>
20 #include <errno.h>
21 #include <arpa/inet.h>
22 #include <ctype.h>
23 #include <inttypes.h>
24 #include <sys/socket.h>
25 #include <net/if.h>
26 #include <openflow/openflow.h>
27 #include <signal.h>
28 #include <stdlib.h>
29 #include <strings.h>
30 #include <sys/stat.h>
31 #include <sys/socket.h>
32 #include <sys/types.h>
33 #include <unistd.h>
34 #include "bitmap.h"
35 #include "cfm.h"
36 #include "classifier.h"
37 #include "coverage.h"
38 #include "daemon.h"
39 #include "dirs.h"
40 #include "dpif.h"
41 #include "dynamic-string.h"
42 #include "flow.h"
43 #include "hash.h"
44 #include "hmap.h"
45 #include "jsonrpc.h"
46 #include "list.h"
47 #include "mac-learning.h"
48 #include "netdev.h"
49 #include "netlink.h"
50 #include "odp-util.h"
51 #include "ofp-print.h"
52 #include "ofpbuf.h"
53 #include "ofproto/netflow.h"
54 #include "ofproto/ofproto.h"
55 #include "ovsdb-data.h"
56 #include "packets.h"
57 #include "poll-loop.h"
58 #include "process.h"
59 #include "sha1.h"
60 #include "shash.h"
61 #include "socket-util.h"
62 #include "stream-ssl.h"
63 #include "svec.h"
64 #include "system-stats.h"
65 #include "timeval.h"
66 #include "util.h"
67 #include "unixctl.h"
68 #include "vconn.h"
69 #include "vswitchd/vswitch-idl.h"
70 #include "xenserver.h"
71 #include "vlog.h"
72 #include "sflow_api.h"
73
74 VLOG_DEFINE_THIS_MODULE(bridge);
75
76 COVERAGE_DEFINE(bridge_flush);
77 COVERAGE_DEFINE(bridge_process_flow);
78 COVERAGE_DEFINE(bridge_process_cfm);
79 COVERAGE_DEFINE(bridge_process_lacp);
80 COVERAGE_DEFINE(bridge_reconfigure);
81 COVERAGE_DEFINE(bridge_lacp_update);
82
83 struct dst {
84     uint16_t vlan;
85     uint16_t dp_ifidx;
86 };
87
88 struct dst_set {
89     struct dst builtin[32];
90     struct dst *dsts;
91     size_t n, allocated;
92 };
93
94 static void dst_set_init(struct dst_set *);
95 static void dst_set_add(struct dst_set *, const struct dst *);
96 static void dst_set_free(struct dst_set *);
97
98 enum lacp_status {
99     LACP_CURRENT   = 0x01, /* Current State. */
100     LACP_EXPIRED   = 0x02, /* Expired State. */
101     LACP_DEFAULTED = 0x04, /* Partner is defaulted. */
102     LACP_ATTACHED  = 0x08, /* Attached. Interface may be choosen for flows. */
103 };
104
105 struct iface {
106     /* These members are always valid. */
107     struct port *port;          /* Containing port. */
108     size_t port_ifidx;          /* Index within containing port. */
109     char *name;                 /* Host network device name. */
110     tag_type tag;               /* Tag associated with this interface. */
111     long long delay_expires;    /* Time after which 'enabled' may change. */
112
113     /* These members are valid only after bridge_reconfigure() causes them to
114      * be initialized. */
115     struct hmap_node dp_ifidx_node; /* In struct bridge's "ifaces" hmap. */
116     int dp_ifidx;               /* Index within kernel datapath. */
117     struct netdev *netdev;      /* Network device. */
118     bool enabled;               /* May be chosen for flows? */
119     bool up;                    /* Is the interface up? */
120     const char *type;           /* Usually same as cfg->type. */
121     struct cfm *cfm;            /* Connectivity Fault Management */
122     const struct ovsrec_interface *cfg;
123
124     /* LACP information. */
125     enum lacp_status lacp_status;  /* LACP status. */
126     uint16_t lacp_priority;        /* LACP port priority. */
127     struct lacp_info lacp_actor;   /* LACP actor information. */
128     struct lacp_info lacp_partner; /* LACP partner information. */
129     long long int lacp_tx;         /* Next LACP message transmission time. */
130     long long int lacp_rx;         /* Next LACP message receive time. */
131 };
132
133 #define BOND_MASK 0xff
134 struct bond_entry {
135     int iface_idx;              /* Index of assigned iface, or -1 if none. */
136     uint64_t tx_bytes;          /* Count of bytes recently transmitted. */
137     tag_type iface_tag;         /* Tag associated with iface_idx. */
138 };
139
140 enum bond_mode {
141     BM_TCP, /* Transport Layer Load Balance. */
142     BM_SLB, /* Source Load Balance. */
143     BM_AB   /* Active Backup. */
144 };
145
146 #define MAX_MIRRORS 32
147 typedef uint32_t mirror_mask_t;
148 #define MIRROR_MASK_C(X) UINT32_C(X)
149 BUILD_ASSERT_DECL(sizeof(mirror_mask_t) * CHAR_BIT >= MAX_MIRRORS);
150 struct mirror {
151     struct bridge *bridge;
152     size_t idx;
153     char *name;
154     struct uuid uuid;           /* UUID of this "mirror" record in database. */
155
156     /* Selection criteria. */
157     struct shash src_ports;     /* Name is port name; data is always NULL. */
158     struct shash dst_ports;     /* Name is port name; data is always NULL. */
159     int *vlans;
160     size_t n_vlans;
161
162     /* Output. */
163     struct port *out_port;
164     int out_vlan;
165 };
166
167 /* Flags for a port's lacp member. */
168 #define LACP_ACTIVE     0x01 /* LACP is in active mode. */
169 #define LACP_PASSIVE    0x02 /* LACP is in passive mode. */
170 #define LACP_NEGOTIATED 0x04 /* LACP has successfully negotiated. */
171
172 #define FLOOD_PORT ((struct port *) 1) /* The 'flood' output port. */
173 struct port {
174     struct bridge *bridge;
175     size_t port_idx;
176     int vlan;                   /* -1=trunk port, else a 12-bit VLAN ID. */
177     unsigned long *trunks;      /* Bitmap of trunked VLANs, if 'vlan' == -1.
178                                  * NULL if all VLANs are trunked. */
179     const struct ovsrec_port *cfg;
180     char *name;
181
182     /* An ordinary bridge port has 1 interface.
183      * A bridge port for bonding has at least 2 interfaces. */
184     struct iface **ifaces;
185     size_t n_ifaces, allocated_ifaces;
186
187     /* Bonding info. */
188     enum bond_mode bond_mode;   /* Type of the bond. BM_SLB is the default. */
189     int active_iface;           /* Ifidx on which bcasts accepted, or -1. */
190     tag_type active_iface_tag;  /* Tag for bcast flows. */
191     tag_type no_ifaces_tag;     /* Tag for flows when all ifaces disabled. */
192     int updelay, downdelay;     /* Delay before iface goes up/down, in ms. */
193     bool bond_fake_iface;       /* Fake a bond interface for legacy compat? */
194     bool miimon;                /* Use miimon instead of carrier? */
195     long long int bond_miimon_interval; /* Miimon status refresh interval. */
196     long long int bond_miimon_next_update; /* Time of next miimon update. */
197     long long int bond_next_fake_iface_update; /* Time of next update. */
198     struct netdev_monitor *monitor; /* Tracks carrier up/down status. */
199
200     /* LACP information. */
201     int lacp;                   /* LACP status flags. 0 if LACP is off. */
202     uint16_t lacp_key;          /* LACP aggregation key. */
203     uint16_t lacp_priority;     /* LACP system priority. */
204     bool lacp_need_update;      /* Need to update attached interfaces? */
205
206     /* SLB specific bonding info. */
207     struct bond_entry *bond_hash; /* An array of (BOND_MASK + 1) elements. */
208     int bond_rebalance_interval; /* Interval between rebalances, in ms. */
209     long long int bond_next_rebalance; /* Next rebalancing time. */
210
211     /* Port mirroring info. */
212     mirror_mask_t src_mirrors;  /* Mirrors triggered when packet received. */
213     mirror_mask_t dst_mirrors;  /* Mirrors triggered when packet sent. */
214     bool is_mirror_output_port; /* Does port mirroring send frames here? */
215 };
216
217 struct bridge {
218     struct list node;           /* Node in global list of bridges. */
219     char *name;                 /* User-specified arbitrary name. */
220     struct mac_learning *ml;    /* MAC learning table. */
221     uint8_t ea[ETH_ADDR_LEN];   /* Bridge Ethernet Address. */
222     uint8_t default_ea[ETH_ADDR_LEN]; /* Default MAC. */
223     const struct ovsrec_bridge *cfg;
224
225     /* OpenFlow switch processing. */
226     struct ofproto *ofproto;    /* OpenFlow switch. */
227
228     /* Kernel datapath information. */
229     struct dpif *dpif;          /* Datapath. */
230     struct hmap ifaces;         /* Contains "struct iface"s. */
231
232     /* Bridge ports. */
233     struct port **ports;
234     size_t n_ports, allocated_ports;
235     struct shash iface_by_name; /* "struct iface"s indexed by name. */
236     struct shash port_by_name;  /* "struct port"s indexed by name. */
237
238     /* Bonding. */
239     bool has_bonded_ports;
240
241     /* Flow tracking. */
242     bool flush;
243
244     /* Port mirroring. */
245     struct mirror *mirrors[MAX_MIRRORS];
246 };
247
248 /* List of all bridges. */
249 static struct list all_bridges = LIST_INITIALIZER(&all_bridges);
250
251 /* OVSDB IDL used to obtain configuration. */
252 static struct ovsdb_idl *idl;
253
254 /* Each time this timer expires, the bridge fetches systems and interface
255  * statistics and pushes them into the database. */
256 #define STATS_INTERVAL (5 * 1000) /* In milliseconds. */
257 static long long int stats_timer = LLONG_MIN;
258
259 static struct bridge *bridge_create(const struct ovsrec_bridge *br_cfg);
260 static void bridge_destroy(struct bridge *);
261 static struct bridge *bridge_lookup(const char *name);
262 static unixctl_cb_func bridge_unixctl_dump_flows;
263 static unixctl_cb_func bridge_unixctl_reconnect;
264 static int bridge_run_one(struct bridge *);
265 static size_t bridge_get_controllers(const struct bridge *br,
266                                      struct ovsrec_controller ***controllersp);
267 static void bridge_reconfigure_one(struct bridge *);
268 static void bridge_reconfigure_remotes(struct bridge *,
269                                        const struct sockaddr_in *managers,
270                                        size_t n_managers);
271 static void bridge_get_all_ifaces(const struct bridge *, struct shash *ifaces);
272 static void bridge_fetch_dp_ifaces(struct bridge *);
273 static void bridge_flush(struct bridge *);
274 static void bridge_pick_local_hw_addr(struct bridge *,
275                                       uint8_t ea[ETH_ADDR_LEN],
276                                       struct iface **hw_addr_iface);
277 static uint64_t bridge_pick_datapath_id(struct bridge *,
278                                         const uint8_t bridge_ea[ETH_ADDR_LEN],
279                                         struct iface *hw_addr_iface);
280 static struct iface *bridge_get_local_iface(struct bridge *);
281 static uint64_t dpid_from_hash(const void *, size_t nbytes);
282
283 static unixctl_cb_func bridge_unixctl_fdb_show;
284 static unixctl_cb_func qos_unixctl_show;
285
286 static void lacp_run(struct bridge *);
287 static void lacp_wait(struct bridge *);
288 static void lacp_process_packet(const struct ofpbuf *, struct iface *);
289
290 static void bond_init(void);
291 static void bond_run(struct bridge *);
292 static void bond_wait(struct bridge *);
293 static void bond_rebalance_port(struct port *);
294 static void bond_send_learning_packets(struct port *);
295 static void bond_enable_slave(struct iface *iface, bool enable);
296
297 static struct port *port_create(struct bridge *, const char *name);
298 static void port_reconfigure(struct port *, const struct ovsrec_port *);
299 static void port_del_ifaces(struct port *, const struct ovsrec_port *);
300 static void port_destroy(struct port *);
301 static struct port *port_lookup(const struct bridge *, const char *name);
302 static struct iface *port_lookup_iface(const struct port *, const char *name);
303 static struct port *port_from_dp_ifidx(const struct bridge *,
304                                        uint16_t dp_ifidx);
305 static void port_update_bonding(struct port *);
306 static void port_update_lacp(struct port *);
307
308 static void mirror_create(struct bridge *, struct ovsrec_mirror *);
309 static void mirror_destroy(struct mirror *);
310 static void mirror_reconfigure(struct bridge *);
311 static void mirror_reconfigure_one(struct mirror *, struct ovsrec_mirror *);
312 static bool vlan_is_mirrored(const struct mirror *, int vlan);
313
314 static struct iface *iface_create(struct port *port,
315                                   const struct ovsrec_interface *if_cfg);
316 static void iface_destroy(struct iface *);
317 static struct iface *iface_lookup(const struct bridge *, const char *name);
318 static struct iface *iface_find(const char *name);
319 static struct iface *iface_from_dp_ifidx(const struct bridge *,
320                                          uint16_t dp_ifidx);
321 static void iface_set_mac(struct iface *);
322 static void iface_set_ofport(const struct ovsrec_interface *, int64_t ofport);
323 static void iface_update_qos(struct iface *, const struct ovsrec_qos *);
324 static void iface_update_cfm(struct iface *);
325 static void iface_refresh_cfm_stats(struct iface *iface);
326 static void iface_send_packet(struct iface *, struct ofpbuf *packet);
327 static uint8_t iface_get_lacp_state(const struct iface *);
328 static void iface_get_lacp_priority(struct iface *, struct lacp_info *);
329 static void iface_set_lacp_defaulted(struct iface *);
330 static void iface_set_lacp_expired(struct iface *);
331
332 static void shash_from_ovs_idl_map(char **keys, char **values, size_t n,
333                                    struct shash *);
334 static void shash_to_ovs_idl_map(struct shash *,
335                                  char ***keys, char ***values, size_t *n);
336
337
338 /* Hooks into ofproto processing. */
339 static struct ofhooks bridge_ofhooks;
340 \f
341 /* Public functions. */
342
343 /* Initializes the bridge module, configuring it to obtain its configuration
344  * from an OVSDB server accessed over 'remote', which should be a string in a
345  * form acceptable to ovsdb_idl_create(). */
346 void
347 bridge_init(const char *remote)
348 {
349     /* Create connection to database. */
350     idl = ovsdb_idl_create(remote, &ovsrec_idl_class, true);
351
352     ovsdb_idl_omit_alert(idl, &ovsrec_open_vswitch_col_cur_cfg);
353     ovsdb_idl_omit_alert(idl, &ovsrec_open_vswitch_col_statistics);
354     ovsdb_idl_omit(idl, &ovsrec_open_vswitch_col_external_ids);
355
356     ovsdb_idl_omit(idl, &ovsrec_bridge_col_external_ids);
357
358     ovsdb_idl_omit(idl, &ovsrec_port_col_external_ids);
359     ovsdb_idl_omit(idl, &ovsrec_port_col_fake_bridge);
360
361     ovsdb_idl_omit_alert(idl, &ovsrec_interface_col_ofport);
362     ovsdb_idl_omit_alert(idl, &ovsrec_interface_col_statistics);
363     ovsdb_idl_omit(idl, &ovsrec_interface_col_external_ids);
364
365     /* Register unixctl commands. */
366     unixctl_command_register("fdb/show", bridge_unixctl_fdb_show, NULL);
367     unixctl_command_register("qos/show", qos_unixctl_show, NULL);
368     unixctl_command_register("bridge/dump-flows", bridge_unixctl_dump_flows,
369                              NULL);
370     unixctl_command_register("bridge/reconnect", bridge_unixctl_reconnect,
371                              NULL);
372     bond_init();
373 }
374
375 void
376 bridge_exit(void)
377 {
378     struct bridge *br, *next_br;
379
380     LIST_FOR_EACH_SAFE (br, next_br, node, &all_bridges) {
381         bridge_destroy(br);
382     }
383     ovsdb_idl_destroy(idl);
384 }
385
386 /* Performs configuration that is only necessary once at ovs-vswitchd startup,
387  * but for which the ovs-vswitchd configuration 'cfg' is required. */
388 static void
389 bridge_configure_once(const struct ovsrec_open_vswitch *cfg)
390 {
391     static bool already_configured_once;
392     struct svec bridge_names;
393     struct svec dpif_names, dpif_types;
394     size_t i;
395
396     /* Only do this once per ovs-vswitchd run. */
397     if (already_configured_once) {
398         return;
399     }
400     already_configured_once = true;
401
402     stats_timer = time_msec() + STATS_INTERVAL;
403
404     /* Get all the configured bridges' names from 'cfg' into 'bridge_names'. */
405     svec_init(&bridge_names);
406     for (i = 0; i < cfg->n_bridges; i++) {
407         svec_add(&bridge_names, cfg->bridges[i]->name);
408     }
409     svec_sort(&bridge_names);
410
411     /* Iterate over all system dpifs and delete any of them that do not appear
412      * in 'cfg'. */
413     svec_init(&dpif_names);
414     svec_init(&dpif_types);
415     dp_enumerate_types(&dpif_types);
416     for (i = 0; i < dpif_types.n; i++) {
417         size_t j;
418
419         dp_enumerate_names(dpif_types.names[i], &dpif_names);
420
421         /* Delete each dpif whose name is not in 'bridge_names'. */
422         for (j = 0; j < dpif_names.n; j++) {
423             if (!svec_contains(&bridge_names, dpif_names.names[j])) {
424                 struct dpif *dpif;
425                 int retval;
426
427                 retval = dpif_open(dpif_names.names[j], dpif_types.names[i],
428                                    &dpif);
429                 if (!retval) {
430                     dpif_delete(dpif);
431                     dpif_close(dpif);
432                 }
433             }
434         }
435     }
436     svec_destroy(&bridge_names);
437     svec_destroy(&dpif_names);
438     svec_destroy(&dpif_types);
439 }
440
441 /* Callback for iterate_and_prune_ifaces(). */
442 static bool
443 check_iface(struct bridge *br, struct iface *iface, void *aux OVS_UNUSED)
444 {
445     if (!iface->netdev) {
446         /* We already reported a related error, don't bother duplicating it. */
447         return false;
448     }
449
450     if (iface->dp_ifidx < 0) {
451         VLOG_ERR("%s interface not in %s, dropping",
452                  iface->name, dpif_name(br->dpif));
453         return false;
454     }
455
456     VLOG_DBG("%s has interface %s on port %d", dpif_name(br->dpif),
457              iface->name, iface->dp_ifidx);
458     return true;
459 }
460
461 /* Callback for iterate_and_prune_ifaces(). */
462 static bool
463 set_iface_properties(struct bridge *br OVS_UNUSED, struct iface *iface,
464                      void *aux OVS_UNUSED)
465 {
466     /* Set policing attributes. */
467     netdev_set_policing(iface->netdev,
468                         iface->cfg->ingress_policing_rate,
469                         iface->cfg->ingress_policing_burst);
470
471     /* Set MAC address of internal interfaces other than the local
472      * interface. */
473     if (iface->dp_ifidx != ODPP_LOCAL && !strcmp(iface->type, "internal")) {
474         iface_set_mac(iface);
475     }
476
477     return true;
478 }
479
480 /* Calls 'cb' for each interfaces in 'br', passing along the 'aux' argument.
481  * Deletes from 'br' all the interfaces for which 'cb' returns false, and then
482  * deletes from 'br' any ports that no longer have any interfaces. */
483 static void
484 iterate_and_prune_ifaces(struct bridge *br,
485                          bool (*cb)(struct bridge *, struct iface *,
486                                     void *aux),
487                          void *aux)
488 {
489     size_t i, j;
490
491     for (i = 0; i < br->n_ports; ) {
492         struct port *port = br->ports[i];
493         for (j = 0; j < port->n_ifaces; ) {
494             struct iface *iface = port->ifaces[j];
495             if (cb(br, iface, aux)) {
496                 j++;
497             } else {
498                 iface_set_ofport(iface->cfg, -1);
499                 iface_destroy(iface);
500             }
501         }
502
503         if (port->n_ifaces) {
504             i++;
505         } else  {
506             VLOG_WARN("%s port has no interfaces, dropping", port->name);
507             port_destroy(port);
508         }
509     }
510 }
511
512 /* Looks at the list of managers in 'ovs_cfg' and extracts their remote IP
513  * addresses and ports into '*managersp' and '*n_managersp'.  The caller is
514  * responsible for freeing '*managersp' (with free()).
515  *
516  * You may be asking yourself "why does ovs-vswitchd care?", because
517  * ovsdb-server is responsible for connecting to the managers, and ovs-vswitchd
518  * should not be and in fact is not directly involved in that.  But
519  * ovs-vswitchd needs to make sure that ovsdb-server can reach the managers, so
520  * it has to tell in-band control where the managers are to enable that.
521  * (Thus, only managers connected in-band are collected.)
522  */
523 static void
524 collect_in_band_managers(const struct ovsrec_open_vswitch *ovs_cfg,
525                          struct sockaddr_in **managersp, size_t *n_managersp)
526 {
527     struct sockaddr_in *managers = NULL;
528     size_t n_managers = 0;
529     struct shash targets;
530     size_t i;
531
532     /* Collect all of the potential targets from the "targets" columns of the
533      * rows pointed to by "manager_options", excluding any that are
534      * out-of-band. */
535     shash_init(&targets);
536     for (i = 0; i < ovs_cfg->n_manager_options; i++) {
537         struct ovsrec_manager *m = ovs_cfg->manager_options[i];
538
539         if (m->connection_mode && !strcmp(m->connection_mode, "out-of-band")) {
540             shash_find_and_delete(&targets, m->target);
541         } else {
542             shash_add_once(&targets, m->target, NULL);
543         }
544     }
545
546     /* Now extract the targets' IP addresses. */
547     if (!shash_is_empty(&targets)) {
548         struct shash_node *node;
549
550         managers = xmalloc(shash_count(&targets) * sizeof *managers);
551         SHASH_FOR_EACH (node, &targets) {
552             const char *target = node->name;
553             struct sockaddr_in *sin = &managers[n_managers];
554
555             if ((!strncmp(target, "tcp:", 4)
556                  && inet_parse_active(target + 4, JSONRPC_TCP_PORT, sin)) ||
557                 (!strncmp(target, "ssl:", 4)
558                  && inet_parse_active(target + 4, JSONRPC_SSL_PORT, sin))) {
559                 n_managers++;
560             }
561         }
562     }
563     shash_destroy(&targets);
564
565     *managersp = managers;
566     *n_managersp = n_managers;
567 }
568
569 static void
570 bridge_reconfigure(const struct ovsrec_open_vswitch *ovs_cfg)
571 {
572     struct shash old_br, new_br;
573     struct shash_node *node;
574     struct bridge *br, *next;
575     struct sockaddr_in *managers;
576     size_t n_managers;
577     size_t i;
578     int sflow_bridge_number;
579
580     COVERAGE_INC(bridge_reconfigure);
581
582     collect_in_band_managers(ovs_cfg, &managers, &n_managers);
583
584     /* Collect old and new bridges. */
585     shash_init(&old_br);
586     shash_init(&new_br);
587     LIST_FOR_EACH (br, node, &all_bridges) {
588         shash_add(&old_br, br->name, br);
589     }
590     for (i = 0; i < ovs_cfg->n_bridges; i++) {
591         const struct ovsrec_bridge *br_cfg = ovs_cfg->bridges[i];
592         if (!shash_add_once(&new_br, br_cfg->name, br_cfg)) {
593             VLOG_WARN("more than one bridge named %s", br_cfg->name);
594         }
595     }
596
597     /* Get rid of deleted bridges and add new bridges. */
598     LIST_FOR_EACH_SAFE (br, next, node, &all_bridges) {
599         struct ovsrec_bridge *br_cfg = shash_find_data(&new_br, br->name);
600         if (br_cfg) {
601             br->cfg = br_cfg;
602         } else {
603             bridge_destroy(br);
604         }
605     }
606     SHASH_FOR_EACH (node, &new_br) {
607         const char *br_name = node->name;
608         const struct ovsrec_bridge *br_cfg = node->data;
609         br = shash_find_data(&old_br, br_name);
610         if (br) {
611             /* If the bridge datapath type has changed, we need to tear it
612              * down and recreate. */
613             if (strcmp(br->cfg->datapath_type, br_cfg->datapath_type)) {
614                 bridge_destroy(br);
615                 bridge_create(br_cfg);
616             }
617         } else {
618             bridge_create(br_cfg);
619         }
620     }
621     shash_destroy(&old_br);
622     shash_destroy(&new_br);
623
624     /* Reconfigure all bridges. */
625     LIST_FOR_EACH (br, node, &all_bridges) {
626         bridge_reconfigure_one(br);
627     }
628
629     /* Add and delete ports on all datapaths.
630      *
631      * The kernel will reject any attempt to add a given port to a datapath if
632      * that port already belongs to a different datapath, so we must do all
633      * port deletions before any port additions. */
634     LIST_FOR_EACH (br, node, &all_bridges) {
635         struct dpif_port_dump dump;
636         struct shash want_ifaces;
637         struct dpif_port dpif_port;
638
639         bridge_get_all_ifaces(br, &want_ifaces);
640         DPIF_PORT_FOR_EACH (&dpif_port, &dump, br->dpif) {
641             if (!shash_find(&want_ifaces, dpif_port.name)
642                 && strcmp(dpif_port.name, br->name)) {
643                 int retval = dpif_port_del(br->dpif, dpif_port.port_no);
644                 if (retval) {
645                     VLOG_WARN("failed to remove %s interface from %s: %s",
646                               dpif_port.name, dpif_name(br->dpif),
647                               strerror(retval));
648                 }
649             }
650         }
651         shash_destroy(&want_ifaces);
652     }
653     LIST_FOR_EACH (br, node, &all_bridges) {
654         struct shash cur_ifaces, want_ifaces;
655         struct dpif_port_dump dump;
656         struct dpif_port dpif_port;
657
658         /* Get the set of interfaces currently in this datapath. */
659         shash_init(&cur_ifaces);
660         DPIF_PORT_FOR_EACH (&dpif_port, &dump, br->dpif) {
661             struct dpif_port *port_info = xmalloc(sizeof *port_info);
662             dpif_port_clone(port_info, &dpif_port);
663             shash_add(&cur_ifaces, dpif_port.name, port_info);
664         }
665
666         /* Get the set of interfaces we want on this datapath. */
667         bridge_get_all_ifaces(br, &want_ifaces);
668
669         hmap_clear(&br->ifaces);
670         SHASH_FOR_EACH (node, &want_ifaces) {
671             const char *if_name = node->name;
672             struct iface *iface = node->data;
673             struct dpif_port *dpif_port;
674             const char *type;
675             int error;
676
677             type = iface ? iface->type : "internal";
678             dpif_port = shash_find_data(&cur_ifaces, if_name);
679
680             /* If we have a port or a netdev already, and it's not the type we
681              * want, then delete the port (if any) and close the netdev (if
682              * any). */
683             if ((dpif_port && strcmp(dpif_port->type, type))
684                 || (iface && iface->netdev
685                     && strcmp(type, netdev_get_type(iface->netdev)))) {
686                 if (dpif_port) {
687                     error = ofproto_port_del(br->ofproto, dpif_port->port_no);
688                     if (error) {
689                         continue;
690                     }
691                     dpif_port = NULL;
692                 }
693                 if (iface) {
694                     netdev_close(iface->netdev);
695                     iface->netdev = NULL;
696                 }
697             }
698
699             /* If the port doesn't exist or we don't have the netdev open,
700              * we need to do more work. */
701             if (!dpif_port || (iface && !iface->netdev)) {
702                 struct netdev_options options;
703                 struct netdev *netdev;
704                 struct shash args;
705
706                 /* First open the network device. */
707                 options.name = if_name;
708                 options.type = type;
709                 options.args = &args;
710                 options.ethertype = NETDEV_ETH_TYPE_NONE;
711
712                 shash_init(&args);
713                 if (iface) {
714                     shash_from_ovs_idl_map(iface->cfg->key_options,
715                                            iface->cfg->value_options,
716                                            iface->cfg->n_options, &args);
717                 }
718                 error = netdev_open(&options, &netdev);
719                 shash_destroy(&args);
720
721                 if (error) {
722                     VLOG_WARN("could not open network device %s (%s)",
723                               if_name, strerror(error));
724                     continue;
725                 }
726
727                 /* Then add the port if we haven't already. */
728                 if (!dpif_port) {
729                     error = dpif_port_add(br->dpif, netdev, NULL);
730                     if (error) {
731                         netdev_close(netdev);
732                         if (error == EFBIG) {
733                             VLOG_ERR("ran out of valid port numbers on %s",
734                                      dpif_name(br->dpif));
735                             break;
736                         } else {
737                             VLOG_WARN("failed to add %s interface to %s: %s",
738                                       if_name, dpif_name(br->dpif),
739                                       strerror(error));
740                             continue;
741                         }
742                     }
743                 }
744
745                 /* Update 'iface'. */
746                 if (iface) {
747                     iface->netdev = netdev;
748                     iface->enabled = netdev_get_carrier(iface->netdev);
749                     iface->up = iface->enabled;
750                 }
751             } else if (iface && iface->netdev) {
752                 struct shash args;
753
754                 shash_init(&args);
755                 shash_from_ovs_idl_map(iface->cfg->key_options,
756                                        iface->cfg->value_options,
757                                        iface->cfg->n_options, &args);
758                 netdev_set_config(iface->netdev, &args);
759                 shash_destroy(&args);
760             }
761         }
762         shash_destroy(&want_ifaces);
763
764         SHASH_FOR_EACH (node, &cur_ifaces) {
765             struct dpif_port *port_info = node->data;
766             dpif_port_destroy(port_info);
767             free(port_info);
768         }
769         shash_destroy(&cur_ifaces);
770     }
771     sflow_bridge_number = 0;
772     LIST_FOR_EACH (br, node, &all_bridges) {
773         uint8_t ea[8];
774         uint64_t dpid;
775         struct iface *local_iface;
776         struct iface *hw_addr_iface;
777         char *dpid_string;
778
779         bridge_fetch_dp_ifaces(br);
780
781         iterate_and_prune_ifaces(br, check_iface, NULL);
782
783         /* Pick local port hardware address, datapath ID. */
784         bridge_pick_local_hw_addr(br, ea, &hw_addr_iface);
785         local_iface = bridge_get_local_iface(br);
786         if (local_iface) {
787             int error = netdev_set_etheraddr(local_iface->netdev, ea);
788             if (error) {
789                 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
790                 VLOG_ERR_RL(&rl, "bridge %s: failed to set bridge "
791                             "Ethernet address: %s",
792                             br->name, strerror(error));
793             }
794         }
795         memcpy(br->ea, ea, ETH_ADDR_LEN);
796
797         dpid = bridge_pick_datapath_id(br, ea, hw_addr_iface);
798         ofproto_set_datapath_id(br->ofproto, dpid);
799
800         dpid_string = xasprintf("%016"PRIx64, dpid);
801         ovsrec_bridge_set_datapath_id(br->cfg, dpid_string);
802         free(dpid_string);
803
804         /* Set NetFlow configuration on this bridge. */
805         if (br->cfg->netflow) {
806             struct ovsrec_netflow *nf_cfg = br->cfg->netflow;
807             struct netflow_options opts;
808
809             memset(&opts, 0, sizeof opts);
810
811             dpif_get_netflow_ids(br->dpif, &opts.engine_type, &opts.engine_id);
812             if (nf_cfg->engine_type) {
813                 opts.engine_type = *nf_cfg->engine_type;
814             }
815             if (nf_cfg->engine_id) {
816                 opts.engine_id = *nf_cfg->engine_id;
817             }
818
819             opts.active_timeout = nf_cfg->active_timeout;
820             if (!opts.active_timeout) {
821                 opts.active_timeout = -1;
822             } else if (opts.active_timeout < 0) {
823                 VLOG_WARN("bridge %s: active timeout interval set to negative "
824                           "value, using default instead (%d seconds)", br->name,
825                           NF_ACTIVE_TIMEOUT_DEFAULT);
826                 opts.active_timeout = -1;
827             }
828
829             opts.add_id_to_iface = nf_cfg->add_id_to_interface;
830             if (opts.add_id_to_iface) {
831                 if (opts.engine_id > 0x7f) {
832                     VLOG_WARN("bridge %s: netflow port mangling may conflict "
833                               "with another vswitch, choose an engine id less "
834                               "than 128", br->name);
835                 }
836                 if (br->n_ports > 508) {
837                     VLOG_WARN("bridge %s: netflow port mangling will conflict "
838                               "with another port when more than 508 ports are "
839                               "used", br->name);
840                 }
841             }
842
843             opts.collectors.n = nf_cfg->n_targets;
844             opts.collectors.names = nf_cfg->targets;
845             if (ofproto_set_netflow(br->ofproto, &opts)) {
846                 VLOG_ERR("bridge %s: problem setting netflow collectors",
847                          br->name);
848             }
849         } else {
850             ofproto_set_netflow(br->ofproto, NULL);
851         }
852
853         /* Set sFlow configuration on this bridge. */
854         if (br->cfg->sflow) {
855             const struct ovsrec_sflow *sflow_cfg = br->cfg->sflow;
856             struct ovsrec_controller **controllers;
857             struct ofproto_sflow_options oso;
858             size_t n_controllers;
859
860             memset(&oso, 0, sizeof oso);
861
862             oso.targets.n = sflow_cfg->n_targets;
863             oso.targets.names = sflow_cfg->targets;
864
865             oso.sampling_rate = SFL_DEFAULT_SAMPLING_RATE;
866             if (sflow_cfg->sampling) {
867                 oso.sampling_rate = *sflow_cfg->sampling;
868             }
869
870             oso.polling_interval = SFL_DEFAULT_POLLING_INTERVAL;
871             if (sflow_cfg->polling) {
872                 oso.polling_interval = *sflow_cfg->polling;
873             }
874
875             oso.header_len = SFL_DEFAULT_HEADER_SIZE;
876             if (sflow_cfg->header) {
877                 oso.header_len = *sflow_cfg->header;
878             }
879
880             oso.sub_id = sflow_bridge_number++;
881             oso.agent_device = sflow_cfg->agent;
882
883             oso.control_ip = NULL;
884             n_controllers = bridge_get_controllers(br, &controllers);
885             for (i = 0; i < n_controllers; i++) {
886                 if (controllers[i]->local_ip) {
887                     oso.control_ip = controllers[i]->local_ip;
888                     break;
889                 }
890             }
891             ofproto_set_sflow(br->ofproto, &oso);
892
893             /* Do not destroy oso.targets because it is owned by sflow_cfg. */
894         } else {
895             ofproto_set_sflow(br->ofproto, NULL);
896         }
897
898         /* Update the controller and related settings.  It would be more
899          * straightforward to call this from bridge_reconfigure_one(), but we
900          * can't do it there for two reasons.  First, and most importantly, at
901          * that point we don't know the dp_ifidx of any interfaces that have
902          * been added to the bridge (because we haven't actually added them to
903          * the datapath).  Second, at that point we haven't set the datapath ID
904          * yet; when a controller is configured, resetting the datapath ID will
905          * immediately disconnect from the controller, so it's better to set
906          * the datapath ID before the controller. */
907         bridge_reconfigure_remotes(br, managers, n_managers);
908     }
909     LIST_FOR_EACH (br, node, &all_bridges) {
910         for (i = 0; i < br->n_ports; i++) {
911             struct port *port = br->ports[i];
912             int j;
913
914             port_update_bonding(port);
915             port_update_lacp(port);
916
917             for (j = 0; j < port->n_ifaces; j++) {
918                 iface_update_qos(port->ifaces[j], port->cfg->qos);
919             }
920         }
921     }
922     LIST_FOR_EACH (br, node, &all_bridges) {
923         iterate_and_prune_ifaces(br, set_iface_properties, NULL);
924     }
925
926     LIST_FOR_EACH (br, node, &all_bridges) {
927         struct iface *iface;
928         HMAP_FOR_EACH (iface, dp_ifidx_node, &br->ifaces) {
929             iface_update_cfm(iface);
930         }
931     }
932
933     free(managers);
934
935     /* ovs-vswitchd has completed initialization, so allow the process that
936      * forked us to exit successfully. */
937     daemonize_complete();
938 }
939
940 static const char *
941 get_ovsrec_key_value(const struct ovsdb_idl_row *row,
942                      const struct ovsdb_idl_column *column,
943                      const char *key)
944 {
945     const struct ovsdb_datum *datum;
946     union ovsdb_atom atom;
947     unsigned int idx;
948
949     datum = ovsdb_idl_get(row, column, OVSDB_TYPE_STRING, OVSDB_TYPE_STRING);
950     atom.string = (char *) key;
951     idx = ovsdb_datum_find_key(datum, &atom, OVSDB_TYPE_STRING);
952     return idx == UINT_MAX ? NULL : datum->values[idx].string;
953 }
954
955 static const char *
956 bridge_get_other_config(const struct ovsrec_bridge *br_cfg, const char *key)
957 {
958     return get_ovsrec_key_value(&br_cfg->header_,
959                                 &ovsrec_bridge_col_other_config, key);
960 }
961
962 static void
963 bridge_pick_local_hw_addr(struct bridge *br, uint8_t ea[ETH_ADDR_LEN],
964                           struct iface **hw_addr_iface)
965 {
966     const char *hwaddr;
967     size_t i, j;
968     int error;
969
970     *hw_addr_iface = NULL;
971
972     /* Did the user request a particular MAC? */
973     hwaddr = bridge_get_other_config(br->cfg, "hwaddr");
974     if (hwaddr && eth_addr_from_string(hwaddr, ea)) {
975         if (eth_addr_is_multicast(ea)) {
976             VLOG_ERR("bridge %s: cannot set MAC address to multicast "
977                      "address "ETH_ADDR_FMT, br->name, ETH_ADDR_ARGS(ea));
978         } else if (eth_addr_is_zero(ea)) {
979             VLOG_ERR("bridge %s: cannot set MAC address to zero", br->name);
980         } else {
981             return;
982         }
983     }
984
985     /* Otherwise choose the minimum non-local MAC address among all of the
986      * interfaces. */
987     memset(ea, 0xff, ETH_ADDR_LEN);
988     for (i = 0; i < br->n_ports; i++) {
989         struct port *port = br->ports[i];
990         uint8_t iface_ea[ETH_ADDR_LEN];
991         struct iface *iface;
992
993         /* Mirror output ports don't participate. */
994         if (port->is_mirror_output_port) {
995             continue;
996         }
997
998         /* Choose the MAC address to represent the port. */
999         if (port->cfg->mac && eth_addr_from_string(port->cfg->mac, iface_ea)) {
1000             /* Find the interface with this Ethernet address (if any) so that
1001              * we can provide the correct devname to the caller. */
1002             iface = NULL;
1003             for (j = 0; j < port->n_ifaces; j++) {
1004                 struct iface *candidate = port->ifaces[j];
1005                 uint8_t candidate_ea[ETH_ADDR_LEN];
1006                 if (!netdev_get_etheraddr(candidate->netdev, candidate_ea)
1007                     && eth_addr_equals(iface_ea, candidate_ea)) {
1008                     iface = candidate;
1009                 }
1010             }
1011         } else {
1012             /* Choose the interface whose MAC address will represent the port.
1013              * The Linux kernel bonding code always chooses the MAC address of
1014              * the first slave added to a bond, and the Fedora networking
1015              * scripts always add slaves to a bond in alphabetical order, so
1016              * for compatibility we choose the interface with the name that is
1017              * first in alphabetical order. */
1018             iface = port->ifaces[0];
1019             for (j = 1; j < port->n_ifaces; j++) {
1020                 struct iface *candidate = port->ifaces[j];
1021                 if (strcmp(candidate->name, iface->name) < 0) {
1022                     iface = candidate;
1023                 }
1024             }
1025
1026             /* The local port doesn't count (since we're trying to choose its
1027              * MAC address anyway). */
1028             if (iface->dp_ifidx == ODPP_LOCAL) {
1029                 continue;
1030             }
1031
1032             /* Grab MAC. */
1033             error = netdev_get_etheraddr(iface->netdev, iface_ea);
1034             if (error) {
1035                 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
1036                 VLOG_ERR_RL(&rl, "failed to obtain Ethernet address of %s: %s",
1037                             iface->name, strerror(error));
1038                 continue;
1039             }
1040         }
1041
1042         /* Compare against our current choice. */
1043         if (!eth_addr_is_multicast(iface_ea) &&
1044             !eth_addr_is_local(iface_ea) &&
1045             !eth_addr_is_reserved(iface_ea) &&
1046             !eth_addr_is_zero(iface_ea) &&
1047             eth_addr_compare_3way(iface_ea, ea) < 0)
1048         {
1049             memcpy(ea, iface_ea, ETH_ADDR_LEN);
1050             *hw_addr_iface = iface;
1051         }
1052     }
1053     if (eth_addr_is_multicast(ea)) {
1054         memcpy(ea, br->default_ea, ETH_ADDR_LEN);
1055         *hw_addr_iface = NULL;
1056         VLOG_WARN("bridge %s: using default bridge Ethernet "
1057                   "address "ETH_ADDR_FMT, br->name, ETH_ADDR_ARGS(ea));
1058     } else {
1059         VLOG_DBG("bridge %s: using bridge Ethernet address "ETH_ADDR_FMT,
1060                  br->name, ETH_ADDR_ARGS(ea));
1061     }
1062 }
1063
1064 /* Choose and returns the datapath ID for bridge 'br' given that the bridge
1065  * Ethernet address is 'bridge_ea'.  If 'bridge_ea' is the Ethernet address of
1066  * an interface on 'br', then that interface must be passed in as
1067  * 'hw_addr_iface'; if 'bridge_ea' was derived some other way, then
1068  * 'hw_addr_iface' must be passed in as a null pointer. */
1069 static uint64_t
1070 bridge_pick_datapath_id(struct bridge *br,
1071                         const uint8_t bridge_ea[ETH_ADDR_LEN],
1072                         struct iface *hw_addr_iface)
1073 {
1074     /*
1075      * The procedure for choosing a bridge MAC address will, in the most
1076      * ordinary case, also choose a unique MAC that we can use as a datapath
1077      * ID.  In some special cases, though, multiple bridges will end up with
1078      * the same MAC address.  This is OK for the bridges, but it will confuse
1079      * the OpenFlow controller, because each datapath needs a unique datapath
1080      * ID.
1081      *
1082      * Datapath IDs must be unique.  It is also very desirable that they be
1083      * stable from one run to the next, so that policy set on a datapath
1084      * "sticks".
1085      */
1086     const char *datapath_id;
1087     uint64_t dpid;
1088
1089     datapath_id = bridge_get_other_config(br->cfg, "datapath-id");
1090     if (datapath_id && dpid_from_string(datapath_id, &dpid)) {
1091         return dpid;
1092     }
1093
1094     if (hw_addr_iface) {
1095         int vlan;
1096         if (!netdev_get_vlan_vid(hw_addr_iface->netdev, &vlan)) {
1097             /*
1098              * A bridge whose MAC address is taken from a VLAN network device
1099              * (that is, a network device created with vconfig(8) or similar
1100              * tool) will have the same MAC address as a bridge on the VLAN
1101              * device's physical network device.
1102              *
1103              * Handle this case by hashing the physical network device MAC
1104              * along with the VLAN identifier.
1105              */
1106             uint8_t buf[ETH_ADDR_LEN + 2];
1107             memcpy(buf, bridge_ea, ETH_ADDR_LEN);
1108             buf[ETH_ADDR_LEN] = vlan >> 8;
1109             buf[ETH_ADDR_LEN + 1] = vlan;
1110             return dpid_from_hash(buf, sizeof buf);
1111         } else {
1112             /*
1113              * Assume that this bridge's MAC address is unique, since it
1114              * doesn't fit any of the cases we handle specially.
1115              */
1116         }
1117     } else {
1118         /*
1119          * A purely internal bridge, that is, one that has no non-virtual
1120          * network devices on it at all, is more difficult because it has no
1121          * natural unique identifier at all.
1122          *
1123          * When the host is a XenServer, we handle this case by hashing the
1124          * host's UUID with the name of the bridge.  Names of bridges are
1125          * persistent across XenServer reboots, although they can be reused if
1126          * an internal network is destroyed and then a new one is later
1127          * created, so this is fairly effective.
1128          *
1129          * When the host is not a XenServer, we punt by using a random MAC
1130          * address on each run.
1131          */
1132         const char *host_uuid = xenserver_get_host_uuid();
1133         if (host_uuid) {
1134             char *combined = xasprintf("%s,%s", host_uuid, br->name);
1135             dpid = dpid_from_hash(combined, strlen(combined));
1136             free(combined);
1137             return dpid;
1138         }
1139     }
1140
1141     return eth_addr_to_uint64(bridge_ea);
1142 }
1143
1144 static uint64_t
1145 dpid_from_hash(const void *data, size_t n)
1146 {
1147     uint8_t hash[SHA1_DIGEST_SIZE];
1148
1149     BUILD_ASSERT_DECL(sizeof hash >= ETH_ADDR_LEN);
1150     sha1_bytes(data, n, hash);
1151     eth_addr_mark_random(hash);
1152     return eth_addr_to_uint64(hash);
1153 }
1154
1155 static void
1156 iface_refresh_status(struct iface *iface)
1157 {
1158     struct shash sh;
1159
1160     enum netdev_flags flags;
1161     uint32_t current;
1162     int64_t bps;
1163     int mtu;
1164     int64_t mtu_64;
1165     int error;
1166
1167     shash_init(&sh);
1168
1169     if (!netdev_get_status(iface->netdev, &sh)) {
1170         size_t n;
1171         char **keys, **values;
1172
1173         shash_to_ovs_idl_map(&sh, &keys, &values, &n);
1174         ovsrec_interface_set_status(iface->cfg, keys, values, n);
1175
1176         free(keys);
1177         free(values);
1178     } else {
1179         ovsrec_interface_set_status(iface->cfg, NULL, NULL, 0);
1180     }
1181
1182     shash_destroy_free_data(&sh);
1183
1184     error = netdev_get_flags(iface->netdev, &flags);
1185     if (!error) {
1186         ovsrec_interface_set_admin_state(iface->cfg, flags & NETDEV_UP ? "up" : "down");
1187     }
1188     else {
1189         ovsrec_interface_set_admin_state(iface->cfg, NULL);
1190     }
1191
1192     error = netdev_get_features(iface->netdev, &current, NULL, NULL, NULL);
1193     if (!error) {
1194         ovsrec_interface_set_duplex(iface->cfg,
1195                                     netdev_features_is_full_duplex(current)
1196                                     ? "full" : "half");
1197         /* warning: uint64_t -> int64_t conversion */
1198         bps = netdev_features_to_bps(current);
1199         ovsrec_interface_set_link_speed(iface->cfg, &bps, 1);
1200     }
1201     else {
1202         ovsrec_interface_set_duplex(iface->cfg, NULL);
1203         ovsrec_interface_set_link_speed(iface->cfg, NULL, 0);
1204     }
1205
1206
1207     ovsrec_interface_set_link_state(iface->cfg,
1208                                     netdev_get_carrier(iface->netdev)
1209                                     ? "up" : "down");
1210
1211     error = netdev_get_mtu(iface->netdev, &mtu);
1212     if (!error && mtu != INT_MAX) {
1213         mtu_64 = mtu;
1214         ovsrec_interface_set_mtu(iface->cfg, &mtu_64, 1);
1215     }
1216     else {
1217         ovsrec_interface_set_mtu(iface->cfg, NULL, 0);
1218     }
1219 }
1220
1221 static void
1222 iface_refresh_cfm_stats(struct iface *iface)
1223 {
1224     size_t i;
1225     struct cfm *cfm;
1226     const struct ovsrec_monitor *mon;
1227
1228     mon = iface->cfg->monitor;
1229     cfm = iface->cfm;
1230
1231     if (!cfm || !mon) {
1232         return;
1233     }
1234
1235     for (i = 0; i < mon->n_remote_mps; i++) {
1236         const struct ovsrec_maintenance_point *mp;
1237         const struct remote_mp *rmp;
1238
1239         mp = mon->remote_mps[i];
1240         rmp = cfm_get_remote_mp(cfm, mp->mpid);
1241
1242         ovsrec_maintenance_point_set_fault(mp, &rmp->fault, 1);
1243     }
1244
1245     if (hmap_is_empty(&cfm->x_remote_mps)) {
1246         ovsrec_monitor_set_unexpected_remote_mpids(mon, NULL, 0);
1247     } else {
1248         size_t length;
1249         struct remote_mp *rmp;
1250         int64_t *x_remote_mps;
1251
1252         length = hmap_count(&cfm->x_remote_mps);
1253         x_remote_mps = xzalloc(length * sizeof *x_remote_mps);
1254
1255         i = 0;
1256         HMAP_FOR_EACH (rmp, node, &cfm->x_remote_mps) {
1257             x_remote_mps[i++] = rmp->mpid;
1258         }
1259
1260         ovsrec_monitor_set_unexpected_remote_mpids(mon, x_remote_mps, length);
1261         free(x_remote_mps);
1262     }
1263
1264     if (hmap_is_empty(&cfm->x_remote_maids)) {
1265         ovsrec_monitor_set_unexpected_remote_maids(mon, NULL, 0);
1266     } else {
1267         size_t length;
1268         char **x_remote_maids;
1269         struct remote_maid *rmaid;
1270
1271         length = hmap_count(&cfm->x_remote_maids);
1272         x_remote_maids = xzalloc(length * sizeof *x_remote_maids);
1273
1274         i = 0;
1275         HMAP_FOR_EACH (rmaid, node, &cfm->x_remote_maids) {
1276             size_t j;
1277
1278             x_remote_maids[i] = xzalloc(CCM_MAID_LEN * 2 + 1);
1279
1280             for (j = 0; j < CCM_MAID_LEN; j++) {
1281                  snprintf(&x_remote_maids[i][j * 2], 3, "%02hhx",
1282                           rmaid->maid[j]);
1283             }
1284             i++;
1285         }
1286         ovsrec_monitor_set_unexpected_remote_maids(mon, x_remote_maids, length);
1287
1288         for (i = 0; i < length; i++) {
1289             free(x_remote_maids[i]);
1290         }
1291         free(x_remote_maids);
1292     }
1293
1294     ovsrec_monitor_set_fault(mon, &cfm->fault, 1);
1295 }
1296
1297 static void
1298 iface_refresh_stats(struct iface *iface)
1299 {
1300     struct iface_stat {
1301         char *name;
1302         int offset;
1303     };
1304     static const struct iface_stat iface_stats[] = {
1305         { "rx_packets", offsetof(struct netdev_stats, rx_packets) },
1306         { "tx_packets", offsetof(struct netdev_stats, tx_packets) },
1307         { "rx_bytes", offsetof(struct netdev_stats, rx_bytes) },
1308         { "tx_bytes", offsetof(struct netdev_stats, tx_bytes) },
1309         { "rx_dropped", offsetof(struct netdev_stats, rx_dropped) },
1310         { "tx_dropped", offsetof(struct netdev_stats, tx_dropped) },
1311         { "rx_errors", offsetof(struct netdev_stats, rx_errors) },
1312         { "tx_errors", offsetof(struct netdev_stats, tx_errors) },
1313         { "rx_frame_err", offsetof(struct netdev_stats, rx_frame_errors) },
1314         { "rx_over_err", offsetof(struct netdev_stats, rx_over_errors) },
1315         { "rx_crc_err", offsetof(struct netdev_stats, rx_crc_errors) },
1316         { "collisions", offsetof(struct netdev_stats, collisions) },
1317     };
1318     enum { N_STATS = ARRAY_SIZE(iface_stats) };
1319     const struct iface_stat *s;
1320
1321     char *keys[N_STATS];
1322     int64_t values[N_STATS];
1323     int n;
1324
1325     struct netdev_stats stats;
1326
1327     /* Intentionally ignore return value, since errors will set 'stats' to
1328      * all-1s, and we will deal with that correctly below. */
1329     netdev_get_stats(iface->netdev, &stats);
1330
1331     n = 0;
1332     for (s = iface_stats; s < &iface_stats[N_STATS]; s++) {
1333         uint64_t value = *(uint64_t *) (((char *) &stats) + s->offset);
1334         if (value != UINT64_MAX) {
1335             keys[n] = s->name;
1336             values[n] = value;
1337             n++;
1338         }
1339     }
1340
1341     ovsrec_interface_set_statistics(iface->cfg, keys, values, n);
1342 }
1343
1344 static void
1345 refresh_system_stats(const struct ovsrec_open_vswitch *cfg)
1346 {
1347     struct ovsdb_datum datum;
1348     struct shash stats;
1349
1350     shash_init(&stats);
1351     get_system_stats(&stats);
1352
1353     ovsdb_datum_from_shash(&datum, &stats);
1354     ovsdb_idl_txn_write(&cfg->header_, &ovsrec_open_vswitch_col_statistics,
1355                         &datum);
1356 }
1357
1358 static inline const char *
1359 nx_role_to_str(enum nx_role role)
1360 {
1361     switch (role) {
1362     case NX_ROLE_OTHER:
1363         return "other";
1364     case NX_ROLE_MASTER:
1365         return "master";
1366     case NX_ROLE_SLAVE:
1367         return "slave";
1368     default:
1369         return "*** INVALID ROLE ***";
1370     }
1371 }
1372
1373 static void
1374 bridge_refresh_controller_status(const struct bridge *br)
1375 {
1376     struct shash info;
1377     const struct ovsrec_controller *cfg;
1378
1379     ofproto_get_ofproto_controller_info(br->ofproto, &info);
1380
1381     OVSREC_CONTROLLER_FOR_EACH(cfg, idl) {
1382         struct ofproto_controller_info *cinfo =
1383             shash_find_data(&info, cfg->target);
1384
1385         if (cinfo) {
1386             ovsrec_controller_set_is_connected(cfg, cinfo->is_connected);
1387             ovsrec_controller_set_role(cfg, nx_role_to_str(cinfo->role));
1388             ovsrec_controller_set_status(cfg, (char **) cinfo->pairs.keys,
1389                                          (char **) cinfo->pairs.values,
1390                                          cinfo->pairs.n);
1391         } else {
1392             ovsrec_controller_set_is_connected(cfg, false);
1393             ovsrec_controller_set_role(cfg, NULL);
1394             ovsrec_controller_set_status(cfg, NULL, NULL, 0);
1395         }
1396     }
1397
1398     ofproto_free_ofproto_controller_info(&info);
1399 }
1400
1401 void
1402 bridge_run(void)
1403 {
1404     const struct ovsrec_open_vswitch *cfg;
1405
1406     bool datapath_destroyed;
1407     bool database_changed;
1408     struct bridge *br;
1409
1410     /* Let each bridge do the work that it needs to do. */
1411     datapath_destroyed = false;
1412     LIST_FOR_EACH (br, node, &all_bridges) {
1413         int error = bridge_run_one(br);
1414         if (error) {
1415             static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
1416             VLOG_ERR_RL(&rl, "bridge %s: datapath was destroyed externally, "
1417                         "forcing reconfiguration", br->name);
1418             datapath_destroyed = true;
1419         }
1420     }
1421
1422     /* (Re)configure if necessary. */
1423     database_changed = ovsdb_idl_run(idl);
1424     cfg = ovsrec_open_vswitch_first(idl);
1425 #ifdef HAVE_OPENSSL
1426     /* Re-configure SSL.  We do this on every trip through the main loop,
1427      * instead of just when the database changes, because the contents of the
1428      * key and certificate files can change without the database changing.
1429      *
1430      * We do this before bridge_reconfigure() because that function might
1431      * initiate SSL connections and thus requires SSL to be configured. */
1432     if (cfg && cfg->ssl) {
1433         const struct ovsrec_ssl *ssl = cfg->ssl;
1434
1435         stream_ssl_set_key_and_cert(ssl->private_key, ssl->certificate);
1436         stream_ssl_set_ca_cert_file(ssl->ca_cert, ssl->bootstrap_ca_cert);
1437     }
1438 #endif
1439     if (database_changed || datapath_destroyed) {
1440         if (cfg) {
1441             struct ovsdb_idl_txn *txn = ovsdb_idl_txn_create(idl);
1442
1443             bridge_configure_once(cfg);
1444             bridge_reconfigure(cfg);
1445
1446             ovsrec_open_vswitch_set_cur_cfg(cfg, cfg->next_cfg);
1447             ovsdb_idl_txn_commit(txn);
1448             ovsdb_idl_txn_destroy(txn); /* XXX */
1449         } else {
1450             /* We still need to reconfigure to avoid dangling pointers to
1451              * now-destroyed ovsrec structures inside bridge data. */
1452             static const struct ovsrec_open_vswitch null_cfg;
1453
1454             bridge_reconfigure(&null_cfg);
1455         }
1456     }
1457
1458     /* Refresh system and interface stats if necessary. */
1459     if (time_msec() >= stats_timer) {
1460         if (cfg) {
1461             struct ovsdb_idl_txn *txn;
1462
1463             txn = ovsdb_idl_txn_create(idl);
1464             LIST_FOR_EACH (br, node, &all_bridges) {
1465                 size_t i;
1466
1467                 for (i = 0; i < br->n_ports; i++) {
1468                     struct port *port = br->ports[i];
1469                     size_t j;
1470
1471                     for (j = 0; j < port->n_ifaces; j++) {
1472                         struct iface *iface = port->ifaces[j];
1473                         iface_refresh_stats(iface);
1474                         iface_refresh_cfm_stats(iface);
1475                         iface_refresh_status(iface);
1476                     }
1477                 }
1478                 bridge_refresh_controller_status(br);
1479             }
1480             refresh_system_stats(cfg);
1481             ovsdb_idl_txn_commit(txn);
1482             ovsdb_idl_txn_destroy(txn); /* XXX */
1483         }
1484
1485         stats_timer = time_msec() + STATS_INTERVAL;
1486     }
1487 }
1488
1489 void
1490 bridge_wait(void)
1491 {
1492     struct bridge *br;
1493     struct iface *iface;
1494
1495     LIST_FOR_EACH (br, node, &all_bridges) {
1496         ofproto_wait(br->ofproto);
1497         if (ofproto_has_primary_controller(br->ofproto)) {
1498             continue;
1499         }
1500
1501         mac_learning_wait(br->ml);
1502         lacp_wait(br);
1503         bond_wait(br);
1504
1505         HMAP_FOR_EACH (iface, dp_ifidx_node, &br->ifaces) {
1506             if (iface->cfm) {
1507                 cfm_wait(iface->cfm);
1508             }
1509         }
1510     }
1511     ovsdb_idl_wait(idl);
1512     poll_timer_wait_until(stats_timer);
1513 }
1514
1515 /* Forces 'br' to revalidate all of its flows.  This is appropriate when 'br''s
1516  * configuration changes.  */
1517 static void
1518 bridge_flush(struct bridge *br)
1519 {
1520     COVERAGE_INC(bridge_flush);
1521     br->flush = true;
1522     mac_learning_flush(br->ml);
1523 }
1524
1525 /* Returns the 'br' interface for the ODPP_LOCAL port, or null if 'br' has no
1526  * such interface. */
1527 static struct iface *
1528 bridge_get_local_iface(struct bridge *br)
1529 {
1530     size_t i, j;
1531
1532     for (i = 0; i < br->n_ports; i++) {
1533         struct port *port = br->ports[i];
1534         for (j = 0; j < port->n_ifaces; j++) {
1535             struct iface *iface = port->ifaces[j];
1536             if (iface->dp_ifidx == ODPP_LOCAL) {
1537                 return iface;
1538             }
1539         }
1540     }
1541
1542     return NULL;
1543 }
1544 \f
1545 /* Bridge unixctl user interface functions. */
1546 static void
1547 bridge_unixctl_fdb_show(struct unixctl_conn *conn,
1548                         const char *args, void *aux OVS_UNUSED)
1549 {
1550     struct ds ds = DS_EMPTY_INITIALIZER;
1551     const struct bridge *br;
1552     const struct mac_entry *e;
1553
1554     br = bridge_lookup(args);
1555     if (!br) {
1556         unixctl_command_reply(conn, 501, "no such bridge");
1557         return;
1558     }
1559
1560     ds_put_cstr(&ds, " port  VLAN  MAC                Age\n");
1561     LIST_FOR_EACH (e, lru_node, &br->ml->lrus) {
1562         if (e->port < 0 || e->port >= br->n_ports) {
1563             continue;
1564         }
1565         ds_put_format(&ds, "%5d  %4d  "ETH_ADDR_FMT"  %3d\n",
1566                       br->ports[e->port]->ifaces[0]->dp_ifidx,
1567                       e->vlan, ETH_ADDR_ARGS(e->mac), mac_entry_age(e));
1568     }
1569     unixctl_command_reply(conn, 200, ds_cstr(&ds));
1570     ds_destroy(&ds);
1571 }
1572 \f
1573 /* QoS unixctl user interface functions. */
1574
1575 struct qos_unixctl_show_cbdata {
1576     struct ds *ds;
1577     struct iface *iface;
1578 };
1579
1580 static void
1581 qos_unixctl_show_cb(unsigned int queue_id,
1582                     const struct shash *details,
1583                     void *aux)
1584 {
1585     struct qos_unixctl_show_cbdata *data = aux;
1586     struct ds *ds = data->ds;
1587     struct iface *iface = data->iface;
1588     struct netdev_queue_stats stats;
1589     struct shash_node *node;
1590     int error;
1591
1592     ds_put_cstr(ds, "\n");
1593     if (queue_id) {
1594         ds_put_format(ds, "Queue %u:\n", queue_id);
1595     } else {
1596         ds_put_cstr(ds, "Default:\n");
1597     }
1598
1599     SHASH_FOR_EACH (node, details) {
1600         ds_put_format(ds, "\t%s: %s\n", node->name, (char *)node->data);
1601     }
1602
1603     error = netdev_get_queue_stats(iface->netdev, queue_id, &stats);
1604     if (!error) {
1605         if (stats.tx_packets != UINT64_MAX) {
1606             ds_put_format(ds, "\ttx_packets: %"PRIu64"\n", stats.tx_packets);
1607         }
1608
1609         if (stats.tx_bytes != UINT64_MAX) {
1610             ds_put_format(ds, "\ttx_bytes: %"PRIu64"\n", stats.tx_bytes);
1611         }
1612
1613         if (stats.tx_errors != UINT64_MAX) {
1614             ds_put_format(ds, "\ttx_errors: %"PRIu64"\n", stats.tx_errors);
1615         }
1616     } else {
1617         ds_put_format(ds, "\tFailed to get statistics for queue %u: %s",
1618                       queue_id, strerror(error));
1619     }
1620 }
1621
1622 static void
1623 qos_unixctl_show(struct unixctl_conn *conn,
1624                  const char *args, void *aux OVS_UNUSED)
1625 {
1626     struct ds ds = DS_EMPTY_INITIALIZER;
1627     struct shash sh = SHASH_INITIALIZER(&sh);
1628     struct iface *iface;
1629     const char *type;
1630     struct shash_node *node;
1631     struct qos_unixctl_show_cbdata data;
1632     int error;
1633
1634     iface = iface_find(args);
1635     if (!iface) {
1636         unixctl_command_reply(conn, 501, "no such interface");
1637         return;
1638     }
1639
1640     netdev_get_qos(iface->netdev, &type, &sh);
1641
1642     if (*type != '\0') {
1643         ds_put_format(&ds, "QoS: %s %s\n", iface->name, type);
1644
1645         SHASH_FOR_EACH (node, &sh) {
1646             ds_put_format(&ds, "%s: %s\n", node->name, (char *)node->data);
1647         }
1648
1649         data.ds = &ds;
1650         data.iface = iface;
1651         error = netdev_dump_queues(iface->netdev, qos_unixctl_show_cb, &data);
1652
1653         if (error) {
1654             ds_put_format(&ds, "failed to dump queues: %s", strerror(error));
1655         }
1656         unixctl_command_reply(conn, 200, ds_cstr(&ds));
1657     } else {
1658         ds_put_format(&ds, "QoS not configured on %s\n", iface->name);
1659         unixctl_command_reply(conn, 501, ds_cstr(&ds));
1660     }
1661
1662     shash_destroy_free_data(&sh);
1663     ds_destroy(&ds);
1664 }
1665 \f
1666 /* Bridge reconfiguration functions. */
1667 static struct bridge *
1668 bridge_create(const struct ovsrec_bridge *br_cfg)
1669 {
1670     struct bridge *br;
1671     int error;
1672
1673     assert(!bridge_lookup(br_cfg->name));
1674     br = xzalloc(sizeof *br);
1675
1676     error = dpif_create_and_open(br_cfg->name, br_cfg->datapath_type,
1677                                  &br->dpif);
1678     if (error) {
1679         free(br);
1680         return NULL;
1681     }
1682     dpif_flow_flush(br->dpif);
1683
1684     error = ofproto_create(br_cfg->name, br_cfg->datapath_type, &bridge_ofhooks,
1685                            br, &br->ofproto);
1686     if (error) {
1687         VLOG_ERR("failed to create switch %s: %s", br_cfg->name,
1688                  strerror(error));
1689         dpif_delete(br->dpif);
1690         dpif_close(br->dpif);
1691         free(br);
1692         return NULL;
1693     }
1694
1695     br->name = xstrdup(br_cfg->name);
1696     br->cfg = br_cfg;
1697     br->ml = mac_learning_create();
1698     eth_addr_nicira_random(br->default_ea);
1699
1700     hmap_init(&br->ifaces);
1701
1702     shash_init(&br->port_by_name);
1703     shash_init(&br->iface_by_name);
1704
1705     br->flush = false;
1706
1707     list_push_back(&all_bridges, &br->node);
1708
1709     VLOG_INFO("created bridge %s on %s", br->name, dpif_name(br->dpif));
1710
1711     return br;
1712 }
1713
1714 static void
1715 bridge_destroy(struct bridge *br)
1716 {
1717     if (br) {
1718         int error;
1719
1720         while (br->n_ports > 0) {
1721             port_destroy(br->ports[br->n_ports - 1]);
1722         }
1723         list_remove(&br->node);
1724         error = dpif_delete(br->dpif);
1725         if (error && error != ENOENT) {
1726             VLOG_ERR("failed to delete %s: %s",
1727                      dpif_name(br->dpif), strerror(error));
1728         }
1729         dpif_close(br->dpif);
1730         ofproto_destroy(br->ofproto);
1731         mac_learning_destroy(br->ml);
1732         hmap_destroy(&br->ifaces);
1733         shash_destroy(&br->port_by_name);
1734         shash_destroy(&br->iface_by_name);
1735         free(br->ports);
1736         free(br->name);
1737         free(br);
1738     }
1739 }
1740
1741 static struct bridge *
1742 bridge_lookup(const char *name)
1743 {
1744     struct bridge *br;
1745
1746     LIST_FOR_EACH (br, node, &all_bridges) {
1747         if (!strcmp(br->name, name)) {
1748             return br;
1749         }
1750     }
1751     return NULL;
1752 }
1753
1754 /* Handle requests for a listing of all flows known by the OpenFlow
1755  * stack, including those normally hidden. */
1756 static void
1757 bridge_unixctl_dump_flows(struct unixctl_conn *conn,
1758                           const char *args, void *aux OVS_UNUSED)
1759 {
1760     struct bridge *br;
1761     struct ds results;
1762
1763     br = bridge_lookup(args);
1764     if (!br) {
1765         unixctl_command_reply(conn, 501, "Unknown bridge");
1766         return;
1767     }
1768
1769     ds_init(&results);
1770     ofproto_get_all_flows(br->ofproto, &results);
1771
1772     unixctl_command_reply(conn, 200, ds_cstr(&results));
1773     ds_destroy(&results);
1774 }
1775
1776 /* "bridge/reconnect [BRIDGE]": makes BRIDGE drop all of its controller
1777  * connections and reconnect.  If BRIDGE is not specified, then all bridges
1778  * drop their controller connections and reconnect. */
1779 static void
1780 bridge_unixctl_reconnect(struct unixctl_conn *conn,
1781                          const char *args, void *aux OVS_UNUSED)
1782 {
1783     struct bridge *br;
1784     if (args[0] != '\0') {
1785         br = bridge_lookup(args);
1786         if (!br) {
1787             unixctl_command_reply(conn, 501, "Unknown bridge");
1788             return;
1789         }
1790         ofproto_reconnect_controllers(br->ofproto);
1791     } else {
1792         LIST_FOR_EACH (br, node, &all_bridges) {
1793             ofproto_reconnect_controllers(br->ofproto);
1794         }
1795     }
1796     unixctl_command_reply(conn, 200, NULL);
1797 }
1798
1799 static int
1800 bridge_run_one(struct bridge *br)
1801 {
1802     int error;
1803     struct iface *iface;
1804
1805     error = ofproto_run1(br->ofproto);
1806     if (error) {
1807         return error;
1808     }
1809
1810     mac_learning_run(br->ml, ofproto_get_revalidate_set(br->ofproto));
1811     lacp_run(br);
1812     bond_run(br);
1813
1814     error = ofproto_run2(br->ofproto, br->flush);
1815     br->flush = false;
1816
1817     HMAP_FOR_EACH (iface, dp_ifidx_node, &br->ifaces) {
1818         struct ofpbuf *packet;
1819
1820         if (!iface->cfm) {
1821             continue;
1822         }
1823
1824         packet = cfm_run(iface->cfm);
1825         if (packet) {
1826             iface_send_packet(iface, packet);
1827             ofpbuf_uninit(packet);
1828             free(packet);
1829         }
1830     }
1831
1832     return error;
1833 }
1834
1835 static size_t
1836 bridge_get_controllers(const struct bridge *br,
1837                        struct ovsrec_controller ***controllersp)
1838 {
1839     struct ovsrec_controller **controllers;
1840     size_t n_controllers;
1841
1842     controllers = br->cfg->controller;
1843     n_controllers = br->cfg->n_controller;
1844
1845     if (n_controllers == 1 && !strcmp(controllers[0]->target, "none")) {
1846         controllers = NULL;
1847         n_controllers = 0;
1848     }
1849
1850     if (controllersp) {
1851         *controllersp = controllers;
1852     }
1853     return n_controllers;
1854 }
1855
1856 static void
1857 bridge_reconfigure_one(struct bridge *br)
1858 {
1859     struct shash old_ports, new_ports;
1860     struct svec snoops, old_snoops;
1861     struct shash_node *node;
1862     enum ofproto_fail_mode fail_mode;
1863     size_t i;
1864
1865     /* Collect old ports. */
1866     shash_init(&old_ports);
1867     for (i = 0; i < br->n_ports; i++) {
1868         shash_add(&old_ports, br->ports[i]->name, br->ports[i]);
1869     }
1870
1871     /* Collect new ports. */
1872     shash_init(&new_ports);
1873     for (i = 0; i < br->cfg->n_ports; i++) {
1874         const char *name = br->cfg->ports[i]->name;
1875         if (!shash_add_once(&new_ports, name, br->cfg->ports[i])) {
1876             VLOG_WARN("bridge %s: %s specified twice as bridge port",
1877                       br->name, name);
1878         }
1879     }
1880
1881     /* If we have a controller, then we need a local port.  Complain if the
1882      * user didn't specify one.
1883      *
1884      * XXX perhaps we should synthesize a port ourselves in this case. */
1885     if (bridge_get_controllers(br, NULL)) {
1886         char local_name[IF_NAMESIZE];
1887         int error;
1888
1889         error = dpif_port_get_name(br->dpif, ODPP_LOCAL,
1890                                    local_name, sizeof local_name);
1891         if (!error && !shash_find(&new_ports, local_name)) {
1892             VLOG_WARN("bridge %s: controller specified but no local port "
1893                       "(port named %s) defined",
1894                       br->name, local_name);
1895         }
1896     }
1897
1898     /* Get rid of deleted ports.
1899      * Get rid of deleted interfaces on ports that still exist. */
1900     SHASH_FOR_EACH (node, &old_ports) {
1901         struct port *port = node->data;
1902         const struct ovsrec_port *port_cfg;
1903
1904         port_cfg = shash_find_data(&new_ports, node->name);
1905         if (!port_cfg) {
1906             port_destroy(port);
1907         } else {
1908             port_del_ifaces(port, port_cfg);
1909         }
1910     }
1911
1912     /* Create new ports.
1913      * Add new interfaces to existing ports.
1914      * Reconfigure existing ports. */
1915     SHASH_FOR_EACH (node, &new_ports) {
1916         struct port *port = shash_find_data(&old_ports, node->name);
1917         if (!port) {
1918             port = port_create(br, node->name);
1919         }
1920
1921         port_reconfigure(port, node->data);
1922         if (!port->n_ifaces) {
1923             VLOG_WARN("bridge %s: port %s has no interfaces, dropping",
1924                       br->name, port->name);
1925             port_destroy(port);
1926         }
1927     }
1928     shash_destroy(&old_ports);
1929     shash_destroy(&new_ports);
1930
1931     /* Set the fail-mode */
1932     fail_mode = !br->cfg->fail_mode
1933                 || !strcmp(br->cfg->fail_mode, "standalone")
1934                     ? OFPROTO_FAIL_STANDALONE
1935                     : OFPROTO_FAIL_SECURE;
1936     if (ofproto_get_fail_mode(br->ofproto) != fail_mode
1937         && !ofproto_has_primary_controller(br->ofproto)) {
1938         ofproto_flush_flows(br->ofproto);
1939     }
1940     ofproto_set_fail_mode(br->ofproto, fail_mode);
1941
1942     /* Delete all flows if we're switching from connected to standalone or vice
1943      * versa.  (XXX Should we delete all flows if we are switching from one
1944      * controller to another?) */
1945
1946     /* Configure OpenFlow controller connection snooping. */
1947     svec_init(&snoops);
1948     svec_add_nocopy(&snoops, xasprintf("punix:%s/%s.snoop",
1949                                        ovs_rundir(), br->name));
1950     svec_init(&old_snoops);
1951     ofproto_get_snoops(br->ofproto, &old_snoops);
1952     if (!svec_equal(&snoops, &old_snoops)) {
1953         ofproto_set_snoops(br->ofproto, &snoops);
1954     }
1955     svec_destroy(&snoops);
1956     svec_destroy(&old_snoops);
1957
1958     mirror_reconfigure(br);
1959 }
1960
1961 /* Initializes 'oc' appropriately as a management service controller for
1962  * 'br'.
1963  *
1964  * The caller must free oc->target when it is no longer needed. */
1965 static void
1966 bridge_ofproto_controller_for_mgmt(const struct bridge *br,
1967                                    struct ofproto_controller *oc)
1968 {
1969     oc->target = xasprintf("punix:%s/%s.mgmt", ovs_rundir(), br->name);
1970     oc->max_backoff = 0;
1971     oc->probe_interval = 60;
1972     oc->band = OFPROTO_OUT_OF_BAND;
1973     oc->accept_re = NULL;
1974     oc->update_resolv_conf = false;
1975     oc->rate_limit = 0;
1976     oc->burst_limit = 0;
1977 }
1978
1979 /* Converts ovsrec_controller 'c' into an ofproto_controller in 'oc'.  */
1980 static void
1981 bridge_ofproto_controller_from_ovsrec(const struct ovsrec_controller *c,
1982                                       struct ofproto_controller *oc)
1983 {
1984     oc->target = c->target;
1985     oc->max_backoff = c->max_backoff ? *c->max_backoff / 1000 : 8;
1986     oc->probe_interval = c->inactivity_probe ? *c->inactivity_probe / 1000 : 5;
1987     oc->band = (!c->connection_mode || !strcmp(c->connection_mode, "in-band")
1988                 ? OFPROTO_IN_BAND : OFPROTO_OUT_OF_BAND);
1989     oc->accept_re = c->discover_accept_regex;
1990     oc->update_resolv_conf = c->discover_update_resolv_conf;
1991     oc->rate_limit = c->controller_rate_limit ? *c->controller_rate_limit : 0;
1992     oc->burst_limit = (c->controller_burst_limit
1993                        ? *c->controller_burst_limit : 0);
1994 }
1995
1996 /* Configures the IP stack for 'br''s local interface properly according to the
1997  * configuration in 'c'.  */
1998 static void
1999 bridge_configure_local_iface_netdev(struct bridge *br,
2000                                     struct ovsrec_controller *c)
2001 {
2002     struct netdev *netdev;
2003     struct in_addr mask, gateway;
2004
2005     struct iface *local_iface;
2006     struct in_addr ip;
2007
2008     /* Controller discovery does its own TCP/IP configuration later. */
2009     if (strcmp(c->target, "discover")) {
2010         return;
2011     }
2012
2013     /* If there's no local interface or no IP address, give up. */
2014     local_iface = bridge_get_local_iface(br);
2015     if (!local_iface || !c->local_ip || !inet_aton(c->local_ip, &ip)) {
2016         return;
2017     }
2018
2019     /* Bring up the local interface. */
2020     netdev = local_iface->netdev;
2021     netdev_turn_flags_on(netdev, NETDEV_UP, true);
2022
2023     /* Configure the IP address and netmask. */
2024     if (!c->local_netmask
2025         || !inet_aton(c->local_netmask, &mask)
2026         || !mask.s_addr) {
2027         mask.s_addr = guess_netmask(ip.s_addr);
2028     }
2029     if (!netdev_set_in4(netdev, ip, mask)) {
2030         VLOG_INFO("bridge %s: configured IP address "IP_FMT", netmask "IP_FMT,
2031                   br->name, IP_ARGS(&ip.s_addr), IP_ARGS(&mask.s_addr));
2032     }
2033
2034     /* Configure the default gateway. */
2035     if (c->local_gateway
2036         && inet_aton(c->local_gateway, &gateway)
2037         && gateway.s_addr) {
2038         if (!netdev_add_router(netdev, gateway)) {
2039             VLOG_INFO("bridge %s: configured gateway "IP_FMT,
2040                       br->name, IP_ARGS(&gateway.s_addr));
2041         }
2042     }
2043 }
2044
2045 static void
2046 bridge_reconfigure_remotes(struct bridge *br,
2047                            const struct sockaddr_in *managers,
2048                            size_t n_managers)
2049 {
2050     const char *disable_ib_str, *queue_id_str;
2051     bool disable_in_band = false;
2052     int queue_id;
2053
2054     struct ovsrec_controller **controllers;
2055     size_t n_controllers;
2056     bool had_primary;
2057
2058     struct ofproto_controller *ocs;
2059     size_t n_ocs;
2060     size_t i;
2061
2062     /* Check if we should disable in-band control on this bridge. */
2063     disable_ib_str = bridge_get_other_config(br->cfg, "disable-in-band");
2064     if (disable_ib_str && !strcmp(disable_ib_str, "true")) {
2065         disable_in_band = true;
2066     }
2067
2068     /* Set OpenFlow queue ID for in-band control. */
2069     queue_id_str = bridge_get_other_config(br->cfg, "in-band-queue");
2070     queue_id = queue_id_str ? strtol(queue_id_str, NULL, 10) : -1;
2071     ofproto_set_in_band_queue(br->ofproto, queue_id);
2072
2073     if (disable_in_band) {
2074         ofproto_set_extra_in_band_remotes(br->ofproto, NULL, 0);
2075     } else {
2076         ofproto_set_extra_in_band_remotes(br->ofproto, managers, n_managers);
2077     }
2078     had_primary = ofproto_has_primary_controller(br->ofproto);
2079
2080     n_controllers = bridge_get_controllers(br, &controllers);
2081
2082     ocs = xmalloc((n_controllers + 1) * sizeof *ocs);
2083     n_ocs = 0;
2084
2085     bridge_ofproto_controller_for_mgmt(br, &ocs[n_ocs++]);
2086     for (i = 0; i < n_controllers; i++) {
2087         struct ovsrec_controller *c = controllers[i];
2088
2089         if (!strncmp(c->target, "punix:", 6)
2090             || !strncmp(c->target, "unix:", 5)) {
2091             static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2092
2093             /* Prevent remote ovsdb-server users from accessing arbitrary Unix
2094              * domain sockets and overwriting arbitrary local files. */
2095             VLOG_ERR_RL(&rl, "%s: not adding Unix domain socket controller "
2096                         "\"%s\" due to possibility for remote exploit",
2097                         dpif_name(br->dpif), c->target);
2098             continue;
2099         }
2100
2101         bridge_configure_local_iface_netdev(br, c);
2102         bridge_ofproto_controller_from_ovsrec(c, &ocs[n_ocs]);
2103         if (disable_in_band) {
2104             ocs[n_ocs].band = OFPROTO_OUT_OF_BAND;
2105         }
2106         n_ocs++;
2107     }
2108
2109     ofproto_set_controllers(br->ofproto, ocs, n_ocs);
2110     free(ocs[0].target); /* From bridge_ofproto_controller_for_mgmt(). */
2111     free(ocs);
2112
2113     if (had_primary != ofproto_has_primary_controller(br->ofproto)) {
2114         ofproto_flush_flows(br->ofproto);
2115     }
2116
2117     /* If there are no controllers and the bridge is in standalone
2118      * mode, set up a flow that matches every packet and directs
2119      * them to OFPP_NORMAL (which goes to us).  Otherwise, the
2120      * switch is in secure mode and we won't pass any traffic until
2121      * a controller has been defined and it tells us to do so. */
2122     if (!n_controllers
2123         && ofproto_get_fail_mode(br->ofproto) == OFPROTO_FAIL_STANDALONE) {
2124         union ofp_action action;
2125         struct cls_rule rule;
2126
2127         memset(&action, 0, sizeof action);
2128         action.type = htons(OFPAT_OUTPUT);
2129         action.output.len = htons(sizeof action);
2130         action.output.port = htons(OFPP_NORMAL);
2131         cls_rule_init_catchall(&rule, 0);
2132         ofproto_add_flow(br->ofproto, &rule, &action, 1);
2133     }
2134 }
2135
2136 static void
2137 bridge_get_all_ifaces(const struct bridge *br, struct shash *ifaces)
2138 {
2139     size_t i, j;
2140
2141     shash_init(ifaces);
2142     for (i = 0; i < br->n_ports; i++) {
2143         struct port *port = br->ports[i];
2144         for (j = 0; j < port->n_ifaces; j++) {
2145             struct iface *iface = port->ifaces[j];
2146             shash_add_once(ifaces, iface->name, iface);
2147         }
2148         if (port->n_ifaces > 1 && port->cfg->bond_fake_iface) {
2149             shash_add_once(ifaces, port->name, NULL);
2150         }
2151     }
2152 }
2153
2154 /* For robustness, in case the administrator moves around datapath ports behind
2155  * our back, we re-check all the datapath port numbers here.
2156  *
2157  * This function will set the 'dp_ifidx' members of interfaces that have
2158  * disappeared to -1, so only call this function from a context where those
2159  * 'struct iface's will be removed from the bridge.  Otherwise, the -1
2160  * 'dp_ifidx'es will cause trouble later when we try to send them to the
2161  * datapath, which doesn't support UINT16_MAX+1 ports. */
2162 static void
2163 bridge_fetch_dp_ifaces(struct bridge *br)
2164 {
2165     struct dpif_port_dump dump;
2166     struct dpif_port dpif_port;
2167     size_t i, j;
2168
2169     /* Reset all interface numbers. */
2170     for (i = 0; i < br->n_ports; i++) {
2171         struct port *port = br->ports[i];
2172         for (j = 0; j < port->n_ifaces; j++) {
2173             struct iface *iface = port->ifaces[j];
2174             iface->dp_ifidx = -1;
2175         }
2176     }
2177     hmap_clear(&br->ifaces);
2178
2179     DPIF_PORT_FOR_EACH (&dpif_port, &dump, br->dpif) {
2180         struct iface *iface = iface_lookup(br, dpif_port.name);
2181         if (iface) {
2182             if (iface->dp_ifidx >= 0) {
2183                 VLOG_WARN("%s reported interface %s twice",
2184                           dpif_name(br->dpif), dpif_port.name);
2185             } else if (iface_from_dp_ifidx(br, dpif_port.port_no)) {
2186                 VLOG_WARN("%s reported interface %"PRIu16" twice",
2187                           dpif_name(br->dpif), dpif_port.port_no);
2188             } else {
2189                 iface->dp_ifidx = dpif_port.port_no;
2190                 hmap_insert(&br->ifaces, &iface->dp_ifidx_node,
2191                             hash_int(iface->dp_ifidx, 0));
2192             }
2193
2194             iface_set_ofport(iface->cfg,
2195                              (iface->dp_ifidx >= 0
2196                               ? odp_port_to_ofp_port(iface->dp_ifidx)
2197                               : -1));
2198         }
2199     }
2200 }
2201 \f
2202 /* Bridge packet processing functions. */
2203
2204 static bool
2205 bond_is_tcp_hash(const struct port *port)
2206 {
2207     return port->bond_mode == BM_TCP && port->lacp & LACP_NEGOTIATED;
2208 }
2209
2210 static int
2211 bond_hash_src(const uint8_t mac[ETH_ADDR_LEN], uint16_t vlan)
2212 {
2213     return hash_bytes(mac, ETH_ADDR_LEN, vlan) & BOND_MASK;
2214 }
2215
2216 static int bond_hash_tcp(const struct flow *flow, uint16_t vlan)
2217 {
2218     struct flow hash_flow;
2219
2220     memcpy(&hash_flow, flow, sizeof hash_flow);
2221     hash_flow.vlan_tci = 0;
2222
2223     /* The symmetric quality of this hash function is not required, but
2224      * flow_hash_symmetric_l4 already exists, and is sufficient for our
2225      * purposes, so we use it out of convenience. */
2226     return flow_hash_symmetric_l4(&hash_flow, vlan) & BOND_MASK;
2227 }
2228
2229 static struct bond_entry *
2230 lookup_bond_entry(const struct port *port, const struct flow *flow,
2231                   uint16_t vlan)
2232 {
2233     assert(port->bond_mode != BM_AB);
2234
2235     if (bond_is_tcp_hash(port)) {
2236         return &port->bond_hash[bond_hash_tcp(flow, vlan)];
2237     } else {
2238         return &port->bond_hash[bond_hash_src(flow->dl_src, vlan)];
2239     }
2240 }
2241
2242 static int
2243 bond_choose_iface(const struct port *port)
2244 {
2245     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(5, 20);
2246     size_t i, best_down_slave = -1;
2247     long long next_delay_expiration = LLONG_MAX;
2248
2249     for (i = 0; i < port->n_ifaces; i++) {
2250         struct iface *iface = port->ifaces[i];
2251
2252         if (iface->enabled) {
2253             return i;
2254         } else if (iface->delay_expires < next_delay_expiration
2255                    && (iface->lacp_status & LACP_ATTACHED
2256                        || !(port->lacp & LACP_NEGOTIATED))) {
2257             best_down_slave = i;
2258             next_delay_expiration = iface->delay_expires;
2259         }
2260     }
2261
2262     if (best_down_slave != -1) {
2263         struct iface *iface = port->ifaces[best_down_slave];
2264
2265         VLOG_INFO_RL(&rl, "interface %s: skipping remaining %lli ms updelay "
2266                      "since no other interface is up", iface->name,
2267                      iface->delay_expires - time_msec());
2268         bond_enable_slave(iface, true);
2269     }
2270
2271     return best_down_slave;
2272 }
2273
2274 static bool
2275 choose_output_iface(const struct port *port, const struct flow *flow,
2276                     uint16_t vlan, uint16_t *dp_ifidx, tag_type *tags)
2277 {
2278     struct iface *iface;
2279
2280     assert(port->n_ifaces);
2281     if (port->n_ifaces == 1) {
2282         iface = port->ifaces[0];
2283     } else if (port->bond_mode == BM_AB) {
2284         if (port->active_iface < 0) {
2285             *tags |= port->no_ifaces_tag;
2286             return false;
2287         }
2288         iface = port->ifaces[port->active_iface];
2289     } else {
2290         struct bond_entry *e = lookup_bond_entry(port, flow, vlan);
2291         if (e->iface_idx < 0 || e->iface_idx >= port->n_ifaces
2292             || !port->ifaces[e->iface_idx]->enabled) {
2293             /* XXX select interface properly.  The current interface selection
2294              * is only good for testing the rebalancing code. */
2295             e->iface_idx = bond_choose_iface(port);
2296             if (e->iface_idx < 0) {
2297                 *tags |= port->no_ifaces_tag;
2298                 return false;
2299             }
2300             e->iface_tag = tag_create_random();
2301         }
2302         *tags |= e->iface_tag;
2303         iface = port->ifaces[e->iface_idx];
2304     }
2305     *dp_ifidx = iface->dp_ifidx;
2306     *tags |= iface->tag;        /* Currently only used for bonding. */
2307     return true;
2308 }
2309
2310 static void
2311 bond_link_status_update(struct iface *iface)
2312 {
2313     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(5, 20);
2314     struct port *port = iface->port;
2315     bool up = iface->up;
2316     int updelay, downdelay;
2317
2318     updelay = port->updelay;
2319     downdelay = port->downdelay;
2320
2321     if (iface->port->lacp & LACP_NEGOTIATED) {
2322         downdelay = 0;
2323         updelay = 0;
2324     }
2325
2326     if (iface->port->lacp && up) {
2327         /* The interface is up if it's attached to an aggregator and its
2328          * partner is synchronized.  The only exception is defaulted links.
2329          * They are not required to have synchronized partners because they
2330          * have no partners at all.  However, they will only be attached if
2331          * negotiations failed on all interfaces in the bond. */
2332         up = iface->lacp_status & LACP_ATTACHED
2333             && (iface->lacp_partner.state & LACP_STATE_SYNC
2334                  || iface->lacp_status & LACP_DEFAULTED);
2335     }
2336
2337
2338     if ((up == iface->enabled) == (iface->delay_expires == LLONG_MAX)) {
2339         /* Nothing to do. */
2340         return;
2341     }
2342     VLOG_INFO_RL(&rl, "interface %s: link state %s",
2343                  iface->name, up ? "up" : "down");
2344     if (up == iface->enabled) {
2345         iface->delay_expires = LLONG_MAX;
2346         VLOG_INFO_RL(&rl, "interface %s: will not be %s",
2347                      iface->name, up ? "disabled" : "enabled");
2348     } else if (up && port->active_iface < 0) {
2349         bond_enable_slave(iface, true);
2350         if (updelay) {
2351             VLOG_INFO_RL(&rl, "interface %s: skipping %d ms updelay since no "
2352                          "other interface is up", iface->name, updelay);
2353         }
2354     } else {
2355         int delay = up ? updelay : downdelay;
2356         iface->delay_expires = time_msec() + delay;
2357         if (delay) {
2358             VLOG_INFO_RL(&rl,
2359                          "interface %s: will be %s if it stays %s for %d ms",
2360                          iface->name,
2361                          up ? "enabled" : "disabled",
2362                          up ? "up" : "down",
2363                          delay);
2364         }
2365     }
2366 }
2367
2368 static void
2369 bond_choose_active_iface(struct port *port)
2370 {
2371     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(5, 20);
2372
2373     port->active_iface = bond_choose_iface(port);
2374     port->active_iface_tag = tag_create_random();
2375     if (port->active_iface >= 0) {
2376         VLOG_INFO_RL(&rl, "port %s: active interface is now %s",
2377                      port->name, port->ifaces[port->active_iface]->name);
2378     } else {
2379         VLOG_WARN_RL(&rl, "port %s: all ports disabled, no active interface",
2380                      port->name);
2381     }
2382 }
2383
2384 static void
2385 bond_enable_slave(struct iface *iface, bool enable)
2386 {
2387     struct port *port = iface->port;
2388     struct bridge *br = port->bridge;
2389
2390     /* This acts as a recursion check.  If the act of disabling a slave
2391      * causes a different slave to be enabled, the flag will allow us to
2392      * skip redundant work when we reenter this function.  It must be
2393      * cleared on exit to keep things safe with multiple bonds. */
2394     static bool moving_active_iface = false;
2395
2396     iface->delay_expires = LLONG_MAX;
2397     if (enable == iface->enabled) {
2398         return;
2399     }
2400
2401     iface->enabled = enable;
2402     if (!iface->enabled) {
2403         VLOG_WARN("interface %s: disabled", iface->name);
2404         ofproto_revalidate(br->ofproto, iface->tag);
2405         if (iface->port_ifidx == port->active_iface) {
2406             ofproto_revalidate(br->ofproto,
2407                                port->active_iface_tag);
2408
2409             /* Disabling a slave can lead to another slave being immediately
2410              * enabled if there will be no active slaves but one is waiting
2411              * on an updelay.  In this case we do not need to run most of the
2412              * code for the newly enabled slave since there was no period
2413              * without an active slave and it is redundant with the disabling
2414              * path. */
2415             moving_active_iface = true;
2416             bond_choose_active_iface(port);
2417         }
2418         bond_send_learning_packets(port);
2419     } else {
2420         VLOG_WARN("interface %s: enabled", iface->name);
2421         if (port->active_iface < 0 && !moving_active_iface) {
2422             ofproto_revalidate(br->ofproto, port->no_ifaces_tag);
2423             bond_choose_active_iface(port);
2424             bond_send_learning_packets(port);
2425         }
2426         iface->tag = tag_create_random();
2427     }
2428
2429     moving_active_iface = false;
2430 }
2431
2432 /* Attempts to make the sum of the bond slaves' statistics appear on the fake
2433  * bond interface. */
2434 static void
2435 bond_update_fake_iface_stats(struct port *port)
2436 {
2437     struct netdev_stats bond_stats;
2438     struct netdev *bond_dev;
2439     size_t i;
2440
2441     memset(&bond_stats, 0, sizeof bond_stats);
2442
2443     for (i = 0; i < port->n_ifaces; i++) {
2444         struct netdev_stats slave_stats;
2445
2446         if (!netdev_get_stats(port->ifaces[i]->netdev, &slave_stats)) {
2447             /* XXX: We swap the stats here because they are swapped back when
2448              * reported by the internal device.  The reason for this is
2449              * internal devices normally represent packets going into the system
2450              * but when used as fake bond device they represent packets leaving
2451              * the system.  We really should do this in the internal device
2452              * itself because changing it here reverses the counts from the
2453              * perspective of the switch.  However, the internal device doesn't
2454              * know what type of device it represents so we have to do it here
2455              * for now. */
2456             bond_stats.tx_packets += slave_stats.rx_packets;
2457             bond_stats.tx_bytes += slave_stats.rx_bytes;
2458             bond_stats.rx_packets += slave_stats.tx_packets;
2459             bond_stats.rx_bytes += slave_stats.tx_bytes;
2460         }
2461     }
2462
2463     if (!netdev_open_default(port->name, &bond_dev)) {
2464         netdev_set_stats(bond_dev, &bond_stats);
2465         netdev_close(bond_dev);
2466     }
2467 }
2468
2469 static void
2470 bond_link_carrier_update(struct iface *iface, bool carrier)
2471 {
2472     if (carrier == iface->up) {
2473         return;
2474     }
2475
2476     if (iface->lacp_status & LACP_CURRENT) {
2477         iface_set_lacp_expired(iface);
2478     }
2479
2480     iface->up = carrier;
2481     iface->lacp_tx = 0;
2482 }
2483
2484 static void
2485 bond_run(struct bridge *br)
2486 {
2487     size_t i, j;
2488
2489     for (i = 0; i < br->n_ports; i++) {
2490         struct port *port = br->ports[i];
2491
2492         if (port->n_ifaces >= 2) {
2493             char *devname;
2494
2495             if (port->monitor) {
2496                 assert(!port->miimon);
2497
2498                 /* Track carrier going up and down on interfaces. */
2499                 while (!netdev_monitor_poll(port->monitor, &devname)) {
2500                     struct iface *iface;
2501
2502                     iface = port_lookup_iface(port, devname);
2503                     if (iface) {
2504                         bool up = netdev_get_carrier(iface->netdev);
2505                         bond_link_carrier_update(iface, up);
2506                     }
2507                     free(devname);
2508                 }
2509             } else {
2510                 assert(port->miimon);
2511
2512                 if (time_msec() >= port->bond_miimon_next_update) {
2513                     for (j = 0; j < port->n_ifaces; j++) {
2514                         struct iface *iface = port->ifaces[j];
2515                         bool up = netdev_get_miimon(iface->netdev);
2516                         bond_link_carrier_update(iface, up);
2517                     }
2518                     port->bond_miimon_next_update = time_msec() +
2519                         port->bond_miimon_interval;
2520                 }
2521             }
2522
2523             for (j = 0; j < port->n_ifaces; j++) {
2524                 bond_link_status_update(port->ifaces[j]);
2525             }
2526
2527             for (j = 0; j < port->n_ifaces; j++) {
2528                 struct iface *iface = port->ifaces[j];
2529                 if (time_msec() >= iface->delay_expires) {
2530                     bond_enable_slave(iface, !iface->enabled);
2531                 }
2532             }
2533
2534             if (port->bond_fake_iface
2535                 && time_msec() >= port->bond_next_fake_iface_update) {
2536                 bond_update_fake_iface_stats(port);
2537                 port->bond_next_fake_iface_update = time_msec() + 1000;
2538             }
2539         }
2540     }
2541 }
2542
2543 static void
2544 bond_wait(struct bridge *br)
2545 {
2546     size_t i, j;
2547
2548     for (i = 0; i < br->n_ports; i++) {
2549         struct port *port = br->ports[i];
2550         if (port->n_ifaces < 2) {
2551             continue;
2552         }
2553
2554         if (port->monitor) {
2555             netdev_monitor_poll_wait(port->monitor);
2556         }
2557
2558         if (port->miimon) {
2559             poll_timer_wait_until(port->bond_miimon_next_update);
2560         }
2561
2562         for (j = 0; j < port->n_ifaces; j++) {
2563             struct iface *iface = port->ifaces[j];
2564             if (iface->delay_expires != LLONG_MAX) {
2565                 poll_timer_wait_until(iface->delay_expires);
2566             }
2567         }
2568         if (port->bond_fake_iface) {
2569             poll_timer_wait_until(port->bond_next_fake_iface_update);
2570         }
2571     }
2572 }
2573
2574 static bool
2575 set_dst(struct dst *dst, const struct flow *flow,
2576         const struct port *in_port, const struct port *out_port,
2577         tag_type *tags)
2578 {
2579     dst->vlan = (out_port->vlan >= 0 ? OFP_VLAN_NONE
2580               : in_port->vlan >= 0 ? in_port->vlan
2581               : flow->vlan_tci == 0 ? OFP_VLAN_NONE
2582               : vlan_tci_to_vid(flow->vlan_tci));
2583     return choose_output_iface(out_port, flow, dst->vlan,
2584                                &dst->dp_ifidx, tags);
2585 }
2586
2587 static void
2588 swap_dst(struct dst *p, struct dst *q)
2589 {
2590     struct dst tmp = *p;
2591     *p = *q;
2592     *q = tmp;
2593 }
2594
2595 /* Moves all the dsts with vlan == 'vlan' to the front of the 'n_dsts' in
2596  * 'dsts'.  (This may help performance by reducing the number of VLAN changes
2597  * that we push to the datapath.  We could in fact fully sort the array by
2598  * vlan, but in most cases there are at most two different vlan tags so that's
2599  * possibly overkill.) */
2600 static void
2601 partition_dsts(struct dst_set *set, int vlan)
2602 {
2603     struct dst *first = set->dsts;
2604     struct dst *last = set->dsts + set->n;
2605
2606     while (first != last) {
2607         /* Invariants:
2608          *      - All dsts < first have vlan == 'vlan'.
2609          *      - All dsts >= last have vlan != 'vlan'.
2610          *      - first < last. */
2611         while (first->vlan == vlan) {
2612             if (++first == last) {
2613                 return;
2614             }
2615         }
2616
2617         /* Same invariants, plus one additional:
2618          *      - first->vlan != vlan.
2619          */
2620         while (last[-1].vlan != vlan) {
2621             if (--last == first) {
2622                 return;
2623             }
2624         }
2625
2626         /* Same invariants, plus one additional:
2627          *      - last[-1].vlan == vlan.*/
2628         swap_dst(first++, --last);
2629     }
2630 }
2631
2632 static int
2633 mirror_mask_ffs(mirror_mask_t mask)
2634 {
2635     BUILD_ASSERT_DECL(sizeof(unsigned int) >= sizeof(mask));
2636     return ffs(mask);
2637 }
2638
2639 static void
2640 dst_set_init(struct dst_set *set)
2641 {
2642     set->dsts = set->builtin;
2643     set->n = 0;
2644     set->allocated = ARRAY_SIZE(set->builtin);
2645 }
2646
2647 static void
2648 dst_set_add(struct dst_set *set, const struct dst *dst)
2649 {
2650     if (set->n >= set->allocated) {
2651         size_t new_allocated;
2652         struct dst *new_dsts;
2653
2654         new_allocated = set->allocated * 2;
2655         new_dsts = xmalloc(new_allocated * sizeof *new_dsts);
2656         memcpy(new_dsts, set->dsts, set->n * sizeof *new_dsts);
2657
2658         dst_set_free(set);
2659
2660         set->dsts = new_dsts;
2661         set->allocated = new_allocated;
2662     }
2663     set->dsts[set->n++] = *dst;
2664 }
2665
2666 static void
2667 dst_set_free(struct dst_set *set)
2668 {
2669     if (set->dsts != set->builtin) {
2670         free(set->dsts);
2671     }
2672 }
2673
2674 static bool
2675 dst_is_duplicate(const struct dst_set *set, const struct dst *test)
2676 {
2677     size_t i;
2678     for (i = 0; i < set->n; i++) {
2679         if (set->dsts[i].vlan == test->vlan
2680             && set->dsts[i].dp_ifidx == test->dp_ifidx) {
2681             return true;
2682         }
2683     }
2684     return false;
2685 }
2686
2687 static bool
2688 port_trunks_vlan(const struct port *port, uint16_t vlan)
2689 {
2690     return (port->vlan < 0
2691             && (!port->trunks || bitmap_is_set(port->trunks, vlan)));
2692 }
2693
2694 static bool
2695 port_includes_vlan(const struct port *port, uint16_t vlan)
2696 {
2697     return vlan == port->vlan || port_trunks_vlan(port, vlan);
2698 }
2699
2700 static bool
2701 port_is_floodable(const struct port *port)
2702 {
2703     int i;
2704
2705     for (i = 0; i < port->n_ifaces; i++) {
2706         if (!ofproto_port_is_floodable(port->bridge->ofproto,
2707                                        port->ifaces[i]->dp_ifidx)) {
2708             return false;
2709         }
2710     }
2711     return true;
2712 }
2713
2714 static void
2715 compose_dsts(const struct bridge *br, const struct flow *flow, uint16_t vlan,
2716              const struct port *in_port, const struct port *out_port,
2717              struct dst_set *set, tag_type *tags, uint16_t *nf_output_iface)
2718 {
2719     mirror_mask_t mirrors = in_port->src_mirrors;
2720     struct dst dst;
2721     int flow_vlan;
2722     size_t i;
2723
2724     flow_vlan = vlan_tci_to_vid(flow->vlan_tci);
2725     if (flow_vlan == 0) {
2726         flow_vlan = OFP_VLAN_NONE;
2727     }
2728
2729     if (out_port == FLOOD_PORT) {
2730         for (i = 0; i < br->n_ports; i++) {
2731             struct port *port = br->ports[i];
2732             if (port != in_port
2733                 && port_is_floodable(port)
2734                 && port_includes_vlan(port, vlan)
2735                 && !port->is_mirror_output_port
2736                 && set_dst(&dst, flow, in_port, port, tags)) {
2737                 mirrors |= port->dst_mirrors;
2738                 dst_set_add(set, &dst);
2739             }
2740         }
2741         *nf_output_iface = NF_OUT_FLOOD;
2742     } else if (out_port && set_dst(&dst, flow, in_port, out_port, tags)) {
2743         dst_set_add(set, &dst);
2744         *nf_output_iface = dst.dp_ifidx;
2745         mirrors |= out_port->dst_mirrors;
2746     }
2747
2748     while (mirrors) {
2749         struct mirror *m = br->mirrors[mirror_mask_ffs(mirrors) - 1];
2750         if (!m->n_vlans || vlan_is_mirrored(m, vlan)) {
2751             if (m->out_port) {
2752                 if (set_dst(&dst, flow, in_port, m->out_port, tags)
2753                     && !dst_is_duplicate(set, &dst)) {
2754                     dst_set_add(set, &dst);
2755                 }
2756             } else {
2757                 for (i = 0; i < br->n_ports; i++) {
2758                     struct port *port = br->ports[i];
2759                     if (port_includes_vlan(port, m->out_vlan)
2760                         && set_dst(&dst, flow, in_port, port, tags))
2761                     {
2762                         if (port->vlan < 0) {
2763                             dst.vlan = m->out_vlan;
2764                         }
2765                         if (dst_is_duplicate(set, &dst)) {
2766                             continue;
2767                         }
2768
2769                         /* Use the vlan tag on the original flow instead of
2770                          * the one passed in the vlan parameter.  This ensures
2771                          * that we compare the vlan from before any implicit
2772                          * tagging tags place. This is necessary because
2773                          * dst->vlan is the final vlan, after removing implicit
2774                          * tags. */
2775                         if (port == in_port && dst.vlan == flow_vlan) {
2776                             /* Don't send out input port on same VLAN. */
2777                             continue;
2778                         }
2779                         dst_set_add(set, &dst);
2780                     }
2781                 }
2782             }
2783         }
2784         mirrors &= mirrors - 1;
2785     }
2786
2787     partition_dsts(set, flow_vlan);
2788 }
2789
2790 static void OVS_UNUSED
2791 print_dsts(const struct dst_set *set)
2792 {
2793     size_t i;
2794
2795     for (i = 0; i < set->n; i++) {
2796         const struct dst *dst = &set->dsts[i];
2797
2798         printf(">p%"PRIu16, dst->dp_ifidx);
2799         if (dst->vlan != OFP_VLAN_NONE) {
2800             printf("v%"PRIu16, dst->vlan);
2801         }
2802     }
2803 }
2804
2805 static void
2806 compose_actions(struct bridge *br, const struct flow *flow, uint16_t vlan,
2807                 const struct port *in_port, const struct port *out_port,
2808                 tag_type *tags, struct ofpbuf *actions,
2809                 uint16_t *nf_output_iface)
2810 {
2811     struct dst_set set;
2812     uint16_t cur_vlan;
2813     size_t i;
2814
2815     dst_set_init(&set);
2816     compose_dsts(br, flow, vlan, in_port, out_port, &set, tags,
2817                  nf_output_iface);
2818
2819     cur_vlan = vlan_tci_to_vid(flow->vlan_tci);
2820     if (cur_vlan == 0) {
2821         cur_vlan = OFP_VLAN_NONE;
2822     }
2823     for (i = 0; i < set.n; i++) {
2824         const struct dst *dst = &set.dsts[i];
2825         if (dst->vlan != cur_vlan) {
2826             if (dst->vlan == OFP_VLAN_NONE) {
2827                 nl_msg_put_flag(actions, ODP_ACTION_ATTR_STRIP_VLAN);
2828             } else {
2829                 ovs_be16 tci;
2830                 tci = htons(dst->vlan & VLAN_VID_MASK);
2831                 tci |= flow->vlan_tci & htons(VLAN_PCP_MASK);
2832                 nl_msg_put_be16(actions, ODP_ACTION_ATTR_SET_DL_TCI, tci);
2833             }
2834             cur_vlan = dst->vlan;
2835         }
2836         nl_msg_put_u32(actions, ODP_ACTION_ATTR_OUTPUT, dst->dp_ifidx);
2837     }
2838     dst_set_free(&set);
2839 }
2840
2841 /* Returns the effective vlan of a packet, taking into account both the
2842  * 802.1Q header and implicitly tagged ports.  A value of 0 indicates that
2843  * the packet is untagged and -1 indicates it has an invalid header and
2844  * should be dropped. */
2845 static int flow_get_vlan(struct bridge *br, const struct flow *flow,
2846                          struct port *in_port, bool have_packet)
2847 {
2848     int vlan = vlan_tci_to_vid(flow->vlan_tci);
2849     if (in_port->vlan >= 0) {
2850         if (vlan) {
2851             /* XXX support double tagging? */
2852             if (have_packet) {
2853                 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2854                 VLOG_WARN_RL(&rl, "bridge %s: dropping VLAN %d tagged "
2855                              "packet received on port %s configured with "
2856                              "implicit VLAN %"PRIu16,
2857                              br->name, vlan, in_port->name, in_port->vlan);
2858             }
2859             return -1;
2860         }
2861         vlan = in_port->vlan;
2862     } else {
2863         if (!port_includes_vlan(in_port, vlan)) {
2864             if (have_packet) {
2865                 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2866                 VLOG_WARN_RL(&rl, "bridge %s: dropping VLAN %d tagged "
2867                              "packet received on port %s not configured for "
2868                              "trunking VLAN %d",
2869                              br->name, vlan, in_port->name, vlan);
2870             }
2871             return -1;
2872         }
2873     }
2874
2875     return vlan;
2876 }
2877
2878 /* A VM broadcasts a gratuitous ARP to indicate that it has resumed after
2879  * migration.  Older Citrix-patched Linux DomU used gratuitous ARP replies to
2880  * indicate this; newer upstream kernels use gratuitous ARP requests. */
2881 static bool
2882 is_gratuitous_arp(const struct flow *flow)
2883 {
2884     return (flow->dl_type == htons(ETH_TYPE_ARP)
2885             && eth_addr_is_broadcast(flow->dl_dst)
2886             && (flow->nw_proto == ARP_OP_REPLY
2887                 || (flow->nw_proto == ARP_OP_REQUEST
2888                     && flow->nw_src == flow->nw_dst)));
2889 }
2890
2891 static void
2892 update_learning_table(struct bridge *br, const struct flow *flow, int vlan,
2893                       struct port *in_port)
2894 {
2895     enum grat_arp_lock_type lock_type;
2896     tag_type rev_tag;
2897
2898     /* We don't want to learn from gratuitous ARP packets that are reflected
2899      * back over bond slaves so we lock the learning table. */
2900     lock_type = !is_gratuitous_arp(flow) ? GRAT_ARP_LOCK_NONE :
2901                     (in_port->n_ifaces == 1) ? GRAT_ARP_LOCK_SET :
2902                                                GRAT_ARP_LOCK_CHECK;
2903
2904     rev_tag = mac_learning_learn(br->ml, flow->dl_src, vlan, in_port->port_idx,
2905                                  lock_type);
2906     if (rev_tag) {
2907         /* The log messages here could actually be useful in debugging,
2908          * so keep the rate limit relatively high. */
2909         static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(30,
2910                                                                 300);
2911         VLOG_DBG_RL(&rl, "bridge %s: learned that "ETH_ADDR_FMT" is "
2912                     "on port %s in VLAN %d",
2913                     br->name, ETH_ADDR_ARGS(flow->dl_src),
2914                     in_port->name, vlan);
2915         ofproto_revalidate(br->ofproto, rev_tag);
2916     }
2917 }
2918
2919 /* Determines whether packets in 'flow' within 'br' should be forwarded or
2920  * dropped.  Returns true if they may be forwarded, false if they should be
2921  * dropped.
2922  *
2923  * If 'have_packet' is true, it indicates that the caller is processing a
2924  * received packet.  If 'have_packet' is false, then the caller is just
2925  * revalidating an existing flow because configuration has changed.  Either
2926  * way, 'have_packet' only affects logging (there is no point in logging errors
2927  * during revalidation).
2928  *
2929  * Sets '*in_portp' to the input port.  This will be a null pointer if
2930  * flow->in_port does not designate a known input port (in which case
2931  * is_admissible() returns false).
2932  *
2933  * When returning true, sets '*vlanp' to the effective VLAN of the input
2934  * packet, as returned by flow_get_vlan().
2935  *
2936  * May also add tags to '*tags', although the current implementation only does
2937  * so in one special case.
2938  */
2939 static bool
2940 is_admissible(struct bridge *br, const struct flow *flow, bool have_packet,
2941               tag_type *tags, int *vlanp, struct port **in_portp)
2942 {
2943     struct iface *in_iface;
2944     struct port *in_port;
2945     int vlan;
2946
2947     /* Find the interface and port structure for the received packet. */
2948     in_iface = iface_from_dp_ifidx(br, flow->in_port);
2949     if (!in_iface) {
2950         /* No interface?  Something fishy... */
2951         if (have_packet) {
2952             /* Odd.  A few possible reasons here:
2953              *
2954              * - We deleted an interface but there are still a few packets
2955              *   queued up from it.
2956              *
2957              * - Someone externally added an interface (e.g. with "ovs-dpctl
2958              *   add-if") that we don't know about.
2959              *
2960              * - Packet arrived on the local port but the local port is not
2961              *   one of our bridge ports.
2962              */
2963             static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2964
2965             VLOG_WARN_RL(&rl, "bridge %s: received packet on unknown "
2966                          "interface %"PRIu16, br->name, flow->in_port);
2967         }
2968
2969         *in_portp = NULL;
2970         return false;
2971     }
2972     *in_portp = in_port = in_iface->port;
2973     *vlanp = vlan = flow_get_vlan(br, flow, in_port, have_packet);
2974     if (vlan < 0) {
2975         return false;
2976     }
2977
2978     /* Drop frames for reserved multicast addresses. */
2979     if (eth_addr_is_reserved(flow->dl_dst)) {
2980         return false;
2981     }
2982
2983     /* Drop frames on ports reserved for mirroring. */
2984     if (in_port->is_mirror_output_port) {
2985         if (have_packet) {
2986             static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2987             VLOG_WARN_RL(&rl, "bridge %s: dropping packet received on port "
2988                          "%s, which is reserved exclusively for mirroring",
2989                          br->name, in_port->name);
2990         }
2991         return false;
2992     }
2993
2994     /* When using LACP, do not accept packets from disabled interfaces. */
2995     if (in_port->lacp & LACP_NEGOTIATED && !in_iface->enabled) {
2996         return false;
2997     }
2998
2999     /* Packets received on non-LACP bonds need special attention to avoid
3000      * duplicates. */
3001     if (in_port->n_ifaces > 1 && !(in_port->lacp & LACP_NEGOTIATED)) {
3002         int src_idx;
3003         bool is_grat_arp_locked;
3004
3005         if (eth_addr_is_multicast(flow->dl_dst)) {
3006             *tags |= in_port->active_iface_tag;
3007             if (in_port->active_iface != in_iface->port_ifidx) {
3008                 /* Drop all multicast packets on inactive slaves. */
3009                 return false;
3010             }
3011         }
3012
3013         /* Drop all packets for which we have learned a different input
3014          * port, because we probably sent the packet on one slave and got
3015          * it back on the other.  Gratuitous ARP packets are an exception
3016          * to this rule: the host has moved to another switch.  The exception
3017          * to the exception is if we locked the learning table to avoid
3018          * reflections on bond slaves.  If this is the case, just drop the
3019          * packet now. */
3020         src_idx = mac_learning_lookup(br->ml, flow->dl_src, vlan,
3021                                       &is_grat_arp_locked);
3022         if (src_idx != -1 && src_idx != in_port->port_idx &&
3023             (!is_gratuitous_arp(flow) || is_grat_arp_locked)) {
3024                 return false;
3025         }
3026     }
3027
3028     return true;
3029 }
3030
3031 /* If the composed actions may be applied to any packet in the given 'flow',
3032  * returns true.  Otherwise, the actions should only be applied to 'packet', or
3033  * not at all, if 'packet' was NULL. */
3034 static bool
3035 process_flow(struct bridge *br, const struct flow *flow,
3036              const struct ofpbuf *packet, struct ofpbuf *actions,
3037              tag_type *tags, uint16_t *nf_output_iface)
3038 {
3039     struct port *in_port;
3040     struct port *out_port;
3041     int vlan;
3042     int out_port_idx;
3043
3044     /* Check whether we should drop packets in this flow. */
3045     if (!is_admissible(br, flow, packet != NULL, tags, &vlan, &in_port)) {
3046         out_port = NULL;
3047         goto done;
3048     }
3049
3050     /* Learn source MAC (but don't try to learn from revalidation). */
3051     if (packet) {
3052         update_learning_table(br, flow, vlan, in_port);
3053     }
3054
3055     /* Determine output port. */
3056     out_port_idx = mac_learning_lookup_tag(br->ml, flow->dl_dst, vlan, tags,
3057                                            NULL);
3058     if (out_port_idx >= 0 && out_port_idx < br->n_ports) {
3059         out_port = br->ports[out_port_idx];
3060     } else if (!packet && !eth_addr_is_multicast(flow->dl_dst)) {
3061         /* If we are revalidating but don't have a learning entry then
3062          * eject the flow.  Installing a flow that floods packets opens
3063          * up a window of time where we could learn from a packet reflected
3064          * on a bond and blackhole packets before the learning table is
3065          * updated to reflect the correct port. */
3066         return false;
3067     } else {
3068         out_port = FLOOD_PORT;
3069     }
3070
3071     /* Don't send packets out their input ports. */
3072     if (in_port == out_port) {
3073         out_port = NULL;
3074     }
3075
3076 done:
3077     if (in_port) {
3078         compose_actions(br, flow, vlan, in_port, out_port, tags, actions,
3079                         nf_output_iface);
3080     }
3081
3082     return true;
3083 }
3084
3085 static bool
3086 bridge_normal_ofhook_cb(const struct flow *flow, const struct ofpbuf *packet,
3087                         struct ofpbuf *actions, tag_type *tags,
3088                         uint16_t *nf_output_iface, void *br_)
3089 {
3090     struct bridge *br = br_;
3091
3092     COVERAGE_INC(bridge_process_flow);
3093     return process_flow(br, flow, packet, actions, tags, nf_output_iface);
3094 }
3095
3096 static bool
3097 bridge_special_ofhook_cb(const struct flow *flow,
3098                          const struct ofpbuf *packet, void *br_)
3099 {
3100     struct iface *iface;
3101     struct bridge *br = br_;
3102
3103     iface = iface_from_dp_ifidx(br, flow->in_port);
3104
3105     if (cfm_should_process_flow(flow)) {
3106
3107         if (iface && packet && iface->cfm) {
3108             COVERAGE_INC(bridge_process_cfm);
3109             cfm_process_heartbeat(iface->cfm, packet);
3110         }
3111         return false;
3112     } else if (flow->dl_type == htons(ETH_TYPE_LACP)) {
3113
3114         if (iface && packet) {
3115             COVERAGE_INC(bridge_process_lacp);
3116             lacp_process_packet(packet, iface);
3117         }
3118         return false;
3119     }
3120
3121     return true;
3122 }
3123
3124 static void
3125 bridge_account_flow_ofhook_cb(const struct flow *flow, tag_type tags,
3126                               const struct nlattr *actions,
3127                               size_t actions_len,
3128                               uint64_t n_bytes, void *br_)
3129 {
3130     struct bridge *br = br_;
3131     const struct nlattr *a;
3132     struct port *in_port;
3133     tag_type dummy = 0;
3134     unsigned int left;
3135     int vlan;
3136
3137     /* Feed information from the active flows back into the learning table to
3138      * ensure that table is always in sync with what is actually flowing
3139      * through the datapath.
3140      *
3141      * We test that 'tags' is nonzero to ensure that only flows that include an
3142      * OFPP_NORMAL action are used for learning.  This works because
3143      * bridge_normal_ofhook_cb() always sets a nonzero tag value. */
3144     if (tags && is_admissible(br, flow, false, &dummy, &vlan, &in_port)) {
3145         update_learning_table(br, flow, vlan, in_port);
3146     }
3147
3148     /* Account for bond slave utilization. */
3149     if (!br->has_bonded_ports) {
3150         return;
3151     }
3152     NL_ATTR_FOR_EACH_UNSAFE (a, left, actions, actions_len) {
3153         if (nl_attr_type(a) == ODP_ACTION_ATTR_OUTPUT) {
3154             struct port *out_port = port_from_dp_ifidx(br, nl_attr_get_u32(a));
3155             if (out_port && out_port->n_ifaces >= 2 &&
3156                 out_port->bond_mode != BM_AB) {
3157                 uint16_t vlan = (flow->vlan_tci
3158                                  ? vlan_tci_to_vid(flow->vlan_tci)
3159                                  : OFP_VLAN_NONE);
3160                 struct bond_entry *e = lookup_bond_entry(out_port, flow, vlan);
3161                 e->tx_bytes += n_bytes;
3162             }
3163         }
3164     }
3165 }
3166
3167 static void
3168 bridge_account_checkpoint_ofhook_cb(void *br_)
3169 {
3170     struct bridge *br = br_;
3171     long long int now;
3172     size_t i;
3173
3174     if (!br->has_bonded_ports) {
3175         return;
3176     }
3177
3178     now = time_msec();
3179     for (i = 0; i < br->n_ports; i++) {
3180         struct port *port = br->ports[i];
3181         if (port->n_ifaces > 1 && port->bond_mode != BM_AB
3182             && now >= port->bond_next_rebalance) {
3183             port->bond_next_rebalance = now + port->bond_rebalance_interval;
3184             bond_rebalance_port(port);
3185         }
3186     }
3187 }
3188
3189 static struct ofhooks bridge_ofhooks = {
3190     bridge_normal_ofhook_cb,
3191     bridge_special_ofhook_cb,
3192     bridge_account_flow_ofhook_cb,
3193     bridge_account_checkpoint_ofhook_cb,
3194 };
3195 \f
3196 /* LACP functions. */
3197
3198 static void
3199 lacp_process_packet(const struct ofpbuf *packet, struct iface *iface)
3200 {
3201     const struct lacp_pdu *pdu;
3202
3203     if (!iface->port->lacp) {
3204         return;
3205     }
3206
3207     pdu = parse_lacp_packet(packet);
3208     if (!pdu) {
3209         return;
3210     }
3211
3212     iface->lacp_status |= LACP_CURRENT;
3213     iface->lacp_status &= ~(LACP_EXPIRED | LACP_DEFAULTED);
3214     iface->lacp_rx = time_msec() + LACP_SLOW_TIME_RX;
3215
3216     iface->lacp_actor.state = iface_get_lacp_state(iface);
3217     if (memcmp(&iface->lacp_actor, &pdu->partner, sizeof pdu->partner)) {
3218         iface->lacp_tx = 0;
3219     }
3220
3221     if (memcmp(&iface->lacp_partner, &pdu->actor, sizeof pdu->actor)) {
3222         iface->port->lacp_need_update = true;
3223         iface->lacp_partner = pdu->actor;
3224     }
3225 }
3226
3227 static void
3228 lacp_update_ifaces(struct port *port)
3229 {
3230     size_t i;
3231     struct iface *lead;
3232     struct lacp_info lead_pri;
3233     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 10);
3234
3235     port->lacp_need_update = false;
3236     COVERAGE_INC(bridge_lacp_update);
3237
3238     if (!port->lacp) {
3239         return;
3240     }
3241
3242     VLOG_DBG_RL(&rl, "port %s: re-evaluating LACP link status", port->name);
3243
3244     lead = NULL;
3245     for (i = 0; i < port->n_ifaces; i++) {
3246         struct iface *iface = port->ifaces[i];
3247         struct lacp_info pri;
3248
3249         iface->lacp_status |= LACP_ATTACHED;
3250         ofproto_revalidate(port->bridge->ofproto, iface->tag);
3251
3252         /* Don't allow loopback interfaces to send traffic or lead. */
3253         if (eth_addr_equals(iface->lacp_partner.sysid,
3254                             iface->lacp_actor.sysid)) {
3255             VLOG_WARN_RL(&rl, "iface %s: Loopback detected. Interface is "
3256                          "connected to its own bridge", iface->name);
3257             iface->lacp_status &= ~LACP_ATTACHED;
3258             continue;
3259         }
3260
3261         if (iface->lacp_status & LACP_DEFAULTED) {
3262             continue;
3263         }
3264
3265         iface_get_lacp_priority(iface, &pri);
3266
3267         if (!lead || memcmp(&pri, &lead_pri, sizeof pri) < 0) {
3268             lead = iface;
3269             lead_pri = pri;
3270         }
3271     }
3272
3273     if (!lead) {
3274         port->lacp &= ~LACP_NEGOTIATED;
3275         return;
3276     }
3277
3278     port->lacp |= LACP_NEGOTIATED;
3279
3280     for (i = 0; i < port->n_ifaces; i++) {
3281         struct iface *iface = port->ifaces[i];
3282
3283         if (iface->lacp_status & LACP_DEFAULTED
3284             || lead->lacp_partner.key != iface->lacp_partner.key
3285             || !eth_addr_equals(lead->lacp_partner.sysid,
3286                                 iface->lacp_partner.sysid)) {
3287             iface->lacp_status &= ~LACP_ATTACHED;
3288         }
3289     }
3290 }
3291
3292 static bool
3293 lacp_iface_may_tx(const struct iface *iface)
3294 {
3295     return iface->port->lacp & LACP_ACTIVE
3296         || iface->lacp_status & (LACP_CURRENT | LACP_EXPIRED);
3297 }
3298
3299 static void
3300 lacp_run(struct bridge *br)
3301 {
3302     size_t i, j;
3303     struct ofpbuf packet;
3304
3305     ofpbuf_init(&packet, ETH_HEADER_LEN + LACP_PDU_LEN);
3306
3307     for (i = 0; i < br->n_ports; i++) {
3308         struct port *port = br->ports[i];
3309
3310         if (!port->lacp) {
3311             continue;
3312         }
3313
3314         for (j = 0; j < port->n_ifaces; j++) {
3315             struct iface *iface = port->ifaces[j];
3316
3317             if (time_msec() > iface->lacp_rx) {
3318                 if (iface->lacp_status & LACP_CURRENT) {
3319                     iface_set_lacp_expired(iface);
3320                 } else if (iface->lacp_status & LACP_EXPIRED) {
3321                     iface_set_lacp_defaulted(iface);
3322                 }
3323             }
3324         }
3325
3326         if (port->lacp_need_update) {
3327             lacp_update_ifaces(port);
3328         }
3329
3330         for (j = 0; j < port->n_ifaces; j++) {
3331             struct iface *iface = port->ifaces[j];
3332             uint8_t ea[ETH_ADDR_LEN];
3333             int error;
3334
3335             if (time_msec() < iface->lacp_tx || !lacp_iface_may_tx(iface)) {
3336                 continue;
3337             }
3338
3339             error = netdev_get_etheraddr(iface->netdev, ea);
3340             if (!error) {
3341                 iface->lacp_actor.state = iface_get_lacp_state(iface);
3342                 compose_lacp_packet(&packet, &iface->lacp_actor,
3343                                     &iface->lacp_partner, ea);
3344                 iface_send_packet(iface, &packet);
3345             } else {
3346                 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 10);
3347                 VLOG_ERR_RL(&rl, "iface %s: failed to obtain Ethernet address "
3348                             "(%s)", iface->name, strerror(error));
3349             }
3350
3351             iface->lacp_tx = time_msec() +
3352                 (iface->lacp_partner.state & LACP_STATE_TIME
3353                  ? LACP_FAST_TIME_TX
3354                  : LACP_SLOW_TIME_TX);
3355         }
3356     }
3357     ofpbuf_uninit(&packet);
3358 }
3359
3360 static void
3361 lacp_wait(struct bridge *br)
3362 {
3363     size_t i, j;
3364
3365     for (i = 0; i < br->n_ports; i++) {
3366         struct port *port = br->ports[i];
3367
3368         if (!port->lacp) {
3369             continue;
3370         }
3371
3372         for (j = 0; j < port->n_ifaces; j++) {
3373             struct iface *iface = port->ifaces[j];
3374
3375             if (lacp_iface_may_tx(iface)) {
3376                 poll_timer_wait_until(iface->lacp_tx);
3377             }
3378
3379             if (iface->lacp_status & (LACP_CURRENT | LACP_EXPIRED)) {
3380                 poll_timer_wait_until(iface->lacp_rx);
3381             }
3382         }
3383     }
3384 }
3385 \f
3386 /* Bonding functions. */
3387
3388 /* Statistics for a single interface on a bonded port, used for load-based
3389  * bond rebalancing.  */
3390 struct slave_balance {
3391     struct iface *iface;        /* The interface. */
3392     uint64_t tx_bytes;          /* Sum of hashes[*]->tx_bytes. */
3393
3394     /* All the "bond_entry"s that are assigned to this interface, in order of
3395      * increasing tx_bytes. */
3396     struct bond_entry **hashes;
3397     size_t n_hashes;
3398 };
3399
3400 static const char *
3401 bond_mode_to_string(enum bond_mode bm) {
3402     static char *bm_slb = "balance-slb";
3403     static char *bm_ab  = "active-backup";
3404     static char *bm_tcp = "balance-tcp";
3405
3406     switch (bm) {
3407     case BM_SLB: return bm_slb;
3408     case BM_AB:  return bm_ab;
3409     case BM_TCP: return bm_tcp;
3410     }
3411
3412     NOT_REACHED();
3413     return NULL;
3414 }
3415
3416 /* Sorts pointers to pointers to bond_entries in ascending order by the
3417  * interface to which they are assigned, and within a single interface in
3418  * ascending order of bytes transmitted. */
3419 static int
3420 compare_bond_entries(const void *a_, const void *b_)
3421 {
3422     const struct bond_entry *const *ap = a_;
3423     const struct bond_entry *const *bp = b_;
3424     const struct bond_entry *a = *ap;
3425     const struct bond_entry *b = *bp;
3426     if (a->iface_idx != b->iface_idx) {
3427         return a->iface_idx > b->iface_idx ? 1 : -1;
3428     } else if (a->tx_bytes != b->tx_bytes) {
3429         return a->tx_bytes > b->tx_bytes ? 1 : -1;
3430     } else {
3431         return 0;
3432     }
3433 }
3434
3435 /* Sorts slave_balances so that enabled ports come first, and otherwise in
3436  * *descending* order by number of bytes transmitted. */
3437 static int
3438 compare_slave_balance(const void *a_, const void *b_)
3439 {
3440     const struct slave_balance *a = a_;
3441     const struct slave_balance *b = b_;
3442     if (a->iface->enabled != b->iface->enabled) {
3443         return a->iface->enabled ? -1 : 1;
3444     } else if (a->tx_bytes != b->tx_bytes) {
3445         return a->tx_bytes > b->tx_bytes ? -1 : 1;
3446     } else {
3447         return 0;
3448     }
3449 }
3450
3451 static void
3452 swap_bals(struct slave_balance *a, struct slave_balance *b)
3453 {
3454     struct slave_balance tmp = *a;
3455     *a = *b;
3456     *b = tmp;
3457 }
3458
3459 /* Restores the 'n_bals' slave_balance structures in 'bals' to sorted order
3460  * given that 'p' (and only 'p') might be in the wrong location.
3461  *
3462  * This function invalidates 'p', since it might now be in a different memory
3463  * location. */
3464 static void
3465 resort_bals(struct slave_balance *p,
3466             struct slave_balance bals[], size_t n_bals)
3467 {
3468     if (n_bals > 1) {
3469         for (; p > bals && p->tx_bytes > p[-1].tx_bytes; p--) {
3470             swap_bals(p, p - 1);
3471         }
3472         for (; p < &bals[n_bals - 1] && p->tx_bytes < p[1].tx_bytes; p++) {
3473             swap_bals(p, p + 1);
3474         }
3475     }
3476 }
3477
3478 static void
3479 log_bals(const struct slave_balance *bals, size_t n_bals, struct port *port)
3480 {
3481     if (VLOG_IS_DBG_ENABLED()) {
3482         struct ds ds = DS_EMPTY_INITIALIZER;
3483         const struct slave_balance *b;
3484
3485         for (b = bals; b < bals + n_bals; b++) {
3486             size_t i;
3487
3488             if (b > bals) {
3489                 ds_put_char(&ds, ',');
3490             }
3491             ds_put_format(&ds, " %s %"PRIu64"kB",
3492                           b->iface->name, b->tx_bytes / 1024);
3493
3494             if (!b->iface->enabled) {
3495                 ds_put_cstr(&ds, " (disabled)");
3496             }
3497             if (b->n_hashes > 0) {
3498                 ds_put_cstr(&ds, " (");
3499                 for (i = 0; i < b->n_hashes; i++) {
3500                     const struct bond_entry *e = b->hashes[i];
3501                     if (i > 0) {
3502                         ds_put_cstr(&ds, " + ");
3503                     }
3504                     ds_put_format(&ds, "h%td: %"PRIu64"kB",
3505                                   e - port->bond_hash, e->tx_bytes / 1024);
3506                 }
3507                 ds_put_cstr(&ds, ")");
3508             }
3509         }
3510         VLOG_DBG("bond %s:%s", port->name, ds_cstr(&ds));
3511         ds_destroy(&ds);
3512     }
3513 }
3514
3515 /* Shifts 'hash' from 'from' to 'to' within 'port'. */
3516 static void
3517 bond_shift_load(struct slave_balance *from, struct slave_balance *to,
3518                 int hash_idx)
3519 {
3520     struct bond_entry *hash = from->hashes[hash_idx];
3521     struct port *port = from->iface->port;
3522     uint64_t delta = hash->tx_bytes;
3523
3524     assert(port->bond_mode != BM_AB);
3525
3526     VLOG_INFO("bond %s: shift %"PRIu64"kB of load (with hash %td) "
3527               "from %s to %s (now carrying %"PRIu64"kB and "
3528               "%"PRIu64"kB load, respectively)",
3529               port->name, delta / 1024, hash - port->bond_hash,
3530               from->iface->name, to->iface->name,
3531               (from->tx_bytes - delta) / 1024,
3532               (to->tx_bytes + delta) / 1024);
3533
3534     /* Delete element from from->hashes.
3535      *
3536      * We don't bother to add the element to to->hashes because not only would
3537      * it require more work, the only purpose it would be to allow that hash to
3538      * be migrated to another slave in this rebalancing run, and there is no
3539      * point in doing that.  */
3540     if (hash_idx == 0) {
3541         from->hashes++;
3542     } else {
3543         memmove(from->hashes + hash_idx, from->hashes + hash_idx + 1,
3544                 (from->n_hashes - (hash_idx + 1)) * sizeof *from->hashes);
3545     }
3546     from->n_hashes--;
3547
3548     /* Shift load away from 'from' to 'to'. */
3549     from->tx_bytes -= delta;
3550     to->tx_bytes += delta;
3551
3552     /* Arrange for flows to be revalidated. */
3553     ofproto_revalidate(port->bridge->ofproto, hash->iface_tag);
3554     hash->iface_idx = to->iface->port_ifidx;
3555     hash->iface_tag = tag_create_random();
3556 }
3557
3558 static void
3559 bond_rebalance_port(struct port *port)
3560 {
3561     struct slave_balance *bals;
3562     size_t n_bals;
3563     struct bond_entry *hashes[BOND_MASK + 1];
3564     struct slave_balance *b, *from, *to;
3565     struct bond_entry *e;
3566     size_t i;
3567
3568     assert(port->bond_mode != BM_AB);
3569
3570     /* Sets up 'bals' to describe each of the port's interfaces, sorted in
3571      * descending order of tx_bytes, so that bals[0] represents the most
3572      * heavily loaded slave and bals[n_bals - 1] represents the least heavily
3573      * loaded slave.
3574      *
3575      * The code is a bit tricky: to avoid dynamically allocating a 'hashes'
3576      * array for each slave_balance structure, we sort our local array of
3577      * hashes in order by slave, so that all of the hashes for a given slave
3578      * become contiguous in memory, and then we point each 'hashes' members of
3579      * a slave_balance structure to the start of a contiguous group. */
3580     n_bals = port->n_ifaces;
3581     bals = xmalloc(n_bals * sizeof *bals);
3582     for (b = bals; b < &bals[n_bals]; b++) {
3583         b->iface = port->ifaces[b - bals];
3584         b->tx_bytes = 0;
3585         b->hashes = NULL;
3586         b->n_hashes = 0;
3587     }
3588     for (i = 0; i <= BOND_MASK; i++) {
3589         hashes[i] = &port->bond_hash[i];
3590     }
3591     qsort(hashes, BOND_MASK + 1, sizeof *hashes, compare_bond_entries);
3592     for (i = 0; i <= BOND_MASK; i++) {
3593         e = hashes[i];
3594         if (e->iface_idx >= 0 && e->iface_idx < port->n_ifaces) {
3595             b = &bals[e->iface_idx];
3596             b->tx_bytes += e->tx_bytes;
3597             if (!b->hashes) {
3598                 b->hashes = &hashes[i];
3599             }
3600             b->n_hashes++;
3601         }
3602     }
3603     qsort(bals, n_bals, sizeof *bals, compare_slave_balance);
3604     log_bals(bals, n_bals, port);
3605
3606     /* Discard slaves that aren't enabled (which were sorted to the back of the
3607      * array earlier). */
3608     while (!bals[n_bals - 1].iface->enabled) {
3609         n_bals--;
3610         if (!n_bals) {
3611             goto exit;
3612         }
3613     }
3614
3615     /* Shift load from the most-loaded slaves to the least-loaded slaves. */
3616     to = &bals[n_bals - 1];
3617     for (from = bals; from < to; ) {
3618         uint64_t overload = from->tx_bytes - to->tx_bytes;
3619         if (overload < to->tx_bytes >> 5 || overload < 100000) {
3620             /* The extra load on 'from' (and all less-loaded slaves), compared
3621              * to that of 'to' (the least-loaded slave), is less than ~3%, or
3622              * it is less than ~1Mbps.  No point in rebalancing. */
3623             break;
3624         } else if (from->n_hashes == 1) {
3625             /* 'from' only carries a single MAC hash, so we can't shift any
3626              * load away from it, even though we want to. */
3627             from++;
3628         } else {
3629             /* 'from' is carrying significantly more load than 'to', and that
3630              * load is split across at least two different hashes.  Pick a hash
3631              * to migrate to 'to' (the least-loaded slave), given that doing so
3632              * must decrease the ratio of the load on the two slaves by at
3633              * least 0.1.
3634              *
3635              * The sort order we use means that we prefer to shift away the
3636              * smallest hashes instead of the biggest ones.  There is little
3637              * reason behind this decision; we could use the opposite sort
3638              * order to shift away big hashes ahead of small ones. */
3639             bool order_swapped;
3640
3641             for (i = 0; i < from->n_hashes; i++) {
3642                 double old_ratio, new_ratio;
3643                 uint64_t delta = from->hashes[i]->tx_bytes;
3644
3645                 if (delta == 0 || from->tx_bytes - delta == 0) {
3646                     /* Pointless move. */
3647                     continue;
3648                 }
3649
3650                 order_swapped = from->tx_bytes - delta < to->tx_bytes + delta;
3651
3652                 if (to->tx_bytes == 0) {
3653                     /* Nothing on the new slave, move it. */
3654                     break;
3655                 }
3656
3657                 old_ratio = (double)from->tx_bytes / to->tx_bytes;
3658                 new_ratio = (double)(from->tx_bytes - delta) /
3659                             (to->tx_bytes + delta);
3660
3661                 if (new_ratio == 0) {
3662                     /* Should already be covered but check to prevent division
3663                      * by zero. */
3664                     continue;
3665                 }
3666
3667                 if (new_ratio < 1) {
3668                     new_ratio = 1 / new_ratio;
3669                 }
3670
3671                 if (old_ratio - new_ratio > 0.1) {
3672                     /* Would decrease the ratio, move it. */
3673                     break;
3674                 }
3675             }
3676             if (i < from->n_hashes) {
3677                 bond_shift_load(from, to, i);
3678
3679                 /* If the result of the migration changed the relative order of
3680                  * 'from' and 'to' swap them back to maintain invariants. */
3681                 if (order_swapped) {
3682                     swap_bals(from, to);
3683                 }
3684
3685                 /* Re-sort 'bals'.  Note that this may make 'from' and 'to'
3686                  * point to different slave_balance structures.  It is only
3687                  * valid to do these two operations in a row at all because we
3688                  * know that 'from' will not move past 'to' and vice versa. */
3689                 resort_bals(from, bals, n_bals);
3690                 resort_bals(to, bals, n_bals);
3691             } else {
3692                 from++;
3693             }
3694         }
3695     }
3696
3697     /* Implement exponentially weighted moving average.  A weight of 1/2 causes
3698      * historical data to decay to <1% in 7 rebalancing runs.  */
3699     for (e = &port->bond_hash[0]; e <= &port->bond_hash[BOND_MASK]; e++) {
3700         e->tx_bytes /= 2;
3701     }
3702
3703 exit:
3704     free(bals);
3705 }
3706
3707 static void
3708 bond_send_learning_packets(struct port *port)
3709 {
3710     struct bridge *br = port->bridge;
3711     struct mac_entry *e;
3712     struct ofpbuf packet;
3713     int error, n_packets, n_errors;
3714
3715     if (!port->n_ifaces || port->active_iface < 0 || bond_is_tcp_hash(port)) {
3716         return;
3717     }
3718
3719     ofpbuf_init(&packet, 128);
3720     error = n_packets = n_errors = 0;
3721     LIST_FOR_EACH (e, lru_node, &br->ml->lrus) {
3722         union ofp_action actions[2], *a;
3723         uint16_t dp_ifidx;
3724         tag_type tags = 0;
3725         struct flow flow;
3726         int retval;
3727
3728         if (e->port == port->port_idx) {
3729             continue;
3730         }
3731
3732         compose_benign_packet(&packet, "Open vSwitch Bond Failover", 0xf177,
3733                               e->mac);
3734         flow_extract(&packet, 0, ODPP_NONE, &flow);
3735
3736         if (!choose_output_iface(port, &flow, e->vlan, &dp_ifidx, &tags)) {
3737             continue;
3738         }
3739
3740         /* Compose actions. */
3741         memset(actions, 0, sizeof actions);
3742         a = actions;
3743         if (e->vlan) {
3744             a->vlan_vid.type = htons(OFPAT_SET_VLAN_VID);
3745             a->vlan_vid.len = htons(sizeof *a);
3746             a->vlan_vid.vlan_vid = htons(e->vlan);
3747             a++;
3748         }
3749         a->output.type = htons(OFPAT_OUTPUT);
3750         a->output.len = htons(sizeof *a);
3751         a->output.port = htons(odp_port_to_ofp_port(dp_ifidx));
3752         a++;
3753
3754         /* Send packet. */
3755         n_packets++;
3756         retval = ofproto_send_packet(br->ofproto, &flow, actions, a - actions,
3757                                      &packet);
3758         if (retval) {
3759             error = retval;
3760             n_errors++;
3761         }
3762     }
3763     ofpbuf_uninit(&packet);
3764
3765     if (n_errors) {
3766         static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
3767         VLOG_WARN_RL(&rl, "bond %s: %d errors sending %d gratuitous learning "
3768                      "packets, last error was: %s",
3769                      port->name, n_errors, n_packets, strerror(error));
3770     } else {
3771         VLOG_DBG("bond %s: sent %d gratuitous learning packets",
3772                  port->name, n_packets);
3773     }
3774 }
3775 \f
3776 /* Bonding unixctl user interface functions. */
3777
3778 static void
3779 bond_unixctl_list(struct unixctl_conn *conn,
3780                   const char *args OVS_UNUSED, void *aux OVS_UNUSED)
3781 {
3782     struct ds ds = DS_EMPTY_INITIALIZER;
3783     const struct bridge *br;
3784
3785     ds_put_cstr(&ds, "bridge\tbond\ttype\tslaves\n");
3786
3787     LIST_FOR_EACH (br, node, &all_bridges) {
3788         size_t i;
3789
3790         for (i = 0; i < br->n_ports; i++) {
3791             const struct port *port = br->ports[i];
3792             if (port->n_ifaces > 1) {
3793                 size_t j;
3794
3795                 ds_put_format(&ds, "%s\t%s\t%s\t", br->name, port->name,
3796                               bond_mode_to_string(port->bond_mode));
3797                 for (j = 0; j < port->n_ifaces; j++) {
3798                     const struct iface *iface = port->ifaces[j];
3799                     if (j) {
3800                         ds_put_cstr(&ds, ", ");
3801                     }
3802                     ds_put_cstr(&ds, iface->name);
3803                 }
3804                 ds_put_char(&ds, '\n');
3805             }
3806         }
3807     }
3808     unixctl_command_reply(conn, 200, ds_cstr(&ds));
3809     ds_destroy(&ds);
3810 }
3811
3812 static struct port *
3813 bond_find(const char *name)
3814 {
3815     const struct bridge *br;
3816
3817     LIST_FOR_EACH (br, node, &all_bridges) {
3818         size_t i;
3819
3820         for (i = 0; i < br->n_ports; i++) {
3821             struct port *port = br->ports[i];
3822             if (!strcmp(port->name, name) && port->n_ifaces > 1) {
3823                 return port;
3824             }
3825         }
3826     }
3827     return NULL;
3828 }
3829
3830 static void
3831 ds_put_lacp_state(struct ds *ds, uint8_t state)
3832 {
3833     if (state & LACP_STATE_ACT) {
3834         ds_put_cstr(ds, "activity ");
3835     }
3836
3837     if (state & LACP_STATE_TIME) {
3838         ds_put_cstr(ds, "timeout ");
3839     }
3840
3841     if (state & LACP_STATE_AGG) {
3842         ds_put_cstr(ds, "aggregation ");
3843     }
3844
3845     if (state & LACP_STATE_SYNC) {
3846         ds_put_cstr(ds, "synchronized ");
3847     }
3848
3849     if (state & LACP_STATE_COL) {
3850         ds_put_cstr(ds, "collecting ");
3851     }
3852
3853     if (state & LACP_STATE_DIST) {
3854         ds_put_cstr(ds, "distributing ");
3855     }
3856
3857     if (state & LACP_STATE_DEF) {
3858         ds_put_cstr(ds, "defaulted ");
3859     }
3860
3861     if (state & LACP_STATE_EXP) {
3862         ds_put_cstr(ds, "expired ");
3863     }
3864 }
3865
3866 static void
3867 bond_unixctl_show(struct unixctl_conn *conn,
3868                   const char *args, void *aux OVS_UNUSED)
3869 {
3870     struct ds ds = DS_EMPTY_INITIALIZER;
3871     const struct port *port;
3872     size_t j;
3873
3874     port = bond_find(args);
3875     if (!port) {
3876         unixctl_command_reply(conn, 501, "no such bond");
3877         return;
3878     }
3879
3880     ds_put_format(&ds, "bond_mode: %s\n",
3881                   bond_mode_to_string(port->bond_mode));
3882
3883     if (port->lacp) {
3884         ds_put_format(&ds, "lacp: %s\n",
3885                       port->lacp & LACP_ACTIVE ? "active" : "passive");
3886     } else {
3887         ds_put_cstr(&ds, "lacp: off\n");
3888     }
3889
3890     if (port->bond_mode != BM_AB) {
3891         ds_put_format(&ds, "bond-hash-algorithm: %s\n",
3892                       bond_is_tcp_hash(port) ? "balance-tcp" : "balance-slb");
3893     }
3894
3895
3896     ds_put_format(&ds, "bond-detect-mode: %s\n",
3897                   port->miimon ? "miimon" : "carrier");
3898
3899     if (port->miimon) {
3900         ds_put_format(&ds, "bond-miimon-interval: %lld\n",
3901                       port->bond_miimon_interval);
3902     }
3903
3904     ds_put_format(&ds, "updelay: %d ms\n", port->updelay);
3905     ds_put_format(&ds, "downdelay: %d ms\n", port->downdelay);
3906
3907     if (port->bond_mode != BM_AB) {
3908         ds_put_format(&ds, "next rebalance: %lld ms\n",
3909                       port->bond_next_rebalance - time_msec());
3910     }
3911
3912     for (j = 0; j < port->n_ifaces; j++) {
3913         const struct iface *iface = port->ifaces[j];
3914         struct bond_entry *be;
3915         struct flow flow;
3916
3917         /* Basic info. */
3918         ds_put_format(&ds, "\nslave %s: %s\n",
3919                       iface->name, iface->enabled ? "enabled" : "disabled");
3920         if (j == port->active_iface) {
3921             ds_put_cstr(&ds, "\tactive slave\n");
3922         }
3923         if (iface->delay_expires != LLONG_MAX) {
3924             ds_put_format(&ds, "\t%s expires in %lld ms\n",
3925                           iface->enabled ? "downdelay" : "updelay",
3926                           iface->delay_expires - time_msec());
3927         }
3928
3929         if (port->lacp) {
3930             ds_put_cstr(&ds, "\tstatus: ");
3931
3932             if (iface->lacp_status & LACP_CURRENT) {
3933                 ds_put_cstr(&ds, "current ");
3934             }
3935
3936             if (iface->lacp_status & LACP_EXPIRED) {
3937                 ds_put_cstr(&ds, "expired ");
3938             }
3939
3940             if (iface->lacp_status & LACP_DEFAULTED) {
3941                 ds_put_cstr(&ds, "defaulted ");
3942             }
3943
3944             if (iface->lacp_status & LACP_ATTACHED) {
3945                 ds_put_cstr(&ds, "attached ");
3946             }
3947
3948             ds_put_cstr(&ds, "\n");
3949
3950             ds_put_cstr(&ds, "\n\tactor sysid: ");
3951             ds_put_format(&ds, ETH_ADDR_FMT,
3952                           ETH_ADDR_ARGS(iface->lacp_actor.sysid));
3953             ds_put_cstr(&ds, "\n");
3954
3955             ds_put_format(&ds, "\tactor sys_priority: %u\n",
3956                           ntohs(iface->lacp_actor.sys_priority));
3957
3958             ds_put_format(&ds, "\tactor portid: %u\n",
3959                           ntohs(iface->lacp_actor.portid));
3960
3961             ds_put_format(&ds, "\tactor port_priority: %u\n",
3962                           ntohs(iface->lacp_actor.port_priority));
3963
3964             ds_put_format(&ds, "\tactor key: %u\n",
3965                           ntohs(iface->lacp_actor.key));
3966
3967             ds_put_cstr(&ds, "\tactor state: ");
3968             ds_put_lacp_state(&ds, iface_get_lacp_state(iface));
3969             ds_put_cstr(&ds, "\n\n");
3970
3971             ds_put_cstr(&ds, "\tpartner sysid: ");
3972             ds_put_format(&ds, ETH_ADDR_FMT,
3973                           ETH_ADDR_ARGS(iface->lacp_partner.sysid));
3974             ds_put_cstr(&ds, "\n");
3975
3976             ds_put_format(&ds, "\tpartner sys_priority: %u\n",
3977                           ntohs(iface->lacp_partner.sys_priority));
3978
3979             ds_put_format(&ds, "\tpartner portid: %u\n",
3980                           ntohs(iface->lacp_partner.portid));
3981
3982             ds_put_format(&ds, "\tpartner port_priority: %u\n",
3983                           ntohs(iface->lacp_partner.port_priority));
3984
3985             ds_put_format(&ds, "\tpartner key: %u\n",
3986                           ntohs(iface->lacp_partner.key));
3987
3988             ds_put_cstr(&ds, "\tpartner state: ");
3989             ds_put_lacp_state(&ds, iface->lacp_partner.state);
3990             ds_put_cstr(&ds, "\n");
3991         }
3992
3993         if (port->bond_mode == BM_AB) {
3994             continue;
3995         }
3996
3997         /* Hashes. */
3998         memset(&flow, 0, sizeof flow);
3999         for (be = port->bond_hash; be <= &port->bond_hash[BOND_MASK]; be++) {
4000             int hash = be - port->bond_hash;
4001             struct mac_entry *me;
4002
4003             if (be->iface_idx != j) {
4004                 continue;
4005             }
4006
4007             ds_put_format(&ds, "\thash %d: %"PRIu64" kB load\n",
4008                           hash, be->tx_bytes / 1024);
4009
4010             if (port->bond_mode != BM_SLB) {
4011                 continue;
4012             }
4013
4014             /* MACs. */
4015             LIST_FOR_EACH (me, lru_node, &port->bridge->ml->lrus) {
4016                 uint16_t dp_ifidx;
4017                 tag_type tags = 0;
4018
4019                 memcpy(flow.dl_src, me->mac, ETH_ADDR_LEN);
4020                 if (bond_hash_src(me->mac, me->vlan) == hash
4021                     && me->port != port->port_idx
4022                     && choose_output_iface(port, &flow, me->vlan,
4023                                            &dp_ifidx, &tags)
4024                     && dp_ifidx == iface->dp_ifidx)
4025                 {
4026                     ds_put_format(&ds, "\t\t"ETH_ADDR_FMT"\n",
4027                                   ETH_ADDR_ARGS(me->mac));
4028                 }
4029             }
4030         }
4031     }
4032     unixctl_command_reply(conn, 200, ds_cstr(&ds));
4033     ds_destroy(&ds);
4034 }
4035
4036 static void
4037 bond_unixctl_migrate(struct unixctl_conn *conn, const char *args_,
4038                      void *aux OVS_UNUSED)
4039 {
4040     char *args = (char *) args_;
4041     char *save_ptr = NULL;
4042     char *bond_s, *hash_s, *slave_s;
4043     struct port *port;
4044     struct iface *iface;
4045     struct bond_entry *entry;
4046     int hash;
4047
4048     bond_s = strtok_r(args, " ", &save_ptr);
4049     hash_s = strtok_r(NULL, " ", &save_ptr);
4050     slave_s = strtok_r(NULL, " ", &save_ptr);
4051     if (!slave_s) {
4052         unixctl_command_reply(conn, 501,
4053                               "usage: bond/migrate BOND HASH SLAVE");
4054         return;
4055     }
4056
4057     port = bond_find(bond_s);
4058     if (!port) {
4059         unixctl_command_reply(conn, 501, "no such bond");
4060         return;
4061     }
4062
4063     if (port->bond_mode != BM_SLB) {
4064         unixctl_command_reply(conn, 501, "not an SLB bond");
4065         return;
4066     }
4067
4068     if (strspn(hash_s, "0123456789") == strlen(hash_s)) {
4069         hash = atoi(hash_s) & BOND_MASK;
4070     } else {
4071         unixctl_command_reply(conn, 501, "bad hash");
4072         return;
4073     }
4074
4075     iface = port_lookup_iface(port, slave_s);
4076     if (!iface) {
4077         unixctl_command_reply(conn, 501, "no such slave");
4078         return;
4079     }
4080
4081     if (!iface->enabled) {
4082         unixctl_command_reply(conn, 501, "cannot migrate to disabled slave");
4083         return;
4084     }
4085
4086     entry = &port->bond_hash[hash];
4087     ofproto_revalidate(port->bridge->ofproto, entry->iface_tag);
4088     entry->iface_idx = iface->port_ifidx;
4089     entry->iface_tag = tag_create_random();
4090     unixctl_command_reply(conn, 200, "migrated");
4091 }
4092
4093 static void
4094 bond_unixctl_set_active_slave(struct unixctl_conn *conn, const char *args_,
4095                               void *aux OVS_UNUSED)
4096 {
4097     char *args = (char *) args_;
4098     char *save_ptr = NULL;
4099     char *bond_s, *slave_s;
4100     struct port *port;
4101     struct iface *iface;
4102
4103     bond_s = strtok_r(args, " ", &save_ptr);
4104     slave_s = strtok_r(NULL, " ", &save_ptr);
4105     if (!slave_s) {
4106         unixctl_command_reply(conn, 501,
4107                               "usage: bond/set-active-slave BOND SLAVE");
4108         return;
4109     }
4110
4111     port = bond_find(bond_s);
4112     if (!port) {
4113         unixctl_command_reply(conn, 501, "no such bond");
4114         return;
4115     }
4116
4117     iface = port_lookup_iface(port, slave_s);
4118     if (!iface) {
4119         unixctl_command_reply(conn, 501, "no such slave");
4120         return;
4121     }
4122
4123     if (!iface->enabled) {
4124         unixctl_command_reply(conn, 501, "cannot make disabled slave active");
4125         return;
4126     }
4127
4128     if (port->active_iface != iface->port_ifidx) {
4129         ofproto_revalidate(port->bridge->ofproto, port->active_iface_tag);
4130         port->active_iface = iface->port_ifidx;
4131         port->active_iface_tag = tag_create_random();
4132         VLOG_INFO("port %s: active interface is now %s",
4133                   port->name, iface->name);
4134         bond_send_learning_packets(port);
4135         unixctl_command_reply(conn, 200, "done");
4136     } else {
4137         unixctl_command_reply(conn, 200, "no change");
4138     }
4139 }
4140
4141 static void
4142 enable_slave(struct unixctl_conn *conn, const char *args_, bool enable)
4143 {
4144     char *args = (char *) args_;
4145     char *save_ptr = NULL;
4146     char *bond_s, *slave_s;
4147     struct port *port;
4148     struct iface *iface;
4149
4150     bond_s = strtok_r(args, " ", &save_ptr);
4151     slave_s = strtok_r(NULL, " ", &save_ptr);
4152     if (!slave_s) {
4153         unixctl_command_reply(conn, 501,
4154                               "usage: bond/enable/disable-slave BOND SLAVE");
4155         return;
4156     }
4157
4158     port = bond_find(bond_s);
4159     if (!port) {
4160         unixctl_command_reply(conn, 501, "no such bond");
4161         return;
4162     }
4163
4164     iface = port_lookup_iface(port, slave_s);
4165     if (!iface) {
4166         unixctl_command_reply(conn, 501, "no such slave");
4167         return;
4168     }
4169
4170     bond_enable_slave(iface, enable);
4171     unixctl_command_reply(conn, 501, enable ? "enabled" : "disabled");
4172 }
4173
4174 static void
4175 bond_unixctl_enable_slave(struct unixctl_conn *conn, const char *args,
4176                           void *aux OVS_UNUSED)
4177 {
4178     enable_slave(conn, args, true);
4179 }
4180
4181 static void
4182 bond_unixctl_disable_slave(struct unixctl_conn *conn, const char *args,
4183                            void *aux OVS_UNUSED)
4184 {
4185     enable_slave(conn, args, false);
4186 }
4187
4188 static void
4189 bond_unixctl_hash(struct unixctl_conn *conn, const char *args_,
4190                   void *aux OVS_UNUSED)
4191 {
4192     char *args = (char *) args_;
4193     uint8_t mac[ETH_ADDR_LEN];
4194     uint8_t hash;
4195     char *hash_cstr;
4196     unsigned int vlan;
4197     char *mac_s, *vlan_s;
4198     char *save_ptr = NULL;
4199
4200     mac_s  = strtok_r(args, " ", &save_ptr);
4201     vlan_s = strtok_r(NULL, " ", &save_ptr);
4202
4203     if (vlan_s) {
4204         if (sscanf(vlan_s, "%u", &vlan) != 1) {
4205             unixctl_command_reply(conn, 501, "invalid vlan");
4206             return;
4207         }
4208     } else {
4209         vlan = OFP_VLAN_NONE;
4210     }
4211
4212     if (sscanf(mac_s, ETH_ADDR_SCAN_FMT, ETH_ADDR_SCAN_ARGS(mac))
4213         == ETH_ADDR_SCAN_COUNT) {
4214         hash = bond_hash_src(mac, vlan);
4215
4216         hash_cstr = xasprintf("%u", hash);
4217         unixctl_command_reply(conn, 200, hash_cstr);
4218         free(hash_cstr);
4219     } else {
4220         unixctl_command_reply(conn, 501, "invalid mac");
4221     }
4222 }
4223
4224 static void
4225 bond_init(void)
4226 {
4227     unixctl_command_register("bond/list", bond_unixctl_list, NULL);
4228     unixctl_command_register("bond/show", bond_unixctl_show, NULL);
4229     unixctl_command_register("bond/migrate", bond_unixctl_migrate, NULL);
4230     unixctl_command_register("bond/set-active-slave",
4231                              bond_unixctl_set_active_slave, NULL);
4232     unixctl_command_register("bond/enable-slave", bond_unixctl_enable_slave,
4233                              NULL);
4234     unixctl_command_register("bond/disable-slave", bond_unixctl_disable_slave,
4235                              NULL);
4236     unixctl_command_register("bond/hash", bond_unixctl_hash, NULL);
4237 }
4238 \f
4239 /* Port functions. */
4240
4241 static struct port *
4242 port_create(struct bridge *br, const char *name)
4243 {
4244     struct port *port;
4245
4246     port = xzalloc(sizeof *port);
4247     port->bridge = br;
4248     port->port_idx = br->n_ports;
4249     port->vlan = -1;
4250     port->trunks = NULL;
4251     port->name = xstrdup(name);
4252     port->active_iface = -1;
4253
4254     if (br->n_ports >= br->allocated_ports) {
4255         br->ports = x2nrealloc(br->ports, &br->allocated_ports,
4256                                sizeof *br->ports);
4257     }
4258     br->ports[br->n_ports++] = port;
4259     shash_add_assert(&br->port_by_name, port->name, port);
4260
4261     VLOG_INFO("created port %s on bridge %s", port->name, br->name);
4262     bridge_flush(br);
4263
4264     return port;
4265 }
4266
4267 static const char *
4268 get_port_other_config(const struct ovsrec_port *port, const char *key,
4269                       const char *default_value)
4270 {
4271     const char *value;
4272
4273     value = get_ovsrec_key_value(&port->header_, &ovsrec_port_col_other_config,
4274                                  key);
4275     return value ? value : default_value;
4276 }
4277
4278 static const char *
4279 get_interface_other_config(const struct ovsrec_interface *iface,
4280                            const char *key, const char *default_value)
4281 {
4282     const char *value;
4283
4284     value = get_ovsrec_key_value(&iface->header_,
4285                                  &ovsrec_interface_col_other_config, key);
4286     return value ? value : default_value;
4287 }
4288
4289 static void
4290 port_del_ifaces(struct port *port, const struct ovsrec_port *cfg)
4291 {
4292     struct shash new_ifaces;
4293     size_t i;
4294
4295     /* Collect list of new interfaces. */
4296     shash_init(&new_ifaces);
4297     for (i = 0; i < cfg->n_interfaces; i++) {
4298         const char *name = cfg->interfaces[i]->name;
4299         shash_add_once(&new_ifaces, name, NULL);
4300     }
4301
4302     /* Get rid of deleted interfaces. */
4303     for (i = 0; i < port->n_ifaces; ) {
4304         if (!shash_find(&new_ifaces, cfg->interfaces[i]->name)) {
4305             iface_destroy(port->ifaces[i]);
4306         } else {
4307             i++;
4308         }
4309     }
4310
4311     shash_destroy(&new_ifaces);
4312 }
4313
4314 static void
4315 port_reconfigure(struct port *port, const struct ovsrec_port *cfg)
4316 {
4317     const char *detect_mode;
4318     struct shash new_ifaces;
4319     long long int next_rebalance, miimon_next_update, lacp_priority;
4320     unsigned long *trunks;
4321     int vlan;
4322     size_t i;
4323
4324     port->cfg = cfg;
4325
4326     /* Update settings. */
4327     port->updelay = cfg->bond_updelay;
4328     if (port->updelay < 0) {
4329         port->updelay = 0;
4330     }
4331     port->downdelay = cfg->bond_downdelay;
4332     if (port->downdelay < 0) {
4333         port->downdelay = 0;
4334     }
4335     port->bond_rebalance_interval = atoi(
4336         get_port_other_config(cfg, "bond-rebalance-interval", "10000"));
4337     if (port->bond_rebalance_interval < 1000) {
4338         port->bond_rebalance_interval = 1000;
4339     }
4340     next_rebalance = time_msec() + port->bond_rebalance_interval;
4341     if (port->bond_next_rebalance > next_rebalance) {
4342         port->bond_next_rebalance = next_rebalance;
4343     }
4344
4345     detect_mode = get_port_other_config(cfg, "bond-detect-mode",
4346                                         "carrier");
4347
4348     if (!strcmp(detect_mode, "carrier")) {
4349         port->miimon = false;
4350     } else if (!strcmp(detect_mode, "miimon")) {
4351         port->miimon = true;
4352     } else {
4353         port->miimon = false;
4354         VLOG_WARN("port %s: unsupported bond-detect-mode %s, defaulting to "
4355                   "carrier", port->name, detect_mode);
4356     }
4357
4358     port->bond_miimon_interval = atoi(
4359         get_port_other_config(cfg, "bond-miimon-interval", "200"));
4360     if (port->bond_miimon_interval < 100) {
4361         port->bond_miimon_interval = 100;
4362     }
4363     miimon_next_update = time_msec() + port->bond_miimon_interval;
4364     if (port->bond_miimon_next_update > miimon_next_update) {
4365         port->bond_miimon_next_update = miimon_next_update;
4366     }
4367
4368     if (!port->cfg->bond_mode ||
4369         !strcmp(port->cfg->bond_mode, bond_mode_to_string(BM_SLB))) {
4370         port->bond_mode = BM_SLB;
4371     } else if (!strcmp(port->cfg->bond_mode, bond_mode_to_string(BM_AB))) {
4372         port->bond_mode = BM_AB;
4373     } else if (!strcmp(port->cfg->bond_mode, bond_mode_to_string(BM_TCP))) {
4374         port->bond_mode = BM_TCP;
4375     } else {
4376         port->bond_mode = BM_SLB;
4377         VLOG_WARN("port %s: unknown bond_mode %s, defaulting to %s",
4378                   port->name, port->cfg->bond_mode,
4379                   bond_mode_to_string(port->bond_mode));
4380     }
4381
4382     /* Add new interfaces and update 'cfg' member of existing ones. */
4383     shash_init(&new_ifaces);
4384     for (i = 0; i < cfg->n_interfaces; i++) {
4385         const struct ovsrec_interface *if_cfg = cfg->interfaces[i];
4386         struct iface *iface;
4387
4388         if (!shash_add_once(&new_ifaces, if_cfg->name, NULL)) {
4389             VLOG_WARN("port %s: %s specified twice as port interface",
4390                       port->name, if_cfg->name);
4391             iface_set_ofport(if_cfg, -1);
4392             continue;
4393         }
4394
4395         iface = iface_lookup(port->bridge, if_cfg->name);
4396         if (iface) {
4397             if (iface->port != port) {
4398                 VLOG_ERR("bridge %s: %s interface is on multiple ports, "
4399                          "removing from %s",
4400                          port->bridge->name, if_cfg->name, iface->port->name);
4401                 continue;
4402             }
4403             iface->cfg = if_cfg;
4404         } else {
4405             iface = iface_create(port, if_cfg);
4406         }
4407
4408         /* Determine interface type.  The local port always has type
4409          * "internal".  Other ports take their type from the database and
4410          * default to "system" if none is specified. */
4411         iface->type = (!strcmp(if_cfg->name, port->bridge->name) ? "internal"
4412                        : if_cfg->type[0] ? if_cfg->type
4413                        : "system");
4414
4415         lacp_priority =
4416             atoi(get_interface_other_config(if_cfg, "lacp-port-priority",
4417                                             "0"));
4418
4419         if (lacp_priority <= 0 || lacp_priority > UINT16_MAX) {
4420             iface->lacp_priority = UINT16_MAX;
4421         } else {
4422             iface->lacp_priority = lacp_priority;
4423         }
4424     }
4425     shash_destroy(&new_ifaces);
4426
4427     lacp_priority =
4428         atoi(get_port_other_config(cfg, "lacp-system-priority", "0"));
4429
4430     if (lacp_priority <= 0 || lacp_priority > UINT16_MAX) {
4431         /* Prefer bondable links if unspecified. */
4432         port->lacp_priority = port->n_ifaces > 1 ? UINT16_MAX - 1 : UINT16_MAX;
4433     } else {
4434         port->lacp_priority = lacp_priority;
4435     }
4436
4437     if (!port->cfg->lacp) {
4438         /* XXX when LACP implementation has been sufficiently tested, enable by
4439          * default and make active on bonded ports. */
4440         port->lacp = 0;
4441     } else if (!strcmp(port->cfg->lacp, "off")) {
4442         port->lacp = 0;
4443     } else if (!strcmp(port->cfg->lacp, "active")) {
4444         port->lacp = LACP_ACTIVE;
4445     } else if (!strcmp(port->cfg->lacp, "passive")) {
4446         port->lacp = LACP_PASSIVE;
4447     } else {
4448         VLOG_WARN("port %s: unknown LACP mode %s",
4449                   port->name, port->cfg->lacp);
4450         port->lacp = 0;
4451     }
4452
4453     /* Get VLAN tag. */
4454     vlan = -1;
4455     if (cfg->tag) {
4456         if (port->n_ifaces < 2) {
4457             vlan = *cfg->tag;
4458             if (vlan >= 0 && vlan <= 4095) {
4459                 VLOG_DBG("port %s: assigning VLAN tag %d", port->name, vlan);
4460             } else {
4461                 vlan = -1;
4462             }
4463         } else {
4464             /* It's possible that bonded, VLAN-tagged ports make sense.  Maybe
4465              * they even work as-is.  But they have not been tested. */
4466             VLOG_WARN("port %s: VLAN tags not supported on bonded ports",
4467                       port->name);
4468         }
4469     }
4470     if (port->vlan != vlan) {
4471         port->vlan = vlan;
4472         bridge_flush(port->bridge);
4473     }
4474
4475     /* Get trunked VLANs. */
4476     trunks = NULL;
4477     if (vlan < 0 && cfg->n_trunks) {
4478         size_t n_errors;
4479
4480         trunks = bitmap_allocate(4096);
4481         n_errors = 0;
4482         for (i = 0; i < cfg->n_trunks; i++) {
4483             int trunk = cfg->trunks[i];
4484             if (trunk >= 0) {
4485                 bitmap_set1(trunks, trunk);
4486             } else {
4487                 n_errors++;
4488             }
4489         }
4490         if (n_errors) {
4491             VLOG_ERR("port %s: invalid values for %zu trunk VLANs",
4492                      port->name, cfg->n_trunks);
4493         }
4494         if (n_errors == cfg->n_trunks) {
4495             VLOG_ERR("port %s: no valid trunks, trunking all VLANs",
4496                      port->name);
4497             bitmap_free(trunks);
4498             trunks = NULL;
4499         }
4500     } else if (vlan >= 0 && cfg->n_trunks) {
4501         VLOG_ERR("port %s: ignoring trunks in favor of implicit vlan",
4502                  port->name);
4503     }
4504     if (trunks == NULL
4505         ? port->trunks != NULL
4506         : port->trunks == NULL || !bitmap_equal(trunks, port->trunks, 4096)) {
4507         bridge_flush(port->bridge);
4508     }
4509     bitmap_free(port->trunks);
4510     port->trunks = trunks;
4511 }
4512
4513 static void
4514 port_destroy(struct port *port)
4515 {
4516     if (port) {
4517         struct bridge *br = port->bridge;
4518         struct port *del;
4519         int i;
4520
4521         for (i = 0; i < MAX_MIRRORS; i++) {
4522             struct mirror *m = br->mirrors[i];
4523             if (m && m->out_port == port) {
4524                 mirror_destroy(m);
4525             }
4526         }
4527
4528         while (port->n_ifaces > 0) {
4529             iface_destroy(port->ifaces[port->n_ifaces - 1]);
4530         }
4531
4532         shash_find_and_delete_assert(&br->port_by_name, port->name);
4533
4534         del = br->ports[port->port_idx] = br->ports[--br->n_ports];
4535         del->port_idx = port->port_idx;
4536
4537         VLOG_INFO("destroyed port %s on bridge %s", port->name, br->name);
4538
4539         netdev_monitor_destroy(port->monitor);
4540         free(port->ifaces);
4541         bitmap_free(port->trunks);
4542         free(port->name);
4543         free(port);
4544         bridge_flush(br);
4545     }
4546 }
4547
4548 static struct port *
4549 port_from_dp_ifidx(const struct bridge *br, uint16_t dp_ifidx)
4550 {
4551     struct iface *iface = iface_from_dp_ifidx(br, dp_ifidx);
4552     return iface ? iface->port : NULL;
4553 }
4554
4555 static struct port *
4556 port_lookup(const struct bridge *br, const char *name)
4557 {
4558     return shash_find_data(&br->port_by_name, name);
4559 }
4560
4561 static struct iface *
4562 port_lookup_iface(const struct port *port, const char *name)
4563 {
4564     struct iface *iface = iface_lookup(port->bridge, name);
4565     return iface && iface->port == port ? iface : NULL;
4566 }
4567
4568 static void
4569 port_update_lacp(struct port *port)
4570 {
4571     size_t i;
4572     bool key_changed;
4573
4574     if (!port->lacp || port->n_ifaces < 1) {
4575         for (i = 0; i < port->n_ifaces; i++) {
4576             iface_set_lacp_defaulted(port->ifaces[i]);
4577         }
4578         return;
4579     }
4580
4581     key_changed = true;
4582     for (i = 0; i < port->n_ifaces; i++) {
4583         struct iface *iface = port->ifaces[i];
4584
4585         if (iface->dp_ifidx <= 0 || iface->dp_ifidx > UINT16_MAX) {
4586             port->lacp = 0;
4587             return;
4588         }
4589
4590         if (iface->dp_ifidx == port->lacp_key) {
4591             key_changed = false;
4592         }
4593     }
4594
4595     if (key_changed) {
4596         port->lacp_key = port->ifaces[0]->dp_ifidx;
4597     }
4598
4599     for (i = 0; i < port->n_ifaces; i++) {
4600         struct iface *iface = port->ifaces[i];
4601
4602         iface->lacp_actor.sys_priority = htons(port->lacp_priority);
4603         memcpy(&iface->lacp_actor.sysid, port->bridge->ea, ETH_ADDR_LEN);
4604
4605         iface->lacp_actor.port_priority = htons(iface->lacp_priority);
4606         iface->lacp_actor.portid = htons(iface->dp_ifidx);
4607         iface->lacp_actor.key = htons(port->lacp_key);
4608
4609         iface->lacp_tx = 0;
4610     }
4611     port->lacp_need_update = true;
4612 }
4613
4614 static void
4615 port_update_bonding(struct port *port)
4616 {
4617     if (port->monitor) {
4618         netdev_monitor_destroy(port->monitor);
4619         port->monitor = NULL;
4620     }
4621     if (port->n_ifaces < 2) {
4622         /* Not a bonded port. */
4623         free(port->bond_hash);
4624         port->bond_hash = NULL;
4625         port->bond_fake_iface = false;
4626         port->active_iface = -1;
4627         port->no_ifaces_tag = 0;
4628     } else {
4629         size_t i;
4630
4631         if (port->bond_mode != BM_AB && !port->bond_hash) {
4632             port->bond_hash = xcalloc(BOND_MASK + 1, sizeof *port->bond_hash);
4633             for (i = 0; i <= BOND_MASK; i++) {
4634                 struct bond_entry *e = &port->bond_hash[i];
4635                 e->iface_idx = -1;
4636                 e->tx_bytes = 0;
4637             }
4638             port->bond_next_rebalance
4639                 = time_msec() + port->bond_rebalance_interval;
4640         } else if (port->bond_mode == BM_AB) {
4641             free(port->bond_hash);
4642             port->bond_hash = NULL;
4643         }
4644
4645         if (!port->no_ifaces_tag) {
4646             port->no_ifaces_tag = tag_create_random();
4647         }
4648
4649         if (port->active_iface < 0) {
4650             bond_choose_active_iface(port);
4651         }
4652
4653         port->bond_fake_iface = port->cfg->bond_fake_iface;
4654         if (port->bond_fake_iface) {
4655             port->bond_next_fake_iface_update = time_msec();
4656         }
4657
4658         if (!port->miimon) {
4659             port->monitor = netdev_monitor_create();
4660             for (i = 0; i < port->n_ifaces; i++) {
4661                 netdev_monitor_add(port->monitor, port->ifaces[i]->netdev);
4662             }
4663         }
4664     }
4665 }
4666 \f
4667 /* Interface functions. */
4668
4669 static void
4670 iface_set_lacp_defaulted(struct iface *iface)
4671 {
4672     memset(&iface->lacp_partner, 0, sizeof iface->lacp_partner);
4673
4674     iface->lacp_status |= LACP_DEFAULTED;
4675     iface->lacp_status &= ~(LACP_CURRENT | LACP_EXPIRED);
4676     iface->lacp_tx = 0;
4677     iface->port->lacp_need_update = true;
4678 }
4679
4680 static void
4681 iface_set_lacp_expired(struct iface *iface)
4682 {
4683     iface->lacp_status &= ~LACP_CURRENT;
4684     iface->lacp_status |= LACP_EXPIRED;
4685     iface->lacp_partner.state |= LACP_STATE_TIME;
4686     iface->lacp_partner.state &= ~LACP_STATE_SYNC;
4687
4688     iface->lacp_rx = time_msec() + LACP_FAST_TIME_RX;
4689     iface->lacp_tx = 0;
4690 }
4691
4692 static uint8_t
4693 iface_get_lacp_state(const struct iface *iface)
4694 {
4695     uint8_t state = 0;
4696
4697     if (iface->port->lacp & LACP_ACTIVE) {
4698         state |= LACP_STATE_ACT;
4699     }
4700
4701     if (iface->lacp_status & LACP_ATTACHED) {
4702         state |= LACP_STATE_SYNC;
4703     }
4704
4705     if (iface->lacp_status & LACP_DEFAULTED) {
4706         state |= LACP_STATE_DEF;
4707     }
4708
4709     if (iface->lacp_status & LACP_EXPIRED) {
4710         state |= LACP_STATE_EXP;
4711     }
4712
4713     if (iface->port->n_ifaces > 1) {
4714         state |= LACP_STATE_AGG;
4715     }
4716
4717     if (iface->enabled) {
4718         state |= LACP_STATE_COL | LACP_STATE_DIST;
4719     }
4720
4721     return state;
4722 }
4723
4724 /* Given 'iface', populates 'priority' with data representing its LACP link
4725  * priority.  If two priority objects populated by this function are compared
4726  * using memcmp, the higher priority link will be less than the lower priority
4727  * link. */
4728 static void
4729 iface_get_lacp_priority(struct iface *iface, struct lacp_info *priority)
4730 {
4731     uint16_t partner_priority, actor_priority;
4732
4733     /* Choose the lacp_info of the higher priority system by comparing their
4734      * system priorities and mac addresses. */
4735     actor_priority   = ntohs(iface->lacp_actor.sys_priority);
4736     partner_priority = ntohs(iface->lacp_partner.sys_priority);
4737     if (actor_priority < partner_priority) {
4738         *priority = iface->lacp_actor;
4739     } else if (partner_priority < actor_priority) {
4740         *priority = iface->lacp_partner;
4741     } else if (eth_addr_compare_3way(iface->lacp_actor.sysid,
4742                                      iface->lacp_partner.sysid) < 0) {
4743         *priority = iface->lacp_actor;
4744     } else {
4745         *priority = iface->lacp_partner;
4746     }
4747
4748     /* Key and state are not used in priority comparisons. */
4749     priority->key = 0;
4750     priority->state = 0;
4751 }
4752
4753 static void
4754 iface_send_packet(struct iface *iface, struct ofpbuf *packet)
4755 {
4756     struct flow flow;
4757     union ofp_action action;
4758
4759     memset(&action, 0, sizeof action);
4760     action.output.type = htons(OFPAT_OUTPUT);
4761     action.output.len  = htons(sizeof action);
4762     action.output.port = htons(odp_port_to_ofp_port(iface->dp_ifidx));
4763
4764     flow_extract(packet, 0, ODPP_NONE, &flow);
4765
4766     if (ofproto_send_packet(iface->port->bridge->ofproto, &flow, &action, 1,
4767                             packet)) {
4768         static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
4769         VLOG_WARN_RL(&rl, "interface %s: Failed to send packet.", iface->name);
4770     }
4771 }
4772
4773 static struct iface *
4774 iface_create(struct port *port, const struct ovsrec_interface *if_cfg)
4775 {
4776     struct bridge *br = port->bridge;
4777     struct iface *iface;
4778     char *name = if_cfg->name;
4779
4780     iface = xzalloc(sizeof *iface);
4781     iface->port = port;
4782     iface->port_ifidx = port->n_ifaces;
4783     iface->name = xstrdup(name);
4784     iface->dp_ifidx = -1;
4785     iface->tag = tag_create_random();
4786     iface->delay_expires = LLONG_MAX;
4787     iface->netdev = NULL;
4788     iface->cfg = if_cfg;
4789     iface_set_lacp_defaulted(iface);
4790
4791     if (port->lacp & LACP_ACTIVE) {
4792         iface_set_lacp_expired(iface);
4793     }
4794
4795     shash_add_assert(&br->iface_by_name, iface->name, iface);
4796
4797     if (port->n_ifaces >= port->allocated_ifaces) {
4798         port->ifaces = x2nrealloc(port->ifaces, &port->allocated_ifaces,
4799                                   sizeof *port->ifaces);
4800     }
4801     port->ifaces[port->n_ifaces++] = iface;
4802     if (port->n_ifaces > 1) {
4803         br->has_bonded_ports = true;
4804     }
4805
4806     VLOG_DBG("attached network device %s to port %s", iface->name, port->name);
4807
4808     bridge_flush(br);
4809
4810     return iface;
4811 }
4812
4813 static void
4814 iface_destroy(struct iface *iface)
4815 {
4816     if (iface) {
4817         struct port *port = iface->port;
4818         struct bridge *br = port->bridge;
4819         bool del_active = port->active_iface == iface->port_ifidx;
4820         struct iface *del;
4821
4822         if (port->monitor) {
4823             netdev_monitor_remove(port->monitor, iface->netdev);
4824         }
4825
4826         shash_find_and_delete_assert(&br->iface_by_name, iface->name);
4827
4828         if (iface->dp_ifidx >= 0) {
4829             hmap_remove(&br->ifaces, &iface->dp_ifidx_node);
4830         }
4831
4832         del = port->ifaces[iface->port_ifidx] = port->ifaces[--port->n_ifaces];
4833         del->port_ifidx = iface->port_ifidx;
4834
4835         netdev_close(iface->netdev);
4836
4837         if (del_active) {
4838             ofproto_revalidate(port->bridge->ofproto, port->active_iface_tag);
4839             bond_choose_active_iface(port);
4840             bond_send_learning_packets(port);
4841         }
4842
4843         cfm_destroy(iface->cfm);
4844
4845         free(iface->name);
4846         free(iface);
4847
4848         bridge_flush(port->bridge);
4849     }
4850 }
4851
4852 static struct iface *
4853 iface_lookup(const struct bridge *br, const char *name)
4854 {
4855     return shash_find_data(&br->iface_by_name, name);
4856 }
4857
4858 static struct iface *
4859 iface_find(const char *name)
4860 {
4861     const struct bridge *br;
4862
4863     LIST_FOR_EACH (br, node, &all_bridges) {
4864         struct iface *iface = iface_lookup(br, name);
4865
4866         if (iface) {
4867             return iface;
4868         }
4869     }
4870     return NULL;
4871 }
4872
4873 static struct iface *
4874 iface_from_dp_ifidx(const struct bridge *br, uint16_t dp_ifidx)
4875 {
4876     struct iface *iface;
4877
4878     HMAP_FOR_EACH_IN_BUCKET (iface, dp_ifidx_node,
4879                              hash_int(dp_ifidx, 0), &br->ifaces) {
4880         if (iface->dp_ifidx == dp_ifidx) {
4881             return iface;
4882         }
4883     }
4884     return NULL;
4885 }
4886
4887 /* Set Ethernet address of 'iface', if one is specified in the configuration
4888  * file. */
4889 static void
4890 iface_set_mac(struct iface *iface)
4891 {
4892     uint8_t ea[ETH_ADDR_LEN];
4893
4894     if (iface->cfg->mac && eth_addr_from_string(iface->cfg->mac, ea)) {
4895         if (eth_addr_is_multicast(ea)) {
4896             VLOG_ERR("interface %s: cannot set MAC to multicast address",
4897                      iface->name);
4898         } else if (iface->dp_ifidx == ODPP_LOCAL) {
4899             VLOG_ERR("ignoring iface.%s.mac; use bridge.%s.mac instead",
4900                      iface->name, iface->name);
4901         } else {
4902             int error = netdev_set_etheraddr(iface->netdev, ea);
4903             if (error) {
4904                 VLOG_ERR("interface %s: setting MAC failed (%s)",
4905                          iface->name, strerror(error));
4906             }
4907         }
4908     }
4909 }
4910
4911 /* Sets the ofport column of 'if_cfg' to 'ofport'. */
4912 static void
4913 iface_set_ofport(const struct ovsrec_interface *if_cfg, int64_t ofport)
4914 {
4915     if (if_cfg) {
4916         ovsrec_interface_set_ofport(if_cfg, &ofport, 1);
4917     }
4918 }
4919
4920 /* Adds the 'n' key-value pairs in 'keys' in 'values' to 'shash'.
4921  *
4922  * The value strings in '*shash' are taken directly from values[], not copied,
4923  * so the caller should not modify or free them. */
4924 static void
4925 shash_from_ovs_idl_map(char **keys, char **values, size_t n,
4926                        struct shash *shash)
4927 {
4928     size_t i;
4929
4930     shash_init(shash);
4931     for (i = 0; i < n; i++) {
4932         shash_add(shash, keys[i], values[i]);
4933     }
4934 }
4935
4936 /* Creates 'keys' and 'values' arrays from 'shash'.
4937  *
4938  * Sets 'keys' and 'values' to heap allocated arrays representing the key-value
4939  * pairs in 'shash'.  The caller takes ownership of 'keys' and 'values'.  They
4940  * are populated with with strings taken directly from 'shash' and thus have
4941  * the same ownership of the key-value pairs in shash.
4942  */
4943 static void
4944 shash_to_ovs_idl_map(struct shash *shash,
4945                      char ***keys, char ***values, size_t *n)
4946 {
4947     size_t i, count;
4948     char **k, **v;
4949     struct shash_node *sn;
4950
4951     count = shash_count(shash);
4952
4953     k = xmalloc(count * sizeof *k);
4954     v = xmalloc(count * sizeof *v);
4955
4956     i = 0;
4957     SHASH_FOR_EACH(sn, shash) {
4958         k[i] = sn->name;
4959         v[i] = sn->data;
4960         i++;
4961     }
4962
4963     *n      = count;
4964     *keys   = k;
4965     *values = v;
4966 }
4967
4968 struct iface_delete_queues_cbdata {
4969     struct netdev *netdev;
4970     const struct ovsdb_datum *queues;
4971 };
4972
4973 static bool
4974 queue_ids_include(const struct ovsdb_datum *queues, int64_t target)
4975 {
4976     union ovsdb_atom atom;
4977
4978     atom.integer = target;
4979     return ovsdb_datum_find_key(queues, &atom, OVSDB_TYPE_INTEGER) != UINT_MAX;
4980 }
4981
4982 static void
4983 iface_delete_queues(unsigned int queue_id,
4984                     const struct shash *details OVS_UNUSED, void *cbdata_)
4985 {
4986     struct iface_delete_queues_cbdata *cbdata = cbdata_;
4987
4988     if (!queue_ids_include(cbdata->queues, queue_id)) {
4989         netdev_delete_queue(cbdata->netdev, queue_id);
4990     }
4991 }
4992
4993 static void
4994 iface_update_qos(struct iface *iface, const struct ovsrec_qos *qos)
4995 {
4996     if (!qos || qos->type[0] == '\0') {
4997         netdev_set_qos(iface->netdev, NULL, NULL);
4998     } else {
4999         struct iface_delete_queues_cbdata cbdata;
5000         struct shash details;
5001         size_t i;
5002
5003         /* Configure top-level Qos for 'iface'. */
5004         shash_from_ovs_idl_map(qos->key_other_config, qos->value_other_config,
5005                                qos->n_other_config, &details);
5006         netdev_set_qos(iface->netdev, qos->type, &details);
5007         shash_destroy(&details);
5008
5009         /* Deconfigure queues that were deleted. */
5010         cbdata.netdev = iface->netdev;
5011         cbdata.queues = ovsrec_qos_get_queues(qos, OVSDB_TYPE_INTEGER,
5012                                               OVSDB_TYPE_UUID);
5013         netdev_dump_queues(iface->netdev, iface_delete_queues, &cbdata);
5014
5015         /* Configure queues for 'iface'. */
5016         for (i = 0; i < qos->n_queues; i++) {
5017             const struct ovsrec_queue *queue = qos->value_queues[i];
5018             unsigned int queue_id = qos->key_queues[i];
5019
5020             shash_from_ovs_idl_map(queue->key_other_config,
5021                                    queue->value_other_config,
5022                                    queue->n_other_config, &details);
5023             netdev_set_queue(iface->netdev, queue_id, &details);
5024             shash_destroy(&details);
5025         }
5026     }
5027 }
5028
5029 static void
5030 iface_update_cfm(struct iface *iface)
5031 {
5032     size_t i;
5033     struct cfm *cfm;
5034     uint16_t *remote_mps;
5035     struct ovsrec_monitor *mon;
5036     uint8_t ea[ETH_ADDR_LEN], maid[CCM_MAID_LEN];
5037
5038     mon = iface->cfg->monitor;
5039
5040     if (!mon) {
5041         cfm_destroy(iface->cfm);
5042         iface->cfm = NULL;
5043         return;
5044     }
5045
5046     if (netdev_get_etheraddr(iface->netdev, ea)) {
5047         VLOG_WARN("interface %s: Failed to get ethernet address. "
5048                   "Skipping Monitor.", iface->name);
5049         return;
5050     }
5051
5052     if (!cfm_generate_maid(mon->md_name, mon->ma_name, maid)) {
5053         VLOG_WARN("interface %s: Failed to generate MAID.", iface->name);
5054         return;
5055     }
5056
5057     if (!iface->cfm) {
5058         iface->cfm = cfm_create();
5059     }
5060
5061     cfm           = iface->cfm;
5062     cfm->mpid     = mon->mpid;
5063     cfm->interval = mon->interval ? *mon->interval : 1000;
5064
5065     memcpy(cfm->eth_src, ea, sizeof cfm->eth_src);
5066     memcpy(cfm->maid, maid, sizeof cfm->maid);
5067
5068     remote_mps = xzalloc(mon->n_remote_mps * sizeof *remote_mps);
5069     for(i = 0; i < mon->n_remote_mps; i++) {
5070         remote_mps[i] = mon->remote_mps[i]->mpid;
5071     }
5072     cfm_update_remote_mps(cfm, remote_mps, mon->n_remote_mps);
5073     free(remote_mps);
5074
5075     if (!cfm_configure(iface->cfm)) {
5076         cfm_destroy(iface->cfm);
5077         iface->cfm = NULL;
5078     }
5079 }
5080 \f
5081 /* Port mirroring. */
5082
5083 static struct mirror *
5084 mirror_find_by_uuid(struct bridge *br, const struct uuid *uuid)
5085 {
5086     int i;
5087
5088     for (i = 0; i < MAX_MIRRORS; i++) {
5089         struct mirror *m = br->mirrors[i];
5090         if (m && uuid_equals(uuid, &m->uuid)) {
5091             return m;
5092         }
5093     }
5094     return NULL;
5095 }
5096
5097 static void
5098 mirror_reconfigure(struct bridge *br)
5099 {
5100     unsigned long *rspan_vlans;
5101     int i;
5102
5103     /* Get rid of deleted mirrors. */
5104     for (i = 0; i < MAX_MIRRORS; i++) {
5105         struct mirror *m = br->mirrors[i];
5106         if (m) {
5107             const struct ovsdb_datum *mc;
5108             union ovsdb_atom atom;
5109
5110             mc = ovsrec_bridge_get_mirrors(br->cfg, OVSDB_TYPE_UUID);
5111             atom.uuid = br->mirrors[i]->uuid;
5112             if (ovsdb_datum_find_key(mc, &atom, OVSDB_TYPE_UUID) == UINT_MAX) {
5113                 mirror_destroy(m);
5114             }
5115         }
5116     }
5117
5118     /* Add new mirrors and reconfigure existing ones. */
5119     for (i = 0; i < br->cfg->n_mirrors; i++) {
5120         struct ovsrec_mirror *cfg = br->cfg->mirrors[i];
5121         struct mirror *m = mirror_find_by_uuid(br, &cfg->header_.uuid);
5122         if (m) {
5123             mirror_reconfigure_one(m, cfg);
5124         } else {
5125             mirror_create(br, cfg);
5126         }
5127     }
5128
5129     /* Update port reserved status. */
5130     for (i = 0; i < br->n_ports; i++) {
5131         br->ports[i]->is_mirror_output_port = false;
5132     }
5133     for (i = 0; i < MAX_MIRRORS; i++) {
5134         struct mirror *m = br->mirrors[i];
5135         if (m && m->out_port) {
5136             m->out_port->is_mirror_output_port = true;
5137         }
5138     }
5139
5140     /* Update flooded vlans (for RSPAN). */
5141     rspan_vlans = NULL;
5142     if (br->cfg->n_flood_vlans) {
5143         rspan_vlans = bitmap_allocate(4096);
5144
5145         for (i = 0; i < br->cfg->n_flood_vlans; i++) {
5146             int64_t vlan = br->cfg->flood_vlans[i];
5147             if (vlan >= 0 && vlan < 4096) {
5148                 bitmap_set1(rspan_vlans, vlan);
5149                 VLOG_INFO("bridge %s: disabling learning on vlan %"PRId64,
5150                           br->name, vlan);
5151             } else {
5152                 VLOG_ERR("bridge %s: invalid value %"PRId64 "for flood VLAN",
5153                          br->name, vlan);
5154             }
5155         }
5156     }
5157     if (mac_learning_set_flood_vlans(br->ml, rspan_vlans)) {
5158         bridge_flush(br);
5159     }
5160 }
5161
5162 static void
5163 mirror_create(struct bridge *br, struct ovsrec_mirror *cfg)
5164 {
5165     struct mirror *m;
5166     size_t i;
5167
5168     for (i = 0; ; i++) {
5169         if (i >= MAX_MIRRORS) {
5170             VLOG_WARN("bridge %s: maximum of %d port mirrors reached, "
5171                       "cannot create %s", br->name, MAX_MIRRORS, cfg->name);
5172             return;
5173         }
5174         if (!br->mirrors[i]) {
5175             break;
5176         }
5177     }
5178
5179     VLOG_INFO("created port mirror %s on bridge %s", cfg->name, br->name);
5180     bridge_flush(br);
5181
5182     br->mirrors[i] = m = xzalloc(sizeof *m);
5183     m->bridge = br;
5184     m->idx = i;
5185     m->name = xstrdup(cfg->name);
5186     shash_init(&m->src_ports);
5187     shash_init(&m->dst_ports);
5188     m->vlans = NULL;
5189     m->n_vlans = 0;
5190     m->out_vlan = -1;
5191     m->out_port = NULL;
5192
5193     mirror_reconfigure_one(m, cfg);
5194 }
5195
5196 static void
5197 mirror_destroy(struct mirror *m)
5198 {
5199     if (m) {
5200         struct bridge *br = m->bridge;
5201         size_t i;
5202
5203         for (i = 0; i < br->n_ports; i++) {
5204             br->ports[i]->src_mirrors &= ~(MIRROR_MASK_C(1) << m->idx);
5205             br->ports[i]->dst_mirrors &= ~(MIRROR_MASK_C(1) << m->idx);
5206         }
5207
5208         shash_destroy(&m->src_ports);
5209         shash_destroy(&m->dst_ports);
5210         free(m->vlans);
5211
5212         m->bridge->mirrors[m->idx] = NULL;
5213         free(m->name);
5214         free(m);
5215
5216         bridge_flush(br);
5217     }
5218 }
5219
5220 static void
5221 mirror_collect_ports(struct mirror *m, struct ovsrec_port **ports, int n_ports,
5222                      struct shash *names)
5223 {
5224     size_t i;
5225
5226     for (i = 0; i < n_ports; i++) {
5227         const char *name = ports[i]->name;
5228         if (port_lookup(m->bridge, name)) {
5229             shash_add_once(names, name, NULL);
5230         } else {
5231             VLOG_WARN("bridge %s: mirror %s cannot match on nonexistent "
5232                       "port %s", m->bridge->name, m->name, name);
5233         }
5234     }
5235 }
5236
5237 static size_t
5238 mirror_collect_vlans(struct mirror *m, const struct ovsrec_mirror *cfg,
5239                      int **vlans)
5240 {
5241     size_t n_vlans;
5242     size_t i;
5243
5244     *vlans = xmalloc(sizeof **vlans * cfg->n_select_vlan);
5245     n_vlans = 0;
5246     for (i = 0; i < cfg->n_select_vlan; i++) {
5247         int64_t vlan = cfg->select_vlan[i];
5248         if (vlan < 0 || vlan > 4095) {
5249             VLOG_WARN("bridge %s: mirror %s selects invalid VLAN %"PRId64,
5250                       m->bridge->name, m->name, vlan);
5251         } else {
5252             (*vlans)[n_vlans++] = vlan;
5253         }
5254     }
5255     return n_vlans;
5256 }
5257
5258 static bool
5259 vlan_is_mirrored(const struct mirror *m, int vlan)
5260 {
5261     size_t i;
5262
5263     for (i = 0; i < m->n_vlans; i++) {
5264         if (m->vlans[i] == vlan) {
5265             return true;
5266         }
5267     }
5268     return false;
5269 }
5270
5271 static bool
5272 port_trunks_any_mirrored_vlan(const struct mirror *m, const struct port *p)
5273 {
5274     size_t i;
5275
5276     for (i = 0; i < m->n_vlans; i++) {
5277         if (port_trunks_vlan(p, m->vlans[i])) {
5278             return true;
5279         }
5280     }
5281     return false;
5282 }
5283
5284 static void
5285 mirror_reconfigure_one(struct mirror *m, struct ovsrec_mirror *cfg)
5286 {
5287     struct shash src_ports, dst_ports;
5288     mirror_mask_t mirror_bit;
5289     struct port *out_port;
5290     int out_vlan;
5291     size_t n_vlans;
5292     int *vlans;
5293     size_t i;
5294
5295     /* Set name. */
5296     if (strcmp(cfg->name, m->name)) {
5297         free(m->name);
5298         m->name = xstrdup(cfg->name);
5299     }
5300
5301     /* Get output port. */
5302     if (cfg->output_port) {
5303         out_port = port_lookup(m->bridge, cfg->output_port->name);
5304         if (!out_port) {
5305             VLOG_ERR("bridge %s: mirror %s outputs to port not on bridge",
5306                      m->bridge->name, m->name);
5307             mirror_destroy(m);
5308             return;
5309         }
5310         out_vlan = -1;
5311
5312         if (cfg->output_vlan) {
5313             VLOG_ERR("bridge %s: mirror %s specifies both output port and "
5314                      "output vlan; ignoring output vlan",
5315                      m->bridge->name, m->name);
5316         }
5317     } else if (cfg->output_vlan) {
5318         out_port = NULL;
5319         out_vlan = *cfg->output_vlan;
5320     } else {
5321         VLOG_ERR("bridge %s: mirror %s does not specify output; ignoring",
5322                  m->bridge->name, m->name);
5323         mirror_destroy(m);
5324         return;
5325     }
5326
5327     shash_init(&src_ports);
5328     shash_init(&dst_ports);
5329     if (cfg->select_all) {
5330         for (i = 0; i < m->bridge->n_ports; i++) {
5331             const char *name = m->bridge->ports[i]->name;
5332             shash_add_once(&src_ports, name, NULL);
5333             shash_add_once(&dst_ports, name, NULL);
5334         }
5335         vlans = NULL;
5336         n_vlans = 0;
5337     } else {
5338         /* Get ports, and drop duplicates and ports that don't exist. */
5339         mirror_collect_ports(m, cfg->select_src_port, cfg->n_select_src_port,
5340                              &src_ports);
5341         mirror_collect_ports(m, cfg->select_dst_port, cfg->n_select_dst_port,
5342                              &dst_ports);
5343
5344         /* Get all the vlans, and drop duplicate and invalid vlans. */
5345         n_vlans = mirror_collect_vlans(m, cfg, &vlans);
5346     }
5347
5348     /* Update mirror data. */
5349     if (!shash_equal_keys(&m->src_ports, &src_ports)
5350         || !shash_equal_keys(&m->dst_ports, &dst_ports)
5351         || m->n_vlans != n_vlans
5352         || memcmp(m->vlans, vlans, sizeof *vlans * n_vlans)
5353         || m->out_port != out_port
5354         || m->out_vlan != out_vlan) {
5355         bridge_flush(m->bridge);
5356     }
5357     shash_swap(&m->src_ports, &src_ports);
5358     shash_swap(&m->dst_ports, &dst_ports);
5359     free(m->vlans);
5360     m->vlans = vlans;
5361     m->n_vlans = n_vlans;
5362     m->out_port = out_port;
5363     m->out_vlan = out_vlan;
5364
5365     /* Update ports. */
5366     mirror_bit = MIRROR_MASK_C(1) << m->idx;
5367     for (i = 0; i < m->bridge->n_ports; i++) {
5368         struct port *port = m->bridge->ports[i];
5369
5370         if (shash_find(&m->src_ports, port->name)
5371             || (m->n_vlans
5372                 && (!port->vlan
5373                     ? port_trunks_any_mirrored_vlan(m, port)
5374                     : vlan_is_mirrored(m, port->vlan)))) {
5375             port->src_mirrors |= mirror_bit;
5376         } else {
5377             port->src_mirrors &= ~mirror_bit;
5378         }
5379
5380         if (shash_find(&m->dst_ports, port->name)) {
5381             port->dst_mirrors |= mirror_bit;
5382         } else {
5383             port->dst_mirrors &= ~mirror_bit;
5384         }
5385     }
5386
5387     /* Clean up. */
5388     shash_destroy(&src_ports);
5389     shash_destroy(&dst_ports);
5390 }