2 * Copyright (c) 2012 The DragonFly Project. All rights reserved.
4 * This code is derived from software contributed to The DragonFly Project
5 * by Sepherosa Ziehau <sepherosa@gmail.com>
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in
15 * the documentation and/or other materials provided with the
17 * 3. Neither the name of The DragonFly Project nor the names of its
18 * contributors may be used to endorse or promote products derived
19 * from this software without specific, prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
25 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 #include <sys/param.h>
39 #include <sys/device.h>
40 #include <sys/in_cksum.h>
41 #include <sys/kernel.h>
42 #include <sys/malloc.h>
46 #include <sys/queue.h>
47 #include <sys/socket.h>
48 #include <sys/systm.h>
49 #include <sys/serialize.h>
52 #include <net/if_dl.h>
53 #include <net/if_var.h>
54 #include <net/ifq_var.h>
55 #include <net/ethernet.h>
56 #include <net/netmsg2.h>
57 #include <net/netisr2.h>
59 #include <netinet/in.h>
60 #include <netinet/in_pcb.h>
61 #include <netinet/ip.h>
62 #include <netinet/udp_var.h>
66 #define CDEV_NAME "pktg"
68 #define PKTGEN_BUFSZ 2048
71 #define PKTGEN_DEVCNT 4
76 struct netmsg_pktgen {
77 struct netmsg_base np_base;
78 struct pktgen *np_pktg;
79 struct ifaltq_subque *np_ifsq;
83 struct netmsg_base pb_nmsg; /* MUST BE THE FIRST */
88 struct ifaltq_subque *pb_ifsq;
91 struct pktgen *pb_pktg;
92 LIST_ENTRY(pktgen_buf) pb_link;
96 struct callout pktg_stop;
97 LIST_HEAD(, pktgen_buf) pktg_buflist;
101 uint32_t pktg_flags; /* PKTG_F_ */
107 struct ifnet *pktg_ifp;
111 struct sockaddr_in pktg_src;
113 struct sockaddr_in *pktg_dst;
114 uint8_t pktg_dst_lladdr[ETHER_ADDR_LEN];
116 struct pktgen_pcpu pktg_pcpu[MAXCPU];
119 #define PKTG_F_CONFIG 0x1
120 #define PKTG_F_RUNNING 0x4
121 #define PKTG_F_SWITCH_SRCDST 0x8
123 static int pktgen_modevent(module_t, int, void *);
125 static void pktgen_buf_free(void *);
126 static void pktgen_buf_ref(void *);
127 static void pktgen_buf_send(netmsg_t);
129 static int pktgen_config(struct pktgen *,
130 const struct pktgen_conf *);
131 static int pktgen_start(struct pktgen *, int);
132 static void pktgen_free(struct pktgen *);
133 static void pktgen_ref(struct pktgen *);
134 static void pktgen_pcpu_stop_cb(void *);
135 static void pktgen_mbuf(struct pktgen_buf *, struct mbuf *);
136 static void pktgen_start_ifsq(struct pktgen *,
137 struct ifaltq_subque *);
138 static void pktgen_start_ifsq_handler(netmsg_t);
140 static d_open_t pktgen_open;
141 static d_close_t pktgen_close;
142 static d_ioctl_t pktgen_ioctl;
144 static struct dev_ops pktgen_ops = {
145 { CDEV_NAME, 0, D_MPSAFE },
146 .d_open = pktgen_open,
147 .d_close = pktgen_close,
148 .d_ioctl = pktgen_ioctl,
151 static volatile int pktgen_refcnt;
152 static struct lwkt_token pktgen_tok = LWKT_TOKEN_INITIALIZER(pktgen_token);
154 MALLOC_DECLARE(M_PKTGEN);
155 MALLOC_DEFINE(M_PKTGEN, CDEV_NAME, "Packet generator");
157 DEV_MODULE(pktgen, pktgen_modevent, NULL);
160 pktgen_modevent(module_t mod, int type, void *data)
166 for (i = 0; i < PKTGEN_DEVCNT; ++i) {
167 make_dev(&pktgen_ops, 0, UID_ROOT, GID_WHEEL, 0600,
173 if (pktgen_refcnt > 0)
175 dev_ops_remove_all(&pktgen_ops);
186 pktgen_open(struct dev_open_args *ap)
188 cdev_t dev = ap->a_head.a_dev;
192 error = priv_check_cred(ap->a_cred, PRIV_ROOT, 0);
196 lwkt_gettoken(&pktgen_tok);
198 if (dev->si_drv1 != NULL) {
199 lwkt_reltoken(&pktgen_tok);
203 pktg = kmalloc(sizeof(*pktg), M_PKTGEN, M_ZERO | M_WAITOK);
204 for (i = 0; i < ncpus; ++i) {
205 struct pktgen_pcpu *p = &pktg->pktg_pcpu[i];
207 callout_init_mp(&p->pktg_stop);
208 LIST_INIT(&p->pktg_buflist);
212 pktg->pktg_refcnt = 1;
214 atomic_add_int(&pktgen_refcnt, 1);
216 lwkt_reltoken(&pktgen_tok);
221 pktgen_close(struct dev_close_args *ap)
223 cdev_t dev = ap->a_head.a_dev;
224 struct pktgen *pktg = dev->si_drv1;
226 lwkt_gettoken(&pktgen_tok);
228 lwkt_reltoken(&pktgen_tok);
236 pktgen_ioctl(struct dev_ioctl_args *ap __unused)
238 cdev_t dev = ap->a_head.a_dev;
239 caddr_t data = ap->a_data;
240 struct pktgen *pktg = dev->si_drv1;
243 lwkt_gettoken(&pktgen_tok);
247 error = pktgen_start(pktg, 0);
251 error = pktgen_start(pktg, 1);
255 error = pktgen_config(pktg, (const struct pktgen_conf *)data);
263 lwkt_reltoken(&pktgen_tok);
268 pktgen_config(struct pktgen *pktg, const struct pktgen_conf *conf)
270 const struct sockaddr_in *sin;
271 struct sockaddr_in *dst = NULL;
272 const struct sockaddr *sa;
275 int i, error, pktenq;
277 if (pktg->pktg_flags & (PKTG_F_RUNNING | PKTG_F_CONFIG))
280 if (conf->pc_datalen <= 0 ||
281 conf->pc_datalen > ETHERMTU - sizeof(struct udpiphdr))
283 if (conf->pc_duration <= 0)
287 if (sin->sin_family != AF_INET)
288 return EPROTONOSUPPORT;
289 if (sin->sin_port == 0)
292 if (conf->pc_ndst <= 0)
294 dst_size = conf->pc_ndst * sizeof(struct sockaddr_in);
296 dst = kmalloc(dst_size, M_PKTGEN, M_WAITOK | M_NULLOK);
300 error = copyin(conf->pc_dst, dst, dst_size);
304 for (i = 0; i < conf->pc_ndst; ++i) {
306 if (sin->sin_family != AF_INET) {
307 error = EPROTONOSUPPORT;
310 if (sin->sin_port == 0) {
318 * Make sure that pc_ifname is not gone.
321 ifp = ifunit(conf->pc_ifname);
328 pktenq = conf->pc_pktenq;
329 if (pktenq < 0 || pktenq > ifp->if_snd.altq_maxlen) {
332 } else if (pktenq == 0) {
333 pktenq = (ifp->if_snd.altq_maxlen * 3) / 4;
336 sa = &conf->pc_dst_lladdr;
337 if (sa->sa_family != AF_LINK) {
338 error = EPROTONOSUPPORT;
341 if (sa->sa_len != ETHER_ADDR_LEN) {
342 error = EPROTONOSUPPORT;
345 if (ETHER_IS_MULTICAST(sa->sa_data) ||
346 bcmp(sa->sa_data, ifp->if_broadcastaddr, ifp->if_addrlen) == 0) {
347 error = EADDRNOTAVAIL;
354 pktg->pktg_flags |= PKTG_F_CONFIG;
356 if (conf->pc_flags & PKTGEN_FLAG_SWITCH_SRCDST)
357 pktg->pktg_flags |= PKTG_F_SWITCH_SRCDST;
358 pktg->pktg_duration = conf->pc_duration;
359 pktg->pktg_datalen = conf->pc_datalen;
360 pktg->pktg_pktenq = pktenq;
361 pktg->pktg_ifp = ifp;
362 pktg->pktg_src = conf->pc_src;
363 pktg->pktg_ndst = conf->pc_ndst;
364 KKASSERT(pktg->pktg_dst == NULL);
365 pktg->pktg_dst = dst;
366 bcopy(sa->sa_data, pktg->pktg_dst_lladdr, ETHER_ADDR_LEN);
372 kfree(dst, M_PKTGEN);
377 pktgen_start_ifsq(struct pktgen *pktg, struct ifaltq_subque *ifsq)
379 struct netmsg_pktgen *np;
381 np = kmalloc(sizeof(*np), M_LWKTMSG, M_WAITOK);
382 netmsg_init(&np->np_base, NULL, &netisr_afree_rport, 0,
383 pktgen_start_ifsq_handler);
387 lwkt_sendmsg(netisr_cpuport(ifsq_get_cpuid(ifsq)), &np->np_base.lmsg);
391 pktgen_start(struct pktgen *pktg, int mq)
395 if ((pktg->pktg_flags & PKTG_F_CONFIG) == 0)
397 if (pktg->pktg_flags & PKTG_F_RUNNING)
399 pktg->pktg_flags |= PKTG_F_RUNNING;
401 ifq = &pktg->pktg_ifp->if_snd;
404 pktgen_start_ifsq(pktg, ifq_get_subq_default(ifq));
408 for (i = 0; i < ifq->altq_subq_cnt; ++i)
410 for (i = 0; i < ifq->altq_subq_cnt; ++i)
411 pktgen_start_ifsq(pktg, ifq_get_subq(ifq, i));
417 pktgen_start_ifsq_handler(netmsg_t nmsg)
419 struct netmsg_pktgen *np = (struct netmsg_pktgen *)nmsg;
420 struct pktgen *pktg = np->np_pktg;
421 struct ifaltq_subque *ifsq = np->np_ifsq;
423 struct mbuf *m, *head = NULL, **next;
425 struct pktgen_pcpu *p;
426 int cpuid, i, alloc_cnt, keep_cnt;
432 lwkt_replymsg(&np->np_base.lmsg, 0);
434 ifp = pktg->pktg_ifp;
436 cpuid = ifsq_get_cpuid(ifsq);
437 KKASSERT(cpuid == mycpuid);
439 p = &pktg->pktg_pcpu[cpuid];
441 keep_cnt = pktg->pktg_pktenq;
442 alloc_cnt = keep_cnt * 2;
445 * Prefault enough mbuf into mbuf objcache
448 for (i = 0; i < alloc_cnt; ++i) {
449 MGETHDR(m, M_WAITOK, MT_DATA);
451 next = &m->m_nextpkt;
454 for (i = 0; i < alloc_cnt - keep_cnt; ++i) {
460 KKASSERT(head != NULL);
463 * Setup the packets' data
465 ip_len = pktg->pktg_datalen + sizeof(struct udpiphdr);
466 len = ip_len + ETHER_HDR_LEN;
468 psum = htons((u_short)pktg->pktg_datalen + sizeof(struct udphdr) +
470 ulen = htons(pktg->pktg_datalen + sizeof(struct udphdr));
476 const struct sockaddr_in *dst;
477 struct pktgen_buf *pb;
480 struct ether_header *eh;
484 pb = kmalloc(sizeof(*pb), M_PKTGEN, M_WAITOK | M_ZERO);
488 pb->pb_buf = kmalloc(PKTGEN_BUFSZ, M_PKTGEN, M_WAITOK);
490 pb->pb_cpuid = cpuid;
492 netmsg_init(&pb->pb_nmsg, NULL, &netisr_adone_rport, 0,
494 LIST_INSERT_HEAD(&p->pktg_buflist, pb, pb_link);
496 dst = &pktg->pktg_dst[i % pktg->pktg_ndst];
499 m->m_ext.ext_arg = pb;
500 m->m_ext.ext_buf = pb->pb_buf;
501 m->m_ext.ext_free = pktgen_buf_free;
502 m->m_ext.ext_ref = pktgen_buf_ref;
503 m->m_ext.ext_size = PKTGEN_BUFSZ;
505 m->m_data = m->m_ext.ext_buf;
507 m->m_len = m->m_pkthdr.len = len;
509 m->m_data += ETHER_HDR_LEN;
510 m->m_len -= ETHER_HDR_LEN;
511 m->m_pkthdr.len -= ETHER_HDR_LEN;
513 ui = mtod(m, struct udpiphdr *);
514 ui->ui_pr = IPPROTO_UDP;
515 if (pktg->pktg_flags & PKTG_F_SWITCH_SRCDST) {
516 ui->ui_src.s_addr = dst->sin_addr.s_addr;
517 ui->ui_dst.s_addr = pktg->pktg_src.sin_addr.s_addr;
518 ui->ui_sport = dst->sin_port;
519 ui->ui_dport = pktg->pktg_src.sin_port;
521 ui->ui_src.s_addr = pktg->pktg_src.sin_addr.s_addr;
522 ui->ui_dst.s_addr = dst->sin_addr.s_addr;
523 ui->ui_sport = pktg->pktg_src.sin_port;
524 ui->ui_dport = dst->sin_port;
527 ui->ui_sum = in_pseudo(ui->ui_src.s_addr, ui->ui_dst.s_addr,
529 m->m_pkthdr.csum_data = offsetof(struct udphdr, uh_sum);
531 ip = (struct ip *)ui;
533 ip->ip_ttl = 64; /* XXX */
534 ip->ip_tos = 0; /* XXX */
535 ip->ip_vhl = IP_VHL_BORING;
538 ip->ip_id = ip_newid();
542 ip->ip_len = htons(ip->ip_len);
543 ip->ip_sum = in_cksum_hdr(ip);
545 m->m_data -= ETHER_HDR_LEN;
546 m->m_len += ETHER_HDR_LEN;
547 m->m_pkthdr.len += ETHER_HDR_LEN;
549 eh = mtod(m, struct ether_header *);
550 bcopy(pktg->pktg_dst_lladdr, eh->ether_dhost, ETHER_ADDR_LEN);
551 bcopy(IF_LLADDR(ifp), eh->ether_shost, ETHER_ADDR_LEN);
552 eh->ether_type = htons(ETHERTYPE_IP);
554 nextm = m->m_nextpkt;
557 ifq_dispatch(ifp, m, NULL);
562 callout_reset(&p->pktg_stop, pktg->pktg_duration * hz,
563 pktgen_pcpu_stop_cb, p);
569 pktgen_mbuf(struct pktgen_buf *pb, struct mbuf *m)
571 m->m_ext.ext_arg = pb;
572 m->m_ext.ext_buf = pb->pb_buf;
573 m->m_ext.ext_free = pktgen_buf_free;
574 m->m_ext.ext_ref = pktgen_buf_ref;
575 m->m_ext.ext_size = PKTGEN_BUFSZ;
577 m->m_data = m->m_ext.ext_buf;
579 m->m_len = m->m_pkthdr.len = pb->pb_len;
583 pktgen_buf_send(netmsg_t msg)
585 struct pktgen_buf *pb = (struct pktgen_buf *)msg;
588 KKASSERT(&curthread->td_msgport == netisr_cpuport(pb->pb_cpuid));
591 lwkt_replymsg(&pb->pb_nmsg.lmsg, 0);
594 MGETHDR(m, M_WAITOK, MT_DATA);
596 ifq_dispatch(pb->pb_ifp, m, NULL);
600 pktgen_buf_free(void *arg)
602 struct pktgen_buf *pb = arg;
605 KKASSERT(pb->pb_inuse > 0);
607 if (atomic_fetchadd_int(&pb->pb_inuse, -1) == 1) {
612 LIST_REMOVE(pb, pb_link);
614 kfree(pb->pb_buf, M_PKTGEN);
622 if (&curthread->td_msgport != netisr_cpuport(pb->pb_cpuid)) {
623 KKASSERT(pb->pb_cpuid == mycpuid);
625 KKASSERT(pb->pb_nmsg.lmsg.ms_flags & MSGF_DONE);
626 lwkt_sendmsg(netisr_cpuport(pb->pb_cpuid), &pb->pb_nmsg.lmsg);
631 MGETHDR(m, M_WAITOK, MT_DATA);
633 ifsq_enqueue(pb->pb_ifsq, m, NULL);
637 pktgen_buf_ref(void *arg)
639 struct pktgen_buf *pb = arg;
641 panic("%s should never be called\n", __func__);
643 KKASSERT(pb->pb_inuse > 0);
644 atomic_add_int(&pb->pb_inuse, 1);
648 pktgen_free(struct pktgen *pktg)
650 KKASSERT(pktg->pktg_refcnt > 0);
651 if (atomic_fetchadd_int(&pktg->pktg_refcnt, -1) == 1) {
654 if (pktg->pktg_dst != NULL)
655 kfree(pktg->pktg_dst, M_PKTGEN);
657 for (i = 0; i < ncpus; ++i)
658 KKASSERT(LIST_EMPTY(&pktg->pktg_pcpu[i].pktg_buflist));
659 kfree(pktg, M_PKTGEN);
662 KKASSERT(pktgen_refcnt > 0);
663 atomic_subtract_int(&pktgen_refcnt, 1);
667 pktgen_pcpu_stop_cb(void *arg)
669 struct pktgen_pcpu *p = arg;
670 struct pktgen_buf *pb;
673 LIST_FOREACH(pb, &p->pktg_buflist, pb_link)
679 pktgen_ref(struct pktgen *pktg)
681 atomic_add_int(&pktg->pktg_refcnt, 1);
682 atomic_add_int(&pktgen_refcnt, 1);