Stat segment / client: show run" works now
[vpp.git] / src / vlib / node.c
1 /*
2  * Copyright (c) 2015 Cisco and/or its affiliates.
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at:
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License.
14  */
15 /*
16  * node.c: VLIB processing nodes
17  *
18  * Copyright (c) 2008 Eliot Dresselhaus
19  *
20  * Permission is hereby granted, free of charge, to any person obtaining
21  * a copy of this software and associated documentation files (the
22  * "Software"), to deal in the Software without restriction, including
23  * without limitation the rights to use, copy, modify, merge, publish,
24  * distribute, sublicense, and/or sell copies of the Software, and to
25  * permit persons to whom the Software is furnished to do so, subject to
26  * the following conditions:
27  *
28  * The above copyright notice and this permission notice shall be
29  * included in all copies or substantial portions of the Software.
30  *
31  *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
32  *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
33  *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
34  *  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
35  *  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
36  *  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
37  *  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
38  */
39
40 #include <vlib/vlib.h>
41 #include <vlib/threads.h>
42
43 /* Query node given name. */
44 vlib_node_t *
45 vlib_get_node_by_name (vlib_main_t * vm, u8 * name)
46 {
47   vlib_node_main_t *nm = &vm->node_main;
48   uword *p;
49   u8 *key = name;
50   if (!clib_mem_is_heap_object (key))
51     key = format (0, "%s", key);
52   p = hash_get (nm->node_by_name, key);
53   if (key != name)
54     vec_free (key);
55   return p ? vec_elt (nm->nodes, p[0]) : 0;
56 }
57
58 static void
59 node_set_elog_name (vlib_main_t * vm, uword node_index)
60 {
61   vlib_node_t *n = vlib_get_node (vm, node_index);
62   elog_event_type_t *t;
63
64   t = vec_elt_at_index (vm->node_call_elog_event_types, node_index);
65   vec_free (t->format);
66   t->format = (char *) format (0, "%v-call: %%d%c", n->name, 0);
67
68   t = vec_elt_at_index (vm->node_return_elog_event_types, node_index);
69   vec_free (t->format);
70   t->format = (char *) format (0, "%v-return: %%d%c", n->name, 0);
71
72   n->name_elog_string = elog_string (&vm->elog_main, "%v%c", n->name, 0);
73 }
74
75 static void
76 vlib_worker_thread_node_rename (u32 node_index)
77 {
78   int i;
79   vlib_main_t *vm;
80   vlib_node_t *n;
81
82   if (vec_len (vlib_mains) == 1)
83     return;
84
85   vm = vlib_mains[0];
86   n = vlib_get_node (vm, node_index);
87
88   ASSERT (vlib_get_thread_index () == 0);
89   ASSERT (*vlib_worker_threads->wait_at_barrier == 1);
90
91   for (i = 1; i < vec_len (vlib_mains); i++)
92     {
93       vlib_main_t *vm_worker = vlib_mains[i];
94       vlib_node_t *n_worker = vlib_get_node (vm_worker, node_index);
95
96       n_worker->name = n->name;
97       n_worker->name_elog_string = n->name_elog_string;
98     }
99 }
100
101 void
102 vlib_node_rename (vlib_main_t * vm, u32 node_index, char *fmt, ...)
103 {
104   va_list va;
105   vlib_node_main_t *nm = &vm->node_main;
106   vlib_node_t *n = vlib_get_node (vm, node_index);
107
108   va_start (va, fmt);
109   hash_unset (nm->node_by_name, n->name);
110   vec_free (n->name);
111   n->name = va_format (0, fmt, &va);
112   va_end (va);
113   hash_set (nm->node_by_name, n->name, n->index);
114
115   node_set_elog_name (vm, node_index);
116
117   /* Propagate the change to all worker threads */
118   vlib_worker_thread_node_rename (node_index);
119 }
120
121 static void
122 vlib_node_runtime_update (vlib_main_t * vm, u32 node_index, u32 next_index)
123 {
124   vlib_node_main_t *nm = &vm->node_main;
125   vlib_node_runtime_t *r, *s;
126   vlib_node_t *node, *next_node;
127   vlib_next_frame_t *nf;
128   vlib_pending_frame_t *pf;
129   i32 i, j, n_insert;
130
131   ASSERT (vlib_get_thread_index () == 0);
132
133   vlib_worker_thread_barrier_sync (vm);
134
135   node = vec_elt (nm->nodes, node_index);
136   r = vlib_node_get_runtime (vm, node_index);
137
138   n_insert = vec_len (node->next_nodes) - r->n_next_nodes;
139   if (n_insert > 0)
140     {
141       i = r->next_frame_index + r->n_next_nodes;
142       vec_insert (nm->next_frames, n_insert, i);
143
144       /* Initialize newly inserted next frames. */
145       for (j = 0; j < n_insert; j++)
146         vlib_next_frame_init (nm->next_frames + i + j);
147
148       /* Relocate other next frames at higher indices. */
149       for (j = 0; j < vec_len (nm->nodes); j++)
150         {
151           s = vlib_node_get_runtime (vm, j);
152           if (j != node_index && s->next_frame_index >= i)
153             s->next_frame_index += n_insert;
154         }
155
156       /* Pending frames may need to be relocated also. */
157       vec_foreach (pf, nm->pending_frames)
158       {
159         if (pf->next_frame_index != VLIB_PENDING_FRAME_NO_NEXT_FRAME
160             && pf->next_frame_index >= i)
161           pf->next_frame_index += n_insert;
162       }
163       /* *INDENT-OFF* */
164       pool_foreach (pf, nm->suspended_process_frames, ({
165           if (pf->next_frame_index != ~0 && pf->next_frame_index >= i)
166             pf->next_frame_index += n_insert;
167       }));
168       /* *INDENT-ON* */
169
170       r->n_next_nodes = vec_len (node->next_nodes);
171     }
172
173   /* Set frame's node runtime index. */
174   next_node = vlib_get_node (vm, node->next_nodes[next_index]);
175   nf = nm->next_frames + r->next_frame_index + next_index;
176   nf->node_runtime_index = next_node->runtime_index;
177
178   vlib_worker_thread_node_runtime_update ();
179
180   vlib_worker_thread_barrier_release (vm);
181 }
182
183 uword
184 vlib_node_get_next (vlib_main_t * vm, uword node_index, uword next_node_index)
185 {
186   vlib_node_main_t *nm = &vm->node_main;
187   vlib_node_t *node;
188   uword *p;
189
190   node = vec_elt (nm->nodes, node_index);
191
192   /* Runtime has to be initialized. */
193   ASSERT (nm->flags & VLIB_NODE_MAIN_RUNTIME_STARTED);
194
195   if ((p = hash_get (node->next_slot_by_node, next_node_index)))
196     {
197       return p[0];
198     }
199
200   return (~0);
201 }
202
203 /* Add next node to given node in given slot. */
204 uword
205 vlib_node_add_next_with_slot (vlib_main_t * vm,
206                               uword node_index,
207                               uword next_node_index, uword slot)
208 {
209   vlib_node_main_t *nm = &vm->node_main;
210   vlib_node_t *node, *next;
211   uword *p;
212
213   node = vec_elt (nm->nodes, node_index);
214   next = vec_elt (nm->nodes, next_node_index);
215
216   /* Runtime has to be initialized. */
217   ASSERT (nm->flags & VLIB_NODE_MAIN_RUNTIME_STARTED);
218
219   if ((p = hash_get (node->next_slot_by_node, next_node_index)))
220     {
221       /* Next already exists: slot must match. */
222       if (slot != ~0)
223         ASSERT (slot == p[0]);
224       return p[0];
225     }
226
227   if (slot == ~0)
228     slot = vec_len (node->next_nodes);
229
230   vec_validate_init_empty (node->next_nodes, slot, ~0);
231   vec_validate (node->n_vectors_by_next_node, slot);
232
233   node->next_nodes[slot] = next_node_index;
234   hash_set (node->next_slot_by_node, next_node_index, slot);
235
236   vlib_node_runtime_update (vm, node_index, slot);
237
238   next->prev_node_bitmap = clib_bitmap_ori (next->prev_node_bitmap,
239                                             node_index);
240
241   /* Siblings all get same node structure. */
242   {
243     uword sib_node_index, sib_slot;
244     vlib_node_t *sib_node;
245     /* *INDENT-OFF* */
246     clib_bitmap_foreach (sib_node_index, node->sibling_bitmap, ({
247       sib_node = vec_elt (nm->nodes, sib_node_index);
248       if (sib_node != node)
249         {
250           sib_slot = vlib_node_add_next_with_slot (vm, sib_node_index, next_node_index, slot);
251           ASSERT (sib_slot == slot);
252         }
253     }));
254     /* *INDENT-ON* */
255   }
256
257   return slot;
258 }
259
260 /* Add named next node to given node in given slot. */
261 uword
262 vlib_node_add_named_next_with_slot (vlib_main_t * vm,
263                                     uword node, char *name, uword slot)
264 {
265   vlib_node_main_t *nm;
266   vlib_node_t *n, *n_next;
267
268   nm = &vm->node_main;
269   n = vlib_get_node (vm, node);
270
271   n_next = vlib_get_node_by_name (vm, (u8 *) name);
272   if (!n_next)
273     {
274       if (nm->flags & VLIB_NODE_MAIN_RUNTIME_STARTED)
275         return ~0;
276
277       if (slot == ~0)
278         slot = clib_max (vec_len (n->next_node_names),
279                          vec_len (n->next_nodes));
280       vec_validate (n->next_node_names, slot);
281       n->next_node_names[slot] = name;
282       return slot;
283     }
284
285   return vlib_node_add_next_with_slot (vm, node, n_next->index, slot);
286 }
287
288 static void
289 node_elog_init (vlib_main_t * vm, uword ni)
290 {
291   elog_event_type_t t;
292
293   memset (&t, 0, sizeof (t));
294
295   /* 2 event types for this node: one when node function is called.
296      One when it returns. */
297   vec_validate (vm->node_call_elog_event_types, ni);
298   vm->node_call_elog_event_types[ni] = t;
299
300   vec_validate (vm->node_return_elog_event_types, ni);
301   vm->node_return_elog_event_types[ni] = t;
302
303   node_set_elog_name (vm, ni);
304 }
305
306 #ifdef CLIB_UNIX
307 #define STACK_ALIGN (clib_mem_get_page_size())
308 #else
309 #define STACK_ALIGN CLIB_CACHE_LINE_BYTES
310 #endif
311
312 static void
313 register_node (vlib_main_t * vm, vlib_node_registration_t * r)
314 {
315   vlib_node_main_t *nm = &vm->node_main;
316   vlib_node_t *n;
317   u32 page_size = clib_mem_get_page_size ();
318   int i;
319
320   if (CLIB_DEBUG > 0)
321     {
322       /* Default (0) type should match INTERNAL. */
323       vlib_node_t zero = { 0 };
324       ASSERT (VLIB_NODE_TYPE_INTERNAL == zero.type);
325     }
326
327   if (r->node_fn_registrations)
328     {
329       vlib_node_fn_registration_t *fnr = r->node_fn_registrations;
330       int priority = -1;
331
332       /* to avoid confusion, please remove ".function " statiement from
333          CLIB_NODE_REGISTRATION() if using function function candidates */
334       ASSERT (r->function == 0);
335
336       while (fnr)
337         {
338           if (fnr->priority > priority)
339             {
340               priority = fnr->priority;
341               r->function = fnr->function;
342             }
343           fnr = fnr->next_registration;
344         }
345     }
346
347   ASSERT (r->function != 0);
348
349   n = clib_mem_alloc_no_fail (sizeof (n[0]));
350   memset (n, 0, sizeof (n[0]));
351   n->index = vec_len (nm->nodes);
352
353   vec_add1 (nm->nodes, n);
354
355   /* Name is always a vector so it can be formatted with %v. */
356   if (clib_mem_is_heap_object (vec_header (r->name, 0)))
357     n->name = vec_dup ((u8 *) r->name);
358   else
359     n->name = format (0, "%s", r->name);
360
361   if (!nm->node_by_name)
362     nm->node_by_name = hash_create_vec ( /* size */ 32,
363                                         sizeof (n->name[0]), sizeof (uword));
364
365   /* Node names must be unique. */
366   {
367     vlib_node_t *o = vlib_get_node_by_name (vm, n->name);
368     if (o)
369       clib_error ("more than one node named `%v'", n->name);
370   }
371
372   hash_set (nm->node_by_name, n->name, n->index);
373
374   r->index = n->index;          /* save index in registration */
375   n->function = r->function;
376
377   /* Node index of next sibling will be filled in by vlib_node_main_init. */
378   n->sibling_of = r->sibling_of;
379   if (r->sibling_of && r->n_next_nodes > 0)
380     clib_error ("sibling node should not have any next nodes `%v'", n->name);
381
382   if (r->type == VLIB_NODE_TYPE_INTERNAL)
383     ASSERT (r->vector_size > 0);
384
385 #define _(f) n->f = r->f
386
387   _(type);
388   _(flags);
389   _(state);
390   _(scalar_size);
391   _(vector_size);
392   _(format_buffer);
393   _(unformat_buffer);
394   _(format_trace);
395   _(validate_frame);
396
397   /* Register error counters. */
398   vlib_register_errors (vm, n->index, r->n_errors, r->error_strings);
399   node_elog_init (vm, n->index);
400
401   _(runtime_data_bytes);
402   if (r->runtime_data_bytes > 0)
403     {
404       vec_resize (n->runtime_data, r->runtime_data_bytes);
405       if (r->runtime_data)
406         clib_memcpy (n->runtime_data, r->runtime_data, r->runtime_data_bytes);
407     }
408
409   vec_resize (n->next_node_names, r->n_next_nodes);
410   for (i = 0; i < r->n_next_nodes; i++)
411     n->next_node_names[i] = r->next_nodes[i];
412
413   vec_validate_init_empty (n->next_nodes, r->n_next_nodes - 1, ~0);
414   vec_validate (n->n_vectors_by_next_node, r->n_next_nodes - 1);
415
416   n->owner_node_index = n->owner_next_index = ~0;
417
418   /* Initialize node runtime. */
419   {
420     vlib_node_runtime_t *rt;
421     u32 i;
422
423     if (n->type == VLIB_NODE_TYPE_PROCESS)
424       {
425         vlib_process_t *p;
426         uword log2_n_stack_bytes;
427
428         log2_n_stack_bytes = clib_max (r->process_log2_n_stack_bytes, 15);
429
430 #ifdef CLIB_UNIX
431         /*
432          * Bump the stack size if running over a kernel with a large page size,
433          * and the stack isn't any too big to begin with. Otherwise, we'll
434          * trip over the stack guard page for sure.
435          */
436         if ((page_size > (4 << 10)) && log2_n_stack_bytes < 19)
437           {
438             if ((1 << log2_n_stack_bytes) <= page_size)
439               log2_n_stack_bytes = min_log2 (page_size) + 1;
440             else
441               log2_n_stack_bytes++;
442           }
443 #endif
444
445         p = clib_mem_alloc_aligned_at_offset
446           (sizeof (p[0]) + (1 << log2_n_stack_bytes),
447            STACK_ALIGN, STRUCT_OFFSET_OF (vlib_process_t, stack),
448            0 /* no, don't call os_out_of_memory */ );
449         if (p == 0)
450           clib_panic ("failed to allocate process stack (%d bytes)",
451                       1 << log2_n_stack_bytes);
452
453         memset (p, 0, sizeof (p[0]));
454         p->log2_n_stack_bytes = log2_n_stack_bytes;
455
456         /* Process node's runtime index is really index into process
457            pointer vector. */
458         n->runtime_index = vec_len (nm->processes);
459
460         vec_add1 (nm->processes, p);
461
462         /* Paint first stack word with magic number so we can at least
463            detect process stack overruns. */
464         p->stack[0] = VLIB_PROCESS_STACK_MAGIC;
465
466         /* Node runtime is stored inside of process. */
467         rt = &p->node_runtime;
468
469 #ifdef CLIB_UNIX
470         /*
471          * Disallow writes to the bottom page of the stack, to
472          * catch stack overflows.
473          */
474         if (mprotect (p->stack, page_size, PROT_READ) < 0)
475           clib_unix_warning ("process stack");
476 #endif
477
478       }
479     else
480       {
481         vec_add2_aligned (nm->nodes_by_type[n->type], rt, 1,
482                           /* align */ CLIB_CACHE_LINE_BYTES);
483         n->runtime_index = rt - nm->nodes_by_type[n->type];
484       }
485
486     if (n->type == VLIB_NODE_TYPE_INPUT)
487       nm->input_node_counts_by_state[n->state] += 1;
488
489     rt->function = n->function;
490     rt->flags = n->flags;
491     rt->state = n->state;
492     rt->node_index = n->index;
493
494     rt->n_next_nodes = r->n_next_nodes;
495     rt->next_frame_index = vec_len (nm->next_frames);
496
497     vec_resize (nm->next_frames, rt->n_next_nodes);
498     for (i = 0; i < rt->n_next_nodes; i++)
499       vlib_next_frame_init (nm->next_frames + rt->next_frame_index + i);
500
501     vec_resize (rt->errors, r->n_errors);
502     for (i = 0; i < vec_len (rt->errors); i++)
503       rt->errors[i] = vlib_error_set (n->index, i);
504
505     STATIC_ASSERT_SIZEOF (vlib_node_runtime_t, 128);
506     ASSERT (vec_len (n->runtime_data) <= VLIB_NODE_RUNTIME_DATA_SIZE);
507
508     if (vec_len (n->runtime_data) > 0)
509       clib_memcpy (rt->runtime_data, n->runtime_data,
510                    vec_len (n->runtime_data));
511
512     vec_free (n->runtime_data);
513   }
514 }
515
516 /* Register new packet processing node. */
517 u32
518 vlib_register_node (vlib_main_t * vm, vlib_node_registration_t * r)
519 {
520   register_node (vm, r);
521   return r->index;
522 }
523
524 static uword
525 null_node_fn (vlib_main_t * vm,
526               vlib_node_runtime_t * node, vlib_frame_t * frame)
527 {
528   u16 n_vectors = frame->n_vectors;
529
530   vlib_node_increment_counter (vm, node->node_index, 0, n_vectors);
531   vlib_buffer_free (vm, vlib_frame_args (frame), n_vectors);
532   vlib_frame_free (vm, node, frame);
533
534   return n_vectors;
535 }
536
537 void
538 vlib_register_all_static_nodes (vlib_main_t * vm)
539 {
540   vlib_node_registration_t *r;
541
542   static char *null_node_error_strings[] = {
543     "blackholed packets",
544   };
545
546   static vlib_node_registration_t null_node_reg = {
547     .function = null_node_fn,
548     .vector_size = sizeof (u32),
549     .name = "null-node",
550     .n_errors = 1,
551     .error_strings = null_node_error_strings,
552   };
553
554   /* make sure that node index 0 is not used by
555      real node */
556   register_node (vm, &null_node_reg);
557
558   r = vm->node_main.node_registrations;
559   while (r)
560     {
561       register_node (vm, r);
562       r = r->next_registration;
563     }
564 }
565
566 void
567 vlib_node_get_nodes (vlib_main_t * vm, u32 max_threads, int include_stats,
568                      int barrier_sync, vlib_node_t **** node_dupsp,
569                      vlib_main_t *** stat_vmsp)
570 {
571   vlib_node_main_t *nm = &vm->node_main;
572   vlib_node_t *n;
573   vlib_node_t ***node_dups = *node_dupsp;
574   vlib_node_t **nodes;
575   vlib_main_t **stat_vms = *stat_vmsp;
576   vlib_main_t *stat_vm;
577   uword i, j;
578   u32 threads_to_serialize;
579
580   if (vec_len (stat_vms) == 0)
581     {
582       for (i = 0; i < vec_len (vlib_mains); i++)
583         {
584           stat_vm = vlib_mains[i];
585           if (stat_vm)
586             vec_add1 (stat_vms, stat_vm);
587         }
588     }
589
590   threads_to_serialize = clib_min (max_threads, vec_len (stat_vms));
591
592   vec_validate (node_dups, threads_to_serialize - 1);
593
594   /*
595    * Barrier sync across stats scraping.
596    * Otherwise, the counts will be grossly inaccurate.
597    */
598   if (barrier_sync)
599     vlib_worker_thread_barrier_sync (vm);
600
601   for (j = 0; j < threads_to_serialize; j++)
602     {
603       stat_vm = stat_vms[j];
604       nm = &stat_vm->node_main;
605
606       if (include_stats)
607         {
608           for (i = 0; i < vec_len (nm->nodes); i++)
609             {
610               n = nm->nodes[i];
611               vlib_node_sync_stats (stat_vm, n);
612             }
613         }
614
615       nodes = node_dups[j];
616       vec_validate (nodes, vec_len (nm->nodes) - 1);
617       clib_memcpy (nodes, nm->nodes, vec_len (nm->nodes) * sizeof (nodes[0]));
618       node_dups[j] = nodes;
619     }
620
621   if (barrier_sync)
622     vlib_worker_thread_barrier_release (vm);
623
624   *node_dupsp = node_dups;
625   *stat_vmsp = stat_vms;
626 }
627
628 clib_error_t *
629 vlib_node_main_init (vlib_main_t * vm)
630 {
631   vlib_node_main_t *nm = &vm->node_main;
632   clib_error_t *error = 0;
633   vlib_node_t *n;
634   uword ni;
635
636   nm->frame_size_hash = hash_create (0, sizeof (uword));
637   nm->flags |= VLIB_NODE_MAIN_RUNTIME_STARTED;
638
639   /* Generate sibling relationships */
640   {
641     vlib_node_t *n, *sib;
642     uword si;
643
644     for (ni = 0; ni < vec_len (nm->nodes); ni++)
645       {
646         n = vec_elt (nm->nodes, ni);
647
648         if (!n->sibling_of)
649           continue;
650
651         sib = vlib_get_node_by_name (vm, (u8 *) n->sibling_of);
652         if (!sib)
653           {
654             error = clib_error_create ("sibling `%s' not found for node `%v'",
655                                        n->sibling_of, n->name);
656             goto done;
657           }
658
659         /* *INDENT-OFF* */
660         clib_bitmap_foreach (si, sib->sibling_bitmap, ({
661               vlib_node_t * m = vec_elt (nm->nodes, si);
662
663               /* Connect all of sibling's siblings to us. */
664               m->sibling_bitmap = clib_bitmap_ori (m->sibling_bitmap, n->index);
665
666               /* Connect us to all of sibling's siblings. */
667               n->sibling_bitmap = clib_bitmap_ori (n->sibling_bitmap, si);
668             }));
669         /* *INDENT-ON* */
670
671         /* Connect sibling to us. */
672         sib->sibling_bitmap = clib_bitmap_ori (sib->sibling_bitmap, n->index);
673
674         /* Connect us to sibling. */
675         n->sibling_bitmap = clib_bitmap_ori (n->sibling_bitmap, sib->index);
676       }
677   }
678
679   /* Resolve next names into next indices. */
680   for (ni = 0; ni < vec_len (nm->nodes); ni++)
681     {
682       uword i;
683
684       n = vec_elt (nm->nodes, ni);
685
686       for (i = 0; i < vec_len (n->next_node_names); i++)
687         {
688           char *a = n->next_node_names[i];
689
690           if (!a)
691             continue;
692
693           if (~0 == vlib_node_add_named_next_with_slot (vm, n->index, a, i))
694             {
695               error = clib_error_create
696                 ("node `%v' refers to unknown node `%s'", n->name, a);
697               goto done;
698             }
699         }
700
701       vec_free (n->next_node_names);
702     }
703
704   /* Set previous node pointers. */
705   for (ni = 0; ni < vec_len (nm->nodes); ni++)
706     {
707       vlib_node_t *n_next;
708       uword i;
709
710       n = vec_elt (nm->nodes, ni);
711
712       for (i = 0; i < vec_len (n->next_nodes); i++)
713         {
714           if (n->next_nodes[i] >= vec_len (nm->nodes))
715             continue;
716
717           n_next = vec_elt (nm->nodes, n->next_nodes[i]);
718           n_next->prev_node_bitmap =
719             clib_bitmap_ori (n_next->prev_node_bitmap, n->index);
720         }
721     }
722
723   {
724     vlib_next_frame_t *nf;
725     vlib_node_runtime_t *r;
726     vlib_node_t *next;
727     uword i;
728
729     vec_foreach (r, nm->nodes_by_type[VLIB_NODE_TYPE_INTERNAL])
730     {
731       if (r->n_next_nodes == 0)
732         continue;
733
734       n = vlib_get_node (vm, r->node_index);
735       nf = vec_elt_at_index (nm->next_frames, r->next_frame_index);
736
737       for (i = 0; i < vec_len (n->next_nodes); i++)
738         {
739           next = vlib_get_node (vm, n->next_nodes[i]);
740
741           /* Validate node runtime indices are correctly initialized. */
742           ASSERT (nf[i].node_runtime_index == next->runtime_index);
743
744           nf[i].flags = 0;
745           if (next->flags & VLIB_NODE_FLAG_FRAME_NO_FREE_AFTER_DISPATCH)
746             nf[i].flags |= VLIB_FRAME_NO_FREE_AFTER_DISPATCH;
747         }
748     }
749   }
750
751 done:
752   return error;
753 }
754
755 /*
756  * fd.io coding-style-patch-verification: ON
757  *
758  * Local Variables:
759  * eval: (c-set-style "gnu")
760  * End:
761  */