ofproto/ofproto-dpif.c

   1 /*
   2  * Copyright (c) 2009, 2010, 2011, 2012, 2013 Nicira, Inc.
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 #include <config.h>
  18
  19 #include "ofproto/ofproto-dpif.h"
  20 #include "ofproto/ofproto-provider.h"
  21
  22 #include <errno.h>
  23
  24 #include "bfd.h"
  25 #include "bond.h"
  26 #include "bundle.h"
  27 #include "byte-order.h"
  28 #include "connmgr.h"
  29 #include "coverage.h"
  30 #include "cfm.h"
  31 #include "dpif.h"
  32 #include "dynamic-string.h"
  33 #include "fail-open.h"
  34 #include "hmapx.h"
  35 #include "lacp.h"
  36 #include "learn.h"
  37 #include "mac-learning.h"
  38 #include "meta-flow.h"
  39 #include "multipath.h"
  40 #include "netdev-vport.h"
  41 #include "netdev.h"
  42 #include "netlink.h"
  43 #include "nx-match.h"
  44 #include "odp-util.h"
  45 #include "odp-execute.h"
  46 #include "ofp-util.h"
  47 #include "ofpbuf.h"
  48 #include "ofp-actions.h"
  49 #include "ofp-parse.h"
  50 #include "ofp-print.h"
  51 #include "ofproto-dpif-governor.h"
  52 #include "ofproto-dpif-ipfix.h"
  53 #include "ofproto-dpif-mirror.h"
  54 #include "ofproto-dpif-sflow.h"
  55 #include "ofproto-dpif-xlate.h"
  56 #include "poll-loop.h"
  57 #include "simap.h"
  58 #include "smap.h"
  59 #include "timer.h"
  60 #include "tunnel.h"
  61 #include "unaligned.h"
  62 #include "unixctl.h"
  63 #include "vlan-bitmap.h"
  64 #include "vlog.h"
  65
  66 VLOG_DEFINE_THIS_MODULE(ofproto_dpif);
  67
  68 COVERAGE_DEFINE(ofproto_dpif_expired);
  69 COVERAGE_DEFINE(facet_changed_rule);
  70 COVERAGE_DEFINE(facet_revalidate);
  71 COVERAGE_DEFINE(facet_unexpected);
  72 COVERAGE_DEFINE(facet_suppress);
  73 COVERAGE_DEFINE(subfacet_install_fail);
  74
  75 /* Number of implemented OpenFlow tables. */
  76 enum { N_TABLES = 255 };
  77 enum { TBL_INTERNAL = N_TABLES - 1 };    /* Used for internal hidden rules. */
  78 BUILD_ASSERT_DECL(N_TABLES >= 2 && N_TABLES <= 255);
  79
  80 struct flow_miss;
  81 struct facet;
  82
  83 static struct rule_dpif *rule_dpif_lookup(struct ofproto_dpif *,
  84                                           const struct flow *,
  85                                           struct flow_wildcards *wc);
  86
  87 static void rule_get_stats(struct rule *, uint64_t *packets, uint64_t *bytes);
  88 static void rule_invalidate(const struct rule_dpif *);
  89
  90 struct ofbundle {
  91     struct hmap_node hmap_node; /* In struct ofproto's "bundles" hmap. */
  92     struct ofproto_dpif *ofproto; /* Owning ofproto. */
  93     void *aux;                  /* Key supplied by ofproto's client. */
  94     char *name;                 /* Identifier for log messages. */
  95
  96     /* Configuration. */
  97     struct list ports;          /* Contains "struct ofport"s. */
  98     enum port_vlan_mode vlan_mode; /* VLAN mode */
  99     int vlan;                   /* -1=trunk port, else a 12-bit VLAN ID. */
 100     unsigned long *trunks;      /* Bitmap of trunked VLANs, if 'vlan' == -1.
 101                                  * NULL if all VLANs are trunked. */
 102     struct lacp *lacp;          /* LACP if LACP is enabled, otherwise NULL. */
 103     struct bond *bond;          /* Nonnull iff more than one port. */
 104     bool use_priority_tags;     /* Use 802.1p tag for frames in VLAN 0? */
 105
 106     /* Status. */
 107     bool floodable;          /* True if no port has OFPUTIL_PC_NO_FLOOD set. */
 108 };
 109
 110 static void bundle_remove(struct ofport *);
 111 static void bundle_update(struct ofbundle *);
 112 static void bundle_destroy(struct ofbundle *);
 113 static void bundle_del_port(struct ofport_dpif *);
 114 static void bundle_run(struct ofbundle *);
 115 static void bundle_wait(struct ofbundle *);
 116
 117 static void stp_run(struct ofproto_dpif *ofproto);
 118 static void stp_wait(struct ofproto_dpif *ofproto);
 119 static int set_stp_port(struct ofport *,
 120                         const struct ofproto_port_stp_settings *);
 121
 122 static void compose_slow_path(const struct ofproto_dpif *, const struct flow *,
 123                               enum slow_path_reason,
 124                               uint64_t *stub, size_t stub_size,
 125                               const struct nlattr **actionsp,
 126                               size_t *actions_lenp);
 127
 128 /* A subfacet (see "struct subfacet" below) has three possible installation
 129  * states:
 130  *
 131  *   - SF_NOT_INSTALLED: Not installed in the datapath.  This will only be the
 132  *     case just after the subfacet is created, just before the subfacet is
 133  *     destroyed, or if the datapath returns an error when we try to install a
 134  *     subfacet.
 135  *
 136  *   - SF_FAST_PATH: The subfacet's actions are installed in the datapath.
 137  *
 138  *   - SF_SLOW_PATH: An action that sends every packet for the subfacet through
 139  *     ofproto_dpif is installed in the datapath.
 140  */
 141 enum subfacet_path {
 142     SF_NOT_INSTALLED,           /* No datapath flow for this subfacet. */
 143     SF_FAST_PATH,               /* Full actions are installed. */
 144     SF_SLOW_PATH,               /* Send-to-userspace action is installed. */
 145 };
 146
 147 /* A dpif flow and actions associated with a facet.
 148  *
 149  * See also the large comment on struct facet. */
 150 struct subfacet {
 151     /* Owners. */
 152     struct hmap_node hmap_node; /* In struct ofproto_dpif 'subfacets' list. */
 153     struct list list_node;      /* In struct facet's 'facets' list. */
 154     struct facet *facet;        /* Owning facet. */
 155     struct dpif_backer *backer; /* Owning backer. */
 156
 157     enum odp_key_fitness key_fitness;
 158     struct nlattr *key;
 159     int key_len;
 160
 161     long long int used;         /* Time last used; time created if not used. */
 162     long long int created;      /* Time created. */
 163
 164     uint64_t dp_packet_count;   /* Last known packet count in the datapath. */
 165     uint64_t dp_byte_count;     /* Last known byte count in the datapath. */
 166
 167     enum subfacet_path path;    /* Installed in datapath? */
 168 };
 169
 170 #define SUBFACET_DESTROY_MAX_BATCH 50
 171
 172 static struct subfacet *subfacet_create(struct facet *, struct flow_miss *miss,
 173                                         long long int now);
 174 static struct subfacet *subfacet_find(struct dpif_backer *,
 175                                       const struct nlattr *key, size_t key_len,
 176                                       uint32_t key_hash);
 177 static void subfacet_destroy(struct subfacet *);
 178 static void subfacet_destroy__(struct subfacet *);
 179 static void subfacet_destroy_batch(struct dpif_backer *,
 180                                    struct subfacet **, int n);
 181 static void subfacet_reset_dp_stats(struct subfacet *,
 182                                     struct dpif_flow_stats *);
 183 static void subfacet_update_stats(struct subfacet *,
 184                                   const struct dpif_flow_stats *);
 185 static int subfacet_install(struct subfacet *,
 186                             const struct ofpbuf *odp_actions,
 187                             struct dpif_flow_stats *);
 188 static void subfacet_uninstall(struct subfacet *);
 189
 190 /* A unique, non-overlapping instantiation of an OpenFlow flow.
 191  *
 192  * A facet associates a "struct flow", which represents the Open vSwitch
 193  * userspace idea of an exact-match flow, with one or more subfacets.
 194  * While the facet is created based on an exact-match flow, it is stored
 195  * within the ofproto based on the wildcards that could be expressed
 196  * based on the flow table and other configuration.  (See the 'wc'
 197  * description in "struct xlate_out" for more details.)
 198  *
 199  * Each subfacet tracks the datapath's idea of the flow equivalent to
 200  * the facet.  When the kernel module (or other dpif implementation) and
 201  * Open vSwitch userspace agree on the definition of a flow key, there
 202  * is exactly one subfacet per facet.  If the dpif implementation
 203  * supports more-specific flow matching than userspace, however, a facet
 204  * can have more than one subfacet.  Examples include the dpif
 205  * implementation not supporting the same wildcards as userspace or some
 206  * distinction in flow that userspace simply doesn't understand.
 207  *
 208  * Flow expiration works in terms of subfacets, so a facet must have at
 209  * least one subfacet or it will never expire, leaking memory. */
 210 struct facet {
 211     /* Owners. */
 212     struct hmap_node hmap_node;  /* In owning ofproto's 'facets' hmap. */
 213     struct ofproto_dpif *ofproto;
 214
 215     /* Owned data. */
 216     struct list subfacets;
 217     long long int used;         /* Time last used; time created if not used. */
 218
 219     /* Key. */
 220     struct flow flow;           /* Flow of the creating subfacet. */
 221     struct cls_rule cr;         /* In 'ofproto_dpif's facets classifier. */
 222
 223     /* These statistics:
 224      *
 225      *   - Do include packets and bytes sent "by hand", e.g. with
 226      *     dpif_execute().
 227      *
 228      *   - Do include packets and bytes that were obtained from the datapath
 229      *     when a subfacet's statistics were reset (e.g. dpif_flow_put() with
 230      *     DPIF_FP_ZERO_STATS).
 231      *
 232      *   - Do not include packets or bytes that can be obtained from the
 233      *     datapath for any existing subfacet.
 234      */
 235     uint64_t packet_count;       /* Number of packets received. */
 236     uint64_t byte_count;         /* Number of bytes received. */
 237
 238     /* Resubmit statistics. */
 239     uint64_t prev_packet_count;  /* Number of packets from last stats push. */
 240     uint64_t prev_byte_count;    /* Number of bytes from last stats push. */
 241     long long int prev_used;     /* Used time from last stats push. */
 242
 243     /* Accounting. */
 244     uint64_t accounted_bytes;    /* Bytes processed by facet_account(). */
 245     struct netflow_flow nf_flow; /* Per-flow NetFlow tracking data. */
 246     uint8_t tcp_flags;           /* TCP flags seen for this 'rule'. */
 247
 248     struct xlate_out xout;
 249     bool fail_open;              /* Facet matched the fail open rule. */
 250
 251     /* Storage for a single subfacet, to reduce malloc() time and space
 252      * overhead.  (A facet always has at least one subfacet and in the common
 253      * case has exactly one subfacet.  However, 'one_subfacet' may not
 254      * always be valid, since it could have been removed after newer
 255      * subfacets were pushed onto the 'subfacets' list.) */
 256     struct subfacet one_subfacet;
 257
 258     long long int learn_rl;      /* Rate limiter for facet_learn(). */
 259 };
 260
 261 static struct facet *facet_create(const struct flow_miss *, struct rule_dpif *,
 262                                   struct xlate_out *,
 263                                   struct dpif_flow_stats *);
 264 static void facet_remove(struct facet *);
 265 static void facet_free(struct facet *);
 266
 267 static struct facet *facet_find(struct ofproto_dpif *, const struct flow *);
 268 static struct facet *facet_lookup_valid(struct ofproto_dpif *,
 269                                         const struct flow *);
 270 static bool facet_revalidate(struct facet *);
 271 static bool facet_check_consistency(struct facet *);
 272
 273 static void facet_flush_stats(struct facet *);
 274
 275 static void facet_reset_counters(struct facet *);
 276 static void facet_push_stats(struct facet *, bool may_learn);
 277 static void facet_learn(struct facet *);
 278 static void facet_account(struct facet *);
 279 static void push_all_stats(void);
 280
 281 static bool facet_is_controller_flow(struct facet *);
 282
 283 struct ofport_dpif {
 284     struct hmap_node odp_port_node; /* In dpif_backer's "odp_to_ofport_map". */
 285     struct ofport up;
 286
 287     odp_port_t odp_port;
 288     struct ofbundle *bundle;    /* Bundle that contains this port, if any. */
 289     struct list bundle_node;    /* In struct ofbundle's "ports" list. */
 290     struct cfm *cfm;            /* Connectivity Fault Management, if any. */
 291     struct bfd *bfd;            /* BFD, if any. */
 292     tag_type tag;               /* Tag associated with this port. */
 293     bool may_enable;            /* May be enabled in bonds. */
 294     bool is_tunnel;             /* This port is a tunnel. */
 295     long long int carrier_seq;  /* Carrier status changes. */
 296     struct ofport_dpif *peer;   /* Peer if patch port. */
 297
 298     /* Spanning tree. */
 299     struct stp_port *stp_port;  /* Spanning Tree Protocol, if any. */
 300     enum stp_state stp_state;   /* Always STP_DISABLED if STP not in use. */
 301     long long int stp_state_entered;
 302
 303     struct hmap priorities;     /* Map of attached 'priority_to_dscp's. */
 304
 305     /* Linux VLAN device support (e.g. "eth0.10" for VLAN 10.)
 306      *
 307      * This is deprecated.  It is only for compatibility with broken device
 308      * drivers in old versions of Linux that do not properly support VLANs when
 309      * VLAN devices are not used.  When broken device drivers are no longer in
 310      * widespread use, we will delete these interfaces. */
 311     ofp_port_t realdev_ofp_port;
 312     int vlandev_vid;
 313 };
 314
 315 /* Node in 'ofport_dpif''s 'priorities' map.  Used to maintain a map from
 316  * 'priority' (the datapath's term for QoS queue) to the dscp bits which all
 317  * traffic egressing the 'ofport' with that priority should be marked with. */
 318 struct priority_to_dscp {
 319     struct hmap_node hmap_node; /* Node in 'ofport_dpif''s 'priorities' map. */
 320     uint32_t priority;          /* Priority of this queue (see struct flow). */
 321
 322     uint8_t dscp;               /* DSCP bits to mark outgoing traffic with. */
 323 };
 324
 325 /* Linux VLAN device support (e.g. "eth0.10" for VLAN 10.)
 326  *
 327  * This is deprecated.  It is only for compatibility with broken device drivers
 328  * in old versions of Linux that do not properly support VLANs when VLAN
 329  * devices are not used.  When broken device drivers are no longer in
 330  * widespread use, we will delete these interfaces. */
 331 struct vlan_splinter {
 332     struct hmap_node realdev_vid_node;
 333     struct hmap_node vlandev_node;
 334     ofp_port_t realdev_ofp_port;
 335     ofp_port_t vlandev_ofp_port;
 336     int vid;
 337 };
 338
 339 static bool vsp_adjust_flow(const struct ofproto_dpif *, struct flow *);
 340 static void vsp_remove(struct ofport_dpif *);
 341 static void vsp_add(struct ofport_dpif *, ofp_port_t realdev_ofp_port, int vid);
 342
 343 static odp_port_t ofp_port_to_odp_port(const struct ofproto_dpif *,
 344                                        ofp_port_t);
 345
 346 static ofp_port_t odp_port_to_ofp_port(const struct ofproto_dpif *,
 347                                        odp_port_t);
 348
 349 static struct ofport_dpif *
 350 ofport_dpif_cast(const struct ofport *ofport)
 351 {
 352     return ofport ? CONTAINER_OF(ofport, struct ofport_dpif, up) : NULL;
 353 }
 354
 355 static void port_run(struct ofport_dpif *);
 356 static void port_run_fast(struct ofport_dpif *);
 357 static void port_wait(struct ofport_dpif *);
 358 static int set_bfd(struct ofport *, const struct smap *);
 359 static int set_cfm(struct ofport *, const struct cfm_settings *);
 360 static void ofport_clear_priorities(struct ofport_dpif *);
 361 static void ofport_update_peer(struct ofport_dpif *);
 362 static void run_fast_rl(void);
 363
 364 struct dpif_completion {
 365     struct list list_node;
 366     struct ofoperation *op;
 367 };
 368
 369 /* Extra information about a classifier table.
 370  * Currently used just for optimized flow revalidation. */
 371 struct table_dpif {
 372     /* If either of these is nonnull, then this table has a form that allows
 373      * flows to be tagged to avoid revalidating most flows for the most common
 374      * kinds of flow table changes. */
 375     struct cls_table *catchall_table; /* Table that wildcards all fields. */
 376     struct cls_table *other_table;    /* Table with any other wildcard set. */
 377     uint32_t basis;                   /* Keeps each table's tags separate. */
 378 };
 379
 380 /* Reasons that we might need to revalidate every facet, and corresponding
 381  * coverage counters.
 382  *
 383  * A value of 0 means that there is no need to revalidate.
 384  *
 385  * It would be nice to have some cleaner way to integrate with coverage
 386  * counters, but with only a few reasons I guess this is good enough for
 387  * now. */
 388 enum revalidate_reason {
 389     REV_RECONFIGURE = 1,       /* Switch configuration changed. */
 390     REV_STP,                   /* Spanning tree protocol port status change. */
 391     REV_PORT_TOGGLED,          /* Port enabled or disabled by CFM, LACP, ...*/
 392     REV_FLOW_TABLE,            /* Flow table changed. */
 393     REV_INCONSISTENCY          /* Facet self-check failed. */
 394 };
 395 COVERAGE_DEFINE(rev_reconfigure);
 396 COVERAGE_DEFINE(rev_stp);
 397 COVERAGE_DEFINE(rev_port_toggled);
 398 COVERAGE_DEFINE(rev_flow_table);
 399 COVERAGE_DEFINE(rev_inconsistency);
 400
 401 /* Drop keys are odp flow keys which have drop flows installed in the kernel.
 402  * These are datapath flows which have no associated ofproto, if they did we
 403  * would use facets. */
 404 struct drop_key {
 405     struct hmap_node hmap_node;
 406     struct nlattr *key;
 407     size_t key_len;
 408 };
 409
 410 struct avg_subfacet_rates {
 411     double add_rate;   /* Moving average of new flows created per minute. */
 412     double del_rate;   /* Moving average of flows deleted per minute. */
 413 };
 414
 415 /* All datapaths of a given type share a single dpif backer instance. */
 416 struct dpif_backer {
 417     char *type;
 418     int refcount;
 419     struct dpif *dpif;
 420     struct timer next_expiration;
 421     struct hmap odp_to_ofport_map; /* ODP port to ofport mapping. */
 422
 423     struct simap tnl_backers;      /* Set of dpif ports backing tunnels. */
 424
 425     /* Facet revalidation flags applying to facets which use this backer. */
 426     enum revalidate_reason need_revalidate; /* Revalidate every facet. */
 427     struct tag_set revalidate_set; /* Revalidate only matching facets. */
 428
 429     struct hmap drop_keys; /* Set of dropped odp keys. */
 430     bool recv_set_enable; /* Enables or disables receiving packets. */
 431
 432     struct hmap subfacets;
 433     struct governor *governor;
 434
 435     /* Subfacet statistics.
 436      *
 437      * These keep track of the total number of subfacets added and deleted and
 438      * flow life span.  They are useful for computing the flow rates stats
 439      * exposed via "ovs-appctl dpif/show".  The goal is to learn about
 440      * traffic patterns in ways that we can use later to improve Open vSwitch
 441      * performance in new situations.  */
 442     long long int created;           /* Time when it is created. */
 443     unsigned max_n_subfacet;         /* Maximum number of flows */
 444     unsigned avg_n_subfacet;         /* Average number of flows. */
 445     long long int avg_subfacet_life; /* Average life span of subfacets. */
 446
 447     /* The average number of subfacets... */
 448     struct avg_subfacet_rates hourly;   /* ...over the last hour. */
 449     struct avg_subfacet_rates daily;    /* ...over the last day. */
 450     struct avg_subfacet_rates lifetime; /* ...over the switch lifetime. */
 451     long long int last_minute;          /* Last time 'hourly' was updated. */
 452
 453     /* Number of subfacets added or deleted since 'last_minute'. */
 454     unsigned subfacet_add_count;
 455     unsigned subfacet_del_count;
 456
 457     /* Number of subfacets added or deleted from 'created' to 'last_minute.' */
 458     unsigned long long int total_subfacet_add_count;
 459     unsigned long long int total_subfacet_del_count;
 460 };
 461
 462 /* All existing ofproto_backer instances, indexed by ofproto->up.type. */
 463 static struct shash all_dpif_backers = SHASH_INITIALIZER(&all_dpif_backers);
 464
 465 static void drop_key_clear(struct dpif_backer *);
 466 static struct ofport_dpif *
 467 odp_port_to_ofport(const struct dpif_backer *, odp_port_t odp_port);
 468 static void update_moving_averages(struct dpif_backer *backer);
 469
 470 struct ofproto_dpif {
 471     struct hmap_node all_ofproto_dpifs_node; /* In 'all_ofproto_dpifs'. */
 472     struct ofproto up;
 473     struct dpif_backer *backer;
 474
 475     /* Special OpenFlow rules. */
 476     struct rule_dpif *miss_rule; /* Sends flow table misses to controller. */
 477     struct rule_dpif *no_packet_in_rule; /* Drops flow table misses. */
 478     struct rule_dpif *drop_frags_rule; /* Used in OFPC_FRAG_DROP mode. */
 479
 480     /* Bridging. */
 481     struct netflow *netflow;
 482     struct dpif_sflow *sflow;
 483     struct dpif_ipfix *ipfix;
 484     struct hmap bundles;        /* Contains "struct ofbundle"s. */
 485     struct mac_learning *ml;
 486     bool has_bonded_bundles;
 487     struct mbridge *mbridge;
 488
 489     /* Facets. */
 490     struct classifier facets;     /* Contains 'struct facet's. */
 491     long long int consistency_rl;
 492
 493     /* Revalidation. */
 494     struct table_dpif tables[N_TABLES];
 495
 496     /* Support for debugging async flow mods. */
 497     struct list completions;
 498
 499     struct netdev_stats stats; /* To account packets generated and consumed in
 500                                 * userspace. */
 501
 502     /* Spanning tree. */
 503     struct stp *stp;
 504     long long int stp_last_tick;
 505
 506     /* VLAN splinters. */
 507     struct hmap realdev_vid_map; /* (realdev,vid) -> vlandev. */
 508     struct hmap vlandev_map;     /* vlandev -> (realdev,vid). */
 509
 510     /* Ports. */
 511     struct sset ports;             /* Set of standard port names. */
 512     struct sset ghost_ports;       /* Ports with no datapath port. */
 513     struct sset port_poll_set;     /* Queued names for port_poll() reply. */
 514     int port_poll_errno;           /* Last errno for port_poll() reply. */
 515
 516     /* Per ofproto's dpif stats. */
 517     uint64_t n_hit;
 518     uint64_t n_missed;
 519 };
 520
 521 /* Defer flow mod completion until "ovs-appctl ofproto/unclog"?  (Useful only
 522  * for debugging the asynchronous flow_mod implementation.) */
 523 static bool clogged;
 524
 525 /* By default, flows in the datapath are wildcarded (megaflows).  They
 526  * may be disabled with the "ovs-appctl dpif/disable-megaflows" command. */
 527 static bool enable_megaflows = true;
 528
 529 /* All existing ofproto_dpif instances, indexed by ->up.name. */
 530 static struct hmap all_ofproto_dpifs = HMAP_INITIALIZER(&all_ofproto_dpifs);
 531
 532 static void ofproto_dpif_unixctl_init(void);
 533
 534 static inline struct ofproto_dpif *
 535 ofproto_dpif_cast(const struct ofproto *ofproto)
 536 {
 537     ovs_assert(ofproto->ofproto_class == &ofproto_dpif_class);
 538     return CONTAINER_OF(ofproto, struct ofproto_dpif, up);
 539 }
 540
 541 static struct ofport_dpif *get_ofp_port(const struct ofproto_dpif *ofproto,
 542                                         ofp_port_t ofp_port);
 543
 544 /* Upcalls. */
 545 #define FLOW_MISS_MAX_BATCH 50
 546 static int handle_upcalls(struct dpif_backer *, unsigned int max_batch);
 547
 548 /* Flow expiration. */
 549 static int expire(struct dpif_backer *);
 550
 551 /* NetFlow. */
 552 static void send_netflow_active_timeouts(struct ofproto_dpif *);
 553
 554 /* Utilities. */
 555 static int send_packet(const struct ofport_dpif *, struct ofpbuf *packet);
 556
 557 /* Global variables. */
 558 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
 559
 560 /* Initial mappings of port to bridge mappings. */
 561 static struct shash init_ofp_ports = SHASH_INITIALIZER(&init_ofp_ports);
 562
 563 int
 564 ofproto_dpif_flow_mod(struct ofproto_dpif *ofproto,
 565                       struct ofputil_flow_mod *fm)
 566 {
 567     return ofproto_flow_mod(&ofproto->up, fm);
 568 }
 569
 570 void
 571 ofproto_dpif_send_packet_in(struct ofproto_dpif *ofproto,
 572                             struct ofputil_packet_in *pin)
 573 {
 574     connmgr_send_packet_in(ofproto->up.connmgr, pin);
 575 }
 576 \f
 577 /* Factory functions. */
 578
 579 static void
 580 init(const struct shash *iface_hints)
 581 {
 582     struct shash_node *node;
 583
 584     /* Make a local copy, since we don't own 'iface_hints' elements. */
 585     SHASH_FOR_EACH(node, iface_hints) {
 586         const struct iface_hint *orig_hint = node->data;
 587         struct iface_hint *new_hint = xmalloc(sizeof *new_hint);
 588
 589         new_hint->br_name = xstrdup(orig_hint->br_name);
 590         new_hint->br_type = xstrdup(orig_hint->br_type);
 591         new_hint->ofp_port = orig_hint->ofp_port;
 592
 593         shash_add(&init_ofp_ports, node->name, new_hint);
 594     }
 595 }
 596
 597 static void
 598 enumerate_types(struct sset *types)
 599 {
 600     dp_enumerate_types(types);
 601 }
 602
 603 static int
 604 enumerate_names(const char *type, struct sset *names)
 605 {
 606     struct ofproto_dpif *ofproto;
 607
 608     sset_clear(names);
 609     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
 610         if (strcmp(type, ofproto->up.type)) {
 611             continue;
 612         }
 613         sset_add(names, ofproto->up.name);
 614     }
 615
 616     return 0;
 617 }
 618
 619 static int
 620 del(const char *type, const char *name)
 621 {
 622     struct dpif *dpif;
 623     int error;
 624
 625     error = dpif_open(name, type, &dpif);
 626     if (!error) {
 627         error = dpif_delete(dpif);
 628         dpif_close(dpif);
 629     }
 630     return error;
 631 }
 632 \f
 633 static const char *
 634 port_open_type(const char *datapath_type, const char *port_type)
 635 {
 636     return dpif_port_open_type(datapath_type, port_type);
 637 }
 638
 639 /* Type functions. */
 640
 641 static struct ofproto_dpif *
 642 lookup_ofproto_dpif_by_port_name(const char *name)
 643 {
 644     struct ofproto_dpif *ofproto;
 645
 646     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
 647         if (sset_contains(&ofproto->ports, name)) {
 648             return ofproto;
 649         }
 650     }
 651
 652     return NULL;
 653 }
 654
 655 static int
 656 type_run(const char *type)
 657 {
 658     static long long int push_timer = LLONG_MIN;
 659     struct dpif_backer *backer;
 660     char *devname;
 661     int error;
 662
 663     backer = shash_find_data(&all_dpif_backers, type);
 664     if (!backer) {
 665         /* This is not necessarily a problem, since backers are only
 666          * created on demand. */
 667         return 0;
 668     }
 669
 670     dpif_run(backer->dpif);
 671
 672     /* The most natural place to push facet statistics is when they're pulled
 673      * from the datapath.  However, when there are many flows in the datapath,
 674      * this expensive operation can occur so frequently, that it reduces our
 675      * ability to quickly set up flows.  To reduce the cost, we push statistics
 676      * here instead. */
 677     if (time_msec() > push_timer) {
 678         push_timer = time_msec() + 2000;
 679         push_all_stats();
 680     }
 681
 682     /* If vswitchd started with other_config:flow_restore_wait set as "true",
 683      * and the configuration has now changed to "false", enable receiving
 684      * packets from the datapath. */
 685     if (!backer->recv_set_enable && !ofproto_get_flow_restore_wait()) {
 686         backer->recv_set_enable = true;
 687
 688         error = dpif_recv_set(backer->dpif, backer->recv_set_enable);
 689         if (error) {
 690             VLOG_ERR("Failed to enable receiving packets in dpif.");
 691             return error;
 692         }
 693         dpif_flow_flush(backer->dpif);
 694         backer->need_revalidate = REV_RECONFIGURE;
 695     }
 696
 697     if (backer->need_revalidate
 698         || !tag_set_is_empty(&backer->revalidate_set)) {
 699         struct tag_set revalidate_set = backer->revalidate_set;
 700         bool need_revalidate = backer->need_revalidate;
 701         struct ofproto_dpif *ofproto;
 702         struct simap_node *node;
 703         struct simap tmp_backers;
 704
 705         /* Handle tunnel garbage collection. */
 706         simap_init(&tmp_backers);
 707         simap_swap(&backer->tnl_backers, &tmp_backers);
 708
 709         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
 710             struct ofport_dpif *iter;
 711
 712             if (backer != ofproto->backer) {
 713                 continue;
 714             }
 715
 716             HMAP_FOR_EACH (iter, up.hmap_node, &ofproto->up.ports) {
 717                 char namebuf[NETDEV_VPORT_NAME_BUFSIZE];
 718                 const char *dp_port;
 719
 720                 if (!iter->is_tunnel) {
 721                     continue;
 722                 }
 723
 724                 dp_port = netdev_vport_get_dpif_port(iter->up.netdev,
 725                                                      namebuf, sizeof namebuf);
 726                 node = simap_find(&tmp_backers, dp_port);
 727                 if (node) {
 728                     simap_put(&backer->tnl_backers, dp_port, node->data);
 729                     simap_delete(&tmp_backers, node);
 730                     node = simap_find(&backer->tnl_backers, dp_port);
 731                 } else {
 732                     node = simap_find(&backer->tnl_backers, dp_port);
 733                     if (!node) {
 734                         odp_port_t odp_port = ODPP_NONE;
 735
 736                         if (!dpif_port_add(backer->dpif, iter->up.netdev,
 737                                            &odp_port)) {
 738                             simap_put(&backer->tnl_backers, dp_port,
 739                                       odp_to_u32(odp_port));
 740                             node = simap_find(&backer->tnl_backers, dp_port);
 741                         }
 742                     }
 743                 }
 744
 745                 iter->odp_port = node ? u32_to_odp(node->data) : ODPP_NONE;
 746                 if (tnl_port_reconfigure(iter, iter->up.netdev,
 747                                          iter->odp_port)) {
 748                     backer->need_revalidate = REV_RECONFIGURE;
 749                 }
 750             }
 751         }
 752
 753         SIMAP_FOR_EACH (node, &tmp_backers) {
 754             dpif_port_del(backer->dpif, u32_to_odp(node->data));
 755         }
 756         simap_destroy(&tmp_backers);
 757
 758         switch (backer->need_revalidate) {
 759         case REV_RECONFIGURE:   COVERAGE_INC(rev_reconfigure);   break;
 760         case REV_STP:           COVERAGE_INC(rev_stp);           break;
 761         case REV_PORT_TOGGLED:  COVERAGE_INC(rev_port_toggled);  break;
 762         case REV_FLOW_TABLE:    COVERAGE_INC(rev_flow_table);    break;
 763         case REV_INCONSISTENCY: COVERAGE_INC(rev_inconsistency); break;
 764         }
 765
 766         if (backer->need_revalidate) {
 767             /* Clear the drop_keys in case we should now be accepting some
 768              * formerly dropped flows. */
 769             drop_key_clear(backer);
 770         }
 771
 772         /* Clear the revalidation flags. */
 773         tag_set_init(&backer->revalidate_set);
 774         backer->need_revalidate = 0;
 775
 776         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
 777             struct facet *facet, *next;
 778             struct cls_cursor cursor;
 779
 780             if (ofproto->backer != backer) {
 781                 continue;
 782             }
 783
 784             if (need_revalidate) {
 785                 struct ofport_dpif *ofport;
 786                 struct ofbundle *bundle;
 787
 788                 xlate_ofproto_set(ofproto, ofproto->up.name, ofproto->ml,
 789                                   ofproto->mbridge, ofproto->sflow,
 790                                   ofproto->ipfix, ofproto->up.frag_handling,
 791                                   ofproto->up.forward_bpdu,
 792                                   connmgr_has_in_band(ofproto->up.connmgr),
 793                                   ofproto->netflow != NULL,
 794                                   ofproto->stp != NULL);
 795
 796                 HMAP_FOR_EACH (bundle, hmap_node, &ofproto->bundles) {
 797                     xlate_bundle_set(ofproto, bundle, bundle->name,
 798                                      bundle->vlan_mode, bundle->vlan,
 799                                      bundle->trunks, bundle->use_priority_tags,
 800                                      bundle->bond, bundle->lacp,
 801                                      bundle->floodable);
 802                 }
 803
 804                 HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
 805                     xlate_ofport_set(ofproto, ofport->bundle, ofport,
 806                                      ofport->up.ofp_port, ofport->odp_port,
 807                                      ofport->up.netdev, ofport->cfm,
 808                                      ofport->bfd, ofport->peer,
 809                                      ofport->up.pp.config, ofport->stp_state,
 810                                      ofport->is_tunnel, ofport->may_enable);
 811                 }
 812             }
 813
 814             cls_cursor_init(&cursor, &ofproto->facets, NULL);
 815             CLS_CURSOR_FOR_EACH_SAFE (facet, next, cr, &cursor) {
 816                 if (need_revalidate
 817                     || tag_set_intersects(&revalidate_set, facet->xout.tags)) {
 818                     facet_revalidate(facet);
 819                     run_fast_rl();
 820                 }
 821             }
 822         }
 823     }
 824
 825     if (!backer->recv_set_enable) {
 826         /* Wake up before a max of 1000ms. */
 827         timer_set_duration(&backer->next_expiration, 1000);
 828     } else if (timer_expired(&backer->next_expiration)) {
 829         int delay = expire(backer);
 830         timer_set_duration(&backer->next_expiration, delay);
 831     }
 832
 833     /* Check for port changes in the dpif. */
 834     while ((error = dpif_port_poll(backer->dpif, &devname)) == 0) {
 835         struct ofproto_dpif *ofproto;
 836         struct dpif_port port;
 837
 838         /* Don't report on the datapath's device. */
 839         if (!strcmp(devname, dpif_base_name(backer->dpif))) {
 840             goto next;
 841         }
 842
 843         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node,
 844                        &all_ofproto_dpifs) {
 845             if (simap_contains(&ofproto->backer->tnl_backers, devname)) {
 846                 goto next;
 847             }
 848         }
 849
 850         ofproto = lookup_ofproto_dpif_by_port_name(devname);
 851         if (dpif_port_query_by_name(backer->dpif, devname, &port)) {
 852             /* The port was removed.  If we know the datapath,
 853              * report it through poll_set().  If we don't, it may be
 854              * notifying us of a removal we initiated, so ignore it.
 855              * If there's a pending ENOBUFS, let it stand, since
 856              * everything will be reevaluated. */
 857             if (ofproto && ofproto->port_poll_errno != ENOBUFS) {
 858                 sset_add(&ofproto->port_poll_set, devname);
 859                 ofproto->port_poll_errno = 0;
 860             }
 861         } else if (!ofproto) {
 862             /* The port was added, but we don't know with which
 863              * ofproto we should associate it.  Delete it. */
 864             dpif_port_del(backer->dpif, port.port_no);
 865         }
 866         dpif_port_destroy(&port);
 867
 868     next:
 869         free(devname);
 870     }
 871
 872     if (error != EAGAIN) {
 873         struct ofproto_dpif *ofproto;
 874
 875         /* There was some sort of error, so propagate it to all
 876          * ofprotos that use this backer. */
 877         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node,
 878                        &all_ofproto_dpifs) {
 879             if (ofproto->backer == backer) {
 880                 sset_clear(&ofproto->port_poll_set);
 881                 ofproto->port_poll_errno = error;
 882             }
 883         }
 884     }
 885
 886     if (backer->governor) {
 887         size_t n_subfacets;
 888
 889         governor_run(backer->governor);
 890
 891         /* If the governor has shrunk to its minimum size and the number of
 892          * subfacets has dwindled, then drop the governor entirely.
 893          *
 894          * For hysteresis, the number of subfacets to drop the governor is
 895          * smaller than the number needed to trigger its creation. */
 896         n_subfacets = hmap_count(&backer->subfacets);
 897         if (n_subfacets * 4 < flow_eviction_threshold
 898             && governor_is_idle(backer->governor)) {
 899             governor_destroy(backer->governor);
 900             backer->governor = NULL;
 901         }
 902     }
 903
 904     return 0;
 905 }
 906
 907 static int
 908 dpif_backer_run_fast(struct dpif_backer *backer, int max_batch)
 909 {
 910     unsigned int work;
 911
 912     /* If recv_set_enable is false, we should not handle upcalls. */
 913     if (!backer->recv_set_enable) {
 914         return 0;
 915     }
 916
 917     /* Handle one or more batches of upcalls, until there's nothing left to do
 918      * or until we do a fixed total amount of work.
 919      *
 920      * We do work in batches because it can be much cheaper to set up a number
 921      * of flows and fire off their patches all at once.  We do multiple batches
 922      * because in some cases handling a packet can cause another packet to be
 923      * queued almost immediately as part of the return flow.  Both
 924      * optimizations can make major improvements on some benchmarks and
 925      * presumably for real traffic as well. */
 926     work = 0;
 927     while (work < max_batch) {
 928         int retval = handle_upcalls(backer, max_batch - work);
 929         if (retval <= 0) {
 930             return -retval;
 931         }
 932         work += retval;
 933     }
 934
 935     return 0;
 936 }
 937
 938 static int
 939 type_run_fast(const char *type)
 940 {
 941     struct dpif_backer *backer;
 942
 943     backer = shash_find_data(&all_dpif_backers, type);
 944     if (!backer) {
 945         /* This is not necessarily a problem, since backers are only
 946          * created on demand. */
 947         return 0;
 948     }
 949
 950     return dpif_backer_run_fast(backer, FLOW_MISS_MAX_BATCH);
 951 }
 952
 953 static void
 954 run_fast_rl(void)
 955 {
 956     static long long int port_rl = LLONG_MIN;
 957     static unsigned int backer_rl = 0;
 958
 959     if (time_msec() >= port_rl) {
 960         struct ofproto_dpif *ofproto;
 961         struct ofport_dpif *ofport;
 962
 963         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
 964
 965             HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
 966                 port_run_fast(ofport);
 967             }
 968         }
 969         port_rl = time_msec() + 200;
 970     }
 971
 972     /* XXX: We have to be careful not to do too much work in this function.  If
 973      * we call dpif_backer_run_fast() too often, or with too large a batch,
 974      * performance improves signifcantly, but at a cost.  It's possible for the
 975      * number of flows in the datapath to increase without bound, and for poll
 976      * loops to take 10s of seconds.   The correct solution to this problem,
 977      * long term, is to separate flow miss handling into it's own thread so it
 978      * isn't affected by revalidations, and expirations.  Until then, this is
 979      * the best we can do. */
 980     if (++backer_rl >= 10) {
 981         struct shash_node *node;
 982
 983         backer_rl = 0;
 984         SHASH_FOR_EACH (node, &all_dpif_backers) {
 985             dpif_backer_run_fast(node->data, 1);
 986         }
 987     }
 988 }
 989
 990 static void
 991 type_wait(const char *type)
 992 {
 993     struct dpif_backer *backer;
 994
 995     backer = shash_find_data(&all_dpif_backers, type);
 996     if (!backer) {
 997         /* This is not necessarily a problem, since backers are only
 998          * created on demand. */
 999         return;
1000     }
1001
1002     if (backer->governor) {
1003         governor_wait(backer->governor);
1004     }
1005
1006     timer_wait(&backer->next_expiration);
1007 }
1008 \f
1009 /* Basic life-cycle. */
1010
1011 static int add_internal_flows(struct ofproto_dpif *);
1012
1013 static struct ofproto *
1014 alloc(void)
1015 {
1016     struct ofproto_dpif *ofproto = xmalloc(sizeof *ofproto);
1017     return &ofproto->up;
1018 }
1019
1020 static void
1021 dealloc(struct ofproto *ofproto_)
1022 {
1023     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1024     free(ofproto);
1025 }
1026
1027 static void
1028 close_dpif_backer(struct dpif_backer *backer)
1029 {
1030     struct shash_node *node;
1031
1032     ovs_assert(backer->refcount > 0);
1033
1034     if (--backer->refcount) {
1035         return;
1036     }
1037
1038     drop_key_clear(backer);
1039     hmap_destroy(&backer->drop_keys);
1040
1041     simap_destroy(&backer->tnl_backers);
1042     hmap_destroy(&backer->odp_to_ofport_map);
1043     node = shash_find(&all_dpif_backers, backer->type);
1044     free(backer->type);
1045     shash_delete(&all_dpif_backers, node);
1046     dpif_close(backer->dpif);
1047
1048     ovs_assert(hmap_is_empty(&backer->subfacets));
1049     hmap_destroy(&backer->subfacets);
1050     governor_destroy(backer->governor);
1051
1052     free(backer);
1053 }
1054
1055 /* Datapath port slated for removal from datapath. */
1056 struct odp_garbage {
1057     struct list list_node;
1058     odp_port_t odp_port;
1059 };
1060
1061 static int
1062 open_dpif_backer(const char *type, struct dpif_backer **backerp)
1063 {
1064     struct dpif_backer *backer;
1065     struct dpif_port_dump port_dump;
1066     struct dpif_port port;
1067     struct shash_node *node;
1068     struct list garbage_list;
1069     struct odp_garbage *garbage, *next;
1070     struct sset names;
1071     char *backer_name;
1072     const char *name;
1073     int error;
1074
1075     backer = shash_find_data(&all_dpif_backers, type);
1076     if (backer) {
1077         backer->refcount++;
1078         *backerp = backer;
1079         return 0;
1080     }
1081
1082     backer_name = xasprintf("ovs-%s", type);
1083
1084     /* Remove any existing datapaths, since we assume we're the only
1085      * userspace controlling the datapath. */
1086     sset_init(&names);
1087     dp_enumerate_names(type, &names);
1088     SSET_FOR_EACH(name, &names) {
1089         struct dpif *old_dpif;
1090
1091         /* Don't remove our backer if it exists. */
1092         if (!strcmp(name, backer_name)) {
1093             continue;
1094         }
1095
1096         if (dpif_open(name, type, &old_dpif)) {
1097             VLOG_WARN("couldn't open old datapath %s to remove it", name);
1098         } else {
1099             dpif_delete(old_dpif);
1100             dpif_close(old_dpif);
1101         }
1102     }
1103     sset_destroy(&names);
1104
1105     backer = xmalloc(sizeof *backer);
1106
1107     error = dpif_create_and_open(backer_name, type, &backer->dpif);
1108     free(backer_name);
1109     if (error) {
1110         VLOG_ERR("failed to open datapath of type %s: %s", type,
1111                  ovs_strerror(error));
1112         free(backer);
1113         return error;
1114     }
1115
1116     backer->type = xstrdup(type);
1117     backer->governor = NULL;
1118     backer->refcount = 1;
1119     hmap_init(&backer->odp_to_ofport_map);
1120     hmap_init(&backer->drop_keys);
1121     hmap_init(&backer->subfacets);
1122     timer_set_duration(&backer->next_expiration, 1000);
1123     backer->need_revalidate = 0;
1124     simap_init(&backer->tnl_backers);
1125     tag_set_init(&backer->revalidate_set);
1126     backer->recv_set_enable = !ofproto_get_flow_restore_wait();
1127     *backerp = backer;
1128
1129     if (backer->recv_set_enable) {
1130         dpif_flow_flush(backer->dpif);
1131     }
1132
1133     /* Loop through the ports already on the datapath and remove any
1134      * that we don't need anymore. */
1135     list_init(&garbage_list);
1136     dpif_port_dump_start(&port_dump, backer->dpif);
1137     while (dpif_port_dump_next(&port_dump, &port)) {
1138         node = shash_find(&init_ofp_ports, port.name);
1139         if (!node && strcmp(port.name, dpif_base_name(backer->dpif))) {
1140             garbage = xmalloc(sizeof *garbage);
1141             garbage->odp_port = port.port_no;
1142             list_push_front(&garbage_list, &garbage->list_node);
1143         }
1144     }
1145     dpif_port_dump_done(&port_dump);
1146
1147     LIST_FOR_EACH_SAFE (garbage, next, list_node, &garbage_list) {
1148         dpif_port_del(backer->dpif, garbage->odp_port);
1149         list_remove(&garbage->list_node);
1150         free(garbage);
1151     }
1152
1153     shash_add(&all_dpif_backers, type, backer);
1154
1155     error = dpif_recv_set(backer->dpif, backer->recv_set_enable);
1156     if (error) {
1157         VLOG_ERR("failed to listen on datapath of type %s: %s",
1158                  type, ovs_strerror(error));
1159         close_dpif_backer(backer);
1160         return error;
1161     }
1162
1163     backer->max_n_subfacet = 0;
1164     backer->created = time_msec();
1165     backer->last_minute = backer->created;
1166     memset(&backer->hourly, 0, sizeof backer->hourly);
1167     memset(&backer->daily, 0, sizeof backer->daily);
1168     memset(&backer->lifetime, 0, sizeof backer->lifetime);
1169     backer->subfacet_add_count = 0;
1170     backer->subfacet_del_count = 0;
1171     backer->total_subfacet_add_count = 0;
1172     backer->total_subfacet_del_count = 0;
1173     backer->avg_n_subfacet = 0;
1174     backer->avg_subfacet_life = 0;
1175
1176     return error;
1177 }
1178
1179 static int
1180 construct(struct ofproto *ofproto_)
1181 {
1182     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1183     struct shash_node *node, *next;
1184     odp_port_t max_ports;
1185     int error;
1186     int i;
1187
1188     error = open_dpif_backer(ofproto->up.type, &ofproto->backer);
1189     if (error) {
1190         return error;
1191     }
1192
1193     max_ports = dpif_get_max_ports(ofproto->backer->dpif);
1194     ofproto_init_max_ports(ofproto_, u16_to_ofp(MIN(odp_to_u32(max_ports),
1195                                                     ofp_to_u16(OFPP_MAX))));
1196
1197     ofproto->netflow = NULL;
1198     ofproto->sflow = NULL;
1199     ofproto->ipfix = NULL;
1200     ofproto->stp = NULL;
1201     hmap_init(&ofproto->bundles);
1202     ofproto->ml = mac_learning_create(MAC_ENTRY_DEFAULT_IDLE_TIME);
1203     ofproto->mbridge = mbridge_create();
1204     ofproto->has_bonded_bundles = false;
1205
1206     classifier_init(&ofproto->facets);
1207     ofproto->consistency_rl = LLONG_MIN;
1208
1209     for (i = 0; i < N_TABLES; i++) {
1210         struct table_dpif *table = &ofproto->tables[i];
1211
1212         table->catchall_table = NULL;
1213         table->other_table = NULL;
1214         table->basis = random_uint32();
1215     }
1216
1217     list_init(&ofproto->completions);
1218
1219     ofproto_dpif_unixctl_init();
1220
1221     hmap_init(&ofproto->vlandev_map);
1222     hmap_init(&ofproto->realdev_vid_map);
1223
1224     sset_init(&ofproto->ports);
1225     sset_init(&ofproto->ghost_ports);
1226     sset_init(&ofproto->port_poll_set);
1227     ofproto->port_poll_errno = 0;
1228
1229     SHASH_FOR_EACH_SAFE (node, next, &init_ofp_ports) {
1230         struct iface_hint *iface_hint = node->data;
1231
1232         if (!strcmp(iface_hint->br_name, ofproto->up.name)) {
1233             /* Check if the datapath already has this port. */
1234             if (dpif_port_exists(ofproto->backer->dpif, node->name)) {
1235                 sset_add(&ofproto->ports, node->name);
1236             }
1237
1238             free(iface_hint->br_name);
1239             free(iface_hint->br_type);
1240             free(iface_hint);
1241             shash_delete(&init_ofp_ports, node);
1242         }
1243     }
1244
1245     hmap_insert(&all_ofproto_dpifs, &ofproto->all_ofproto_dpifs_node,
1246                 hash_string(ofproto->up.name, 0));
1247     memset(&ofproto->stats, 0, sizeof ofproto->stats);
1248
1249     ofproto_init_tables(ofproto_, N_TABLES);
1250     error = add_internal_flows(ofproto);
1251     ofproto->up.tables[TBL_INTERNAL].flags = OFTABLE_HIDDEN | OFTABLE_READONLY;
1252
1253     ofproto->n_hit = 0;
1254     ofproto->n_missed = 0;
1255
1256     return error;
1257 }
1258
1259 static int
1260 add_internal_flow(struct ofproto_dpif *ofproto, int id,
1261                   const struct ofpbuf *ofpacts, struct rule_dpif **rulep)
1262 {
1263     struct ofputil_flow_mod fm;
1264     int error;
1265
1266     match_init_catchall(&fm.match);
1267     fm.priority = 0;
1268     match_set_reg(&fm.match, 0, id);
1269     fm.new_cookie = htonll(0);
1270     fm.cookie = htonll(0);
1271     fm.cookie_mask = htonll(0);
1272     fm.modify_cookie = false;
1273     fm.table_id = TBL_INTERNAL;
1274     fm.command = OFPFC_ADD;
1275     fm.idle_timeout = 0;
1276     fm.hard_timeout = 0;
1277     fm.buffer_id = 0;
1278     fm.out_port = 0;
1279     fm.flags = 0;
1280     fm.ofpacts = ofpacts->data;
1281     fm.ofpacts_len = ofpacts->size;
1282
1283     error = ofproto_flow_mod(&ofproto->up, &fm);
1284     if (error) {
1285         VLOG_ERR_RL(&rl, "failed to add internal flow %d (%s)",
1286                     id, ofperr_to_string(error));
1287         return error;
1288     }
1289
1290     *rulep = rule_dpif_lookup_in_table(ofproto, &fm.match.flow, NULL,
1291                                        TBL_INTERNAL);
1292     ovs_assert(*rulep != NULL);
1293
1294     return 0;
1295 }
1296
1297 static int
1298 add_internal_flows(struct ofproto_dpif *ofproto)
1299 {
1300     struct ofpact_controller *controller;
1301     uint64_t ofpacts_stub[128 / 8];
1302     struct ofpbuf ofpacts;
1303     int error;
1304     int id;
1305
1306     ofpbuf_use_stack(&ofpacts, ofpacts_stub, sizeof ofpacts_stub);
1307     id = 1;
1308
1309     controller = ofpact_put_CONTROLLER(&ofpacts);
1310     controller->max_len = UINT16_MAX;
1311     controller->controller_id = 0;
1312     controller->reason = OFPR_NO_MATCH;
1313     ofpact_pad(&ofpacts);
1314
1315     error = add_internal_flow(ofproto, id++, &ofpacts, &ofproto->miss_rule);
1316     if (error) {
1317         return error;
1318     }
1319
1320     ofpbuf_clear(&ofpacts);
1321     error = add_internal_flow(ofproto, id++, &ofpacts,
1322                               &ofproto->no_packet_in_rule);
1323     if (error) {
1324         return error;
1325     }
1326
1327     error = add_internal_flow(ofproto, id++, &ofpacts,
1328                               &ofproto->drop_frags_rule);
1329     return error;
1330 }
1331
1332 static void
1333 complete_operations(struct ofproto_dpif *ofproto)
1334 {
1335     struct dpif_completion *c, *next;
1336
1337     LIST_FOR_EACH_SAFE (c, next, list_node, &ofproto->completions) {
1338         ofoperation_complete(c->op, 0);
1339         list_remove(&c->list_node);
1340         free(c);
1341     }
1342 }
1343
1344 static void
1345 destruct(struct ofproto *ofproto_)
1346 {
1347     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1348     struct rule_dpif *rule, *next_rule;
1349     struct oftable *table;
1350
1351     ofproto->backer->need_revalidate = REV_RECONFIGURE;
1352     xlate_remove_ofproto(ofproto);
1353
1354     hmap_remove(&all_ofproto_dpifs, &ofproto->all_ofproto_dpifs_node);
1355     complete_operations(ofproto);
1356
1357     OFPROTO_FOR_EACH_TABLE (table, &ofproto->up) {
1358         struct cls_cursor cursor;
1359
1360         cls_cursor_init(&cursor, &table->cls, NULL);
1361         CLS_CURSOR_FOR_EACH_SAFE (rule, next_rule, up.cr, &cursor) {
1362             ofproto_rule_destroy(&rule->up);
1363         }
1364     }
1365
1366     mbridge_unref(ofproto->mbridge);
1367
1368     netflow_destroy(ofproto->netflow);
1369     dpif_sflow_unref(ofproto->sflow);
1370     hmap_destroy(&ofproto->bundles);
1371     mac_learning_unref(ofproto->ml);
1372
1373     classifier_destroy(&ofproto->facets);
1374
1375     hmap_destroy(&ofproto->vlandev_map);
1376     hmap_destroy(&ofproto->realdev_vid_map);
1377
1378     sset_destroy(&ofproto->ports);
1379     sset_destroy(&ofproto->ghost_ports);
1380     sset_destroy(&ofproto->port_poll_set);
1381
1382     close_dpif_backer(ofproto->backer);
1383 }
1384
1385 static int
1386 run_fast(struct ofproto *ofproto_)
1387 {
1388     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1389     struct ofport_dpif *ofport;
1390
1391     /* Do not perform any periodic activity required by 'ofproto' while
1392      * waiting for flow restore to complete. */
1393     if (ofproto_get_flow_restore_wait()) {
1394         return 0;
1395     }
1396
1397     HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
1398         port_run_fast(ofport);
1399     }
1400
1401     return 0;
1402 }
1403
1404 static int
1405 run(struct ofproto *ofproto_)
1406 {
1407     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1408     struct ofport_dpif *ofport;
1409     struct ofbundle *bundle;
1410     int error;
1411
1412     if (!clogged) {
1413         complete_operations(ofproto);
1414     }
1415
1416     if (mbridge_need_revalidate(ofproto->mbridge)) {
1417         ofproto->backer->need_revalidate = REV_RECONFIGURE;
1418         mac_learning_flush(ofproto->ml, NULL);
1419     }
1420
1421     /* Do not perform any periodic activity below required by 'ofproto' while
1422      * waiting for flow restore to complete. */
1423     if (ofproto_get_flow_restore_wait()) {
1424         return 0;
1425     }
1426
1427     error = run_fast(ofproto_);
1428     if (error) {
1429         return error;
1430     }
1431
1432     if (ofproto->netflow) {
1433         if (netflow_run(ofproto->netflow)) {
1434             send_netflow_active_timeouts(ofproto);
1435         }
1436     }
1437     if (ofproto->sflow) {
1438         dpif_sflow_run(ofproto->sflow);
1439     }
1440
1441     HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
1442         port_run(ofport);
1443     }
1444     HMAP_FOR_EACH (bundle, hmap_node, &ofproto->bundles) {
1445         bundle_run(bundle);
1446     }
1447
1448     stp_run(ofproto);
1449     mac_learning_run(ofproto->ml, &ofproto->backer->revalidate_set);
1450
1451     /* Check the consistency of a random facet, to aid debugging. */
1452     if (time_msec() >= ofproto->consistency_rl
1453         && !classifier_is_empty(&ofproto->facets)
1454         && !ofproto->backer->need_revalidate) {
1455         struct cls_table *table;
1456         struct cls_rule *cr;
1457         struct facet *facet;
1458
1459         ofproto->consistency_rl = time_msec() + 250;
1460
1461         table = CONTAINER_OF(hmap_random_node(&ofproto->facets.tables),
1462                              struct cls_table, hmap_node);
1463         cr = CONTAINER_OF(hmap_random_node(&table->rules), struct cls_rule,
1464                           hmap_node);
1465         facet = CONTAINER_OF(cr, struct facet, cr);
1466
1467         if (!tag_set_intersects(&ofproto->backer->revalidate_set,
1468                                 facet->xout.tags)) {
1469             if (!facet_check_consistency(facet)) {
1470                 ofproto->backer->need_revalidate = REV_INCONSISTENCY;
1471             }
1472         }
1473     }
1474
1475     return 0;
1476 }
1477
1478 static void
1479 wait(struct ofproto *ofproto_)
1480 {
1481     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1482     struct ofport_dpif *ofport;
1483     struct ofbundle *bundle;
1484
1485     if (!clogged && !list_is_empty(&ofproto->completions)) {
1486         poll_immediate_wake();
1487     }
1488
1489     if (ofproto_get_flow_restore_wait()) {
1490         return;
1491     }
1492
1493     dpif_wait(ofproto->backer->dpif);
1494     dpif_recv_wait(ofproto->backer->dpif);
1495     if (ofproto->sflow) {
1496         dpif_sflow_wait(ofproto->sflow);
1497     }
1498     if (!tag_set_is_empty(&ofproto->backer->revalidate_set)) {
1499         poll_immediate_wake();
1500     }
1501     HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
1502         port_wait(ofport);
1503     }
1504     HMAP_FOR_EACH (bundle, hmap_node, &ofproto->bundles) {
1505         bundle_wait(bundle);
1506     }
1507     if (ofproto->netflow) {
1508         netflow_wait(ofproto->netflow);
1509     }
1510     mac_learning_wait(ofproto->ml);
1511     stp_wait(ofproto);
1512     if (ofproto->backer->need_revalidate) {
1513         /* Shouldn't happen, but if it does just go around again. */
1514         VLOG_DBG_RL(&rl, "need revalidate in ofproto_wait_cb()");
1515         poll_immediate_wake();
1516     }
1517 }
1518
1519 static void
1520 get_memory_usage(const struct ofproto *ofproto_, struct simap *usage)
1521 {
1522     const struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1523     struct cls_cursor cursor;
1524     size_t n_subfacets = 0;
1525     struct facet *facet;
1526
1527     simap_increase(usage, "facets", classifier_count(&ofproto->facets));
1528
1529     cls_cursor_init(&cursor, &ofproto->facets, NULL);
1530     CLS_CURSOR_FOR_EACH (facet, cr, &cursor) {
1531         n_subfacets += list_size(&facet->subfacets);
1532     }
1533     simap_increase(usage, "subfacets", n_subfacets);
1534 }
1535
1536 static void
1537 flush(struct ofproto *ofproto_)
1538 {
1539     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1540     struct subfacet *subfacet, *next_subfacet;
1541     struct subfacet *batch[SUBFACET_DESTROY_MAX_BATCH];
1542     int n_batch;
1543
1544     n_batch = 0;
1545     HMAP_FOR_EACH_SAFE (subfacet, next_subfacet, hmap_node,
1546                         &ofproto->backer->subfacets) {
1547         if (subfacet->facet->ofproto != ofproto) {
1548             continue;
1549         }
1550
1551         if (subfacet->path != SF_NOT_INSTALLED) {
1552             batch[n_batch++] = subfacet;
1553             if (n_batch >= SUBFACET_DESTROY_MAX_BATCH) {
1554                 subfacet_destroy_batch(ofproto->backer, batch, n_batch);
1555                 n_batch = 0;
1556             }
1557         } else {
1558             subfacet_destroy(subfacet);
1559         }
1560     }
1561
1562     if (n_batch > 0) {
1563         subfacet_destroy_batch(ofproto->backer, batch, n_batch);
1564     }
1565 }
1566
1567 static void
1568 get_features(struct ofproto *ofproto_ OVS_UNUSED,
1569              bool *arp_match_ip, enum ofputil_action_bitmap *actions)
1570 {
1571     *arp_match_ip = true;
1572     *actions = (OFPUTIL_A_OUTPUT |
1573                 OFPUTIL_A_SET_VLAN_VID |
1574                 OFPUTIL_A_SET_VLAN_PCP |
1575                 OFPUTIL_A_STRIP_VLAN |
1576                 OFPUTIL_A_SET_DL_SRC |
1577                 OFPUTIL_A_SET_DL_DST |
1578                 OFPUTIL_A_SET_NW_SRC |
1579                 OFPUTIL_A_SET_NW_DST |
1580                 OFPUTIL_A_SET_NW_TOS |
1581                 OFPUTIL_A_SET_TP_SRC |
1582                 OFPUTIL_A_SET_TP_DST |
1583                 OFPUTIL_A_ENQUEUE);
1584 }
1585
1586 static void
1587 get_tables(struct ofproto *ofproto_, struct ofp12_table_stats *ots)
1588 {
1589     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1590     struct dpif_dp_stats s;
1591     uint64_t n_miss, n_no_pkt_in, n_bytes, n_dropped_frags;
1592     uint64_t n_lookup;
1593
1594     strcpy(ots->name, "classifier");
1595
1596     dpif_get_dp_stats(ofproto->backer->dpif, &s);
1597     rule_get_stats(&ofproto->miss_rule->up, &n_miss, &n_bytes);
1598     rule_get_stats(&ofproto->no_packet_in_rule->up, &n_no_pkt_in, &n_bytes);
1599     rule_get_stats(&ofproto->drop_frags_rule->up, &n_dropped_frags, &n_bytes);
1600
1601     n_lookup = s.n_hit + s.n_missed - n_dropped_frags;
1602     ots->lookup_count = htonll(n_lookup);
1603     ots->matched_count = htonll(n_lookup - n_miss - n_no_pkt_in);
1604 }
1605
1606 static struct ofport *
1607 port_alloc(void)
1608 {
1609     struct ofport_dpif *port = xmalloc(sizeof *port);
1610     return &port->up;
1611 }
1612
1613 static void
1614 port_dealloc(struct ofport *port_)
1615 {
1616     struct ofport_dpif *port = ofport_dpif_cast(port_);
1617     free(port);
1618 }
1619
1620 static int
1621 port_construct(struct ofport *port_)
1622 {
1623     struct ofport_dpif *port = ofport_dpif_cast(port_);
1624     struct ofproto_dpif *ofproto = ofproto_dpif_cast(port->up.ofproto);
1625     const struct netdev *netdev = port->up.netdev;
1626     char namebuf[NETDEV_VPORT_NAME_BUFSIZE];
1627     struct dpif_port dpif_port;
1628     int error;
1629
1630     ofproto->backer->need_revalidate = REV_RECONFIGURE;
1631     port->bundle = NULL;
1632     port->cfm = NULL;
1633     port->bfd = NULL;
1634     port->tag = tag_create_random();
1635     port->may_enable = true;
1636     port->stp_port = NULL;
1637     port->stp_state = STP_DISABLED;
1638     port->is_tunnel = false;
1639     port->peer = NULL;
1640     hmap_init(&port->priorities);
1641     port->realdev_ofp_port = 0;
1642     port->vlandev_vid = 0;
1643     port->carrier_seq = netdev_get_carrier_resets(netdev);
1644
1645     if (netdev_vport_is_patch(netdev)) {
1646         /* By bailing out here, we don't submit the port to the sFlow module
1647          * to be considered for counter polling export.  This is correct
1648          * because the patch port represents an interface that sFlow considers
1649          * to be "internal" to the switch as a whole, and therefore not an
1650          * candidate for counter polling. */
1651         port->odp_port = ODPP_NONE;
1652         ofport_update_peer(port);
1653         return 0;
1654     }
1655
1656     error = dpif_port_query_by_name(ofproto->backer->dpif,
1657                                     netdev_vport_get_dpif_port(netdev, namebuf,
1658                                                                sizeof namebuf),
1659                                     &dpif_port);
1660     if (error) {
1661         return error;
1662     }
1663
1664     port->odp_port = dpif_port.port_no;
1665
1666     if (netdev_get_tunnel_config(netdev)) {
1667         tnl_port_add(port, port->up.netdev, port->odp_port);
1668         port->is_tunnel = true;
1669     } else {
1670         /* Sanity-check that a mapping doesn't already exist.  This
1671          * shouldn't happen for non-tunnel ports. */
1672         if (odp_port_to_ofp_port(ofproto, port->odp_port) != OFPP_NONE) {
1673             VLOG_ERR("port %s already has an OpenFlow port number",
1674                      dpif_port.name);
1675             dpif_port_destroy(&dpif_port);
1676             return EBUSY;
1677         }
1678
1679         hmap_insert(&ofproto->backer->odp_to_ofport_map, &port->odp_port_node,
1680                     hash_odp_port(port->odp_port));
1681     }
1682     dpif_port_destroy(&dpif_port);
1683
1684     if (ofproto->sflow) {
1685         dpif_sflow_add_port(ofproto->sflow, port_, port->odp_port);
1686     }
1687
1688     return 0;
1689 }
1690
1691 static void
1692 port_destruct(struct ofport *port_)
1693 {
1694     struct ofport_dpif *port = ofport_dpif_cast(port_);
1695     struct ofproto_dpif *ofproto = ofproto_dpif_cast(port->up.ofproto);
1696     const char *devname = netdev_get_name(port->up.netdev);
1697     char namebuf[NETDEV_VPORT_NAME_BUFSIZE];
1698     const char *dp_port_name;
1699
1700     ofproto->backer->need_revalidate = REV_RECONFIGURE;
1701     xlate_ofport_remove(port);
1702
1703     dp_port_name = netdev_vport_get_dpif_port(port->up.netdev, namebuf,
1704                                               sizeof namebuf);
1705     if (dpif_port_exists(ofproto->backer->dpif, dp_port_name)) {
1706         /* The underlying device is still there, so delete it.  This
1707          * happens when the ofproto is being destroyed, since the caller
1708          * assumes that removal of attached ports will happen as part of
1709          * destruction. */
1710         if (!port->is_tunnel) {
1711             dpif_port_del(ofproto->backer->dpif, port->odp_port);
1712         }
1713     }
1714
1715     if (port->peer) {
1716         port->peer->peer = NULL;
1717         port->peer = NULL;
1718     }
1719
1720     if (port->odp_port != ODPP_NONE && !port->is_tunnel) {
1721         hmap_remove(&ofproto->backer->odp_to_ofport_map, &port->odp_port_node);
1722     }
1723
1724     tnl_port_del(port);
1725     sset_find_and_delete(&ofproto->ports, devname);
1726     sset_find_and_delete(&ofproto->ghost_ports, devname);
1727     bundle_remove(port_);
1728     set_cfm(port_, NULL);
1729     set_bfd(port_, NULL);
1730     if (ofproto->sflow) {
1731         dpif_sflow_del_port(ofproto->sflow, port->odp_port);
1732     }
1733
1734     ofport_clear_priorities(port);
1735     hmap_destroy(&port->priorities);
1736 }
1737
1738 static void
1739 port_modified(struct ofport *port_)
1740 {
1741     struct ofport_dpif *port = ofport_dpif_cast(port_);
1742
1743     if (port->bundle && port->bundle->bond) {
1744         bond_slave_set_netdev(port->bundle->bond, port, port->up.netdev);
1745     }
1746
1747     if (port->cfm) {
1748         cfm_set_netdev(port->cfm, port->up.netdev);
1749     }
1750
1751     if (port->is_tunnel && tnl_port_reconfigure(port, port->up.netdev,
1752                                                 port->odp_port)) {
1753         ofproto_dpif_cast(port->up.ofproto)->backer->need_revalidate =
1754             REV_RECONFIGURE;
1755     }
1756
1757     ofport_update_peer(port);
1758 }
1759
1760 static void
1761 port_reconfigured(struct ofport *port_, enum ofputil_port_config old_config)
1762 {
1763     struct ofport_dpif *port = ofport_dpif_cast(port_);
1764     struct ofproto_dpif *ofproto = ofproto_dpif_cast(port->up.ofproto);
1765     enum ofputil_port_config changed = old_config ^ port->up.pp.config;
1766
1767     if (changed & (OFPUTIL_PC_NO_RECV | OFPUTIL_PC_NO_RECV_STP |
1768                    OFPUTIL_PC_NO_FWD | OFPUTIL_PC_NO_FLOOD |
1769                    OFPUTIL_PC_NO_PACKET_IN)) {
1770         ofproto->backer->need_revalidate = REV_RECONFIGURE;
1771
1772         if (changed & OFPUTIL_PC_NO_FLOOD && port->bundle) {
1773             bundle_update(port->bundle);
1774         }
1775     }
1776 }
1777
1778 static int
1779 set_sflow(struct ofproto *ofproto_,
1780           const struct ofproto_sflow_options *sflow_options)
1781 {
1782     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1783     struct dpif_sflow *ds = ofproto->sflow;
1784
1785     if (sflow_options) {
1786         if (!ds) {
1787             struct ofport_dpif *ofport;
1788
1789             ds = ofproto->sflow = dpif_sflow_create();
1790             HMAP_FOR_EACH (ofport, up.hmap_node, &ofproto->up.ports) {
1791                 dpif_sflow_add_port(ds, &ofport->up, ofport->odp_port);
1792             }
1793             ofproto->backer->need_revalidate = REV_RECONFIGURE;
1794         }
1795         dpif_sflow_set_options(ds, sflow_options);
1796     } else {
1797         if (ds) {
1798             dpif_sflow_unref(ds);
1799             ofproto->backer->need_revalidate = REV_RECONFIGURE;
1800             ofproto->sflow = NULL;
1801         }
1802     }
1803     return 0;
1804 }
1805
1806 static int
1807 set_ipfix(
1808     struct ofproto *ofproto_,
1809     const struct ofproto_ipfix_bridge_exporter_options *bridge_exporter_options,
1810     const struct ofproto_ipfix_flow_exporter_options *flow_exporters_options,
1811     size_t n_flow_exporters_options)
1812 {
1813     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1814     struct dpif_ipfix *di = ofproto->ipfix;
1815
1816     if (bridge_exporter_options || flow_exporters_options) {
1817         if (!di) {
1818             di = ofproto->ipfix = dpif_ipfix_create();
1819         }
1820         dpif_ipfix_set_options(
1821             di, bridge_exporter_options, flow_exporters_options,
1822             n_flow_exporters_options);
1823     } else {
1824         if (di) {
1825             dpif_ipfix_unref(di);
1826             ofproto->ipfix = NULL;
1827         }
1828     }
1829     return 0;
1830 }
1831
1832 static int
1833 set_cfm(struct ofport *ofport_, const struct cfm_settings *s)
1834 {
1835     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
1836     int error;
1837
1838     if (!s) {
1839         error = 0;
1840     } else {
1841         if (!ofport->cfm) {
1842             struct ofproto_dpif *ofproto;
1843
1844             ofproto = ofproto_dpif_cast(ofport->up.ofproto);
1845             ofproto->backer->need_revalidate = REV_RECONFIGURE;
1846             ofport->cfm = cfm_create(ofport->up.netdev);
1847         }
1848
1849         if (cfm_configure(ofport->cfm, s)) {
1850             return 0;
1851         }
1852
1853         error = EINVAL;
1854     }
1855     cfm_unref(ofport->cfm);
1856     ofport->cfm = NULL;
1857     return error;
1858 }
1859
1860 static bool
1861 get_cfm_status(const struct ofport *ofport_,
1862                struct ofproto_cfm_status *status)
1863 {
1864     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
1865
1866     if (ofport->cfm) {
1867         status->faults = cfm_get_fault(ofport->cfm);
1868         status->remote_opstate = cfm_get_opup(ofport->cfm);
1869         status->health = cfm_get_health(ofport->cfm);
1870         cfm_get_remote_mpids(ofport->cfm, &status->rmps, &status->n_rmps);
1871         return true;
1872     } else {
1873         return false;
1874     }
1875 }
1876
1877 static int
1878 set_bfd(struct ofport *ofport_, const struct smap *cfg)
1879 {
1880     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport_->ofproto);
1881     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
1882     struct bfd *old;
1883
1884     old = ofport->bfd;
1885     ofport->bfd = bfd_configure(old, netdev_get_name(ofport->up.netdev), cfg);
1886     if (ofport->bfd != old) {
1887         ofproto->backer->need_revalidate = REV_RECONFIGURE;
1888     }
1889
1890     return 0;
1891 }
1892
1893 static int
1894 get_bfd_status(struct ofport *ofport_, struct smap *smap)
1895 {
1896     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
1897
1898     if (ofport->bfd) {
1899         bfd_get_status(ofport->bfd, smap);
1900         return 0;
1901     } else {
1902         return ENOENT;
1903     }
1904 }
1905 \f
1906 /* Spanning Tree. */
1907
1908 static void
1909 send_bpdu_cb(struct ofpbuf *pkt, int port_num, void *ofproto_)
1910 {
1911     struct ofproto_dpif *ofproto = ofproto_;
1912     struct stp_port *sp = stp_get_port(ofproto->stp, port_num);
1913     struct ofport_dpif *ofport;
1914
1915     ofport = stp_port_get_aux(sp);
1916     if (!ofport) {
1917         VLOG_WARN_RL(&rl, "%s: cannot send BPDU on unknown port %d",
1918                      ofproto->up.name, port_num);
1919     } else {
1920         struct eth_header *eth = pkt->l2;
1921
1922         netdev_get_etheraddr(ofport->up.netdev, eth->eth_src);
1923         if (eth_addr_is_zero(eth->eth_src)) {
1924             VLOG_WARN_RL(&rl, "%s: cannot send BPDU on port %d "
1925                          "with unknown MAC", ofproto->up.name, port_num);
1926         } else {
1927             send_packet(ofport, pkt);
1928         }
1929     }
1930     ofpbuf_delete(pkt);
1931 }
1932
1933 /* Configures STP on 'ofproto_' using the settings defined in 's'. */
1934 static int
1935 set_stp(struct ofproto *ofproto_, const struct ofproto_stp_settings *s)
1936 {
1937     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1938
1939     /* Only revalidate flows if the configuration changed. */
1940     if (!s != !ofproto->stp) {
1941         ofproto->backer->need_revalidate = REV_RECONFIGURE;
1942     }
1943
1944     if (s) {
1945         if (!ofproto->stp) {
1946             ofproto->stp = stp_create(ofproto_->name, s->system_id,
1947                                       send_bpdu_cb, ofproto);
1948             ofproto->stp_last_tick = time_msec();
1949         }
1950
1951         stp_set_bridge_id(ofproto->stp, s->system_id);
1952         stp_set_bridge_priority(ofproto->stp, s->priority);
1953         stp_set_hello_time(ofproto->stp, s->hello_time);
1954         stp_set_max_age(ofproto->stp, s->max_age);
1955         stp_set_forward_delay(ofproto->stp, s->fwd_delay);
1956     }  else {
1957         struct ofport *ofport;
1958
1959         HMAP_FOR_EACH (ofport, hmap_node, &ofproto->up.ports) {
1960             set_stp_port(ofport, NULL);
1961         }
1962
1963         stp_destroy(ofproto->stp);
1964         ofproto->stp = NULL;
1965     }
1966
1967     return 0;
1968 }
1969
1970 static int
1971 get_stp_status(struct ofproto *ofproto_, struct ofproto_stp_status *s)
1972 {
1973     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
1974
1975     if (ofproto->stp) {
1976         s->enabled = true;
1977         s->bridge_id = stp_get_bridge_id(ofproto->stp);
1978         s->designated_root = stp_get_designated_root(ofproto->stp);
1979         s->root_path_cost = stp_get_root_path_cost(ofproto->stp);
1980     } else {
1981         s->enabled = false;
1982     }
1983
1984     return 0;
1985 }
1986
1987 static void
1988 update_stp_port_state(struct ofport_dpif *ofport)
1989 {
1990     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
1991     enum stp_state state;
1992
1993     /* Figure out new state. */
1994     state = ofport->stp_port ? stp_port_get_state(ofport->stp_port)
1995                              : STP_DISABLED;
1996
1997     /* Update state. */
1998     if (ofport->stp_state != state) {
1999         enum ofputil_port_state of_state;
2000         bool fwd_change;
2001
2002         VLOG_DBG_RL(&rl, "port %s: STP state changed from %s to %s",
2003                     netdev_get_name(ofport->up.netdev),
2004                     stp_state_name(ofport->stp_state),
2005                     stp_state_name(state));
2006         if (stp_learn_in_state(ofport->stp_state)
2007                 != stp_learn_in_state(state)) {
2008             /* xxx Learning action flows should also be flushed. */
2009             mac_learning_flush(ofproto->ml,
2010                                &ofproto->backer->revalidate_set);
2011         }
2012         fwd_change = stp_forward_in_state(ofport->stp_state)
2013                         != stp_forward_in_state(state);
2014
2015         ofproto->backer->need_revalidate = REV_STP;
2016         ofport->stp_state = state;
2017         ofport->stp_state_entered = time_msec();
2018
2019         if (fwd_change && ofport->bundle) {
2020             bundle_update(ofport->bundle);
2021         }
2022
2023         /* Update the STP state bits in the OpenFlow port description. */
2024         of_state = ofport->up.pp.state & ~OFPUTIL_PS_STP_MASK;
2025         of_state |= (state == STP_LISTENING ? OFPUTIL_PS_STP_LISTEN
2026                      : state == STP_LEARNING ? OFPUTIL_PS_STP_LEARN
2027                      : state == STP_FORWARDING ? OFPUTIL_PS_STP_FORWARD
2028                      : state == STP_BLOCKING ?  OFPUTIL_PS_STP_BLOCK
2029                      : 0);
2030         ofproto_port_set_state(&ofport->up, of_state);
2031     }
2032 }
2033
2034 /* Configures STP on 'ofport_' using the settings defined in 's'.  The
2035  * caller is responsible for assigning STP port numbers and ensuring
2036  * there are no duplicates. */
2037 static int
2038 set_stp_port(struct ofport *ofport_,
2039              const struct ofproto_port_stp_settings *s)
2040 {
2041     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
2042     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
2043     struct stp_port *sp = ofport->stp_port;
2044
2045     if (!s || !s->enable) {
2046         if (sp) {
2047             ofport->stp_port = NULL;
2048             stp_port_disable(sp);
2049             update_stp_port_state(ofport);
2050         }
2051         return 0;
2052     } else if (sp && stp_port_no(sp) != s->port_num
2053             && ofport == stp_port_get_aux(sp)) {
2054         /* The port-id changed, so disable the old one if it's not
2055          * already in use by another port. */
2056         stp_port_disable(sp);
2057     }
2058
2059     sp = ofport->stp_port = stp_get_port(ofproto->stp, s->port_num);
2060     stp_port_enable(sp);
2061
2062     stp_port_set_aux(sp, ofport);
2063     stp_port_set_priority(sp, s->priority);
2064     stp_port_set_path_cost(sp, s->path_cost);
2065
2066     update_stp_port_state(ofport);
2067
2068     return 0;
2069 }
2070
2071 static int
2072 get_stp_port_status(struct ofport *ofport_,
2073                     struct ofproto_port_stp_status *s)
2074 {
2075     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
2076     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
2077     struct stp_port *sp = ofport->stp_port;
2078
2079     if (!ofproto->stp || !sp) {
2080         s->enabled = false;
2081         return 0;
2082     }
2083
2084     s->enabled = true;
2085     s->port_id = stp_port_get_id(sp);
2086     s->state = stp_port_get_state(sp);
2087     s->sec_in_state = (time_msec() - ofport->stp_state_entered) / 1000;
2088     s->role = stp_port_get_role(sp);
2089     stp_port_get_counts(sp, &s->tx_count, &s->rx_count, &s->error_count);
2090
2091     return 0;
2092 }
2093
2094 static void
2095 stp_run(struct ofproto_dpif *ofproto)
2096 {
2097     if (ofproto->stp) {
2098         long long int now = time_msec();
2099         long long int elapsed = now - ofproto->stp_last_tick;
2100         struct stp_port *sp;
2101
2102         if (elapsed > 0) {
2103             stp_tick(ofproto->stp, MIN(INT_MAX, elapsed));
2104             ofproto->stp_last_tick = now;
2105         }
2106         while (stp_get_changed_port(ofproto->stp, &sp)) {
2107             struct ofport_dpif *ofport = stp_port_get_aux(sp);
2108
2109             if (ofport) {
2110                 update_stp_port_state(ofport);
2111             }
2112         }
2113
2114         if (stp_check_and_reset_fdb_flush(ofproto->stp)) {
2115             mac_learning_flush(ofproto->ml, &ofproto->backer->revalidate_set);
2116         }
2117     }
2118 }
2119
2120 static void
2121 stp_wait(struct ofproto_dpif *ofproto)
2122 {
2123     if (ofproto->stp) {
2124         poll_timer_wait(1000);
2125     }
2126 }
2127
2128 /* Returns true if STP should process 'flow'.  Sets fields in 'wc' that
2129  * were used to make the determination.*/
2130 bool
2131 stp_should_process_flow(const struct flow *flow, struct flow_wildcards *wc)
2132 {
2133     memset(&wc->masks.dl_dst, 0xff, sizeof wc->masks.dl_dst);
2134     return eth_addr_equals(flow->dl_dst, eth_addr_stp);
2135 }
2136
2137 void
2138 stp_process_packet(const struct ofport_dpif *ofport,
2139                    const struct ofpbuf *packet)
2140 {
2141     struct ofpbuf payload = *packet;
2142     struct eth_header *eth = payload.data;
2143     struct stp_port *sp = ofport->stp_port;
2144
2145     /* Sink packets on ports that have STP disabled when the bridge has
2146      * STP enabled. */
2147     if (!sp || stp_port_get_state(sp) == STP_DISABLED) {
2148         return;
2149     }
2150
2151     /* Trim off padding on payload. */
2152     if (payload.size > ntohs(eth->eth_type) + ETH_HEADER_LEN) {
2153         payload.size = ntohs(eth->eth_type) + ETH_HEADER_LEN;
2154     }
2155
2156     if (ofpbuf_try_pull(&payload, ETH_HEADER_LEN + LLC_HEADER_LEN)) {
2157         stp_received_bpdu(sp, payload.data, payload.size);
2158     }
2159 }
2160 \f
2161 int
2162 ofproto_dpif_queue_to_priority(const struct ofproto_dpif *ofproto,
2163                                uint32_t queue_id, uint32_t *priority)
2164 {
2165     return dpif_queue_to_priority(ofproto->backer->dpif, queue_id, priority);
2166 }
2167
2168 static struct priority_to_dscp *
2169 get_priority(const struct ofport_dpif *ofport, uint32_t priority)
2170 {
2171     struct priority_to_dscp *pdscp;
2172     uint32_t hash;
2173
2174     hash = hash_int(priority, 0);
2175     HMAP_FOR_EACH_IN_BUCKET (pdscp, hmap_node, hash, &ofport->priorities) {
2176         if (pdscp->priority == priority) {
2177             return pdscp;
2178         }
2179     }
2180     return NULL;
2181 }
2182
2183 bool
2184 ofproto_dpif_dscp_from_priority(const struct ofport_dpif *ofport,
2185                                 uint32_t priority, uint8_t *dscp)
2186 {
2187     struct priority_to_dscp *pdscp = get_priority(ofport, priority);
2188     *dscp = pdscp ? pdscp->dscp : 0;
2189     return pdscp != NULL;
2190 }
2191
2192 static void
2193 ofport_clear_priorities(struct ofport_dpif *ofport)
2194 {
2195     struct priority_to_dscp *pdscp, *next;
2196
2197     HMAP_FOR_EACH_SAFE (pdscp, next, hmap_node, &ofport->priorities) {
2198         hmap_remove(&ofport->priorities, &pdscp->hmap_node);
2199         free(pdscp);
2200     }
2201 }
2202
2203 static int
2204 set_queues(struct ofport *ofport_,
2205            const struct ofproto_port_queue *qdscp_list,
2206            size_t n_qdscp)
2207 {
2208     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
2209     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
2210     struct hmap new = HMAP_INITIALIZER(&new);
2211     size_t i;
2212
2213     for (i = 0; i < n_qdscp; i++) {
2214         struct priority_to_dscp *pdscp;
2215         uint32_t priority;
2216         uint8_t dscp;
2217
2218         dscp = (qdscp_list[i].dscp << 2) & IP_DSCP_MASK;
2219         if (dpif_queue_to_priority(ofproto->backer->dpif, qdscp_list[i].queue,
2220                                    &priority)) {
2221             continue;
2222         }
2223
2224         pdscp = get_priority(ofport, priority);
2225         if (pdscp) {
2226             hmap_remove(&ofport->priorities, &pdscp->hmap_node);
2227         } else {
2228             pdscp = xmalloc(sizeof *pdscp);
2229             pdscp->priority = priority;
2230             pdscp->dscp = dscp;
2231             ofproto->backer->need_revalidate = REV_RECONFIGURE;
2232         }
2233
2234         if (pdscp->dscp != dscp) {
2235             pdscp->dscp = dscp;
2236             ofproto->backer->need_revalidate = REV_RECONFIGURE;
2237         }
2238
2239         hmap_insert(&new, &pdscp->hmap_node, hash_int(pdscp->priority, 0));
2240     }
2241
2242     if (!hmap_is_empty(&ofport->priorities)) {
2243         ofport_clear_priorities(ofport);
2244         ofproto->backer->need_revalidate = REV_RECONFIGURE;
2245     }
2246
2247     hmap_swap(&new, &ofport->priorities);
2248     hmap_destroy(&new);
2249
2250     return 0;
2251 }
2252 \f
2253 /* Bundles. */
2254
2255 /* Expires all MAC learning entries associated with 'bundle' and forces its
2256  * ofproto to revalidate every flow.
2257  *
2258  * Normally MAC learning entries are removed only from the ofproto associated
2259  * with 'bundle', but if 'all_ofprotos' is true, then the MAC learning entries
2260  * are removed from every ofproto.  When patch ports and SLB bonds are in use
2261  * and a VM migration happens and the gratuitous ARPs are somehow lost, this
2262  * avoids a MAC_ENTRY_IDLE_TIME delay before the migrated VM can communicate
2263  * with the host from which it migrated. */
2264 static void
2265 bundle_flush_macs(struct ofbundle *bundle, bool all_ofprotos)
2266 {
2267     struct ofproto_dpif *ofproto = bundle->ofproto;
2268     struct mac_learning *ml = ofproto->ml;
2269     struct mac_entry *mac, *next_mac;
2270
2271     ofproto->backer->need_revalidate = REV_RECONFIGURE;
2272     LIST_FOR_EACH_SAFE (mac, next_mac, lru_node, &ml->lrus) {
2273         if (mac->port.p == bundle) {
2274             if (all_ofprotos) {
2275                 struct ofproto_dpif *o;
2276
2277                 HMAP_FOR_EACH (o, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
2278                     if (o != ofproto) {
2279                         struct mac_entry *e;
2280
2281                         e = mac_learning_lookup(o->ml, mac->mac, mac->vlan,
2282                                                 NULL);
2283                         if (e) {
2284                             mac_learning_expire(o->ml, e);
2285                         }
2286                     }
2287                 }
2288             }
2289
2290             mac_learning_expire(ml, mac);
2291         }
2292     }
2293 }
2294
2295 static struct ofbundle *
2296 bundle_lookup(const struct ofproto_dpif *ofproto, void *aux)
2297 {
2298     struct ofbundle *bundle;
2299
2300     HMAP_FOR_EACH_IN_BUCKET (bundle, hmap_node, hash_pointer(aux, 0),
2301                              &ofproto->bundles) {
2302         if (bundle->aux == aux) {
2303             return bundle;
2304         }
2305     }
2306     return NULL;
2307 }
2308
2309 static void
2310 bundle_update(struct ofbundle *bundle)
2311 {
2312     struct ofport_dpif *port;
2313
2314     bundle->floodable = true;
2315     LIST_FOR_EACH (port, bundle_node, &bundle->ports) {
2316         if (port->up.pp.config & OFPUTIL_PC_NO_FLOOD
2317             || !stp_forward_in_state(port->stp_state)) {
2318             bundle->floodable = false;
2319             break;
2320         }
2321     }
2322 }
2323
2324 static void
2325 bundle_del_port(struct ofport_dpif *port)
2326 {
2327     struct ofbundle *bundle = port->bundle;
2328
2329     bundle->ofproto->backer->need_revalidate = REV_RECONFIGURE;
2330
2331     list_remove(&port->bundle_node);
2332     port->bundle = NULL;
2333
2334     if (bundle->lacp) {
2335         lacp_slave_unregister(bundle->lacp, port);
2336     }
2337     if (bundle->bond) {
2338         bond_slave_unregister(bundle->bond, port);
2339     }
2340
2341     bundle_update(bundle);
2342 }
2343
2344 static bool
2345 bundle_add_port(struct ofbundle *bundle, ofp_port_t ofp_port,
2346                 struct lacp_slave_settings *lacp)
2347 {
2348     struct ofport_dpif *port;
2349
2350     port = get_ofp_port(bundle->ofproto, ofp_port);
2351     if (!port) {
2352         return false;
2353     }
2354
2355     if (port->bundle != bundle) {
2356         bundle->ofproto->backer->need_revalidate = REV_RECONFIGURE;
2357         if (port->bundle) {
2358             bundle_del_port(port);
2359         }
2360
2361         port->bundle = bundle;
2362         list_push_back(&bundle->ports, &port->bundle_node);
2363         if (port->up.pp.config & OFPUTIL_PC_NO_FLOOD
2364             || !stp_forward_in_state(port->stp_state)) {
2365             bundle->floodable = false;
2366         }
2367     }
2368     if (lacp) {
2369         bundle->ofproto->backer->need_revalidate = REV_RECONFIGURE;
2370         lacp_slave_register(bundle->lacp, port, lacp);
2371     }
2372
2373     return true;
2374 }
2375
2376 static void
2377 bundle_destroy(struct ofbundle *bundle)
2378 {
2379     struct ofproto_dpif *ofproto;
2380     struct ofport_dpif *port, *next_port;
2381
2382     if (!bundle) {
2383         return;
2384     }
2385
2386     ofproto = bundle->ofproto;
2387     mbridge_unregister_bundle(ofproto->mbridge, bundle->aux);
2388
2389     xlate_bundle_remove(bundle);
2390
2391     LIST_FOR_EACH_SAFE (port, next_port, bundle_node, &bundle->ports) {
2392         bundle_del_port(port);
2393     }
2394
2395     bundle_flush_macs(bundle, true);
2396     hmap_remove(&ofproto->bundles, &bundle->hmap_node);
2397     free(bundle->name);
2398     free(bundle->trunks);
2399     lacp_unref(bundle->lacp);
2400     bond_unref(bundle->bond);
2401     free(bundle);
2402 }
2403
2404 static int
2405 bundle_set(struct ofproto *ofproto_, void *aux,
2406            const struct ofproto_bundle_settings *s)
2407 {
2408     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2409     bool need_flush = false;
2410     struct ofport_dpif *port;
2411     struct ofbundle *bundle;
2412     unsigned long *trunks;
2413     int vlan;
2414     size_t i;
2415     bool ok;
2416
2417     if (!s) {
2418         bundle_destroy(bundle_lookup(ofproto, aux));
2419         return 0;
2420     }
2421
2422     ovs_assert(s->n_slaves == 1 || s->bond != NULL);
2423     ovs_assert((s->lacp != NULL) == (s->lacp_slaves != NULL));
2424
2425     bundle = bundle_lookup(ofproto, aux);
2426     if (!bundle) {
2427         bundle = xmalloc(sizeof *bundle);
2428
2429         bundle->ofproto = ofproto;
2430         hmap_insert(&ofproto->bundles, &bundle->hmap_node,
2431                     hash_pointer(aux, 0));
2432         bundle->aux = aux;
2433         bundle->name = NULL;
2434
2435         list_init(&bundle->ports);
2436         bundle->vlan_mode = PORT_VLAN_TRUNK;
2437         bundle->vlan = -1;
2438         bundle->trunks = NULL;
2439         bundle->use_priority_tags = s->use_priority_tags;
2440         bundle->lacp = NULL;
2441         bundle->bond = NULL;
2442
2443         bundle->floodable = true;
2444         mbridge_register_bundle(ofproto->mbridge, bundle);
2445     }
2446
2447     if (!bundle->name || strcmp(s->name, bundle->name)) {
2448         free(bundle->name);
2449         bundle->name = xstrdup(s->name);
2450     }
2451
2452     /* LACP. */
2453     if (s->lacp) {
2454         if (!bundle->lacp) {
2455             ofproto->backer->need_revalidate = REV_RECONFIGURE;
2456             bundle->lacp = lacp_create();
2457         }
2458         lacp_configure(bundle->lacp, s->lacp);
2459     } else {
2460         lacp_unref(bundle->lacp);
2461         bundle->lacp = NULL;
2462     }
2463
2464     /* Update set of ports. */
2465     ok = true;
2466     for (i = 0; i < s->n_slaves; i++) {
2467         if (!bundle_add_port(bundle, s->slaves[i],
2468                              s->lacp ? &s->lacp_slaves[i] : NULL)) {
2469             ok = false;
2470         }
2471     }
2472     if (!ok || list_size(&bundle->ports) != s->n_slaves) {
2473         struct ofport_dpif *next_port;
2474
2475         LIST_FOR_EACH_SAFE (port, next_port, bundle_node, &bundle->ports) {
2476             for (i = 0; i < s->n_slaves; i++) {
2477                 if (s->slaves[i] == port->up.ofp_port) {
2478                     goto found;
2479                 }
2480             }
2481
2482             bundle_del_port(port);
2483         found: ;
2484         }
2485     }
2486     ovs_assert(list_size(&bundle->ports) <= s->n_slaves);
2487
2488     if (list_is_empty(&bundle->ports)) {
2489         bundle_destroy(bundle);
2490         return EINVAL;
2491     }
2492
2493     /* Set VLAN tagging mode */
2494     if (s->vlan_mode != bundle->vlan_mode
2495         || s->use_priority_tags != bundle->use_priority_tags) {
2496         bundle->vlan_mode = s->vlan_mode;
2497         bundle->use_priority_tags = s->use_priority_tags;
2498         need_flush = true;
2499     }
2500
2501     /* Set VLAN tag. */
2502     vlan = (s->vlan_mode == PORT_VLAN_TRUNK ? -1
2503             : s->vlan >= 0 && s->vlan <= 4095 ? s->vlan
2504             : 0);
2505     if (vlan != bundle->vlan) {
2506         bundle->vlan = vlan;
2507         need_flush = true;
2508     }
2509
2510     /* Get trunked VLANs. */
2511     switch (s->vlan_mode) {
2512     case PORT_VLAN_ACCESS:
2513         trunks = NULL;
2514         break;
2515
2516     case PORT_VLAN_TRUNK:
2517         trunks = CONST_CAST(unsigned long *, s->trunks);
2518         break;
2519
2520     case PORT_VLAN_NATIVE_UNTAGGED:
2521     case PORT_VLAN_NATIVE_TAGGED:
2522         if (vlan != 0 && (!s->trunks
2523                           || !bitmap_is_set(s->trunks, vlan)
2524                           || bitmap_is_set(s->trunks, 0))) {
2525             /* Force trunking the native VLAN and prohibit trunking VLAN 0. */
2526             if (s->trunks) {
2527                 trunks = bitmap_clone(s->trunks, 4096);
2528             } else {
2529                 trunks = bitmap_allocate1(4096);
2530             }
2531             bitmap_set1(trunks, vlan);
2532             bitmap_set0(trunks, 0);
2533         } else {
2534             trunks = CONST_CAST(unsigned long *, s->trunks);
2535         }
2536         break;
2537
2538     default:
2539         NOT_REACHED();
2540     }
2541     if (!vlan_bitmap_equal(trunks, bundle->trunks)) {
2542         free(bundle->trunks);
2543         if (trunks == s->trunks) {
2544             bundle->trunks = vlan_bitmap_clone(trunks);
2545         } else {
2546             bundle->trunks = trunks;
2547             trunks = NULL;
2548         }
2549         need_flush = true;
2550     }
2551     if (trunks != s->trunks) {
2552         free(trunks);
2553     }
2554
2555     /* Bonding. */
2556     if (!list_is_short(&bundle->ports)) {
2557         bundle->ofproto->has_bonded_bundles = true;
2558         if (bundle->bond) {
2559             if (bond_reconfigure(bundle->bond, s->bond)) {
2560                 ofproto->backer->need_revalidate = REV_RECONFIGURE;
2561             }
2562         } else {
2563             bundle->bond = bond_create(s->bond);
2564             ofproto->backer->need_revalidate = REV_RECONFIGURE;
2565         }
2566
2567         LIST_FOR_EACH (port, bundle_node, &bundle->ports) {
2568             bond_slave_register(bundle->bond, port, port->up.netdev);
2569         }
2570     } else {
2571         bond_unref(bundle->bond);
2572         bundle->bond = NULL;
2573     }
2574
2575     /* If we changed something that would affect MAC learning, un-learn
2576      * everything on this port and force flow revalidation. */
2577     if (need_flush) {
2578         bundle_flush_macs(bundle, false);
2579     }
2580
2581     return 0;
2582 }
2583
2584 static void
2585 bundle_remove(struct ofport *port_)
2586 {
2587     struct ofport_dpif *port = ofport_dpif_cast(port_);
2588     struct ofbundle *bundle = port->bundle;
2589
2590     if (bundle) {
2591         bundle_del_port(port);
2592         if (list_is_empty(&bundle->ports)) {
2593             bundle_destroy(bundle);
2594         } else if (list_is_short(&bundle->ports)) {
2595             bond_unref(bundle->bond);
2596             bundle->bond = NULL;
2597         }
2598     }
2599 }
2600
2601 static void
2602 send_pdu_cb(void *port_, const void *pdu, size_t pdu_size)
2603 {
2604     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 10);
2605     struct ofport_dpif *port = port_;
2606     uint8_t ea[ETH_ADDR_LEN];
2607     int error;
2608
2609     error = netdev_get_etheraddr(port->up.netdev, ea);
2610     if (!error) {
2611         struct ofpbuf packet;
2612         void *packet_pdu;
2613
2614         ofpbuf_init(&packet, 0);
2615         packet_pdu = eth_compose(&packet, eth_addr_lacp, ea, ETH_TYPE_LACP,
2616                                  pdu_size);
2617         memcpy(packet_pdu, pdu, pdu_size);
2618
2619         send_packet(port, &packet);
2620         ofpbuf_uninit(&packet);
2621     } else {
2622         VLOG_ERR_RL(&rl, "port %s: cannot obtain Ethernet address of iface "
2623                     "%s (%s)", port->bundle->name,
2624                     netdev_get_name(port->up.netdev), ovs_strerror(error));
2625     }
2626 }
2627
2628 static void
2629 bundle_send_learning_packets(struct ofbundle *bundle)
2630 {
2631     struct ofproto_dpif *ofproto = bundle->ofproto;
2632     int error, n_packets, n_errors;
2633     struct mac_entry *e;
2634
2635     error = n_packets = n_errors = 0;
2636     LIST_FOR_EACH (e, lru_node, &ofproto->ml->lrus) {
2637         if (e->port.p != bundle) {
2638             struct ofpbuf *learning_packet;
2639             struct ofport_dpif *port;
2640             void *port_void;
2641             int ret;
2642
2643             /* The assignment to "port" is unnecessary but makes "grep"ing for
2644              * struct ofport_dpif more effective. */
2645             learning_packet = bond_compose_learning_packet(bundle->bond,
2646                                                            e->mac, e->vlan,
2647                                                            &port_void);
2648             port = port_void;
2649             ret = send_packet(port, learning_packet);
2650             ofpbuf_delete(learning_packet);
2651             if (ret) {
2652                 error = ret;
2653                 n_errors++;
2654             }
2655             n_packets++;
2656         }
2657     }
2658
2659     if (n_errors) {
2660         static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 5);
2661         VLOG_WARN_RL(&rl, "bond %s: %d errors sending %d gratuitous learning "
2662                      "packets, last error was: %s",
2663                      bundle->name, n_errors, n_packets, ovs_strerror(error));
2664     } else {
2665         VLOG_DBG("bond %s: sent %d gratuitous learning packets",
2666                  bundle->name, n_packets);
2667     }
2668 }
2669
2670 static void
2671 bundle_run(struct ofbundle *bundle)
2672 {
2673     if (bundle->lacp) {
2674         lacp_run(bundle->lacp, send_pdu_cb);
2675     }
2676     if (bundle->bond) {
2677         struct ofport_dpif *port;
2678
2679         LIST_FOR_EACH (port, bundle_node, &bundle->ports) {
2680             bond_slave_set_may_enable(bundle->bond, port, port->may_enable);
2681         }
2682
2683         bond_run(bundle->bond, &bundle->ofproto->backer->revalidate_set,
2684                  lacp_status(bundle->lacp));
2685         if (bond_should_send_learning_packets(bundle->bond)) {
2686             bundle_send_learning_packets(bundle);
2687         }
2688     }
2689 }
2690
2691 static void
2692 bundle_wait(struct ofbundle *bundle)
2693 {
2694     if (bundle->lacp) {
2695         lacp_wait(bundle->lacp);
2696     }
2697     if (bundle->bond) {
2698         bond_wait(bundle->bond);
2699     }
2700 }
2701 \f
2702 /* Mirrors. */
2703
2704 static int
2705 mirror_set__(struct ofproto *ofproto_, void *aux,
2706              const struct ofproto_mirror_settings *s)
2707 {
2708     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2709     struct ofbundle **srcs, **dsts;
2710     int error;
2711     size_t i;
2712
2713     if (!s) {
2714         mirror_destroy(ofproto->mbridge, aux);
2715         return 0;
2716     }
2717
2718     srcs = xmalloc(s->n_srcs * sizeof *srcs);
2719     dsts = xmalloc(s->n_dsts * sizeof *dsts);
2720
2721     for (i = 0; i < s->n_srcs; i++) {
2722         srcs[i] = bundle_lookup(ofproto, s->srcs[i]);
2723     }
2724
2725     for (i = 0; i < s->n_dsts; i++) {
2726         dsts[i] = bundle_lookup(ofproto, s->dsts[i]);
2727     }
2728
2729     error = mirror_set(ofproto->mbridge, aux, s->name, srcs, s->n_srcs, dsts,
2730                        s->n_dsts, s->src_vlans,
2731                        bundle_lookup(ofproto, s->out_bundle), s->out_vlan);
2732     free(srcs);
2733     free(dsts);
2734     return error;
2735 }
2736
2737 static int
2738 mirror_get_stats__(struct ofproto *ofproto, void *aux,
2739                    uint64_t *packets, uint64_t *bytes)
2740 {
2741     push_all_stats();
2742     return mirror_get_stats(ofproto_dpif_cast(ofproto)->mbridge, aux, packets,
2743                             bytes);
2744 }
2745
2746 static int
2747 set_flood_vlans(struct ofproto *ofproto_, unsigned long *flood_vlans)
2748 {
2749     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2750     if (mac_learning_set_flood_vlans(ofproto->ml, flood_vlans)) {
2751         mac_learning_flush(ofproto->ml, &ofproto->backer->revalidate_set);
2752     }
2753     return 0;
2754 }
2755
2756 static bool
2757 is_mirror_output_bundle(const struct ofproto *ofproto_, void *aux)
2758 {
2759     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2760     struct ofbundle *bundle = bundle_lookup(ofproto, aux);
2761     return bundle && mirror_bundle_out(ofproto->mbridge, bundle) != 0;
2762 }
2763
2764 static void
2765 forward_bpdu_changed(struct ofproto *ofproto_)
2766 {
2767     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2768     ofproto->backer->need_revalidate = REV_RECONFIGURE;
2769 }
2770
2771 static void
2772 set_mac_table_config(struct ofproto *ofproto_, unsigned int idle_time,
2773                      size_t max_entries)
2774 {
2775     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2776     mac_learning_set_idle_time(ofproto->ml, idle_time);
2777     mac_learning_set_max_entries(ofproto->ml, max_entries);
2778 }
2779 \f
2780 /* Ports. */
2781
2782 static struct ofport_dpif *
2783 get_ofp_port(const struct ofproto_dpif *ofproto, ofp_port_t ofp_port)
2784 {
2785     struct ofport *ofport = ofproto_get_port(&ofproto->up, ofp_port);
2786     return ofport ? ofport_dpif_cast(ofport) : NULL;
2787 }
2788
2789 static struct ofport_dpif *
2790 get_odp_port(const struct ofproto_dpif *ofproto, odp_port_t odp_port)
2791 {
2792     struct ofport_dpif *port = odp_port_to_ofport(ofproto->backer, odp_port);
2793     return port && &ofproto->up == port->up.ofproto ? port : NULL;
2794 }
2795
2796 static void
2797 ofproto_port_from_dpif_port(struct ofproto_dpif *ofproto,
2798                             struct ofproto_port *ofproto_port,
2799                             struct dpif_port *dpif_port)
2800 {
2801     ofproto_port->name = dpif_port->name;
2802     ofproto_port->type = dpif_port->type;
2803     ofproto_port->ofp_port = odp_port_to_ofp_port(ofproto, dpif_port->port_no);
2804 }
2805
2806 static void
2807 ofport_update_peer(struct ofport_dpif *ofport)
2808 {
2809     const struct ofproto_dpif *ofproto;
2810     struct dpif_backer *backer;
2811     const char *peer_name;
2812
2813     if (!netdev_vport_is_patch(ofport->up.netdev)) {
2814         return;
2815     }
2816
2817     backer = ofproto_dpif_cast(ofport->up.ofproto)->backer;
2818     backer->need_revalidate = REV_RECONFIGURE;
2819
2820     if (ofport->peer) {
2821         ofport->peer->peer = NULL;
2822         ofport->peer = NULL;
2823     }
2824
2825     peer_name = netdev_vport_patch_peer(ofport->up.netdev);
2826     if (!peer_name) {
2827         return;
2828     }
2829
2830     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
2831         struct ofport *peer_ofport;
2832         struct ofport_dpif *peer;
2833         const char *peer_peer;
2834
2835         if (ofproto->backer != backer) {
2836             continue;
2837         }
2838
2839         peer_ofport = shash_find_data(&ofproto->up.port_by_name, peer_name);
2840         if (!peer_ofport) {
2841             continue;
2842         }
2843
2844         peer = ofport_dpif_cast(peer_ofport);
2845         peer_peer = netdev_vport_patch_peer(peer->up.netdev);
2846         if (peer_peer && !strcmp(netdev_get_name(ofport->up.netdev),
2847                                  peer_peer)) {
2848             ofport->peer = peer;
2849             ofport->peer->peer = ofport;
2850         }
2851
2852         return;
2853     }
2854 }
2855
2856 static void
2857 port_run_fast(struct ofport_dpif *ofport)
2858 {
2859     if (ofport->cfm && cfm_should_send_ccm(ofport->cfm)) {
2860         struct ofpbuf packet;
2861
2862         ofpbuf_init(&packet, 0);
2863         cfm_compose_ccm(ofport->cfm, &packet, ofport->up.pp.hw_addr);
2864         send_packet(ofport, &packet);
2865         ofpbuf_uninit(&packet);
2866     }
2867
2868     if (ofport->bfd && bfd_should_send_packet(ofport->bfd)) {
2869         struct ofpbuf packet;
2870
2871         ofpbuf_init(&packet, 0);
2872         bfd_put_packet(ofport->bfd, &packet, ofport->up.pp.hw_addr);
2873         send_packet(ofport, &packet);
2874         ofpbuf_uninit(&packet);
2875     }
2876 }
2877
2878 static void
2879 port_run(struct ofport_dpif *ofport)
2880 {
2881     long long int carrier_seq = netdev_get_carrier_resets(ofport->up.netdev);
2882     bool carrier_changed = carrier_seq != ofport->carrier_seq;
2883     bool enable = netdev_get_carrier(ofport->up.netdev);
2884
2885     ofport->carrier_seq = carrier_seq;
2886
2887     port_run_fast(ofport);
2888
2889     if (ofport->cfm) {
2890         int cfm_opup = cfm_get_opup(ofport->cfm);
2891
2892         cfm_run(ofport->cfm);
2893         enable = enable && !cfm_get_fault(ofport->cfm);
2894
2895         if (cfm_opup >= 0) {
2896             enable = enable && cfm_opup;
2897         }
2898     }
2899
2900     if (ofport->bfd) {
2901         bfd_run(ofport->bfd);
2902         enable = enable && bfd_forwarding(ofport->bfd);
2903     }
2904
2905     if (ofport->bundle) {
2906         enable = enable && lacp_slave_may_enable(ofport->bundle->lacp, ofport);
2907         if (carrier_changed) {
2908             lacp_slave_carrier_changed(ofport->bundle->lacp, ofport);
2909         }
2910     }
2911
2912     if (ofport->may_enable != enable) {
2913         struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
2914         ofproto->backer->need_revalidate = REV_PORT_TOGGLED;
2915     }
2916
2917     ofport->may_enable = enable;
2918 }
2919
2920 static void
2921 port_wait(struct ofport_dpif *ofport)
2922 {
2923     if (ofport->cfm) {
2924         cfm_wait(ofport->cfm);
2925     }
2926
2927     if (ofport->bfd) {
2928         bfd_wait(ofport->bfd);
2929     }
2930 }
2931
2932 static int
2933 port_query_by_name(const struct ofproto *ofproto_, const char *devname,
2934                    struct ofproto_port *ofproto_port)
2935 {
2936     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2937     struct dpif_port dpif_port;
2938     int error;
2939
2940     if (sset_contains(&ofproto->ghost_ports, devname)) {
2941         const char *type = netdev_get_type_from_name(devname);
2942
2943         /* We may be called before ofproto->up.port_by_name is populated with
2944          * the appropriate ofport.  For this reason, we must get the name and
2945          * type from the netdev layer directly. */
2946         if (type) {
2947             const struct ofport *ofport;
2948
2949             ofport = shash_find_data(&ofproto->up.port_by_name, devname);
2950             ofproto_port->ofp_port = ofport ? ofport->ofp_port : OFPP_NONE;
2951             ofproto_port->name = xstrdup(devname);
2952             ofproto_port->type = xstrdup(type);
2953             return 0;
2954         }
2955         return ENODEV;
2956     }
2957
2958     if (!sset_contains(&ofproto->ports, devname)) {
2959         return ENODEV;
2960     }
2961     error = dpif_port_query_by_name(ofproto->backer->dpif,
2962                                     devname, &dpif_port);
2963     if (!error) {
2964         ofproto_port_from_dpif_port(ofproto, ofproto_port, &dpif_port);
2965     }
2966     return error;
2967 }
2968
2969 static int
2970 port_add(struct ofproto *ofproto_, struct netdev *netdev)
2971 {
2972     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
2973     const char *devname = netdev_get_name(netdev);
2974     char namebuf[NETDEV_VPORT_NAME_BUFSIZE];
2975     const char *dp_port_name;
2976
2977     if (netdev_vport_is_patch(netdev)) {
2978         sset_add(&ofproto->ghost_ports, netdev_get_name(netdev));
2979         return 0;
2980     }
2981
2982     dp_port_name = netdev_vport_get_dpif_port(netdev, namebuf, sizeof namebuf);
2983     if (!dpif_port_exists(ofproto->backer->dpif, dp_port_name)) {
2984         odp_port_t port_no = ODPP_NONE;
2985         int error;
2986
2987         error = dpif_port_add(ofproto->backer->dpif, netdev, &port_no);
2988         if (error) {
2989             return error;
2990         }
2991         if (netdev_get_tunnel_config(netdev)) {
2992             simap_put(&ofproto->backer->tnl_backers,
2993                       dp_port_name, odp_to_u32(port_no));
2994         }
2995     }
2996
2997     if (netdev_get_tunnel_config(netdev)) {
2998         sset_add(&ofproto->ghost_ports, devname);
2999     } else {
3000         sset_add(&ofproto->ports, devname);
3001     }
3002     return 0;
3003 }
3004
3005 static int
3006 port_del(struct ofproto *ofproto_, ofp_port_t ofp_port)
3007 {
3008     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
3009     struct ofport_dpif *ofport = get_ofp_port(ofproto, ofp_port);
3010     int error = 0;
3011
3012     if (!ofport) {
3013         return 0;
3014     }
3015
3016     sset_find_and_delete(&ofproto->ghost_ports,
3017                          netdev_get_name(ofport->up.netdev));
3018     ofproto->backer->need_revalidate = REV_RECONFIGURE;
3019     if (!ofport->is_tunnel) {
3020         error = dpif_port_del(ofproto->backer->dpif, ofport->odp_port);
3021         if (!error) {
3022             /* The caller is going to close ofport->up.netdev.  If this is a
3023              * bonded port, then the bond is using that netdev, so remove it
3024              * from the bond.  The client will need to reconfigure everything
3025              * after deleting ports, so then the slave will get re-added. */
3026             bundle_remove(&ofport->up);
3027         }
3028     }
3029     return error;
3030 }
3031
3032 static int
3033 port_get_stats(const struct ofport *ofport_, struct netdev_stats *stats)
3034 {
3035     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
3036     int error;
3037
3038     push_all_stats();
3039
3040     error = netdev_get_stats(ofport->up.netdev, stats);
3041
3042     if (!error && ofport_->ofp_port == OFPP_LOCAL) {
3043         struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
3044
3045         /* ofproto->stats.tx_packets represents packets that we created
3046          * internally and sent to some port (e.g. packets sent with
3047          * send_packet()).  Account for them as if they had come from
3048          * OFPP_LOCAL and got forwarded. */
3049
3050         if (stats->rx_packets != UINT64_MAX) {
3051             stats->rx_packets += ofproto->stats.tx_packets;
3052         }
3053
3054         if (stats->rx_bytes != UINT64_MAX) {
3055             stats->rx_bytes += ofproto->stats.tx_bytes;
3056         }
3057
3058         /* ofproto->stats.rx_packets represents packets that were received on
3059          * some port and we processed internally and dropped (e.g. STP).
3060          * Account for them as if they had been forwarded to OFPP_LOCAL. */
3061
3062         if (stats->tx_packets != UINT64_MAX) {
3063             stats->tx_packets += ofproto->stats.rx_packets;
3064         }
3065
3066         if (stats->tx_bytes != UINT64_MAX) {
3067             stats->tx_bytes += ofproto->stats.rx_bytes;
3068         }
3069     }
3070
3071     return error;
3072 }
3073
3074 struct port_dump_state {
3075     uint32_t bucket;
3076     uint32_t offset;
3077     bool ghost;
3078
3079     struct ofproto_port port;
3080     bool has_port;
3081 };
3082
3083 static int
3084 port_dump_start(const struct ofproto *ofproto_ OVS_UNUSED, void **statep)
3085 {
3086     *statep = xzalloc(sizeof(struct port_dump_state));
3087     return 0;
3088 }
3089
3090 static int
3091 port_dump_next(const struct ofproto *ofproto_, void *state_,
3092                struct ofproto_port *port)
3093 {
3094     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
3095     struct port_dump_state *state = state_;
3096     const struct sset *sset;
3097     struct sset_node *node;
3098
3099     if (state->has_port) {
3100         ofproto_port_destroy(&state->port);
3101         state->has_port = false;
3102     }
3103     sset = state->ghost ? &ofproto->ghost_ports : &ofproto->ports;
3104     while ((node = sset_at_position(sset, &state->bucket, &state->offset))) {
3105         int error;
3106
3107         error = port_query_by_name(ofproto_, node->name, &state->port);
3108         if (!error) {
3109             *port = state->port;
3110             state->has_port = true;
3111             return 0;
3112         } else if (error != ENODEV) {
3113             return error;
3114         }
3115     }
3116
3117     if (!state->ghost) {
3118         state->ghost = true;
3119         state->bucket = 0;
3120         state->offset = 0;
3121         return port_dump_next(ofproto_, state_, port);
3122     }
3123
3124     return EOF;
3125 }
3126
3127 static int
3128 port_dump_done(const struct ofproto *ofproto_ OVS_UNUSED, void *state_)
3129 {
3130     struct port_dump_state *state = state_;
3131
3132     if (state->has_port) {
3133         ofproto_port_destroy(&state->port);
3134     }
3135     free(state);
3136     return 0;
3137 }
3138
3139 static int
3140 port_poll(const struct ofproto *ofproto_, char **devnamep)
3141 {
3142     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
3143
3144     if (ofproto->port_poll_errno) {
3145         int error = ofproto->port_poll_errno;
3146         ofproto->port_poll_errno = 0;
3147         return error;
3148     }
3149
3150     if (sset_is_empty(&ofproto->port_poll_set)) {
3151         return EAGAIN;
3152     }
3153
3154     *devnamep = sset_pop(&ofproto->port_poll_set);
3155     return 0;
3156 }
3157
3158 static void
3159 port_poll_wait(const struct ofproto *ofproto_)
3160 {
3161     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
3162     dpif_port_poll_wait(ofproto->backer->dpif);
3163 }
3164
3165 static int
3166 port_is_lacp_current(const struct ofport *ofport_)
3167 {
3168     const struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
3169     return (ofport->bundle && ofport->bundle->lacp
3170             ? lacp_slave_is_current(ofport->bundle->lacp, ofport)
3171             : -1);
3172 }
3173 \f
3174 /* Upcall handling. */
3175
3176 /* Flow miss batching.
3177  *
3178  * Some dpifs implement operations faster when you hand them off in a batch.
3179  * To allow batching, "struct flow_miss" queues the dpif-related work needed
3180  * for a given flow.  Each "struct flow_miss" corresponds to sending one or
3181  * more packets, plus possibly installing the flow in the dpif.
3182  *
3183  * So far we only batch the operations that affect flow setup time the most.
3184  * It's possible to batch more than that, but the benefit might be minimal. */
3185 struct flow_miss {
3186     struct hmap_node hmap_node;
3187     struct ofproto_dpif *ofproto;
3188     struct flow flow;
3189     enum odp_key_fitness key_fitness;
3190     const struct nlattr *key;
3191     size_t key_len;
3192     struct list packets;
3193     enum dpif_upcall_type upcall_type;
3194 };
3195
3196 struct flow_miss_op {
3197     struct dpif_op dpif_op;
3198
3199     uint64_t slow_stub[128 / 8]; /* Buffer for compose_slow_path() */
3200     struct xlate_out xout;
3201     bool xout_garbage;           /* 'xout' needs to be uninitialized? */
3202
3203     struct ofpbuf mask;          /* Flow mask for "put" ops. */
3204     struct odputil_keybuf maskbuf;
3205
3206     /* If this is a "put" op, then a pointer to the subfacet that should
3207      * be marked as uninstalled if the operation fails. */
3208     struct subfacet *subfacet;
3209 };
3210
3211 /* Sends an OFPT_PACKET_IN message for 'packet' of type OFPR_NO_MATCH to each
3212  * OpenFlow controller as necessary according to their individual
3213  * configurations. */
3214 static void
3215 send_packet_in_miss(struct ofproto_dpif *ofproto, const struct ofpbuf *packet,
3216                     const struct flow *flow)
3217 {
3218     struct ofputil_packet_in pin;
3219
3220     pin.packet = packet->data;
3221     pin.packet_len = packet->size;
3222     pin.reason = OFPR_NO_MATCH;
3223     pin.controller_id = 0;
3224
3225     pin.table_id = 0;
3226     pin.cookie = 0;
3227
3228     pin.send_len = 0;           /* not used for flow table misses */
3229
3230     flow_get_metadata(flow, &pin.fmd);
3231
3232     connmgr_send_packet_in(ofproto->up.connmgr, &pin);
3233 }
3234
3235 static struct flow_miss *
3236 flow_miss_find(struct hmap *todo, const struct ofproto_dpif *ofproto,
3237                const struct flow *flow, uint32_t hash)
3238 {
3239     struct flow_miss *miss;
3240
3241     HMAP_FOR_EACH_WITH_HASH (miss, hmap_node, hash, todo) {
3242         if (miss->ofproto == ofproto && flow_equal(&miss->flow, flow)) {
3243             return miss;
3244         }
3245     }
3246
3247     return NULL;
3248 }
3249
3250 /* Partially Initializes 'op' as an "execute" operation for 'miss' and
3251  * 'packet'.  The caller must initialize op->actions and op->actions_len.  If
3252  * 'miss' is associated with a subfacet the caller must also initialize the
3253  * returned op->subfacet, and if anything needs to be freed after processing
3254  * the op, the caller must initialize op->garbage also. */
3255 static void
3256 init_flow_miss_execute_op(struct flow_miss *miss, struct ofpbuf *packet,
3257                           struct flow_miss_op *op)
3258 {
3259     if (miss->flow.in_port.ofp_port
3260         != vsp_realdev_to_vlandev(miss->ofproto, miss->flow.in_port.ofp_port,
3261                                   miss->flow.vlan_tci)) {
3262         /* This packet was received on a VLAN splinter port.  We
3263          * added a VLAN to the packet to make the packet resemble
3264          * the flow, but the actions were composed assuming that
3265          * the packet contained no VLAN.  So, we must remove the
3266          * VLAN header from the packet before trying to execute the
3267          * actions. */
3268         eth_pop_vlan(packet);
3269     }
3270
3271     op->subfacet = NULL;
3272     op->xout_garbage = false;
3273     op->dpif_op.type = DPIF_OP_EXECUTE;
3274     op->dpif_op.u.execute.key = miss->key;
3275     op->dpif_op.u.execute.key_len = miss->key_len;
3276     op->dpif_op.u.execute.packet = packet;
3277     ofpbuf_use_stack(&op->mask, &op->maskbuf, sizeof op->maskbuf);
3278 }
3279
3280 /* Helper for handle_flow_miss_without_facet() and
3281  * handle_flow_miss_with_facet(). */
3282 static void
3283 handle_flow_miss_common(struct ofproto_dpif *ofproto, struct ofpbuf *packet,
3284                         const struct flow *flow, bool fail_open)
3285 {
3286     if (fail_open) {
3287         /*
3288          * Extra-special case for fail-open mode.
3289          *
3290          * We are in fail-open mode and the packet matched the fail-open
3291          * rule, but we are connected to a controller too.  We should send
3292          * the packet up to the controller in the hope that it will try to
3293          * set up a flow and thereby allow us to exit fail-open.
3294          *
3295          * See the top-level comment in fail-open.c for more information.
3296          */
3297         send_packet_in_miss(ofproto, packet, flow);
3298     }
3299 }
3300
3301 /* Figures out whether a flow that missed in 'ofproto', whose details are in
3302  * 'miss' masked by 'wc', is likely to be worth tracking in detail in userspace
3303  * and (usually) installing a datapath flow.  The answer is usually "yes" (a
3304  * return value of true).  However, for short flows the cost of bookkeeping is
3305  * much higher than the benefits, so when the datapath holds a large number of
3306  * flows we impose some heuristics to decide which flows are likely to be worth
3307  * tracking. */
3308 static bool
3309 flow_miss_should_make_facet(struct flow_miss *miss, struct flow_wildcards *wc)
3310 {
3311     struct dpif_backer *backer = miss->ofproto->backer;
3312     uint32_t hash;
3313
3314     switch (flow_miss_model) {
3315     case OFPROTO_HANDLE_MISS_AUTO:
3316         break;
3317     case OFPROTO_HANDLE_MISS_WITH_FACETS:
3318         return true;
3319     case OFPROTO_HANDLE_MISS_WITHOUT_FACETS:
3320         return false;
3321     }
3322
3323     if (!backer->governor) {
3324         size_t n_subfacets;
3325
3326         n_subfacets = hmap_count(&backer->subfacets);
3327         if (n_subfacets * 2 <= flow_eviction_threshold) {
3328             return true;
3329         }
3330
3331         backer->governor = governor_create();
3332     }
3333
3334     hash = flow_hash_in_wildcards(&miss->flow, wc, 0);
3335     return governor_should_install_flow(backer->governor, hash,
3336                                         list_size(&miss->packets));
3337 }
3338
3339 /* Handles 'miss' without creating a facet or subfacet or creating any datapath
3340  * flow.  'miss->flow' must have matched 'rule' and been xlated into 'xout'.
3341  * May add an "execute" operation to 'ops' and increment '*n_ops'. */
3342 static void
3343 handle_flow_miss_without_facet(struct rule_dpif *rule, struct xlate_out *xout,
3344                                struct flow_miss *miss,
3345                                struct flow_miss_op *ops, size_t *n_ops)
3346 {
3347     struct ofpbuf *packet;
3348
3349     LIST_FOR_EACH (packet, list_node, &miss->packets) {
3350
3351         COVERAGE_INC(facet_suppress);
3352
3353         handle_flow_miss_common(miss->ofproto, packet, &miss->flow,
3354                                 rule->up.cr.priority == FAIL_OPEN_PRIORITY);
3355
3356         if (xout->slow) {
3357             struct xlate_in xin;
3358
3359             xlate_in_init(&xin, miss->ofproto, &miss->flow, rule, 0, packet);
3360             xlate_actions_for_side_effects(&xin);
3361         }
3362
3363         if (xout->odp_actions.size) {
3364             struct flow_miss_op *op = &ops[*n_ops];
3365             struct dpif_execute *execute = &op->dpif_op.u.execute;
3366
3367             init_flow_miss_execute_op(miss, packet, op);
3368             xlate_out_copy(&op->xout, xout);
3369             execute->actions = op->xout.odp_actions.data;
3370             execute->actions_len = op->xout.odp_actions.size;
3371             op->xout_garbage = true;
3372
3373             (*n_ops)++;
3374         }
3375     }
3376 }
3377
3378 /* Handles 'miss', which matches 'facet'.  May add any required datapath
3379  * operations to 'ops', incrementing '*n_ops' for each new op.
3380  *
3381  * All of the packets in 'miss' are considered to have arrived at time 'now'.
3382  * This is really important only for new facets: if we just called time_msec()
3383  * here, then the new subfacet or its packets could look (occasionally) as
3384  * though it was used some time after the facet was used.  That can make a
3385  * one-packet flow look like it has a nonzero duration, which looks odd in
3386  * e.g. NetFlow statistics.
3387  *
3388  * If non-null, 'stats' will be folded into 'facet'. */
3389 static void
3390 handle_flow_miss_with_facet(struct flow_miss *miss, struct facet *facet,
3391                             long long int now, struct dpif_flow_stats *stats,
3392                             struct flow_miss_op *ops, size_t *n_ops)
3393 {
3394     enum subfacet_path want_path;
3395     struct subfacet *subfacet;
3396     struct ofpbuf *packet;
3397
3398     subfacet = subfacet_create(facet, miss, now);
3399     want_path = facet->xout.slow ? SF_SLOW_PATH : SF_FAST_PATH;
3400     if (stats) {
3401         subfacet_update_stats(subfacet, stats);
3402     }
3403
3404     LIST_FOR_EACH (packet, list_node, &miss->packets) {
3405         struct flow_miss_op *op = &ops[*n_ops];
3406
3407         handle_flow_miss_common(miss->ofproto, packet, &miss->flow,
3408                                 facet->fail_open);
3409
3410         if (want_path != SF_FAST_PATH) {
3411             struct rule_dpif *rule;
3412             struct xlate_in xin;
3413
3414             rule = rule_dpif_lookup(facet->ofproto, &facet->flow, NULL);
3415             xlate_in_init(&xin, facet->ofproto, &miss->flow, rule, 0, packet);
3416             xlate_actions_for_side_effects(&xin);
3417         }
3418
3419         if (facet->xout.odp_actions.size) {
3420             struct dpif_execute *execute = &op->dpif_op.u.execute;
3421
3422             init_flow_miss_execute_op(miss, packet, op);
3423             execute->actions = facet->xout.odp_actions.data,
3424             execute->actions_len = facet->xout.odp_actions.size;
3425             (*n_ops)++;
3426         }
3427     }
3428
3429     if (miss->upcall_type == DPIF_UC_MISS || subfacet->path != want_path) {
3430         struct flow_miss_op *op = &ops[(*n_ops)++];
3431         struct dpif_flow_put *put = &op->dpif_op.u.flow_put;
3432
3433         subfacet->path = want_path;
3434
3435         ofpbuf_use_stack(&op->mask, &op->maskbuf, sizeof op->maskbuf);
3436         if (enable_megaflows) {
3437             odp_flow_key_from_mask(&op->mask, &facet->xout.wc.masks,
3438                                    &miss->flow, UINT32_MAX);
3439         }
3440
3441         op->xout_garbage = false;
3442         op->dpif_op.type = DPIF_OP_FLOW_PUT;
3443         op->subfacet = subfacet;
3444         put->flags = DPIF_FP_CREATE | DPIF_FP_MODIFY;
3445         put->key = miss->key;
3446         put->key_len = miss->key_len;
3447         put->mask = op->mask.data;
3448         put->mask_len = op->mask.size;
3449
3450         if (want_path == SF_FAST_PATH) {
3451             put->actions = facet->xout.odp_actions.data;
3452             put->actions_len = facet->xout.odp_actions.size;
3453         } else {
3454             compose_slow_path(facet->ofproto, &miss->flow, facet->xout.slow,
3455                               op->slow_stub, sizeof op->slow_stub,
3456                               &put->actions, &put->actions_len);
3457         }
3458         put->stats = NULL;
3459     }
3460 }
3461
3462 /* Handles flow miss 'miss'.  May add any required datapath operations
3463  * to 'ops', incrementing '*n_ops' for each new op. */
3464 static void
3465 handle_flow_miss(struct flow_miss *miss, struct flow_miss_op *ops,
3466                  size_t *n_ops)
3467 {
3468     struct ofproto_dpif *ofproto = miss->ofproto;
3469     struct dpif_flow_stats stats__;
3470     struct dpif_flow_stats *stats = &stats__;
3471     struct ofpbuf *packet;
3472     struct facet *facet;
3473     long long int now;
3474
3475     now = time_msec();
3476     memset(stats, 0, sizeof *stats);
3477     stats->used = now;
3478     LIST_FOR_EACH (packet, list_node, &miss->packets) {
3479         stats->tcp_flags |= packet_get_tcp_flags(packet, &miss->flow);
3480         stats->n_bytes += packet->size;
3481         stats->n_packets++;
3482     }
3483
3484     facet = facet_lookup_valid(ofproto, &miss->flow);
3485     if (!facet) {
3486         struct flow_wildcards wc;
3487         struct rule_dpif *rule;
3488         struct xlate_out xout;
3489         struct xlate_in xin;
3490
3491         flow_wildcards_init_catchall(&wc);
3492         rule = rule_dpif_lookup(ofproto, &miss->flow, &wc);
3493         rule_credit_stats(rule, stats);
3494
3495         xlate_in_init(&xin, ofproto, &miss->flow, rule, stats->tcp_flags,
3496                       NULL);
3497         xin.resubmit_stats = stats;
3498         xin.may_learn = true;
3499         xlate_actions(&xin, &xout);
3500         flow_wildcards_or(&xout.wc, &xout.wc, &wc);
3501
3502         /* There does not exist a bijection between 'struct flow' and datapath
3503          * flow keys with fitness ODP_FIT_TO_LITTLE.  This breaks a fundamental
3504          * assumption used throughout the facet and subfacet handling code.
3505          * Since we have to handle these misses in userspace anyway, we simply
3506          * skip facet creation, avoiding the problem altogether. */
3507         if (miss->key_fitness == ODP_FIT_TOO_LITTLE
3508             || !flow_miss_should_make_facet(miss, &xout.wc)) {
3509             handle_flow_miss_without_facet(rule, &xout, miss, ops, n_ops);
3510             return;
3511         }
3512
3513         facet = facet_create(miss, rule, &xout, stats);
3514         stats = NULL;
3515     }
3516     handle_flow_miss_with_facet(miss, facet, now, stats, ops, n_ops);
3517 }
3518
3519 static struct drop_key *
3520 drop_key_lookup(const struct dpif_backer *backer, const struct nlattr *key,
3521                 size_t key_len)
3522 {
3523     struct drop_key *drop_key;
3524
3525     HMAP_FOR_EACH_WITH_HASH (drop_key, hmap_node, hash_bytes(key, key_len, 0),
3526                              &backer->drop_keys) {
3527         if (drop_key->key_len == key_len
3528             && !memcmp(drop_key->key, key, key_len)) {
3529             return drop_key;
3530         }
3531     }
3532     return NULL;
3533 }
3534
3535 static void
3536 drop_key_clear(struct dpif_backer *backer)
3537 {
3538     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 15);
3539     struct drop_key *drop_key, *next;
3540
3541     HMAP_FOR_EACH_SAFE (drop_key, next, hmap_node, &backer->drop_keys) {
3542         int error;
3543
3544         error = dpif_flow_del(backer->dpif, drop_key->key, drop_key->key_len,
3545                               NULL);
3546         if (error && !VLOG_DROP_WARN(&rl)) {
3547             struct ds ds = DS_EMPTY_INITIALIZER;
3548             odp_flow_key_format(drop_key->key, drop_key->key_len, &ds);
3549             VLOG_WARN("Failed to delete drop key (%s) (%s)",
3550                       ovs_strerror(error), ds_cstr(&ds));
3551             ds_destroy(&ds);
3552         }
3553
3554         hmap_remove(&backer->drop_keys, &drop_key->hmap_node);
3555         free(drop_key->key);
3556         free(drop_key);
3557     }
3558 }
3559
3560 /* Given a datpath, packet, and flow metadata ('backer', 'packet', and 'key'
3561  * respectively), populates 'flow' with the result of odp_flow_key_to_flow().
3562  * Optionally, if nonnull, populates 'fitnessp' with the fitness of 'flow' as
3563  * returned by odp_flow_key_to_flow().  Also, optionally populates 'ofproto'
3564  * with the ofproto_dpif, and 'odp_in_port' with the datapath in_port, that
3565  * 'packet' ingressed.
3566  *
3567  * If 'ofproto' is nonnull, requires 'flow''s in_port to exist.  Otherwise sets
3568  * 'flow''s in_port to OFPP_NONE.
3569  *
3570  * This function does post-processing on data returned from
3571  * odp_flow_key_to_flow() to help make VLAN splinters transparent to the rest
3572  * of the upcall processing logic.  In particular, if the extracted in_port is
3573  * a VLAN splinter port, it replaces flow->in_port by the "real" port, sets
3574  * flow->vlan_tci correctly for the VLAN of the VLAN splinter port, and pushes
3575  * a VLAN header onto 'packet' (if it is nonnull).
3576  *
3577  * Similarly, this function also includes some logic to help with tunnels.  It
3578  * may modify 'flow' as necessary to make the tunneling implementation
3579  * transparent to the upcall processing logic.
3580  *
3581  * Returns 0 if successful, ENODEV if the parsed flow has no associated ofport,
3582  * or some other positive errno if there are other problems. */
3583 static int
3584 ofproto_receive(const struct dpif_backer *backer, struct ofpbuf *packet,
3585                 const struct nlattr *key, size_t key_len,
3586                 struct flow *flow, enum odp_key_fitness *fitnessp,
3587                 struct ofproto_dpif **ofproto, odp_port_t *odp_in_port)
3588 {
3589     const struct ofport_dpif *port;
3590     enum odp_key_fitness fitness;
3591     int error = ENODEV;
3592
3593     fitness = odp_flow_key_to_flow(key, key_len, flow);
3594     if (fitness == ODP_FIT_ERROR) {
3595         error = EINVAL;
3596         goto exit;
3597     }
3598
3599     if (odp_in_port) {
3600         *odp_in_port = flow->in_port.odp_port;
3601     }
3602
3603     port = (tnl_port_should_receive(flow)
3604             ? tnl_port_receive(flow)
3605             : odp_port_to_ofport(backer, flow->in_port.odp_port));
3606     flow->in_port.ofp_port = port ? port->up.ofp_port : OFPP_NONE;
3607     if (!port) {
3608         goto exit;
3609     }
3610
3611     /* XXX: Since the tunnel module is not scoped per backer, for a tunnel port
3612      * it's theoretically possible that we'll receive an ofport belonging to an
3613      * entirely different datapath.  In practice, this can't happen because no
3614      * platforms has two separate datapaths which each support tunneling. */
3615     ovs_assert(ofproto_dpif_cast(port->up.ofproto)->backer == backer);
3616
3617     if (vsp_adjust_flow(ofproto_dpif_cast(port->up.ofproto), flow)) {
3618         if (packet) {
3619             /* Make the packet resemble the flow, so that it gets sent to
3620              * an OpenFlow controller properly, so that it looks correct
3621              * for sFlow, and so that flow_extract() will get the correct
3622              * vlan_tci if it is called on 'packet'.
3623              *
3624              * The allocated space inside 'packet' probably also contains
3625              * 'key', that is, both 'packet' and 'key' are probably part of
3626              * a struct dpif_upcall (see the large comment on that
3627              * structure definition), so pushing data on 'packet' is in
3628              * general not a good idea since it could overwrite 'key' or
3629              * free it as a side effect.  However, it's OK in this special
3630              * case because we know that 'packet' is inside a Netlink
3631              * attribute: pushing 4 bytes will just overwrite the 4-byte
3632              * "struct nlattr", which is fine since we don't need that
3633              * header anymore. */
3634             eth_push_vlan(packet, flow->vlan_tci);
3635         }
3636         /* We can't reproduce 'key' from 'flow'. */
3637         fitness = fitness == ODP_FIT_PERFECT ? ODP_FIT_TOO_MUCH : fitness;
3638     }
3639     error = 0;
3640
3641     if (ofproto) {
3642         *ofproto = ofproto_dpif_cast(port->up.ofproto);
3643     }
3644
3645 exit:
3646     if (fitnessp) {
3647         *fitnessp = fitness;
3648     }
3649     return error;
3650 }
3651
3652 static void
3653 handle_miss_upcalls(struct dpif_backer *backer, struct dpif_upcall *upcalls,
3654                     size_t n_upcalls)
3655 {
3656     struct dpif_upcall *upcall;
3657     struct flow_miss *miss;
3658     struct flow_miss misses[FLOW_MISS_MAX_BATCH];
3659     struct flow_miss_op flow_miss_ops[FLOW_MISS_MAX_BATCH * 2];
3660     struct dpif_op *dpif_ops[FLOW_MISS_MAX_BATCH * 2];
3661     struct hmap todo;
3662     int n_misses;
3663     size_t n_ops;
3664     size_t i;
3665
3666     if (!n_upcalls) {
3667         return;
3668     }
3669
3670     /* Construct the to-do list.
3671      *
3672      * This just amounts to extracting the flow from each packet and sticking
3673      * the packets that have the same flow in the same "flow_miss" structure so
3674      * that we can process them together. */
3675     hmap_init(&todo);
3676     n_misses = 0;
3677     for (upcall = upcalls; upcall < &upcalls[n_upcalls]; upcall++) {
3678         struct flow_miss *miss = &misses[n_misses];
3679         struct flow_miss *existing_miss;
3680         struct ofproto_dpif *ofproto;
3681         odp_port_t odp_in_port;
3682         struct flow flow;
3683         uint32_t hash;
3684         int error;
3685
3686         error = ofproto_receive(backer, upcall->packet, upcall->key,
3687                                 upcall->key_len, &flow, &miss->key_fitness,
3688                                 &ofproto, &odp_in_port);
3689         if (error == ENODEV) {
3690             struct drop_key *drop_key;
3691
3692             /* Received packet on datapath port for which we couldn't
3693              * associate an ofproto.  This can happen if a port is removed
3694              * while traffic is being received.  Print a rate-limited message
3695              * in case it happens frequently.  Install a drop flow so
3696              * that future packets of the flow are inexpensively dropped
3697              * in the kernel. */
3698             VLOG_INFO_RL(&rl, "received packet on unassociated datapath port "
3699                               "%"PRIu32, odp_in_port);
3700
3701             drop_key = drop_key_lookup(backer, upcall->key, upcall->key_len);
3702             if (!drop_key) {
3703                 drop_key = xmalloc(sizeof *drop_key);
3704                 drop_key->key = xmemdup(upcall->key, upcall->key_len);
3705                 drop_key->key_len = upcall->key_len;
3706
3707                 hmap_insert(&backer->drop_keys, &drop_key->hmap_node,
3708                             hash_bytes(drop_key->key, drop_key->key_len, 0));
3709                 dpif_flow_put(backer->dpif, DPIF_FP_CREATE | DPIF_FP_MODIFY,
3710                               drop_key->key, drop_key->key_len,
3711                               NULL, 0, NULL, 0, NULL);
3712             }
3713             continue;
3714         }
3715         if (error) {
3716             continue;
3717         }
3718
3719         ofproto->n_missed++;
3720         flow_extract(upcall->packet, flow.skb_priority, flow.skb_mark,
3721                      &flow.tunnel, &flow.in_port, &miss->flow);
3722
3723         /* Add other packets to a to-do list. */
3724         hash = flow_hash(&miss->flow, 0);
3725         existing_miss = flow_miss_find(&todo, ofproto, &miss->flow, hash);
3726         if (!existing_miss) {
3727             hmap_insert(&todo, &miss->hmap_node, hash);
3728             miss->ofproto = ofproto;
3729             miss->key = upcall->key;
3730             miss->key_len = upcall->key_len;
3731             miss->upcall_type = upcall->type;
3732             list_init(&miss->packets);
3733
3734             n_misses++;
3735         } else {
3736             miss = existing_miss;
3737         }
3738         list_push_back(&miss->packets, &upcall->packet->list_node);
3739     }
3740
3741     /* Process each element in the to-do list, constructing the set of
3742      * operations to batch. */
3743     n_ops = 0;
3744     HMAP_FOR_EACH (miss, hmap_node, &todo) {
3745         handle_flow_miss(miss, flow_miss_ops, &n_ops);
3746     }
3747     ovs_assert(n_ops <= ARRAY_SIZE(flow_miss_ops));
3748
3749     /* Execute batch. */
3750     for (i = 0; i < n_ops; i++) {
3751         dpif_ops[i] = &flow_miss_ops[i].dpif_op;
3752     }
3753     dpif_operate(backer->dpif, dpif_ops, n_ops);
3754
3755     for (i = 0; i < n_ops; i++) {
3756         if (dpif_ops[i]->error != 0
3757             && flow_miss_ops[i].dpif_op.type == DPIF_OP_FLOW_PUT
3758             && flow_miss_ops[i].subfacet) {
3759             struct subfacet *subfacet = flow_miss_ops[i].subfacet;
3760
3761             COVERAGE_INC(subfacet_install_fail);
3762
3763             /* Zero-out subfacet counters when installation failed, but
3764              * datapath reported hits.  This should not happen and
3765              * indicates a bug, since if the datapath flow exists, we
3766              * should not be attempting to create a new subfacet.  A
3767              * buggy datapath could trigger this, so just zero out the
3768              * counters and log an error. */
3769             if (subfacet->dp_packet_count || subfacet->dp_byte_count) {
3770                 VLOG_ERR_RL(&rl, "failed to install subfacet for which "
3771                             "datapath reported hits");
3772                 subfacet->dp_packet_count = subfacet->dp_byte_count = 0;
3773             }
3774
3775             subfacet->path = SF_NOT_INSTALLED;
3776         }
3777
3778         /* Free memory. */
3779         if (flow_miss_ops[i].xout_garbage) {
3780             xlate_out_uninit(&flow_miss_ops[i].xout);
3781         }
3782     }
3783     hmap_destroy(&todo);
3784 }
3785
3786 static enum { SFLOW_UPCALL, MISS_UPCALL, BAD_UPCALL, FLOW_SAMPLE_UPCALL,
3787               IPFIX_UPCALL }
3788 classify_upcall(const struct dpif_upcall *upcall)
3789 {
3790     size_t userdata_len;
3791     union user_action_cookie cookie;
3792
3793     /* First look at the upcall type. */
3794     switch (upcall->type) {
3795     case DPIF_UC_ACTION:
3796         break;
3797
3798     case DPIF_UC_MISS:
3799         return MISS_UPCALL;
3800
3801     case DPIF_N_UC_TYPES:
3802     default:
3803         VLOG_WARN_RL(&rl, "upcall has unexpected type %"PRIu32, upcall->type);
3804         return BAD_UPCALL;
3805     }
3806
3807     /* "action" upcalls need a closer look. */
3808     if (!upcall->userdata) {
3809         VLOG_WARN_RL(&rl, "action upcall missing cookie");
3810         return BAD_UPCALL;
3811     }
3812     userdata_len = nl_attr_get_size(upcall->userdata);
3813     if (userdata_len < sizeof cookie.type
3814         || userdata_len > sizeof cookie) {
3815         VLOG_WARN_RL(&rl, "action upcall cookie has unexpected size %zu",
3816                      userdata_len);
3817         return BAD_UPCALL;
3818     }
3819     memset(&cookie, 0, sizeof cookie);
3820     memcpy(&cookie, nl_attr_get(upcall->userdata), userdata_len);
3821     if (userdata_len == sizeof cookie.sflow
3822         && cookie.type == USER_ACTION_COOKIE_SFLOW) {
3823         return SFLOW_UPCALL;
3824     } else if (userdata_len == sizeof cookie.slow_path
3825                && cookie.type == USER_ACTION_COOKIE_SLOW_PATH) {
3826         return MISS_UPCALL;
3827     } else if (userdata_len == sizeof cookie.flow_sample
3828                && cookie.type == USER_ACTION_COOKIE_FLOW_SAMPLE) {
3829         return FLOW_SAMPLE_UPCALL;
3830     } else if (userdata_len == sizeof cookie.ipfix
3831                && cookie.type == USER_ACTION_COOKIE_IPFIX) {
3832         return IPFIX_UPCALL;
3833     } else {
3834         VLOG_WARN_RL(&rl, "invalid user cookie of type %"PRIu16
3835                      " and size %zu", cookie.type, userdata_len);
3836         return BAD_UPCALL;
3837     }
3838 }
3839
3840 static void
3841 handle_sflow_upcall(struct dpif_backer *backer,
3842                     const struct dpif_upcall *upcall)
3843 {
3844     struct ofproto_dpif *ofproto;
3845     union user_action_cookie cookie;
3846     struct flow flow;
3847     odp_port_t odp_in_port;
3848
3849     if (ofproto_receive(backer, upcall->packet, upcall->key, upcall->key_len,
3850                         &flow, NULL, &ofproto, &odp_in_port)
3851         || !ofproto->sflow) {
3852         return;
3853     }
3854
3855     memset(&cookie, 0, sizeof cookie);
3856     memcpy(&cookie, nl_attr_get(upcall->userdata), sizeof cookie.sflow);
3857     dpif_sflow_received(ofproto->sflow, upcall->packet, &flow,
3858                         odp_in_port, &cookie);
3859 }
3860
3861 static void
3862 handle_flow_sample_upcall(struct dpif_backer *backer,
3863                           const struct dpif_upcall *upcall)
3864 {
3865     struct ofproto_dpif *ofproto;
3866     union user_action_cookie cookie;
3867     struct flow flow;
3868
3869     if (ofproto_receive(backer, upcall->packet, upcall->key, upcall->key_len,
3870                         &flow, NULL, &ofproto, NULL)
3871         || !ofproto->ipfix) {
3872         return;
3873     }
3874
3875     memset(&cookie, 0, sizeof cookie);
3876     memcpy(&cookie, nl_attr_get(upcall->userdata), sizeof cookie.flow_sample);
3877
3878     /* The flow reflects exactly the contents of the packet.  Sample
3879      * the packet using it. */
3880     dpif_ipfix_flow_sample(ofproto->ipfix, upcall->packet, &flow,
3881                            cookie.flow_sample.collector_set_id,
3882                            cookie.flow_sample.probability,
3883                            cookie.flow_sample.obs_domain_id,
3884                            cookie.flow_sample.obs_point_id);
3885 }
3886
3887 static void
3888 handle_ipfix_upcall(struct dpif_backer *backer,
3889                     const struct dpif_upcall *upcall)
3890 {
3891     struct ofproto_dpif *ofproto;
3892     struct flow flow;
3893
3894     if (ofproto_receive(backer, upcall->packet, upcall->key, upcall->key_len,
3895                         &flow, NULL, &ofproto, NULL)
3896         || !ofproto->ipfix) {
3897         return;
3898     }
3899
3900     /* The flow reflects exactly the contents of the packet.  Sample
3901      * the packet using it. */
3902     dpif_ipfix_bridge_sample(ofproto->ipfix, upcall->packet, &flow);
3903 }
3904
3905 static int
3906 handle_upcalls(struct dpif_backer *backer, unsigned int max_batch)
3907 {
3908     struct dpif_upcall misses[FLOW_MISS_MAX_BATCH];
3909     struct ofpbuf miss_bufs[FLOW_MISS_MAX_BATCH];
3910     uint64_t miss_buf_stubs[FLOW_MISS_MAX_BATCH][4096 / 8];
3911     int n_processed;
3912     int n_misses;
3913     int i;
3914
3915     ovs_assert(max_batch <= FLOW_MISS_MAX_BATCH);
3916
3917     n_misses = 0;
3918     for (n_processed = 0; n_processed < max_batch; n_processed++) {
3919         struct dpif_upcall *upcall = &misses[n_misses];
3920         struct ofpbuf *buf = &miss_bufs[n_misses];
3921         int error;
3922
3923         ofpbuf_use_stub(buf, miss_buf_stubs[n_misses],
3924                         sizeof miss_buf_stubs[n_misses]);
3925         error = dpif_recv(backer->dpif, upcall, buf);
3926         if (error) {
3927             ofpbuf_uninit(buf);
3928             break;
3929         }
3930
3931         switch (classify_upcall(upcall)) {
3932         case MISS_UPCALL:
3933             /* Handle it later. */
3934             n_misses++;
3935             break;
3936
3937         case SFLOW_UPCALL:
3938             handle_sflow_upcall(backer, upcall);
3939             ofpbuf_uninit(buf);
3940             break;
3941
3942         case FLOW_SAMPLE_UPCALL:
3943             handle_flow_sample_upcall(backer, upcall);
3944             ofpbuf_uninit(buf);
3945             break;
3946
3947         case IPFIX_UPCALL:
3948             handle_ipfix_upcall(backer, upcall);
3949             ofpbuf_uninit(buf);
3950             break;
3951
3952         case BAD_UPCALL:
3953             ofpbuf_uninit(buf);
3954             break;
3955         }
3956     }
3957
3958     /* Handle deferred MISS_UPCALL processing. */
3959     handle_miss_upcalls(backer, misses, n_misses);
3960     for (i = 0; i < n_misses; i++) {
3961         ofpbuf_uninit(&miss_bufs[i]);
3962     }
3963
3964     return n_processed;
3965 }
3966 \f
3967 /* Flow expiration. */
3968
3969 static int subfacet_max_idle(const struct dpif_backer *);
3970 static void update_stats(struct dpif_backer *);
3971 static void rule_expire(struct rule_dpif *);
3972 static void expire_subfacets(struct dpif_backer *, int dp_max_idle);
3973
3974 /* This function is called periodically by run().  Its job is to collect
3975  * updates for the flows that have been installed into the datapath, most
3976  * importantly when they last were used, and then use that information to
3977  * expire flows that have not been used recently.
3978  *
3979  * Returns the number of milliseconds after which it should be called again. */
3980 static int
3981 expire(struct dpif_backer *backer)
3982 {
3983     struct ofproto_dpif *ofproto;
3984     size_t n_subfacets;
3985     int max_idle;
3986
3987     /* Periodically clear out the drop keys in an effort to keep them
3988      * relatively few. */
3989     drop_key_clear(backer);
3990
3991     /* Update stats for each flow in the backer. */
3992     update_stats(backer);
3993
3994     n_subfacets = hmap_count(&backer->subfacets);
3995     if (n_subfacets) {
3996         struct subfacet *subfacet;
3997         long long int total, now;
3998
3999         total = 0;
4000         now = time_msec();
4001         HMAP_FOR_EACH (subfacet, hmap_node, &backer->subfacets) {
4002             total += now - subfacet->created;
4003         }
4004         backer->avg_subfacet_life += total / n_subfacets;
4005     }
4006     backer->avg_subfacet_life /= 2;
4007
4008     backer->avg_n_subfacet += n_subfacets;
4009     backer->avg_n_subfacet /= 2;
4010
4011     backer->max_n_subfacet = MAX(backer->max_n_subfacet, n_subfacets);
4012
4013     max_idle = subfacet_max_idle(backer);
4014     expire_subfacets(backer, max_idle);
4015
4016     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
4017         struct rule *rule, *next_rule;
4018
4019         if (ofproto->backer != backer) {
4020             continue;
4021         }
4022
4023         /* Expire OpenFlow flows whose idle_timeout or hard_timeout
4024          * has passed. */
4025         LIST_FOR_EACH_SAFE (rule, next_rule, expirable,
4026                             &ofproto->up.expirable) {
4027             rule_expire(rule_dpif_cast(rule));
4028         }
4029
4030         /* All outstanding data in existing flows has been accounted, so it's a
4031          * good time to do bond rebalancing. */
4032         if (ofproto->has_bonded_bundles) {
4033             struct ofbundle *bundle;
4034
4035             HMAP_FOR_EACH (bundle, hmap_node, &ofproto->bundles) {
4036                 if (bundle->bond) {
4037                     bond_rebalance(bundle->bond, &backer->revalidate_set);
4038                 }
4039             }
4040         }
4041     }
4042
4043     return MIN(max_idle, 1000);
4044 }
4045
4046 /* Updates flow table statistics given that the datapath just reported 'stats'
4047  * as 'subfacet''s statistics. */
4048 static void
4049 update_subfacet_stats(struct subfacet *subfacet,
4050                       const struct dpif_flow_stats *stats)
4051 {
4052     struct facet *facet = subfacet->facet;
4053     struct dpif_flow_stats diff;
4054
4055     diff.tcp_flags = stats->tcp_flags;
4056     diff.used = stats->used;
4057
4058     if (stats->n_packets >= subfacet->dp_packet_count) {
4059         diff.n_packets = stats->n_packets - subfacet->dp_packet_count;
4060     } else {
4061         VLOG_WARN_RL(&rl, "unexpected packet count from the datapath");
4062         diff.n_packets = 0;
4063     }
4064
4065     if (stats->n_bytes >= subfacet->dp_byte_count) {
4066         diff.n_bytes = stats->n_bytes - subfacet->dp_byte_count;
4067     } else {
4068         VLOG_WARN_RL(&rl, "unexpected byte count from datapath");
4069         diff.n_bytes = 0;
4070     }
4071
4072     facet->ofproto->n_hit += diff.n_packets;
4073     subfacet->dp_packet_count = stats->n_packets;
4074     subfacet->dp_byte_count = stats->n_bytes;
4075     subfacet_update_stats(subfacet, &diff);
4076
4077     if (facet->accounted_bytes < facet->byte_count) {
4078         facet_learn(facet);
4079         facet_account(facet);
4080         facet->accounted_bytes = facet->byte_count;
4081     }
4082 }
4083
4084 /* 'key' with length 'key_len' bytes is a flow in 'dpif' that we know nothing
4085  * about, or a flow that shouldn't be installed but was anyway.  Delete it. */
4086 static void
4087 delete_unexpected_flow(struct dpif_backer *backer,
4088                        const struct nlattr *key, size_t key_len)
4089 {
4090     if (!VLOG_DROP_WARN(&rl)) {
4091         struct ds s;
4092
4093         ds_init(&s);
4094         odp_flow_key_format(key, key_len, &s);
4095         VLOG_WARN("unexpected flow: %s", ds_cstr(&s));
4096         ds_destroy(&s);
4097     }
4098
4099     COVERAGE_INC(facet_unexpected);
4100     dpif_flow_del(backer->dpif, key, key_len, NULL);
4101 }
4102
4103 /* Update 'packet_count', 'byte_count', and 'used' members of installed facets.
4104  *
4105  * This function also pushes statistics updates to rules which each facet
4106  * resubmits into.  Generally these statistics will be accurate.  However, if a
4107  * facet changes the rule it resubmits into at some time in between
4108  * update_stats() runs, it is possible that statistics accrued to the
4109  * old rule will be incorrectly attributed to the new rule.  This could be
4110  * avoided by calling update_stats() whenever rules are created or
4111  * deleted.  However, the performance impact of making so many calls to the
4112  * datapath do not justify the benefit of having perfectly accurate statistics.
4113  *
4114  * In addition, this function maintains per ofproto flow hit counts. The patch
4115  * port is not treated specially. e.g. A packet ingress from br0 patched into
4116  * br1 will increase the hit count of br0 by 1, however, does not affect
4117  * the hit or miss counts of br1.
4118  */
4119 static void
4120 update_stats(struct dpif_backer *backer)
4121 {
4122     const struct dpif_flow_stats *stats;
4123     struct dpif_flow_dump dump;
4124     const struct nlattr *key, *mask;
4125     size_t key_len, mask_len;
4126
4127     dpif_flow_dump_start(&dump, backer->dpif);
4128     while (dpif_flow_dump_next(&dump, &key, &key_len,
4129                                &mask, &mask_len, NULL, NULL, &stats)) {
4130         struct subfacet *subfacet;
4131         uint32_t key_hash;
4132
4133         key_hash = odp_flow_key_hash(key, key_len);
4134         subfacet = subfacet_find(backer, key, key_len, key_hash);
4135         switch (subfacet ? subfacet->path : SF_NOT_INSTALLED) {
4136         case SF_FAST_PATH:
4137             update_subfacet_stats(subfacet, stats);
4138             break;
4139
4140         case SF_SLOW_PATH:
4141             /* Stats are updated per-packet. */
4142             break;
4143
4144         case SF_NOT_INSTALLED:
4145         default:
4146             delete_unexpected_flow(backer, key, key_len);
4147             break;
4148         }
4149         run_fast_rl();
4150     }
4151     dpif_flow_dump_done(&dump);
4152
4153     update_moving_averages(backer);
4154 }
4155
4156 /* Calculates and returns the number of milliseconds of idle time after which
4157  * subfacets should expire from the datapath.  When a subfacet expires, we fold
4158  * its statistics into its facet, and when a facet's last subfacet expires, we
4159  * fold its statistic into its rule. */
4160 static int
4161 subfacet_max_idle(const struct dpif_backer *backer)
4162 {
4163     /*
4164      * Idle time histogram.
4165      *
4166      * Most of the time a switch has a relatively small number of subfacets.
4167      * When this is the case we might as well keep statistics for all of them
4168      * in userspace and to cache them in the kernel datapath for performance as
4169      * well.
4170      *
4171      * As the number of subfacets increases, the memory required to maintain
4172      * statistics about them in userspace and in the kernel becomes
4173      * significant.  However, with a large number of subfacets it is likely
4174      * that only a few of them are "heavy hitters" that consume a large amount
4175      * of bandwidth.  At this point, only heavy hitters are worth caching in
4176      * the kernel and maintaining in userspaces; other subfacets we can
4177      * discard.
4178      *
4179      * The technique used to compute the idle time is to build a histogram with
4180      * N_BUCKETS buckets whose width is BUCKET_WIDTH msecs each.  Each subfacet
4181      * that is installed in the kernel gets dropped in the appropriate bucket.
4182      * After the histogram has been built, we compute the cutoff so that only
4183      * the most-recently-used 1% of subfacets (but at least
4184      * flow_eviction_threshold flows) are kept cached.  At least
4185      * the most-recently-used bucket of subfacets is kept, so actually an
4186      * arbitrary number of subfacets can be kept in any given expiration run
4187      * (though the next run will delete most of those unless they receive
4188      * additional data).
4189      *
4190      * This requires a second pass through the subfacets, in addition to the
4191      * pass made by update_stats(), because the former function never looks at
4192      * uninstallable subfacets.
4193      */
4194     enum { BUCKET_WIDTH = ROUND_UP(100, TIME_UPDATE_INTERVAL) };
4195     enum { N_BUCKETS = 5000 / BUCKET_WIDTH };
4196     int buckets[N_BUCKETS] = { 0 };
4197     int total, subtotal, bucket;
4198     struct subfacet *subfacet;
4199     long long int now;
4200     int i;
4201
4202     total = hmap_count(&backer->subfacets);
4203     if (total <= flow_eviction_threshold) {
4204         return N_BUCKETS * BUCKET_WIDTH;
4205     }
4206
4207     /* Build histogram. */
4208     now = time_msec();
4209     HMAP_FOR_EACH (subfacet, hmap_node, &backer->subfacets) {
4210         long long int idle = now - subfacet->used;
4211         int bucket = (idle <= 0 ? 0
4212                       : idle >= BUCKET_WIDTH * N_BUCKETS ? N_BUCKETS - 1
4213                       : (unsigned int) idle / BUCKET_WIDTH);
4214         buckets[bucket]++;
4215     }
4216
4217     /* Find the first bucket whose flows should be expired. */
4218     subtotal = bucket = 0;
4219     do {
4220         subtotal += buckets[bucket++];
4221     } while (bucket < N_BUCKETS &&
4222              subtotal < MAX(flow_eviction_threshold, total / 100));
4223
4224     if (VLOG_IS_DBG_ENABLED()) {
4225         struct ds s;
4226
4227         ds_init(&s);
4228         ds_put_cstr(&s, "keep");
4229         for (i = 0; i < N_BUCKETS; i++) {
4230             if (i == bucket) {
4231                 ds_put_cstr(&s, ", drop");
4232             }
4233             if (buckets[i]) {
4234                 ds_put_format(&s, " %d:%d", i * BUCKET_WIDTH, buckets[i]);
4235             }
4236         }
4237         VLOG_INFO("%s (msec:count)", ds_cstr(&s));
4238         ds_destroy(&s);
4239     }
4240
4241     return bucket * BUCKET_WIDTH;
4242 }
4243
4244 static void
4245 expire_subfacets(struct dpif_backer *backer, int dp_max_idle)
4246 {
4247     /* Cutoff time for most flows. */
4248     long long int normal_cutoff = time_msec() - dp_max_idle;
4249
4250     /* We really want to keep flows for special protocols around, so use a more
4251      * conservative cutoff. */
4252     long long int special_cutoff = time_msec() - 10000;
4253
4254     struct subfacet *subfacet, *next_subfacet;
4255     struct subfacet *batch[SUBFACET_DESTROY_MAX_BATCH];
4256     int n_batch;
4257
4258     n_batch = 0;
4259     HMAP_FOR_EACH_SAFE (subfacet, next_subfacet, hmap_node,
4260                         &backer->subfacets) {
4261         long long int cutoff;
4262
4263         cutoff = (subfacet->facet->xout.slow & (SLOW_CFM | SLOW_BFD | SLOW_LACP
4264                                                 | SLOW_STP)
4265                   ? special_cutoff
4266                   : normal_cutoff);
4267         if (subfacet->used < cutoff) {
4268             if (subfacet->path != SF_NOT_INSTALLED) {
4269                 batch[n_batch++] = subfacet;
4270                 if (n_batch >= SUBFACET_DESTROY_MAX_BATCH) {
4271                     subfacet_destroy_batch(backer, batch, n_batch);
4272                     n_batch = 0;
4273                 }
4274             } else {
4275                 subfacet_destroy(subfacet);
4276             }
4277         }
4278     }
4279
4280     if (n_batch > 0) {
4281         subfacet_destroy_batch(backer, batch, n_batch);
4282     }
4283 }
4284
4285 /* If 'rule' is an OpenFlow rule, that has expired according to OpenFlow rules,
4286  * then delete it entirely. */
4287 static void
4288 rule_expire(struct rule_dpif *rule)
4289 {
4290     long long int now;
4291     uint8_t reason;
4292
4293     if (rule->up.pending) {
4294         /* We'll have to expire it later. */
4295         return;
4296     }
4297
4298     /* Has 'rule' expired? */
4299     now = time_msec();
4300     if (rule->up.hard_timeout
4301         && now > rule->up.modified + rule->up.hard_timeout * 1000) {
4302         reason = OFPRR_HARD_TIMEOUT;
4303     } else if (rule->up.idle_timeout
4304                && now > rule->up.used + rule->up.idle_timeout * 1000) {
4305         reason = OFPRR_IDLE_TIMEOUT;
4306     } else {
4307         return;
4308     }
4309
4310     COVERAGE_INC(ofproto_dpif_expired);
4311
4312     /* Get rid of the rule. */
4313     ofproto_rule_expire(&rule->up, reason);
4314 }
4315 \f
4316 /* Facets. */
4317
4318 /* Creates and returns a new facet based on 'miss'.
4319  *
4320  * The caller must already have determined that no facet with an identical
4321  * 'miss->flow' exists in 'miss->ofproto'.
4322  *
4323  * 'rule' and 'xout' must have been created based on 'miss'.
4324  *
4325  * 'facet'' statistics are initialized based on 'stats'.
4326  *
4327  * The facet will initially have no subfacets.  The caller should create (at
4328  * least) one subfacet with subfacet_create(). */
4329 static struct facet *
4330 facet_create(const struct flow_miss *miss, struct rule_dpif *rule,
4331              struct xlate_out *xout, struct dpif_flow_stats *stats)
4332 {
4333     struct ofproto_dpif *ofproto = miss->ofproto;
4334     struct facet *facet;
4335     struct match match;
4336
4337     facet = xzalloc(sizeof *facet);
4338     facet->ofproto = miss->ofproto;
4339     facet->packet_count = facet->prev_packet_count = stats->n_packets;
4340     facet->byte_count = facet->prev_byte_count = stats->n_bytes;
4341     facet->tcp_flags = stats->tcp_flags;
4342     facet->used = stats->used;
4343     facet->flow = miss->flow;
4344     facet->learn_rl = time_msec() + 500;
4345
4346     list_init(&facet->subfacets);
4347     netflow_flow_init(&facet->nf_flow);
4348     netflow_flow_update_time(ofproto->netflow, &facet->nf_flow, facet->used);
4349
4350     xlate_out_copy(&facet->xout, xout);
4351
4352     match_init(&match, &facet->flow, &facet->xout.wc);
4353     cls_rule_init(&facet->cr, &match, OFP_DEFAULT_PRIORITY);
4354     classifier_insert(&ofproto->facets, &facet->cr);
4355
4356     facet->nf_flow.output_iface = facet->xout.nf_output_iface;
4357     facet->fail_open = rule->up.cr.priority == FAIL_OPEN_PRIORITY;
4358
4359     return facet;
4360 }
4361
4362 static void
4363 facet_free(struct facet *facet)
4364 {
4365     if (facet) {
4366         xlate_out_uninit(&facet->xout);
4367         free(facet);
4368     }
4369 }
4370
4371 /* Executes, within 'ofproto', the 'n_actions' actions in 'actions' on
4372  * 'packet', which arrived on 'in_port'. */
4373 static bool
4374 execute_odp_actions(struct ofproto_dpif *ofproto, const struct flow *flow,
4375                     const struct nlattr *odp_actions, size_t actions_len,
4376                     struct ofpbuf *packet)
4377 {
4378     struct odputil_keybuf keybuf;
4379     struct ofpbuf key;
4380     int error;
4381
4382     ofpbuf_use_stack(&key, &keybuf, sizeof keybuf);
4383     odp_flow_key_from_flow(&key, flow,
4384                            ofp_port_to_odp_port(ofproto, flow->in_port.ofp_port));
4385
4386     error = dpif_execute(ofproto->backer->dpif, key.data, key.size,
4387                          odp_actions, actions_len, packet);
4388     return !error;
4389 }
4390
4391 /* Remove 'facet' from its ofproto and free up the associated memory:
4392  *
4393  *   - If 'facet' was installed in the datapath, uninstalls it and updates its
4394  *     rule's statistics, via subfacet_uninstall().
4395  *
4396  *   - Removes 'facet' from its rule and from ofproto->facets.
4397  */
4398 static void
4399 facet_remove(struct facet *facet)
4400 {
4401     struct subfacet *subfacet, *next_subfacet;
4402
4403     ovs_assert(!list_is_empty(&facet->subfacets));
4404
4405     /* First uninstall all of the subfacets to get final statistics. */
4406     LIST_FOR_EACH (subfacet, list_node, &facet->subfacets) {
4407         subfacet_uninstall(subfacet);
4408     }
4409
4410     /* Flush the final stats to the rule.
4411      *
4412      * This might require us to have at least one subfacet around so that we
4413      * can use its actions for accounting in facet_account(), which is why we
4414      * have uninstalled but not yet destroyed the subfacets. */
4415     facet_flush_stats(facet);
4416
4417     /* Now we're really all done so destroy everything. */
4418     LIST_FOR_EACH_SAFE (subfacet, next_subfacet, list_node,
4419                         &facet->subfacets) {
4420         subfacet_destroy__(subfacet);
4421     }
4422     classifier_remove(&facet->ofproto->facets, &facet->cr);
4423     cls_rule_destroy(&facet->cr);
4424     facet_free(facet);
4425 }
4426
4427 /* Feed information from 'facet' back into the learning table to keep it in
4428  * sync with what is actually flowing through the datapath. */
4429 static void
4430 facet_learn(struct facet *facet)
4431 {
4432     long long int now = time_msec();
4433
4434     if (!facet->xout.has_fin_timeout && now < facet->learn_rl) {
4435         return;
4436     }
4437
4438     facet->learn_rl = now + 500;
4439
4440     if (!facet->xout.has_learn
4441         && !facet->xout.has_normal
4442         && (!facet->xout.has_fin_timeout
4443             || !(facet->tcp_flags & (TCP_FIN | TCP_RST)))) {
4444         return;
4445     }
4446
4447     facet_push_stats(facet, true);
4448 }
4449
4450 static void
4451 facet_account(struct facet *facet)
4452 {
4453     const struct nlattr *a;
4454     unsigned int left;
4455     ovs_be16 vlan_tci;
4456     uint64_t n_bytes;
4457
4458     if (!facet->xout.has_normal || !facet->ofproto->has_bonded_bundles) {
4459         return;
4460     }
4461     n_bytes = facet->byte_count - facet->accounted_bytes;
4462
4463     /* This loop feeds byte counters to bond_account() for rebalancing to use
4464      * as a basis.  We also need to track the actual VLAN on which the packet
4465      * is going to be sent to ensure that it matches the one passed to
4466      * bond_choose_output_slave().  (Otherwise, we will account to the wrong
4467      * hash bucket.)
4468      *
4469      * We use the actions from an arbitrary subfacet because they should all
4470      * be equally valid for our purpose. */
4471     vlan_tci = facet->flow.vlan_tci;
4472     NL_ATTR_FOR_EACH_UNSAFE (a, left, facet->xout.odp_actions.data,
4473                              facet->xout.odp_actions.size) {
4474         const struct ovs_action_push_vlan *vlan;
4475         struct ofport_dpif *port;
4476
4477         switch (nl_attr_type(a)) {
4478         case OVS_ACTION_ATTR_OUTPUT:
4479             port = get_odp_port(facet->ofproto, nl_attr_get_odp_port(a));
4480             if (port && port->bundle && port->bundle->bond) {
4481                 bond_account(port->bundle->bond, &facet->flow,
4482                              vlan_tci_to_vid(vlan_tci), n_bytes);
4483             }
4484             break;
4485
4486         case OVS_ACTION_ATTR_POP_VLAN:
4487             vlan_tci = htons(0);
4488             break;
4489
4490         case OVS_ACTION_ATTR_PUSH_VLAN:
4491             vlan = nl_attr_get(a);
4492             vlan_tci = vlan->vlan_tci;
4493             break;
4494         }
4495     }
4496 }
4497
4498 /* Returns true if the only action for 'facet' is to send to the controller.
4499  * (We don't report NetFlow expiration messages for such facets because they
4500  * are just part of the control logic for the network, not real traffic). */
4501 static bool
4502 facet_is_controller_flow(struct facet *facet)
4503 {
4504     if (facet) {
4505         struct ofproto_dpif *ofproto = facet->ofproto;
4506         const struct rule_dpif *rule = rule_dpif_lookup(ofproto, &facet->flow,
4507                                                         NULL);
4508         const struct ofpact *ofpacts = rule->up.ofpacts;
4509         size_t ofpacts_len = rule->up.ofpacts_len;
4510
4511         if (ofpacts_len > 0 &&
4512             ofpacts->type == OFPACT_CONTROLLER &&
4513             ofpact_next(ofpacts) >= ofpact_end(ofpacts, ofpacts_len)) {
4514             return true;
4515         }
4516     }
4517     return false;
4518 }
4519
4520 /* Folds all of 'facet''s statistics into its rule.  Also updates the
4521  * accounting ofhook and emits a NetFlow expiration if appropriate.  All of
4522  * 'facet''s statistics in the datapath should have been zeroed and folded into
4523  * its packet and byte counts before this function is called. */
4524 static void
4525 facet_flush_stats(struct facet *facet)
4526 {
4527     struct ofproto_dpif *ofproto = facet->ofproto;
4528     struct subfacet *subfacet;
4529
4530     LIST_FOR_EACH (subfacet, list_node, &facet->subfacets) {
4531         ovs_assert(!subfacet->dp_byte_count);
4532         ovs_assert(!subfacet->dp_packet_count);
4533     }
4534
4535     facet_push_stats(facet, false);
4536     if (facet->accounted_bytes < facet->byte_count) {
4537         facet_account(facet);
4538         facet->accounted_bytes = facet->byte_count;
4539     }
4540
4541     if (ofproto->netflow && !facet_is_controller_flow(facet)) {
4542         struct ofexpired expired;
4543         expired.flow = facet->flow;
4544         expired.packet_count = facet->packet_count;
4545         expired.byte_count = facet->byte_count;
4546         expired.used = facet->used;
4547         netflow_expire(ofproto->netflow, &facet->nf_flow, &expired);
4548     }
4549
4550     /* Reset counters to prevent double counting if 'facet' ever gets
4551      * reinstalled. */
4552     facet_reset_counters(facet);
4553
4554     netflow_flow_clear(&facet->nf_flow);
4555     facet->tcp_flags = 0;
4556 }
4557
4558 /* Searches 'ofproto''s table of facets for one which would be responsible for
4559  * 'flow'.  Returns it if found, otherwise a null pointer.
4560  *
4561  * The returned facet might need revalidation; use facet_lookup_valid()
4562  * instead if that is important. */
4563 static struct facet *
4564 facet_find(struct ofproto_dpif *ofproto, const struct flow *flow)
4565 {
4566     struct cls_rule *cr = classifier_lookup(&ofproto->facets, flow, NULL);
4567     return cr ? CONTAINER_OF(cr, struct facet, cr) : NULL;
4568 }
4569
4570 /* Searches 'ofproto''s table of facets for one capable that covers
4571  * 'flow'.  Returns it if found, otherwise a null pointer.
4572  *
4573  * The returned facet is guaranteed to be valid. */
4574 static struct facet *
4575 facet_lookup_valid(struct ofproto_dpif *ofproto, const struct flow *flow)
4576 {
4577     struct facet *facet;
4578
4579     facet = facet_find(ofproto, flow);
4580     if (facet
4581         && (ofproto->backer->need_revalidate
4582             || tag_set_intersects(&ofproto->backer->revalidate_set,
4583                                   facet->xout.tags))
4584         && !facet_revalidate(facet)) {
4585         return NULL;
4586     }
4587
4588     return facet;
4589 }
4590
4591 static bool
4592 facet_check_consistency(struct facet *facet)
4593 {
4594     static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(1, 15);
4595
4596     struct xlate_out xout;
4597     struct xlate_in xin;
4598
4599     struct rule_dpif *rule;
4600     bool ok, fail_open;
4601
4602     /* Check the datapath actions for consistency. */
4603     rule = rule_dpif_lookup(facet->ofproto, &facet->flow, NULL);
4604     xlate_in_init(&xin, facet->ofproto, &facet->flow, rule, 0, NULL);
4605     xlate_actions(&xin, &xout);
4606
4607     fail_open = rule->up.cr.priority == FAIL_OPEN_PRIORITY;
4608     ok = ofpbuf_equal(&facet->xout.odp_actions, &xout.odp_actions)
4609         && facet->xout.slow == xout.slow
4610         && facet->fail_open == fail_open;
4611     if (!ok && !VLOG_DROP_WARN(&rl)) {
4612         struct ds s = DS_EMPTY_INITIALIZER;
4613
4614         flow_format(&s, &facet->flow);
4615         ds_put_cstr(&s, ": inconsistency in facet");
4616
4617         if (!ofpbuf_equal(&facet->xout.odp_actions, &xout.odp_actions)) {
4618             ds_put_cstr(&s, " (actions were: ");
4619             format_odp_actions(&s, facet->xout.odp_actions.data,
4620                                facet->xout.odp_actions.size);
4621             ds_put_cstr(&s, ") (correct actions: ");
4622             format_odp_actions(&s, xout.odp_actions.data,
4623                                xout.odp_actions.size);
4624             ds_put_char(&s, ')');
4625         }
4626
4627         if (facet->xout.slow != xout.slow) {
4628             ds_put_format(&s, " slow path incorrect. should be %d", xout.slow);
4629         }
4630
4631         if (facet->fail_open != fail_open) {
4632             ds_put_format(&s, " fail open incorrect. should be %s",
4633                           fail_open ? "true" : "false");
4634         }
4635         ds_destroy(&s);
4636     }
4637     xlate_out_uninit(&xout);
4638
4639     return ok;
4640 }
4641
4642 /* Re-searches the classifier for 'facet':
4643  *
4644  *   - If the rule found is different from 'facet''s current rule, moves
4645  *     'facet' to the new rule and recompiles its actions.
4646  *
4647  *   - If the rule found is the same as 'facet''s current rule, leaves 'facet'
4648  *     where it is and recompiles its actions anyway.
4649  *
4650  *   - If any of 'facet''s subfacets correspond to a new flow according to
4651  *     ofproto_receive(), 'facet' is removed.
4652  *
4653  *   Returns true if 'facet' is still valid.  False if 'facet' was removed. */
4654 static bool
4655 facet_revalidate(struct facet *facet)
4656 {
4657     struct ofproto_dpif *ofproto = facet->ofproto;
4658     struct rule_dpif *new_rule;
4659     struct subfacet *subfacet;
4660     struct flow_wildcards wc;
4661     struct xlate_out xout;
4662     struct xlate_in xin;
4663
4664     COVERAGE_INC(facet_revalidate);
4665
4666     /* Check that child subfacets still correspond to this facet.  Tunnel
4667      * configuration changes could cause a subfacet's OpenFlow in_port to
4668      * change. */
4669     LIST_FOR_EACH (subfacet, list_node, &facet->subfacets) {
4670         struct ofproto_dpif *recv_ofproto;
4671         struct flow recv_flow;
4672         int error;
4673
4674         error = ofproto_receive(ofproto->backer, NULL, subfacet->key,
4675                                 subfacet->key_len, &recv_flow, NULL,
4676                                 &recv_ofproto, NULL);
4677         if (error
4678             || recv_ofproto != ofproto
4679             || facet != facet_find(ofproto, &recv_flow)) {
4680             facet_remove(facet);
4681             return false;
4682         }
4683     }
4684
4685     flow_wildcards_init_catchall(&wc);
4686     new_rule = rule_dpif_lookup(ofproto, &facet->flow, &wc);
4687
4688     /* Calculate new datapath actions.
4689      *
4690      * We do not modify any 'facet' state yet, because we might need to, e.g.,
4691      * emit a NetFlow expiration and, if so, we need to have the old state
4692      * around to properly compose it. */
4693     xlate_in_init(&xin, ofproto, &facet->flow, new_rule, 0, NULL);
4694     xlate_actions(&xin, &xout);
4695     flow_wildcards_or(&xout.wc, &xout.wc, &wc);
4696
4697     /* A facet's slow path reason should only change under dramatic
4698      * circumstances.  Rather than try to update everything, it's simpler to
4699      * remove the facet and start over.
4700      *
4701      * More importantly, if a facet's wildcards change, it will be relatively
4702      * difficult to figure out if its subfacets still belong to it, and if not
4703      * which facet they may belong to.  Again, to avoid the complexity, we
4704      * simply give up instead. */
4705     if (facet->xout.slow != xout.slow
4706         || memcmp(&facet->xout.wc, &xout.wc, sizeof xout.wc)) {
4707         facet_remove(facet);
4708         xlate_out_uninit(&xout);
4709         return false;
4710     }
4711
4712     if (!ofpbuf_equal(&facet->xout.odp_actions, &xout.odp_actions)) {
4713         LIST_FOR_EACH(subfacet, list_node, &facet->subfacets) {
4714             if (subfacet->path == SF_FAST_PATH) {
4715                 struct dpif_flow_stats stats;
4716
4717                 subfacet_install(subfacet, &xout.odp_actions, &stats);
4718                 subfacet_update_stats(subfacet, &stats);
4719             }
4720         }
4721
4722         facet_flush_stats(facet);
4723
4724         ofpbuf_clear(&facet->xout.odp_actions);
4725         ofpbuf_put(&facet->xout.odp_actions, xout.odp_actions.data,
4726                    xout.odp_actions.size);
4727     }
4728
4729     /* Update 'facet' now that we've taken care of all the old state. */
4730     facet->xout.tags = xout.tags;
4731     facet->xout.slow = xout.slow;
4732     facet->xout.has_learn = xout.has_learn;
4733     facet->xout.has_normal = xout.has_normal;
4734     facet->xout.has_fin_timeout = xout.has_fin_timeout;
4735     facet->xout.nf_output_iface = xout.nf_output_iface;
4736     facet->xout.mirrors = xout.mirrors;
4737     facet->nf_flow.output_iface = facet->xout.nf_output_iface;
4738     facet->used = MAX(facet->used, new_rule->up.created);
4739     facet->fail_open = new_rule->up.cr.priority == FAIL_OPEN_PRIORITY;
4740
4741     xlate_out_uninit(&xout);
4742     return true;
4743 }
4744
4745 static void
4746 facet_reset_counters(struct facet *facet)
4747 {
4748     facet->packet_count = 0;
4749     facet->byte_count = 0;
4750     facet->prev_packet_count = 0;
4751     facet->prev_byte_count = 0;
4752     facet->accounted_bytes = 0;
4753 }
4754
4755 static void
4756 facet_push_stats(struct facet *facet, bool may_learn)
4757 {
4758     struct dpif_flow_stats stats;
4759
4760     ovs_assert(facet->packet_count >= facet->prev_packet_count);
4761     ovs_assert(facet->byte_count >= facet->prev_byte_count);
4762     ovs_assert(facet->used >= facet->prev_used);
4763
4764     stats.n_packets = facet->packet_count - facet->prev_packet_count;
4765     stats.n_bytes = facet->byte_count - facet->prev_byte_count;
4766     stats.used = facet->used;
4767     stats.tcp_flags = facet->tcp_flags;
4768
4769     if (may_learn || stats.n_packets || facet->used > facet->prev_used) {
4770         struct ofproto_dpif *ofproto = facet->ofproto;
4771         struct ofport_dpif *in_port;
4772         struct rule_dpif *rule;
4773         struct xlate_in xin;
4774
4775         facet->prev_packet_count = facet->packet_count;
4776         facet->prev_byte_count = facet->byte_count;
4777         facet->prev_used = facet->used;
4778
4779         in_port = get_ofp_port(ofproto, facet->flow.in_port.ofp_port);
4780         if (in_port && in_port->is_tunnel) {
4781             netdev_vport_inc_rx(in_port->up.netdev, &stats);
4782         }
4783
4784         rule = rule_dpif_lookup(ofproto, &facet->flow, NULL);
4785         rule_credit_stats(rule, &stats);
4786         netflow_flow_update_time(ofproto->netflow, &facet->nf_flow,
4787                                  facet->used);
4788         netflow_flow_update_flags(&facet->nf_flow, facet->tcp_flags);
4789         mirror_update_stats(ofproto->mbridge, facet->xout.mirrors,
4790                             stats.n_packets, stats.n_bytes);
4791
4792         xlate_in_init(&xin, ofproto, &facet->flow, rule, stats.tcp_flags,
4793                       NULL);
4794         xin.resubmit_stats = &stats;
4795         xin.may_learn = may_learn;
4796         xlate_actions_for_side_effects(&xin);
4797     }
4798 }
4799
4800 static void
4801 push_all_stats__(bool run_fast)
4802 {
4803     static long long int rl = LLONG_MIN;
4804     struct ofproto_dpif *ofproto;
4805
4806     if (time_msec() < rl) {
4807         return;
4808     }
4809
4810     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
4811         struct cls_cursor cursor;
4812         struct facet *facet;
4813
4814         cls_cursor_init(&cursor, &ofproto->facets, NULL);
4815         CLS_CURSOR_FOR_EACH (facet, cr, &cursor) {
4816             facet_push_stats(facet, false);
4817             if (run_fast) {
4818                 run_fast_rl();
4819             }
4820         }
4821     }
4822
4823     rl = time_msec() + 100;
4824 }
4825
4826 static void
4827 push_all_stats(void)
4828 {
4829     push_all_stats__(true);
4830 }
4831
4832 void
4833 rule_credit_stats(struct rule_dpif *rule, const struct dpif_flow_stats *stats)
4834 {
4835     rule->packet_count += stats->n_packets;
4836     rule->byte_count += stats->n_bytes;
4837     ofproto_rule_update_used(&rule->up, stats->used);
4838 }
4839 \f
4840 /* Subfacets. */
4841
4842 static struct subfacet *
4843 subfacet_find(struct dpif_backer *backer, const struct nlattr *key,
4844               size_t key_len, uint32_t key_hash)
4845 {
4846     struct subfacet *subfacet;
4847
4848     HMAP_FOR_EACH_WITH_HASH (subfacet, hmap_node, key_hash,
4849                              &backer->subfacets) {
4850         if (subfacet->key_len == key_len
4851             && !memcmp(key, subfacet->key, key_len)) {
4852             return subfacet;
4853         }
4854     }
4855
4856     return NULL;
4857 }
4858
4859 /* Searches 'facet' (within 'ofproto') for a subfacet with the specified
4860  * 'key_fitness', 'key', and 'key_len' members in 'miss'.  Returns the
4861  * existing subfacet if there is one, otherwise creates and returns a
4862  * new subfacet. */
4863 static struct subfacet *
4864 subfacet_create(struct facet *facet, struct flow_miss *miss,
4865                 long long int now)
4866 {
4867     struct dpif_backer *backer = miss->ofproto->backer;
4868     enum odp_key_fitness key_fitness = miss->key_fitness;
4869     const struct nlattr *key = miss->key;
4870     size_t key_len = miss->key_len;
4871     uint32_t key_hash;
4872     struct subfacet *subfacet;
4873
4874     key_hash = odp_flow_key_hash(key, key_len);
4875
4876     if (list_is_empty(&facet->subfacets)) {
4877         subfacet = &facet->one_subfacet;
4878     } else {
4879         subfacet = subfacet_find(backer, key, key_len, key_hash);
4880         if (subfacet) {
4881             if (subfacet->facet == facet) {
4882                 return subfacet;
4883             }
4884
4885             /* This shouldn't happen. */
4886             VLOG_ERR_RL(&rl, "subfacet with wrong facet");
4887             subfacet_destroy(subfacet);
4888         }
4889
4890         subfacet = xmalloc(sizeof *subfacet);
4891     }
4892
4893     hmap_insert(&backer->subfacets, &subfacet->hmap_node, key_hash);
4894     list_push_back(&facet->subfacets, &subfacet->list_node);
4895     subfacet->facet = facet;
4896     subfacet->key_fitness = key_fitness;
4897     subfacet->key = xmemdup(key, key_len);
4898     subfacet->key_len = key_len;
4899     subfacet->used = now;
4900     subfacet->created = now;
4901     subfacet->dp_packet_count = 0;
4902     subfacet->dp_byte_count = 0;
4903     subfacet->path = SF_NOT_INSTALLED;
4904     subfacet->backer = backer;
4905
4906     backer->subfacet_add_count++;
4907     return subfacet;
4908 }
4909
4910 /* Uninstalls 'subfacet' from the datapath, if it is installed, removes it from
4911  * its facet within 'ofproto', and frees it. */
4912 static void
4913 subfacet_destroy__(struct subfacet *subfacet)
4914 {
4915     struct facet *facet = subfacet->facet;
4916     struct ofproto_dpif *ofproto = facet->ofproto;
4917
4918     /* Update ofproto stats before uninstall the subfacet. */
4919     ofproto->backer->subfacet_del_count++;
4920
4921     subfacet_uninstall(subfacet);
4922     hmap_remove(&subfacet->backer->subfacets, &subfacet->hmap_node);
4923     list_remove(&subfacet->list_node);
4924     free(subfacet->key);
4925     if (subfacet != &facet->one_subfacet) {
4926         free(subfacet);
4927     }
4928 }
4929
4930 /* Destroys 'subfacet', as with subfacet_destroy__(), and then if this was the
4931  * last remaining subfacet in its facet destroys the facet too. */
4932 static void
4933 subfacet_destroy(struct subfacet *subfacet)
4934 {
4935     struct facet *facet = subfacet->facet;
4936
4937     if (list_is_singleton(&facet->subfacets)) {
4938         /* facet_remove() needs at least one subfacet (it will remove it). */
4939         facet_remove(facet);
4940     } else {
4941         subfacet_destroy__(subfacet);
4942     }
4943 }
4944
4945 static void
4946 subfacet_destroy_batch(struct dpif_backer *backer,
4947                        struct subfacet **subfacets, int n)
4948 {
4949     struct dpif_op ops[SUBFACET_DESTROY_MAX_BATCH];
4950     struct dpif_op *opsp[SUBFACET_DESTROY_MAX_BATCH];
4951     struct dpif_flow_stats stats[SUBFACET_DESTROY_MAX_BATCH];
4952     int i;
4953
4954     for (i = 0; i < n; i++) {
4955         ops[i].type = DPIF_OP_FLOW_DEL;
4956         ops[i].u.flow_del.key = subfacets[i]->key;
4957         ops[i].u.flow_del.key_len = subfacets[i]->key_len;
4958         ops[i].u.flow_del.stats = &stats[i];
4959         opsp[i] = &ops[i];
4960     }
4961
4962     dpif_operate(backer->dpif, opsp, n);
4963     for (i = 0; i < n; i++) {
4964         subfacet_reset_dp_stats(subfacets[i], &stats[i]);
4965         subfacets[i]->path = SF_NOT_INSTALLED;
4966         subfacet_destroy(subfacets[i]);
4967         run_fast_rl();
4968     }
4969 }
4970
4971 /* Updates 'subfacet''s datapath flow, setting its actions to 'actions_len'
4972  * bytes of actions in 'actions'.  If 'stats' is non-null, statistics counters
4973  * in the datapath will be zeroed and 'stats' will be updated with traffic new
4974  * since 'subfacet' was last updated.
4975  *
4976  * Returns 0 if successful, otherwise a positive errno value. */
4977 static int
4978 subfacet_install(struct subfacet *subfacet, const struct ofpbuf *odp_actions,
4979                  struct dpif_flow_stats *stats)
4980 {
4981     struct facet *facet = subfacet->facet;
4982     enum subfacet_path path = facet->xout.slow ? SF_SLOW_PATH : SF_FAST_PATH;
4983     const struct nlattr *actions = odp_actions->data;
4984     size_t actions_len = odp_actions->size;
4985     struct odputil_keybuf maskbuf;
4986     struct ofpbuf mask;
4987
4988     uint64_t slow_path_stub[128 / 8];
4989     enum dpif_flow_put_flags flags;
4990     int ret;
4991
4992     flags = DPIF_FP_CREATE | DPIF_FP_MODIFY;
4993     if (stats) {
4994         flags |= DPIF_FP_ZERO_STATS;
4995     }
4996
4997     if (path == SF_SLOW_PATH) {
4998         compose_slow_path(facet->ofproto, &facet->flow, facet->xout.slow,
4999                           slow_path_stub, sizeof slow_path_stub,
5000                           &actions, &actions_len);
5001     }
5002
5003     ofpbuf_use_stack(&mask, &maskbuf, sizeof maskbuf);
5004     if (enable_megaflows) {
5005         odp_flow_key_from_mask(&mask, &facet->xout.wc.masks,
5006                                &facet->flow, UINT32_MAX);
5007     }
5008
5009     ret = dpif_flow_put(subfacet->backer->dpif, flags, subfacet->key,
5010                         subfacet->key_len,  mask.data, mask.size,
5011                         actions, actions_len, stats);
5012
5013     if (stats) {
5014         subfacet_reset_dp_stats(subfacet, stats);
5015     }
5016
5017     if (ret) {
5018         COVERAGE_INC(subfacet_install_fail);
5019     } else {
5020         subfacet->path = path;
5021     }
5022     return ret;
5023 }
5024
5025 /* If 'subfacet' is installed in the datapath, uninstalls it. */
5026 static void
5027 subfacet_uninstall(struct subfacet *subfacet)
5028 {
5029     if (subfacet->path != SF_NOT_INSTALLED) {
5030         struct ofproto_dpif *ofproto = subfacet->facet->ofproto;
5031         struct dpif_flow_stats stats;
5032         int error;
5033
5034         error = dpif_flow_del(ofproto->backer->dpif, subfacet->key,
5035                               subfacet->key_len, &stats);
5036         subfacet_reset_dp_stats(subfacet, &stats);
5037         if (!error) {
5038             subfacet_update_stats(subfacet, &stats);
5039         }
5040         subfacet->path = SF_NOT_INSTALLED;
5041     } else {
5042         ovs_assert(subfacet->dp_packet_count == 0);
5043         ovs_assert(subfacet->dp_byte_count == 0);
5044     }
5045 }
5046
5047 /* Resets 'subfacet''s datapath statistics counters.  This should be called
5048  * when 'subfacet''s statistics are cleared in the datapath.  If 'stats' is
5049  * non-null, it should contain the statistics returned by dpif when 'subfacet'
5050  * was reset in the datapath.  'stats' will be modified to include only
5051  * statistics new since 'subfacet' was last updated. */
5052 static void
5053 subfacet_reset_dp_stats(struct subfacet *subfacet,
5054                         struct dpif_flow_stats *stats)
5055 {
5056     if (stats
5057         && subfacet->dp_packet_count <= stats->n_packets
5058         && subfacet->dp_byte_count <= stats->n_bytes) {
5059         stats->n_packets -= subfacet->dp_packet_count;
5060         stats->n_bytes -= subfacet->dp_byte_count;
5061     }
5062
5063     subfacet->dp_packet_count = 0;
5064     subfacet->dp_byte_count = 0;
5065 }
5066
5067 /* Folds the statistics from 'stats' into the counters in 'subfacet'.
5068  *
5069  * Because of the meaning of a subfacet's counters, it only makes sense to do
5070  * this if 'stats' are not tracked in the datapath, that is, if 'stats'
5071  * represents a packet that was sent by hand or if it represents statistics
5072  * that have been cleared out of the datapath. */
5073 static void
5074 subfacet_update_stats(struct subfacet *subfacet,
5075                       const struct dpif_flow_stats *stats)
5076 {
5077     if (stats->n_packets || stats->used > subfacet->used) {
5078         struct facet *facet = subfacet->facet;
5079
5080         subfacet->used = MAX(subfacet->used, stats->used);
5081         facet->used = MAX(facet->used, stats->used);
5082         facet->packet_count += stats->n_packets;
5083         facet->byte_count += stats->n_bytes;
5084         facet->tcp_flags |= stats->tcp_flags;
5085     }
5086 }
5087 \f
5088 /* Rules. */
5089
5090 /* Lookup 'flow' in 'ofproto''s classifier.  If 'wc' is non-null, sets
5091  * the fields that were relevant as part of the lookup. */
5092 static struct rule_dpif *
5093 rule_dpif_lookup(struct ofproto_dpif *ofproto, const struct flow *flow,
5094                  struct flow_wildcards *wc)
5095 {
5096     struct rule_dpif *rule;
5097
5098     rule = rule_dpif_lookup_in_table(ofproto, flow, wc, 0);
5099     if (rule) {
5100         return rule;
5101     }
5102
5103     return rule_dpif_miss_rule(ofproto, flow);
5104 }
5105
5106 struct rule_dpif *
5107 rule_dpif_lookup_in_table(struct ofproto_dpif *ofproto,
5108                           const struct flow *flow, struct flow_wildcards *wc,
5109                           uint8_t table_id)
5110 {
5111     struct cls_rule *cls_rule;
5112     struct classifier *cls;
5113     bool frag;
5114
5115     if (table_id >= N_TABLES) {
5116         return NULL;
5117     }
5118
5119     if (wc) {
5120         memset(&wc->masks.dl_type, 0xff, sizeof wc->masks.dl_type);
5121         wc->masks.nw_frag |= FLOW_NW_FRAG_MASK;
5122     }
5123
5124     cls = &ofproto->up.tables[table_id].cls;
5125     frag = (flow->nw_frag & FLOW_NW_FRAG_ANY) != 0;
5126     if (frag && ofproto->up.frag_handling == OFPC_FRAG_NORMAL) {
5127         /* We must pretend that transport ports are unavailable. */
5128         struct flow ofpc_normal_flow = *flow;
5129         ofpc_normal_flow.tp_src = htons(0);
5130         ofpc_normal_flow.tp_dst = htons(0);
5131         cls_rule = classifier_lookup(cls, &ofpc_normal_flow, wc);
5132     } else if (frag && ofproto->up.frag_handling == OFPC_FRAG_DROP) {
5133         cls_rule = &ofproto->drop_frags_rule->up.cr;
5134         if (wc) {
5135             flow_wildcards_init_exact(wc);
5136         }
5137     } else {
5138         cls_rule = classifier_lookup(cls, flow, wc);
5139     }
5140     return rule_dpif_cast(rule_from_cls_rule(cls_rule));
5141 }
5142
5143 struct rule_dpif *
5144 rule_dpif_miss_rule(struct ofproto_dpif *ofproto, const struct flow *flow)
5145 {
5146     struct ofport_dpif *port;
5147
5148     port = get_ofp_port(ofproto, flow->in_port.ofp_port);
5149     if (!port) {
5150         VLOG_WARN_RL(&rl, "packet-in on unknown OpenFlow port %"PRIu16,
5151                      flow->in_port.ofp_port);
5152         return ofproto->miss_rule;
5153     }
5154
5155     if (port->up.pp.config & OFPUTIL_PC_NO_PACKET_IN) {
5156         return ofproto->no_packet_in_rule;
5157     }
5158     return ofproto->miss_rule;
5159 }
5160
5161 static void
5162 complete_operation(struct rule_dpif *rule)
5163 {
5164     struct ofproto_dpif *ofproto = ofproto_dpif_cast(rule->up.ofproto);
5165
5166     rule_invalidate(rule);
5167     if (clogged) {
5168         struct dpif_completion *c = xmalloc(sizeof *c);
5169         c->op = rule->up.pending;
5170         list_push_back(&ofproto->completions, &c->list_node);
5171     } else {
5172         ofoperation_complete(rule->up.pending, 0);
5173     }
5174 }
5175
5176 static struct rule *
5177 rule_alloc(void)
5178 {
5179     struct rule_dpif *rule = xmalloc(sizeof *rule);
5180     return &rule->up;
5181 }
5182
5183 static void
5184 rule_dealloc(struct rule *rule_)
5185 {
5186     struct rule_dpif *rule = rule_dpif_cast(rule_);
5187     free(rule);
5188 }
5189
5190 static enum ofperr
5191 rule_construct(struct rule *rule_)
5192 {
5193     struct rule_dpif *rule = rule_dpif_cast(rule_);
5194     struct ofproto_dpif *ofproto = ofproto_dpif_cast(rule->up.ofproto);
5195     struct rule_dpif *victim;
5196     uint8_t table_id;
5197
5198     rule->packet_count = 0;
5199     rule->byte_count = 0;
5200
5201     table_id = rule->up.table_id;
5202     victim = rule_dpif_cast(ofoperation_get_victim(rule->up.pending));
5203     if (victim) {
5204         rule->tag = victim->tag;
5205     } else if (table_id == 0) {
5206         rule->tag = 0;
5207     } else {
5208         struct flow flow;
5209
5210         miniflow_expand(&rule->up.cr.match.flow, &flow);
5211         rule->tag = rule_calculate_tag(&flow, &rule->up.cr.match.mask,
5212                                        ofproto->tables[table_id].basis);
5213     }
5214
5215     complete_operation(rule);
5216     return 0;
5217 }
5218
5219 static void
5220 rule_destruct(struct rule *rule)
5221 {
5222     complete_operation(rule_dpif_cast(rule));
5223 }
5224
5225 static void
5226 rule_get_stats(struct rule *rule_, uint64_t *packets, uint64_t *bytes)
5227 {
5228     struct rule_dpif *rule = rule_dpif_cast(rule_);
5229
5230     /* push_all_stats() can handle flow misses which, when using the learn
5231      * action, can cause rules to be added and deleted.  This can corrupt our
5232      * caller's datastructures which assume that rule_get_stats() doesn't have
5233      * an impact on the flow table. To be safe, we disable miss handling. */
5234     push_all_stats__(false);
5235
5236     /* Start from historical data for 'rule' itself that are no longer tracked
5237      * in facets.  This counts, for example, facets that have expired. */
5238     *packets = rule->packet_count;
5239     *bytes = rule->byte_count;
5240 }
5241
5242 static void
5243 rule_dpif_execute(struct rule_dpif *rule, const struct flow *flow,
5244                   struct ofpbuf *packet)
5245 {
5246     struct ofproto_dpif *ofproto = ofproto_dpif_cast(rule->up.ofproto);
5247     struct dpif_flow_stats stats;
5248     struct xlate_out xout;
5249     struct xlate_in xin;
5250
5251     dpif_flow_stats_extract(flow, packet, time_msec(), &stats);
5252     rule_credit_stats(rule, &stats);
5253
5254     xlate_in_init(&xin, ofproto, flow, rule, stats.tcp_flags, packet);
5255     xin.resubmit_stats = &stats;
5256     xlate_actions(&xin, &xout);
5257
5258     execute_odp_actions(ofproto, flow, xout.odp_actions.data,
5259                         xout.odp_actions.size, packet);
5260
5261     xlate_out_uninit(&xout);
5262 }
5263
5264 static enum ofperr
5265 rule_execute(struct rule *rule, const struct flow *flow,
5266              struct ofpbuf *packet)
5267 {
5268     rule_dpif_execute(rule_dpif_cast(rule), flow, packet);
5269     ofpbuf_delete(packet);
5270     return 0;
5271 }
5272
5273 static void
5274 rule_modify_actions(struct rule *rule_)
5275 {
5276     struct rule_dpif *rule = rule_dpif_cast(rule_);
5277
5278     complete_operation(rule);
5279 }
5280 \f
5281 /* Sends 'packet' out 'ofport'.
5282  * May modify 'packet'.
5283  * Returns 0 if successful, otherwise a positive errno value. */
5284 static int
5285 send_packet(const struct ofport_dpif *ofport, struct ofpbuf *packet)
5286 {
5287     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport->up.ofproto);
5288     uint64_t odp_actions_stub[1024 / 8];
5289     struct ofpbuf key, odp_actions;
5290     struct dpif_flow_stats stats;
5291     struct odputil_keybuf keybuf;
5292     struct ofpact_output output;
5293     struct xlate_out xout;
5294     struct xlate_in xin;
5295     struct flow flow;
5296     union flow_in_port in_port_;
5297     int error;
5298
5299     ofpbuf_use_stub(&odp_actions, odp_actions_stub, sizeof odp_actions_stub);
5300     ofpbuf_use_stack(&key, &keybuf, sizeof keybuf);
5301
5302     /* Use OFPP_NONE as the in_port to avoid special packet processing. */
5303     in_port_.ofp_port = OFPP_NONE;
5304     flow_extract(packet, 0, 0, NULL, &in_port_, &flow);
5305     odp_flow_key_from_flow(&key, &flow, ofp_port_to_odp_port(ofproto,
5306                                                              OFPP_LOCAL));
5307     dpif_flow_stats_extract(&flow, packet, time_msec(), &stats);
5308
5309     ofpact_init(&output.ofpact, OFPACT_OUTPUT, sizeof output);
5310     output.port = ofport->up.ofp_port;
5311     output.max_len = 0;
5312
5313     xlate_in_init(&xin, ofproto, &flow, NULL, 0, packet);
5314     xin.ofpacts_len = sizeof output;
5315     xin.ofpacts = &output.ofpact;
5316     xin.resubmit_stats = &stats;
5317     xlate_actions(&xin, &xout);
5318
5319     error = dpif_execute(ofproto->backer->dpif,
5320                          key.data, key.size,
5321                          xout.odp_actions.data, xout.odp_actions.size,
5322                          packet);
5323     xlate_out_uninit(&xout);
5324
5325     if (error) {
5326         VLOG_WARN_RL(&rl, "%s: failed to send packet on port %s (%s)",
5327                      ofproto->up.name, netdev_get_name(ofport->up.netdev),
5328                      ovs_strerror(error));
5329     }
5330
5331     ofproto->stats.tx_packets++;
5332     ofproto->stats.tx_bytes += packet->size;
5333     return error;
5334 }
5335
5336 /* Composes an ODP action for a "slow path" action for 'flow' within 'ofproto'.
5337  * The action will state 'slow' as the reason that the action is in the slow
5338  * path.  (This is purely informational: it allows a human viewing "ovs-dpctl
5339  * dump-flows" output to see why a flow is in the slow path.)
5340  *
5341  * The 'stub_size' bytes in 'stub' will be used to store the action.
5342  * 'stub_size' must be large enough for the action.
5343  *
5344  * The action and its size will be stored in '*actionsp' and '*actions_lenp',
5345  * respectively. */
5346 static void
5347 compose_slow_path(const struct ofproto_dpif *ofproto, const struct flow *flow,
5348                   enum slow_path_reason slow,
5349                   uint64_t *stub, size_t stub_size,
5350                   const struct nlattr **actionsp, size_t *actions_lenp)
5351 {
5352     union user_action_cookie cookie;
5353     struct ofpbuf buf;
5354
5355     cookie.type = USER_ACTION_COOKIE_SLOW_PATH;
5356     cookie.slow_path.unused = 0;
5357     cookie.slow_path.reason = slow;
5358
5359     ofpbuf_use_stack(&buf, stub, stub_size);
5360     if (slow & (SLOW_CFM | SLOW_BFD | SLOW_LACP | SLOW_STP)) {
5361         uint32_t pid = dpif_port_get_pid(ofproto->backer->dpif,
5362                                          ODPP_NONE);
5363         odp_put_userspace_action(pid, &cookie, sizeof cookie.slow_path, &buf);
5364     } else {
5365         put_userspace_action(ofproto, &buf, flow, &cookie,
5366                              sizeof cookie.slow_path);
5367     }
5368     *actionsp = buf.data;
5369     *actions_lenp = buf.size;
5370 }
5371
5372 size_t
5373 put_userspace_action(const struct ofproto_dpif *ofproto,
5374                      struct ofpbuf *odp_actions,
5375                      const struct flow *flow,
5376                      const union user_action_cookie *cookie,
5377                      const size_t cookie_size)
5378 {
5379     uint32_t pid;
5380
5381     pid = dpif_port_get_pid(ofproto->backer->dpif,
5382                             ofp_port_to_odp_port(ofproto,
5383                                                  flow->in_port.ofp_port));
5384
5385     return odp_put_userspace_action(pid, cookie, cookie_size, odp_actions);
5386 }
5387
5388 tag_type
5389 calculate_flow_tag(struct ofproto_dpif *ofproto, const struct flow *flow,
5390                    uint8_t table_id, struct rule_dpif *rule)
5391 {
5392     if (table_id > 0 && table_id < N_TABLES) {
5393         struct table_dpif *table = &ofproto->tables[table_id];
5394         if (table->other_table) {
5395             return (rule && rule->tag
5396                     ? rule->tag
5397                     : rule_calculate_tag(flow, &table->other_table->mask,
5398                                          table->basis));
5399         }
5400     }
5401
5402     return 0;
5403 }
5404 \f
5405 /* Optimized flow revalidation.
5406  *
5407  * It's a difficult problem, in general, to tell which facets need to have
5408  * their actions recalculated whenever the OpenFlow flow table changes.  We
5409  * don't try to solve that general problem: for most kinds of OpenFlow flow
5410  * table changes, we recalculate the actions for every facet.  This is
5411  * relatively expensive, but it's good enough if the OpenFlow flow table
5412  * doesn't change very often.
5413  *
5414  * However, we can expect one particular kind of OpenFlow flow table change to
5415  * happen frequently: changes caused by MAC learning.  To avoid wasting a lot
5416  * of CPU on revalidating every facet whenever MAC learning modifies the flow
5417  * table, we add a special case that applies to flow tables in which every rule
5418  * has the same form (that is, the same wildcards), except that the table is
5419  * also allowed to have a single "catch-all" flow that matches all packets.  We
5420  * optimize this case by tagging all of the facets that resubmit into the table
5421  * and invalidating the same tag whenever a flow changes in that table.  The
5422  * end result is that we revalidate just the facets that need it (and sometimes
5423  * a few more, but not all of the facets or even all of the facets that
5424  * resubmit to the table modified by MAC learning). */
5425
5426 /* Calculates the tag to use for 'flow' and mask 'mask' when it is inserted
5427  * into an OpenFlow table with the given 'basis'. */
5428 tag_type
5429 rule_calculate_tag(const struct flow *flow, const struct minimask *mask,
5430                    uint32_t secret)
5431 {
5432     if (minimask_is_catchall(mask)) {
5433         return 0;
5434     } else {
5435         uint32_t hash = flow_hash_in_minimask(flow, mask, secret);
5436         return tag_create_deterministic(hash);
5437     }
5438 }
5439
5440 /* Following a change to OpenFlow table 'table_id' in 'ofproto', update the
5441  * taggability of that table.
5442  *
5443  * This function must be called after *each* change to a flow table.  If you
5444  * skip calling it on some changes then the pointer comparisons at the end can
5445  * be invalid if you get unlucky.  For example, if a flow removal causes a
5446  * cls_table to be destroyed and then a flow insertion causes a cls_table with
5447  * different wildcards to be created with the same address, then this function
5448  * will incorrectly skip revalidation. */
5449 static void
5450 table_update_taggable(struct ofproto_dpif *ofproto, uint8_t table_id)
5451 {
5452     struct table_dpif *table = &ofproto->tables[table_id];
5453     const struct oftable *oftable = &ofproto->up.tables[table_id];
5454     struct cls_table *catchall, *other;
5455     struct cls_table *t;
5456
5457     catchall = other = NULL;
5458
5459     switch (hmap_count(&oftable->cls.tables)) {
5460     case 0:
5461         /* We could tag this OpenFlow table but it would make the logic a
5462          * little harder and it's a corner case that doesn't seem worth it
5463          * yet. */
5464         break;
5465
5466     case 1:
5467     case 2:
5468         HMAP_FOR_EACH (t, hmap_node, &oftable->cls.tables) {
5469             if (cls_table_is_catchall(t)) {
5470                 catchall = t;
5471             } else if (!other) {
5472                 other = t;
5473             } else {
5474                 /* Indicate that we can't tag this by setting both tables to
5475                  * NULL.  (We know that 'catchall' is already NULL.) */
5476                 other = NULL;
5477             }
5478         }
5479         break;
5480
5481     default:
5482         /* Can't tag this table. */
5483         break;
5484     }
5485
5486     if (table->catchall_table != catchall || table->other_table != other) {
5487         table->catchall_table = catchall;
5488         table->other_table = other;
5489         ofproto->backer->need_revalidate = REV_FLOW_TABLE;
5490     }
5491 }
5492
5493 /* Given 'rule' that has changed in some way (either it is a rule being
5494  * inserted, a rule being deleted, or a rule whose actions are being
5495  * modified), marks facets for revalidation to ensure that packets will be
5496  * forwarded correctly according to the new state of the flow table.
5497  *
5498  * This function must be called after *each* change to a flow table.  See
5499  * the comment on table_update_taggable() for more information. */
5500 static void
5501 rule_invalidate(const struct rule_dpif *rule)
5502 {
5503     struct ofproto_dpif *ofproto = ofproto_dpif_cast(rule->up.ofproto);
5504
5505     table_update_taggable(ofproto, rule->up.table_id);
5506
5507     if (!ofproto->backer->need_revalidate) {
5508         struct table_dpif *table = &ofproto->tables[rule->up.table_id];
5509
5510         if (table->other_table && rule->tag) {
5511             tag_set_add(&ofproto->backer->revalidate_set, rule->tag);
5512         } else {
5513             ofproto->backer->need_revalidate = REV_FLOW_TABLE;
5514         }
5515     }
5516 }
5517 \f
5518 static bool
5519 set_frag_handling(struct ofproto *ofproto_,
5520                   enum ofp_config_flags frag_handling)
5521 {
5522     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
5523     if (frag_handling != OFPC_FRAG_REASM) {
5524         ofproto->backer->need_revalidate = REV_RECONFIGURE;
5525         return true;
5526     } else {
5527         return false;
5528     }
5529 }
5530
5531 static enum ofperr
5532 packet_out(struct ofproto *ofproto_, struct ofpbuf *packet,
5533            const struct flow *flow,
5534            const struct ofpact *ofpacts, size_t ofpacts_len)
5535 {
5536     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
5537     struct odputil_keybuf keybuf;
5538     struct dpif_flow_stats stats;
5539     struct xlate_out xout;
5540     struct xlate_in xin;
5541     struct ofpbuf key;
5542
5543
5544     ofpbuf_use_stack(&key, &keybuf, sizeof keybuf);
5545     odp_flow_key_from_flow(&key, flow,
5546                            ofp_port_to_odp_port(ofproto,
5547                                       flow->in_port.ofp_port));
5548
5549     dpif_flow_stats_extract(flow, packet, time_msec(), &stats);
5550
5551     xlate_in_init(&xin, ofproto, flow, NULL, stats.tcp_flags, packet);
5552     xin.resubmit_stats = &stats;
5553     xin.ofpacts_len = ofpacts_len;
5554     xin.ofpacts = ofpacts;
5555
5556     xlate_actions(&xin, &xout);
5557     dpif_execute(ofproto->backer->dpif, key.data, key.size,
5558                  xout.odp_actions.data, xout.odp_actions.size, packet);
5559     xlate_out_uninit(&xout);
5560
5561     return 0;
5562 }
5563 \f
5564 /* NetFlow. */
5565
5566 static int
5567 set_netflow(struct ofproto *ofproto_,
5568             const struct netflow_options *netflow_options)
5569 {
5570     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
5571
5572     if (netflow_options) {
5573         if (!ofproto->netflow) {
5574             ofproto->netflow = netflow_create();
5575             ofproto->backer->need_revalidate = REV_RECONFIGURE;
5576         }
5577         return netflow_set_options(ofproto->netflow, netflow_options);
5578     } else if (ofproto->netflow) {
5579         ofproto->backer->need_revalidate = REV_RECONFIGURE;
5580         netflow_destroy(ofproto->netflow);
5581         ofproto->netflow = NULL;
5582     }
5583
5584     return 0;
5585 }
5586
5587 static void
5588 get_netflow_ids(const struct ofproto *ofproto_,
5589                 uint8_t *engine_type, uint8_t *engine_id)
5590 {
5591     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofproto_);
5592
5593     dpif_get_netflow_ids(ofproto->backer->dpif, engine_type, engine_id);
5594 }
5595
5596 static void
5597 send_active_timeout(struct ofproto_dpif *ofproto, struct facet *facet)
5598 {
5599     if (!facet_is_controller_flow(facet) &&
5600         netflow_active_timeout_expired(ofproto->netflow, &facet->nf_flow)) {
5601         struct subfacet *subfacet;
5602         struct ofexpired expired;
5603
5604         LIST_FOR_EACH (subfacet, list_node, &facet->subfacets) {
5605             if (subfacet->path == SF_FAST_PATH) {
5606                 struct dpif_flow_stats stats;
5607
5608                 subfacet_install(subfacet, &facet->xout.odp_actions,
5609                                  &stats);
5610                 subfacet_update_stats(subfacet, &stats);
5611             }
5612         }
5613
5614         expired.flow = facet->flow;
5615         expired.packet_count = facet->packet_count;
5616         expired.byte_count = facet->byte_count;
5617         expired.used = facet->used;
5618         netflow_expire(ofproto->netflow, &facet->nf_flow, &expired);
5619     }
5620 }
5621
5622 static void
5623 send_netflow_active_timeouts(struct ofproto_dpif *ofproto)
5624 {
5625     struct cls_cursor cursor;
5626     struct facet *facet;
5627
5628     cls_cursor_init(&cursor, &ofproto->facets, NULL);
5629     CLS_CURSOR_FOR_EACH (facet, cr, &cursor) {
5630         send_active_timeout(ofproto, facet);
5631     }
5632 }
5633 \f
5634 static struct ofproto_dpif *
5635 ofproto_dpif_lookup(const char *name)
5636 {
5637     struct ofproto_dpif *ofproto;
5638
5639     HMAP_FOR_EACH_WITH_HASH (ofproto, all_ofproto_dpifs_node,
5640                              hash_string(name, 0), &all_ofproto_dpifs) {
5641         if (!strcmp(ofproto->up.name, name)) {
5642             return ofproto;
5643         }
5644     }
5645     return NULL;
5646 }
5647
5648 static void
5649 ofproto_unixctl_fdb_flush(struct unixctl_conn *conn, int argc,
5650                           const char *argv[], void *aux OVS_UNUSED)
5651 {
5652     struct ofproto_dpif *ofproto;
5653
5654     if (argc > 1) {
5655         ofproto = ofproto_dpif_lookup(argv[1]);
5656         if (!ofproto) {
5657             unixctl_command_reply_error(conn, "no such bridge");
5658             return;
5659         }
5660         mac_learning_flush(ofproto->ml, &ofproto->backer->revalidate_set);
5661     } else {
5662         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
5663             mac_learning_flush(ofproto->ml, &ofproto->backer->revalidate_set);
5664         }
5665     }
5666
5667     unixctl_command_reply(conn, "table successfully flushed");
5668 }
5669
5670 static struct ofport_dpif *
5671 ofbundle_get_a_port(const struct ofbundle *bundle)
5672 {
5673     return CONTAINER_OF(list_front(&bundle->ports), struct ofport_dpif,
5674                         bundle_node);
5675 }
5676
5677 static void
5678 ofproto_unixctl_fdb_show(struct unixctl_conn *conn, int argc OVS_UNUSED,
5679                          const char *argv[], void *aux OVS_UNUSED)
5680 {
5681     struct ds ds = DS_EMPTY_INITIALIZER;
5682     const struct ofproto_dpif *ofproto;
5683     const struct mac_entry *e;
5684
5685     ofproto = ofproto_dpif_lookup(argv[1]);
5686     if (!ofproto) {
5687         unixctl_command_reply_error(conn, "no such bridge");
5688         return;
5689     }
5690
5691     ds_put_cstr(&ds, " port  VLAN  MAC                Age\n");
5692     LIST_FOR_EACH (e, lru_node, &ofproto->ml->lrus) {
5693         struct ofbundle *bundle = e->port.p;
5694         char name[OFP_MAX_PORT_NAME_LEN];
5695
5696         ofputil_port_to_string(ofbundle_get_a_port(bundle)->up.ofp_port,
5697                                name, sizeof name);
5698         ds_put_format(&ds, "%5s  %4d  "ETH_ADDR_FMT"  %3d\n",
5699                       name, e->vlan, ETH_ADDR_ARGS(e->mac),
5700                       mac_entry_age(ofproto->ml, e));
5701     }
5702     unixctl_command_reply(conn, ds_cstr(&ds));
5703     ds_destroy(&ds);
5704 }
5705
5706 struct trace_ctx {
5707     struct xlate_out xout;
5708     struct xlate_in xin;
5709     struct flow flow;
5710     struct ds *result;
5711 };
5712
5713 static void
5714 trace_format_rule(struct ds *result, int level, const struct rule_dpif *rule)
5715 {
5716     ds_put_char_multiple(result, '\t', level);
5717     if (!rule) {
5718         ds_put_cstr(result, "No match\n");
5719         return;
5720     }
5721
5722     ds_put_format(result, "Rule: table=%"PRIu8" cookie=%#"PRIx64" ",
5723                   rule ? rule->up.table_id : 0, ntohll(rule->up.flow_cookie));
5724     cls_rule_format(&rule->up.cr, result);
5725     ds_put_char(result, '\n');
5726
5727     ds_put_char_multiple(result, '\t', level);
5728     ds_put_cstr(result, "OpenFlow ");
5729     ofpacts_format(rule->up.ofpacts, rule->up.ofpacts_len, result);
5730     ds_put_char(result, '\n');
5731 }
5732
5733 static void
5734 trace_format_flow(struct ds *result, int level, const char *title,
5735                   struct trace_ctx *trace)
5736 {
5737     ds_put_char_multiple(result, '\t', level);
5738     ds_put_format(result, "%s: ", title);
5739     if (flow_equal(&trace->xin.flow, &trace->flow)) {
5740         ds_put_cstr(result, "unchanged");
5741     } else {
5742         flow_format(result, &trace->xin.flow);
5743         trace->flow = trace->xin.flow;
5744     }
5745     ds_put_char(result, '\n');
5746 }
5747
5748 static void
5749 trace_format_regs(struct ds *result, int level, const char *title,
5750                   struct trace_ctx *trace)
5751 {
5752     size_t i;
5753
5754     ds_put_char_multiple(result, '\t', level);
5755     ds_put_format(result, "%s:", title);
5756     for (i = 0; i < FLOW_N_REGS; i++) {
5757         ds_put_format(result, " reg%zu=0x%"PRIx32, i, trace->flow.regs[i]);
5758     }
5759     ds_put_char(result, '\n');
5760 }
5761
5762 static void
5763 trace_format_odp(struct ds *result, int level, const char *title,
5764                  struct trace_ctx *trace)
5765 {
5766     struct ofpbuf *odp_actions = &trace->xout.odp_actions;
5767
5768     ds_put_char_multiple(result, '\t', level);
5769     ds_put_format(result, "%s: ", title);
5770     format_odp_actions(result, odp_actions->data, odp_actions->size);
5771     ds_put_char(result, '\n');
5772 }
5773
5774 static void
5775 trace_resubmit(struct xlate_in *xin, struct rule_dpif *rule, int recurse)
5776 {
5777     struct trace_ctx *trace = CONTAINER_OF(xin, struct trace_ctx, xin);
5778     struct ds *result = trace->result;
5779
5780     ds_put_char(result, '\n');
5781     trace_format_flow(result, recurse + 1, "Resubmitted flow", trace);
5782     trace_format_regs(result, recurse + 1, "Resubmitted regs", trace);
5783     trace_format_odp(result,  recurse + 1, "Resubmitted  odp", trace);
5784     trace_format_rule(result, recurse + 1, rule);
5785 }
5786
5787 static void
5788 trace_report(struct xlate_in *xin, const char *s, int recurse)
5789 {
5790     struct trace_ctx *trace = CONTAINER_OF(xin, struct trace_ctx, xin);
5791     struct ds *result = trace->result;
5792
5793     ds_put_char_multiple(result, '\t', recurse);
5794     ds_put_cstr(result, s);
5795     ds_put_char(result, '\n');
5796 }
5797
5798 static void
5799 ofproto_unixctl_trace(struct unixctl_conn *conn, int argc, const char *argv[],
5800                       void *aux OVS_UNUSED)
5801 {
5802     const struct dpif_backer *backer;
5803     struct ofproto_dpif *ofproto;
5804     struct ofpbuf odp_key, odp_mask;
5805     struct ofpbuf *packet;
5806     struct ds result;
5807     struct flow flow;
5808     char *s;
5809
5810     packet = NULL;
5811     backer = NULL;
5812     ds_init(&result);
5813     ofpbuf_init(&odp_key, 0);
5814     ofpbuf_init(&odp_mask, 0);
5815
5816     /* Handle "-generate" or a hex string as the last argument. */
5817     if (!strcmp(argv[argc - 1], "-generate")) {
5818         packet = ofpbuf_new(0);
5819         argc--;
5820     } else {
5821         const char *error = eth_from_hex(argv[argc - 1], &packet);
5822         if (!error) {
5823             argc--;
5824         } else if (argc == 4) {
5825             /* The 3-argument form must end in "-generate' or a hex string. */
5826             unixctl_command_reply_error(conn, error);
5827             goto exit;
5828         }
5829     }
5830
5831     /* Parse the flow and determine whether a datapath or
5832      * bridge is specified. If function odp_flow_key_from_string()
5833      * returns 0, the flow is a odp_flow. If function
5834      * parse_ofp_exact_flow() returns 0, the flow is a br_flow. */
5835     if (!odp_flow_from_string(argv[argc - 1], NULL, &odp_key, &odp_mask)) {
5836         /* If the odp_flow is the second argument,
5837          * the datapath name is the first argument. */
5838         if (argc == 3) {
5839             const char *dp_type;
5840             if (!strncmp(argv[1], "ovs-", 4)) {
5841                 dp_type = argv[1] + 4;
5842             } else {
5843                 dp_type = argv[1];
5844             }
5845             backer = shash_find_data(&all_dpif_backers, dp_type);
5846             if (!backer) {
5847                 unixctl_command_reply_error(conn, "Cannot find datapath "
5848                                "of this name");
5849                 goto exit;
5850             }
5851         } else {
5852             /* No datapath name specified, so there should be only one
5853              * datapath. */
5854             struct shash_node *node;
5855             if (shash_count(&all_dpif_backers) != 1) {
5856                 unixctl_command_reply_error(conn, "Must specify datapath "
5857                          "name, there is more than one type of datapath");
5858                 goto exit;
5859             }
5860             node = shash_first(&all_dpif_backers);
5861             backer = node->data;
5862         }
5863
5864         /* Extract the ofproto_dpif object from the ofproto_receive()
5865          * function. */
5866         if (ofproto_receive(backer, NULL, odp_key.data,
5867                             odp_key.size, &flow, NULL, &ofproto, NULL)) {
5868             unixctl_command_reply_error(conn, "Invalid datapath flow");
5869             goto exit;
5870         }
5871         ds_put_format(&result, "Bridge: %s\n", ofproto->up.name);
5872     } else if (!parse_ofp_exact_flow(&flow, argv[argc - 1])) {
5873         if (argc != 3) {
5874             unixctl_command_reply_error(conn, "Must specify bridge name");
5875             goto exit;
5876         }
5877
5878         ofproto = ofproto_dpif_lookup(argv[1]);
5879         if (!ofproto) {
5880             unixctl_command_reply_error(conn, "Unknown bridge name");
5881             goto exit;
5882         }
5883     } else {
5884         unixctl_command_reply_error(conn, "Bad flow syntax");
5885         goto exit;
5886     }
5887
5888     /* Generate a packet, if requested. */
5889     if (packet) {
5890         if (!packet->size) {
5891             flow_compose(packet, &flow);
5892         } else {
5893             union flow_in_port in_port_;
5894
5895             in_port_ = flow.in_port;
5896             ds_put_cstr(&result, "Packet: ");
5897             s = ofp_packet_to_string(packet->data, packet->size);
5898             ds_put_cstr(&result, s);
5899             free(s);
5900
5901             /* Use the metadata from the flow and the packet argument
5902              * to reconstruct the flow. */
5903             flow_extract(packet, flow.skb_priority, flow.skb_mark, NULL,
5904                          &in_port_, &flow);
5905         }
5906     }
5907
5908     ofproto_trace(ofproto, &flow, packet, &result);
5909     unixctl_command_reply(conn, ds_cstr(&result));
5910
5911 exit:
5912     ds_destroy(&result);
5913     ofpbuf_delete(packet);
5914     ofpbuf_uninit(&odp_key);
5915     ofpbuf_uninit(&odp_mask);
5916 }
5917
5918 void
5919 ofproto_trace(struct ofproto_dpif *ofproto, const struct flow *flow,
5920               const struct ofpbuf *packet, struct ds *ds)
5921 {
5922     struct rule_dpif *rule;
5923
5924     ds_put_cstr(ds, "Flow: ");
5925     flow_format(ds, flow);
5926     ds_put_char(ds, '\n');
5927
5928     rule = rule_dpif_lookup(ofproto, flow, NULL);
5929
5930     trace_format_rule(ds, 0, rule);
5931     if (rule == ofproto->miss_rule) {
5932         ds_put_cstr(ds, "\nNo match, flow generates \"packet in\"s.\n");
5933     } else if (rule == ofproto->no_packet_in_rule) {
5934         ds_put_cstr(ds, "\nNo match, packets dropped because "
5935                     "OFPPC_NO_PACKET_IN is set on in_port.\n");
5936     } else if (rule == ofproto->drop_frags_rule) {
5937         ds_put_cstr(ds, "\nPackets dropped because they are IP fragments "
5938                     "and the fragment handling mode is \"drop\".\n");
5939     }
5940
5941     if (rule) {
5942         uint64_t odp_actions_stub[1024 / 8];
5943         struct ofpbuf odp_actions;
5944         struct trace_ctx trace;
5945         struct match match;
5946         uint8_t tcp_flags;
5947
5948         tcp_flags = packet ? packet_get_tcp_flags(packet, flow) : 0;
5949         trace.result = ds;
5950         trace.flow = *flow;
5951         ofpbuf_use_stub(&odp_actions,
5952                         odp_actions_stub, sizeof odp_actions_stub);
5953         xlate_in_init(&trace.xin, ofproto, flow, rule, tcp_flags, packet);
5954         trace.xin.resubmit_hook = trace_resubmit;
5955         trace.xin.report_hook = trace_report;
5956
5957         xlate_actions(&trace.xin, &trace.xout);
5958
5959         ds_put_char(ds, '\n');
5960         trace_format_flow(ds, 0, "Final flow", &trace);
5961
5962         match_init(&match, flow, &trace.xout.wc);
5963         ds_put_cstr(ds, "Relevant fields: ");
5964         match_format(&match, ds, OFP_DEFAULT_PRIORITY);
5965         ds_put_char(ds, '\n');
5966
5967         ds_put_cstr(ds, "Datapath actions: ");
5968         format_odp_actions(ds, trace.xout.odp_actions.data,
5969                            trace.xout.odp_actions.size);
5970
5971         if (trace.xout.slow) {
5972             ds_put_cstr(ds, "\nThis flow is handled by the userspace "
5973                         "slow path because it:");
5974             switch (trace.xout.slow) {
5975             case SLOW_CFM:
5976                 ds_put_cstr(ds, "\n\t- Consists of CFM packets.");
5977                 break;
5978             case SLOW_LACP:
5979                 ds_put_cstr(ds, "\n\t- Consists of LACP packets.");
5980                 break;
5981             case SLOW_STP:
5982                 ds_put_cstr(ds, "\n\t- Consists of STP packets.");
5983                 break;
5984             case SLOW_BFD:
5985                 ds_put_cstr(ds, "\n\t- Consists of BFD packets.");
5986                 break;
5987             case SLOW_CONTROLLER:
5988                 ds_put_cstr(ds, "\n\t- Sends \"packet-in\" messages "
5989                             "to the OpenFlow controller.");
5990                 break;
5991             case __SLOW_MAX:
5992                 NOT_REACHED();
5993             }
5994         }
5995
5996         xlate_out_uninit(&trace.xout);
5997     }
5998 }
5999
6000 static void
6001 ofproto_dpif_clog(struct unixctl_conn *conn OVS_UNUSED, int argc OVS_UNUSED,
6002                   const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
6003 {
6004     clogged = true;
6005     unixctl_command_reply(conn, NULL);
6006 }
6007
6008 static void
6009 ofproto_dpif_unclog(struct unixctl_conn *conn OVS_UNUSED, int argc OVS_UNUSED,
6010                     const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
6011 {
6012     clogged = false;
6013     unixctl_command_reply(conn, NULL);
6014 }
6015
6016 /* Runs a self-check of flow translations in 'ofproto'.  Appends a message to
6017  * 'reply' describing the results. */
6018 static void
6019 ofproto_dpif_self_check__(struct ofproto_dpif *ofproto, struct ds *reply)
6020 {
6021     struct cls_cursor cursor;
6022     struct facet *facet;
6023     int errors;
6024
6025     errors = 0;
6026     cls_cursor_init(&cursor, &ofproto->facets, NULL);
6027     CLS_CURSOR_FOR_EACH (facet, cr, &cursor) {
6028         if (!facet_check_consistency(facet)) {
6029             errors++;
6030         }
6031     }
6032     if (errors) {
6033         ofproto->backer->need_revalidate = REV_INCONSISTENCY;
6034     }
6035
6036     if (errors) {
6037         ds_put_format(reply, "%s: self-check failed (%d errors)\n",
6038                       ofproto->up.name, errors);
6039     } else {
6040         ds_put_format(reply, "%s: self-check passed\n", ofproto->up.name);
6041     }
6042 }
6043
6044 static void
6045 ofproto_dpif_self_check(struct unixctl_conn *conn,
6046                         int argc, const char *argv[], void *aux OVS_UNUSED)
6047 {
6048     struct ds reply = DS_EMPTY_INITIALIZER;
6049     struct ofproto_dpif *ofproto;
6050
6051     if (argc > 1) {
6052         ofproto = ofproto_dpif_lookup(argv[1]);
6053         if (!ofproto) {
6054             unixctl_command_reply_error(conn, "Unknown ofproto (use "
6055                                         "ofproto/list for help)");
6056             return;
6057         }
6058         ofproto_dpif_self_check__(ofproto, &reply);
6059     } else {
6060         HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
6061             ofproto_dpif_self_check__(ofproto, &reply);
6062         }
6063     }
6064
6065     unixctl_command_reply(conn, ds_cstr(&reply));
6066     ds_destroy(&reply);
6067 }
6068
6069 /* Store the current ofprotos in 'ofproto_shash'.  Returns a sorted list
6070  * of the 'ofproto_shash' nodes.  It is the responsibility of the caller
6071  * to destroy 'ofproto_shash' and free the returned value. */
6072 static const struct shash_node **
6073 get_ofprotos(struct shash *ofproto_shash)
6074 {
6075     const struct ofproto_dpif *ofproto;
6076
6077     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
6078         char *name = xasprintf("%s@%s", ofproto->up.type, ofproto->up.name);
6079         shash_add_nocopy(ofproto_shash, name, ofproto);
6080     }
6081
6082     return shash_sort(ofproto_shash);
6083 }
6084
6085 static void
6086 ofproto_unixctl_dpif_dump_dps(struct unixctl_conn *conn, int argc OVS_UNUSED,
6087                               const char *argv[] OVS_UNUSED,
6088                               void *aux OVS_UNUSED)
6089 {
6090     struct ds ds = DS_EMPTY_INITIALIZER;
6091     struct shash ofproto_shash;
6092     const struct shash_node **sorted_ofprotos;
6093     int i;
6094
6095     shash_init(&ofproto_shash);
6096     sorted_ofprotos = get_ofprotos(&ofproto_shash);
6097     for (i = 0; i < shash_count(&ofproto_shash); i++) {
6098         const struct shash_node *node = sorted_ofprotos[i];
6099         ds_put_format(&ds, "%s\n", node->name);
6100     }
6101
6102     shash_destroy(&ofproto_shash);
6103     free(sorted_ofprotos);
6104
6105     unixctl_command_reply(conn, ds_cstr(&ds));
6106     ds_destroy(&ds);
6107 }
6108
6109 static void
6110 show_dp_rates(struct ds *ds, const char *heading,
6111               const struct avg_subfacet_rates *rates)
6112 {
6113     ds_put_format(ds, "%s add rate: %5.3f/min, del rate: %5.3f/min\n",
6114                   heading, rates->add_rate, rates->del_rate);
6115 }
6116
6117 static void
6118 dpif_show_backer(const struct dpif_backer *backer, struct ds *ds)
6119 {
6120     const struct shash_node **ofprotos;
6121     struct ofproto_dpif *ofproto;
6122     struct shash ofproto_shash;
6123     uint64_t n_hit, n_missed;
6124     long long int minutes;
6125     size_t i;
6126
6127     n_hit = n_missed = 0;
6128     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
6129         if (ofproto->backer == backer) {
6130             n_missed += ofproto->n_missed;
6131             n_hit += ofproto->n_hit;
6132         }
6133     }
6134
6135     ds_put_format(ds, "%s: hit:%"PRIu64" missed:%"PRIu64"\n",
6136                   dpif_name(backer->dpif), n_hit, n_missed);
6137     ds_put_format(ds, "\tflows: cur: %zu, avg: %u, max: %u,"
6138                   " life span: %lldms\n", hmap_count(&backer->subfacets),
6139                   backer->avg_n_subfacet, backer->max_n_subfacet,
6140                   backer->avg_subfacet_life);
6141
6142     minutes = (time_msec() - backer->created) / (1000 * 60);
6143     if (minutes >= 60) {
6144         show_dp_rates(ds, "\thourly avg:", &backer->hourly);
6145     }
6146     if (minutes >= 60 * 24) {
6147         show_dp_rates(ds, "\tdaily avg:",  &backer->daily);
6148     }
6149     show_dp_rates(ds, "\toverall avg:",  &backer->lifetime);
6150
6151     shash_init(&ofproto_shash);
6152     ofprotos = get_ofprotos(&ofproto_shash);
6153     for (i = 0; i < shash_count(&ofproto_shash); i++) {
6154         struct ofproto_dpif *ofproto = ofprotos[i]->data;
6155         const struct shash_node **ports;
6156         size_t j;
6157
6158         if (ofproto->backer != backer) {
6159             continue;
6160         }
6161
6162         ds_put_format(ds, "\t%s: hit:%"PRIu64" missed:%"PRIu64"\n",
6163                       ofproto->up.name, ofproto->n_hit, ofproto->n_missed);
6164
6165         ports = shash_sort(&ofproto->up.port_by_name);
6166         for (j = 0; j < shash_count(&ofproto->up.port_by_name); j++) {
6167             const struct shash_node *node = ports[j];
6168             struct ofport *ofport = node->data;
6169             struct smap config;
6170             odp_port_t odp_port;
6171
6172             ds_put_format(ds, "\t\t%s %u/", netdev_get_name(ofport->netdev),
6173                           ofport->ofp_port);
6174
6175             odp_port = ofp_port_to_odp_port(ofproto, ofport->ofp_port);
6176             if (odp_port != ODPP_NONE) {
6177                 ds_put_format(ds, "%"PRIu32":", odp_port);
6178             } else {
6179                 ds_put_cstr(ds, "none:");
6180             }
6181
6182             ds_put_format(ds, " (%s", netdev_get_type(ofport->netdev));
6183
6184             smap_init(&config);
6185             if (!netdev_get_config(ofport->netdev, &config)) {
6186                 const struct smap_node **nodes;
6187                 size_t i;
6188
6189                 nodes = smap_sort(&config);
6190                 for (i = 0; i < smap_count(&config); i++) {
6191                     const struct smap_node *node = nodes[i];
6192                     ds_put_format(ds, "%c %s=%s", i ? ',' : ':',
6193                                   node->key, node->value);
6194                 }
6195                 free(nodes);
6196             }
6197             smap_destroy(&config);
6198
6199             ds_put_char(ds, ')');
6200             ds_put_char(ds, '\n');
6201         }
6202         free(ports);
6203     }
6204     shash_destroy(&ofproto_shash);
6205     free(ofprotos);
6206 }
6207
6208 static void
6209 ofproto_unixctl_dpif_show(struct unixctl_conn *conn, int argc OVS_UNUSED,
6210                           const char *argv[] OVS_UNUSED, void *aux OVS_UNUSED)
6211 {
6212     struct ds ds = DS_EMPTY_INITIALIZER;
6213     const struct shash_node **backers;
6214     int i;
6215
6216     backers = shash_sort(&all_dpif_backers);
6217     for (i = 0; i < shash_count(&all_dpif_backers); i++) {
6218         dpif_show_backer(backers[i]->data, &ds);
6219     }
6220     free(backers);
6221
6222     unixctl_command_reply(conn, ds_cstr(&ds));
6223     ds_destroy(&ds);
6224 }
6225
6226 /* Dump the megaflow (facet) cache.  This is useful to check the
6227  * correctness of flow wildcarding, since the same mechanism is used for
6228  * both xlate caching and kernel wildcarding.
6229  *
6230  * It's important to note that in the output the flow description uses
6231  * OpenFlow (OFP) ports, but the actions use datapath (ODP) ports.
6232  *
6233  * This command is only needed for advanced debugging, so it's not
6234  * documented in the man page. */
6235 static void
6236 ofproto_unixctl_dpif_dump_megaflows(struct unixctl_conn *conn,
6237                                     int argc OVS_UNUSED, const char *argv[],
6238                                     void *aux OVS_UNUSED)
6239 {
6240     struct ds ds = DS_EMPTY_INITIALIZER;
6241     const struct ofproto_dpif *ofproto;
6242     long long int now = time_msec();
6243     struct cls_cursor cursor;
6244     struct facet *facet;
6245
6246     ofproto = ofproto_dpif_lookup(argv[1]);
6247     if (!ofproto) {
6248         unixctl_command_reply_error(conn, "no such bridge");
6249         return;
6250     }
6251
6252     cls_cursor_init(&cursor, &ofproto->facets, NULL);
6253     CLS_CURSOR_FOR_EACH (facet, cr, &cursor) {
6254         cls_rule_format(&facet->cr, &ds);
6255         ds_put_cstr(&ds, ", ");
6256         ds_put_format(&ds, "n_subfacets:%zu, ", list_size(&facet->subfacets));
6257         ds_put_format(&ds, "used:%.3fs, ", (now - facet->used) / 1000.0);
6258         ds_put_cstr(&ds, "Datapath actions: ");
6259         if (facet->xout.slow) {
6260             uint64_t slow_path_stub[128 / 8];
6261             const struct nlattr *actions;
6262             size_t actions_len;
6263
6264             compose_slow_path(ofproto, &facet->flow, facet->xout.slow,
6265                               slow_path_stub, sizeof slow_path_stub,
6266                               &actions, &actions_len);
6267             format_odp_actions(&ds, actions, actions_len);
6268         } else {
6269             format_odp_actions(&ds, facet->xout.odp_actions.data,
6270                                facet->xout.odp_actions.size);
6271         }
6272         ds_put_cstr(&ds, "\n");
6273     }
6274
6275     ds_chomp(&ds, '\n');
6276     unixctl_command_reply(conn, ds_cstr(&ds));
6277     ds_destroy(&ds);
6278 }
6279
6280 /* Disable using the megaflows.
6281  *
6282  * This command is only needed for advanced debugging, so it's not
6283  * documented in the man page. */
6284 static void
6285 ofproto_unixctl_dpif_disable_megaflows(struct unixctl_conn *conn,
6286                                        int argc OVS_UNUSED,
6287                                        const char *argv[] OVS_UNUSED,
6288                                        void *aux OVS_UNUSED)
6289 {
6290     struct ofproto_dpif *ofproto;
6291
6292     enable_megaflows = false;
6293
6294     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
6295         flush(&ofproto->up);
6296     }
6297
6298     unixctl_command_reply(conn, "megaflows disabled");
6299 }
6300
6301 /* Re-enable using megaflows.
6302  *
6303  * This command is only needed for advanced debugging, so it's not
6304  * documented in the man page. */
6305 static void
6306 ofproto_unixctl_dpif_enable_megaflows(struct unixctl_conn *conn,
6307                                       int argc OVS_UNUSED,
6308                                       const char *argv[] OVS_UNUSED,
6309                                       void *aux OVS_UNUSED)
6310 {
6311     struct ofproto_dpif *ofproto;
6312
6313     enable_megaflows = true;
6314
6315     HMAP_FOR_EACH (ofproto, all_ofproto_dpifs_node, &all_ofproto_dpifs) {
6316         flush(&ofproto->up);
6317     }
6318
6319     unixctl_command_reply(conn, "megaflows enabled");
6320 }
6321
6322 static void
6323 ofproto_unixctl_dpif_dump_flows(struct unixctl_conn *conn,
6324                                 int argc OVS_UNUSED, const char *argv[],
6325                                 void *aux OVS_UNUSED)
6326 {
6327     struct ds ds = DS_EMPTY_INITIALIZER;
6328     const struct ofproto_dpif *ofproto;
6329     struct subfacet *subfacet;
6330
6331     ofproto = ofproto_dpif_lookup(argv[1]);
6332     if (!ofproto) {
6333         unixctl_command_reply_error(conn, "no such bridge");
6334         return;
6335     }
6336
6337     update_stats(ofproto->backer);
6338
6339     HMAP_FOR_EACH (subfacet, hmap_node, &ofproto->backer->subfacets) {
6340         struct facet *facet = subfacet->facet;
6341
6342         if (facet->ofproto != ofproto) {
6343             continue;
6344         }
6345
6346         odp_flow_key_format(subfacet->key, subfacet->key_len, &ds);
6347
6348         ds_put_format(&ds, ", packets:%"PRIu64", bytes:%"PRIu64", used:",
6349                       subfacet->dp_packet_count, subfacet->dp_byte_count);
6350         if (subfacet->used) {
6351             ds_put_format(&ds, "%.3fs",
6352                           (time_msec() - subfacet->used) / 1000.0);
6353         } else {
6354             ds_put_format(&ds, "never");
6355         }
6356         if (subfacet->facet->tcp_flags) {
6357             ds_put_cstr(&ds, ", flags:");
6358             packet_format_tcp_flags(&ds, subfacet->facet->tcp_flags);
6359         }
6360
6361         ds_put_cstr(&ds, ", actions:");
6362         if (facet->xout.slow) {
6363             uint64_t slow_path_stub[128 / 8];
6364             const struct nlattr *actions;
6365             size_t actions_len;
6366
6367             compose_slow_path(ofproto, &facet->flow, facet->xout.slow,
6368                               slow_path_stub, sizeof slow_path_stub,
6369                               &actions, &actions_len);
6370             format_odp_actions(&ds, actions, actions_len);
6371         } else {
6372             format_odp_actions(&ds, facet->xout.odp_actions.data,
6373                                facet->xout.odp_actions.size);
6374         }
6375         ds_put_char(&ds, '\n');
6376     }
6377
6378     unixctl_command_reply(conn, ds_cstr(&ds));
6379     ds_destroy(&ds);
6380 }
6381
6382 static void
6383 ofproto_unixctl_dpif_del_flows(struct unixctl_conn *conn,
6384                                int argc OVS_UNUSED, const char *argv[],
6385                                void *aux OVS_UNUSED)
6386 {
6387     struct ds ds = DS_EMPTY_INITIALIZER;
6388     struct ofproto_dpif *ofproto;
6389
6390     ofproto = ofproto_dpif_lookup(argv[1]);
6391     if (!ofproto) {
6392         unixctl_command_reply_error(conn, "no such bridge");
6393         return;
6394     }
6395
6396     flush(&ofproto->up);
6397
6398     unixctl_command_reply(conn, ds_cstr(&ds));
6399     ds_destroy(&ds);
6400 }
6401
6402 static void
6403 ofproto_dpif_unixctl_init(void)
6404 {
6405     static bool registered;
6406     if (registered) {
6407         return;
6408     }
6409     registered = true;
6410
6411     unixctl_command_register(
6412         "ofproto/trace",
6413         "[dp_name]|bridge odp_flow|br_flow [-generate|packet]",
6414         1, 3, ofproto_unixctl_trace, NULL);
6415     unixctl_command_register("fdb/flush", "[bridge]", 0, 1,
6416                              ofproto_unixctl_fdb_flush, NULL);
6417     unixctl_command_register("fdb/show", "bridge", 1, 1,
6418                              ofproto_unixctl_fdb_show, NULL);
6419     unixctl_command_register("ofproto/clog", "", 0, 0,
6420                              ofproto_dpif_clog, NULL);
6421     unixctl_command_register("ofproto/unclog", "", 0, 0,
6422                              ofproto_dpif_unclog, NULL);
6423     unixctl_command_register("ofproto/self-check", "[bridge]", 0, 1,
6424                              ofproto_dpif_self_check, NULL);
6425     unixctl_command_register("dpif/dump-dps", "", 0, 0,
6426                              ofproto_unixctl_dpif_dump_dps, NULL);
6427     unixctl_command_register("dpif/show", "", 0, 0, ofproto_unixctl_dpif_show,
6428                              NULL);
6429     unixctl_command_register("dpif/dump-flows", "bridge", 1, 1,
6430                              ofproto_unixctl_dpif_dump_flows, NULL);
6431     unixctl_command_register("dpif/del-flows", "bridge", 1, 1,
6432                              ofproto_unixctl_dpif_del_flows, NULL);
6433     unixctl_command_register("dpif/dump-megaflows", "bridge", 1, 1,
6434                              ofproto_unixctl_dpif_dump_megaflows, NULL);
6435     unixctl_command_register("dpif/disable-megaflows", "", 0, 0,
6436                              ofproto_unixctl_dpif_disable_megaflows, NULL);
6437     unixctl_command_register("dpif/enable-megaflows", "", 0, 0,
6438                              ofproto_unixctl_dpif_enable_megaflows, NULL);
6439 }
6440 \f
6441 /* Linux VLAN device support (e.g. "eth0.10" for VLAN 10.)
6442  *
6443  * This is deprecated.  It is only for compatibility with broken device drivers
6444  * in old versions of Linux that do not properly support VLANs when VLAN
6445  * devices are not used.  When broken device drivers are no longer in
6446  * widespread use, we will delete these interfaces. */
6447
6448 static int
6449 set_realdev(struct ofport *ofport_, ofp_port_t realdev_ofp_port, int vid)
6450 {
6451     struct ofproto_dpif *ofproto = ofproto_dpif_cast(ofport_->ofproto);
6452     struct ofport_dpif *ofport = ofport_dpif_cast(ofport_);
6453
6454     if (realdev_ofp_port == ofport->realdev_ofp_port
6455         && vid == ofport->vlandev_vid) {
6456         return 0;
6457     }
6458
6459     ofproto->backer->need_revalidate = REV_RECONFIGURE;
6460
6461     if (ofport->realdev_ofp_port) {
6462         vsp_remove(ofport);
6463     }
6464     if (realdev_ofp_port && ofport->bundle) {
6465         /* vlandevs are enslaved to their realdevs, so they are not allowed to
6466          * themselves be part of a bundle. */
6467         bundle_set(ofport->up.ofproto, ofport->bundle, NULL);
6468     }
6469
6470     ofport->realdev_ofp_port = realdev_ofp_port;
6471     ofport->vlandev_vid = vid;
6472
6473     if (realdev_ofp_port) {
6474         vsp_add(ofport, realdev_ofp_port, vid);
6475     }
6476
6477     return 0;
6478 }
6479
6480 static uint32_t
6481 hash_realdev_vid(ofp_port_t realdev_ofp_port, int vid)
6482 {
6483     return hash_2words(ofp_to_u16(realdev_ofp_port), vid);
6484 }
6485
6486 bool
6487 ofproto_has_vlan_splinters(const struct ofproto_dpif *ofproto)
6488 {
6489     return !hmap_is_empty(&ofproto->realdev_vid_map);
6490 }
6491
6492 /* Returns the OFP port number of the Linux VLAN device that corresponds to
6493  * 'vlan_tci' on the network device with port number 'realdev_ofp_port' in
6494  * 'struct ofport_dpif'.  For example, given 'realdev_ofp_port' of eth0 and
6495  * 'vlan_tci' 9, it would return the port number of eth0.9.
6496  *
6497  * Unless VLAN splinters are enabled for port 'realdev_ofp_port', this
6498  * function just returns its 'realdev_ofp_port' argument. */
6499 ofp_port_t
6500 vsp_realdev_to_vlandev(const struct ofproto_dpif *ofproto,
6501                        ofp_port_t realdev_ofp_port, ovs_be16 vlan_tci)
6502 {
6503     if (!hmap_is_empty(&ofproto->realdev_vid_map)) {
6504         int vid = vlan_tci_to_vid(vlan_tci);
6505         const struct vlan_splinter *vsp;
6506
6507         HMAP_FOR_EACH_WITH_HASH (vsp, realdev_vid_node,
6508                                  hash_realdev_vid(realdev_ofp_port, vid),
6509                                  &ofproto->realdev_vid_map) {
6510             if (vsp->realdev_ofp_port == realdev_ofp_port
6511                 && vsp->vid == vid) {
6512                 return vsp->vlandev_ofp_port;
6513             }
6514         }
6515     }
6516     return realdev_ofp_port;
6517 }
6518
6519 static struct vlan_splinter *
6520 vlandev_find(const struct ofproto_dpif *ofproto, ofp_port_t vlandev_ofp_port)
6521 {
6522     struct vlan_splinter *vsp;
6523
6524     HMAP_FOR_EACH_WITH_HASH (vsp, vlandev_node,
6525                              hash_ofp_port(vlandev_ofp_port),
6526                              &ofproto->vlandev_map) {
6527         if (vsp->vlandev_ofp_port == vlandev_ofp_port) {
6528             return vsp;
6529         }
6530     }
6531
6532     return NULL;
6533 }
6534
6535 /* Returns the OpenFlow port number of the "real" device underlying the Linux
6536  * VLAN device with OpenFlow port number 'vlandev_ofp_port' and stores the
6537  * VLAN VID of the Linux VLAN device in '*vid'.  For example, given
6538  * 'vlandev_ofp_port' of eth0.9, it would return the OpenFlow port number of
6539  * eth0 and store 9 in '*vid'.
6540  *
6541  * Returns 0 and does not modify '*vid' if 'vlandev_ofp_port' is not a Linux
6542  * VLAN device.  Unless VLAN splinters are enabled, this is what this function
6543  * always does.*/
6544 static ofp_port_t
6545 vsp_vlandev_to_realdev(const struct ofproto_dpif *ofproto,
6546                        ofp_port_t vlandev_ofp_port, int *vid)
6547 {
6548     if (!hmap_is_empty(&ofproto->vlandev_map)) {
6549         const struct vlan_splinter *vsp;
6550
6551         vsp = vlandev_find(ofproto, vlandev_ofp_port);
6552         if (vsp) {
6553             if (vid) {
6554                 *vid = vsp->vid;
6555             }
6556             return vsp->realdev_ofp_port;
6557         }
6558     }
6559     return 0;
6560 }
6561
6562 /* Given 'flow', a flow representing a packet received on 'ofproto', checks
6563  * whether 'flow->in_port' represents a Linux VLAN device.  If so, changes
6564  * 'flow->in_port' to the "real" device backing the VLAN device, sets
6565  * 'flow->vlan_tci' to the VLAN VID, and returns true.  Otherwise (which is
6566  * always the case unless VLAN splinters are enabled), returns false without
6567  * making any changes. */
6568 static bool
6569 vsp_adjust_flow(const struct ofproto_dpif *ofproto, struct flow *flow)
6570 {
6571     ofp_port_t realdev;
6572     int vid;
6573
6574     realdev = vsp_vlandev_to_realdev(ofproto, flow->in_port.ofp_port, &vid);
6575     if (!realdev) {
6576         return false;
6577     }
6578
6579     /* Cause the flow to be processed as if it came in on the real device with
6580      * the VLAN device's VLAN ID. */
6581     flow->in_port.ofp_port = realdev;
6582     flow->vlan_tci = htons((vid & VLAN_VID_MASK) | VLAN_CFI);
6583     return true;
6584 }
6585
6586 static void
6587 vsp_remove(struct ofport_dpif *port)
6588 {
6589     struct ofproto_dpif *ofproto = ofproto_dpif_cast(port->up.ofproto);
6590     struct vlan_splinter *vsp;
6591
6592     vsp = vlandev_find(ofproto, port->up.ofp_port);
6593     if (vsp) {
6594         hmap_remove(&ofproto->vlandev_map, &vsp->vlandev_node);
6595         hmap_remove(&ofproto->realdev_vid_map, &vsp->realdev_vid_node);
6596         free(vsp);
6597
6598         port->realdev_ofp_port = 0;
6599     } else {
6600         VLOG_ERR("missing vlan device record");
6601     }
6602 }
6603
6604 static void
6605 vsp_add(struct ofport_dpif *port, ofp_port_t realdev_ofp_port, int vid)
6606 {
6607     struct ofproto_dpif *ofproto = ofproto_dpif_cast(port->up.ofproto);
6608
6609     if (!vsp_vlandev_to_realdev(ofproto, port->up.ofp_port, NULL)
6610         && (vsp_realdev_to_vlandev(ofproto, realdev_ofp_port, htons(vid))
6611             == realdev_ofp_port)) {
6612         struct vlan_splinter *vsp;
6613
6614         vsp = xmalloc(sizeof *vsp);
6615         hmap_insert(&ofproto->vlandev_map, &vsp->vlandev_node,
6616                     hash_ofp_port(port->up.ofp_port));
6617         hmap_insert(&ofproto->realdev_vid_map, &vsp->realdev_vid_node,
6618                     hash_realdev_vid(realdev_ofp_port, vid));
6619         vsp->realdev_ofp_port = realdev_ofp_port;
6620         vsp->vlandev_ofp_port = port->up.ofp_port;
6621         vsp->vid = vid;
6622
6623         port->realdev_ofp_port = realdev_ofp_port;
6624     } else {
6625         VLOG_ERR("duplicate vlan device record");
6626     }
6627 }
6628
6629 static odp_port_t
6630 ofp_port_to_odp_port(const struct ofproto_dpif *ofproto, ofp_port_t ofp_port)
6631 {
6632     const struct ofport_dpif *ofport = get_ofp_port(ofproto, ofp_port);
6633     return ofport ? ofport->odp_port : ODPP_NONE;
6634 }
6635
6636 static struct ofport_dpif *
6637 odp_port_to_ofport(const struct dpif_backer *backer, odp_port_t odp_port)
6638 {
6639     struct ofport_dpif *port;
6640
6641     HMAP_FOR_EACH_IN_BUCKET (port, odp_port_node, hash_odp_port(odp_port),
6642                              &backer->odp_to_ofport_map) {
6643         if (port->odp_port == odp_port) {
6644             return port;
6645         }
6646     }
6647
6648     return NULL;
6649 }
6650
6651 static ofp_port_t
6652 odp_port_to_ofp_port(const struct ofproto_dpif *ofproto, odp_port_t odp_port)
6653 {
6654     struct ofport_dpif *port;
6655
6656     port = odp_port_to_ofport(ofproto->backer, odp_port);
6657     if (port && &ofproto->up == port->up.ofproto) {
6658         return port->up.ofp_port;
6659     } else {
6660         return OFPP_NONE;
6661     }
6662 }
6663
6664 /* Compute exponentially weighted moving average, adding 'new' as the newest,
6665  * most heavily weighted element.  'base' designates the rate of decay: after
6666  * 'base' further updates, 'new''s weight in the EWMA decays to about 1/e
6667  * (about .37). */
6668 static void
6669 exp_mavg(double *avg, int base, double new)
6670 {
6671     *avg = (*avg * (base - 1) + new) / base;
6672 }
6673
6674 static void
6675 update_moving_averages(struct dpif_backer *backer)
6676 {
6677     const int min_ms = 60 * 1000; /* milliseconds in one minute. */
6678     long long int minutes = (time_msec() - backer->created) / min_ms;
6679
6680     if (minutes > 0) {
6681         backer->lifetime.add_rate = (double) backer->total_subfacet_add_count
6682             / minutes;
6683         backer->lifetime.del_rate = (double) backer->total_subfacet_del_count
6684             / minutes;
6685     } else {
6686         backer->lifetime.add_rate = 0.0;
6687         backer->lifetime.del_rate = 0.0;
6688     }
6689
6690     /* Update hourly averages on the minute boundaries. */
6691     if (time_msec() - backer->last_minute >= min_ms) {
6692         exp_mavg(&backer->hourly.add_rate, 60, backer->subfacet_add_count);
6693         exp_mavg(&backer->hourly.del_rate, 60, backer->subfacet_del_count);
6694
6695         /* Update daily averages on the hour boundaries. */
6696         if ((backer->last_minute - backer->created) / min_ms % 60 == 59) {
6697             exp_mavg(&backer->daily.add_rate, 24, backer->hourly.add_rate);
6698             exp_mavg(&backer->daily.del_rate, 24, backer->hourly.del_rate);
6699         }
6700
6701         backer->total_subfacet_add_count += backer->subfacet_add_count;
6702         backer->total_subfacet_del_count += backer->subfacet_del_count;
6703         backer->subfacet_add_count = 0;
6704         backer->subfacet_del_count = 0;
6705         backer->last_minute += min_ms;
6706     }
6707 }
6708
6709 const struct ofproto_class ofproto_dpif_class = {
6710     init,
6711     enumerate_types,
6712     enumerate_names,
6713     del,
6714     port_open_type,
6715     type_run,
6716     type_run_fast,
6717     type_wait,
6718     alloc,
6719     construct,
6720     destruct,
6721     dealloc,
6722     run,
6723     run_fast,
6724     wait,
6725     get_memory_usage,
6726     flush,
6727     get_features,
6728     get_tables,
6729     port_alloc,
6730     port_construct,
6731     port_destruct,
6732     port_dealloc,
6733     port_modified,
6734     port_reconfigured,
6735     port_query_by_name,
6736     port_add,
6737     port_del,
6738     port_get_stats,
6739     port_dump_start,
6740     port_dump_next,
6741     port_dump_done,
6742     port_poll,
6743     port_poll_wait,
6744     port_is_lacp_current,
6745     NULL,                       /* rule_choose_table */
6746     rule_alloc,
6747     rule_construct,
6748     rule_destruct,
6749     rule_dealloc,
6750     rule_get_stats,
6751     rule_execute,
6752     rule_modify_actions,
6753     set_frag_handling,
6754     packet_out,
6755     set_netflow,
6756     get_netflow_ids,
6757     set_sflow,
6758     set_ipfix,
6759     set_cfm,
6760     get_cfm_status,
6761     set_bfd,
6762     get_bfd_status,
6763     set_stp,
6764     get_stp_status,
6765     set_stp_port,
6766     get_stp_port_status,
6767     set_queues,
6768     bundle_set,
6769     bundle_remove,
6770     mirror_set__,
6771     mirror_get_stats__,
6772     set_flood_vlans,
6773     is_mirror_output_bundle,
6774     forward_bpdu_changed,
6775     set_mac_table_config,
6776     set_realdev,
6777     NULL,                       /* meter_get_features */
6778     NULL,                       /* meter_set */
6779     NULL,                       /* meter_get */
6780     NULL,                       /* meter_del */
6781 };