xref: /freebsd/sys/netgraph/ng_base.c (revision 39ee7a7a6bdd1557b1c3532abf60d139798ac88b)
1 /*-
2  * Copyright (c) 1996-1999 Whistle Communications, Inc.
3  * All rights reserved.
4  *
5  * Subject to the following obligations and disclaimer of warranty, use and
6  * redistribution of this software, in source or object code forms, with or
7  * without modifications are expressly permitted by Whistle Communications;
8  * provided, however, that:
9  * 1. Any and all reproductions of the source or object code must include the
10  *    copyright notice above and the following disclaimer of warranties; and
11  * 2. No rights are granted, in any manner or form, to use Whistle
12  *    Communications, Inc. trademarks, including the mark "WHISTLE
13  *    COMMUNICATIONS" on advertising, endorsements, or otherwise except as
14  *    such appears in the above copyright notice or in the software.
15  *
16  * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND
17  * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO
18  * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE,
19  * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF
20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT.
21  * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY
22  * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS
23  * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE.
24  * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES
25  * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING
26  * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
27  * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR
28  * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY
29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31  * THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY
32  * OF SUCH DAMAGE.
33  *
34  * Authors: Julian Elischer <julian@freebsd.org>
35  *          Archie Cobbs <archie@freebsd.org>
36  *
37  * $FreeBSD$
38  * $Whistle: ng_base.c,v 1.39 1999/01/28 23:54:53 julian Exp $
39  */
40 
41 /*
42  * This file implements the base netgraph code.
43  */
44 
45 #include <sys/param.h>
46 #include <sys/systm.h>
47 #include <sys/ctype.h>
48 #include <sys/hash.h>
49 #include <sys/kdb.h>
50 #include <sys/kernel.h>
51 #include <sys/kthread.h>
52 #include <sys/ktr.h>
53 #include <sys/limits.h>
54 #include <sys/lock.h>
55 #include <sys/malloc.h>
56 #include <sys/mbuf.h>
57 #include <sys/proc.h>
58 #include <sys/queue.h>
59 #include <sys/refcount.h>
60 #include <sys/rwlock.h>
61 #include <sys/smp.h>
62 #include <sys/sysctl.h>
63 #include <sys/syslog.h>
64 #include <sys/unistd.h>
65 #include <machine/cpu.h>
66 
67 #include <net/netisr.h>
68 #include <net/vnet.h>
69 
70 #include <netgraph/ng_message.h>
71 #include <netgraph/netgraph.h>
72 #include <netgraph/ng_parse.h>
73 
74 MODULE_VERSION(netgraph, NG_ABI_VERSION);
75 
76 /* Mutex to protect topology events. */
77 static struct rwlock	ng_topo_lock;
78 #define	TOPOLOGY_RLOCK()	rw_rlock(&ng_topo_lock)
79 #define	TOPOLOGY_RUNLOCK()	rw_runlock(&ng_topo_lock)
80 #define	TOPOLOGY_WLOCK()	rw_wlock(&ng_topo_lock)
81 #define	TOPOLOGY_WUNLOCK()	rw_wunlock(&ng_topo_lock)
82 #define	TOPOLOGY_NOTOWNED()	rw_assert(&ng_topo_lock, RA_UNLOCKED)
83 
84 #ifdef	NETGRAPH_DEBUG
85 static struct mtx	ng_nodelist_mtx; /* protects global node/hook lists */
86 static struct mtx	ngq_mtx;	/* protects the queue item list */
87 
88 static SLIST_HEAD(, ng_node) ng_allnodes;
89 static LIST_HEAD(, ng_node) ng_freenodes; /* in debug, we never free() them */
90 static SLIST_HEAD(, ng_hook) ng_allhooks;
91 static LIST_HEAD(, ng_hook) ng_freehooks; /* in debug, we never free() them */
92 
93 static void ng_dumpitems(void);
94 static void ng_dumpnodes(void);
95 static void ng_dumphooks(void);
96 
97 #endif	/* NETGRAPH_DEBUG */
98 /*
99  * DEAD versions of the structures.
100  * In order to avoid races, it is sometimes necessary to point
101  * at SOMETHING even though theoretically, the current entity is
102  * INVALID. Use these to avoid these races.
103  */
104 struct ng_type ng_deadtype = {
105 	NG_ABI_VERSION,
106 	"dead",
107 	NULL,	/* modevent */
108 	NULL,	/* constructor */
109 	NULL,	/* rcvmsg */
110 	NULL,	/* shutdown */
111 	NULL,	/* newhook */
112 	NULL,	/* findhook */
113 	NULL,	/* connect */
114 	NULL,	/* rcvdata */
115 	NULL,	/* disconnect */
116 	NULL, 	/* cmdlist */
117 };
118 
119 struct ng_node ng_deadnode = {
120 	"dead",
121 	&ng_deadtype,
122 	NGF_INVALID,
123 	0,	/* numhooks */
124 	NULL,	/* private */
125 	0,	/* ID */
126 	LIST_HEAD_INITIALIZER(ng_deadnode.nd_hooks),
127 	{},	/* all_nodes list entry */
128 	{},	/* id hashtable list entry */
129 	{	0,
130 		0,
131 		{}, /* should never use! (should hang) */
132 		{}, /* workqueue entry */
133 		STAILQ_HEAD_INITIALIZER(ng_deadnode.nd_input_queue.queue),
134 	},
135 	1,	/* refs */
136 	NULL,	/* vnet */
137 #ifdef	NETGRAPH_DEBUG
138 	ND_MAGIC,
139 	__FILE__,
140 	__LINE__,
141 	{NULL}
142 #endif	/* NETGRAPH_DEBUG */
143 };
144 
145 struct ng_hook ng_deadhook = {
146 	"dead",
147 	NULL,		/* private */
148 	HK_INVALID | HK_DEAD,
149 	0,		/* undefined data link type */
150 	&ng_deadhook,	/* Peer is self */
151 	&ng_deadnode,	/* attached to deadnode */
152 	{},		/* hooks list */
153 	NULL,		/* override rcvmsg() */
154 	NULL,		/* override rcvdata() */
155 	1,		/* refs always >= 1 */
156 #ifdef	NETGRAPH_DEBUG
157 	HK_MAGIC,
158 	__FILE__,
159 	__LINE__,
160 	{NULL}
161 #endif	/* NETGRAPH_DEBUG */
162 };
163 
164 /*
165  * END DEAD STRUCTURES
166  */
167 /* List nodes with unallocated work */
168 static STAILQ_HEAD(, ng_node) ng_worklist = STAILQ_HEAD_INITIALIZER(ng_worklist);
169 static struct mtx	ng_worklist_mtx;   /* MUST LOCK NODE FIRST */
170 
171 /* List of installed types */
172 static LIST_HEAD(, ng_type) ng_typelist;
173 static struct rwlock	ng_typelist_lock;
174 #define	TYPELIST_RLOCK()	rw_rlock(&ng_typelist_lock)
175 #define	TYPELIST_RUNLOCK()	rw_runlock(&ng_typelist_lock)
176 #define	TYPELIST_WLOCK()	rw_wlock(&ng_typelist_lock)
177 #define	TYPELIST_WUNLOCK()	rw_wunlock(&ng_typelist_lock)
178 
179 /* Hash related definitions. */
180 LIST_HEAD(nodehash, ng_node);
181 static VNET_DEFINE(struct nodehash *, ng_ID_hash);
182 static VNET_DEFINE(u_long, ng_ID_hmask);
183 static VNET_DEFINE(u_long, ng_nodes);
184 static VNET_DEFINE(struct nodehash *, ng_name_hash);
185 static VNET_DEFINE(u_long, ng_name_hmask);
186 static VNET_DEFINE(u_long, ng_named_nodes);
187 #define	V_ng_ID_hash		VNET(ng_ID_hash)
188 #define	V_ng_ID_hmask		VNET(ng_ID_hmask)
189 #define	V_ng_nodes		VNET(ng_nodes)
190 #define	V_ng_name_hash		VNET(ng_name_hash)
191 #define	V_ng_name_hmask		VNET(ng_name_hmask)
192 #define	V_ng_named_nodes	VNET(ng_named_nodes)
193 
194 static struct rwlock	ng_idhash_lock;
195 #define	IDHASH_RLOCK()		rw_rlock(&ng_idhash_lock)
196 #define	IDHASH_RUNLOCK()	rw_runlock(&ng_idhash_lock)
197 #define	IDHASH_WLOCK()		rw_wlock(&ng_idhash_lock)
198 #define	IDHASH_WUNLOCK()	rw_wunlock(&ng_idhash_lock)
199 
200 /* Method to find a node.. used twice so do it here */
201 #define NG_IDHASH_FN(ID) ((ID) % (V_ng_ID_hmask + 1))
202 #define NG_IDHASH_FIND(ID, node)					\
203 	do { 								\
204 		rw_assert(&ng_idhash_lock, RA_LOCKED);			\
205 		LIST_FOREACH(node, &V_ng_ID_hash[NG_IDHASH_FN(ID)],	\
206 						nd_idnodes) {		\
207 			if (NG_NODE_IS_VALID(node)			\
208 			&& (NG_NODE_ID(node) == ID)) {			\
209 				break;					\
210 			}						\
211 		}							\
212 	} while (0)
213 
214 static struct rwlock	ng_namehash_lock;
215 #define	NAMEHASH_RLOCK()	rw_rlock(&ng_namehash_lock)
216 #define	NAMEHASH_RUNLOCK()	rw_runlock(&ng_namehash_lock)
217 #define	NAMEHASH_WLOCK()	rw_wlock(&ng_namehash_lock)
218 #define	NAMEHASH_WUNLOCK()	rw_wunlock(&ng_namehash_lock)
219 
220 /* Internal functions */
221 static int	ng_add_hook(node_p node, const char *name, hook_p * hookp);
222 static int	ng_generic_msg(node_p here, item_p item, hook_p lasthook);
223 static ng_ID_t	ng_decodeidname(const char *name);
224 static int	ngb_mod_event(module_t mod, int event, void *data);
225 static void	ng_worklist_add(node_p node);
226 static void	ngthread(void *);
227 static int	ng_apply_item(node_p node, item_p item, int rw);
228 static void	ng_flush_input_queue(node_p node);
229 static node_p	ng_ID2noderef(ng_ID_t ID);
230 static int	ng_con_nodes(item_p item, node_p node, const char *name,
231 		    node_p node2, const char *name2);
232 static int	ng_con_part2(node_p node, item_p item, hook_p hook);
233 static int	ng_con_part3(node_p node, item_p item, hook_p hook);
234 static int	ng_mkpeer(node_p node, const char *name, const char *name2,
235 		    char *type);
236 static void	ng_name_rehash(void);
237 static void	ng_ID_rehash(void);
238 
239 /* Imported, these used to be externally visible, some may go back. */
240 void	ng_destroy_hook(hook_p hook);
241 int	ng_path2noderef(node_p here, const char *path,
242 	node_p *dest, hook_p *lasthook);
243 int	ng_make_node(const char *type, node_p *nodepp);
244 int	ng_path_parse(char *addr, char **node, char **path, char **hook);
245 void	ng_rmnode(node_p node, hook_p dummy1, void *dummy2, int dummy3);
246 void	ng_unname(node_p node);
247 
248 /* Our own netgraph malloc type */
249 MALLOC_DEFINE(M_NETGRAPH, "netgraph", "netgraph structures and ctrl messages");
250 MALLOC_DEFINE(M_NETGRAPH_MSG, "netgraph_msg", "netgraph name storage");
251 static MALLOC_DEFINE(M_NETGRAPH_HOOK, "netgraph_hook",
252     "netgraph hook structures");
253 static MALLOC_DEFINE(M_NETGRAPH_NODE, "netgraph_node",
254     "netgraph node structures");
255 static MALLOC_DEFINE(M_NETGRAPH_ITEM, "netgraph_item",
256     "netgraph item structures");
257 
258 /* Should not be visible outside this file */
259 
260 #define _NG_ALLOC_HOOK(hook) \
261 	hook = malloc(sizeof(*hook), M_NETGRAPH_HOOK, M_NOWAIT | M_ZERO)
262 #define _NG_ALLOC_NODE(node) \
263 	node = malloc(sizeof(*node), M_NETGRAPH_NODE, M_NOWAIT | M_ZERO)
264 
265 #define	NG_QUEUE_LOCK_INIT(n)			\
266 	mtx_init(&(n)->q_mtx, "ng_node", NULL, MTX_DEF)
267 #define	NG_QUEUE_LOCK(n)			\
268 	mtx_lock(&(n)->q_mtx)
269 #define	NG_QUEUE_UNLOCK(n)			\
270 	mtx_unlock(&(n)->q_mtx)
271 #define	NG_WORKLIST_LOCK_INIT()			\
272 	mtx_init(&ng_worklist_mtx, "ng_worklist", NULL, MTX_DEF)
273 #define	NG_WORKLIST_LOCK()			\
274 	mtx_lock(&ng_worklist_mtx)
275 #define	NG_WORKLIST_UNLOCK()			\
276 	mtx_unlock(&ng_worklist_mtx)
277 #define	NG_WORKLIST_SLEEP()			\
278 	mtx_sleep(&ng_worklist, &ng_worklist_mtx, PI_NET, "sleep", 0)
279 #define	NG_WORKLIST_WAKEUP()			\
280 	wakeup_one(&ng_worklist)
281 
282 #ifdef NETGRAPH_DEBUG /*----------------------------------------------*/
283 /*
284  * In debug mode:
285  * In an attempt to help track reference count screwups
286  * we do not free objects back to the malloc system, but keep them
287  * in a local cache where we can examine them and keep information safely
288  * after they have been freed.
289  * We use this scheme for nodes and hooks, and to some extent for items.
290  */
291 static __inline hook_p
292 ng_alloc_hook(void)
293 {
294 	hook_p hook;
295 	SLIST_ENTRY(ng_hook) temp;
296 	mtx_lock(&ng_nodelist_mtx);
297 	hook = LIST_FIRST(&ng_freehooks);
298 	if (hook) {
299 		LIST_REMOVE(hook, hk_hooks);
300 		bcopy(&hook->hk_all, &temp, sizeof(temp));
301 		bzero(hook, sizeof(struct ng_hook));
302 		bcopy(&temp, &hook->hk_all, sizeof(temp));
303 		mtx_unlock(&ng_nodelist_mtx);
304 		hook->hk_magic = HK_MAGIC;
305 	} else {
306 		mtx_unlock(&ng_nodelist_mtx);
307 		_NG_ALLOC_HOOK(hook);
308 		if (hook) {
309 			hook->hk_magic = HK_MAGIC;
310 			mtx_lock(&ng_nodelist_mtx);
311 			SLIST_INSERT_HEAD(&ng_allhooks, hook, hk_all);
312 			mtx_unlock(&ng_nodelist_mtx);
313 		}
314 	}
315 	return (hook);
316 }
317 
318 static __inline node_p
319 ng_alloc_node(void)
320 {
321 	node_p node;
322 	SLIST_ENTRY(ng_node) temp;
323 	mtx_lock(&ng_nodelist_mtx);
324 	node = LIST_FIRST(&ng_freenodes);
325 	if (node) {
326 		LIST_REMOVE(node, nd_nodes);
327 		bcopy(&node->nd_all, &temp, sizeof(temp));
328 		bzero(node, sizeof(struct ng_node));
329 		bcopy(&temp, &node->nd_all, sizeof(temp));
330 		mtx_unlock(&ng_nodelist_mtx);
331 		node->nd_magic = ND_MAGIC;
332 	} else {
333 		mtx_unlock(&ng_nodelist_mtx);
334 		_NG_ALLOC_NODE(node);
335 		if (node) {
336 			node->nd_magic = ND_MAGIC;
337 			mtx_lock(&ng_nodelist_mtx);
338 			SLIST_INSERT_HEAD(&ng_allnodes, node, nd_all);
339 			mtx_unlock(&ng_nodelist_mtx);
340 		}
341 	}
342 	return (node);
343 }
344 
345 #define NG_ALLOC_HOOK(hook) do { (hook) = ng_alloc_hook(); } while (0)
346 #define NG_ALLOC_NODE(node) do { (node) = ng_alloc_node(); } while (0)
347 
348 #define NG_FREE_HOOK(hook)						\
349 	do {								\
350 		mtx_lock(&ng_nodelist_mtx);				\
351 		LIST_INSERT_HEAD(&ng_freehooks, hook, hk_hooks);	\
352 		hook->hk_magic = 0;					\
353 		mtx_unlock(&ng_nodelist_mtx);				\
354 	} while (0)
355 
356 #define NG_FREE_NODE(node)						\
357 	do {								\
358 		mtx_lock(&ng_nodelist_mtx);				\
359 		LIST_INSERT_HEAD(&ng_freenodes, node, nd_nodes);	\
360 		node->nd_magic = 0;					\
361 		mtx_unlock(&ng_nodelist_mtx);				\
362 	} while (0)
363 
364 #else /* NETGRAPH_DEBUG */ /*----------------------------------------------*/
365 
366 #define NG_ALLOC_HOOK(hook) _NG_ALLOC_HOOK(hook)
367 #define NG_ALLOC_NODE(node) _NG_ALLOC_NODE(node)
368 
369 #define NG_FREE_HOOK(hook) do { free((hook), M_NETGRAPH_HOOK); } while (0)
370 #define NG_FREE_NODE(node) do { free((node), M_NETGRAPH_NODE); } while (0)
371 
372 #endif /* NETGRAPH_DEBUG */ /*----------------------------------------------*/
373 
374 /* Set this to kdb_enter("X") to catch all errors as they occur */
375 #ifndef TRAP_ERROR
376 #define TRAP_ERROR()
377 #endif
378 
379 static VNET_DEFINE(ng_ID_t, nextID) = 1;
380 #define	V_nextID			VNET(nextID)
381 
382 #ifdef INVARIANTS
383 #define CHECK_DATA_MBUF(m)	do {					\
384 		struct mbuf *n;						\
385 		int total;						\
386 									\
387 		M_ASSERTPKTHDR(m);					\
388 		for (total = 0, n = (m); n != NULL; n = n->m_next) {	\
389 			total += n->m_len;				\
390 			if (n->m_nextpkt != NULL)			\
391 				panic("%s: m_nextpkt", __func__);	\
392 		}							\
393 									\
394 		if ((m)->m_pkthdr.len != total) {			\
395 			panic("%s: %d != %d",				\
396 			    __func__, (m)->m_pkthdr.len, total);	\
397 		}							\
398 	} while (0)
399 #else
400 #define CHECK_DATA_MBUF(m)
401 #endif
402 
403 #define ERROUT(x)	do { error = (x); goto done; } while (0)
404 
405 /************************************************************************
406 	Parse type definitions for generic messages
407 ************************************************************************/
408 
409 /* Handy structure parse type defining macro */
410 #define DEFINE_PARSE_STRUCT_TYPE(lo, up, args)				\
411 static const struct ng_parse_struct_field				\
412 	ng_ ## lo ## _type_fields[] = NG_GENERIC_ ## up ## _INFO args;	\
413 static const struct ng_parse_type ng_generic_ ## lo ## _type = {	\
414 	&ng_parse_struct_type,						\
415 	&ng_ ## lo ## _type_fields					\
416 }
417 
418 DEFINE_PARSE_STRUCT_TYPE(mkpeer, MKPEER, ());
419 DEFINE_PARSE_STRUCT_TYPE(connect, CONNECT, ());
420 DEFINE_PARSE_STRUCT_TYPE(name, NAME, ());
421 DEFINE_PARSE_STRUCT_TYPE(rmhook, RMHOOK, ());
422 DEFINE_PARSE_STRUCT_TYPE(nodeinfo, NODEINFO, ());
423 DEFINE_PARSE_STRUCT_TYPE(typeinfo, TYPEINFO, ());
424 DEFINE_PARSE_STRUCT_TYPE(linkinfo, LINKINFO, (&ng_generic_nodeinfo_type));
425 
426 /* Get length of an array when the length is stored as a 32 bit
427    value immediately preceding the array -- as with struct namelist
428    and struct typelist. */
429 static int
430 ng_generic_list_getLength(const struct ng_parse_type *type,
431 	const u_char *start, const u_char *buf)
432 {
433 	return *((const u_int32_t *)(buf - 4));
434 }
435 
436 /* Get length of the array of struct linkinfo inside a struct hooklist */
437 static int
438 ng_generic_linkinfo_getLength(const struct ng_parse_type *type,
439 	const u_char *start, const u_char *buf)
440 {
441 	const struct hooklist *hl = (const struct hooklist *)start;
442 
443 	return hl->nodeinfo.hooks;
444 }
445 
446 /* Array type for a variable length array of struct namelist */
447 static const struct ng_parse_array_info ng_nodeinfoarray_type_info = {
448 	&ng_generic_nodeinfo_type,
449 	&ng_generic_list_getLength
450 };
451 static const struct ng_parse_type ng_generic_nodeinfoarray_type = {
452 	&ng_parse_array_type,
453 	&ng_nodeinfoarray_type_info
454 };
455 
456 /* Array type for a variable length array of struct typelist */
457 static const struct ng_parse_array_info ng_typeinfoarray_type_info = {
458 	&ng_generic_typeinfo_type,
459 	&ng_generic_list_getLength
460 };
461 static const struct ng_parse_type ng_generic_typeinfoarray_type = {
462 	&ng_parse_array_type,
463 	&ng_typeinfoarray_type_info
464 };
465 
466 /* Array type for array of struct linkinfo in struct hooklist */
467 static const struct ng_parse_array_info ng_generic_linkinfo_array_type_info = {
468 	&ng_generic_linkinfo_type,
469 	&ng_generic_linkinfo_getLength
470 };
471 static const struct ng_parse_type ng_generic_linkinfo_array_type = {
472 	&ng_parse_array_type,
473 	&ng_generic_linkinfo_array_type_info
474 };
475 
476 DEFINE_PARSE_STRUCT_TYPE(typelist, TYPELIST, (&ng_generic_typeinfoarray_type));
477 DEFINE_PARSE_STRUCT_TYPE(hooklist, HOOKLIST,
478 	(&ng_generic_nodeinfo_type, &ng_generic_linkinfo_array_type));
479 DEFINE_PARSE_STRUCT_TYPE(listnodes, LISTNODES,
480 	(&ng_generic_nodeinfoarray_type));
481 
482 /* List of commands and how to convert arguments to/from ASCII */
483 static const struct ng_cmdlist ng_generic_cmds[] = {
484 	{
485 	  NGM_GENERIC_COOKIE,
486 	  NGM_SHUTDOWN,
487 	  "shutdown",
488 	  NULL,
489 	  NULL
490 	},
491 	{
492 	  NGM_GENERIC_COOKIE,
493 	  NGM_MKPEER,
494 	  "mkpeer",
495 	  &ng_generic_mkpeer_type,
496 	  NULL
497 	},
498 	{
499 	  NGM_GENERIC_COOKIE,
500 	  NGM_CONNECT,
501 	  "connect",
502 	  &ng_generic_connect_type,
503 	  NULL
504 	},
505 	{
506 	  NGM_GENERIC_COOKIE,
507 	  NGM_NAME,
508 	  "name",
509 	  &ng_generic_name_type,
510 	  NULL
511 	},
512 	{
513 	  NGM_GENERIC_COOKIE,
514 	  NGM_RMHOOK,
515 	  "rmhook",
516 	  &ng_generic_rmhook_type,
517 	  NULL
518 	},
519 	{
520 	  NGM_GENERIC_COOKIE,
521 	  NGM_NODEINFO,
522 	  "nodeinfo",
523 	  NULL,
524 	  &ng_generic_nodeinfo_type
525 	},
526 	{
527 	  NGM_GENERIC_COOKIE,
528 	  NGM_LISTHOOKS,
529 	  "listhooks",
530 	  NULL,
531 	  &ng_generic_hooklist_type
532 	},
533 	{
534 	  NGM_GENERIC_COOKIE,
535 	  NGM_LISTNAMES,
536 	  "listnames",
537 	  NULL,
538 	  &ng_generic_listnodes_type	/* same as NGM_LISTNODES */
539 	},
540 	{
541 	  NGM_GENERIC_COOKIE,
542 	  NGM_LISTNODES,
543 	  "listnodes",
544 	  NULL,
545 	  &ng_generic_listnodes_type
546 	},
547 	{
548 	  NGM_GENERIC_COOKIE,
549 	  NGM_LISTTYPES,
550 	  "listtypes",
551 	  NULL,
552 	  &ng_generic_typelist_type
553 	},
554 	{
555 	  NGM_GENERIC_COOKIE,
556 	  NGM_TEXT_CONFIG,
557 	  "textconfig",
558 	  NULL,
559 	  &ng_parse_string_type
560 	},
561 	{
562 	  NGM_GENERIC_COOKIE,
563 	  NGM_TEXT_STATUS,
564 	  "textstatus",
565 	  NULL,
566 	  &ng_parse_string_type
567 	},
568 	{
569 	  NGM_GENERIC_COOKIE,
570 	  NGM_ASCII2BINARY,
571 	  "ascii2binary",
572 	  &ng_parse_ng_mesg_type,
573 	  &ng_parse_ng_mesg_type
574 	},
575 	{
576 	  NGM_GENERIC_COOKIE,
577 	  NGM_BINARY2ASCII,
578 	  "binary2ascii",
579 	  &ng_parse_ng_mesg_type,
580 	  &ng_parse_ng_mesg_type
581 	},
582 	{ 0 }
583 };
584 
585 /************************************************************************
586 			Node routines
587 ************************************************************************/
588 
589 /*
590  * Instantiate a node of the requested type
591  */
592 int
593 ng_make_node(const char *typename, node_p *nodepp)
594 {
595 	struct ng_type *type;
596 	int	error;
597 
598 	/* Check that the type makes sense */
599 	if (typename == NULL) {
600 		TRAP_ERROR();
601 		return (EINVAL);
602 	}
603 
604 	/* Locate the node type. If we fail we return. Do not try to load
605 	 * module.
606 	 */
607 	if ((type = ng_findtype(typename)) == NULL)
608 		return (ENXIO);
609 
610 	/*
611 	 * If we have a constructor, then make the node and
612 	 * call the constructor to do type specific initialisation.
613 	 */
614 	if (type->constructor != NULL) {
615 		if ((error = ng_make_node_common(type, nodepp)) == 0) {
616 			if ((error = ((*type->constructor)(*nodepp))) != 0) {
617 				NG_NODE_UNREF(*nodepp);
618 			}
619 		}
620 	} else {
621 		/*
622 		 * Node has no constructor. We cannot ask for one
623 		 * to be made. It must be brought into existence by
624 		 * some external agency. The external agency should
625 		 * call ng_make_node_common() directly to get the
626 		 * netgraph part initialised.
627 		 */
628 		TRAP_ERROR();
629 		error = EINVAL;
630 	}
631 	return (error);
632 }
633 
634 /*
635  * Generic node creation. Called by node initialisation for externally
636  * instantiated nodes (e.g. hardware, sockets, etc ).
637  * The returned node has a reference count of 1.
638  */
639 int
640 ng_make_node_common(struct ng_type *type, node_p *nodepp)
641 {
642 	node_p node;
643 
644 	/* Require the node type to have been already installed */
645 	if (ng_findtype(type->name) == NULL) {
646 		TRAP_ERROR();
647 		return (EINVAL);
648 	}
649 
650 	/* Make a node and try attach it to the type */
651 	NG_ALLOC_NODE(node);
652 	if (node == NULL) {
653 		TRAP_ERROR();
654 		return (ENOMEM);
655 	}
656 	node->nd_type = type;
657 #ifdef VIMAGE
658 	node->nd_vnet = curvnet;
659 #endif
660 	NG_NODE_REF(node);				/* note reference */
661 	type->refs++;
662 
663 	NG_QUEUE_LOCK_INIT(&node->nd_input_queue);
664 	STAILQ_INIT(&node->nd_input_queue.queue);
665 	node->nd_input_queue.q_flags = 0;
666 
667 	/* Initialize hook list for new node */
668 	LIST_INIT(&node->nd_hooks);
669 
670 	/* Get an ID and put us in the hash chain. */
671 	IDHASH_WLOCK();
672 	for (;;) { /* wrap protection, even if silly */
673 		node_p node2 = NULL;
674 		node->nd_ID = V_nextID++; /* 137/sec for 1 year before wrap */
675 
676 		/* Is there a problem with the new number? */
677 		NG_IDHASH_FIND(node->nd_ID, node2); /* already taken? */
678 		if ((node->nd_ID != 0) && (node2 == NULL)) {
679 			break;
680 		}
681 	}
682 	V_ng_nodes++;
683 	if (V_ng_nodes * 2 > V_ng_ID_hmask)
684 		ng_ID_rehash();
685 	LIST_INSERT_HEAD(&V_ng_ID_hash[NG_IDHASH_FN(node->nd_ID)], node,
686 	    nd_idnodes);
687 	IDHASH_WUNLOCK();
688 
689 	/* Done */
690 	*nodepp = node;
691 	return (0);
692 }
693 
694 /*
695  * Forceably start the shutdown process on a node. Either call
696  * its shutdown method, or do the default shutdown if there is
697  * no type-specific method.
698  *
699  * We can only be called from a shutdown message, so we know we have
700  * a writer lock, and therefore exclusive access. It also means
701  * that we should not be on the work queue, but we check anyhow.
702  *
703  * Persistent node types must have a type-specific method which
704  * allocates a new node in which case, this one is irretrievably going away,
705  * or cleans up anything it needs, and just makes the node valid again,
706  * in which case we allow the node to survive.
707  *
708  * XXX We need to think of how to tell a persistent node that we
709  * REALLY need to go away because the hardware has gone or we
710  * are rebooting.... etc.
711  */
712 void
713 ng_rmnode(node_p node, hook_p dummy1, void *dummy2, int dummy3)
714 {
715 	hook_p hook;
716 
717 	/* Check if it's already shutting down */
718 	if ((node->nd_flags & NGF_CLOSING) != 0)
719 		return;
720 
721 	if (node == &ng_deadnode) {
722 		printf ("shutdown called on deadnode\n");
723 		return;
724 	}
725 
726 	/* Add an extra reference so it doesn't go away during this */
727 	NG_NODE_REF(node);
728 
729 	/*
730 	 * Mark it invalid so any newcomers know not to try use it
731 	 * Also add our own mark so we can't recurse
732 	 * note that NGF_INVALID does not do this as it's also set during
733 	 * creation
734 	 */
735 	node->nd_flags |= NGF_INVALID|NGF_CLOSING;
736 
737 	/* If node has its pre-shutdown method, then call it first*/
738 	if (node->nd_type && node->nd_type->close)
739 		(*node->nd_type->close)(node);
740 
741 	/* Notify all remaining connected nodes to disconnect */
742 	while ((hook = LIST_FIRST(&node->nd_hooks)) != NULL)
743 		ng_destroy_hook(hook);
744 
745 	/*
746 	 * Drain the input queue forceably.
747 	 * it has no hooks so what's it going to do, bleed on someone?
748 	 * Theoretically we came here from a queue entry that was added
749 	 * Just before the queue was closed, so it should be empty anyway.
750 	 * Also removes us from worklist if needed.
751 	 */
752 	ng_flush_input_queue(node);
753 
754 	/* Ask the type if it has anything to do in this case */
755 	if (node->nd_type && node->nd_type->shutdown) {
756 		(*node->nd_type->shutdown)(node);
757 		if (NG_NODE_IS_VALID(node)) {
758 			/*
759 			 * Well, blow me down if the node code hasn't declared
760 			 * that it doesn't want to die.
761 			 * Presumably it is a persistant node.
762 			 * If we REALLY want it to go away,
763 			 *  e.g. hardware going away,
764 			 * Our caller should set NGF_REALLY_DIE in nd_flags.
765 			 */
766 			node->nd_flags &= ~(NGF_INVALID|NGF_CLOSING);
767 			NG_NODE_UNREF(node); /* Assume they still have theirs */
768 			return;
769 		}
770 	} else {				/* do the default thing */
771 		NG_NODE_UNREF(node);
772 	}
773 
774 	ng_unname(node); /* basically a NOP these days */
775 
776 	/*
777 	 * Remove extra reference, possibly the last
778 	 * Possible other holders of references may include
779 	 * timeout callouts, but theoretically the node's supposed to
780 	 * have cancelled them. Possibly hardware dependencies may
781 	 * force a driver to 'linger' with a reference.
782 	 */
783 	NG_NODE_UNREF(node);
784 }
785 
786 /*
787  * Remove a reference to the node, possibly the last.
788  * deadnode always acts as it it were the last.
789  */
790 void
791 ng_unref_node(node_p node)
792 {
793 
794 	if (node == &ng_deadnode)
795 		return;
796 
797 	CURVNET_SET(node->nd_vnet);
798 
799 	if (refcount_release(&node->nd_refs)) { /* we were the last */
800 
801 		node->nd_type->refs--; /* XXX maybe should get types lock? */
802 		NAMEHASH_WLOCK();
803 		if (NG_NODE_HAS_NAME(node)) {
804 			V_ng_named_nodes--;
805 			LIST_REMOVE(node, nd_nodes);
806 		}
807 		NAMEHASH_WUNLOCK();
808 
809 		IDHASH_WLOCK();
810 		V_ng_nodes--;
811 		LIST_REMOVE(node, nd_idnodes);
812 		IDHASH_WUNLOCK();
813 
814 		mtx_destroy(&node->nd_input_queue.q_mtx);
815 		NG_FREE_NODE(node);
816 	}
817 	CURVNET_RESTORE();
818 }
819 
820 /************************************************************************
821 			Node ID handling
822 ************************************************************************/
823 static node_p
824 ng_ID2noderef(ng_ID_t ID)
825 {
826 	node_p node;
827 
828 	IDHASH_RLOCK();
829 	NG_IDHASH_FIND(ID, node);
830 	if (node)
831 		NG_NODE_REF(node);
832 	IDHASH_RUNLOCK();
833 	return(node);
834 }
835 
836 ng_ID_t
837 ng_node2ID(node_p node)
838 {
839 	return (node ? NG_NODE_ID(node) : 0);
840 }
841 
842 /************************************************************************
843 			Node name handling
844 ************************************************************************/
845 
846 /*
847  * Assign a node a name.
848  */
849 int
850 ng_name_node(node_p node, const char *name)
851 {
852 	uint32_t hash;
853 	node_p node2;
854 	int i;
855 
856 	/* Check the name is valid */
857 	for (i = 0; i < NG_NODESIZ; i++) {
858 		if (name[i] == '\0' || name[i] == '.' || name[i] == ':')
859 			break;
860 	}
861 	if (i == 0 || name[i] != '\0') {
862 		TRAP_ERROR();
863 		return (EINVAL);
864 	}
865 	if (ng_decodeidname(name) != 0) { /* valid IDs not allowed here */
866 		TRAP_ERROR();
867 		return (EINVAL);
868 	}
869 
870 	NAMEHASH_WLOCK();
871 	if (V_ng_named_nodes * 2 > V_ng_name_hmask)
872 		ng_name_rehash();
873 
874 	hash = hash32_str(name, HASHINIT) & V_ng_name_hmask;
875 	/* Check the name isn't already being used. */
876 	LIST_FOREACH(node2, &V_ng_name_hash[hash], nd_nodes)
877 		if (NG_NODE_IS_VALID(node2) &&
878 		    (strcmp(NG_NODE_NAME(node2), name) == 0)) {
879 			NAMEHASH_WUNLOCK();
880 			return (EADDRINUSE);
881 		}
882 
883 	if (NG_NODE_HAS_NAME(node))
884 		LIST_REMOVE(node, nd_nodes);
885 	else
886 		V_ng_named_nodes++;
887 	/* Copy it. */
888 	strlcpy(NG_NODE_NAME(node), name, NG_NODESIZ);
889 	/* Update name hash. */
890 	LIST_INSERT_HEAD(&V_ng_name_hash[hash], node, nd_nodes);
891 	NAMEHASH_WUNLOCK();
892 
893 	return (0);
894 }
895 
896 /*
897  * Find a node by absolute name. The name should NOT end with ':'
898  * The name "." means "this node" and "[xxx]" means "the node
899  * with ID (ie, at address) xxx".
900  *
901  * Returns the node if found, else NULL.
902  * Eventually should add something faster than a sequential search.
903  * Note it acquires a reference on the node so you can be sure it's still
904  * there.
905  */
906 node_p
907 ng_name2noderef(node_p here, const char *name)
908 {
909 	node_p node;
910 	ng_ID_t temp;
911 	int	hash;
912 
913 	/* "." means "this node" */
914 	if (strcmp(name, ".") == 0) {
915 		NG_NODE_REF(here);
916 		return(here);
917 	}
918 
919 	/* Check for name-by-ID */
920 	if ((temp = ng_decodeidname(name)) != 0) {
921 		return (ng_ID2noderef(temp));
922 	}
923 
924 	/* Find node by name. */
925 	hash = hash32_str(name, HASHINIT) & V_ng_name_hmask;
926 	NAMEHASH_RLOCK();
927 	LIST_FOREACH(node, &V_ng_name_hash[hash], nd_nodes)
928 		if (NG_NODE_IS_VALID(node) &&
929 		    (strcmp(NG_NODE_NAME(node), name) == 0)) {
930 			NG_NODE_REF(node);
931 			break;
932 		}
933 	NAMEHASH_RUNLOCK();
934 
935 	return (node);
936 }
937 
938 /*
939  * Decode an ID name, eg. "[f03034de]". Returns 0 if the
940  * string is not valid, otherwise returns the value.
941  */
942 static ng_ID_t
943 ng_decodeidname(const char *name)
944 {
945 	const int len = strlen(name);
946 	char *eptr;
947 	u_long val;
948 
949 	/* Check for proper length, brackets, no leading junk */
950 	if ((len < 3) || (name[0] != '[') || (name[len - 1] != ']') ||
951 	    (!isxdigit(name[1])))
952 		return ((ng_ID_t)0);
953 
954 	/* Decode number */
955 	val = strtoul(name + 1, &eptr, 16);
956 	if ((eptr - name != len - 1) || (val == ULONG_MAX) || (val == 0))
957 		return ((ng_ID_t)0);
958 
959 	return ((ng_ID_t)val);
960 }
961 
962 /*
963  * Remove a name from a node. This should only be called
964  * when shutting down and removing the node.
965  */
966 void
967 ng_unname(node_p node)
968 {
969 }
970 
971 /*
972  * Allocate a bigger name hash.
973  */
974 static void
975 ng_name_rehash()
976 {
977 	struct nodehash *new;
978 	uint32_t hash;
979 	u_long hmask;
980 	node_p node, node2;
981 	int i;
982 
983 	new = hashinit_flags((V_ng_name_hmask + 1) * 2, M_NETGRAPH_NODE, &hmask,
984 	    HASH_NOWAIT);
985 	if (new == NULL)
986 		return;
987 
988 	for (i = 0; i <= V_ng_name_hmask; i++)
989 		LIST_FOREACH_SAFE(node, &V_ng_name_hash[i], nd_nodes, node2) {
990 #ifdef INVARIANTS
991 			LIST_REMOVE(node, nd_nodes);
992 #endif
993 			hash = hash32_str(NG_NODE_NAME(node), HASHINIT) & hmask;
994 			LIST_INSERT_HEAD(&new[hash], node, nd_nodes);
995 		}
996 
997 	hashdestroy(V_ng_name_hash, M_NETGRAPH_NODE, V_ng_name_hmask);
998 	V_ng_name_hash = new;
999 	V_ng_name_hmask = hmask;
1000 }
1001 
1002 /*
1003  * Allocate a bigger ID hash.
1004  */
1005 static void
1006 ng_ID_rehash()
1007 {
1008 	struct nodehash *new;
1009 	uint32_t hash;
1010 	u_long hmask;
1011 	node_p node, node2;
1012 	int i;
1013 
1014 	new = hashinit_flags((V_ng_ID_hmask + 1) * 2, M_NETGRAPH_NODE, &hmask,
1015 	    HASH_NOWAIT);
1016 	if (new == NULL)
1017 		return;
1018 
1019 	for (i = 0; i <= V_ng_ID_hmask; i++)
1020 		LIST_FOREACH_SAFE(node, &V_ng_ID_hash[i], nd_idnodes, node2) {
1021 #ifdef INVARIANTS
1022 			LIST_REMOVE(node, nd_idnodes);
1023 #endif
1024 			hash = (node->nd_ID % (hmask + 1));
1025 			LIST_INSERT_HEAD(&new[hash], node, nd_idnodes);
1026 		}
1027 
1028 	hashdestroy(V_ng_ID_hash, M_NETGRAPH_NODE, V_ng_name_hmask);
1029 	V_ng_ID_hash = new;
1030 	V_ng_ID_hmask = hmask;
1031 }
1032 
1033 /************************************************************************
1034 			Hook routines
1035  Names are not optional. Hooks are always connected, except for a
1036  brief moment within these routines. On invalidation or during creation
1037  they are connected to the 'dead' hook.
1038 ************************************************************************/
1039 
1040 /*
1041  * Remove a hook reference
1042  */
1043 void
1044 ng_unref_hook(hook_p hook)
1045 {
1046 
1047 	if (hook == &ng_deadhook)
1048 		return;
1049 
1050 	if (refcount_release(&hook->hk_refs)) { /* we were the last */
1051 		if (_NG_HOOK_NODE(hook)) /* it'll probably be ng_deadnode */
1052 			_NG_NODE_UNREF((_NG_HOOK_NODE(hook)));
1053 		NG_FREE_HOOK(hook);
1054 	}
1055 }
1056 
1057 /*
1058  * Add an unconnected hook to a node. Only used internally.
1059  * Assumes node is locked. (XXX not yet true )
1060  */
1061 static int
1062 ng_add_hook(node_p node, const char *name, hook_p *hookp)
1063 {
1064 	hook_p hook;
1065 	int error = 0;
1066 
1067 	/* Check that the given name is good */
1068 	if (name == NULL) {
1069 		TRAP_ERROR();
1070 		return (EINVAL);
1071 	}
1072 	if (ng_findhook(node, name) != NULL) {
1073 		TRAP_ERROR();
1074 		return (EEXIST);
1075 	}
1076 
1077 	/* Allocate the hook and link it up */
1078 	NG_ALLOC_HOOK(hook);
1079 	if (hook == NULL) {
1080 		TRAP_ERROR();
1081 		return (ENOMEM);
1082 	}
1083 	hook->hk_refs = 1;		/* add a reference for us to return */
1084 	hook->hk_flags = HK_INVALID;
1085 	hook->hk_peer = &ng_deadhook;	/* start off this way */
1086 	hook->hk_node = node;
1087 	NG_NODE_REF(node);		/* each hook counts as a reference */
1088 
1089 	/* Set hook name */
1090 	strlcpy(NG_HOOK_NAME(hook), name, NG_HOOKSIZ);
1091 
1092 	/*
1093 	 * Check if the node type code has something to say about it
1094 	 * If it fails, the unref of the hook will also unref the node.
1095 	 */
1096 	if (node->nd_type->newhook != NULL) {
1097 		if ((error = (*node->nd_type->newhook)(node, hook, name))) {
1098 			NG_HOOK_UNREF(hook);	/* this frees the hook */
1099 			return (error);
1100 		}
1101 	}
1102 	/*
1103 	 * The 'type' agrees so far, so go ahead and link it in.
1104 	 * We'll ask again later when we actually connect the hooks.
1105 	 */
1106 	LIST_INSERT_HEAD(&node->nd_hooks, hook, hk_hooks);
1107 	node->nd_numhooks++;
1108 	NG_HOOK_REF(hook);	/* one for the node */
1109 
1110 	if (hookp)
1111 		*hookp = hook;
1112 	return (0);
1113 }
1114 
1115 /*
1116  * Find a hook
1117  *
1118  * Node types may supply their own optimized routines for finding
1119  * hooks.  If none is supplied, we just do a linear search.
1120  * XXX Possibly we should add a reference to the hook?
1121  */
1122 hook_p
1123 ng_findhook(node_p node, const char *name)
1124 {
1125 	hook_p hook;
1126 
1127 	if (node->nd_type->findhook != NULL)
1128 		return (*node->nd_type->findhook)(node, name);
1129 	LIST_FOREACH(hook, &node->nd_hooks, hk_hooks) {
1130 		if (NG_HOOK_IS_VALID(hook) &&
1131 		    (strcmp(NG_HOOK_NAME(hook), name) == 0))
1132 			return (hook);
1133 	}
1134 	return (NULL);
1135 }
1136 
1137 /*
1138  * Destroy a hook
1139  *
1140  * As hooks are always attached, this really destroys two hooks.
1141  * The one given, and the one attached to it. Disconnect the hooks
1142  * from each other first. We reconnect the peer hook to the 'dead'
1143  * hook so that it can still exist after we depart. We then
1144  * send the peer its own destroy message. This ensures that we only
1145  * interact with the peer's structures when it is locked processing that
1146  * message. We hold a reference to the peer hook so we are guaranteed that
1147  * the peer hook and node are still going to exist until
1148  * we are finished there as the hook holds a ref on the node.
1149  * We run this same code again on the peer hook, but that time it is already
1150  * attached to the 'dead' hook.
1151  *
1152  * This routine is called at all stages of hook creation
1153  * on error detection and must be able to handle any such stage.
1154  */
1155 void
1156 ng_destroy_hook(hook_p hook)
1157 {
1158 	hook_p peer;
1159 	node_p node;
1160 
1161 	if (hook == &ng_deadhook) {	/* better safe than sorry */
1162 		printf("ng_destroy_hook called on deadhook\n");
1163 		return;
1164 	}
1165 
1166 	/*
1167 	 * Protect divorce process with mutex, to avoid races on
1168 	 * simultaneous disconnect.
1169 	 */
1170 	TOPOLOGY_WLOCK();
1171 
1172 	hook->hk_flags |= HK_INVALID;
1173 
1174 	peer = NG_HOOK_PEER(hook);
1175 	node = NG_HOOK_NODE(hook);
1176 
1177 	if (peer && (peer != &ng_deadhook)) {
1178 		/*
1179 		 * Set the peer to point to ng_deadhook
1180 		 * from this moment on we are effectively independent it.
1181 		 * send it an rmhook message of it's own.
1182 		 */
1183 		peer->hk_peer = &ng_deadhook;	/* They no longer know us */
1184 		hook->hk_peer = &ng_deadhook;	/* Nor us, them */
1185 		if (NG_HOOK_NODE(peer) == &ng_deadnode) {
1186 			/*
1187 			 * If it's already divorced from a node,
1188 			 * just free it.
1189 			 */
1190 			TOPOLOGY_WUNLOCK();
1191 		} else {
1192 			TOPOLOGY_WUNLOCK();
1193 			ng_rmhook_self(peer); 	/* Send it a surprise */
1194 		}
1195 		NG_HOOK_UNREF(peer);		/* account for peer link */
1196 		NG_HOOK_UNREF(hook);		/* account for peer link */
1197 	} else
1198 		TOPOLOGY_WUNLOCK();
1199 
1200 	TOPOLOGY_NOTOWNED();
1201 
1202 	/*
1203 	 * Remove the hook from the node's list to avoid possible recursion
1204 	 * in case the disconnection results in node shutdown.
1205 	 */
1206 	if (node == &ng_deadnode) { /* happens if called from ng_con_nodes() */
1207 		return;
1208 	}
1209 	LIST_REMOVE(hook, hk_hooks);
1210 	node->nd_numhooks--;
1211 	if (node->nd_type->disconnect) {
1212 		/*
1213 		 * The type handler may elect to destroy the node so don't
1214 		 * trust its existence after this point. (except
1215 		 * that we still hold a reference on it. (which we
1216 		 * inherrited from the hook we are destroying)
1217 		 */
1218 		(*node->nd_type->disconnect) (hook);
1219 	}
1220 
1221 	/*
1222 	 * Note that because we will point to ng_deadnode, the original node
1223 	 * is not decremented automatically so we do that manually.
1224 	 */
1225 	_NG_HOOK_NODE(hook) = &ng_deadnode;
1226 	NG_NODE_UNREF(node);	/* We no longer point to it so adjust count */
1227 	NG_HOOK_UNREF(hook);	/* Account for linkage (in list) to node */
1228 }
1229 
1230 /*
1231  * Take two hooks on a node and merge the connection so that the given node
1232  * is effectively bypassed.
1233  */
1234 int
1235 ng_bypass(hook_p hook1, hook_p hook2)
1236 {
1237 	if (hook1->hk_node != hook2->hk_node) {
1238 		TRAP_ERROR();
1239 		return (EINVAL);
1240 	}
1241 	TOPOLOGY_WLOCK();
1242 	if (NG_HOOK_NOT_VALID(hook1) || NG_HOOK_NOT_VALID(hook2)) {
1243 		TOPOLOGY_WUNLOCK();
1244 		return (EINVAL);
1245 	}
1246 	hook1->hk_peer->hk_peer = hook2->hk_peer;
1247 	hook2->hk_peer->hk_peer = hook1->hk_peer;
1248 
1249 	hook1->hk_peer = &ng_deadhook;
1250 	hook2->hk_peer = &ng_deadhook;
1251 	TOPOLOGY_WUNLOCK();
1252 
1253 	NG_HOOK_UNREF(hook1);
1254 	NG_HOOK_UNREF(hook2);
1255 
1256 	/* XXX If we ever cache methods on hooks update them as well */
1257 	ng_destroy_hook(hook1);
1258 	ng_destroy_hook(hook2);
1259 	return (0);
1260 }
1261 
1262 /*
1263  * Install a new netgraph type
1264  */
1265 int
1266 ng_newtype(struct ng_type *tp)
1267 {
1268 	const size_t namelen = strlen(tp->name);
1269 
1270 	/* Check version and type name fields */
1271 	if ((tp->version != NG_ABI_VERSION) || (namelen == 0) ||
1272 	    (namelen >= NG_TYPESIZ)) {
1273 		TRAP_ERROR();
1274 		if (tp->version != NG_ABI_VERSION) {
1275 			printf("Netgraph: Node type rejected. ABI mismatch. "
1276 			    "Suggest recompile\n");
1277 		}
1278 		return (EINVAL);
1279 	}
1280 
1281 	/* Check for name collision */
1282 	if (ng_findtype(tp->name) != NULL) {
1283 		TRAP_ERROR();
1284 		return (EEXIST);
1285 	}
1286 
1287 	/* Link in new type */
1288 	TYPELIST_WLOCK();
1289 	LIST_INSERT_HEAD(&ng_typelist, tp, types);
1290 	tp->refs = 1;	/* first ref is linked list */
1291 	TYPELIST_WUNLOCK();
1292 	return (0);
1293 }
1294 
1295 /*
1296  * unlink a netgraph type
1297  * If no examples exist
1298  */
1299 int
1300 ng_rmtype(struct ng_type *tp)
1301 {
1302 	/* Check for name collision */
1303 	if (tp->refs != 1) {
1304 		TRAP_ERROR();
1305 		return (EBUSY);
1306 	}
1307 
1308 	/* Unlink type */
1309 	TYPELIST_WLOCK();
1310 	LIST_REMOVE(tp, types);
1311 	TYPELIST_WUNLOCK();
1312 	return (0);
1313 }
1314 
1315 /*
1316  * Look for a type of the name given
1317  */
1318 struct ng_type *
1319 ng_findtype(const char *typename)
1320 {
1321 	struct ng_type *type;
1322 
1323 	TYPELIST_RLOCK();
1324 	LIST_FOREACH(type, &ng_typelist, types) {
1325 		if (strcmp(type->name, typename) == 0)
1326 			break;
1327 	}
1328 	TYPELIST_RUNLOCK();
1329 	return (type);
1330 }
1331 
1332 /************************************************************************
1333 			Composite routines
1334 ************************************************************************/
1335 /*
1336  * Connect two nodes using the specified hooks, using queued functions.
1337  */
1338 static int
1339 ng_con_part3(node_p node, item_p item, hook_p hook)
1340 {
1341 	int	error = 0;
1342 
1343 	/*
1344 	 * When we run, we know that the node 'node' is locked for us.
1345 	 * Our caller has a reference on the hook.
1346 	 * Our caller has a reference on the node.
1347 	 * (In this case our caller is ng_apply_item() ).
1348 	 * The peer hook has a reference on the hook.
1349 	 * We are all set up except for the final call to the node, and
1350 	 * the clearing of the INVALID flag.
1351 	 */
1352 	if (NG_HOOK_NODE(hook) == &ng_deadnode) {
1353 		/*
1354 		 * The node must have been freed again since we last visited
1355 		 * here. ng_destry_hook() has this effect but nothing else does.
1356 		 * We should just release our references and
1357 		 * free anything we can think of.
1358 		 * Since we know it's been destroyed, and it's our caller
1359 		 * that holds the references, just return.
1360 		 */
1361 		ERROUT(ENOENT);
1362 	}
1363 	if (hook->hk_node->nd_type->connect) {
1364 		if ((error = (*hook->hk_node->nd_type->connect) (hook))) {
1365 			ng_destroy_hook(hook);	/* also zaps peer */
1366 			printf("failed in ng_con_part3()\n");
1367 			ERROUT(error);
1368 		}
1369 	}
1370 	/*
1371 	 *  XXX this is wrong for SMP. Possibly we need
1372 	 * to separate out 'create' and 'invalid' flags.
1373 	 * should only set flags on hooks we have locked under our node.
1374 	 */
1375 	hook->hk_flags &= ~HK_INVALID;
1376 done:
1377 	NG_FREE_ITEM(item);
1378 	return (error);
1379 }
1380 
1381 static int
1382 ng_con_part2(node_p node, item_p item, hook_p hook)
1383 {
1384 	hook_p	peer;
1385 	int	error = 0;
1386 
1387 	/*
1388 	 * When we run, we know that the node 'node' is locked for us.
1389 	 * Our caller has a reference on the hook.
1390 	 * Our caller has a reference on the node.
1391 	 * (In this case our caller is ng_apply_item() ).
1392 	 * The peer hook has a reference on the hook.
1393 	 * our node pointer points to the 'dead' node.
1394 	 * First check the hook name is unique.
1395 	 * Should not happen because we checked before queueing this.
1396 	 */
1397 	if (ng_findhook(node, NG_HOOK_NAME(hook)) != NULL) {
1398 		TRAP_ERROR();
1399 		ng_destroy_hook(hook); /* should destroy peer too */
1400 		printf("failed in ng_con_part2()\n");
1401 		ERROUT(EEXIST);
1402 	}
1403 	/*
1404 	 * Check if the node type code has something to say about it
1405 	 * If it fails, the unref of the hook will also unref the attached node,
1406 	 * however since that node is 'ng_deadnode' this will do nothing.
1407 	 * The peer hook will also be destroyed.
1408 	 */
1409 	if (node->nd_type->newhook != NULL) {
1410 		if ((error = (*node->nd_type->newhook)(node, hook,
1411 		    hook->hk_name))) {
1412 			ng_destroy_hook(hook); /* should destroy peer too */
1413 			printf("failed in ng_con_part2()\n");
1414 			ERROUT(error);
1415 		}
1416 	}
1417 
1418 	/*
1419 	 * The 'type' agrees so far, so go ahead and link it in.
1420 	 * We'll ask again later when we actually connect the hooks.
1421 	 */
1422 	hook->hk_node = node;		/* just overwrite ng_deadnode */
1423 	NG_NODE_REF(node);		/* each hook counts as a reference */
1424 	LIST_INSERT_HEAD(&node->nd_hooks, hook, hk_hooks);
1425 	node->nd_numhooks++;
1426 	NG_HOOK_REF(hook);	/* one for the node */
1427 
1428 	/*
1429 	 * We now have a symmetrical situation, where both hooks have been
1430 	 * linked to their nodes, the newhook methods have been called
1431 	 * And the references are all correct. The hooks are still marked
1432 	 * as invalid, as we have not called the 'connect' methods
1433 	 * yet.
1434 	 * We can call the local one immediately as we have the
1435 	 * node locked, but we need to queue the remote one.
1436 	 */
1437 	if (hook->hk_node->nd_type->connect) {
1438 		if ((error = (*hook->hk_node->nd_type->connect) (hook))) {
1439 			ng_destroy_hook(hook);	/* also zaps peer */
1440 			printf("failed in ng_con_part2(A)\n");
1441 			ERROUT(error);
1442 		}
1443 	}
1444 
1445 	/*
1446 	 * Acquire topo mutex to avoid race with ng_destroy_hook().
1447 	 */
1448 	TOPOLOGY_RLOCK();
1449 	peer = hook->hk_peer;
1450 	if (peer == &ng_deadhook) {
1451 		TOPOLOGY_RUNLOCK();
1452 		printf("failed in ng_con_part2(B)\n");
1453 		ng_destroy_hook(hook);
1454 		ERROUT(ENOENT);
1455 	}
1456 	TOPOLOGY_RUNLOCK();
1457 
1458 	if ((error = ng_send_fn2(peer->hk_node, peer, item, &ng_con_part3,
1459 	    NULL, 0, NG_REUSE_ITEM))) {
1460 		printf("failed in ng_con_part2(C)\n");
1461 		ng_destroy_hook(hook);	/* also zaps peer */
1462 		return (error);		/* item was consumed. */
1463 	}
1464 	hook->hk_flags &= ~HK_INVALID; /* need both to be able to work */
1465 	return (0);			/* item was consumed. */
1466 done:
1467 	NG_FREE_ITEM(item);
1468 	return (error);
1469 }
1470 
1471 /*
1472  * Connect this node with another node. We assume that this node is
1473  * currently locked, as we are only called from an NGM_CONNECT message.
1474  */
1475 static int
1476 ng_con_nodes(item_p item, node_p node, const char *name,
1477     node_p node2, const char *name2)
1478 {
1479 	int	error;
1480 	hook_p	hook;
1481 	hook_p	hook2;
1482 
1483 	if (ng_findhook(node2, name2) != NULL) {
1484 		return(EEXIST);
1485 	}
1486 	if ((error = ng_add_hook(node, name, &hook)))  /* gives us a ref */
1487 		return (error);
1488 	/* Allocate the other hook and link it up */
1489 	NG_ALLOC_HOOK(hook2);
1490 	if (hook2 == NULL) {
1491 		TRAP_ERROR();
1492 		ng_destroy_hook(hook);	/* XXX check ref counts so far */
1493 		NG_HOOK_UNREF(hook);	/* including our ref */
1494 		return (ENOMEM);
1495 	}
1496 	hook2->hk_refs = 1;		/* start with a reference for us. */
1497 	hook2->hk_flags = HK_INVALID;
1498 	hook2->hk_peer = hook;		/* Link the two together */
1499 	hook->hk_peer = hook2;
1500 	NG_HOOK_REF(hook);		/* Add a ref for the peer to each*/
1501 	NG_HOOK_REF(hook2);
1502 	hook2->hk_node = &ng_deadnode;
1503 	strlcpy(NG_HOOK_NAME(hook2), name2, NG_HOOKSIZ);
1504 
1505 	/*
1506 	 * Queue the function above.
1507 	 * Procesing continues in that function in the lock context of
1508 	 * the other node.
1509 	 */
1510 	if ((error = ng_send_fn2(node2, hook2, item, &ng_con_part2, NULL, 0,
1511 	    NG_NOFLAGS))) {
1512 		printf("failed in ng_con_nodes(): %d\n", error);
1513 		ng_destroy_hook(hook);	/* also zaps peer */
1514 	}
1515 
1516 	NG_HOOK_UNREF(hook);		/* Let each hook go if it wants to */
1517 	NG_HOOK_UNREF(hook2);
1518 	return (error);
1519 }
1520 
1521 /*
1522  * Make a peer and connect.
1523  * We assume that the local node is locked.
1524  * The new node probably doesn't need a lock until
1525  * it has a hook, because it cannot really have any work until then,
1526  * but we should think about it a bit more.
1527  *
1528  * The problem may come if the other node also fires up
1529  * some hardware or a timer or some other source of activation,
1530  * also it may already get a command msg via it's ID.
1531  *
1532  * We could use the same method as ng_con_nodes() but we'd have
1533  * to add ability to remove the node when failing. (Not hard, just
1534  * make arg1 point to the node to remove).
1535  * Unless of course we just ignore failure to connect and leave
1536  * an unconnected node?
1537  */
1538 static int
1539 ng_mkpeer(node_p node, const char *name, const char *name2, char *type)
1540 {
1541 	node_p	node2;
1542 	hook_p	hook1, hook2;
1543 	int	error;
1544 
1545 	if ((error = ng_make_node(type, &node2))) {
1546 		return (error);
1547 	}
1548 
1549 	if ((error = ng_add_hook(node, name, &hook1))) { /* gives us a ref */
1550 		ng_rmnode(node2, NULL, NULL, 0);
1551 		return (error);
1552 	}
1553 
1554 	if ((error = ng_add_hook(node2, name2, &hook2))) {
1555 		ng_rmnode(node2, NULL, NULL, 0);
1556 		ng_destroy_hook(hook1);
1557 		NG_HOOK_UNREF(hook1);
1558 		return (error);
1559 	}
1560 
1561 	/*
1562 	 * Actually link the two hooks together.
1563 	 */
1564 	hook1->hk_peer = hook2;
1565 	hook2->hk_peer = hook1;
1566 
1567 	/* Each hook is referenced by the other */
1568 	NG_HOOK_REF(hook1);
1569 	NG_HOOK_REF(hook2);
1570 
1571 	/* Give each node the opportunity to veto the pending connection */
1572 	if (hook1->hk_node->nd_type->connect) {
1573 		error = (*hook1->hk_node->nd_type->connect) (hook1);
1574 	}
1575 
1576 	if ((error == 0) && hook2->hk_node->nd_type->connect) {
1577 		error = (*hook2->hk_node->nd_type->connect) (hook2);
1578 
1579 	}
1580 
1581 	/*
1582 	 * drop the references we were holding on the two hooks.
1583 	 */
1584 	if (error) {
1585 		ng_destroy_hook(hook2);	/* also zaps hook1 */
1586 		ng_rmnode(node2, NULL, NULL, 0);
1587 	} else {
1588 		/* As a last act, allow the hooks to be used */
1589 		hook1->hk_flags &= ~HK_INVALID;
1590 		hook2->hk_flags &= ~HK_INVALID;
1591 	}
1592 	NG_HOOK_UNREF(hook1);
1593 	NG_HOOK_UNREF(hook2);
1594 	return (error);
1595 }
1596 
1597 /************************************************************************
1598 		Utility routines to send self messages
1599 ************************************************************************/
1600 
1601 /* Shut this node down as soon as everyone is clear of it */
1602 /* Should add arg "immediately" to jump the queue */
1603 int
1604 ng_rmnode_self(node_p node)
1605 {
1606 	int		error;
1607 
1608 	if (node == &ng_deadnode)
1609 		return (0);
1610 	node->nd_flags |= NGF_INVALID;
1611 	if (node->nd_flags & NGF_CLOSING)
1612 		return (0);
1613 
1614 	error = ng_send_fn(node, NULL, &ng_rmnode, NULL, 0);
1615 	return (error);
1616 }
1617 
1618 static void
1619 ng_rmhook_part2(node_p node, hook_p hook, void *arg1, int arg2)
1620 {
1621 	ng_destroy_hook(hook);
1622 	return ;
1623 }
1624 
1625 int
1626 ng_rmhook_self(hook_p hook)
1627 {
1628 	int		error;
1629 	node_p node = NG_HOOK_NODE(hook);
1630 
1631 	if (node == &ng_deadnode)
1632 		return (0);
1633 
1634 	error = ng_send_fn(node, hook, &ng_rmhook_part2, NULL, 0);
1635 	return (error);
1636 }
1637 
1638 /***********************************************************************
1639  * Parse and verify a string of the form:  <NODE:><PATH>
1640  *
1641  * Such a string can refer to a specific node or a specific hook
1642  * on a specific node, depending on how you look at it. In the
1643  * latter case, the PATH component must not end in a dot.
1644  *
1645  * Both <NODE:> and <PATH> are optional. The <PATH> is a string
1646  * of hook names separated by dots. This breaks out the original
1647  * string, setting *nodep to "NODE" (or NULL if none) and *pathp
1648  * to "PATH" (or NULL if degenerate). Also, *hookp will point to
1649  * the final hook component of <PATH>, if any, otherwise NULL.
1650  *
1651  * This returns -1 if the path is malformed. The char ** are optional.
1652  ***********************************************************************/
1653 int
1654 ng_path_parse(char *addr, char **nodep, char **pathp, char **hookp)
1655 {
1656 	char	*node, *path, *hook;
1657 	int	k;
1658 
1659 	/*
1660 	 * Extract absolute NODE, if any
1661 	 */
1662 	for (path = addr; *path && *path != ':'; path++);
1663 	if (*path) {
1664 		node = addr;	/* Here's the NODE */
1665 		*path++ = '\0';	/* Here's the PATH */
1666 
1667 		/* Node name must not be empty */
1668 		if (!*node)
1669 			return -1;
1670 
1671 		/* A name of "." is OK; otherwise '.' not allowed */
1672 		if (strcmp(node, ".") != 0) {
1673 			for (k = 0; node[k]; k++)
1674 				if (node[k] == '.')
1675 					return -1;
1676 		}
1677 	} else {
1678 		node = NULL;	/* No absolute NODE */
1679 		path = addr;	/* Here's the PATH */
1680 	}
1681 
1682 	/* Snoop for illegal characters in PATH */
1683 	for (k = 0; path[k]; k++)
1684 		if (path[k] == ':')
1685 			return -1;
1686 
1687 	/* Check for no repeated dots in PATH */
1688 	for (k = 0; path[k]; k++)
1689 		if (path[k] == '.' && path[k + 1] == '.')
1690 			return -1;
1691 
1692 	/* Remove extra (degenerate) dots from beginning or end of PATH */
1693 	if (path[0] == '.')
1694 		path++;
1695 	if (*path && path[strlen(path) - 1] == '.')
1696 		path[strlen(path) - 1] = 0;
1697 
1698 	/* If PATH has a dot, then we're not talking about a hook */
1699 	if (*path) {
1700 		for (hook = path, k = 0; path[k]; k++)
1701 			if (path[k] == '.') {
1702 				hook = NULL;
1703 				break;
1704 			}
1705 	} else
1706 		path = hook = NULL;
1707 
1708 	/* Done */
1709 	if (nodep)
1710 		*nodep = node;
1711 	if (pathp)
1712 		*pathp = path;
1713 	if (hookp)
1714 		*hookp = hook;
1715 	return (0);
1716 }
1717 
1718 /*
1719  * Given a path, which may be absolute or relative, and a starting node,
1720  * return the destination node.
1721  */
1722 int
1723 ng_path2noderef(node_p here, const char *address, node_p *destp,
1724     hook_p *lasthook)
1725 {
1726 	char    fullpath[NG_PATHSIZ];
1727 	char   *nodename, *path;
1728 	node_p  node, oldnode;
1729 
1730 	/* Initialize */
1731 	if (destp == NULL) {
1732 		TRAP_ERROR();
1733 		return EINVAL;
1734 	}
1735 	*destp = NULL;
1736 
1737 	/* Make a writable copy of address for ng_path_parse() */
1738 	strncpy(fullpath, address, sizeof(fullpath) - 1);
1739 	fullpath[sizeof(fullpath) - 1] = '\0';
1740 
1741 	/* Parse out node and sequence of hooks */
1742 	if (ng_path_parse(fullpath, &nodename, &path, NULL) < 0) {
1743 		TRAP_ERROR();
1744 		return EINVAL;
1745 	}
1746 
1747 	/*
1748 	 * For an absolute address, jump to the starting node.
1749 	 * Note that this holds a reference on the node for us.
1750 	 * Don't forget to drop the reference if we don't need it.
1751 	 */
1752 	if (nodename) {
1753 		node = ng_name2noderef(here, nodename);
1754 		if (node == NULL) {
1755 			TRAP_ERROR();
1756 			return (ENOENT);
1757 		}
1758 	} else {
1759 		if (here == NULL) {
1760 			TRAP_ERROR();
1761 			return (EINVAL);
1762 		}
1763 		node = here;
1764 		NG_NODE_REF(node);
1765 	}
1766 
1767 	if (path == NULL) {
1768 		if (lasthook != NULL)
1769 			*lasthook = NULL;
1770 		*destp = node;
1771 		return (0);
1772 	}
1773 
1774 	/*
1775 	 * Now follow the sequence of hooks
1776 	 *
1777 	 * XXXGL: The path may demolish as we go the sequence, but if
1778 	 * we hold the topology mutex at critical places, then, I hope,
1779 	 * we would always have valid pointers in hand, although the
1780 	 * path behind us may no longer exist.
1781 	 */
1782 	for (;;) {
1783 		hook_p hook;
1784 		char *segment;
1785 
1786 		/*
1787 		 * Break out the next path segment. Replace the dot we just
1788 		 * found with a NUL; "path" points to the next segment (or the
1789 		 * NUL at the end).
1790 		 */
1791 		for (segment = path; *path != '\0'; path++) {
1792 			if (*path == '.') {
1793 				*path++ = '\0';
1794 				break;
1795 			}
1796 		}
1797 
1798 		/* We have a segment, so look for a hook by that name */
1799 		hook = ng_findhook(node, segment);
1800 
1801 		TOPOLOGY_WLOCK();
1802 		/* Can't get there from here... */
1803 		if (hook == NULL || NG_HOOK_PEER(hook) == NULL ||
1804 		    NG_HOOK_NOT_VALID(hook) ||
1805 		    NG_HOOK_NOT_VALID(NG_HOOK_PEER(hook))) {
1806 			TRAP_ERROR();
1807 			NG_NODE_UNREF(node);
1808 			TOPOLOGY_WUNLOCK();
1809 			return (ENOENT);
1810 		}
1811 
1812 		/*
1813 		 * Hop on over to the next node
1814 		 * XXX
1815 		 * Big race conditions here as hooks and nodes go away
1816 		 * *** Idea.. store an ng_ID_t in each hook and use that
1817 		 * instead of the direct hook in this crawl?
1818 		 */
1819 		oldnode = node;
1820 		if ((node = NG_PEER_NODE(hook)))
1821 			NG_NODE_REF(node);	/* XXX RACE */
1822 		NG_NODE_UNREF(oldnode);	/* XXX another race */
1823 		if (NG_NODE_NOT_VALID(node)) {
1824 			NG_NODE_UNREF(node);	/* XXX more races */
1825 			TOPOLOGY_WUNLOCK();
1826 			TRAP_ERROR();
1827 			return (ENXIO);
1828 		}
1829 
1830 		if (*path == '\0') {
1831 			if (lasthook != NULL) {
1832 				if (hook != NULL) {
1833 					*lasthook = NG_HOOK_PEER(hook);
1834 					NG_HOOK_REF(*lasthook);
1835 				} else
1836 					*lasthook = NULL;
1837 			}
1838 			TOPOLOGY_WUNLOCK();
1839 			*destp = node;
1840 			return (0);
1841 		}
1842 		TOPOLOGY_WUNLOCK();
1843 	}
1844 }
1845 
1846 /***************************************************************\
1847 * Input queue handling.
1848 * All activities are submitted to the node via the input queue
1849 * which implements a multiple-reader/single-writer gate.
1850 * Items which cannot be handled immediately are queued.
1851 *
1852 * read-write queue locking inline functions			*
1853 \***************************************************************/
1854 
1855 static __inline void	ng_queue_rw(node_p node, item_p  item, int rw);
1856 static __inline item_p	ng_dequeue(node_p node, int *rw);
1857 static __inline item_p	ng_acquire_read(node_p node, item_p  item);
1858 static __inline item_p	ng_acquire_write(node_p node, item_p  item);
1859 static __inline void	ng_leave_read(node_p node);
1860 static __inline void	ng_leave_write(node_p node);
1861 
1862 /*
1863  * Definition of the bits fields in the ng_queue flag word.
1864  * Defined here rather than in netgraph.h because no-one should fiddle
1865  * with them.
1866  *
1867  * The ordering here may be important! don't shuffle these.
1868  */
1869 /*-
1870  Safety Barrier--------+ (adjustable to suit taste) (not used yet)
1871                        |
1872                        V
1873 +-------+-------+-------+-------+-------+-------+-------+-------+
1874   | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |
1875   | |A|c|t|i|v|e| |R|e|a|d|e|r| |C|o|u|n|t| | | | | | | | | |P|A|
1876   | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |O|W|
1877 +-------+-------+-------+-------+-------+-------+-------+-------+
1878   \___________________________ ____________________________/ | |
1879                             V                                | |
1880                   [active reader count]                      | |
1881                                                              | |
1882             Operation Pending -------------------------------+ |
1883                                                                |
1884           Active Writer ---------------------------------------+
1885 
1886 Node queue has such semantics:
1887 - All flags modifications are atomic.
1888 - Reader count can be incremented only if there is no writer or pending flags.
1889   As soon as this can't be done with single operation, it is implemented with
1890   spin loop and atomic_cmpset().
1891 - Writer flag can be set only if there is no any bits set.
1892   It is implemented with atomic_cmpset().
1893 - Pending flag can be set any time, but to avoid collision on queue processing
1894   all queue fields are protected by the mutex.
1895 - Queue processing thread reads queue holding the mutex, but releases it while
1896   processing. When queue is empty pending flag is removed.
1897 */
1898 
1899 #define WRITER_ACTIVE	0x00000001
1900 #define OP_PENDING	0x00000002
1901 #define READER_INCREMENT 0x00000004
1902 #define READER_MASK	0xfffffffc	/* Not valid if WRITER_ACTIVE is set */
1903 #define SAFETY_BARRIER	0x00100000	/* 128K items queued should be enough */
1904 
1905 /* Defines of more elaborate states on the queue */
1906 /* Mask of bits a new read cares about */
1907 #define NGQ_RMASK	(WRITER_ACTIVE|OP_PENDING)
1908 
1909 /* Mask of bits a new write cares about */
1910 #define NGQ_WMASK	(NGQ_RMASK|READER_MASK)
1911 
1912 /* Test to decide if there is something on the queue. */
1913 #define QUEUE_ACTIVE(QP) ((QP)->q_flags & OP_PENDING)
1914 
1915 /* How to decide what the next queued item is. */
1916 #define HEAD_IS_READER(QP)  NGI_QUEUED_READER(STAILQ_FIRST(&(QP)->queue))
1917 #define HEAD_IS_WRITER(QP)  NGI_QUEUED_WRITER(STAILQ_FIRST(&(QP)->queue)) /* notused */
1918 
1919 /* Read the status to decide if the next item on the queue can now run. */
1920 #define QUEUED_READER_CAN_PROCEED(QP)			\
1921 		(((QP)->q_flags & (NGQ_RMASK & ~OP_PENDING)) == 0)
1922 #define QUEUED_WRITER_CAN_PROCEED(QP)			\
1923 		(((QP)->q_flags & (NGQ_WMASK & ~OP_PENDING)) == 0)
1924 
1925 /* Is there a chance of getting ANY work off the queue? */
1926 #define NEXT_QUEUED_ITEM_CAN_PROCEED(QP)				\
1927 	((HEAD_IS_READER(QP)) ? QUEUED_READER_CAN_PROCEED(QP) :		\
1928 				QUEUED_WRITER_CAN_PROCEED(QP))
1929 
1930 #define NGQRW_R 0
1931 #define NGQRW_W 1
1932 
1933 #define NGQ2_WORKQ	0x00000001
1934 
1935 /*
1936  * Taking into account the current state of the queue and node, possibly take
1937  * the next entry off the queue and return it. Return NULL if there was
1938  * nothing we could return, either because there really was nothing there, or
1939  * because the node was in a state where it cannot yet process the next item
1940  * on the queue.
1941  */
1942 static __inline item_p
1943 ng_dequeue(node_p node, int *rw)
1944 {
1945 	item_p item;
1946 	struct ng_queue *ngq = &node->nd_input_queue;
1947 
1948 	/* This MUST be called with the mutex held. */
1949 	mtx_assert(&ngq->q_mtx, MA_OWNED);
1950 
1951 	/* If there is nothing queued, then just return. */
1952 	if (!QUEUE_ACTIVE(ngq)) {
1953 		CTR4(KTR_NET, "%20s: node [%x] (%p) queue empty; "
1954 		    "queue flags 0x%lx", __func__,
1955 		    node->nd_ID, node, ngq->q_flags);
1956 		return (NULL);
1957 	}
1958 
1959 	/*
1960 	 * From here, we can assume there is a head item.
1961 	 * We need to find out what it is and if it can be dequeued, given
1962 	 * the current state of the node.
1963 	 */
1964 	if (HEAD_IS_READER(ngq)) {
1965 		while (1) {
1966 			long t = ngq->q_flags;
1967 			if (t & WRITER_ACTIVE) {
1968 				/* There is writer, reader can't proceed. */
1969 				CTR4(KTR_NET, "%20s: node [%x] (%p) queued "
1970 				    "reader can't proceed; queue flags 0x%lx",
1971 				    __func__, node->nd_ID, node, t);
1972 				return (NULL);
1973 			}
1974 			if (atomic_cmpset_acq_int(&ngq->q_flags, t,
1975 			    t + READER_INCREMENT))
1976 				break;
1977 			cpu_spinwait();
1978 		}
1979 		/* We have got reader lock for the node. */
1980 		*rw = NGQRW_R;
1981 	} else if (atomic_cmpset_acq_int(&ngq->q_flags, OP_PENDING,
1982 	    OP_PENDING + WRITER_ACTIVE)) {
1983 		/* We have got writer lock for the node. */
1984 		*rw = NGQRW_W;
1985 	} else {
1986 		/* There is somebody other, writer can't proceed. */
1987 		CTR4(KTR_NET, "%20s: node [%x] (%p) queued writer can't "
1988 		    "proceed; queue flags 0x%lx", __func__, node->nd_ID, node,
1989 		    ngq->q_flags);
1990 		return (NULL);
1991 	}
1992 
1993 	/*
1994 	 * Now we dequeue the request (whatever it may be) and correct the
1995 	 * pending flags and the next and last pointers.
1996 	 */
1997 	item = STAILQ_FIRST(&ngq->queue);
1998 	STAILQ_REMOVE_HEAD(&ngq->queue, el_next);
1999 	if (STAILQ_EMPTY(&ngq->queue))
2000 		atomic_clear_int(&ngq->q_flags, OP_PENDING);
2001 	CTR6(KTR_NET, "%20s: node [%x] (%p) returning item %p as %s; queue "
2002 	    "flags 0x%lx", __func__, node->nd_ID, node, item, *rw ? "WRITER" :
2003 	    "READER", ngq->q_flags);
2004 	return (item);
2005 }
2006 
2007 /*
2008  * Queue a packet to be picked up later by someone else.
2009  * If the queue could be run now, add node to the queue handler's worklist.
2010  */
2011 static __inline void
2012 ng_queue_rw(node_p node, item_p  item, int rw)
2013 {
2014 	struct ng_queue *ngq = &node->nd_input_queue;
2015 	if (rw == NGQRW_W)
2016 		NGI_SET_WRITER(item);
2017 	else
2018 		NGI_SET_READER(item);
2019 	item->depth = 1;
2020 
2021 	NG_QUEUE_LOCK(ngq);
2022 	/* Set OP_PENDING flag and enqueue the item. */
2023 	atomic_set_int(&ngq->q_flags, OP_PENDING);
2024 	STAILQ_INSERT_TAIL(&ngq->queue, item, el_next);
2025 
2026 	CTR5(KTR_NET, "%20s: node [%x] (%p) queued item %p as %s", __func__,
2027 	    node->nd_ID, node, item, rw ? "WRITER" : "READER" );
2028 
2029 	/*
2030 	 * We can take the worklist lock with the node locked
2031 	 * BUT NOT THE REVERSE!
2032 	 */
2033 	if (NEXT_QUEUED_ITEM_CAN_PROCEED(ngq))
2034 		ng_worklist_add(node);
2035 	NG_QUEUE_UNLOCK(ngq);
2036 }
2037 
2038 /* Acquire reader lock on node. If node is busy, queue the packet. */
2039 static __inline item_p
2040 ng_acquire_read(node_p node, item_p item)
2041 {
2042 	KASSERT(node != &ng_deadnode,
2043 	    ("%s: working on deadnode", __func__));
2044 
2045 	/* Reader needs node without writer and pending items. */
2046 	for (;;) {
2047 		long t = node->nd_input_queue.q_flags;
2048 		if (t & NGQ_RMASK)
2049 			break; /* Node is not ready for reader. */
2050 		if (atomic_cmpset_acq_int(&node->nd_input_queue.q_flags, t,
2051 		    t + READER_INCREMENT)) {
2052 	    		/* Successfully grabbed node */
2053 			CTR4(KTR_NET, "%20s: node [%x] (%p) acquired item %p",
2054 			    __func__, node->nd_ID, node, item);
2055 			return (item);
2056 		}
2057 		cpu_spinwait();
2058 	};
2059 
2060 	/* Queue the request for later. */
2061 	ng_queue_rw(node, item, NGQRW_R);
2062 
2063 	return (NULL);
2064 }
2065 
2066 /* Acquire writer lock on node. If node is busy, queue the packet. */
2067 static __inline item_p
2068 ng_acquire_write(node_p node, item_p item)
2069 {
2070 	KASSERT(node != &ng_deadnode,
2071 	    ("%s: working on deadnode", __func__));
2072 
2073 	/* Writer needs completely idle node. */
2074 	if (atomic_cmpset_acq_int(&node->nd_input_queue.q_flags, 0,
2075 	    WRITER_ACTIVE)) {
2076 	    	/* Successfully grabbed node */
2077 		CTR4(KTR_NET, "%20s: node [%x] (%p) acquired item %p",
2078 		    __func__, node->nd_ID, node, item);
2079 		return (item);
2080 	}
2081 
2082 	/* Queue the request for later. */
2083 	ng_queue_rw(node, item, NGQRW_W);
2084 
2085 	return (NULL);
2086 }
2087 
2088 #if 0
2089 static __inline item_p
2090 ng_upgrade_write(node_p node, item_p item)
2091 {
2092 	struct ng_queue *ngq = &node->nd_input_queue;
2093 	KASSERT(node != &ng_deadnode,
2094 	    ("%s: working on deadnode", __func__));
2095 
2096 	NGI_SET_WRITER(item);
2097 
2098 	NG_QUEUE_LOCK(ngq);
2099 
2100 	/*
2101 	 * There will never be no readers as we are there ourselves.
2102 	 * Set the WRITER_ACTIVE flags ASAP to block out fast track readers.
2103 	 * The caller we are running from will call ng_leave_read()
2104 	 * soon, so we must account for that. We must leave again with the
2105 	 * READER lock. If we find other readers, then
2106 	 * queue the request for later. However "later" may be rignt now
2107 	 * if there are no readers. We don't really care if there are queued
2108 	 * items as we will bypass them anyhow.
2109 	 */
2110 	atomic_add_int(&ngq->q_flags, WRITER_ACTIVE - READER_INCREMENT);
2111 	if ((ngq->q_flags & (NGQ_WMASK & ~OP_PENDING)) == WRITER_ACTIVE) {
2112 		NG_QUEUE_UNLOCK(ngq);
2113 
2114 		/* It's just us, act on the item. */
2115 		/* will NOT drop writer lock when done */
2116 		ng_apply_item(node, item, 0);
2117 
2118 		/*
2119 		 * Having acted on the item, atomically
2120 		 * downgrade back to READER and finish up.
2121 	 	 */
2122 		atomic_add_int(&ngq->q_flags, READER_INCREMENT - WRITER_ACTIVE);
2123 
2124 		/* Our caller will call ng_leave_read() */
2125 		return;
2126 	}
2127 	/*
2128 	 * It's not just us active, so queue us AT THE HEAD.
2129 	 * "Why?" I hear you ask.
2130 	 * Put us at the head of the queue as we've already been
2131 	 * through it once. If there is nothing else waiting,
2132 	 * set the correct flags.
2133 	 */
2134 	if (STAILQ_EMPTY(&ngq->queue)) {
2135 		/* We've gone from, 0 to 1 item in the queue */
2136 		atomic_set_int(&ngq->q_flags, OP_PENDING);
2137 
2138 		CTR3(KTR_NET, "%20s: node [%x] (%p) set OP_PENDING", __func__,
2139 		    node->nd_ID, node);
2140 	};
2141 	STAILQ_INSERT_HEAD(&ngq->queue, item, el_next);
2142 	CTR4(KTR_NET, "%20s: node [%x] (%p) requeued item %p as WRITER",
2143 	    __func__, node->nd_ID, node, item );
2144 
2145 	/* Reverse what we did above. That downgrades us back to reader */
2146 	atomic_add_int(&ngq->q_flags, READER_INCREMENT - WRITER_ACTIVE);
2147 	if (QUEUE_ACTIVE(ngq) && NEXT_QUEUED_ITEM_CAN_PROCEED(ngq))
2148 		ng_worklist_add(node);
2149 	NG_QUEUE_UNLOCK(ngq);
2150 
2151 	return;
2152 }
2153 #endif
2154 
2155 /* Release reader lock. */
2156 static __inline void
2157 ng_leave_read(node_p node)
2158 {
2159 	atomic_subtract_rel_int(&node->nd_input_queue.q_flags, READER_INCREMENT);
2160 }
2161 
2162 /* Release writer lock. */
2163 static __inline void
2164 ng_leave_write(node_p node)
2165 {
2166 	atomic_clear_rel_int(&node->nd_input_queue.q_flags, WRITER_ACTIVE);
2167 }
2168 
2169 /* Purge node queue. Called on node shutdown. */
2170 static void
2171 ng_flush_input_queue(node_p node)
2172 {
2173 	struct ng_queue *ngq = &node->nd_input_queue;
2174 	item_p item;
2175 
2176 	NG_QUEUE_LOCK(ngq);
2177 	while ((item = STAILQ_FIRST(&ngq->queue)) != NULL) {
2178 		STAILQ_REMOVE_HEAD(&ngq->queue, el_next);
2179 		if (STAILQ_EMPTY(&ngq->queue))
2180 			atomic_clear_int(&ngq->q_flags, OP_PENDING);
2181 		NG_QUEUE_UNLOCK(ngq);
2182 
2183 		/* If the item is supplying a callback, call it with an error */
2184 		if (item->apply != NULL) {
2185 			if (item->depth == 1)
2186 				item->apply->error = ENOENT;
2187 			if (refcount_release(&item->apply->refs)) {
2188 				(*item->apply->apply)(item->apply->context,
2189 				    item->apply->error);
2190 			}
2191 		}
2192 		NG_FREE_ITEM(item);
2193 		NG_QUEUE_LOCK(ngq);
2194 	}
2195 	NG_QUEUE_UNLOCK(ngq);
2196 }
2197 
2198 /***********************************************************************
2199 * Externally visible method for sending or queueing messages or data.
2200 ***********************************************************************/
2201 
2202 /*
2203  * The module code should have filled out the item correctly by this stage:
2204  * Common:
2205  *    reference to destination node.
2206  *    Reference to destination rcv hook if relevant.
2207  *    apply pointer must be or NULL or reference valid struct ng_apply_info.
2208  * Data:
2209  *    pointer to mbuf
2210  * Control_Message:
2211  *    pointer to msg.
2212  *    ID of original sender node. (return address)
2213  * Function:
2214  *    Function pointer
2215  *    void * argument
2216  *    integer argument
2217  *
2218  * The nodes have several routines and macros to help with this task:
2219  */
2220 
2221 int
2222 ng_snd_item(item_p item, int flags)
2223 {
2224 	hook_p hook;
2225 	node_p node;
2226 	int queue, rw;
2227 	struct ng_queue *ngq;
2228 	int error = 0;
2229 
2230 	/* We are sending item, so it must be present! */
2231 	KASSERT(item != NULL, ("ng_snd_item: item is NULL"));
2232 
2233 #ifdef	NETGRAPH_DEBUG
2234 	_ngi_check(item, __FILE__, __LINE__);
2235 #endif
2236 
2237 	/* Item was sent once more, postpone apply() call. */
2238 	if (item->apply)
2239 		refcount_acquire(&item->apply->refs);
2240 
2241 	node = NGI_NODE(item);
2242 	/* Node is never optional. */
2243 	KASSERT(node != NULL, ("ng_snd_item: node is NULL"));
2244 
2245 	hook = NGI_HOOK(item);
2246 	/* Valid hook and mbuf are mandatory for data. */
2247 	if ((item->el_flags & NGQF_TYPE) == NGQF_DATA) {
2248 		KASSERT(hook != NULL, ("ng_snd_item: hook for data is NULL"));
2249 		if (NGI_M(item) == NULL)
2250 			ERROUT(EINVAL);
2251 		CHECK_DATA_MBUF(NGI_M(item));
2252 	}
2253 
2254 	/*
2255 	 * If the item or the node specifies single threading, force
2256 	 * writer semantics. Similarly, the node may say one hook always
2257 	 * produces writers. These are overrides.
2258 	 */
2259 	if (((item->el_flags & NGQF_RW) == NGQF_WRITER) ||
2260 	    (node->nd_flags & NGF_FORCE_WRITER) ||
2261 	    (hook && (hook->hk_flags & HK_FORCE_WRITER))) {
2262 		rw = NGQRW_W;
2263 	} else {
2264 		rw = NGQRW_R;
2265 	}
2266 
2267 	/*
2268 	 * If sender or receiver requests queued delivery, or call graph
2269 	 * loops back from outbound to inbound path, or stack usage
2270 	 * level is dangerous - enqueue message.
2271 	 */
2272 	if ((flags & NG_QUEUE) || (hook && (hook->hk_flags & HK_QUEUE))) {
2273 		queue = 1;
2274 	} else if (hook && (hook->hk_flags & HK_TO_INBOUND) &&
2275 	    curthread->td_ng_outbound) {
2276 		queue = 1;
2277 	} else {
2278 		queue = 0;
2279 #ifdef GET_STACK_USAGE
2280 		/*
2281 		 * Most of netgraph nodes have small stack consumption and
2282 		 * for them 25% of free stack space is more than enough.
2283 		 * Nodes/hooks with higher stack usage should be marked as
2284 		 * HI_STACK. For them 50% of stack will be guaranteed then.
2285 		 * XXX: Values 25% and 50% are completely empirical.
2286 		 */
2287 		size_t	st, su, sl;
2288 		GET_STACK_USAGE(st, su);
2289 		sl = st - su;
2290 		if ((sl * 4 < st) || ((sl * 2 < st) &&
2291 		    ((node->nd_flags & NGF_HI_STACK) || (hook &&
2292 		    (hook->hk_flags & HK_HI_STACK)))))
2293 			queue = 1;
2294 #endif
2295 	}
2296 
2297 	if (queue) {
2298 		/* Put it on the queue for that node*/
2299 		ng_queue_rw(node, item, rw);
2300 		return ((flags & NG_PROGRESS) ? EINPROGRESS : 0);
2301 	}
2302 
2303 	/*
2304 	 * We already decided how we will be queueud or treated.
2305 	 * Try get the appropriate operating permission.
2306 	 */
2307  	if (rw == NGQRW_R)
2308 		item = ng_acquire_read(node, item);
2309 	else
2310 		item = ng_acquire_write(node, item);
2311 
2312 	/* Item was queued while trying to get permission. */
2313 	if (item == NULL)
2314 		return ((flags & NG_PROGRESS) ? EINPROGRESS : 0);
2315 
2316 	NGI_GET_NODE(item, node); /* zaps stored node */
2317 
2318 	item->depth++;
2319 	error = ng_apply_item(node, item, rw); /* drops r/w lock when done */
2320 
2321 	/* If something is waiting on queue and ready, schedule it. */
2322 	ngq = &node->nd_input_queue;
2323 	if (QUEUE_ACTIVE(ngq)) {
2324 		NG_QUEUE_LOCK(ngq);
2325 		if (QUEUE_ACTIVE(ngq) && NEXT_QUEUED_ITEM_CAN_PROCEED(ngq))
2326 			ng_worklist_add(node);
2327 		NG_QUEUE_UNLOCK(ngq);
2328 	}
2329 
2330 	/*
2331 	 * Node may go away as soon as we remove the reference.
2332 	 * Whatever we do, DO NOT access the node again!
2333 	 */
2334 	NG_NODE_UNREF(node);
2335 
2336 	return (error);
2337 
2338 done:
2339 	/* If was not sent, apply callback here. */
2340 	if (item->apply != NULL) {
2341 		if (item->depth == 0 && error != 0)
2342 			item->apply->error = error;
2343 		if (refcount_release(&item->apply->refs)) {
2344 			(*item->apply->apply)(item->apply->context,
2345 			    item->apply->error);
2346 		}
2347 	}
2348 
2349 	NG_FREE_ITEM(item);
2350 	return (error);
2351 }
2352 
2353 /*
2354  * We have an item that was possibly queued somewhere.
2355  * It should contain all the information needed
2356  * to run it on the appropriate node/hook.
2357  * If there is apply pointer and we own the last reference, call apply().
2358  */
2359 static int
2360 ng_apply_item(node_p node, item_p item, int rw)
2361 {
2362 	hook_p  hook;
2363 	ng_rcvdata_t *rcvdata;
2364 	ng_rcvmsg_t *rcvmsg;
2365 	struct ng_apply_info *apply;
2366 	int	error = 0, depth;
2367 
2368 	/* Node and item are never optional. */
2369 	KASSERT(node != NULL, ("ng_apply_item: node is NULL"));
2370 	KASSERT(item != NULL, ("ng_apply_item: item is NULL"));
2371 
2372 	NGI_GET_HOOK(item, hook); /* clears stored hook */
2373 #ifdef	NETGRAPH_DEBUG
2374 	_ngi_check(item, __FILE__, __LINE__);
2375 #endif
2376 
2377 	apply = item->apply;
2378 	depth = item->depth;
2379 
2380 	switch (item->el_flags & NGQF_TYPE) {
2381 	case NGQF_DATA:
2382 		/*
2383 		 * Check things are still ok as when we were queued.
2384 		 */
2385 		KASSERT(hook != NULL, ("ng_apply_item: hook for data is NULL"));
2386 		if (NG_HOOK_NOT_VALID(hook) ||
2387 		    NG_NODE_NOT_VALID(node)) {
2388 			error = EIO;
2389 			NG_FREE_ITEM(item);
2390 			break;
2391 		}
2392 		/*
2393 		 * If no receive method, just silently drop it.
2394 		 * Give preference to the hook over-ride method.
2395 		 */
2396 		if ((!(rcvdata = hook->hk_rcvdata)) &&
2397 		    (!(rcvdata = NG_HOOK_NODE(hook)->nd_type->rcvdata))) {
2398 			error = 0;
2399 			NG_FREE_ITEM(item);
2400 			break;
2401 		}
2402 		error = (*rcvdata)(hook, item);
2403 		break;
2404 	case NGQF_MESG:
2405 		if (hook && NG_HOOK_NOT_VALID(hook)) {
2406 			/*
2407 			 * The hook has been zapped then we can't use it.
2408 			 * Immediately drop its reference.
2409 			 * The message may not need it.
2410 			 */
2411 			NG_HOOK_UNREF(hook);
2412 			hook = NULL;
2413 		}
2414 		/*
2415 		 * Similarly, if the node is a zombie there is
2416 		 * nothing we can do with it, drop everything.
2417 		 */
2418 		if (NG_NODE_NOT_VALID(node)) {
2419 			TRAP_ERROR();
2420 			error = EINVAL;
2421 			NG_FREE_ITEM(item);
2422 			break;
2423 		}
2424 		/*
2425 		 * Call the appropriate message handler for the object.
2426 		 * It is up to the message handler to free the message.
2427 		 * If it's a generic message, handle it generically,
2428 		 * otherwise call the type's message handler (if it exists).
2429 		 * XXX (race). Remember that a queued message may
2430 		 * reference a node or hook that has just been
2431 		 * invalidated. It will exist as the queue code
2432 		 * is holding a reference, but..
2433 		 */
2434 		if ((NGI_MSG(item)->header.typecookie == NGM_GENERIC_COOKIE) &&
2435 		    ((NGI_MSG(item)->header.flags & NGF_RESP) == 0)) {
2436 			error = ng_generic_msg(node, item, hook);
2437 			break;
2438 		}
2439 		if (((!hook) || (!(rcvmsg = hook->hk_rcvmsg))) &&
2440 		    (!(rcvmsg = node->nd_type->rcvmsg))) {
2441 			TRAP_ERROR();
2442 			error = 0;
2443 			NG_FREE_ITEM(item);
2444 			break;
2445 		}
2446 		error = (*rcvmsg)(node, item, hook);
2447 		break;
2448 	case NGQF_FN:
2449 	case NGQF_FN2:
2450 		/*
2451 		 * In the case of the shutdown message we allow it to hit
2452 		 * even if the node is invalid.
2453 		 */
2454 		if (NG_NODE_NOT_VALID(node) &&
2455 		    NGI_FN(item) != &ng_rmnode) {
2456 			TRAP_ERROR();
2457 			error = EINVAL;
2458 			NG_FREE_ITEM(item);
2459 			break;
2460 		}
2461 		/* Same is about some internal functions and invalid hook. */
2462 		if (hook && NG_HOOK_NOT_VALID(hook) &&
2463 		    NGI_FN2(item) != &ng_con_part2 &&
2464 		    NGI_FN2(item) != &ng_con_part3 &&
2465 		    NGI_FN(item) != &ng_rmhook_part2) {
2466 			TRAP_ERROR();
2467 			error = EINVAL;
2468 			NG_FREE_ITEM(item);
2469 			break;
2470 		}
2471 
2472 		if ((item->el_flags & NGQF_TYPE) == NGQF_FN) {
2473 			(*NGI_FN(item))(node, hook, NGI_ARG1(item),
2474 			    NGI_ARG2(item));
2475 			NG_FREE_ITEM(item);
2476 		} else	/* it is NGQF_FN2 */
2477 			error = (*NGI_FN2(item))(node, item, hook);
2478 		break;
2479 	}
2480 	/*
2481 	 * We held references on some of the resources
2482 	 * that we took from the item. Now that we have
2483 	 * finished doing everything, drop those references.
2484 	 */
2485 	if (hook)
2486 		NG_HOOK_UNREF(hook);
2487 
2488  	if (rw == NGQRW_R)
2489 		ng_leave_read(node);
2490 	else
2491 		ng_leave_write(node);
2492 
2493 	/* Apply callback. */
2494 	if (apply != NULL) {
2495 		if (depth == 1 && error != 0)
2496 			apply->error = error;
2497 		if (refcount_release(&apply->refs))
2498 			(*apply->apply)(apply->context, apply->error);
2499 	}
2500 
2501 	return (error);
2502 }
2503 
2504 /***********************************************************************
2505  * Implement the 'generic' control messages
2506  ***********************************************************************/
2507 static int
2508 ng_generic_msg(node_p here, item_p item, hook_p lasthook)
2509 {
2510 	int error = 0;
2511 	struct ng_mesg *msg;
2512 	struct ng_mesg *resp = NULL;
2513 
2514 	NGI_GET_MSG(item, msg);
2515 	if (msg->header.typecookie != NGM_GENERIC_COOKIE) {
2516 		TRAP_ERROR();
2517 		error = EINVAL;
2518 		goto out;
2519 	}
2520 	switch (msg->header.cmd) {
2521 	case NGM_SHUTDOWN:
2522 		ng_rmnode(here, NULL, NULL, 0);
2523 		break;
2524 	case NGM_MKPEER:
2525 	    {
2526 		struct ngm_mkpeer *const mkp = (struct ngm_mkpeer *) msg->data;
2527 
2528 		if (msg->header.arglen != sizeof(*mkp)) {
2529 			TRAP_ERROR();
2530 			error = EINVAL;
2531 			break;
2532 		}
2533 		mkp->type[sizeof(mkp->type) - 1] = '\0';
2534 		mkp->ourhook[sizeof(mkp->ourhook) - 1] = '\0';
2535 		mkp->peerhook[sizeof(mkp->peerhook) - 1] = '\0';
2536 		error = ng_mkpeer(here, mkp->ourhook, mkp->peerhook, mkp->type);
2537 		break;
2538 	    }
2539 	case NGM_CONNECT:
2540 	    {
2541 		struct ngm_connect *const con =
2542 			(struct ngm_connect *) msg->data;
2543 		node_p node2;
2544 
2545 		if (msg->header.arglen != sizeof(*con)) {
2546 			TRAP_ERROR();
2547 			error = EINVAL;
2548 			break;
2549 		}
2550 		con->path[sizeof(con->path) - 1] = '\0';
2551 		con->ourhook[sizeof(con->ourhook) - 1] = '\0';
2552 		con->peerhook[sizeof(con->peerhook) - 1] = '\0';
2553 		/* Don't forget we get a reference.. */
2554 		error = ng_path2noderef(here, con->path, &node2, NULL);
2555 		if (error)
2556 			break;
2557 		error = ng_con_nodes(item, here, con->ourhook,
2558 		    node2, con->peerhook);
2559 		NG_NODE_UNREF(node2);
2560 		break;
2561 	    }
2562 	case NGM_NAME:
2563 	    {
2564 		struct ngm_name *const nam = (struct ngm_name *) msg->data;
2565 
2566 		if (msg->header.arglen != sizeof(*nam)) {
2567 			TRAP_ERROR();
2568 			error = EINVAL;
2569 			break;
2570 		}
2571 		nam->name[sizeof(nam->name) - 1] = '\0';
2572 		error = ng_name_node(here, nam->name);
2573 		break;
2574 	    }
2575 	case NGM_RMHOOK:
2576 	    {
2577 		struct ngm_rmhook *const rmh = (struct ngm_rmhook *) msg->data;
2578 		hook_p hook;
2579 
2580 		if (msg->header.arglen != sizeof(*rmh)) {
2581 			TRAP_ERROR();
2582 			error = EINVAL;
2583 			break;
2584 		}
2585 		rmh->ourhook[sizeof(rmh->ourhook) - 1] = '\0';
2586 		if ((hook = ng_findhook(here, rmh->ourhook)) != NULL)
2587 			ng_destroy_hook(hook);
2588 		break;
2589 	    }
2590 	case NGM_NODEINFO:
2591 	    {
2592 		struct nodeinfo *ni;
2593 
2594 		NG_MKRESPONSE(resp, msg, sizeof(*ni), M_NOWAIT);
2595 		if (resp == NULL) {
2596 			error = ENOMEM;
2597 			break;
2598 		}
2599 
2600 		/* Fill in node info */
2601 		ni = (struct nodeinfo *) resp->data;
2602 		if (NG_NODE_HAS_NAME(here))
2603 			strcpy(ni->name, NG_NODE_NAME(here));
2604 		strcpy(ni->type, here->nd_type->name);
2605 		ni->id = ng_node2ID(here);
2606 		ni->hooks = here->nd_numhooks;
2607 		break;
2608 	    }
2609 	case NGM_LISTHOOKS:
2610 	    {
2611 		const int nhooks = here->nd_numhooks;
2612 		struct hooklist *hl;
2613 		struct nodeinfo *ni;
2614 		hook_p hook;
2615 
2616 		/* Get response struct */
2617 		NG_MKRESPONSE(resp, msg, sizeof(*hl) +
2618 		    (nhooks * sizeof(struct linkinfo)), M_NOWAIT);
2619 		if (resp == NULL) {
2620 			error = ENOMEM;
2621 			break;
2622 		}
2623 		hl = (struct hooklist *) resp->data;
2624 		ni = &hl->nodeinfo;
2625 
2626 		/* Fill in node info */
2627 		if (NG_NODE_HAS_NAME(here))
2628 			strcpy(ni->name, NG_NODE_NAME(here));
2629 		strcpy(ni->type, here->nd_type->name);
2630 		ni->id = ng_node2ID(here);
2631 
2632 		/* Cycle through the linked list of hooks */
2633 		ni->hooks = 0;
2634 		LIST_FOREACH(hook, &here->nd_hooks, hk_hooks) {
2635 			struct linkinfo *const link = &hl->link[ni->hooks];
2636 
2637 			if (ni->hooks >= nhooks) {
2638 				log(LOG_ERR, "%s: number of %s changed\n",
2639 				    __func__, "hooks");
2640 				break;
2641 			}
2642 			if (NG_HOOK_NOT_VALID(hook))
2643 				continue;
2644 			strcpy(link->ourhook, NG_HOOK_NAME(hook));
2645 			strcpy(link->peerhook, NG_PEER_HOOK_NAME(hook));
2646 			if (NG_PEER_NODE_NAME(hook)[0] != '\0')
2647 				strcpy(link->nodeinfo.name,
2648 				    NG_PEER_NODE_NAME(hook));
2649 			strcpy(link->nodeinfo.type,
2650 			   NG_PEER_NODE(hook)->nd_type->name);
2651 			link->nodeinfo.id = ng_node2ID(NG_PEER_NODE(hook));
2652 			link->nodeinfo.hooks = NG_PEER_NODE(hook)->nd_numhooks;
2653 			ni->hooks++;
2654 		}
2655 		break;
2656 	    }
2657 
2658 	case NGM_LISTNODES:
2659 	    {
2660 		struct namelist *nl;
2661 		node_p node;
2662 		int i;
2663 
2664 		IDHASH_RLOCK();
2665 		/* Get response struct. */
2666 		NG_MKRESPONSE(resp, msg, sizeof(*nl) +
2667 		    (V_ng_nodes * sizeof(struct nodeinfo)), M_NOWAIT | M_ZERO);
2668 		if (resp == NULL) {
2669 			IDHASH_RUNLOCK();
2670 			error = ENOMEM;
2671 			break;
2672 		}
2673 		nl = (struct namelist *) resp->data;
2674 
2675 		/* Cycle through the lists of nodes. */
2676 		nl->numnames = 0;
2677 		for (i = 0; i <= V_ng_ID_hmask; i++) {
2678 			LIST_FOREACH(node, &V_ng_ID_hash[i], nd_idnodes) {
2679 				struct nodeinfo *const np =
2680 				    &nl->nodeinfo[nl->numnames];
2681 
2682 				if (NG_NODE_NOT_VALID(node))
2683 					continue;
2684 				if (NG_NODE_HAS_NAME(node))
2685 					strcpy(np->name, NG_NODE_NAME(node));
2686 				strcpy(np->type, node->nd_type->name);
2687 				np->id = ng_node2ID(node);
2688 				np->hooks = node->nd_numhooks;
2689 				KASSERT(nl->numnames < V_ng_nodes,
2690 				    ("%s: no space", __func__));
2691 				nl->numnames++;
2692 			}
2693 		}
2694 		IDHASH_RUNLOCK();
2695 		break;
2696 	    }
2697 	case NGM_LISTNAMES:
2698 	    {
2699 		struct namelist *nl;
2700 		node_p node;
2701 		int i;
2702 
2703 		NAMEHASH_RLOCK();
2704 		/* Get response struct. */
2705 		NG_MKRESPONSE(resp, msg, sizeof(*nl) +
2706 		    (V_ng_named_nodes * sizeof(struct nodeinfo)), M_NOWAIT);
2707 		if (resp == NULL) {
2708 			NAMEHASH_RUNLOCK();
2709 			error = ENOMEM;
2710 			break;
2711 		}
2712 		nl = (struct namelist *) resp->data;
2713 
2714 		/* Cycle through the lists of nodes. */
2715 		nl->numnames = 0;
2716 		for (i = 0; i <= V_ng_name_hmask; i++) {
2717 			LIST_FOREACH(node, &V_ng_name_hash[i], nd_nodes) {
2718 				struct nodeinfo *const np =
2719 				    &nl->nodeinfo[nl->numnames];
2720 
2721 				if (NG_NODE_NOT_VALID(node))
2722 					continue;
2723 				strcpy(np->name, NG_NODE_NAME(node));
2724 				strcpy(np->type, node->nd_type->name);
2725 				np->id = ng_node2ID(node);
2726 				np->hooks = node->nd_numhooks;
2727 				KASSERT(nl->numnames < V_ng_named_nodes,
2728 				    ("%s: no space", __func__));
2729 				nl->numnames++;
2730 			}
2731 		}
2732 		NAMEHASH_RUNLOCK();
2733 		break;
2734 	    }
2735 
2736 	case NGM_LISTTYPES:
2737 	    {
2738 		struct typelist *tl;
2739 		struct ng_type *type;
2740 		int num = 0;
2741 
2742 		TYPELIST_RLOCK();
2743 		/* Count number of types */
2744 		LIST_FOREACH(type, &ng_typelist, types)
2745 			num++;
2746 
2747 		/* Get response struct */
2748 		NG_MKRESPONSE(resp, msg, sizeof(*tl) +
2749 		    (num * sizeof(struct typeinfo)), M_NOWAIT);
2750 		if (resp == NULL) {
2751 			TYPELIST_RUNLOCK();
2752 			error = ENOMEM;
2753 			break;
2754 		}
2755 		tl = (struct typelist *) resp->data;
2756 
2757 		/* Cycle through the linked list of types */
2758 		tl->numtypes = 0;
2759 		LIST_FOREACH(type, &ng_typelist, types) {
2760 			struct typeinfo *const tp = &tl->typeinfo[tl->numtypes];
2761 
2762 			strcpy(tp->type_name, type->name);
2763 			tp->numnodes = type->refs - 1; /* don't count list */
2764 			KASSERT(tl->numtypes < num, ("%s: no space", __func__));
2765 			tl->numtypes++;
2766 		}
2767 		TYPELIST_RUNLOCK();
2768 		break;
2769 	    }
2770 
2771 	case NGM_BINARY2ASCII:
2772 	    {
2773 		int bufSize = 20 * 1024;	/* XXX hard coded constant */
2774 		const struct ng_parse_type *argstype;
2775 		const struct ng_cmdlist *c;
2776 		struct ng_mesg *binary, *ascii;
2777 
2778 		/* Data area must contain a valid netgraph message */
2779 		binary = (struct ng_mesg *)msg->data;
2780 		if (msg->header.arglen < sizeof(struct ng_mesg) ||
2781 		    (msg->header.arglen - sizeof(struct ng_mesg) <
2782 		    binary->header.arglen)) {
2783 			TRAP_ERROR();
2784 			error = EINVAL;
2785 			break;
2786 		}
2787 
2788 		/* Get a response message with lots of room */
2789 		NG_MKRESPONSE(resp, msg, sizeof(*ascii) + bufSize, M_NOWAIT);
2790 		if (resp == NULL) {
2791 			error = ENOMEM;
2792 			break;
2793 		}
2794 		ascii = (struct ng_mesg *)resp->data;
2795 
2796 		/* Copy binary message header to response message payload */
2797 		bcopy(binary, ascii, sizeof(*binary));
2798 
2799 		/* Find command by matching typecookie and command number */
2800 		for (c = here->nd_type->cmdlist; c != NULL && c->name != NULL;
2801 		    c++) {
2802 			if (binary->header.typecookie == c->cookie &&
2803 			    binary->header.cmd == c->cmd)
2804 				break;
2805 		}
2806 		if (c == NULL || c->name == NULL) {
2807 			for (c = ng_generic_cmds; c->name != NULL; c++) {
2808 				if (binary->header.typecookie == c->cookie &&
2809 				    binary->header.cmd == c->cmd)
2810 					break;
2811 			}
2812 			if (c->name == NULL) {
2813 				NG_FREE_MSG(resp);
2814 				error = ENOSYS;
2815 				break;
2816 			}
2817 		}
2818 
2819 		/* Convert command name to ASCII */
2820 		snprintf(ascii->header.cmdstr, sizeof(ascii->header.cmdstr),
2821 		    "%s", c->name);
2822 
2823 		/* Convert command arguments to ASCII */
2824 		argstype = (binary->header.flags & NGF_RESP) ?
2825 		    c->respType : c->mesgType;
2826 		if (argstype == NULL) {
2827 			*ascii->data = '\0';
2828 		} else {
2829 			if ((error = ng_unparse(argstype,
2830 			    (u_char *)binary->data,
2831 			    ascii->data, bufSize)) != 0) {
2832 				NG_FREE_MSG(resp);
2833 				break;
2834 			}
2835 		}
2836 
2837 		/* Return the result as struct ng_mesg plus ASCII string */
2838 		bufSize = strlen(ascii->data) + 1;
2839 		ascii->header.arglen = bufSize;
2840 		resp->header.arglen = sizeof(*ascii) + bufSize;
2841 		break;
2842 	    }
2843 
2844 	case NGM_ASCII2BINARY:
2845 	    {
2846 		int bufSize = 20 * 1024;	/* XXX hard coded constant */
2847 		const struct ng_cmdlist *c;
2848 		const struct ng_parse_type *argstype;
2849 		struct ng_mesg *ascii, *binary;
2850 		int off = 0;
2851 
2852 		/* Data area must contain at least a struct ng_mesg + '\0' */
2853 		ascii = (struct ng_mesg *)msg->data;
2854 		if ((msg->header.arglen < sizeof(*ascii) + 1) ||
2855 		    (ascii->header.arglen < 1) ||
2856 		    (msg->header.arglen < sizeof(*ascii) +
2857 		    ascii->header.arglen)) {
2858 			TRAP_ERROR();
2859 			error = EINVAL;
2860 			break;
2861 		}
2862 		ascii->data[ascii->header.arglen - 1] = '\0';
2863 
2864 		/* Get a response message with lots of room */
2865 		NG_MKRESPONSE(resp, msg, sizeof(*binary) + bufSize, M_NOWAIT);
2866 		if (resp == NULL) {
2867 			error = ENOMEM;
2868 			break;
2869 		}
2870 		binary = (struct ng_mesg *)resp->data;
2871 
2872 		/* Copy ASCII message header to response message payload */
2873 		bcopy(ascii, binary, sizeof(*ascii));
2874 
2875 		/* Find command by matching ASCII command string */
2876 		for (c = here->nd_type->cmdlist;
2877 		    c != NULL && c->name != NULL; c++) {
2878 			if (strcmp(ascii->header.cmdstr, c->name) == 0)
2879 				break;
2880 		}
2881 		if (c == NULL || c->name == NULL) {
2882 			for (c = ng_generic_cmds; c->name != NULL; c++) {
2883 				if (strcmp(ascii->header.cmdstr, c->name) == 0)
2884 					break;
2885 			}
2886 			if (c->name == NULL) {
2887 				NG_FREE_MSG(resp);
2888 				error = ENOSYS;
2889 				break;
2890 			}
2891 		}
2892 
2893 		/* Convert command name to binary */
2894 		binary->header.cmd = c->cmd;
2895 		binary->header.typecookie = c->cookie;
2896 
2897 		/* Convert command arguments to binary */
2898 		argstype = (binary->header.flags & NGF_RESP) ?
2899 		    c->respType : c->mesgType;
2900 		if (argstype == NULL) {
2901 			bufSize = 0;
2902 		} else {
2903 			if ((error = ng_parse(argstype, ascii->data, &off,
2904 			    (u_char *)binary->data, &bufSize)) != 0) {
2905 				NG_FREE_MSG(resp);
2906 				break;
2907 			}
2908 		}
2909 
2910 		/* Return the result */
2911 		binary->header.arglen = bufSize;
2912 		resp->header.arglen = sizeof(*binary) + bufSize;
2913 		break;
2914 	    }
2915 
2916 	case NGM_TEXT_CONFIG:
2917 	case NGM_TEXT_STATUS:
2918 		/*
2919 		 * This one is tricky as it passes the command down to the
2920 		 * actual node, even though it is a generic type command.
2921 		 * This means we must assume that the item/msg is already freed
2922 		 * when control passes back to us.
2923 		 */
2924 		if (here->nd_type->rcvmsg != NULL) {
2925 			NGI_MSG(item) = msg; /* put it back as we found it */
2926 			return((*here->nd_type->rcvmsg)(here, item, lasthook));
2927 		}
2928 		/* Fall through if rcvmsg not supported */
2929 	default:
2930 		TRAP_ERROR();
2931 		error = EINVAL;
2932 	}
2933 	/*
2934 	 * Sometimes a generic message may be statically allocated
2935 	 * to avoid problems with allocating when in tight memory situations.
2936 	 * Don't free it if it is so.
2937 	 * I break them appart here, because erros may cause a free if the item
2938 	 * in which case we'd be doing it twice.
2939 	 * they are kept together above, to simplify freeing.
2940 	 */
2941 out:
2942 	NG_RESPOND_MSG(error, here, item, resp);
2943 	NG_FREE_MSG(msg);
2944 	return (error);
2945 }
2946 
2947 /************************************************************************
2948 			Queue element get/free routines
2949 ************************************************************************/
2950 
2951 uma_zone_t			ng_qzone;
2952 uma_zone_t			ng_qdzone;
2953 static int			numthreads = 0; /* number of queue threads */
2954 static int			maxalloc = 4096;/* limit the damage of a leak */
2955 static int			maxdata = 4096;	/* limit the damage of a DoS */
2956 
2957 SYSCTL_INT(_net_graph, OID_AUTO, threads, CTLFLAG_RDTUN, &numthreads,
2958     0, "Number of queue processing threads");
2959 SYSCTL_INT(_net_graph, OID_AUTO, maxalloc, CTLFLAG_RDTUN, &maxalloc,
2960     0, "Maximum number of non-data queue items to allocate");
2961 SYSCTL_INT(_net_graph, OID_AUTO, maxdata, CTLFLAG_RDTUN, &maxdata,
2962     0, "Maximum number of data queue items to allocate");
2963 
2964 #ifdef	NETGRAPH_DEBUG
2965 static TAILQ_HEAD(, ng_item) ng_itemlist = TAILQ_HEAD_INITIALIZER(ng_itemlist);
2966 static int allocated;	/* number of items malloc'd */
2967 #endif
2968 
2969 /*
2970  * Get a queue entry.
2971  * This is usually called when a packet first enters netgraph.
2972  * By definition, this is usually from an interrupt, or from a user.
2973  * Users are not so important, but try be quick for the times that it's
2974  * an interrupt.
2975  */
2976 static __inline item_p
2977 ng_alloc_item(int type, int flags)
2978 {
2979 	item_p item;
2980 
2981 	KASSERT(((type & ~NGQF_TYPE) == 0),
2982 	    ("%s: incorrect item type: %d", __func__, type));
2983 
2984 	item = uma_zalloc((type == NGQF_DATA) ? ng_qdzone : ng_qzone,
2985 	    ((flags & NG_WAITOK) ? M_WAITOK : M_NOWAIT) | M_ZERO);
2986 
2987 	if (item) {
2988 		item->el_flags = type;
2989 #ifdef	NETGRAPH_DEBUG
2990 		mtx_lock(&ngq_mtx);
2991 		TAILQ_INSERT_TAIL(&ng_itemlist, item, all);
2992 		allocated++;
2993 		mtx_unlock(&ngq_mtx);
2994 #endif
2995 	}
2996 
2997 	return (item);
2998 }
2999 
3000 /*
3001  * Release a queue entry
3002  */
3003 void
3004 ng_free_item(item_p item)
3005 {
3006 	/*
3007 	 * The item may hold resources on it's own. We need to free
3008 	 * these before we can free the item. What they are depends upon
3009 	 * what kind of item it is. it is important that nodes zero
3010 	 * out pointers to resources that they remove from the item
3011 	 * or we release them again here.
3012 	 */
3013 	switch (item->el_flags & NGQF_TYPE) {
3014 	case NGQF_DATA:
3015 		/* If we have an mbuf still attached.. */
3016 		NG_FREE_M(_NGI_M(item));
3017 		break;
3018 	case NGQF_MESG:
3019 		_NGI_RETADDR(item) = 0;
3020 		NG_FREE_MSG(_NGI_MSG(item));
3021 		break;
3022 	case NGQF_FN:
3023 	case NGQF_FN2:
3024 		/* nothing to free really, */
3025 		_NGI_FN(item) = NULL;
3026 		_NGI_ARG1(item) = NULL;
3027 		_NGI_ARG2(item) = 0;
3028 		break;
3029 	}
3030 	/* If we still have a node or hook referenced... */
3031 	_NGI_CLR_NODE(item);
3032 	_NGI_CLR_HOOK(item);
3033 
3034 #ifdef	NETGRAPH_DEBUG
3035 	mtx_lock(&ngq_mtx);
3036 	TAILQ_REMOVE(&ng_itemlist, item, all);
3037 	allocated--;
3038 	mtx_unlock(&ngq_mtx);
3039 #endif
3040 	uma_zfree(((item->el_flags & NGQF_TYPE) == NGQF_DATA) ?
3041 	    ng_qdzone : ng_qzone, item);
3042 }
3043 
3044 /*
3045  * Change type of the queue entry.
3046  * Possibly reallocates it from another UMA zone.
3047  */
3048 static __inline item_p
3049 ng_realloc_item(item_p pitem, int type, int flags)
3050 {
3051 	item_p item;
3052 	int from, to;
3053 
3054 	KASSERT((pitem != NULL), ("%s: can't reallocate NULL", __func__));
3055 	KASSERT(((type & ~NGQF_TYPE) == 0),
3056 	    ("%s: incorrect item type: %d", __func__, type));
3057 
3058 	from = ((pitem->el_flags & NGQF_TYPE) == NGQF_DATA);
3059 	to = (type == NGQF_DATA);
3060 	if (from != to) {
3061 		/* If reallocation is required do it and copy item. */
3062 		if ((item = ng_alloc_item(type, flags)) == NULL) {
3063 			ng_free_item(pitem);
3064 			return (NULL);
3065 		}
3066 		*item = *pitem;
3067 		ng_free_item(pitem);
3068 	} else
3069 		item = pitem;
3070 	item->el_flags = (item->el_flags & ~NGQF_TYPE) | type;
3071 
3072 	return (item);
3073 }
3074 
3075 /************************************************************************
3076 			Module routines
3077 ************************************************************************/
3078 
3079 /*
3080  * Handle the loading/unloading of a netgraph node type module
3081  */
3082 int
3083 ng_mod_event(module_t mod, int event, void *data)
3084 {
3085 	struct ng_type *const type = data;
3086 	int error = 0;
3087 
3088 	switch (event) {
3089 	case MOD_LOAD:
3090 
3091 		/* Register new netgraph node type */
3092 		if ((error = ng_newtype(type)) != 0)
3093 			break;
3094 
3095 		/* Call type specific code */
3096 		if (type->mod_event != NULL)
3097 			if ((error = (*type->mod_event)(mod, event, data))) {
3098 				TYPELIST_WLOCK();
3099 				type->refs--;	/* undo it */
3100 				LIST_REMOVE(type, types);
3101 				TYPELIST_WUNLOCK();
3102 			}
3103 		break;
3104 
3105 	case MOD_UNLOAD:
3106 		if (type->refs > 1) {		/* make sure no nodes exist! */
3107 			error = EBUSY;
3108 		} else {
3109 			if (type->refs == 0) /* failed load, nothing to undo */
3110 				break;
3111 			if (type->mod_event != NULL) {	/* check with type */
3112 				error = (*type->mod_event)(mod, event, data);
3113 				if (error != 0)	/* type refuses.. */
3114 					break;
3115 			}
3116 			TYPELIST_WLOCK();
3117 			LIST_REMOVE(type, types);
3118 			TYPELIST_WUNLOCK();
3119 		}
3120 		break;
3121 
3122 	default:
3123 		if (type->mod_event != NULL)
3124 			error = (*type->mod_event)(mod, event, data);
3125 		else
3126 			error = EOPNOTSUPP;		/* XXX ? */
3127 		break;
3128 	}
3129 	return (error);
3130 }
3131 
3132 static void
3133 vnet_netgraph_init(const void *unused __unused)
3134 {
3135 
3136 	/* We start with small hashes, but they can grow. */
3137 	V_ng_ID_hash = hashinit(16, M_NETGRAPH_NODE, &V_ng_ID_hmask);
3138 	V_ng_name_hash = hashinit(16, M_NETGRAPH_NODE, &V_ng_name_hmask);
3139 }
3140 VNET_SYSINIT(vnet_netgraph_init, SI_SUB_NETGRAPH, SI_ORDER_FIRST,
3141     vnet_netgraph_init, NULL);
3142 
3143 #ifdef VIMAGE
3144 static void
3145 vnet_netgraph_uninit(const void *unused __unused)
3146 {
3147 	node_p node = NULL, last_killed = NULL;
3148 	int i;
3149 
3150 	do {
3151 		/* Find a node to kill */
3152 		IDHASH_RLOCK();
3153 		for (i = 0; i <= V_ng_ID_hmask; i++) {
3154 			LIST_FOREACH(node, &V_ng_ID_hash[i], nd_idnodes) {
3155 				if (node != &ng_deadnode) {
3156 					NG_NODE_REF(node);
3157 					break;
3158 				}
3159 			}
3160 			if (node != NULL)
3161 				break;
3162 		}
3163 		IDHASH_RUNLOCK();
3164 
3165 		/* Attempt to kill it only if it is a regular node */
3166 		if (node != NULL) {
3167 			if (node == last_killed) {
3168 				/* This should never happen */
3169 				printf("ng node %s needs NGF_REALLY_DIE\n",
3170 				    node->nd_name);
3171 				if (node->nd_flags & NGF_REALLY_DIE)
3172 					panic("ng node %s won't die",
3173 					    node->nd_name);
3174 				node->nd_flags |= NGF_REALLY_DIE;
3175 			}
3176 			ng_rmnode(node, NULL, NULL, 0);
3177 			NG_NODE_UNREF(node);
3178 			last_killed = node;
3179 		}
3180 	} while (node != NULL);
3181 
3182 	hashdestroy(V_ng_name_hash, M_NETGRAPH_NODE, V_ng_name_hmask);
3183 	hashdestroy(V_ng_ID_hash, M_NETGRAPH_NODE, V_ng_ID_hmask);
3184 }
3185 VNET_SYSUNINIT(vnet_netgraph_uninit, SI_SUB_NETGRAPH, SI_ORDER_FIRST,
3186     vnet_netgraph_uninit, NULL);
3187 #endif /* VIMAGE */
3188 
3189 /*
3190  * Handle loading and unloading for this code.
3191  * The only thing we need to link into is the NETISR strucure.
3192  */
3193 static int
3194 ngb_mod_event(module_t mod, int event, void *data)
3195 {
3196 	struct proc *p;
3197 	struct thread *td;
3198 	int i, error = 0;
3199 
3200 	switch (event) {
3201 	case MOD_LOAD:
3202 		/* Initialize everything. */
3203 		NG_WORKLIST_LOCK_INIT();
3204 		rw_init(&ng_typelist_lock, "netgraph types");
3205 		rw_init(&ng_idhash_lock, "netgraph idhash");
3206 		rw_init(&ng_namehash_lock, "netgraph namehash");
3207 		rw_init(&ng_topo_lock, "netgraph topology mutex");
3208 #ifdef	NETGRAPH_DEBUG
3209 		mtx_init(&ng_nodelist_mtx, "netgraph nodelist mutex", NULL,
3210 		    MTX_DEF);
3211 		mtx_init(&ngq_mtx, "netgraph item list mutex", NULL,
3212 		    MTX_DEF);
3213 #endif
3214 		ng_qzone = uma_zcreate("NetGraph items", sizeof(struct ng_item),
3215 		    NULL, NULL, NULL, NULL, UMA_ALIGN_CACHE, 0);
3216 		uma_zone_set_max(ng_qzone, maxalloc);
3217 		ng_qdzone = uma_zcreate("NetGraph data items",
3218 		    sizeof(struct ng_item), NULL, NULL, NULL, NULL,
3219 		    UMA_ALIGN_CACHE, 0);
3220 		uma_zone_set_max(ng_qdzone, maxdata);
3221 		/* Autoconfigure number of threads. */
3222 		if (numthreads <= 0)
3223 			numthreads = mp_ncpus;
3224 		/* Create threads. */
3225     		p = NULL; /* start with no process */
3226 		for (i = 0; i < numthreads; i++) {
3227 			if (kproc_kthread_add(ngthread, NULL, &p, &td,
3228 			    RFHIGHPID, 0, "ng_queue", "ng_queue%d", i)) {
3229 				numthreads = i;
3230 				break;
3231 			}
3232 		}
3233 		break;
3234 	case MOD_UNLOAD:
3235 		/* You can't unload it because an interface may be using it. */
3236 		error = EBUSY;
3237 		break;
3238 	default:
3239 		error = EOPNOTSUPP;
3240 		break;
3241 	}
3242 	return (error);
3243 }
3244 
3245 static moduledata_t netgraph_mod = {
3246 	"netgraph",
3247 	ngb_mod_event,
3248 	(NULL)
3249 };
3250 DECLARE_MODULE(netgraph, netgraph_mod, SI_SUB_NETGRAPH, SI_ORDER_FIRST);
3251 SYSCTL_NODE(_net, OID_AUTO, graph, CTLFLAG_RW, 0, "netgraph Family");
3252 SYSCTL_INT(_net_graph, OID_AUTO, abi_version, CTLFLAG_RD, SYSCTL_NULL_INT_PTR, NG_ABI_VERSION,"");
3253 SYSCTL_INT(_net_graph, OID_AUTO, msg_version, CTLFLAG_RD, SYSCTL_NULL_INT_PTR, NG_VERSION, "");
3254 
3255 #ifdef	NETGRAPH_DEBUG
3256 void
3257 dumphook (hook_p hook, char *file, int line)
3258 {
3259 	printf("hook: name %s, %d refs, Last touched:\n",
3260 		_NG_HOOK_NAME(hook), hook->hk_refs);
3261 	printf("	Last active @ %s, line %d\n",
3262 		hook->lastfile, hook->lastline);
3263 	if (line) {
3264 		printf(" problem discovered at file %s, line %d\n", file, line);
3265 #ifdef KDB
3266 		kdb_backtrace();
3267 #endif
3268 	}
3269 }
3270 
3271 void
3272 dumpnode(node_p node, char *file, int line)
3273 {
3274 	printf("node: ID [%x]: type '%s', %d hooks, flags 0x%x, %d refs, %s:\n",
3275 		_NG_NODE_ID(node), node->nd_type->name,
3276 		node->nd_numhooks, node->nd_flags,
3277 		node->nd_refs, node->nd_name);
3278 	printf("	Last active @ %s, line %d\n",
3279 		node->lastfile, node->lastline);
3280 	if (line) {
3281 		printf(" problem discovered at file %s, line %d\n", file, line);
3282 #ifdef KDB
3283 		kdb_backtrace();
3284 #endif
3285 	}
3286 }
3287 
3288 void
3289 dumpitem(item_p item, char *file, int line)
3290 {
3291 	printf(" ACTIVE item, last used at %s, line %d",
3292 		item->lastfile, item->lastline);
3293 	switch(item->el_flags & NGQF_TYPE) {
3294 	case NGQF_DATA:
3295 		printf(" - [data]\n");
3296 		break;
3297 	case NGQF_MESG:
3298 		printf(" - retaddr[%d]:\n", _NGI_RETADDR(item));
3299 		break;
3300 	case NGQF_FN:
3301 		printf(" - fn@%p (%p, %p, %p, %d (%x))\n",
3302 			_NGI_FN(item),
3303 			_NGI_NODE(item),
3304 			_NGI_HOOK(item),
3305 			item->body.fn.fn_arg1,
3306 			item->body.fn.fn_arg2,
3307 			item->body.fn.fn_arg2);
3308 		break;
3309 	case NGQF_FN2:
3310 		printf(" - fn2@%p (%p, %p, %p, %d (%x))\n",
3311 			_NGI_FN2(item),
3312 			_NGI_NODE(item),
3313 			_NGI_HOOK(item),
3314 			item->body.fn.fn_arg1,
3315 			item->body.fn.fn_arg2,
3316 			item->body.fn.fn_arg2);
3317 		break;
3318 	}
3319 	if (line) {
3320 		printf(" problem discovered at file %s, line %d\n", file, line);
3321 		if (_NGI_NODE(item)) {
3322 			printf("node %p ([%x])\n",
3323 				_NGI_NODE(item), ng_node2ID(_NGI_NODE(item)));
3324 		}
3325 	}
3326 }
3327 
3328 static void
3329 ng_dumpitems(void)
3330 {
3331 	item_p item;
3332 	int i = 1;
3333 	TAILQ_FOREACH(item, &ng_itemlist, all) {
3334 		printf("[%d] ", i++);
3335 		dumpitem(item, NULL, 0);
3336 	}
3337 }
3338 
3339 static void
3340 ng_dumpnodes(void)
3341 {
3342 	node_p node;
3343 	int i = 1;
3344 	mtx_lock(&ng_nodelist_mtx);
3345 	SLIST_FOREACH(node, &ng_allnodes, nd_all) {
3346 		printf("[%d] ", i++);
3347 		dumpnode(node, NULL, 0);
3348 	}
3349 	mtx_unlock(&ng_nodelist_mtx);
3350 }
3351 
3352 static void
3353 ng_dumphooks(void)
3354 {
3355 	hook_p hook;
3356 	int i = 1;
3357 	mtx_lock(&ng_nodelist_mtx);
3358 	SLIST_FOREACH(hook, &ng_allhooks, hk_all) {
3359 		printf("[%d] ", i++);
3360 		dumphook(hook, NULL, 0);
3361 	}
3362 	mtx_unlock(&ng_nodelist_mtx);
3363 }
3364 
3365 static int
3366 sysctl_debug_ng_dump_items(SYSCTL_HANDLER_ARGS)
3367 {
3368 	int error;
3369 	int val;
3370 	int i;
3371 
3372 	val = allocated;
3373 	i = 1;
3374 	error = sysctl_handle_int(oidp, &val, 0, req);
3375 	if (error != 0 || req->newptr == NULL)
3376 		return (error);
3377 	if (val == 42) {
3378 		ng_dumpitems();
3379 		ng_dumpnodes();
3380 		ng_dumphooks();
3381 	}
3382 	return (0);
3383 }
3384 
3385 SYSCTL_PROC(_debug, OID_AUTO, ng_dump_items, CTLTYPE_INT | CTLFLAG_RW,
3386     0, sizeof(int), sysctl_debug_ng_dump_items, "I", "Number of allocated items");
3387 #endif	/* NETGRAPH_DEBUG */
3388 
3389 /***********************************************************************
3390 * Worklist routines
3391 **********************************************************************/
3392 /*
3393  * Pick a node off the list of nodes with work,
3394  * try get an item to process off it. Remove the node from the list.
3395  */
3396 static void
3397 ngthread(void *arg)
3398 {
3399 	for (;;) {
3400 		node_p  node;
3401 
3402 		/* Get node from the worklist. */
3403 		NG_WORKLIST_LOCK();
3404 		while ((node = STAILQ_FIRST(&ng_worklist)) == NULL)
3405 			NG_WORKLIST_SLEEP();
3406 		STAILQ_REMOVE_HEAD(&ng_worklist, nd_input_queue.q_work);
3407 		NG_WORKLIST_UNLOCK();
3408 		CURVNET_SET(node->nd_vnet);
3409 		CTR3(KTR_NET, "%20s: node [%x] (%p) taken off worklist",
3410 		    __func__, node->nd_ID, node);
3411 		/*
3412 		 * We have the node. We also take over the reference
3413 		 * that the list had on it.
3414 		 * Now process as much as you can, until it won't
3415 		 * let you have another item off the queue.
3416 		 * All this time, keep the reference
3417 		 * that lets us be sure that the node still exists.
3418 		 * Let the reference go at the last minute.
3419 		 */
3420 		for (;;) {
3421 			item_p item;
3422 			int rw;
3423 
3424 			NG_QUEUE_LOCK(&node->nd_input_queue);
3425 			item = ng_dequeue(node, &rw);
3426 			if (item == NULL) {
3427 				node->nd_input_queue.q_flags2 &= ~NGQ2_WORKQ;
3428 				NG_QUEUE_UNLOCK(&node->nd_input_queue);
3429 				break; /* go look for another node */
3430 			} else {
3431 				NG_QUEUE_UNLOCK(&node->nd_input_queue);
3432 				NGI_GET_NODE(item, node); /* zaps stored node */
3433 				ng_apply_item(node, item, rw);
3434 				NG_NODE_UNREF(node);
3435 			}
3436 		}
3437 		NG_NODE_UNREF(node);
3438 		CURVNET_RESTORE();
3439 	}
3440 }
3441 
3442 /*
3443  * XXX
3444  * It's posible that a debugging NG_NODE_REF may need
3445  * to be outside the mutex zone
3446  */
3447 static void
3448 ng_worklist_add(node_p node)
3449 {
3450 
3451 	mtx_assert(&node->nd_input_queue.q_mtx, MA_OWNED);
3452 
3453 	if ((node->nd_input_queue.q_flags2 & NGQ2_WORKQ) == 0) {
3454 		/*
3455 		 * If we are not already on the work queue,
3456 		 * then put us on.
3457 		 */
3458 		node->nd_input_queue.q_flags2 |= NGQ2_WORKQ;
3459 		NG_NODE_REF(node); /* XXX safe in mutex? */
3460 		NG_WORKLIST_LOCK();
3461 		STAILQ_INSERT_TAIL(&ng_worklist, node, nd_input_queue.q_work);
3462 		NG_WORKLIST_UNLOCK();
3463 		CTR3(KTR_NET, "%20s: node [%x] (%p) put on worklist", __func__,
3464 		    node->nd_ID, node);
3465 		NG_WORKLIST_WAKEUP();
3466 	} else {
3467 		CTR3(KTR_NET, "%20s: node [%x] (%p) already on worklist",
3468 		    __func__, node->nd_ID, node);
3469 	}
3470 }
3471 
3472 /***********************************************************************
3473 * Externally useable functions to set up a queue item ready for sending
3474 ***********************************************************************/
3475 
3476 #ifdef	NETGRAPH_DEBUG
3477 #define	ITEM_DEBUG_CHECKS						\
3478 	do {								\
3479 		if (NGI_NODE(item) ) {					\
3480 			printf("item already has node");		\
3481 			kdb_enter(KDB_WHY_NETGRAPH, "has node");	\
3482 			NGI_CLR_NODE(item);				\
3483 		}							\
3484 		if (NGI_HOOK(item) ) {					\
3485 			printf("item already has hook");		\
3486 			kdb_enter(KDB_WHY_NETGRAPH, "has hook");	\
3487 			NGI_CLR_HOOK(item);				\
3488 		}							\
3489 	} while (0)
3490 #else
3491 #define ITEM_DEBUG_CHECKS
3492 #endif
3493 
3494 /*
3495  * Put mbuf into the item.
3496  * Hook and node references will be removed when the item is dequeued.
3497  * (or equivalent)
3498  * (XXX) Unsafe because no reference held by peer on remote node.
3499  * remote node might go away in this timescale.
3500  * We know the hooks can't go away because that would require getting
3501  * a writer item on both nodes and we must have at least a  reader
3502  * here to be able to do this.
3503  * Note that the hook loaded is the REMOTE hook.
3504  *
3505  * This is possibly in the critical path for new data.
3506  */
3507 item_p
3508 ng_package_data(struct mbuf *m, int flags)
3509 {
3510 	item_p item;
3511 
3512 	if ((item = ng_alloc_item(NGQF_DATA, flags)) == NULL) {
3513 		NG_FREE_M(m);
3514 		return (NULL);
3515 	}
3516 	ITEM_DEBUG_CHECKS;
3517 	item->el_flags |= NGQF_READER;
3518 	NGI_M(item) = m;
3519 	return (item);
3520 }
3521 
3522 /*
3523  * Allocate a queue item and put items into it..
3524  * Evaluate the address as this will be needed to queue it and
3525  * to work out what some of the fields should be.
3526  * Hook and node references will be removed when the item is dequeued.
3527  * (or equivalent)
3528  */
3529 item_p
3530 ng_package_msg(struct ng_mesg *msg, int flags)
3531 {
3532 	item_p item;
3533 
3534 	if ((item = ng_alloc_item(NGQF_MESG, flags)) == NULL) {
3535 		NG_FREE_MSG(msg);
3536 		return (NULL);
3537 	}
3538 	ITEM_DEBUG_CHECKS;
3539 	/* Messages items count as writers unless explicitly exempted. */
3540 	if (msg->header.cmd & NGM_READONLY)
3541 		item->el_flags |= NGQF_READER;
3542 	else
3543 		item->el_flags |= NGQF_WRITER;
3544 	/*
3545 	 * Set the current lasthook into the queue item
3546 	 */
3547 	NGI_MSG(item) = msg;
3548 	NGI_RETADDR(item) = 0;
3549 	return (item);
3550 }
3551 
3552 #define SET_RETADDR(item, here, retaddr)				\
3553 	do {	/* Data or fn items don't have retaddrs */		\
3554 		if ((item->el_flags & NGQF_TYPE) == NGQF_MESG) {	\
3555 			if (retaddr) {					\
3556 				NGI_RETADDR(item) = retaddr;		\
3557 			} else {					\
3558 				/*					\
3559 				 * The old return address should be ok.	\
3560 				 * If there isn't one, use the address	\
3561 				 * here.				\
3562 				 */					\
3563 				if (NGI_RETADDR(item) == 0) {		\
3564 					NGI_RETADDR(item)		\
3565 						= ng_node2ID(here);	\
3566 				}					\
3567 			}						\
3568 		}							\
3569 	} while (0)
3570 
3571 int
3572 ng_address_hook(node_p here, item_p item, hook_p hook, ng_ID_t retaddr)
3573 {
3574 	hook_p peer;
3575 	node_p peernode;
3576 	ITEM_DEBUG_CHECKS;
3577 	/*
3578 	 * Quick sanity check..
3579 	 * Since a hook holds a reference on it's node, once we know
3580 	 * that the peer is still connected (even if invalid,) we know
3581 	 * that the peer node is present, though maybe invalid.
3582 	 */
3583 	TOPOLOGY_RLOCK();
3584 	if ((hook == NULL) || NG_HOOK_NOT_VALID(hook) ||
3585 	    NG_HOOK_NOT_VALID(peer = NG_HOOK_PEER(hook)) ||
3586 	    NG_NODE_NOT_VALID(peernode = NG_PEER_NODE(hook))) {
3587 		NG_FREE_ITEM(item);
3588 		TRAP_ERROR();
3589 		TOPOLOGY_RUNLOCK();
3590 		return (ENETDOWN);
3591 	}
3592 
3593 	/*
3594 	 * Transfer our interest to the other (peer) end.
3595 	 */
3596 	NG_HOOK_REF(peer);
3597 	NG_NODE_REF(peernode);
3598 	NGI_SET_HOOK(item, peer);
3599 	NGI_SET_NODE(item, peernode);
3600 	SET_RETADDR(item, here, retaddr);
3601 
3602 	TOPOLOGY_RUNLOCK();
3603 
3604 	return (0);
3605 }
3606 
3607 int
3608 ng_address_path(node_p here, item_p item, const char *address, ng_ID_t retaddr)
3609 {
3610 	node_p	dest = NULL;
3611 	hook_p	hook = NULL;
3612 	int	error;
3613 
3614 	ITEM_DEBUG_CHECKS;
3615 	/*
3616 	 * Note that ng_path2noderef increments the reference count
3617 	 * on the node for us if it finds one. So we don't have to.
3618 	 */
3619 	error = ng_path2noderef(here, address, &dest, &hook);
3620 	if (error) {
3621 		NG_FREE_ITEM(item);
3622 		return (error);
3623 	}
3624 	NGI_SET_NODE(item, dest);
3625 	if (hook)
3626 		NGI_SET_HOOK(item, hook);
3627 
3628 	SET_RETADDR(item, here, retaddr);
3629 	return (0);
3630 }
3631 
3632 int
3633 ng_address_ID(node_p here, item_p item, ng_ID_t ID, ng_ID_t retaddr)
3634 {
3635 	node_p dest;
3636 
3637 	ITEM_DEBUG_CHECKS;
3638 	/*
3639 	 * Find the target node.
3640 	 */
3641 	dest = ng_ID2noderef(ID); /* GETS REFERENCE! */
3642 	if (dest == NULL) {
3643 		NG_FREE_ITEM(item);
3644 		TRAP_ERROR();
3645 		return(EINVAL);
3646 	}
3647 	/* Fill out the contents */
3648 	NGI_SET_NODE(item, dest);
3649 	NGI_CLR_HOOK(item);
3650 	SET_RETADDR(item, here, retaddr);
3651 	return (0);
3652 }
3653 
3654 /*
3655  * special case to send a message to self (e.g. destroy node)
3656  * Possibly indicate an arrival hook too.
3657  * Useful for removing that hook :-)
3658  */
3659 item_p
3660 ng_package_msg_self(node_p here, hook_p hook, struct ng_mesg *msg)
3661 {
3662 	item_p item;
3663 
3664 	/*
3665 	 * Find the target node.
3666 	 * If there is a HOOK argument, then use that in preference
3667 	 * to the address.
3668 	 */
3669 	if ((item = ng_alloc_item(NGQF_MESG, NG_NOFLAGS)) == NULL) {
3670 		NG_FREE_MSG(msg);
3671 		return (NULL);
3672 	}
3673 
3674 	/* Fill out the contents */
3675 	item->el_flags |= NGQF_WRITER;
3676 	NG_NODE_REF(here);
3677 	NGI_SET_NODE(item, here);
3678 	if (hook) {
3679 		NG_HOOK_REF(hook);
3680 		NGI_SET_HOOK(item, hook);
3681 	}
3682 	NGI_MSG(item) = msg;
3683 	NGI_RETADDR(item) = ng_node2ID(here);
3684 	return (item);
3685 }
3686 
3687 /*
3688  * Send ng_item_fn function call to the specified node.
3689  */
3690 
3691 int
3692 ng_send_fn(node_p node, hook_p hook, ng_item_fn *fn, void * arg1, int arg2)
3693 {
3694 
3695 	return ng_send_fn1(node, hook, fn, arg1, arg2, NG_NOFLAGS);
3696 }
3697 
3698 int
3699 ng_send_fn1(node_p node, hook_p hook, ng_item_fn *fn, void * arg1, int arg2,
3700 	int flags)
3701 {
3702 	item_p item;
3703 
3704 	if ((item = ng_alloc_item(NGQF_FN, flags)) == NULL) {
3705 		return (ENOMEM);
3706 	}
3707 	item->el_flags |= NGQF_WRITER;
3708 	NG_NODE_REF(node); /* and one for the item */
3709 	NGI_SET_NODE(item, node);
3710 	if (hook) {
3711 		NG_HOOK_REF(hook);
3712 		NGI_SET_HOOK(item, hook);
3713 	}
3714 	NGI_FN(item) = fn;
3715 	NGI_ARG1(item) = arg1;
3716 	NGI_ARG2(item) = arg2;
3717 	return(ng_snd_item(item, flags));
3718 }
3719 
3720 /*
3721  * Send ng_item_fn2 function call to the specified node.
3722  *
3723  * If an optional pitem parameter is supplied, its apply
3724  * callback will be copied to the new item. If also NG_REUSE_ITEM
3725  * flag is set, no new item will be allocated, but pitem will
3726  * be used.
3727  */
3728 int
3729 ng_send_fn2(node_p node, hook_p hook, item_p pitem, ng_item_fn2 *fn, void *arg1,
3730 	int arg2, int flags)
3731 {
3732 	item_p item;
3733 
3734 	KASSERT((pitem != NULL || (flags & NG_REUSE_ITEM) == 0),
3735 	    ("%s: NG_REUSE_ITEM but no pitem", __func__));
3736 
3737 	/*
3738 	 * Allocate a new item if no supplied or
3739 	 * if we can't use supplied one.
3740 	 */
3741 	if (pitem == NULL || (flags & NG_REUSE_ITEM) == 0) {
3742 		if ((item = ng_alloc_item(NGQF_FN2, flags)) == NULL)
3743 			return (ENOMEM);
3744 		if (pitem != NULL)
3745 			item->apply = pitem->apply;
3746 	} else {
3747 		if ((item = ng_realloc_item(pitem, NGQF_FN2, flags)) == NULL)
3748 			return (ENOMEM);
3749 	}
3750 
3751 	item->el_flags = (item->el_flags & ~NGQF_RW) | NGQF_WRITER;
3752 	NG_NODE_REF(node); /* and one for the item */
3753 	NGI_SET_NODE(item, node);
3754 	if (hook) {
3755 		NG_HOOK_REF(hook);
3756 		NGI_SET_HOOK(item, hook);
3757 	}
3758 	NGI_FN2(item) = fn;
3759 	NGI_ARG1(item) = arg1;
3760 	NGI_ARG2(item) = arg2;
3761 	return(ng_snd_item(item, flags));
3762 }
3763 
3764 /*
3765  * Official timeout routines for Netgraph nodes.
3766  */
3767 static void
3768 ng_callout_trampoline(void *arg)
3769 {
3770 	item_p item = arg;
3771 
3772 	CURVNET_SET(NGI_NODE(item)->nd_vnet);
3773 	ng_snd_item(item, 0);
3774 	CURVNET_RESTORE();
3775 }
3776 
3777 int
3778 ng_callout(struct callout *c, node_p node, hook_p hook, int ticks,
3779     ng_item_fn *fn, void * arg1, int arg2)
3780 {
3781 	item_p item, oitem;
3782 
3783 	if ((item = ng_alloc_item(NGQF_FN, NG_NOFLAGS)) == NULL)
3784 		return (ENOMEM);
3785 
3786 	item->el_flags |= NGQF_WRITER;
3787 	NG_NODE_REF(node);		/* and one for the item */
3788 	NGI_SET_NODE(item, node);
3789 	if (hook) {
3790 		NG_HOOK_REF(hook);
3791 		NGI_SET_HOOK(item, hook);
3792 	}
3793 	NGI_FN(item) = fn;
3794 	NGI_ARG1(item) = arg1;
3795 	NGI_ARG2(item) = arg2;
3796 	oitem = c->c_arg;
3797 	if (callout_reset(c, ticks, &ng_callout_trampoline, item) == 1 &&
3798 	    oitem != NULL)
3799 		NG_FREE_ITEM(oitem);
3800 	return (0);
3801 }
3802 
3803 /* A special modified version of untimeout() */
3804 int
3805 ng_uncallout(struct callout *c, node_p node)
3806 {
3807 	item_p item;
3808 	int rval;
3809 
3810 	KASSERT(c != NULL, ("ng_uncallout: NULL callout"));
3811 	KASSERT(node != NULL, ("ng_uncallout: NULL node"));
3812 
3813 	rval = callout_stop(c);
3814 	item = c->c_arg;
3815 	/* Do an extra check */
3816 	if ((rval > 0) && (c->c_func == &ng_callout_trampoline) &&
3817 	    (NGI_NODE(item) == node)) {
3818 		/*
3819 		 * We successfully removed it from the queue before it ran
3820 		 * So now we need to unreference everything that was
3821 		 * given extra references. (NG_FREE_ITEM does this).
3822 		 */
3823 		NG_FREE_ITEM(item);
3824 	}
3825 	c->c_arg = NULL;
3826 
3827 	return (rval);
3828 }
3829 
3830 /*
3831  * Set the address, if none given, give the node here.
3832  */
3833 void
3834 ng_replace_retaddr(node_p here, item_p item, ng_ID_t retaddr)
3835 {
3836 	if (retaddr) {
3837 		NGI_RETADDR(item) = retaddr;
3838 	} else {
3839 		/*
3840 		 * The old return address should be ok.
3841 		 * If there isn't one, use the address here.
3842 		 */
3843 		NGI_RETADDR(item) = ng_node2ID(here);
3844 	}
3845 }
3846