datapath-windows: Fix IP fragmentation
[cascardo/ovs.git] / lib / bfd.c
1 /* Copyright (c) 2013, 2014 Nicira, Inc.
2  *
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at:
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License. */
14
15 #include <config.h>
16 #include "bfd.h"
17
18 #include <sys/types.h>
19 #include <arpa/inet.h>
20 #include <netinet/in_systm.h>
21 #include <netinet/ip.h>
22 #include <sys/socket.h>
23
24 #include "byte-order.h"
25 #include "connectivity.h"
26 #include "csum.h"
27 #include "dp-packet.h"
28 #include "dpif.h"
29 #include "dynamic-string.h"
30 #include "flow.h"
31 #include "hash.h"
32 #include "hmap.h"
33 #include "list.h"
34 #include "netdev.h"
35 #include "odp-util.h"
36 #include "ofpbuf.h"
37 #include "ovs-thread.h"
38 #include "openvswitch/types.h"
39 #include "packets.h"
40 #include "poll-loop.h"
41 #include "random.h"
42 #include "seq.h"
43 #include "smap.h"
44 #include "timeval.h"
45 #include "unaligned.h"
46 #include "unixctl.h"
47 #include "util.h"
48 #include "openvswitch/vlog.h"
49
50 VLOG_DEFINE_THIS_MODULE(bfd);
51
52 /* XXX Finish BFD.
53  *
54  * The goal of this module is to replace CFM with something both more flexible
55  * and standards compliant.  In service of this goal, the following needs to be
56  * done.
57  *
58  * - Compliance
59  *   * Implement Demand mode.
60  *   * Go through the RFC line by line and verify we comply.
61  *   * Test against a hardware implementation.  Preferably a popular one.
62  *   * Delete BFD packets with nw_ttl != 255 in the datapath to prevent DOS
63  *     attacks.
64  *
65  * - Unit tests.
66  *
67  * - Set TOS/PCP on the outer tunnel header when encapped.
68  *
69  * - Sending BFD messages should be in its own thread/process.
70  *
71  * - Scale testing.  How does it operate when there are large number of bfd
72  *   sessions?  Do we ever have random flaps?  What's the CPU utilization?
73  *
74  * - Rely on data traffic for liveness by using BFD demand mode.
75  *   If we're receiving traffic on a port, we can safely assume it's up (modulo
76  *   unidrectional failures).  BFD has a demand mode in which it can stay quiet
77  *   unless it feels the need to check the status of the port.  Using this, we
78  *   can implement a strategy in which BFD only sends control messages on dark
79  *   interfaces.
80  *
81  * - Depending on how one interprets the spec, it appears that a BFD session
82  *   can never change bfd.LocalDiag to "No Diagnostic".  We should verify that
83  *   this is what hardware implementations actually do.  Seems like "No
84  *   Diagnostic" should be set once a BFD session state goes UP. */
85
86 #define BFD_VERSION 1
87
88 enum flags {
89     FLAG_MULTIPOINT = 1 << 0,
90     FLAG_DEMAND = 1 << 1,
91     FLAG_AUTH = 1 << 2,
92     FLAG_CTL = 1 << 3,
93     FLAG_FINAL = 1 << 4,
94     FLAG_POLL = 1 << 5
95 };
96
97 enum state {
98     STATE_ADMIN_DOWN = 0 << 6,
99     STATE_DOWN = 1 << 6,
100     STATE_INIT = 2 << 6,
101     STATE_UP = 3 << 6
102 };
103
104 enum diag {
105     DIAG_NONE = 0,                /* No Diagnostic. */
106     DIAG_EXPIRED = 1,             /* Control Detection Time Expired. */
107     DIAG_ECHO_FAILED = 2,         /* Echo Function Failed. */
108     DIAG_RMT_DOWN = 3,            /* Neighbor Signaled Session Down. */
109     DIAG_FWD_RESET = 4,           /* Forwarding Plane Reset. */
110     DIAG_PATH_DOWN = 5,           /* Path Down. */
111     DIAG_CPATH_DOWN = 6,          /* Concatenated Path Down. */
112     DIAG_ADMIN_DOWN = 7,          /* Administratively Down. */
113     DIAG_RCPATH_DOWN = 8          /* Reverse Concatenated Path Down. */
114 };
115
116 /* RFC 5880 Section 4.1
117  *  0                   1                   2                   3
118  *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
119  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
120  * |Vers |  Diag   |Sta|P|F|C|A|D|M|  Detect Mult  |    Length     |
121  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
122  * |                       My Discriminator                        |
123  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
124  * |                      Your Discriminator                       |
125  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
126  * |                    Desired Min TX Interval                    |
127  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
128  * |                   Required Min RX Interval                    |
129  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
130  * |                 Required Min Echo RX Interval                 |
131  * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ */
132 struct msg {
133     uint8_t vers_diag;    /* Version and diagnostic. */
134     uint8_t flags;        /* 2bit State field followed by flags. */
135     uint8_t mult;         /* Fault detection multiplier. */
136     uint8_t length;       /* Length of this BFD message. */
137     ovs_be32 my_disc;     /* My discriminator. */
138     ovs_be32 your_disc;   /* Your discriminator. */
139     ovs_be32 min_tx;      /* Desired minimum tx interval. */
140     ovs_be32 min_rx;      /* Required minimum rx interval. */
141     ovs_be32 min_rx_echo; /* Required minimum echo rx interval. */
142 };
143 BUILD_ASSERT_DECL(BFD_PACKET_LEN == sizeof(struct msg));
144
145 #define DIAG_MASK 0x1f
146 #define VERS_SHIFT 5
147 #define STATE_MASK 0xC0
148 #define FLAGS_MASK 0x3f
149
150 struct bfd {
151     struct hmap_node node;        /* In 'all_bfds'. */
152     uint32_t disc;                /* bfd.LocalDiscr. Key in 'all_bfds' hmap. */
153
154     char *name;                   /* Name used for logging. */
155
156     bool cpath_down;              /* Concatenated Path Down. */
157     uint8_t mult;                 /* bfd.DetectMult. */
158
159     struct netdev *netdev;
160     uint64_t rx_packets;          /* Packets received by 'netdev'. */
161
162     enum state state;             /* bfd.SessionState. */
163     enum state rmt_state;         /* bfd.RemoteSessionState. */
164
165     enum diag diag;               /* bfd.LocalDiag. */
166     enum diag rmt_diag;           /* Remote diagnostic. */
167
168     enum flags flags;             /* Flags sent on messages. */
169     enum flags rmt_flags;         /* Flags last received. */
170
171     uint32_t rmt_disc;            /* bfd.RemoteDiscr. */
172
173     struct eth_addr local_eth_src; /* Local eth src address. */
174     struct eth_addr local_eth_dst; /* Local eth dst address. */
175
176     struct eth_addr rmt_eth_dst;   /* Remote eth dst address. */
177
178     ovs_be32 ip_src;              /* IPv4 source address. */
179     ovs_be32 ip_dst;              /* IPv4 destination address. */
180
181     uint16_t udp_src;             /* UDP source port. */
182
183     /* All timers in milliseconds. */
184     long long int rmt_min_rx;     /* bfd.RemoteMinRxInterval. */
185     long long int rmt_min_tx;     /* Remote minimum TX interval. */
186
187     long long int cfg_min_tx;     /* Configured minimum TX rate. */
188     long long int cfg_min_rx;     /* Configured required minimum RX rate. */
189     long long int poll_min_tx;    /* Min TX negotating in a poll sequence. */
190     long long int poll_min_rx;    /* Min RX negotating in a poll sequence. */
191     long long int min_tx;         /* bfd.DesiredMinTxInterval. */
192     long long int min_rx;         /* bfd.RequiredMinRxInterval. */
193
194     long long int last_tx;        /* Last TX time. */
195     long long int next_tx;        /* Next TX time. */
196     long long int detect_time;    /* RFC 5880 6.8.4 Detection time. */
197
198     bool last_forwarding;         /* Last calculation of forwarding flag. */
199     int forwarding_override;      /* Manual override of 'forwarding' status. */
200
201     atomic_bool check_tnl_key;    /* Verify tunnel key of inbound packets? */
202     struct ovs_refcount ref_cnt;
203
204     /* When forward_if_rx is true, bfd_forwarding() will return
205      * true as long as there are incoming packets received.
206      * Note, forwarding_override still has higher priority. */
207     bool forwarding_if_rx;
208     long long int forwarding_if_rx_detect_time;
209
210     /* When 'bfd->forwarding_if_rx' is set, at least one bfd control packet
211      * is required to be received every 100 * bfd->cfg_min_rx.  If bfd
212      * control packet is not received within this interval, even if data
213      * packets are received, the bfd->forwarding will still be false. */
214     long long int demand_rx_bfd_time;
215
216     /* BFD decay related variables. */
217     bool in_decay;                /* True when bfd is in decay. */
218     int decay_min_rx;             /* min_rx is set to decay_min_rx when */
219                                   /* in decay. */
220     int decay_rx_ctl;             /* Count bfd packets received within decay */
221                                   /* detect interval. */
222     uint64_t decay_rx_packets;    /* Packets received by 'netdev'. */
223     long long int decay_detect_time; /* Decay detection time. */
224
225     uint64_t flap_count;          /* Counts bfd forwarding flaps. */
226
227     /* True when the variables returned by bfd_get_status() are changed
228      * since last check. */
229     bool status_changed;
230 };
231
232 static struct ovs_mutex mutex = OVS_MUTEX_INITIALIZER;
233 static struct hmap all_bfds__ = HMAP_INITIALIZER(&all_bfds__);
234 static struct hmap *const all_bfds OVS_GUARDED_BY(mutex) = &all_bfds__;
235
236 static bool bfd_lookup_ip(const char *host_name, struct in_addr *)
237     OVS_REQUIRES(mutex);
238 static bool bfd_forwarding__(struct bfd *) OVS_REQUIRES(mutex);
239 static bool bfd_in_poll(const struct bfd *) OVS_REQUIRES(mutex);
240 static void bfd_poll(struct bfd *bfd) OVS_REQUIRES(mutex);
241 static const char *bfd_diag_str(enum diag) OVS_REQUIRES(mutex);
242 static const char *bfd_state_str(enum state) OVS_REQUIRES(mutex);
243 static long long int bfd_min_tx(const struct bfd *) OVS_REQUIRES(mutex);
244 static long long int bfd_tx_interval(const struct bfd *)
245     OVS_REQUIRES(mutex);
246 static long long int bfd_rx_interval(const struct bfd *)
247     OVS_REQUIRES(mutex);
248 static void bfd_set_next_tx(struct bfd *) OVS_REQUIRES(mutex);
249 static void bfd_set_state(struct bfd *, enum state, enum diag)
250     OVS_REQUIRES(mutex);
251 static uint32_t generate_discriminator(void) OVS_REQUIRES(mutex);
252 static void bfd_put_details(struct ds *, const struct bfd *)
253     OVS_REQUIRES(mutex);
254 static uint64_t bfd_rx_packets(const struct bfd *) OVS_REQUIRES(mutex);
255 static void bfd_try_decay(struct bfd *) OVS_REQUIRES(mutex);
256 static void bfd_decay_update(struct bfd *) OVS_REQUIRES(mutex);
257 static void bfd_status_changed(struct bfd *) OVS_REQUIRES(mutex);
258
259 static void bfd_forwarding_if_rx_update(struct bfd *) OVS_REQUIRES(mutex);
260 static void bfd_unixctl_show(struct unixctl_conn *, int argc,
261                              const char *argv[], void *aux OVS_UNUSED);
262 static void bfd_unixctl_set_forwarding_override(struct unixctl_conn *,
263                                                 int argc, const char *argv[],
264                                                 void *aux OVS_UNUSED);
265 static void log_msg(enum vlog_level, const struct msg *, const char *message,
266                     const struct bfd *) OVS_REQUIRES(mutex);
267
268 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(20, 20);
269
270 /* Returns true if the interface on which 'bfd' is running may be used to
271  * forward traffic according to the BFD session state. */
272 bool
273 bfd_forwarding(struct bfd *bfd) OVS_EXCLUDED(mutex)
274 {
275     bool ret;
276
277     ovs_mutex_lock(&mutex);
278     ret = bfd_forwarding__(bfd);
279     ovs_mutex_unlock(&mutex);
280     return ret;
281 }
282
283 /* When forwarding_if_rx is enabled, if there are packets received,
284  * updates forwarding_if_rx_detect_time. */
285 void
286 bfd_account_rx(struct bfd *bfd, const struct dpif_flow_stats *stats)
287 {
288     if (stats->n_packets && bfd->forwarding_if_rx) {
289         ovs_mutex_lock(&mutex);
290         bfd_forwarding__(bfd);
291         bfd_forwarding_if_rx_update(bfd);
292         bfd_forwarding__(bfd);
293         ovs_mutex_unlock(&mutex);
294     }
295 }
296
297 /* Returns and resets the 'bfd->status_changed'. */
298 bool
299 bfd_check_status_change(struct bfd *bfd) OVS_EXCLUDED(mutex)
300 {
301     bool ret;
302
303     ovs_mutex_lock(&mutex);
304     ret = bfd->status_changed;
305     bfd->status_changed = false;
306     ovs_mutex_unlock(&mutex);
307
308     return ret;
309 }
310
311 /* Returns a 'smap' of key value pairs representing the status of 'bfd'
312  * intended for the OVS database. */
313 void
314 bfd_get_status(const struct bfd *bfd, struct smap *smap)
315     OVS_EXCLUDED(mutex)
316 {
317     ovs_mutex_lock(&mutex);
318     smap_add(smap, "forwarding",
319              bfd_forwarding__(CONST_CAST(struct bfd *, bfd))
320              ? "true" : "false");
321     smap_add(smap, "state", bfd_state_str(bfd->state));
322     smap_add(smap, "diagnostic", bfd_diag_str(bfd->diag));
323     smap_add_format(smap, "flap_count", "%"PRIu64, bfd->flap_count);
324
325     if (bfd->state != STATE_DOWN) {
326         smap_add(smap, "remote_state", bfd_state_str(bfd->rmt_state));
327         smap_add(smap, "remote_diagnostic", bfd_diag_str(bfd->rmt_diag));
328     }
329     ovs_mutex_unlock(&mutex);
330 }
331
332 void
333 bfd_init(void)
334 {
335     unixctl_command_register("bfd/show", "[interface]", 0, 1,
336                              bfd_unixctl_show, NULL);
337     unixctl_command_register("bfd/set-forwarding",
338                              "[interface] normal|false|true", 1, 2,
339                              bfd_unixctl_set_forwarding_override, NULL);
340 }
341
342 /* Initializes, destroys, or reconfigures the BFD session 'bfd' (named 'name'),
343  * according to the database configuration contained in 'cfg'.  Takes ownership
344  * of 'bfd', which may be NULL.  Returns a BFD object which may be used as a
345  * handle for the session, or NULL if BFD is not enabled according to 'cfg'.
346  * Also returns NULL if cfg is NULL. */
347 struct bfd *
348 bfd_configure(struct bfd *bfd, const char *name, const struct smap *cfg,
349               struct netdev *netdev) OVS_EXCLUDED(mutex)
350 {
351     static atomic_count udp_src = ATOMIC_COUNT_INIT(0);
352
353     int decay_min_rx;
354     long long int min_tx, min_rx;
355     bool need_poll = false;
356     bool cfg_min_rx_changed = false;
357     bool cpath_down, forwarding_if_rx;
358     const char *hwaddr, *ip_src, *ip_dst;
359     struct in_addr in_addr;
360     struct eth_addr ea;
361
362     if (!cfg || !smap_get_bool(cfg, "enable", false)) {
363         bfd_unref(bfd);
364         return NULL;
365     }
366
367     ovs_mutex_lock(&mutex);
368     if (!bfd) {
369         bfd = xzalloc(sizeof *bfd);
370         bfd->name = xstrdup(name);
371         bfd->forwarding_override = -1;
372         bfd->disc = generate_discriminator();
373         hmap_insert(all_bfds, &bfd->node, bfd->disc);
374
375         bfd->diag = DIAG_NONE;
376         bfd->min_tx = 1000;
377         bfd->mult = 3;
378         ovs_refcount_init(&bfd->ref_cnt);
379         bfd->netdev = netdev_ref(netdev);
380         bfd->rx_packets = bfd_rx_packets(bfd);
381         bfd->in_decay = false;
382         bfd->flap_count = 0;
383
384         /* RFC 5881 section 4
385          * The source port MUST be in the range 49152 through 65535.  The same
386          * UDP source port number MUST be used for all BFD Control packets
387          * associated with a particular session.  The source port number SHOULD
388          * be unique among all BFD sessions on the system. */
389         bfd->udp_src = (atomic_count_inc(&udp_src) % 16384) + 49152;
390
391         bfd_set_state(bfd, STATE_DOWN, DIAG_NONE);
392
393         bfd_status_changed(bfd);
394     }
395
396     atomic_store_relaxed(&bfd->check_tnl_key,
397                          smap_get_bool(cfg, "check_tnl_key", false));
398     min_tx = smap_get_int(cfg, "min_tx", 100);
399     min_tx = MAX(min_tx, 1);
400     if (bfd->cfg_min_tx != min_tx) {
401         bfd->cfg_min_tx = min_tx;
402         if (bfd->state != STATE_UP
403             || (!bfd_in_poll(bfd) && bfd->cfg_min_tx < bfd->min_tx)) {
404             bfd->min_tx = bfd->cfg_min_tx;
405         }
406         need_poll = true;
407     }
408
409     min_rx = smap_get_int(cfg, "min_rx", 1000);
410     min_rx = MAX(min_rx, 1);
411     if (bfd->cfg_min_rx != min_rx) {
412         bfd->cfg_min_rx = min_rx;
413         if (bfd->state != STATE_UP
414             || (!bfd_in_poll(bfd) && bfd->cfg_min_rx > bfd->min_rx)) {
415             bfd->min_rx = bfd->cfg_min_rx;
416         }
417         cfg_min_rx_changed = true;
418         need_poll = true;
419     }
420
421     decay_min_rx = smap_get_int(cfg, "decay_min_rx", 0);
422     if (bfd->decay_min_rx != decay_min_rx || cfg_min_rx_changed) {
423         if (decay_min_rx > 0 && decay_min_rx < bfd->cfg_min_rx) {
424             VLOG_WARN("%s: decay_min_rx cannot be less than %lld ms",
425                       bfd->name, bfd->cfg_min_rx);
426             bfd->decay_min_rx = 0;
427         } else {
428             bfd->decay_min_rx = decay_min_rx;
429         }
430         /* Resets decay. */
431         bfd->in_decay = false;
432         bfd_decay_update(bfd);
433         need_poll = true;
434     }
435
436     cpath_down = smap_get_bool(cfg, "cpath_down", false);
437     if (bfd->cpath_down != cpath_down) {
438         bfd->cpath_down = cpath_down;
439         bfd_set_state(bfd, bfd->state, DIAG_NONE);
440         need_poll = true;
441     }
442
443     hwaddr = smap_get(cfg, "bfd_local_src_mac");
444     if (hwaddr && eth_addr_from_string(hwaddr, &ea)) {
445         bfd->local_eth_src = ea;
446     } else {
447         bfd->local_eth_src = eth_addr_zero;
448     }
449
450     hwaddr = smap_get(cfg, "bfd_local_dst_mac");
451     if (hwaddr && eth_addr_from_string(hwaddr, &ea)) {
452         bfd->local_eth_dst = ea;
453     } else {
454         bfd->local_eth_dst = eth_addr_zero;
455     }
456
457     hwaddr = smap_get(cfg, "bfd_remote_dst_mac");
458     if (hwaddr && eth_addr_from_string(hwaddr, &ea)) {
459         bfd->rmt_eth_dst = ea;
460     } else {
461         bfd->rmt_eth_dst = eth_addr_zero;
462     }
463
464     ip_src = smap_get(cfg, "bfd_src_ip");
465     if (ip_src && bfd_lookup_ip(ip_src, &in_addr)) {
466         memcpy(&bfd->ip_src, &in_addr, sizeof in_addr);
467     } else {
468         bfd->ip_src = htonl(0xA9FE0101); /* 169.254.1.1. */
469     }
470
471     ip_dst = smap_get(cfg, "bfd_dst_ip");
472     if (ip_dst && bfd_lookup_ip(ip_dst, &in_addr)) {
473         memcpy(&bfd->ip_dst, &in_addr, sizeof in_addr);
474     } else {
475         bfd->ip_dst = htonl(0xA9FE0100); /* 169.254.1.0. */
476     }
477
478     forwarding_if_rx = smap_get_bool(cfg, "forwarding_if_rx", false);
479     if (bfd->forwarding_if_rx != forwarding_if_rx) {
480         bfd->forwarding_if_rx = forwarding_if_rx;
481         if (bfd->state == STATE_UP && bfd->forwarding_if_rx) {
482             bfd_forwarding_if_rx_update(bfd);
483         } else {
484             bfd->forwarding_if_rx_detect_time = 0;
485         }
486     }
487
488     if (need_poll) {
489         bfd_poll(bfd);
490     }
491     ovs_mutex_unlock(&mutex);
492     return bfd;
493 }
494
495 struct bfd *
496 bfd_ref(const struct bfd *bfd_)
497 {
498     struct bfd *bfd = CONST_CAST(struct bfd *, bfd_);
499     if (bfd) {
500         ovs_refcount_ref(&bfd->ref_cnt);
501     }
502     return bfd;
503 }
504
505 void
506 bfd_unref(struct bfd *bfd) OVS_EXCLUDED(mutex)
507 {
508     if (bfd && ovs_refcount_unref_relaxed(&bfd->ref_cnt) == 1) {
509         ovs_mutex_lock(&mutex);
510         bfd_status_changed(bfd);
511         hmap_remove(all_bfds, &bfd->node);
512         netdev_close(bfd->netdev);
513         free(bfd->name);
514         free(bfd);
515         ovs_mutex_unlock(&mutex);
516     }
517 }
518
519 long long int
520 bfd_wait(const struct bfd *bfd) OVS_EXCLUDED(mutex)
521 {
522     long long int wake_time = bfd_wake_time(bfd);
523     poll_timer_wait_until(wake_time);
524     return wake_time;
525 }
526
527 /* Returns the next wake up time. */
528 long long int
529 bfd_wake_time(const struct bfd *bfd) OVS_EXCLUDED(mutex)
530 {
531     long long int retval;
532
533     if (!bfd) {
534         return LLONG_MAX;
535     }
536
537     ovs_mutex_lock(&mutex);
538     if (bfd->flags & FLAG_FINAL) {
539         retval = 0;
540     } else {
541         retval = bfd->next_tx;
542         if (bfd->state > STATE_DOWN) {
543             retval = MIN(bfd->detect_time, retval);
544         }
545     }
546     ovs_mutex_unlock(&mutex);
547     return retval;
548 }
549
550 void
551 bfd_run(struct bfd *bfd) OVS_EXCLUDED(mutex)
552 {
553     long long int now;
554     bool old_in_decay;
555
556     ovs_mutex_lock(&mutex);
557     now = time_msec();
558     old_in_decay = bfd->in_decay;
559
560     if (bfd->state > STATE_DOWN && now >= bfd->detect_time) {
561         bfd_set_state(bfd, STATE_DOWN, DIAG_EXPIRED);
562     }
563     bfd_forwarding__(bfd);
564
565     /* Decay may only happen when state is STATE_UP, bfd->decay_min_rx is
566      * configured, and decay_detect_time is reached. */
567     if (bfd->state == STATE_UP && bfd->decay_min_rx > 0
568         && now >= bfd->decay_detect_time) {
569         bfd_try_decay(bfd);
570     }
571
572     if (bfd->min_tx != bfd->cfg_min_tx
573         || (bfd->min_rx != bfd->cfg_min_rx && bfd->min_rx != bfd->decay_min_rx)
574         || bfd->in_decay != old_in_decay) {
575         bfd_poll(bfd);
576     }
577     ovs_mutex_unlock(&mutex);
578 }
579
580 bool
581 bfd_should_send_packet(const struct bfd *bfd) OVS_EXCLUDED(mutex)
582 {
583     bool ret;
584     ovs_mutex_lock(&mutex);
585     ret = bfd->flags & FLAG_FINAL || time_msec() >= bfd->next_tx;
586     ovs_mutex_unlock(&mutex);
587     return ret;
588 }
589
590 void
591 bfd_put_packet(struct bfd *bfd, struct dp_packet *p,
592                const struct eth_addr eth_src) OVS_EXCLUDED(mutex)
593 {
594     long long int min_tx, min_rx;
595     struct udp_header *udp;
596     struct eth_header *eth;
597     struct ip_header *ip;
598     struct msg *msg;
599
600     ovs_mutex_lock(&mutex);
601     if (bfd->next_tx) {
602         long long int delay = time_msec() - bfd->next_tx;
603         long long int interval = bfd_tx_interval(bfd);
604         if (delay > interval * 3 / 2) {
605             VLOG_INFO("%s: long delay of %lldms (expected %lldms) sending BFD"
606                       " control message", bfd->name, delay, interval);
607         }
608     }
609
610     /* RFC 5880 Section 6.5
611      * A BFD Control packet MUST NOT have both the Poll (P) and Final (F) bits
612      * set. */
613     ovs_assert(!(bfd->flags & FLAG_POLL) || !(bfd->flags & FLAG_FINAL));
614
615     dp_packet_reserve(p, 2); /* Properly align after the ethernet header. */
616     eth = dp_packet_put_uninit(p, sizeof *eth);
617     eth->eth_src = eth_addr_is_zero(bfd->local_eth_src)
618         ? eth_src : bfd->local_eth_src;
619     eth->eth_dst = eth_addr_is_zero(bfd->local_eth_dst)
620         ? eth_addr_bfd : bfd->local_eth_dst;
621     eth->eth_type = htons(ETH_TYPE_IP);
622
623     ip = dp_packet_put_zeros(p, sizeof *ip);
624     ip->ip_ihl_ver = IP_IHL_VER(5, 4);
625     ip->ip_tot_len = htons(sizeof *ip + sizeof *udp + sizeof *msg);
626     ip->ip_ttl = MAXTTL;
627     ip->ip_tos = IPTOS_LOWDELAY | IPTOS_THROUGHPUT;
628     ip->ip_proto = IPPROTO_UDP;
629     put_16aligned_be32(&ip->ip_src, bfd->ip_src);
630     put_16aligned_be32(&ip->ip_dst, bfd->ip_dst);
631     ip->ip_csum = csum(ip, sizeof *ip);
632
633     udp = dp_packet_put_zeros(p, sizeof *udp);
634     udp->udp_src = htons(bfd->udp_src);
635     udp->udp_dst = htons(BFD_DEST_PORT);
636     udp->udp_len = htons(sizeof *udp + sizeof *msg);
637
638     msg = dp_packet_put_uninit(p, sizeof *msg);
639     msg->vers_diag = (BFD_VERSION << 5) | bfd->diag;
640     msg->flags = (bfd->state & STATE_MASK) | bfd->flags;
641
642     msg->mult = bfd->mult;
643     msg->length = BFD_PACKET_LEN;
644     msg->my_disc = htonl(bfd->disc);
645     msg->your_disc = htonl(bfd->rmt_disc);
646     msg->min_rx_echo = htonl(0);
647
648     if (bfd_in_poll(bfd)) {
649         min_tx = bfd->poll_min_tx;
650         min_rx = bfd->poll_min_rx;
651     } else {
652         min_tx = bfd_min_tx(bfd);
653         min_rx = bfd->min_rx;
654     }
655
656     msg->min_tx = htonl(min_tx * 1000);
657     msg->min_rx = htonl(min_rx * 1000);
658
659     bfd->flags &= ~FLAG_FINAL;
660
661     log_msg(VLL_DBG, msg, "Sending BFD Message", bfd);
662
663     bfd->last_tx = time_msec();
664     bfd_set_next_tx(bfd);
665     ovs_mutex_unlock(&mutex);
666 }
667
668 bool
669 bfd_should_process_flow(const struct bfd *bfd_, const struct flow *flow,
670                         struct flow_wildcards *wc)
671 {
672     struct bfd *bfd = CONST_CAST(struct bfd *, bfd_);
673
674     if (!eth_addr_is_zero(bfd->rmt_eth_dst)) {
675         memset(&wc->masks.dl_dst, 0xff, sizeof wc->masks.dl_dst);
676
677         if (!eth_addr_equals(bfd->rmt_eth_dst, flow->dl_dst)) {
678             return false;
679         }
680     }
681
682     if (flow->dl_type == htons(ETH_TYPE_IP)) {
683         memset(&wc->masks.nw_proto, 0xff, sizeof wc->masks.nw_proto);
684         if (flow->nw_proto == IPPROTO_UDP) {
685             memset(&wc->masks.tp_dst, 0xff, sizeof wc->masks.tp_dst);
686             if (flow->tp_dst == htons(BFD_DEST_PORT)) {
687                 bool check_tnl_key;
688
689                 atomic_read_relaxed(&bfd->check_tnl_key, &check_tnl_key);
690                 if (check_tnl_key) {
691                     memset(&wc->masks.tunnel.tun_id, 0xff,
692                            sizeof wc->masks.tunnel.tun_id);
693                     return flow->tunnel.tun_id == htonll(0);
694                 }
695                 return true;
696             }
697         }
698     }
699     return false;
700 }
701
702 void
703 bfd_process_packet(struct bfd *bfd, const struct flow *flow,
704                    const struct dp_packet *p) OVS_EXCLUDED(mutex)
705 {
706     uint32_t rmt_min_rx, pkt_your_disc;
707     enum state rmt_state;
708     enum flags flags;
709     uint8_t version;
710     struct msg *msg;
711     const uint8_t *l7 = dp_packet_get_udp_payload(p);
712
713     if (!l7) {
714         return; /* No UDP payload. */
715     }
716
717     /* This function is designed to follow section RFC 5880 6.8.6 closely. */
718
719     ovs_mutex_lock(&mutex);
720     /* Increments the decay rx counter. */
721     bfd->decay_rx_ctl++;
722
723     bfd_forwarding__(bfd);
724
725     if (flow->nw_ttl != 255) {
726         /* XXX Should drop in the kernel to prevent DOS. */
727         goto out;
728     }
729
730     msg = dp_packet_at(p, l7 - (uint8_t *)dp_packet_data(p), BFD_PACKET_LEN);
731     if (!msg) {
732         VLOG_INFO_RL(&rl, "%s: Received too-short BFD control message (only "
733                      "%"PRIdPTR" bytes long, at least %d required).",
734                      bfd->name, (uint8_t *) dp_packet_tail(p) - l7,
735                      BFD_PACKET_LEN);
736         goto out;
737     }
738
739     /* RFC 5880 Section 6.8.6
740      * If the Length field is greater than the payload of the encapsulating
741      * protocol, the packet MUST be discarded.
742      *
743      * Note that we make this check implicitly.  Above we use dp_packet_at() to
744      * ensure that there are at least BFD_PACKET_LEN bytes in the payload of
745      * the encapsulating protocol.  Below we require msg->length to be exactly
746      * BFD_PACKET_LEN bytes. */
747
748     flags = msg->flags & FLAGS_MASK;
749     rmt_state = msg->flags & STATE_MASK;
750     version = msg->vers_diag >> VERS_SHIFT;
751
752     log_msg(VLL_DBG, msg, "Received BFD control message", bfd);
753
754     if (version != BFD_VERSION) {
755         log_msg(VLL_WARN, msg, "Incorrect version", bfd);
756         goto out;
757     }
758
759     /* Technically this should happen after the length check. We don't support
760      * authentication however, so it's simpler to do the check first. */
761     if (flags & FLAG_AUTH) {
762         log_msg(VLL_WARN, msg, "Authenticated control message with"
763                    " authentication disabled", bfd);
764         goto out;
765     }
766
767     if (msg->length != BFD_PACKET_LEN) {
768         log_msg(VLL_WARN, msg, "Unexpected length", bfd);
769         if (msg->length < BFD_PACKET_LEN) {
770             goto out;
771         }
772     }
773
774     if (!msg->mult) {
775         log_msg(VLL_WARN, msg, "Zero multiplier", bfd);
776         goto out;
777     }
778
779     if (flags & FLAG_MULTIPOINT) {
780         log_msg(VLL_WARN, msg, "Unsupported multipoint flag", bfd);
781         goto out;
782     }
783
784     if (!msg->my_disc) {
785         log_msg(VLL_WARN, msg, "NULL my_disc", bfd);
786         goto out;
787     }
788
789     pkt_your_disc = ntohl(msg->your_disc);
790     if (pkt_your_disc) {
791         /* Technically, we should use the your discriminator field to figure
792          * out which 'struct bfd' this packet is destined towards.  That way a
793          * bfd session could migrate from one interface to another
794          * transparently.  This doesn't fit in with the OVS structure very
795          * well, so in this respect, we are not compliant. */
796        if (pkt_your_disc != bfd->disc) {
797            log_msg(VLL_WARN, msg, "Incorrect your_disc", bfd);
798            goto out;
799        }
800     } else if (rmt_state > STATE_DOWN) {
801         log_msg(VLL_WARN, msg, "Null your_disc", bfd);
802         goto out;
803     }
804
805     if (bfd->rmt_state != rmt_state) {
806         bfd_status_changed(bfd);
807     }
808
809     bfd->rmt_disc = ntohl(msg->my_disc);
810     bfd->rmt_state = rmt_state;
811     bfd->rmt_flags = flags;
812     bfd->rmt_diag = msg->vers_diag & DIAG_MASK;
813
814     if (flags & FLAG_FINAL && bfd_in_poll(bfd)) {
815         bfd->min_tx = bfd->poll_min_tx;
816         bfd->min_rx = bfd->poll_min_rx;
817         bfd->flags &= ~FLAG_POLL;
818         log_msg(VLL_INFO, msg, "Poll sequence terminated", bfd);
819     }
820
821     if (flags & FLAG_POLL) {
822         /* RFC 5880 Section 6.5
823          * When the other system receives a Poll, it immediately transmits a
824          * BFD Control packet with the Final (F) bit set, independent of any
825          * periodic BFD Control packets it may be sending
826          * (see section 6.8.7). */
827         bfd->flags &= ~FLAG_POLL;
828         bfd->flags |= FLAG_FINAL;
829     }
830
831     rmt_min_rx = MAX(ntohl(msg->min_rx) / 1000, 1);
832     if (bfd->rmt_min_rx != rmt_min_rx) {
833         bfd->rmt_min_rx = rmt_min_rx;
834         if (bfd->next_tx) {
835             bfd_set_next_tx(bfd);
836         }
837         log_msg(VLL_INFO, msg, "New remote min_rx", bfd);
838     }
839
840     bfd->rmt_min_tx = MAX(ntohl(msg->min_tx) / 1000, 1);
841     bfd->detect_time = bfd_rx_interval(bfd) * bfd->mult + time_msec();
842
843     if (bfd->state == STATE_ADMIN_DOWN) {
844         VLOG_DBG_RL(&rl, "Administratively down, dropping control message.");
845         goto out;
846     }
847
848     if (rmt_state == STATE_ADMIN_DOWN) {
849         if (bfd->state != STATE_DOWN) {
850             bfd_set_state(bfd, STATE_DOWN, DIAG_RMT_DOWN);
851         }
852     } else {
853         switch (bfd->state) {
854         case STATE_DOWN:
855             if (rmt_state == STATE_DOWN) {
856                 bfd_set_state(bfd, STATE_INIT, bfd->diag);
857             } else if (rmt_state == STATE_INIT) {
858                 bfd_set_state(bfd, STATE_UP, bfd->diag);
859             }
860             break;
861         case STATE_INIT:
862             if (rmt_state > STATE_DOWN) {
863                 bfd_set_state(bfd, STATE_UP, bfd->diag);
864             }
865             break;
866         case STATE_UP:
867             if (rmt_state <= STATE_DOWN) {
868                 bfd_set_state(bfd, STATE_DOWN, DIAG_RMT_DOWN);
869                 log_msg(VLL_INFO, msg, "Remote signaled STATE_DOWN", bfd);
870             }
871             break;
872         case STATE_ADMIN_DOWN:
873         default:
874             OVS_NOT_REACHED();
875         }
876     }
877     /* XXX: RFC 5880 Section 6.8.6 Demand mode related calculations here. */
878
879     if (bfd->forwarding_if_rx) {
880         bfd->demand_rx_bfd_time = time_msec() + 100 * bfd->cfg_min_rx;
881     }
882
883 out:
884     bfd_forwarding__(bfd);
885     ovs_mutex_unlock(&mutex);
886 }
887
888 /* Must be called when the netdev owned by 'bfd' should change. */
889 void
890 bfd_set_netdev(struct bfd *bfd, const struct netdev *netdev)
891     OVS_EXCLUDED(mutex)
892 {
893     ovs_mutex_lock(&mutex);
894     if (bfd->netdev != netdev) {
895         netdev_close(bfd->netdev);
896         bfd->netdev = netdev_ref(netdev);
897         if (bfd->decay_min_rx && bfd->state == STATE_UP) {
898             bfd_decay_update(bfd);
899         }
900         if (bfd->forwarding_if_rx && bfd->state == STATE_UP) {
901             bfd_forwarding_if_rx_update(bfd);
902         }
903         bfd->rx_packets = bfd_rx_packets(bfd);
904     }
905     ovs_mutex_unlock(&mutex);
906 }
907
908 \f
909 /* Updates the forwarding flag.  If override is not configured and
910  * the forwarding flag value changes, increments the flap count.
911  *
912  * Note this function may be called multiple times in a function
913  * (e.g. bfd_account_rx) before and after the bfd state or status
914  * change.  This is to capture any forwarding flag flap. */
915 static bool
916 bfd_forwarding__(struct bfd *bfd) OVS_REQUIRES(mutex)
917 {
918     long long int now = time_msec();
919     bool forwarding_if_rx;
920     bool last_forwarding = bfd->last_forwarding;
921
922     if (bfd->forwarding_override != -1) {
923         return bfd->forwarding_override == 1;
924     }
925
926     forwarding_if_rx = bfd->forwarding_if_rx
927                        && bfd->forwarding_if_rx_detect_time > now
928                        && bfd->demand_rx_bfd_time > now;
929
930     bfd->last_forwarding = (bfd->state == STATE_UP || forwarding_if_rx)
931                            && bfd->rmt_diag != DIAG_PATH_DOWN
932                            && bfd->rmt_diag != DIAG_CPATH_DOWN
933                            && bfd->rmt_diag != DIAG_RCPATH_DOWN;
934     if (bfd->last_forwarding != last_forwarding) {
935         bfd->flap_count++;
936         bfd_status_changed(bfd);
937     }
938     return bfd->last_forwarding;
939 }
940
941 /* Helpers. */
942 static bool
943 bfd_lookup_ip(const char *host_name, struct in_addr *addr)
944 {
945     if (!inet_pton(AF_INET, host_name, addr)) {
946         VLOG_ERR_RL(&rl, "\"%s\" is not a valid IP address", host_name);
947         return false;
948     }
949     return true;
950 }
951
952 static bool
953 bfd_in_poll(const struct bfd *bfd) OVS_REQUIRES(mutex)
954 {
955     return (bfd->flags & FLAG_POLL) != 0;
956 }
957
958 static void
959 bfd_poll(struct bfd *bfd) OVS_REQUIRES(mutex)
960 {
961     if (bfd->state > STATE_DOWN && !bfd_in_poll(bfd)
962         && !(bfd->flags & FLAG_FINAL)) {
963         bfd->poll_min_tx = bfd->cfg_min_tx;
964         bfd->poll_min_rx = bfd->in_decay ? bfd->decay_min_rx : bfd->cfg_min_rx;
965         bfd->flags |= FLAG_POLL;
966         bfd->next_tx = 0;
967         VLOG_INFO_RL(&rl, "%s: Initiating poll sequence", bfd->name);
968     }
969 }
970
971 static long long int
972 bfd_min_tx(const struct bfd *bfd) OVS_REQUIRES(mutex)
973 {
974     /* RFC 5880 Section 6.8.3
975      * When bfd.SessionState is not Up, the system MUST set
976      * bfd.DesiredMinTxInterval to a value of not less than one second
977      * (1,000,000 microseconds).  This is intended to ensure that the
978      * bandwidth consumed by BFD sessions that are not Up is negligible,
979      * particularly in the case where a neighbor may not be running BFD. */
980     return (bfd->state == STATE_UP ? bfd->min_tx : MAX(bfd->min_tx, 1000));
981 }
982
983 static long long int
984 bfd_tx_interval(const struct bfd *bfd) OVS_REQUIRES(mutex)
985 {
986     long long int interval = bfd_min_tx(bfd);
987     return MAX(interval, bfd->rmt_min_rx);
988 }
989
990 static long long int
991 bfd_rx_interval(const struct bfd *bfd) OVS_REQUIRES(mutex)
992 {
993     return MAX(bfd->min_rx, bfd->rmt_min_tx);
994 }
995
996 static void
997 bfd_set_next_tx(struct bfd *bfd) OVS_REQUIRES(mutex)
998 {
999     long long int interval = bfd_tx_interval(bfd);
1000     interval -= interval * random_range(26) / 100;
1001     bfd->next_tx = bfd->last_tx + interval;
1002 }
1003
1004 static const char *
1005 bfd_flag_str(enum flags flags)
1006 {
1007     struct ds ds = DS_EMPTY_INITIALIZER;
1008     static char flag_str[128];
1009
1010     if (!flags) {
1011         return "none";
1012     }
1013
1014     if (flags & FLAG_MULTIPOINT) {
1015         ds_put_cstr(&ds, "multipoint ");
1016     }
1017
1018     if (flags & FLAG_DEMAND) {
1019         ds_put_cstr(&ds, "demand ");
1020     }
1021
1022     if (flags & FLAG_AUTH) {
1023         ds_put_cstr(&ds, "auth ");
1024     }
1025
1026     if (flags & FLAG_CTL) {
1027         ds_put_cstr(&ds, "ctl ");
1028     }
1029
1030     if (flags & FLAG_FINAL) {
1031         ds_put_cstr(&ds, "final ");
1032     }
1033
1034     if (flags & FLAG_POLL) {
1035         ds_put_cstr(&ds, "poll ");
1036     }
1037
1038     /* Do not copy the trailing whitespace. */
1039     ds_chomp(&ds, ' ');
1040     ovs_strlcpy(flag_str, ds_cstr(&ds), sizeof flag_str);
1041     ds_destroy(&ds);
1042     return flag_str;
1043 }
1044
1045 static const char *
1046 bfd_state_str(enum state state)
1047 {
1048     switch (state) {
1049     case STATE_ADMIN_DOWN: return "admin_down";
1050     case STATE_DOWN: return "down";
1051     case STATE_INIT: return "init";
1052     case STATE_UP: return "up";
1053     default: return "invalid";
1054     }
1055 }
1056
1057 static const char *
1058 bfd_diag_str(enum diag diag) {
1059     switch (diag) {
1060     case DIAG_NONE: return "No Diagnostic";
1061     case DIAG_EXPIRED: return "Control Detection Time Expired";
1062     case DIAG_ECHO_FAILED: return "Echo Function Failed";
1063     case DIAG_RMT_DOWN: return "Neighbor Signaled Session Down";
1064     case DIAG_FWD_RESET: return "Forwarding Plane Reset";
1065     case DIAG_PATH_DOWN: return "Path Down";
1066     case DIAG_CPATH_DOWN: return "Concatenated Path Down";
1067     case DIAG_ADMIN_DOWN: return "Administratively Down";
1068     case DIAG_RCPATH_DOWN: return "Reverse Concatenated Path Down";
1069     default: return "Invalid Diagnostic";
1070     }
1071 };
1072
1073 static void
1074 log_msg(enum vlog_level level, const struct msg *p, const char *message,
1075         const struct bfd *bfd) OVS_REQUIRES(mutex)
1076 {
1077     struct ds ds = DS_EMPTY_INITIALIZER;
1078
1079     if (vlog_should_drop(THIS_MODULE, level, &rl)) {
1080         return;
1081     }
1082
1083     ds_put_format(&ds,
1084                   "%s: %s."
1085                   "\n\tvers:%"PRIu8" diag:\"%s\" state:%s mult:%"PRIu8
1086                   " length:%"PRIu8
1087                   "\n\tflags: %s"
1088                   "\n\tmy_disc:0x%"PRIx32" your_disc:0x%"PRIx32
1089                   "\n\tmin_tx:%"PRIu32"us (%"PRIu32"ms)"
1090                   "\n\tmin_rx:%"PRIu32"us (%"PRIu32"ms)"
1091                   "\n\tmin_rx_echo:%"PRIu32"us (%"PRIu32"ms)",
1092                   bfd->name, message, p->vers_diag >> VERS_SHIFT,
1093                   bfd_diag_str(p->vers_diag & DIAG_MASK),
1094                   bfd_state_str(p->flags & STATE_MASK),
1095                   p->mult, p->length, bfd_flag_str(p->flags & FLAGS_MASK),
1096                   ntohl(p->my_disc), ntohl(p->your_disc),
1097                   ntohl(p->min_tx), ntohl(p->min_tx) / 1000,
1098                   ntohl(p->min_rx), ntohl(p->min_rx) / 1000,
1099                   ntohl(p->min_rx_echo), ntohl(p->min_rx_echo) / 1000);
1100     bfd_put_details(&ds, bfd);
1101     VLOG(level, "%s", ds_cstr(&ds));
1102     ds_destroy(&ds);
1103 }
1104
1105 static void
1106 bfd_set_state(struct bfd *bfd, enum state state, enum diag diag)
1107     OVS_REQUIRES(mutex)
1108 {
1109     if (bfd->cpath_down) {
1110         diag = DIAG_CPATH_DOWN;
1111     }
1112
1113     if (bfd->state != state || bfd->diag != diag) {
1114         if (!VLOG_DROP_INFO(&rl)) {
1115             struct ds ds = DS_EMPTY_INITIALIZER;
1116
1117             ds_put_format(&ds, "%s: BFD state change: %s->%s"
1118                           " \"%s\"->\"%s\".\n",
1119                           bfd->name, bfd_state_str(bfd->state),
1120                           bfd_state_str(state), bfd_diag_str(bfd->diag),
1121                           bfd_diag_str(diag));
1122             bfd_put_details(&ds, bfd);
1123             VLOG_INFO("%s", ds_cstr(&ds));
1124             ds_destroy(&ds);
1125         }
1126
1127         bfd->state = state;
1128         bfd->diag = diag;
1129
1130         if (bfd->state <= STATE_DOWN) {
1131             bfd->rmt_state = STATE_DOWN;
1132             bfd->rmt_diag = DIAG_NONE;
1133             bfd->rmt_min_rx = 1;
1134             bfd->rmt_flags = 0;
1135             bfd->rmt_disc = 0;
1136             bfd->rmt_min_tx = 0;
1137             /* Resets the min_rx if in_decay. */
1138             if (bfd->in_decay) {
1139                 bfd->min_rx = bfd->cfg_min_rx;
1140                 bfd->in_decay = false;
1141             }
1142         }
1143         /* Resets the decay when state changes to STATE_UP
1144          * and decay_min_rx is configured. */
1145         if (bfd->state == STATE_UP && bfd->decay_min_rx) {
1146             bfd_decay_update(bfd);
1147         }
1148
1149         bfd_status_changed(bfd);
1150     }
1151 }
1152
1153 static uint64_t
1154 bfd_rx_packets(const struct bfd *bfd) OVS_REQUIRES(mutex)
1155 {
1156     struct netdev_stats stats;
1157
1158     if (!netdev_get_stats(bfd->netdev, &stats)) {
1159         return stats.rx_packets;
1160     } else {
1161         return 0;
1162     }
1163 }
1164
1165 /* Decays the bfd->min_rx to bfd->decay_min_rx when 'diff' is less than
1166  * the 'expect' value. */
1167 static void
1168 bfd_try_decay(struct bfd *bfd) OVS_REQUIRES(mutex)
1169 {
1170     int64_t diff, expect;
1171
1172     /* The 'diff' is the difference between current interface rx_packets
1173      * stats and last-time check.  The 'expect' is the recorded number of
1174      * bfd control packets received within an approximately decay_min_rx
1175      * (2000 ms if decay_min_rx is less than 2000 ms) interval.
1176      *
1177      * Since the update of rx_packets stats at interface happens
1178      * asynchronously to the bfd_rx_packets() function, the 'diff' value
1179      * can be jittered.  Thusly, we double the decay_rx_ctl to provide
1180      * more wiggle room. */
1181     diff = bfd_rx_packets(bfd) - bfd->decay_rx_packets;
1182     expect = 2 * MAX(bfd->decay_rx_ctl, 1);
1183     bfd->in_decay = diff <= expect ? true : false;
1184     bfd_decay_update(bfd);
1185 }
1186
1187 /* Updates the rx_packets, decay_rx_ctl and decay_detect_time. */
1188 static void
1189 bfd_decay_update(struct bfd * bfd) OVS_REQUIRES(mutex)
1190 {
1191     bfd->decay_rx_packets = bfd_rx_packets(bfd);
1192     bfd->decay_rx_ctl = 0;
1193     bfd->decay_detect_time = MAX(bfd->decay_min_rx, 2000) + time_msec();
1194 }
1195
1196 /* Records the status change and changes the global connectivity seq. */
1197 static void
1198 bfd_status_changed(struct bfd *bfd) OVS_REQUIRES(mutex)
1199 {
1200     seq_change(connectivity_seq_get());
1201     bfd->status_changed = true;
1202 }
1203
1204 static void
1205 bfd_forwarding_if_rx_update(struct bfd *bfd) OVS_REQUIRES(mutex)
1206 {
1207     int64_t incr = bfd_rx_interval(bfd) * bfd->mult;
1208     bfd->forwarding_if_rx_detect_time = MAX(incr, 2000) + time_msec();
1209 }
1210
1211 static uint32_t
1212 generate_discriminator(void)
1213 {
1214     uint32_t disc = 0;
1215
1216     /* RFC 5880 Section 6.8.1
1217      * It SHOULD be set to a random (but still unique) value to improve
1218      * security.  The value is otherwise outside the scope of this
1219      * specification. */
1220
1221     while (!disc) {
1222         struct bfd *bfd;
1223
1224         /* 'disc' is by definition random, so there's no reason to waste time
1225          * hashing it. */
1226         disc = random_uint32();
1227         HMAP_FOR_EACH_IN_BUCKET (bfd, node, disc, all_bfds) {
1228             if (bfd->disc == disc) {
1229                 disc = 0;
1230                 break;
1231             }
1232         }
1233     }
1234
1235     return disc;
1236 }
1237
1238 static struct bfd *
1239 bfd_find_by_name(const char *name) OVS_REQUIRES(mutex)
1240 {
1241     struct bfd *bfd;
1242
1243     HMAP_FOR_EACH (bfd, node, all_bfds) {
1244         if (!strcmp(bfd->name, name)) {
1245             return bfd;
1246         }
1247     }
1248     return NULL;
1249 }
1250
1251 static void
1252 bfd_put_details(struct ds *ds, const struct bfd *bfd) OVS_REQUIRES(mutex)
1253 {
1254     ds_put_format(ds, "\tForwarding: %s\n",
1255                   bfd_forwarding__(CONST_CAST(struct bfd *, bfd))
1256                   ? "true" : "false");
1257     ds_put_format(ds, "\tDetect Multiplier: %d\n", bfd->mult);
1258     ds_put_format(ds, "\tConcatenated Path Down: %s\n",
1259                   bfd->cpath_down ? "true" : "false");
1260     ds_put_format(ds, "\tTX Interval: Approx %lldms\n", bfd_tx_interval(bfd));
1261     ds_put_format(ds, "\tRX Interval: Approx %lldms\n", bfd_rx_interval(bfd));
1262     ds_put_format(ds, "\tDetect Time: now %+lldms\n",
1263                   time_msec() - bfd->detect_time);
1264     ds_put_format(ds, "\tNext TX Time: now %+lldms\n",
1265                   time_msec() - bfd->next_tx);
1266     ds_put_format(ds, "\tLast TX Time: now %+lldms\n",
1267                   time_msec() - bfd->last_tx);
1268
1269     ds_put_cstr(ds, "\n");
1270
1271     ds_put_format(ds, "\tLocal Flags: %s\n", bfd_flag_str(bfd->flags));
1272     ds_put_format(ds, "\tLocal Session State: %s\n",
1273                   bfd_state_str(bfd->state));
1274     ds_put_format(ds, "\tLocal Diagnostic: %s\n", bfd_diag_str(bfd->diag));
1275     ds_put_format(ds, "\tLocal Discriminator: 0x%"PRIx32"\n", bfd->disc);
1276     ds_put_format(ds, "\tLocal Minimum TX Interval: %lldms\n",
1277                   bfd_min_tx(bfd));
1278     ds_put_format(ds, "\tLocal Minimum RX Interval: %lldms\n", bfd->min_rx);
1279
1280     ds_put_cstr(ds, "\n");
1281
1282     ds_put_format(ds, "\tRemote Flags: %s\n", bfd_flag_str(bfd->rmt_flags));
1283     ds_put_format(ds, "\tRemote Session State: %s\n",
1284                   bfd_state_str(bfd->rmt_state));
1285     ds_put_format(ds, "\tRemote Diagnostic: %s\n",
1286                   bfd_diag_str(bfd->rmt_diag));
1287     ds_put_format(ds, "\tRemote Discriminator: 0x%"PRIx32"\n", bfd->rmt_disc);
1288     ds_put_format(ds, "\tRemote Minimum TX Interval: %lldms\n",
1289                   bfd->rmt_min_tx);
1290     ds_put_format(ds, "\tRemote Minimum RX Interval: %lldms\n",
1291                   bfd->rmt_min_rx);
1292 }
1293
1294 static void
1295 bfd_unixctl_show(struct unixctl_conn *conn, int argc, const char *argv[],
1296                  void *aux OVS_UNUSED) OVS_EXCLUDED(mutex)
1297 {
1298     struct ds ds = DS_EMPTY_INITIALIZER;
1299     struct bfd *bfd;
1300
1301     ovs_mutex_lock(&mutex);
1302     if (argc > 1) {
1303         bfd = bfd_find_by_name(argv[1]);
1304         if (!bfd) {
1305             unixctl_command_reply_error(conn, "no such bfd object");
1306             goto out;
1307         }
1308         bfd_put_details(&ds, bfd);
1309     } else {
1310         HMAP_FOR_EACH (bfd, node, all_bfds) {
1311             ds_put_format(&ds, "---- %s ----\n", bfd->name);
1312             bfd_put_details(&ds, bfd);
1313         }
1314     }
1315     unixctl_command_reply(conn, ds_cstr(&ds));
1316     ds_destroy(&ds);
1317
1318 out:
1319     ovs_mutex_unlock(&mutex);
1320 }
1321
1322
1323 static void
1324 bfd_unixctl_set_forwarding_override(struct unixctl_conn *conn, int argc,
1325                                     const char *argv[], void *aux OVS_UNUSED)
1326     OVS_EXCLUDED(mutex)
1327 {
1328     const char *forward_str = argv[argc - 1];
1329     int forwarding_override;
1330     struct bfd *bfd;
1331
1332     ovs_mutex_lock(&mutex);
1333     if (!strcasecmp("true", forward_str)) {
1334         forwarding_override = 1;
1335     } else if (!strcasecmp("false", forward_str)) {
1336         forwarding_override = 0;
1337     } else if (!strcasecmp("normal", forward_str)) {
1338         forwarding_override = -1;
1339     } else {
1340         unixctl_command_reply_error(conn, "unknown fault string");
1341         goto out;
1342     }
1343
1344     if (argc > 2) {
1345         bfd = bfd_find_by_name(argv[1]);
1346         if (!bfd) {
1347             unixctl_command_reply_error(conn, "no such BFD object");
1348             goto out;
1349         }
1350         bfd->forwarding_override = forwarding_override;
1351         bfd_status_changed(bfd);
1352     } else {
1353         HMAP_FOR_EACH (bfd, node, all_bfds) {
1354             bfd->forwarding_override = forwarding_override;
1355             bfd_status_changed(bfd);
1356         }
1357     }
1358
1359     unixctl_command_reply(conn, "OK");
1360
1361 out:
1362     ovs_mutex_unlock(&mutex);
1363 }