meta-flow: Fix mf_get_mask() bug for IPv6 flow label.
[openvswitch] / lib / cfm.c
1 /*
2  * Copyright (c) 2010, 2011, 2012 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 #include "cfm.h"
19
20 #include <assert.h>
21 #include <stdint.h>
22 #include <stdlib.h>
23 #include <string.h>
24
25 #include "byte-order.h"
26 #include "dynamic-string.h"
27 #include "flow.h"
28 #include "hash.h"
29 #include "hmap.h"
30 #include "ofpbuf.h"
31 #include "packets.h"
32 #include "poll-loop.h"
33 #include "random.h"
34 #include "timer.h"
35 #include "timeval.h"
36 #include "unixctl.h"
37 #include "vlog.h"
38
39 VLOG_DEFINE_THIS_MODULE(cfm);
40
41 #define CFM_MAX_RMPS 256
42
43 /* Ethernet destination address of CCM packets. */
44 static const uint8_t eth_addr_ccm[6] = { 0x01, 0x80, 0xC2, 0x00, 0x00, 0x30 };
45 static const uint8_t eth_addr_ccm_x[6] = {
46     0x01, 0x23, 0x20, 0x00, 0x00, 0x30
47 };
48
49 #define ETH_TYPE_CFM 0x8902
50
51 /* A 'ccm' represents a Continuity Check Message from the 802.1ag
52  * specification.  Continuity Check Messages are broadcast periodically so that
53  * hosts can determine whom they have connectivity to.
54  *
55  * The minimum length of a CCM as specified by IEEE 802.1ag is 75 bytes.
56  * Previous versions of Open vSwitch generated 74-byte CCM messages, so we
57  * accept such messages too. */
58 #define CCM_LEN 75
59 #define CCM_ACCEPT_LEN 74
60 #define CCM_MAID_LEN 48
61 #define CCM_OPCODE 1 /* CFM message opcode meaning CCM. */
62 #define CCM_RDI_MASK 0x80
63 #define CFM_HEALTH_INTERVAL 6
64 struct ccm {
65     uint8_t mdlevel_version; /* MD Level and Version */
66     uint8_t opcode;
67     uint8_t flags;
68     uint8_t tlv_offset;
69     ovs_be32 seq;
70     ovs_be16 mpid;
71     uint8_t maid[CCM_MAID_LEN];
72
73     /* Defined by ITU-T Y.1731 should be zero */
74     ovs_be16 interval_ms_x;      /* Transmission interval in ms. */
75     ovs_be64 mpid64;             /* MPID in extended mode. */
76     uint8_t opdown;              /* Operationally down. */
77     uint8_t zero[5];
78
79     /* TLV space. */
80     uint8_t end_tlv;
81 } __attribute__((packed));
82 BUILD_ASSERT_DECL(CCM_LEN == sizeof(struct ccm));
83
84 struct cfm {
85     char *name;                 /* Name of this CFM object. */
86     struct hmap_node hmap_node; /* Node in all_cfms list. */
87
88     uint64_t mpid;
89     bool extended;         /* Extended mode. */
90     enum cfm_fault_reason fault;  /* Connectivity fault status. */
91     enum cfm_fault_reason recv_fault;  /* Bit mask of faults occuring on
92                                           receive. */
93     bool opup;             /* Operational State. */
94     bool remote_opup;      /* Remote Operational State. */
95
96     int fault_override;    /* Manual override of 'fault' status.
97                               Ignored if negative. */
98
99     uint32_t seq;          /* The sequence number of our last CCM. */
100     uint8_t ccm_interval;  /* The CCM transmission interval. */
101     int ccm_interval_ms;   /* 'ccm_interval' in milliseconds. */
102     uint16_t ccm_vlan;     /* Vlan tag of CCM PDUs.  CFM_RANDOM_VLAN if
103                               random. */
104     uint8_t ccm_pcp;       /* Priority of CCM PDUs. */
105     uint8_t maid[CCM_MAID_LEN]; /* The MAID of this CFM. */
106
107     struct timer tx_timer;    /* Send CCM when expired. */
108     struct timer fault_timer; /* Check for faults when expired. */
109
110     struct hmap remote_mps;   /* Remote MPs. */
111
112     /* Result of cfm_get_remote_mpids(). Updated only during fault check to
113      * avoid flapping. */
114     uint64_t *rmps_array;     /* Cache of remote_mps. */
115     size_t rmps_array_len;    /* Number of rmps in 'rmps_array'. */
116
117     int health;               /* Percentage of the number of CCM frames
118                                  received. */
119     int health_interval;      /* Number of fault_intervals since health was
120                                  recomputed. */
121     long long int last_tx;    /* Last CCM transmission time. */
122 };
123
124 /* Remote MPs represent foreign network entities that are configured to have
125  * the same MAID as this CFM instance. */
126 struct remote_mp {
127     uint64_t mpid;         /* The Maintenance Point ID of this 'remote_mp'. */
128     struct hmap_node node; /* Node in 'remote_mps' map. */
129
130     bool recv;           /* CCM was received since last fault check. */
131     bool opup;           /* Operational State. */
132     uint32_t seq;        /* Most recently received sequence number. */
133     uint8_t num_health_ccm; /* Number of received ccm frames every
134                                CFM_HEALTH_INTERVAL * 'fault_interval'. */
135
136 };
137
138 static struct vlog_rate_limit rl = VLOG_RATE_LIMIT_INIT(20, 30);
139 static struct hmap all_cfms = HMAP_INITIALIZER(&all_cfms);
140
141 static unixctl_cb_func cfm_unixctl_show;
142 static unixctl_cb_func cfm_unixctl_set_fault;
143
144 static const uint8_t *
145 cfm_ccm_addr(const struct cfm *cfm)
146 {
147     return cfm->extended ? eth_addr_ccm_x : eth_addr_ccm;
148 }
149
150 /* Returns the string representation of the given cfm_fault_reason 'reason'. */
151 const char *
152 cfm_fault_reason_to_str(int reason) {
153     switch (reason) {
154 #define CFM_FAULT_REASON(NAME, STR) case CFM_FAULT_##NAME: return #STR;
155         CFM_FAULT_REASONS
156 #undef CFM_FAULT_REASON
157     default: return "<unknown>";
158     }
159 }
160
161 static void
162 ds_put_cfm_fault(struct ds *ds, int old_fault, int new_fault)
163 {
164     int i;
165
166     for (i = 0; i < CFM_FAULT_N_REASONS; i++) {
167         int reason = 1 << i;
168
169         if ((old_fault | new_fault) & reason) {
170             ds_put_format(ds, " %s%s",
171                           (!(old_fault & reason) ? "+"
172                            : !(new_fault & reason) ? "-"
173                            : ""),
174                           cfm_fault_reason_to_str(reason));
175         }
176     }
177 }
178
179 static void
180 cfm_generate_maid(struct cfm *cfm)
181 {
182     const char *ovs_md_name = "ovs";
183     const char *ovs_ma_name = "ovs";
184     uint8_t *ma_p;
185     size_t md_len, ma_len;
186
187     memset(cfm->maid, 0, CCM_MAID_LEN);
188
189     md_len = strlen(ovs_md_name);
190     ma_len = strlen(ovs_ma_name);
191
192     assert(md_len && ma_len && md_len + ma_len + 4 <= CCM_MAID_LEN);
193
194     cfm->maid[0] = 4;                           /* MD name string format. */
195     cfm->maid[1] = md_len;                      /* MD name size. */
196     memcpy(&cfm->maid[2], ovs_md_name, md_len); /* MD name. */
197
198     ma_p = cfm->maid + 2 + md_len;
199     ma_p[0] = 2;                           /* MA name string format. */
200     ma_p[1] = ma_len;                      /* MA name size. */
201     memcpy(&ma_p[2], ovs_ma_name, ma_len); /* MA name. */
202 }
203
204 static int
205 ccm_interval_to_ms(uint8_t interval)
206 {
207     switch (interval) {
208     case 0:  NOT_REACHED(); /* Explicitly not supported by 802.1ag. */
209     case 1:  return 3;      /* Not recommended due to timer resolution. */
210     case 2:  return 10;     /* Not recommended due to timer resolution. */
211     case 3:  return 100;
212     case 4:  return 1000;
213     case 5:  return 10000;
214     case 6:  return 60000;
215     case 7:  return 600000;
216     default: NOT_REACHED(); /* Explicitly not supported by 802.1ag. */
217     }
218
219     NOT_REACHED();
220 }
221
222 static long long int
223 cfm_fault_interval(struct cfm *cfm)
224 {
225     /* According to the 802.1ag specification we should assume every other MP
226      * with the same MAID has the same transmission interval that we have.  If
227      * an MP has a different interval, cfm_process_heartbeat will register it
228      * as a fault (likely due to a configuration error).  Thus we can check all
229      * MPs at once making this quite a bit simpler.
230      *
231      * According to the specification we should check when (ccm_interval_ms *
232      * 3.5)ms have passed. */
233     return (cfm->ccm_interval_ms * 7) / 2;
234 }
235
236 static uint8_t
237 ms_to_ccm_interval(int interval_ms)
238 {
239     uint8_t i;
240
241     for (i = 7; i > 0; i--) {
242         if (ccm_interval_to_ms(i) <= interval_ms) {
243             return i;
244         }
245     }
246
247     return 1;
248 }
249
250 static uint32_t
251 hash_mpid(uint64_t mpid)
252 {
253     return hash_bytes(&mpid, sizeof mpid, 0);
254 }
255
256 static bool
257 cfm_is_valid_mpid(bool extended, uint64_t mpid)
258 {
259     /* 802.1ag specification requires MPIDs to be within the range [1, 8191].
260      * In extended mode we relax this requirement. */
261     return mpid >= 1 && (extended || mpid <= 8191);
262 }
263
264 static struct remote_mp *
265 lookup_remote_mp(const struct cfm *cfm, uint64_t mpid)
266 {
267     struct remote_mp *rmp;
268
269     HMAP_FOR_EACH_IN_BUCKET (rmp, node, hash_mpid(mpid), &cfm->remote_mps) {
270         if (rmp->mpid == mpid) {
271             return rmp;
272         }
273     }
274
275     return NULL;
276 }
277
278 void
279 cfm_init(void)
280 {
281     unixctl_command_register("cfm/show", "[interface]", 0, 1, cfm_unixctl_show,
282                              NULL);
283     unixctl_command_register("cfm/set-fault", "[interface] normal|false|true",
284                              1, 2, cfm_unixctl_set_fault, NULL);
285 }
286
287 /* Allocates a 'cfm' object called 'name'.  'cfm' should be initialized by
288  * cfm_configure() before use. */
289 struct cfm *
290 cfm_create(const char *name)
291 {
292     struct cfm *cfm;
293
294     cfm = xzalloc(sizeof *cfm);
295     cfm->name = xstrdup(name);
296     hmap_init(&cfm->remote_mps);
297     cfm_generate_maid(cfm);
298     hmap_insert(&all_cfms, &cfm->hmap_node, hash_string(cfm->name, 0));
299     cfm->remote_opup = true;
300     cfm->fault_override = -1;
301     cfm->health = -1;
302     cfm->last_tx = 0;
303     return cfm;
304 }
305
306 void
307 cfm_destroy(struct cfm *cfm)
308 {
309     struct remote_mp *rmp, *rmp_next;
310
311     if (!cfm) {
312         return;
313     }
314
315     HMAP_FOR_EACH_SAFE (rmp, rmp_next, node, &cfm->remote_mps) {
316         hmap_remove(&cfm->remote_mps, &rmp->node);
317         free(rmp);
318     }
319
320     hmap_destroy(&cfm->remote_mps);
321     hmap_remove(&all_cfms, &cfm->hmap_node);
322     free(cfm->rmps_array);
323     free(cfm->name);
324     free(cfm);
325 }
326
327 /* Should be run periodically to update fault statistics messages. */
328 void
329 cfm_run(struct cfm *cfm)
330 {
331     if (timer_expired(&cfm->fault_timer)) {
332         long long int interval = cfm_fault_interval(cfm);
333         struct remote_mp *rmp, *rmp_next;
334         bool old_cfm_fault = cfm->fault;
335
336         cfm->fault = cfm->recv_fault;
337         cfm->recv_fault = 0;
338
339         cfm->rmps_array_len = 0;
340         free(cfm->rmps_array);
341         cfm->rmps_array = xmalloc(hmap_count(&cfm->remote_mps) *
342                                   sizeof *cfm->rmps_array);
343
344         cfm->remote_opup = true;
345         if (cfm->health_interval == CFM_HEALTH_INTERVAL) {
346             /* Calculate the cfm health of the interface.  If the number of
347              * remote_mpids of a cfm interface is > 1, the cfm health is
348              * undefined. If the number of remote_mpids is 1, the cfm health is
349              * the percentage of the ccm frames received in the
350              * (CFM_HEALTH_INTERVAL * 3.5)ms, else it is 0. */
351             if (hmap_count(&cfm->remote_mps) > 1) {
352                 cfm->health = -1;
353             } else if (hmap_is_empty(&cfm->remote_mps)) {
354                 cfm->health = 0;
355             } else {
356                 int exp_ccm_recvd;
357
358                 rmp = CONTAINER_OF(hmap_first(&cfm->remote_mps),
359                                    struct remote_mp, node);
360                 exp_ccm_recvd = (CFM_HEALTH_INTERVAL * 7) / 2;
361                 /* Calculate the percentage of healthy ccm frames received.
362                  * Since the 'fault_interval' is (3.5 * cfm_interval), and
363                  * 1 CCM packet must be received every cfm_interval,
364                  * the 'remote_mpid' health reports the percentage of
365                  * healthy CCM frames received every
366                  * 'CFM_HEALTH_INTERVAL'th 'fault_interval'. */
367                 cfm->health = (rmp->num_health_ccm * 100) / exp_ccm_recvd;
368                 cfm->health = MIN(cfm->health, 100);
369                 rmp->num_health_ccm = 0;
370                 assert(cfm->health >= 0 && cfm->health <= 100);
371             }
372             cfm->health_interval = 0;
373         }
374         cfm->health_interval++;
375
376         HMAP_FOR_EACH_SAFE (rmp, rmp_next, node, &cfm->remote_mps) {
377
378             if (!rmp->recv) {
379                 VLOG_DBG("%s: no CCM from RMP %"PRIu64" in the last %lldms",
380                          cfm->name, rmp->mpid, interval);
381                 hmap_remove(&cfm->remote_mps, &rmp->node);
382                 free(rmp);
383             } else {
384                 rmp->recv = false;
385
386                 if (!rmp->opup) {
387                     cfm->remote_opup = rmp->opup;
388                 }
389
390                 cfm->rmps_array[cfm->rmps_array_len++] = rmp->mpid;
391             }
392         }
393
394         if (hmap_is_empty(&cfm->remote_mps)) {
395             cfm->fault |= CFM_FAULT_RECV;
396         }
397
398         if (old_cfm_fault != cfm->fault && !VLOG_DROP_INFO(&rl)) {
399             struct ds ds = DS_EMPTY_INITIALIZER;
400
401             ds_put_cfm_fault(&ds, old_cfm_fault, cfm->fault);
402             VLOG_INFO("%s: CFM fault status changed:%s", cfm->name,
403                       ds_cstr_ro(&ds));
404             ds_destroy(&ds);
405         }
406
407         timer_set_duration(&cfm->fault_timer, interval);
408         VLOG_DBG("%s: new fault interval", cfm->name);
409     }
410 }
411
412 /* Should be run periodically to check if the CFM module has a CCM message it
413  * wishes to send. */
414 bool
415 cfm_should_send_ccm(struct cfm *cfm)
416 {
417     return timer_expired(&cfm->tx_timer);
418 }
419
420 /* Composes a CCM message into 'packet'.  Messages generated with this function
421  * should be sent whenever cfm_should_send_ccm() indicates. */
422 void
423 cfm_compose_ccm(struct cfm *cfm, struct ofpbuf *packet,
424                 uint8_t eth_src[ETH_ADDR_LEN])
425 {
426     uint16_t ccm_vlan;
427     struct ccm *ccm;
428
429     timer_set_duration(&cfm->tx_timer, cfm->ccm_interval_ms);
430     eth_compose(packet, cfm_ccm_addr(cfm), eth_src, ETH_TYPE_CFM, sizeof *ccm);
431
432     ccm_vlan = (cfm->ccm_vlan != CFM_RANDOM_VLAN
433                 ? cfm->ccm_vlan
434                 : random_uint16());
435     ccm_vlan = ccm_vlan & VLAN_VID_MASK;
436
437     if (ccm_vlan || cfm->ccm_pcp) {
438         uint16_t tci = ccm_vlan | (cfm->ccm_pcp << VLAN_PCP_SHIFT);
439         eth_push_vlan(packet, htons(tci));
440     }
441
442     ccm = packet->l3;
443     ccm->mdlevel_version = 0;
444     ccm->opcode = CCM_OPCODE;
445     ccm->tlv_offset = 70;
446     ccm->seq = htonl(++cfm->seq);
447     ccm->flags = cfm->ccm_interval;
448     memcpy(ccm->maid, cfm->maid, sizeof ccm->maid);
449     memset(ccm->zero, 0, sizeof ccm->zero);
450     ccm->end_tlv = 0;
451
452     if (cfm->extended) {
453         ccm->mpid = htons(hash_mpid(cfm->mpid));
454         ccm->mpid64 = htonll(cfm->mpid);
455         ccm->opdown = !cfm->opup;
456     } else {
457         ccm->mpid = htons(cfm->mpid);
458         ccm->mpid64 = htonll(0);
459         ccm->opdown = 0;
460     }
461
462     if (cfm->ccm_interval == 0) {
463         assert(cfm->extended);
464         ccm->interval_ms_x = htons(cfm->ccm_interval_ms);
465     } else {
466         ccm->interval_ms_x = htons(0);
467     }
468
469     if (hmap_is_empty(&cfm->remote_mps)) {
470         ccm->flags |= CCM_RDI_MASK;
471     }
472
473     if (cfm->last_tx) {
474         long long int delay = time_msec() - cfm->last_tx;
475         if (delay > (cfm->ccm_interval_ms * 3 / 2)) {
476             VLOG_WARN("%s: long delay of %lldms (expected %dms) sending CCM"
477                       " seq %"PRIu32, cfm->name, delay, cfm->ccm_interval_ms,
478                       cfm->seq);
479         }
480     }
481     cfm->last_tx = time_msec();
482 }
483
484 void
485 cfm_wait(struct cfm *cfm)
486 {
487     timer_wait(&cfm->tx_timer);
488     timer_wait(&cfm->fault_timer);
489 }
490
491 /* Configures 'cfm' with settings from 's'. */
492 bool
493 cfm_configure(struct cfm *cfm, const struct cfm_settings *s)
494 {
495     uint8_t interval;
496     int interval_ms;
497
498     if (!cfm_is_valid_mpid(s->extended, s->mpid) || s->interval <= 0) {
499         return false;
500     }
501
502     cfm->mpid = s->mpid;
503     cfm->extended = s->extended;
504     cfm->opup = s->opup;
505     interval = ms_to_ccm_interval(s->interval);
506     interval_ms = ccm_interval_to_ms(interval);
507
508     cfm->ccm_vlan = s->ccm_vlan;
509     cfm->ccm_pcp = s->ccm_pcp & (VLAN_PCP_MASK >> VLAN_PCP_SHIFT);
510     if (cfm->extended && interval_ms != s->interval) {
511         interval = 0;
512         interval_ms = MIN(s->interval, UINT16_MAX);
513     }
514
515     if (interval != cfm->ccm_interval || interval_ms != cfm->ccm_interval_ms) {
516         cfm->ccm_interval = interval;
517         cfm->ccm_interval_ms = interval_ms;
518
519         timer_set_expired(&cfm->tx_timer);
520         timer_set_duration(&cfm->fault_timer, cfm_fault_interval(cfm));
521     }
522
523     return true;
524 }
525
526 /* Returns true if 'cfm' should process packets from 'flow'. */
527 bool
528 cfm_should_process_flow(const struct cfm *cfm, const struct flow *flow)
529 {
530     return (ntohs(flow->dl_type) == ETH_TYPE_CFM
531             && eth_addr_equals(flow->dl_dst, cfm_ccm_addr(cfm)));
532 }
533
534 /* Updates internal statistics relevant to packet 'p'.  Should be called on
535  * every packet whose flow returned true when passed to
536  * cfm_should_process_flow. */
537 void
538 cfm_process_heartbeat(struct cfm *cfm, const struct ofpbuf *p)
539 {
540     struct ccm *ccm;
541     struct eth_header *eth;
542
543     eth = p->l2;
544     ccm = ofpbuf_at(p, (uint8_t *)p->l3 - (uint8_t *)p->data, CCM_ACCEPT_LEN);
545
546     if (!ccm) {
547         VLOG_INFO_RL(&rl, "%s: Received an unparseable 802.1ag CCM heartbeat.",
548                      cfm->name);
549         return;
550     }
551
552     if (ccm->opcode != CCM_OPCODE) {
553         VLOG_INFO_RL(&rl, "%s: Received an unsupported 802.1ag message. "
554                      "(opcode %u)", cfm->name, ccm->opcode);
555         return;
556     }
557
558     /* According to the 802.1ag specification, reception of a CCM with an
559      * incorrect ccm_interval, unexpected MAID, or unexpected MPID should
560      * trigger a fault.  We ignore this requirement for several reasons.
561      *
562      * Faults can cause a controller or Open vSwitch to make potentially
563      * expensive changes to the network topology.  It seems prudent to trigger
564      * them judiciously, especially when CFM is used to check slave status of
565      * bonds. Furthermore, faults can be maliciously triggered by crafting
566      * unexpected CCMs. */
567     if (memcmp(ccm->maid, cfm->maid, sizeof ccm->maid)) {
568         cfm->recv_fault |= CFM_FAULT_MAID;
569         VLOG_WARN_RL(&rl, "%s: Received unexpected remote MAID from MAC "
570                      ETH_ADDR_FMT, cfm->name, ETH_ADDR_ARGS(eth->eth_src));
571     } else {
572         uint8_t ccm_interval = ccm->flags & 0x7;
573         bool ccm_rdi = ccm->flags & CCM_RDI_MASK;
574         uint16_t ccm_interval_ms_x = ntohs(ccm->interval_ms_x);
575
576         struct remote_mp *rmp;
577         uint64_t ccm_mpid;
578         uint32_t ccm_seq;
579         bool ccm_opdown;
580         enum cfm_fault_reason cfm_fault = 0;
581
582         if (cfm->extended) {
583             ccm_mpid = ntohll(ccm->mpid64);
584             ccm_opdown = ccm->opdown;
585         } else {
586             ccm_mpid = ntohs(ccm->mpid);
587             ccm_opdown = false;
588         }
589         ccm_seq = ntohl(ccm->seq);
590
591         if (ccm_interval != cfm->ccm_interval) {
592             cfm_fault |= CFM_FAULT_INTERVAL;
593             VLOG_WARN_RL(&rl, "%s: received a CCM with an unexpected interval"
594                          " (%"PRIu8") from RMP %"PRIu64, cfm->name,
595                          ccm_interval, ccm_mpid);
596         }
597
598         if (cfm->extended && ccm_interval == 0
599             && ccm_interval_ms_x != cfm->ccm_interval_ms) {
600             cfm_fault |= CFM_FAULT_INTERVAL;
601             VLOG_WARN_RL(&rl, "%s: received a CCM with an unexpected extended"
602                          " interval (%"PRIu16"ms) from RMP %"PRIu64, cfm->name,
603                          ccm_interval_ms_x, ccm_mpid);
604         }
605
606         rmp = lookup_remote_mp(cfm, ccm_mpid);
607         if (!rmp) {
608             if (hmap_count(&cfm->remote_mps) < CFM_MAX_RMPS) {
609                 rmp = xzalloc(sizeof *rmp);
610                 hmap_insert(&cfm->remote_mps, &rmp->node, hash_mpid(ccm_mpid));
611             } else {
612                 cfm_fault |= CFM_FAULT_OVERFLOW;
613                 VLOG_WARN_RL(&rl,
614                              "%s: dropped CCM with MPID %"PRIu64" from MAC "
615                              ETH_ADDR_FMT, cfm->name, ccm_mpid,
616                              ETH_ADDR_ARGS(eth->eth_src));
617             }
618         }
619
620         if (ccm_rdi) {
621             cfm_fault |= CFM_FAULT_RDI;
622             VLOG_DBG("%s: RDI bit flagged from RMP %"PRIu64, cfm->name,
623                      ccm_mpid);
624         }
625
626         VLOG_DBG("%s: received CCM (seq %"PRIu32") (mpid %"PRIu64")"
627                  " (interval %"PRIu8") (RDI %s)", cfm->name, ccm_seq,
628                  ccm_mpid, ccm_interval, ccm_rdi ? "true" : "false");
629
630         if (rmp) {
631             if (rmp->mpid == cfm->mpid) {
632                 cfm_fault |= CFM_FAULT_LOOPBACK;
633                 VLOG_WARN_RL(&rl,"%s: received CCM with local MPID"
634                              " %"PRIu64, cfm->name, rmp->mpid);
635             }
636
637             if (rmp->seq && ccm_seq != (rmp->seq + 1)) {
638                 VLOG_WARN_RL(&rl, "%s: (mpid %"PRIu64") detected sequence"
639                              " numbers which indicate possible connectivity"
640                              " problems (previous %"PRIu32") (current %"PRIu32
641                              ")", cfm->name, ccm_mpid, rmp->seq, ccm_seq);
642             }
643
644             rmp->mpid = ccm_mpid;
645             if (!cfm_fault) {
646                 rmp->num_health_ccm++;
647             }
648             rmp->recv = true;
649             cfm->recv_fault |= cfm_fault;
650             rmp->seq = ccm_seq;
651             rmp->opup = !ccm_opdown;
652         }
653     }
654 }
655
656 /* Gets the fault status of 'cfm'.  Returns a bit mask of 'cfm_fault_reason's
657  * indicating the cause of the connectivity fault, or zero if there is no
658  * fault. */
659 int
660 cfm_get_fault(const struct cfm *cfm)
661 {
662     if (cfm->fault_override >= 0) {
663         return cfm->fault_override ? CFM_FAULT_OVERRIDE : 0;
664     }
665     return cfm->fault;
666 }
667
668 /* Gets the health of 'cfm'.  Returns an integer between 0 and 100 indicating
669  * the health of the link as a percentage of ccm frames received in
670  * CFM_HEALTH_INTERVAL * 'fault_interval' if there is only 1 remote_mpid,
671  * returns 0 if there are no remote_mpids, and returns -1 if there are more
672  * than 1 remote_mpids. */
673 int
674 cfm_get_health(const struct cfm *cfm)
675 {
676     return cfm->health;
677 }
678
679 /* Gets the operational state of 'cfm'.  'cfm' is considered operationally down
680  * if it has received a CCM with the operationally down bit set from any of its
681  * remote maintenance points. Returns true if 'cfm' is operationally up. False
682  * otherwise. */
683 bool
684 cfm_get_opup(const struct cfm *cfm)
685 {
686     return cfm->remote_opup;
687 }
688
689 /* Populates 'rmps' with an array of remote maintenance points reachable by
690  * 'cfm'. The number of remote maintenance points is written to 'n_rmps'.
691  * 'cfm' retains ownership of the array written to 'rmps' */
692 void
693 cfm_get_remote_mpids(const struct cfm *cfm, const uint64_t **rmps,
694                      size_t *n_rmps)
695 {
696     *rmps = cfm->rmps_array;
697     *n_rmps = cfm->rmps_array_len;
698 }
699
700 static struct cfm *
701 cfm_find(const char *name)
702 {
703     struct cfm *cfm;
704
705     HMAP_FOR_EACH_WITH_HASH (cfm, hmap_node, hash_string(name, 0), &all_cfms) {
706         if (!strcmp(cfm->name, name)) {
707             return cfm;
708         }
709     }
710     return NULL;
711 }
712
713 static void
714 cfm_print_details(struct ds *ds, const struct cfm *cfm)
715 {
716     struct remote_mp *rmp;
717     int fault;
718
719     ds_put_format(ds, "---- %s ----\n", cfm->name);
720     ds_put_format(ds, "MPID %"PRIu64":%s%s\n", cfm->mpid,
721                   cfm->extended ? " extended" : "",
722                   cfm->fault_override >= 0 ? " fault_override" : "");
723
724     fault = cfm_get_fault(cfm);
725     if (fault) {
726         ds_put_cstr(ds, "\tfault:");
727         ds_put_cfm_fault(ds, fault, fault);
728         ds_put_cstr(ds, "\n");
729     }
730
731     if (cfm->health == -1) {
732         ds_put_format(ds, "\taverage health: undefined\n");
733     } else {
734         ds_put_format(ds, "\taverage health: %d\n", cfm->health);
735     }
736     ds_put_format(ds, "\topstate: %s\n", cfm->opup ? "up" : "down");
737     ds_put_format(ds, "\tremote_opstate: %s\n",
738                   cfm->remote_opup ? "up" : "down");
739     ds_put_format(ds, "\tinterval: %dms\n", cfm->ccm_interval_ms);
740     ds_put_format(ds, "\tnext CCM tx: %lldms\n",
741                   timer_msecs_until_expired(&cfm->tx_timer));
742     ds_put_format(ds, "\tnext fault check: %lldms\n",
743                   timer_msecs_until_expired(&cfm->fault_timer));
744
745     HMAP_FOR_EACH (rmp, node, &cfm->remote_mps) {
746         ds_put_format(ds, "Remote MPID %"PRIu64"\n", rmp->mpid);
747         ds_put_format(ds, "\trecv since check: %s\n",
748                       rmp->recv ? "true" : "false");
749         ds_put_format(ds, "\topstate: %s\n", rmp->opup? "up" : "down");
750     }
751 }
752
753 static void
754 cfm_unixctl_show(struct unixctl_conn *conn, int argc, const char *argv[],
755                  void *aux OVS_UNUSED)
756 {
757     struct ds ds = DS_EMPTY_INITIALIZER;
758     const struct cfm *cfm;
759
760     if (argc > 1) {
761         cfm = cfm_find(argv[1]);
762         if (!cfm) {
763             unixctl_command_reply_error(conn, "no such CFM object");
764             return;
765         }
766         cfm_print_details(&ds, cfm);
767     } else {
768         HMAP_FOR_EACH (cfm, hmap_node, &all_cfms) {
769             cfm_print_details(&ds, cfm);
770         }
771     }
772
773     unixctl_command_reply(conn, ds_cstr(&ds));
774     ds_destroy(&ds);
775 }
776
777 static void
778 cfm_unixctl_set_fault(struct unixctl_conn *conn, int argc, const char *argv[],
779                       void *aux OVS_UNUSED)
780 {
781     const char *fault_str = argv[argc - 1];
782     int fault_override;
783     struct cfm *cfm;
784
785     if (!strcasecmp("true", fault_str)) {
786         fault_override = 1;
787     } else if (!strcasecmp("false", fault_str)) {
788         fault_override = 0;
789     } else if (!strcasecmp("normal", fault_str)) {
790         fault_override = -1;
791     } else {
792         unixctl_command_reply_error(conn, "unknown fault string");
793         return;
794     }
795
796     if (argc > 2) {
797         cfm = cfm_find(argv[1]);
798         if (!cfm) {
799             unixctl_command_reply_error(conn, "no such CFM object");
800             return;
801         }
802         cfm->fault_override = fault_override;
803     } else {
804         HMAP_FOR_EACH (cfm, hmap_node, &all_cfms) {
805             cfm->fault_override = fault_override;
806         }
807     }
808
809     unixctl_command_reply(conn, "OK");
810 }