sr: SRv6 Path Tracing Midpoint behaviour
[vpp.git] / src / vnet / srv6 / sr_pt_node.c
1 /* SPDX-License-Identifier: Apache-2.0
2  * Copyright(c) 2022 Cisco Systems, Inc.
3  */
4
5 #include <vnet/fib/ip6_fib.h>
6 #include <vnet/dpo/load_balance.h>
7 #include <vnet/l2/feat_bitmap.h>
8 #include <vnet/fib/fib_table.h>
9 #include <vnet/srv6/sr.h>
10 #include <vnet/srv6/sr_pt.h>
11
12 /**
13  * @brief PT node trace
14  */
15 typedef struct
16 {
17   u32 iface;
18   u16 id;
19   u8 load;
20   timestamp_64_t t64;
21   u8 tts_template;
22   u8 tts;
23   u8 behavior;
24 } pt_trace_t;
25
26 static u8 *
27 format_pt_trace (u8 *s, va_list *args)
28 {
29   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
30   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
31   pt_trace_t *t = va_arg (*args, pt_trace_t *);
32   switch (t->behavior)
33     {
34     case PT_BEHAVIOR_MID:
35       s = format (
36         s,
37         "Behavior Midpoint, outgoing interface %U, outgoing interface id %u, "
38         "outgoing interface load %u, t64_sec %u, t64_nsec %u, tts_template "
39         "%u, tts %u",
40         format_vnet_sw_if_index_name, vnet_get_main (), t->iface, t->id,
41         t->load, htobe32 (t->t64.sec), htobe32 (t->t64.nsec), t->tts_template,
42         t->tts);
43       break;
44     default:
45       break;
46     }
47   return s;
48 }
49
50 static_always_inline void
51 pt_midpoint_processing (vlib_main_t *vm, vlib_node_runtime_t *node,
52                         vlib_buffer_t *b0, ip6_header_t *ip0,
53                         sr_pt_iface_t *ls, timestamp_64_t t64)
54 {
55   ip6_hop_by_hop_header_t *hbh;
56   ip6_hop_by_hop_option_t *hbh_opt;
57   ip6_hop_by_hop_option_pt_t *hbh_opt_pt;
58
59   if (ip0->protocol == IP_PROTOCOL_IP6_HOP_BY_HOP_OPTIONS)
60     {
61       hbh = (void *) (ip0 + 1);
62       hbh_opt = (void *) (hbh + 1);
63       if (hbh_opt->type == IP6_HBH_PT_TYPE)
64         {
65           hbh_opt_pt = (void *) (hbh_opt + 1);
66           clib_memcpy_fast (&hbh_opt_pt->cmd_stack[1],
67                             &hbh_opt_pt->cmd_stack[0], 33);
68           hbh_opt_pt->cmd_stack[0].oif_oil = htobe16 (ls->id << 4);
69           hbh_opt_pt->cmd_stack[0].oif_oil |= ls->egress_load;
70           switch (ls->tts_template)
71             {
72             case SR_PT_TTS_TEMPLATE_0:
73               hbh_opt_pt->cmd_stack[0].tts =
74                 t64.nsec >> SR_PT_TTS_SHIFT_TEMPLATE_0;
75               break;
76             case SR_PT_TTS_TEMPLATE_1:
77               hbh_opt_pt->cmd_stack[0].tts =
78                 t64.nsec >> SR_PT_TTS_SHIFT_TEMPLATE_1;
79               break;
80             case SR_PT_TTS_TEMPLATE_2:
81               hbh_opt_pt->cmd_stack[0].tts =
82                 t64.nsec >> SR_PT_TTS_SHIFT_TEMPLATE_2;
83               break;
84             case SR_PT_TTS_TEMPLATE_3:
85               hbh_opt_pt->cmd_stack[0].tts =
86                 t64.nsec >> SR_PT_TTS_SHIFT_TEMPLATE_0;
87               break;
88             default:
89               break;
90             }
91         }
92     }
93   return;
94 }
95
96 VLIB_NODE_FN (sr_pt_node)
97 (vlib_main_t *vm, vlib_node_runtime_t *node, vlib_frame_t *from_frame)
98 {
99   u32 n_left_from, next_index, *from, *to_next;
100   from = vlib_frame_vector_args (from_frame);
101   n_left_from = from_frame->n_vectors;
102   next_index = node->cached_next_index;
103   u8 pt_behavior = ~(u8) 0;
104   sr_pt_iface_t *ls = 0;
105   while (n_left_from > 0)
106     {
107       u32 n_left_to_next;
108       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
109
110       // Single loop for potentially the last three packets
111       while (n_left_from > 0 && n_left_to_next > 0)
112         {
113           u32 bi0;
114           u32 iface;
115           vlib_buffer_t *b0;
116           u32 next0 = 0;
117           ethernet_header_t *en0;
118           ip6_header_t *ip0 = 0;
119           bi0 = from[0];
120           to_next[0] = bi0;
121           from += 1;
122           to_next += 1;
123           n_left_from -= 1;
124           n_left_to_next -= 1;
125           timestamp_64_t t64;
126
127           b0 = vlib_get_buffer (vm, bi0);
128           iface = vnet_buffer (b0)->sw_if_index[VLIB_TX];
129           ls = sr_pt_find_iface (iface);
130           if (ls)
131             {
132               en0 = vlib_buffer_get_current (b0);
133               ip0 = (void *) (en0 + 1);
134               unix_time_now_nsec_fraction (&t64.sec, &t64.nsec);
135               pt_midpoint_processing (vm, node, b0, ip0, ls, t64);
136               pt_behavior = PT_BEHAVIOR_MID;
137             }
138           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
139             {
140               pt_trace_t *tr = vlib_add_trace (vm, node, b0, sizeof (*tr));
141               tr->iface = iface;
142               tr->id = ls->id;
143               tr->load = ls->egress_load;
144               tr->tts_template = ls->tts_template;
145               tr->t64.sec = t64.sec;
146               tr->t64.nsec = t64.nsec;
147               tr->tts = t64.nsec >> 20;
148               tr->behavior = pt_behavior;
149             }
150           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
151                                            n_left_to_next, bi0, next0);
152         }
153       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
154     }
155
156   return from_frame->n_vectors;
157 }
158
159 VLIB_REGISTER_NODE (sr_pt_node) = {
160   .name = "pt",
161   .vector_size = sizeof (u32),
162   .format_trace = format_pt_trace,
163   .type = VLIB_NODE_TYPE_INTERNAL,
164   .n_errors = 0,
165   .n_next_nodes = 1,
166   .next_nodes = { [0] = "interface-output" },
167 };
168
169 VNET_FEATURE_INIT (sr_pt_node, static) = {
170   .arc_name = "ip6-output",
171   .node_name = "pt",
172   .runs_after = VNET_FEATURES ("ip6-lookup"),
173 };