2 * Copyright (c) 2003, 2004 Matthew Dillon. All rights reserved.
3 * Copyright (c) 2003, 2004 Jeffrey M. Hsu. All rights reserved.
4 * Copyright (c) 2003 Jonathan Lemon. All rights reserved.
5 * Copyright (c) 2003, 2004 The DragonFly Project. All rights reserved.
7 * This code is derived from software contributed to The DragonFly Project
8 * by Jonathan Lemon, Jeffrey M. Hsu, and Matthew Dillon.
10 * Jonathan Lemon gave Jeffrey Hsu permission to combine his copyright
11 * into this one around July 8 2004.
13 * Redistribution and use in source and binary forms, with or without
14 * modification, are permitted provided that the following conditions
16 * 1. Redistributions of source code must retain the above copyright
17 * notice, this list of conditions and the following disclaimer.
18 * 2. Redistributions in binary form must reproduce the above copyright
19 * notice, this list of conditions and the following disclaimer in the
20 * documentation and/or other materials provided with the distribution.
21 * 3. Neither the name of The DragonFly Project nor the names of its
22 * contributors may be used to endorse or promote products derived
23 * from this software without specific, prior written permission.
25 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
28 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
29 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
30 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
31 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
32 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
33 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
34 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
35 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/kernel.h>
42 #include <sys/malloc.h>
43 #include <sys/msgport.h>
45 #include <sys/interrupt.h>
46 #include <sys/socket.h>
47 #include <sys/sysctl.h>
48 #include <sys/socketvar.h>
50 #include <net/if_var.h>
51 #include <net/netisr2.h>
52 #include <machine/cpufunc.h>
53 #include <machine/smp.h>
55 #include <sys/thread2.h>
56 #include <sys/msgport2.h>
57 #include <net/netmsg2.h>
58 #include <sys/mplock2.h>
60 static void netmsg_service_loop(void *arg);
61 static void netisr_hashfn0(struct mbuf **mp, int hoff);
62 static void netisr_nohashck(struct mbuf *, const struct pktinfo *);
64 struct netmsg_port_registration {
65 TAILQ_ENTRY(netmsg_port_registration) npr_entry;
69 struct netmsg_rollup {
70 TAILQ_ENTRY(netmsg_rollup) ru_entry;
75 struct netmsg_barrier {
76 struct netmsg_base base;
77 volatile cpumask_t *br_cpumask;
78 volatile uint32_t br_done;
81 #define NETISR_BR_NOTDONE 0x1
82 #define NETISR_BR_WAITDONE 0x80000000
84 struct netisr_barrier {
85 struct netmsg_barrier *br_msgs[MAXCPU];
89 static struct netisr netisrs[NETISR_MAX];
90 static TAILQ_HEAD(,netmsg_port_registration) netreglist;
91 static TAILQ_HEAD(,netmsg_rollup) netrulist;
93 /* Per-CPU thread to handle any protocol. */
94 struct thread netisr_cpu[MAXCPU];
95 lwkt_port netisr_afree_rport;
96 lwkt_port netisr_afree_free_so_rport;
97 lwkt_port netisr_adone_rport;
98 lwkt_port netisr_apanic_rport;
99 lwkt_port netisr_sync_port;
101 static int (*netmsg_fwd_port_fn)(lwkt_port_t, lwkt_msg_t);
103 SYSCTL_NODE(_net, OID_AUTO, netisr, CTLFLAG_RW, 0, "netisr");
106 * netisr_afree_rport replymsg function, only used to handle async
107 * messages which the sender has abandoned to their fate.
110 netisr_autofree_reply(lwkt_port_t port, lwkt_msg_t msg)
112 kfree(msg, M_LWKTMSG);
116 netisr_autofree_free_so_reply(lwkt_port_t port, lwkt_msg_t msg)
118 sofree(((netmsg_t)msg)->base.nm_so);
119 kfree(msg, M_LWKTMSG);
123 * We need a custom putport function to handle the case where the
124 * message target is the current thread's message port. This case
125 * can occur when the TCP or UDP stack does a direct callback to NFS and NFS
126 * then turns around and executes a network operation synchronously.
128 * To prevent deadlocking, we must execute these self-referential messages
129 * synchronously, effectively turning the message into a glorified direct
130 * procedure call back into the protocol stack. The operation must be
131 * complete on return or we will deadlock, so panic if it isn't.
133 * However, the target function is under no obligation to immediately
134 * reply the message. It may forward it elsewhere.
137 netmsg_put_port(lwkt_port_t port, lwkt_msg_t lmsg)
139 netmsg_base_t nmsg = (void *)lmsg;
141 if ((lmsg->ms_flags & MSGF_SYNC) && port == &curthread->td_msgport) {
142 nmsg->nm_dispatch((netmsg_t)nmsg);
145 return(netmsg_fwd_port_fn(port, lmsg));
150 * UNIX DOMAIN sockets still have to run their uipc functions synchronously,
151 * because they depend on the user proc context for a number of things
152 * (like creds) which we have not yet incorporated into the message structure.
154 * However, we maintain or message/port abstraction. Having a special
155 * synchronous port which runs the commands synchronously gives us the
156 * ability to serialize operations in one place later on when we start
160 netmsg_sync_putport(lwkt_port_t port, lwkt_msg_t lmsg)
162 netmsg_base_t nmsg = (void *)lmsg;
164 KKASSERT((lmsg->ms_flags & MSGF_DONE) == 0);
166 lmsg->ms_target_port = port; /* required for abort */
167 nmsg->nm_dispatch((netmsg_t)nmsg);
176 TAILQ_INIT(&netreglist);
177 TAILQ_INIT(&netrulist);
180 * Create default per-cpu threads for generic protocol handling.
182 for (i = 0; i < ncpus; ++i) {
183 lwkt_create(netmsg_service_loop, NULL, NULL,
185 TDF_NOSTART|TDF_FORCE_SPINPORT|TDF_FIXEDCPU,
186 i, "netisr_cpu %d", i);
187 netmsg_service_port_init(&netisr_cpu[i].td_msgport);
188 lwkt_schedule(&netisr_cpu[i]);
192 * The netisr_afree_rport is a special reply port which automatically
193 * frees the replied message. The netisr_adone_rport simply marks
194 * the message as being done. The netisr_apanic_rport panics if
195 * the message is replied to.
197 lwkt_initport_replyonly(&netisr_afree_rport, netisr_autofree_reply);
198 lwkt_initport_replyonly(&netisr_afree_free_so_rport,
199 netisr_autofree_free_so_reply);
200 lwkt_initport_replyonly_null(&netisr_adone_rport);
201 lwkt_initport_panic(&netisr_apanic_rport);
204 * The netisr_syncport is a special port which executes the message
205 * synchronously and waits for it if EASYNC is returned.
207 lwkt_initport_putonly(&netisr_sync_port, netmsg_sync_putport);
210 SYSINIT(netisr, SI_SUB_PRE_DRIVERS, SI_ORDER_FIRST, netisr_init, NULL);
213 * Finish initializing the message port for a netmsg service. This also
214 * registers the port for synchronous cleanup operations such as when an
215 * ifnet is being destroyed. There is no deregistration API yet.
218 netmsg_service_port_init(lwkt_port_t port)
220 struct netmsg_port_registration *reg;
223 * Override the putport function. Our custom function checks for
224 * self-references and executes such commands synchronously.
226 if (netmsg_fwd_port_fn == NULL)
227 netmsg_fwd_port_fn = port->mp_putport;
228 KKASSERT(netmsg_fwd_port_fn == port->mp_putport);
229 port->mp_putport = netmsg_put_port;
232 * Keep track of ports using the netmsg API so we can synchronize
233 * certain operations (such as freeing an ifnet structure) across all
236 reg = kmalloc(sizeof(*reg), M_TEMP, M_WAITOK|M_ZERO);
237 reg->npr_port = port;
238 TAILQ_INSERT_TAIL(&netreglist, reg, npr_entry);
242 * This function synchronizes the caller with all netmsg services. For
243 * example, if an interface is being removed we must make sure that all
244 * packets related to that interface complete processing before the structure
245 * can actually be freed. This sort of synchronization is an alternative to
246 * ref-counting the netif, removing the ref counting overhead in favor of
247 * placing additional overhead in the netif freeing sequence (where it is
251 netmsg_service_sync(void)
253 struct netmsg_port_registration *reg;
254 struct netmsg_base smsg;
256 netmsg_init(&smsg, NULL, &curthread->td_msgport, 0, netmsg_sync_handler);
258 TAILQ_FOREACH(reg, &netreglist, npr_entry) {
259 lwkt_domsg(reg->npr_port, &smsg.lmsg, 0);
264 * The netmsg function simply replies the message. API semantics require
265 * EASYNC to be returned if the netmsg function disposes of the message.
268 netmsg_sync_handler(netmsg_t msg)
270 lwkt_replymsg(&msg->lmsg, 0);
274 * Generic netmsg service loop. Some protocols may roll their own but all
275 * must do the basic command dispatch function call done here.
278 netmsg_service_loop(void *arg)
280 struct netmsg_rollup *ru;
282 thread_t td = curthread;
285 td->td_type = TD_TYPE_NETISR;
287 while ((msg = lwkt_waitport(&td->td_msgport, 0))) {
289 * Run up to 512 pending netmsgs.
293 KASSERT(msg->nm_dispatch != NULL,
294 ("netmsg_service isr %d badmsg",
295 msg->lmsg.u.ms_result));
297 * Don't match so_port, if the msg explicitly
298 * asks us to ignore its so_port.
300 if ((msg->lmsg.ms_flags & MSGF_IGNSOPORT) == 0 &&
302 msg->nm_so->so_port != &td->td_msgport) {
304 * Sockets undergoing connect or disconnect
305 * ops can change ports on us. Chase the
310 * This could be quite common for protocols
311 * which support asynchronous pru_connect,
312 * e.g. TCP, so kprintf socket port chasing
313 * could be too verbose for the console.
315 kprintf("netmsg_service_loop: Warning, "
316 "port changed so=%p\n", msg->nm_so);
318 lwkt_forwardmsg(msg->nm_so->so_port,
322 * We are on the correct port, dispatch it.
324 msg->nm_dispatch((netmsg_t)msg);
328 } while ((msg = lwkt_getport(&td->td_msgport)) != NULL);
331 * Run all registered rollup functions for this cpu
332 * (e.g. tcp_willblock()).
334 TAILQ_FOREACH(ru, &netrulist, ru_entry)
340 * Forward a packet to a netisr service function.
342 * If the packet has not been assigned to a protocol thread we call
343 * the port characterization function to assign it. The caller must
344 * clear M_HASH (or not have set it in the first place) if the caller
345 * wishes the packet to be recharacterized.
348 netisr_queue(int num, struct mbuf *m)
351 struct netmsg_packet *pmsg;
354 KASSERT((num > 0 && num <= NELEM(netisrs)),
355 ("Bad isr %d", num));
358 if (ni->ni_handler == NULL) {
359 kprintf("Unregistered isr %d\n", num);
365 * Figure out which protocol thread to send to. This does not
366 * have to be perfect but performance will be really good if it
367 * is correct. Major protocol inputs such as ip_input() will
368 * re-characterize the packet as necessary.
370 if ((m->m_flags & M_HASH) == 0) {
371 ni->ni_hashfn(&m, 0);
374 if ((m->m_flags & M_HASH) == 0) {
375 kprintf("netisr_queue(%d): packet hash failed\n", num);
382 * Get the protocol port based on the packet hash, initialize
383 * the netmsg, and send it off.
385 port = netisr_hashport(m->m_pkthdr.hash);
386 pmsg = &m->m_hdr.mh_netmsg;
387 netmsg_init(&pmsg->base, NULL, &netisr_apanic_rport,
390 pmsg->base.lmsg.u.ms_result = num;
391 lwkt_sendmsg(port, &pmsg->base.lmsg);
397 * Run a netisr service function on the packet.
399 * The packet must have been correctly characterized!
402 netisr_handle(int num, struct mbuf *m)
405 struct netmsg_packet *pmsg;
409 * Get the protocol port based on the packet hash
411 KASSERT((m->m_flags & M_HASH), ("packet not characterized"));
412 port = netisr_hashport(m->m_pkthdr.hash);
413 KASSERT(&curthread->td_msgport == port, ("wrong msgport"));
415 KASSERT((num > 0 && num <= NELEM(netisrs)), ("bad isr %d", num));
417 if (ni->ni_handler == NULL) {
418 kprintf("unregistered isr %d\n", num);
424 * Initialize the netmsg, and run the handler directly.
426 pmsg = &m->m_hdr.mh_netmsg;
427 netmsg_init(&pmsg->base, NULL, &netisr_apanic_rport,
430 pmsg->base.lmsg.u.ms_result = num;
431 ni->ni_handler((netmsg_t)&pmsg->base);
437 * Pre-characterization of a deeper portion of the packet for the
440 * The base of the ISR type (e.g. IP) that we want to characterize is
441 * at (hoff) relative to the beginning of the mbuf. This allows
442 * e.g. ether_characterize() to not have to adjust the m_data/m_len.
445 netisr_characterize(int num, struct mbuf **mp, int hoff)
456 if (num < 0 || num >= NETISR_MAX) {
457 if (num == NETISR_MAX) {
458 m->m_flags |= M_HASH;
459 m->m_pkthdr.hash = 0;
462 panic("Bad isr %d", num);
469 if (ni->ni_handler == NULL) {
470 kprintf("Unregistered isr %d\n", num);
476 * Characterize the packet
478 if ((m->m_flags & M_HASH) == 0) {
479 ni->ni_hashfn(mp, hoff);
481 if (m && (m->m_flags & M_HASH) == 0)
482 kprintf("netisr_queue(%d): packet hash failed\n", num);
487 netisr_register(int num, netisr_fn_t handler, netisr_hashfn_t hashfn)
491 KASSERT((num > 0 && num <= NELEM(netisrs)),
492 ("netisr_register: bad isr %d", num));
493 KKASSERT(handler != NULL);
496 hashfn = netisr_hashfn0;
500 ni->ni_handler = handler;
501 ni->ni_hashck = netisr_nohashck;
502 ni->ni_hashfn = hashfn;
503 netmsg_init(&ni->ni_netmsg, NULL, &netisr_adone_rport, 0, NULL);
507 netisr_register_hashcheck(int num, netisr_hashck_t hashck)
511 KASSERT((num > 0 && num <= NELEM(netisrs)),
512 ("netisr_register: bad isr %d", num));
515 ni->ni_hashck = hashck;
519 netisr_register_rollup(netisr_ru_t ru_func, int prio)
521 struct netmsg_rollup *new_ru, *ru;
523 new_ru = kmalloc(sizeof(*new_ru), M_TEMP, M_WAITOK|M_ZERO);
524 new_ru->ru_func = ru_func;
525 new_ru->ru_prio = prio;
528 * Higher priority "rollup" appears first
530 TAILQ_FOREACH(ru, &netrulist, ru_entry) {
531 if (ru->ru_prio < new_ru->ru_prio) {
532 TAILQ_INSERT_BEFORE(ru, new_ru, ru_entry);
536 TAILQ_INSERT_TAIL(&netrulist, new_ru, ru_entry);
540 * Return a default protocol control message processing thread port
543 cpu0_ctlport(int cmd __unused, struct sockaddr *sa __unused,
544 void *extra __unused)
546 return (&netisr_cpu[0].td_msgport);
550 * This is a default netisr packet characterization function which
551 * sets M_HASH. If a netisr is registered with a NULL hashfn function
552 * this one is assigned.
554 * This function makes no attempt to validate the packet.
557 netisr_hashfn0(struct mbuf **mp, int hoff __unused)
559 struct mbuf *m = *mp;
561 m->m_flags |= M_HASH;
562 m->m_pkthdr.hash = 0;
566 * schednetisr() is used to call the netisr handler from the appropriate
567 * netisr thread for polling and other purposes.
569 * This function may be called from a hard interrupt or IPI and must be
570 * MP SAFE and non-blocking. We use a fixed per-cpu message instead of
571 * trying to allocate one. We must get ourselves onto the target cpu
572 * to safely check the MSGF_DONE bit on the message but since the message
573 * will be sent to that cpu anyway this does not add any extra work beyond
574 * what lwkt_sendmsg() would have already had to do to schedule the target
578 schednetisr_remote(void *data)
580 int num = (int)(intptr_t)data;
581 struct netisr *ni = &netisrs[num];
582 lwkt_port_t port = &netisr_cpu[0].td_msgport;
585 pmsg = &netisrs[num].ni_netmsg;
586 if (pmsg->lmsg.ms_flags & MSGF_DONE) {
587 netmsg_init(pmsg, NULL, &netisr_adone_rport, 0, ni->ni_handler);
588 pmsg->lmsg.u.ms_result = num;
589 lwkt_sendmsg(port, &pmsg->lmsg);
596 KASSERT((num > 0 && num <= NELEM(netisrs)),
597 ("schednetisr: bad isr %d", num));
598 KKASSERT(netisrs[num].ni_handler != NULL);
599 if (mycpu->gd_cpuid != 0) {
600 lwkt_send_ipiq(globaldata_find(0),
601 schednetisr_remote, (void *)(intptr_t)num);
604 schednetisr_remote((void *)(intptr_t)num);
610 netisr_barrier_dispatch(netmsg_t nmsg)
612 struct netmsg_barrier *msg = (struct netmsg_barrier *)nmsg;
614 ATOMIC_CPUMASK_NANDBIT(*msg->br_cpumask, mycpu->gd_cpuid);
615 if (CPUMASK_TESTZERO(*msg->br_cpumask))
616 wakeup(msg->br_cpumask);
619 uint32_t done = msg->br_done;
622 if ((done & NETISR_BR_NOTDONE) == 0)
625 tsleep_interlock(&msg->br_done, 0);
626 if (atomic_cmpset_int(&msg->br_done,
627 done, done | NETISR_BR_WAITDONE))
628 tsleep(&msg->br_done, PINTERLOCKED, "nbrdsp", 0);
631 lwkt_replymsg(&nmsg->lmsg, 0);
634 struct netisr_barrier *
635 netisr_barrier_create(void)
637 struct netisr_barrier *br;
639 br = kmalloc(sizeof(*br), M_LWKTMSG, M_WAITOK | M_ZERO);
644 netisr_barrier_set(struct netisr_barrier *br)
646 volatile cpumask_t other_cpumask;
649 KKASSERT(&curthread->td_msgport == netisr_cpuport(0));
650 KKASSERT(!br->br_isset);
652 other_cpumask = mycpu->gd_other_cpus;
653 CPUMASK_ANDMASK(other_cpumask, smp_active_mask);
656 for (i = 0; i < ncpus; ++i) {
657 struct netmsg_barrier *msg;
662 msg = kmalloc(sizeof(struct netmsg_barrier),
663 M_LWKTMSG, M_WAITOK);
666 * Don't use priority message here; mainly to keep
667 * it ordered w/ the previous data packets sent by
670 netmsg_init(&msg->base, NULL, &netisr_afree_rport, 0,
671 netisr_barrier_dispatch);
672 msg->br_cpumask = &other_cpumask;
673 msg->br_done = NETISR_BR_NOTDONE;
675 KKASSERT(br->br_msgs[i] == NULL);
676 br->br_msgs[i] = msg;
679 for (i = 0; i < ncpus; ++i) {
682 lwkt_sendmsg(netisr_cpuport(i), &br->br_msgs[i]->base.lmsg);
685 while (CPUMASK_TESTNZERO(other_cpumask)) {
686 tsleep_interlock(&other_cpumask, 0);
687 if (CPUMASK_TESTNZERO(other_cpumask))
688 tsleep(&other_cpumask, PINTERLOCKED, "nbrset", 0);
694 netisr_barrier_rem(struct netisr_barrier *br)
698 KKASSERT(&curthread->td_msgport == netisr_cpuport(0));
699 KKASSERT(br->br_isset);
702 for (i = 0; i < ncpus; ++i) {
703 struct netmsg_barrier *msg = br->br_msgs[i];
706 msg = br->br_msgs[i];
707 br->br_msgs[i] = NULL;
712 done = atomic_swap_int(&msg->br_done, 0);
713 if (done & NETISR_BR_WAITDONE)
714 wakeup(&msg->br_done);
720 netisr_nohashck(struct mbuf *m, const struct pktinfo *pi __unused)
722 m->m_flags &= ~M_HASH;
726 netisr_hashcheck(int num, struct mbuf *m, const struct pktinfo *pi)
730 if (num < 0 || num >= NETISR_MAX)
731 panic("Bad isr %d", num);
737 if (ni->ni_handler == NULL)
738 panic("Unregistered isr %d", num);
740 ni->ni_hashck(m, pi);