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