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:
7 * http://www.apache.org/licenses/LICENSE-2.0
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.
16 * node_funcs.h: processing nodes global functions/inlines
18 * Copyright (c) 2008 Eliot Dresselhaus
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:
28 * The above copyright notice and this permission notice shall be
29 * included in all copies or substantial portions of the Software.
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.
45 #ifndef included_vlib_node_funcs_h
46 #define included_vlib_node_funcs_h
48 #include <vppinfra/clib.h>
49 #include <vppinfra/fifo.h>
50 #include <vppinfra/tw_timer_1t_3w_1024sl_ov.h>
51 #include <vppinfra/interrupt.h>
53 #ifdef CLIB_SANITIZE_ADDR
54 #include <sanitizer/asan_interface.h>
57 static_always_inline void
58 vlib_process_start_switch_stack (vlib_main_t * vm, vlib_process_t * p)
60 #ifdef CLIB_SANITIZE_ADDR
61 void *stack = p ? (void *) p->stack : vlib_thread_stacks[vm->thread_index];
62 u32 stack_bytes = p ? p->log2_n_stack_bytes : VLIB_THREAD_STACK_SIZE;
63 __sanitizer_start_switch_fiber (&vm->asan_stack_save, stack, stack_bytes);
67 static_always_inline void
68 vlib_process_finish_switch_stack (vlib_main_t * vm)
70 #ifdef CLIB_SANITIZE_ADDR
71 const void *bottom_old;
74 __sanitizer_finish_switch_fiber (&vm->asan_stack_save, &bottom_old,
79 /** \brief Get vlib node by index.
80 @warning This function will ASSERT if @c i is out of range.
81 @param vm vlib_main_t pointer, varies by thread
83 @return pointer to the requested vlib_node_t.
86 always_inline vlib_node_t *
87 vlib_get_node (vlib_main_t * vm, u32 i)
89 return vec_elt (vm->node_main.nodes, i);
92 /** \brief Get vlib node by graph arc (next) index.
93 @param vm vlib_main_t pointer, varies by thread
94 @param node_index index of original node
95 @param next_index graph arc index
96 @return pointer to the vlib_node_t at the end of the indicated arc
99 always_inline vlib_node_t *
100 vlib_get_next_node (vlib_main_t * vm, u32 node_index, u32 next_index)
102 vlib_node_main_t *nm = &vm->node_main;
105 n = vec_elt (nm->nodes, node_index);
106 ASSERT (next_index < vec_len (n->next_nodes));
107 return vlib_get_node (vm, n->next_nodes[next_index]);
110 /** \brief Get node runtime by node index.
111 @param vm vlib_main_t pointer, varies by thread
112 @param node_index index of node
113 @return pointer to the indicated vlib_node_runtime_t
116 always_inline vlib_node_runtime_t *
117 vlib_node_get_runtime (vlib_main_t * vm, u32 node_index)
119 vlib_node_main_t *nm = &vm->node_main;
120 vlib_node_t *n = vec_elt (nm->nodes, node_index);
122 if (n->type != VLIB_NODE_TYPE_PROCESS)
123 return vec_elt_at_index (nm->nodes_by_type[n->type], n->runtime_index);
126 p = vec_elt (nm->processes, n->runtime_index);
127 return &p->node_runtime;
131 /** \brief Get node runtime private data by node index.
132 @param vm vlib_main_t pointer, varies by thread
133 @param node_index index of the node
134 @return pointer to the indicated vlib_node_runtime_t private data
138 vlib_node_get_runtime_data (vlib_main_t * vm, u32 node_index)
140 vlib_node_runtime_t *r = vlib_node_get_runtime (vm, node_index);
141 return r->runtime_data;
144 /** \brief Set node runtime private data.
145 @param vm vlib_main_t pointer, varies by thread
146 @param node_index index of the node
147 @param runtime_data arbitrary runtime private data
148 @param n_runtime_data_bytes size of runtime private data
152 vlib_node_set_runtime_data (vlib_main_t * vm, u32 node_index,
153 void *runtime_data, u32 n_runtime_data_bytes)
155 vlib_node_t *n = vlib_get_node (vm, node_index);
156 vlib_node_runtime_t *r = vlib_node_get_runtime (vm, node_index);
158 n->runtime_data_bytes = n_runtime_data_bytes;
159 vec_free (n->runtime_data);
160 vec_add (n->runtime_data, runtime_data, n_runtime_data_bytes);
162 ASSERT (vec_len (n->runtime_data) <= sizeof (vlib_node_runtime_t) -
163 STRUCT_OFFSET_OF (vlib_node_runtime_t, runtime_data));
165 if (vec_len (n->runtime_data) > 0)
166 clib_memcpy_fast (r->runtime_data, n->runtime_data,
167 vec_len (n->runtime_data));
170 /** \brief Set node dispatch state.
171 @param vm vlib_main_t pointer, varies by thread
172 @param node_index index of the node
173 @param new_state new state for node, see vlib_node_state_t
176 vlib_node_set_state (vlib_main_t * vm, u32 node_index,
177 vlib_node_state_t new_state)
179 vlib_node_main_t *nm = &vm->node_main;
181 vlib_node_runtime_t *r;
183 n = vec_elt (nm->nodes, node_index);
184 if (n->type == VLIB_NODE_TYPE_PROCESS)
186 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
187 r = &p->node_runtime;
189 /* When disabling make sure flags are cleared. */
190 p->flags &= ~(VLIB_PROCESS_RESUME_PENDING
191 | VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_CLOCK
192 | VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT);
195 r = vec_elt_at_index (nm->nodes_by_type[n->type], n->runtime_index);
197 ASSERT (new_state < VLIB_N_NODE_STATE);
199 if (n->type == VLIB_NODE_TYPE_INPUT)
201 ASSERT (nm->input_node_counts_by_state[n->state] > 0);
202 nm->input_node_counts_by_state[n->state] -= 1;
203 nm->input_node_counts_by_state[new_state] += 1;
206 if (PREDICT_FALSE (r->state == VLIB_NODE_STATE_DISABLED))
207 vlib_node_runtime_perf_counter (vm, r, 0, 0, 0,
208 VLIB_NODE_RUNTIME_PERF_RESET);
210 n->state = new_state;
211 r->state = new_state;
214 /** \brief Get node dispatch state.
215 @param vm vlib_main_t pointer, varies by thread
216 @param node_index index of the node
217 @return state for node, see vlib_node_state_t
219 always_inline vlib_node_state_t
220 vlib_node_get_state (vlib_main_t * vm, u32 node_index)
222 vlib_node_main_t *nm = &vm->node_main;
224 n = vec_elt (nm->nodes, node_index);
229 vlib_node_set_flag (vlib_main_t *vm, u32 node_index, u16 flag, u8 enable)
231 vlib_node_runtime_t *r;
234 n = vlib_get_node (vm, node_index);
235 r = vlib_node_get_runtime (vm, node_index);
250 vlib_node_set_interrupt_pending (vlib_main_t *vm, u32 node_index)
252 vlib_node_main_t *nm = &vm->node_main;
253 vlib_node_t *n = vec_elt (nm->nodes, node_index);
255 ASSERT (n->type == VLIB_NODE_TYPE_INPUT);
257 if (vm != vlib_get_main ())
258 clib_interrupt_set_atomic (nm->interrupts, n->runtime_index);
260 clib_interrupt_set (nm->interrupts, n->runtime_index);
262 __atomic_store_n (nm->pending_interrupts, 1, __ATOMIC_RELEASE);
265 always_inline vlib_process_t *
266 vlib_get_process_from_node (vlib_main_t * vm, vlib_node_t * node)
268 vlib_node_main_t *nm = &vm->node_main;
269 ASSERT (node->type == VLIB_NODE_TYPE_PROCESS);
270 return vec_elt (nm->processes, node->runtime_index);
273 always_inline vlib_frame_t *
274 vlib_get_frame (vlib_main_t * vm, vlib_frame_t * f)
277 ASSERT (f->frame_flags & VLIB_FRAME_IS_ALLOCATED);
282 vlib_frame_no_append (vlib_frame_t * f)
284 f->frame_flags |= VLIB_FRAME_NO_APPEND;
287 /** \brief Get pointer to frame vector data.
288 @param f vlib_frame_t pointer
289 @return pointer to first vector element in frame
292 vlib_frame_vector_args (vlib_frame_t * f)
294 ASSERT (f->vector_offset);
295 return (void *) f + f->vector_offset;
298 /** \brief Get pointer to frame vector aux data.
299 @param f vlib_frame_t pointer
300 @return pointer to first vector aux data element in frame
303 vlib_frame_aux_args (vlib_frame_t *f)
305 ASSERT (f->aux_offset);
306 return (void *) f + f->aux_offset;
309 /** \brief Get pointer to frame scalar data.
311 @param f vlib_frame_t pointer
313 @return arbitrary node scalar data
315 @sa vlib_frame_vector_args
318 vlib_frame_scalar_args (vlib_frame_t * f)
320 ASSERT (f->scalar_offset);
321 return (void *) f + f->scalar_offset;
324 always_inline vlib_next_frame_t *
325 vlib_node_runtime_get_next_frame (vlib_main_t * vm,
326 vlib_node_runtime_t * n, u32 next_index)
328 vlib_node_main_t *nm = &vm->node_main;
329 vlib_next_frame_t *nf;
331 ASSERT (next_index < n->n_next_nodes);
332 nf = vec_elt_at_index (nm->next_frames, n->next_frame_index + next_index);
336 vlib_node_t *node, *next;
337 node = vec_elt (nm->nodes, n->node_index);
338 next = vec_elt (nm->nodes, node->next_nodes[next_index]);
339 ASSERT (nf->node_runtime_index == next->runtime_index);
345 /** \brief Get pointer to frame by (@c node_index, @c next_index).
347 @warning This is not a function that you should call directly.
348 See @ref vlib_get_next_frame instead.
350 @param vm vlib_main_t pointer, varies by thread
351 @param node_index index of the node
352 @param next_index graph arc index
354 @return pointer to the requested vlib_next_frame_t
356 @sa vlib_get_next_frame
359 always_inline vlib_next_frame_t *
360 vlib_node_get_next_frame (vlib_main_t * vm, u32 node_index, u32 next_index)
362 vlib_node_main_t *nm = &vm->node_main;
364 vlib_node_runtime_t *r;
366 n = vec_elt (nm->nodes, node_index);
367 r = vec_elt_at_index (nm->nodes_by_type[n->type], n->runtime_index);
368 return vlib_node_runtime_get_next_frame (vm, r, next_index);
371 vlib_frame_t *vlib_get_next_frame_internal (vlib_main_t * vm,
372 vlib_node_runtime_t * node,
374 u32 alloc_new_frame);
376 #define vlib_get_next_frame_macro(vm, node, next_index, vectors, \
377 n_vectors_left, alloc_new_frame) \
380 vlib_frame_t *_f = vlib_get_next_frame_internal ( \
381 (vm), (node), (next_index), (alloc_new_frame)); \
382 u32 _n = _f->n_vectors; \
383 (vectors) = vlib_frame_vector_args (_f) + _n * sizeof ((vectors)[0]); \
384 (n_vectors_left) = VLIB_FRAME_SIZE - _n; \
388 #define vlib_get_next_frame_macro_with_aux(vm, node, next_index, vectors, \
389 n_vectors_left, alloc_new_frame, \
390 aux_data, maybe_no_aux) \
393 vlib_frame_t *_f = vlib_get_next_frame_internal ( \
394 (vm), (node), (next_index), (alloc_new_frame)); \
395 u32 _n = _f->n_vectors; \
396 (vectors) = vlib_frame_vector_args (_f) + _n * sizeof ((vectors)[0]); \
397 if ((maybe_no_aux) && (_f)->aux_offset == 0) \
400 (aux_data) = vlib_frame_aux_args (_f) + _n * sizeof ((aux_data)[0]); \
401 (n_vectors_left) = VLIB_FRAME_SIZE - _n; \
405 /** \brief Get pointer to next frame vector data by
406 (@c vlib_node_runtime_t, @c next_index).
407 Standard single/dual loop boilerplate element.
408 @attention This is a MACRO, with SIDE EFFECTS.
410 @param vm vlib_main_t pointer, varies by thread
411 @param node current node vlib_node_runtime_t pointer
412 @param next_index requested graph arc index
414 @return @c vectors -- pointer to next available vector slot
415 @return @c n_vectors_left -- number of vector slots available
417 #define vlib_get_next_frame(vm, node, next_index, vectors, n_vectors_left) \
418 vlib_get_next_frame_macro (vm, node, next_index, vectors, n_vectors_left, \
419 /* alloc new frame */ 0)
421 #define vlib_get_new_next_frame(vm, node, next_index, vectors, \
423 vlib_get_next_frame_macro (vm, node, next_index, vectors, n_vectors_left, \
424 /* alloc new frame */ 1)
426 /** \brief Get pointer to next frame vector data and next frame aux data by
427 (@c vlib_node_runtime_t, @c next_index).
428 Standard single/dual loop boilerplate element.
429 @attention This is a MACRO, with SIDE EFFECTS.
430 @attention This MACRO is unsafe in case the next node does not support
433 @param vm vlib_main_t pointer, varies by thread
434 @param node current node vlib_node_runtime_t pointer
435 @param next_index requested graph arc index
437 @return @c vectors -- pointer to next available vector slot
438 @return @c aux_data -- pointer to next available aux data slot
439 @return @c n_vectors_left -- number of vector slots available
441 #define vlib_get_next_frame_with_aux(vm, node, next_index, vectors, aux_data, \
443 vlib_get_next_frame_macro_with_aux ( \
444 vm, node, next_index, vectors, n_vectors_left, /* alloc new frame */ 0, \
445 aux_data, /* maybe_no_aux */ 0)
447 #define vlib_get_new_next_frame_with_aux(vm, node, next_index, vectors, \
448 aux_data, n_vectors_left) \
449 vlib_get_next_frame_macro_with_aux ( \
450 vm, node, next_index, vectors, n_vectors_left, /* alloc new frame */ 1, \
451 aux_data, /* maybe_no_aux */ 0)
453 /** \brief Get pointer to next frame vector data and next frame aux data by
454 (@c vlib_node_runtime_t, @c next_index).
455 Standard single/dual loop boilerplate element.
456 @attention This is a MACRO, with SIDE EFFECTS.
457 @attention This MACRO is safe in case the next node does not support aux_data.
458 In that case aux_data is set to NULL.
460 @param vm vlib_main_t pointer, varies by thread
461 @param node current node vlib_node_runtime_t pointer
462 @param next_index requested graph arc index
464 @return @c vectors -- pointer to next available vector slot
465 @return @c aux_data -- pointer to next available aux data slot
466 @return @c n_vectors_left -- number of vector slots available
468 #define vlib_get_next_frame_with_aux_safe(vm, node, next_index, vectors, \
469 aux_data, n_vectors_left) \
470 vlib_get_next_frame_macro_with_aux ( \
471 vm, node, next_index, vectors, n_vectors_left, /* alloc new frame */ 0, \
472 aux_data, /* maybe_no_aux */ 1)
474 #define vlib_get_new_next_frame_with_aux_safe(vm, node, next_index, vectors, \
475 aux_data, n_vectors_left) \
476 vlib_get_next_frame_macro_with_aux ( \
477 vm, node, next_index, vectors, n_vectors_left, /* alloc new frame */ 1, \
478 aux_data, /* maybe_no_aux */ 1)
480 /** \brief Release pointer to next frame vector data.
481 Standard single/dual loop boilerplate element.
482 @param vm vlib_main_t pointer, varies by thread
483 @param r current node vlib_node_runtime_t pointer
484 @param next_index graph arc index
485 @param n_packets_left number of slots still available in vector
488 vlib_put_next_frame (vlib_main_t * vm,
489 vlib_node_runtime_t * r,
490 u32 next_index, u32 n_packets_left);
492 /* Combination get plus put. Returns vector argument just added. */
493 #define vlib_set_next_frame(vm,node,next_index,v) \
496 vlib_get_next_frame ((vm), (node), (next_index), (v), _n_left); \
497 ASSERT (_n_left > 0); \
498 vlib_put_next_frame ((vm), (node), (next_index), _n_left - 1); \
502 #define vlib_set_next_frame_with_aux_safe(vm, node, next_index, v, aux) \
505 vlib_get_next_frame_with_aux_safe ((vm), (node), (next_index), (v), \
507 ASSERT (_n_left > 0); \
508 vlib_put_next_frame ((vm), (node), (next_index), _n_left - 1); \
513 vlib_set_next_frame_buffer (vlib_main_t * vm,
514 vlib_node_runtime_t * node,
515 u32 next_index, u32 buffer_index)
518 p = vlib_set_next_frame (vm, node, next_index, p);
523 vlib_set_next_frame_buffer_with_aux_safe (vlib_main_t *vm,
524 vlib_node_runtime_t *node,
525 u32 next_index, u32 buffer_index,
530 p = vlib_set_next_frame_with_aux_safe (vm, node, next_index, p, a);
536 vlib_frame_t *vlib_get_frame_to_node (vlib_main_t * vm, u32 to_node_index);
537 void vlib_put_frame_to_node (vlib_main_t * vm, u32 to_node_index,
541 vlib_in_process_context (vlib_main_t * vm)
543 return vm->node_main.current_process_index != ~0;
546 always_inline vlib_process_t *
547 vlib_get_current_process (vlib_main_t * vm)
549 vlib_node_main_t *nm = &vm->node_main;
550 if (vlib_in_process_context (vm))
551 return vec_elt (nm->processes, nm->current_process_index);
556 vlib_current_process (vlib_main_t * vm)
558 return vlib_get_current_process (vm)->node_runtime.node_index;
562 vlib_get_current_process_node_index (vlib_main_t * vm)
564 vlib_process_t *process = vlib_get_current_process (vm);
565 return process->node_runtime.node_index;
568 /** Returns TRUE if a process suspend time is less than 10us
569 @param dt - remaining poll time in seconds
570 @returns 1 if dt < 10e-6, 0 otherwise
573 vlib_process_suspend_time_is_zero (f64 dt)
578 /** Suspend a vlib cooperative multi-tasking thread for a period of time
579 @param vm - vlib_main_t *
580 @param dt - suspend interval in seconds
581 @returns VLIB_PROCESS_RESUME_LONGJMP_RESUME, routinely ignored
585 vlib_process_suspend (vlib_main_t * vm, f64 dt)
588 vlib_node_main_t *nm = &vm->node_main;
589 vlib_process_t *p = vec_elt (nm->processes, nm->current_process_index);
591 if (vlib_process_suspend_time_is_zero (dt))
592 return VLIB_PROCESS_RESUME_LONGJMP_RESUME;
594 p->flags |= VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_CLOCK;
595 r = clib_setjmp (&p->resume_longjmp, VLIB_PROCESS_RESUME_LONGJMP_SUSPEND);
596 if (r == VLIB_PROCESS_RESUME_LONGJMP_SUSPEND)
598 /* expiration time in 10us ticks */
599 p->resume_clock_interval = dt * 1e5;
600 vlib_process_start_switch_stack (vm, 0);
601 clib_longjmp (&p->return_longjmp, VLIB_PROCESS_RETURN_LONGJMP_SUSPEND);
604 vlib_process_finish_switch_stack (vm);
610 vlib_process_free_event_type (vlib_process_t * p, uword t,
611 uword is_one_time_event)
613 ASSERT (!pool_is_free_index (p->event_type_pool, t));
614 pool_put_index (p->event_type_pool, t);
615 if (is_one_time_event)
616 p->one_time_event_type_bitmap =
617 clib_bitmap_andnoti (p->one_time_event_type_bitmap, t);
621 vlib_process_maybe_free_event_type (vlib_process_t * p, uword t)
623 ASSERT (!pool_is_free_index (p->event_type_pool, t));
624 if (clib_bitmap_get (p->one_time_event_type_bitmap, t))
625 vlib_process_free_event_type (p, t, /* is_one_time_event */ 1);
629 vlib_process_get_event_data (vlib_main_t * vm,
630 uword * return_event_type_opaque)
632 vlib_node_main_t *nm = &vm->node_main;
634 vlib_process_event_type_t *et;
636 void *event_data_vector;
638 p = vec_elt (nm->processes, nm->current_process_index);
640 /* Find first type with events ready.
641 Return invalid type when there's nothing there. */
642 t = clib_bitmap_first_set (p->non_empty_event_type_bitmap);
646 p->non_empty_event_type_bitmap =
647 clib_bitmap_andnoti (p->non_empty_event_type_bitmap, t);
649 ASSERT (_vec_len (p->pending_event_data_by_type_index[t]) > 0);
650 event_data_vector = p->pending_event_data_by_type_index[t];
651 p->pending_event_data_by_type_index[t] = 0;
653 et = pool_elt_at_index (p->event_type_pool, t);
655 /* Return user's opaque value and possibly index. */
656 *return_event_type_opaque = et->opaque;
658 vlib_process_maybe_free_event_type (p, t);
660 return event_data_vector;
663 /* Return event data vector for later reuse. We reuse event data to avoid
664 repeatedly allocating event vectors in cases where we care about speed. */
666 vlib_process_put_event_data (vlib_main_t * vm, void *event_data)
668 vlib_node_main_t *nm = &vm->node_main;
669 vec_add1 (nm->recycled_event_data_vectors, event_data);
672 /** Return the first event type which has occurred and a vector of per-event
673 data of that type, or a timeout indication
675 @param vm - vlib_main_t pointer
676 @param data_vector - pointer to a (uword *) vector to receive event data
677 @returns either an event type and a vector of per-event instance data,
678 or ~0 to indicate a timeout.
682 vlib_process_get_events (vlib_main_t * vm, uword ** data_vector)
684 vlib_node_main_t *nm = &vm->node_main;
686 vlib_process_event_type_t *et;
689 p = vec_elt (nm->processes, nm->current_process_index);
691 /* Find first type with events ready.
692 Return invalid type when there's nothing there. */
693 t = clib_bitmap_first_set (p->non_empty_event_type_bitmap);
697 p->non_empty_event_type_bitmap =
698 clib_bitmap_andnoti (p->non_empty_event_type_bitmap, t);
700 l = _vec_len (p->pending_event_data_by_type_index[t]);
702 vec_add (*data_vector, p->pending_event_data_by_type_index[t], l);
703 vec_set_len (p->pending_event_data_by_type_index[t], 0);
705 et = pool_elt_at_index (p->event_type_pool, t);
707 /* Return user's opaque value. */
710 vlib_process_maybe_free_event_type (p, t);
716 vlib_process_get_events_helper (vlib_process_t * p, uword t,
717 uword ** data_vector)
721 p->non_empty_event_type_bitmap =
722 clib_bitmap_andnoti (p->non_empty_event_type_bitmap, t);
724 l = _vec_len (p->pending_event_data_by_type_index[t]);
726 vec_add (*data_vector, p->pending_event_data_by_type_index[t], l);
727 vec_set_len (p->pending_event_data_by_type_index[t], 0);
729 vlib_process_maybe_free_event_type (p, t);
734 /* As above but query as specified type of event. Returns number of
737 vlib_process_get_events_with_type (vlib_main_t * vm, uword ** data_vector,
738 uword with_type_opaque)
740 vlib_node_main_t *nm = &vm->node_main;
744 p = vec_elt (nm->processes, nm->current_process_index);
745 h = hash_get (p->event_type_index_by_type_opaque, with_type_opaque);
747 /* This can happen when an event has not yet been
748 signaled with given opaque type. */
752 if (!clib_bitmap_get (p->non_empty_event_type_bitmap, t))
755 return vlib_process_get_events_helper (p, t, data_vector);
758 always_inline uword *
759 vlib_process_wait_for_event (vlib_main_t * vm)
761 vlib_node_main_t *nm = &vm->node_main;
765 p = vec_elt (nm->processes, nm->current_process_index);
766 if (clib_bitmap_is_zero (p->non_empty_event_type_bitmap))
768 p->flags |= VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT;
770 clib_setjmp (&p->resume_longjmp, VLIB_PROCESS_RESUME_LONGJMP_SUSPEND);
771 if (r == VLIB_PROCESS_RESUME_LONGJMP_SUSPEND)
773 vlib_process_start_switch_stack (vm, 0);
774 clib_longjmp (&p->return_longjmp,
775 VLIB_PROCESS_RETURN_LONGJMP_SUSPEND);
778 vlib_process_finish_switch_stack (vm);
781 return p->non_empty_event_type_bitmap;
785 vlib_process_wait_for_one_time_event (vlib_main_t * vm,
786 uword ** data_vector,
787 uword with_type_index)
789 vlib_node_main_t *nm = &vm->node_main;
793 p = vec_elt (nm->processes, nm->current_process_index);
794 ASSERT (!pool_is_free_index (p->event_type_pool, with_type_index));
795 while (!clib_bitmap_get (p->non_empty_event_type_bitmap, with_type_index))
797 p->flags |= VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT;
799 clib_setjmp (&p->resume_longjmp, VLIB_PROCESS_RESUME_LONGJMP_SUSPEND);
800 if (r == VLIB_PROCESS_RESUME_LONGJMP_SUSPEND)
802 vlib_process_start_switch_stack (vm, 0);
803 clib_longjmp (&p->return_longjmp,
804 VLIB_PROCESS_RETURN_LONGJMP_SUSPEND);
807 vlib_process_finish_switch_stack (vm);
810 return vlib_process_get_events_helper (p, with_type_index, data_vector);
814 vlib_process_wait_for_event_with_type (vlib_main_t * vm,
815 uword ** data_vector,
816 uword with_type_opaque)
818 vlib_node_main_t *nm = &vm->node_main;
822 p = vec_elt (nm->processes, nm->current_process_index);
823 h = hash_get (p->event_type_index_by_type_opaque, with_type_opaque);
824 while (!h || !clib_bitmap_get (p->non_empty_event_type_bitmap, h[0]))
826 p->flags |= VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT;
828 clib_setjmp (&p->resume_longjmp, VLIB_PROCESS_RESUME_LONGJMP_SUSPEND);
829 if (r == VLIB_PROCESS_RESUME_LONGJMP_SUSPEND)
831 vlib_process_start_switch_stack (vm, 0);
832 clib_longjmp (&p->return_longjmp,
833 VLIB_PROCESS_RETURN_LONGJMP_SUSPEND);
836 vlib_process_finish_switch_stack (vm);
838 /* See if unknown event type has been signaled now. */
840 h = hash_get (p->event_type_index_by_type_opaque, with_type_opaque);
843 return vlib_process_get_events_helper (p, h[0], data_vector);
846 /** Suspend a cooperative multi-tasking thread
847 Waits for an event, or for the indicated number of seconds to elapse
848 @param vm - vlib_main_t pointer
849 @param dt - timeout, in seconds.
850 @returns the remaining time interval
854 vlib_process_wait_for_event_or_clock (vlib_main_t * vm, f64 dt)
856 vlib_node_main_t *nm = &vm->node_main;
861 p = vec_elt (nm->processes, nm->current_process_index);
863 if (vlib_process_suspend_time_is_zero (dt)
864 || !clib_bitmap_is_zero (p->non_empty_event_type_bitmap))
867 wakeup_time = vlib_time_now (vm) + dt;
869 /* Suspend waiting for both clock and event to occur. */
870 p->flags |= (VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT
871 | VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_CLOCK);
873 r = clib_setjmp (&p->resume_longjmp, VLIB_PROCESS_RESUME_LONGJMP_SUSPEND);
874 if (r == VLIB_PROCESS_RESUME_LONGJMP_SUSPEND)
876 p->resume_clock_interval = dt * 1e5;
877 vlib_process_start_switch_stack (vm, 0);
878 clib_longjmp (&p->return_longjmp, VLIB_PROCESS_RETURN_LONGJMP_SUSPEND);
881 vlib_process_finish_switch_stack (vm);
883 /* Return amount of time still left to sleep.
884 If <= 0 then we've been waken up by the clock (and not an event). */
885 return wakeup_time - vlib_time_now (vm);
888 always_inline vlib_process_event_type_t *
889 vlib_process_new_event_type (vlib_process_t * p, uword with_type_opaque)
891 vlib_process_event_type_t *et;
892 pool_get (p->event_type_pool, et);
893 et->opaque = with_type_opaque;
898 vlib_process_create_one_time_event (vlib_main_t * vm, uword node_index,
899 uword with_type_opaque)
901 vlib_node_main_t *nm = &vm->node_main;
902 vlib_node_t *n = vlib_get_node (vm, node_index);
903 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
904 vlib_process_event_type_t *et;
907 et = vlib_process_new_event_type (p, with_type_opaque);
908 t = et - p->event_type_pool;
909 p->one_time_event_type_bitmap =
910 clib_bitmap_ori (p->one_time_event_type_bitmap, t);
915 vlib_process_delete_one_time_event (vlib_main_t * vm, uword node_index,
918 vlib_node_main_t *nm = &vm->node_main;
919 vlib_node_t *n = vlib_get_node (vm, node_index);
920 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
922 ASSERT (clib_bitmap_get (p->one_time_event_type_bitmap, t));
923 vlib_process_free_event_type (p, t, /* is_one_time_event */ 1);
927 vlib_process_signal_event_helper (vlib_node_main_t * nm,
931 uword n_data_elts, uword n_data_elt_bytes)
933 uword p_flags, add_to_pending, delete_from_wheel;
934 u8 *data_to_be_written_by_caller;
935 vec_attr_t va = { .elt_sz = n_data_elt_bytes };
937 ASSERT (n->type == VLIB_NODE_TYPE_PROCESS);
939 ASSERT (!pool_is_free_index (p->event_type_pool, t));
941 vec_validate (p->pending_event_data_by_type_index, t);
943 /* Resize data vector and return caller's data to be written. */
945 u8 *data_vec = p->pending_event_data_by_type_index[t];
948 if (!data_vec && vec_len (nm->recycled_event_data_vectors))
950 data_vec = vec_pop (nm->recycled_event_data_vectors);
951 vec_reset_length (data_vec);
954 l = vec_len (data_vec);
956 data_vec = _vec_realloc_internal (data_vec, l + n_data_elts, &va);
958 p->pending_event_data_by_type_index[t] = data_vec;
959 data_to_be_written_by_caller = data_vec + l * n_data_elt_bytes;
962 p->non_empty_event_type_bitmap =
963 clib_bitmap_ori (p->non_empty_event_type_bitmap, t);
967 /* Event was already signalled? */
968 add_to_pending = (p_flags & VLIB_PROCESS_RESUME_PENDING) == 0;
970 /* Process will resume when suspend time elapses? */
971 delete_from_wheel = 0;
972 if (p_flags & VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_CLOCK)
974 /* Waiting for both event and clock? */
975 if (p_flags & VLIB_PROCESS_IS_SUSPENDED_WAITING_FOR_EVENT)
977 if (!TW (tw_timer_handle_is_free)
978 ((TWT (tw_timer_wheel) *) nm->timing_wheel,
979 p->stop_timer_handle))
980 delete_from_wheel = 1;
982 /* timer just popped so process should already be on the list */
986 /* Waiting only for clock. Event will be queue and may be
987 handled when timer expires. */
991 /* Never add current process to pending vector since current process is
993 add_to_pending &= nm->current_process_index != n->runtime_index;
997 u32 x = vlib_timing_wheel_data_set_suspended_process (n->runtime_index);
998 p->flags = p_flags | VLIB_PROCESS_RESUME_PENDING;
999 vec_add1 (nm->data_from_advancing_timing_wheel, x);
1000 if (delete_from_wheel)
1001 TW (tw_timer_stop) ((TWT (tw_timer_wheel) *) nm->timing_wheel,
1002 p->stop_timer_handle);
1005 return data_to_be_written_by_caller;
1008 always_inline void *
1009 vlib_process_signal_event_data (vlib_main_t * vm,
1012 uword n_data_elts, uword n_data_elt_bytes)
1014 vlib_node_main_t *nm = &vm->node_main;
1015 vlib_node_t *n = vlib_get_node (vm, node_index);
1016 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
1019 /* Must be in main thread */
1020 ASSERT (vlib_get_thread_index () == 0);
1022 h = hash_get (p->event_type_index_by_type_opaque, type_opaque);
1025 vlib_process_event_type_t *et =
1026 vlib_process_new_event_type (p, type_opaque);
1027 t = et - p->event_type_pool;
1028 hash_set (p->event_type_index_by_type_opaque, type_opaque, t);
1033 return vlib_process_signal_event_helper (nm, n, p, t, n_data_elts,
1037 always_inline void *
1038 vlib_process_signal_event_at_time (vlib_main_t * vm,
1042 uword n_data_elts, uword n_data_elt_bytes)
1044 vlib_node_main_t *nm = &vm->node_main;
1045 vlib_node_t *n = vlib_get_node (vm, node_index);
1046 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
1049 h = hash_get (p->event_type_index_by_type_opaque, type_opaque);
1052 vlib_process_event_type_t *et =
1053 vlib_process_new_event_type (p, type_opaque);
1054 t = et - p->event_type_pool;
1055 hash_set (p->event_type_index_by_type_opaque, type_opaque, t);
1060 if (vlib_process_suspend_time_is_zero (dt))
1061 return vlib_process_signal_event_helper (nm, n, p, t, n_data_elts,
1065 vlib_signal_timed_event_data_t *te;
1067 pool_get_aligned (nm->signal_timed_event_data_pool, te, sizeof (te[0]));
1069 te->n_data_elts = n_data_elts;
1070 te->n_data_elt_bytes = n_data_elt_bytes;
1071 te->n_data_bytes = n_data_elts * n_data_elt_bytes;
1073 /* Assert that structure fields are big enough. */
1074 ASSERT (te->n_data_elts == n_data_elts);
1075 ASSERT (te->n_data_elt_bytes == n_data_elt_bytes);
1076 ASSERT (te->n_data_bytes == n_data_elts * n_data_elt_bytes);
1078 te->process_node_index = n->runtime_index;
1079 te->event_type_index = t;
1081 p->stop_timer_handle =
1082 TW (tw_timer_start) ((TWT (tw_timer_wheel) *) nm->timing_wheel,
1083 vlib_timing_wheel_data_set_timed_event
1084 (te - nm->signal_timed_event_data_pool),
1086 (vlib_time_now (vm) + dt) * 1e5);
1088 /* Inline data big enough to hold event? */
1089 if (te->n_data_bytes < sizeof (te->inline_event_data))
1090 return te->inline_event_data;
1093 te->event_data_as_vector = 0;
1094 vec_resize (te->event_data_as_vector, te->n_data_bytes);
1095 return te->event_data_as_vector;
1100 always_inline void *
1101 vlib_process_signal_one_time_event_data (vlib_main_t * vm,
1105 uword n_data_elt_bytes)
1107 vlib_node_main_t *nm = &vm->node_main;
1108 vlib_node_t *n = vlib_get_node (vm, node_index);
1109 vlib_process_t *p = vec_elt (nm->processes, n->runtime_index);
1110 return vlib_process_signal_event_helper (nm, n, p, type_index, n_data_elts,
1115 vlib_process_signal_event (vlib_main_t * vm,
1116 uword node_index, uword type_opaque, uword data)
1118 uword *d = vlib_process_signal_event_data (vm, node_index, type_opaque,
1119 1 /* elts */ , sizeof (uword));
1124 vlib_process_signal_event_pointer (vlib_main_t * vm,
1126 uword type_opaque, void *data)
1128 void **d = vlib_process_signal_event_data (vm, node_index, type_opaque,
1129 1 /* elts */ , sizeof (data));
1134 * Signal event to process from any thread.
1136 * When in doubt, use this.
1139 vlib_process_signal_event_mt (vlib_main_t * vm,
1140 uword node_index, uword type_opaque, uword data)
1142 if (vlib_get_thread_index () != 0)
1144 vlib_process_signal_event_mt_args_t args = {
1145 .node_index = node_index,
1146 .type_opaque = type_opaque,
1149 vlib_rpc_call_main_thread (vlib_process_signal_event_mt_helper,
1150 (u8 *) & args, sizeof (args));
1153 vlib_process_signal_event (vm, node_index, type_opaque, data);
1157 vlib_process_signal_one_time_event (vlib_main_t * vm,
1159 uword type_index, uword data)
1162 vlib_process_signal_one_time_event_data (vm, node_index, type_index,
1163 1 /* elts */ , sizeof (uword));
1168 vlib_signal_one_time_waiting_process (vlib_main_t * vm,
1169 vlib_one_time_waiting_process_t * p)
1171 vlib_process_signal_one_time_event (vm, p->node_index, p->one_time_event,
1173 clib_memset (p, ~0, sizeof (p[0]));
1177 vlib_signal_one_time_waiting_process_vector (vlib_main_t * vm,
1178 vlib_one_time_waiting_process_t
1181 vlib_one_time_waiting_process_t *wp;
1182 vec_foreach (wp, *wps) vlib_signal_one_time_waiting_process (vm, wp);
1187 vlib_current_process_wait_for_one_time_event (vlib_main_t * vm,
1188 vlib_one_time_waiting_process_t
1191 p->node_index = vlib_current_process (vm);
1192 p->one_time_event = vlib_process_create_one_time_event (vm, p->node_index, /* type opaque */
1194 vlib_process_wait_for_one_time_event (vm,
1195 /* don't care about data */ 0,
1200 vlib_current_process_wait_for_one_time_event_vector (vlib_main_t * vm,
1201 vlib_one_time_waiting_process_t
1204 vlib_one_time_waiting_process_t *wp;
1205 vec_add2 (*wps, wp, 1);
1206 vlib_current_process_wait_for_one_time_event (vm, wp);
1210 vlib_node_runtime_update_main_loop_vector_stats (vlib_main_t * vm,
1211 vlib_node_runtime_t * node,
1217 ASSERT (is_pow2 (ARRAY_LEN (node->main_loop_vector_stats)));
1218 i = ((vm->main_loop_count >> VLIB_LOG2_MAIN_LOOPS_PER_STATS_UPDATE)
1219 & (ARRAY_LEN (node->main_loop_vector_stats) - 1));
1222 d = ((vm->main_loop_count >> VLIB_LOG2_MAIN_LOOPS_PER_STATS_UPDATE)
1224 (node->main_loop_count_last_dispatch >>
1225 VLIB_LOG2_MAIN_LOOPS_PER_STATS_UPDATE));
1226 vi0 = node->main_loop_vector_stats[i0];
1227 vi1 = node->main_loop_vector_stats[i1];
1228 vi0 = d == 0 ? vi0 : 0;
1229 vi1 = d <= 1 ? vi1 : 0;
1231 node->main_loop_vector_stats[i0] = vi0;
1232 node->main_loop_vector_stats[i1] = vi1;
1233 node->main_loop_count_last_dispatch = vm->main_loop_count;
1234 /* Return previous counter. */
1235 return node->main_loop_vector_stats[i1];
1239 vlib_node_vectors_per_main_loop_as_float (vlib_main_t * vm, u32 node_index)
1241 vlib_node_runtime_t *rt = vlib_node_get_runtime (vm, node_index);
1244 v = vlib_node_runtime_update_main_loop_vector_stats (vm, rt, /* n_vectors */
1246 return (f64) v / (1 << VLIB_LOG2_MAIN_LOOPS_PER_STATS_UPDATE);
1250 vlib_node_vectors_per_main_loop_as_integer (vlib_main_t * vm, u32 node_index)
1252 vlib_node_runtime_t *rt = vlib_node_get_runtime (vm, node_index);
1255 v = vlib_node_runtime_update_main_loop_vector_stats (vm, rt, /* n_vectors */
1257 return v >> VLIB_LOG2_MAIN_LOOPS_PER_STATS_UPDATE;
1260 void vlib_frame_free (vlib_main_t *vm, vlib_frame_t *f);
1262 /* Return the edge index if present, ~0 otherwise */
1263 uword vlib_node_get_next (vlib_main_t * vm, uword node, uword next_node);
1265 /* Add next node to given node in given slot. */
1267 vlib_node_add_next_with_slot (vlib_main_t * vm,
1268 uword node, uword next_node, uword slot);
1270 /* As above but adds to end of node's next vector. */
1272 vlib_node_add_next (vlib_main_t * vm, uword node, uword next_node)
1274 return vlib_node_add_next_with_slot (vm, node, next_node, ~0);
1277 /* Add next node to given node in given slot. */
1279 vlib_node_add_named_next_with_slot (vlib_main_t * vm,
1280 uword node, char *next_name, uword slot);
1282 /* As above but adds to end of node's next vector. */
1284 vlib_node_add_named_next (vlib_main_t * vm, uword node, char *name)
1286 return vlib_node_add_named_next_with_slot (vm, node, name, ~0);
1293 vlib_node_get_nodes (vlib_main_t * vm, u32 max_threads, int include_stats,
1294 int barrier_sync, vlib_node_t **** node_dupsp,
1295 vlib_main_t *** stat_vmsp);
1297 /* Query node given name. */
1298 vlib_node_t *vlib_get_node_by_name (vlib_main_t * vm, u8 * name);
1300 /* Rename a node. */
1301 void vlib_node_rename (vlib_main_t * vm, u32 node_index, char *fmt, ...);
1303 /* Register new packet processing node. Nodes can be registered
1304 dynamically via this call or statically via the VLIB_REGISTER_NODE
1306 u32 vlib_register_node (vlib_main_t *vm, vlib_node_registration_t *r,
1309 /* Register all node function variants */
1310 void vlib_register_all_node_march_variants (vlib_main_t *vm);
1312 /* Register all static nodes registered via VLIB_REGISTER_NODE. */
1313 void vlib_register_all_static_nodes (vlib_main_t * vm);
1315 /* Start a process. */
1316 void vlib_start_process (vlib_main_t * vm, uword process_index);
1318 /* Sync up runtime and main node stats. */
1319 void vlib_node_sync_stats (vlib_main_t * vm, vlib_node_t * n);
1320 void vlib_node_runtime_sync_stats (vlib_main_t *vm, vlib_node_runtime_t *r,
1321 uword n_calls, uword n_vectors,
1323 void vlib_node_runtime_sync_stats_node (vlib_node_t *n, vlib_node_runtime_t *r,
1324 uword n_calls, uword n_vectors,
1327 /* Node graph initialization function. */
1328 clib_error_t *vlib_node_main_init (vlib_main_t * vm);
1330 format_function_t format_vlib_node_graph;
1331 format_function_t format_vlib_node_name;
1332 format_function_t format_vlib_next_node_name;
1333 format_function_t format_vlib_node_and_next;
1334 format_function_t format_vlib_cpu_time;
1335 format_function_t format_vlib_time;
1336 /* Parse node name -> node index. */
1337 unformat_function_t unformat_vlib_node;
1340 vlib_node_increment_counter (vlib_main_t * vm, u32 node_index,
1341 u32 counter_index, u64 increment)
1343 vlib_node_t *n = vlib_get_node (vm, node_index);
1344 vlib_error_main_t *em = &vm->error_main;
1345 u32 node_counter_base_index = n->error_heap_index;
1346 em->counters[node_counter_base_index + counter_index] += increment;
1349 /** @brief Create a vlib process
1350 * @param vm &vlib_global_main
1351 * @param f the process node function
1352 * @param log2_n_stack_bytes size of the process stack, defaults to 16K
1353 * @return newly-create node index
1354 * @warning call only on the main thread. Barrier sync required
1356 u32 vlib_process_create (vlib_main_t * vm, char *name,
1357 vlib_node_function_t * f, u32 log2_n_stack_bytes);
1360 vlib_node_set_dispatch_wrapper (vlib_main_t *vm, vlib_node_function_t *fn)
1362 if (fn && vm->dispatch_wrapper_fn)
1364 vm->dispatch_wrapper_fn = fn;
1368 int vlib_node_set_march_variant (vlib_main_t *vm, u32 node_index,
1369 clib_march_variant_type_t march_variant);
1371 vlib_node_function_t *
1372 vlib_node_get_preferred_node_fn_variant (vlib_main_t *vm,
1373 vlib_node_fn_registration_t *regs);
1376 * vlib_frame_bitmap functions
1379 #define VLIB_FRAME_BITMAP_N_UWORDS \
1380 (((VLIB_FRAME_SIZE + uword_bits - 1) & ~(uword_bits - 1)) / uword_bits)
1382 typedef uword vlib_frame_bitmap_t[VLIB_FRAME_BITMAP_N_UWORDS];
1384 static_always_inline void
1385 vlib_frame_bitmap_init (uword *bmp, u32 n_first_bits_set)
1387 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1388 while (n_first_bits_set >= (sizeof (uword) * 8) && n_left)
1391 n_first_bits_set -= sizeof (uword) * 8;
1395 if (n_first_bits_set && n_left)
1397 bmp++[0] = pow2_mask (n_first_bits_set);
1405 static_always_inline void
1406 vlib_frame_bitmap_clear (uword *bmp)
1408 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1413 static_always_inline void
1414 vlib_frame_bitmap_xor (uword *bmp, uword *bmp2)
1416 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1418 bmp++[0] ^= bmp2++[0];
1421 static_always_inline void
1422 vlib_frame_bitmap_or (uword *bmp, uword *bmp2)
1424 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1426 bmp++[0] |= bmp2++[0];
1429 static_always_inline void
1430 vlib_frame_bitmap_and (uword *bmp, uword *bmp2)
1432 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1434 bmp++[0] &= bmp2++[0];
1437 static_always_inline u32
1438 vlib_frame_bitmap_count_set_bits (uword *bmp)
1440 u32 n_left = VLIB_FRAME_BITMAP_N_UWORDS;
1443 count += count_set_bits (bmp++[0]);
1447 static_always_inline uword
1448 vlib_frame_bitmap_is_bit_set (uword *bmp, uword bit_index)
1450 bmp += bit_index / uword_bits;
1451 bit_index %= uword_bits;
1452 return (bmp[0] >> bit_index) & 1;
1455 static_always_inline int
1456 vlib_frame_bitmap_find_first_set (uword *bmp)
1461 ASSERT (b - bmp < VLIB_FRAME_BITMAP_N_UWORDS);
1465 return (b - bmp) * uword_bits + get_lowest_set_bit_index (b[0]);
1468 #define foreach_vlib_frame_bitmap_set_bit_index(i, v) \
1469 for (uword _off = 0; _off < ARRAY_LEN (v); _off++) \
1471 (v[_off]) + 0 * (uword) (i = _off * uword_bits + \
1472 get_lowest_set_bit_index (v[_off])); \
1473 _tmp; i = _off * uword_bits + get_lowest_set_bit_index ( \
1474 _tmp = clear_lowest_set_bit (_tmp)))
1476 #endif /* included_vlib_node_funcs_h */
1479 * fd.io coding-style-patch-verification: ON
1482 * eval: (c-set-style "gnu")