Annotation of src/usr.bin/tcpbench/tcpbench.c, Revision 1.31
1.1 djm 1: /*
2: * Copyright (c) 2008 Damien Miller <djm@mindrot.org>
1.20 claudio 3: * Copyright (c) 2011 Christiano F. Haesbaert <haesbaert@haesbaert.org>
1.1 djm 4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the above
7: * copyright notice and this permission notice appear in all copies.
8: *
9: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16: */
17:
18: #include <sys/types.h>
19: #include <sys/time.h>
20: #include <sys/socket.h>
21: #include <sys/socketvar.h>
1.11 claudio 22: #include <sys/resource.h>
1.20 claudio 23: #include <sys/queue.h>
1.1 djm 24:
25: #include <net/route.h>
26:
27: #include <netinet/in.h>
28: #include <netinet/in_systm.h>
29: #include <netinet/ip.h>
30: #include <netinet/tcp.h>
31: #include <netinet/tcp_timer.h>
32: #include <netinet/tcp_fsm.h>
33: #include <netinet/in_pcb.h>
34: #include <netinet/tcp_var.h>
35:
36: #include <arpa/inet.h>
37:
38: #include <unistd.h>
39: #include <limits.h>
40: #include <stdlib.h>
41: #include <stdio.h>
42: #include <string.h>
43: #include <errno.h>
1.20 claudio 44: #include <event.h>
1.1 djm 45: #include <netdb.h>
46: #include <signal.h>
47: #include <err.h>
48: #include <fcntl.h>
49: #include <poll.h>
50:
51: #include <kvm.h>
52: #include <nlist.h>
53:
1.11 claudio 54: #define DEFAULT_PORT "12345"
55: #define DEFAULT_STATS_INTERVAL 1000 /* ms */
1.20 claudio 56: #define DEFAULT_BUF (256 * 1024)
57: #define DEFAULT_UDP_PKT (1500 - 28) /* TODO don't hardcode this */
58: #define TCP_MODE !ptb->uflag
59: #define UDP_MODE ptb->uflag
1.11 claudio 60: #define MAX_FD 1024
1.1 djm 61:
1.20 claudio 62: /* Our tcpbench globals */
63: struct {
64: u_int Vflag; /* rtableid */
65: int Sflag; /* Socket buffer size (tcp mode) */
66: u_int rflag; /* Report rate (ms) */
67: int sflag; /* True if server */
1.24 haesbaer 68: int Tflag; /* ToS if != -1 */
1.20 claudio 69: int vflag; /* Verbose */
70: int uflag; /* UDP mode */
71: kvm_t *kvmh; /* Kvm handler */
72: char **kvars; /* Kvm enabled vars */
73: u_long ktcbtab; /* Ktcb */
74: char *dummybuf; /* IO buffer */
75: size_t dummybuf_len; /* IO buffer len */
76: } tcpbench, *ptb;
1.1 djm 77:
1.20 claudio 78: /* stats for a single tcp connection, udp uses only one */
1.1 djm 79: struct statctx {
1.20 claudio 80: TAILQ_ENTRY(statctx) entry;
1.11 claudio 81: struct timeval t_start, t_last;
1.1 djm 82: unsigned long long bytes;
1.20 claudio 83: int fd;
84: char *buf;
85: size_t buflen;
86: struct event ev;
87: /* TCP only */
88: u_long tcp_tcbaddr;
89: /* UDP only */
90: u_long udp_slice_pkts;
1.1 djm 91: };
92:
1.20 claudio 93: static void signal_handler(int, short, void *);
94: static void saddr_ntop(const struct sockaddr *, socklen_t, char *, size_t);
95: static void drop_gid(void);
96: static void set_slice_timer(int);
97: static void print_tcp_header(void);
98: static void kget(u_long, void *, size_t);
99: static u_long kfind_tcb(int);
100: static void kupdate_stats(u_long, struct inpcb *, struct tcpcb *,
101: struct socket *);
102: static void list_kvars(void);
103: static void check_kvar(const char *);
104: static char ** check_prepare_kvars(char *);
105: static void stats_prepare(struct statctx *);
106: static void tcp_stats_display(unsigned long long, long double, float,
107: struct statctx *, struct inpcb *, struct tcpcb *, struct socket *);
108: static void tcp_process_slice(int, short, void *);
109: static void tcp_server_handle_sc(int, short, void *);
110: static void tcp_server_accept(int, short, void *);
111: static void server_init(struct addrinfo *, struct statctx *);
112: static void client_handle_sc(int, short, void *);
1.25 haesbaer 113: static void client_init(struct addrinfo *, int, struct statctx *,
114: struct addrinfo *);
1.20 claudio 115: static int clock_gettime_tv(clockid_t, struct timeval *);
116: static void udp_server_handle_sc(int, short, void *);
117: static void udp_process_slice(int, short, void *);
1.24 haesbaer 118: static int map_tos(char *, int *);
1.11 claudio 119: /*
120: * We account the mainstats here, that is the stats
121: * for all connections, all variables starting with slice
122: * are used to account information for the timeslice
123: * between each output. Peak variables record the highest
124: * between all slices so far.
125: */
126: static struct {
127: unsigned long long slice_bytes; /* bytes for last slice */
128: long double peak_mbps; /* peak mbps so far */
129: int nconns; /* connected clients */
1.20 claudio 130: struct event timer; /* process timer */
1.11 claudio 131: } mainstats;
132:
1.20 claudio 133: /* When adding variables, also add to tcp_stats_display() */
1.1 djm 134: static const char *allowed_kvars[] = {
135: "inpcb.inp_flags",
136: "sockb.so_rcv.sb_cc",
1.26 haesbaer 137: "sockb.so_rcv.sb_hiwat",
1.19 claudio 138: "sockb.so_rcv.sb_wat",
1.1 djm 139: "sockb.so_snd.sb_cc",
1.26 haesbaer 140: "sockb.so_snd.sb_hiwat",
1.19 claudio 141: "sockb.so_snd.sb_wat",
1.26 haesbaer 142: "tcpcb.last_ack_sent",
143: "tcpcb.max_sndwnd",
144: "tcpcb.rcv_adv",
145: "tcpcb.rcv_nxt",
146: "tcpcb.rcv_scale",
147: "tcpcb.rcv_wnd",
148: "tcpcb.rfbuf_cnt",
149: "tcpcb.rfbuf_ts",
150: "tcpcb.snd_cwnd",
151: "tcpcb.snd_max",
152: "tcpcb.snd_nxt",
153: "tcpcb.snd_scale",
154: "tcpcb.snd_ssthresh",
1.1 djm 155: "tcpcb.snd_una",
156: "tcpcb.snd_wl1",
157: "tcpcb.snd_wl2",
158: "tcpcb.snd_wnd",
159: "tcpcb.t_rcvtime",
1.26 haesbaer 160: "tcpcb.t_rtseq",
161: "tcpcb.t_rttmin",
1.1 djm 162: "tcpcb.t_rtttime",
1.26 haesbaer 163: "tcpcb.t_rttvar",
1.1 djm 164: "tcpcb.t_srtt",
1.26 haesbaer 165: "tcpcb.ts_recent",
1.19 claudio 166: "tcpcb.ts_recent_age",
1.1 djm 167: NULL
168: };
169:
1.20 claudio 170: TAILQ_HEAD(, statctx) sc_queue;
1.1 djm 171:
172: static void __dead
173: usage(void)
174: {
175: fprintf(stderr,
1.6 jmc 176: "usage: tcpbench -l\n"
1.25 haesbaer 177: " tcpbench [-uv] [-B buf] [-b addr] [-k kvars] [-n connections]\n"
178: " [-p port] [-r interval] [-S space] [-T toskeyword]\n"
1.30 henning 179: " [-t secs] [-V rtable] hostname\n"
1.21 jmc 180: " tcpbench -s [-uv] [-B buf] [-k kvars] [-p port]\n"
1.24 haesbaer 181: " [-r interval] [-S space] [-T toskeyword] [-V rtable]\n");
1.1 djm 182: exit(1);
183: }
184:
185: static void
1.20 claudio 186: signal_handler(int sig, short event, void *bula)
187: {
188: /*
189: * signal handler rules don't apply, libevent decouples for us
190: */
191: switch (sig) {
192: case SIGINT:
193: case SIGTERM:
194: case SIGHUP:
195: warnx("Terminated by signal %d", sig);
196: exit(0);
197: break; /* NOTREACHED */
198: default:
199: errx(1, "unexpected signal %d", sig);
200: break; /* NOTREACHED */
201: }
202: }
203:
204: static void
1.1 djm 205: saddr_ntop(const struct sockaddr *addr, socklen_t alen, char *buf, size_t len)
206: {
207: char hbuf[NI_MAXHOST], pbuf[NI_MAXSERV];
208: int herr;
209:
1.3 djm 210: if ((herr = getnameinfo(addr, alen, hbuf, sizeof(hbuf),
211: pbuf, sizeof(pbuf), NI_NUMERICHOST|NI_NUMERICSERV)) != 0) {
1.1 djm 212: if (herr == EAI_SYSTEM)
213: err(1, "getnameinfo");
214: else
215: errx(1, "getnameinfo: %s", gai_strerror(herr));
216: }
217: snprintf(buf, len, "[%s]:%s", hbuf, pbuf);
218: }
219:
220: static void
1.20 claudio 221: drop_gid(void)
222: {
223: gid_t gid;
224:
225: gid = getgid();
226: if (setresgid(gid, gid, gid) == -1)
227: err(1, "setresgid");
228: }
229:
230: static void
231: set_slice_timer(int on)
1.11 claudio 232: {
1.20 claudio 233: struct timeval tv;
1.11 claudio 234:
1.20 claudio 235: if (ptb->rflag == 0)
1.11 claudio 236: return;
237:
1.20 claudio 238: if (on) {
239: if (evtimer_pending(&mainstats.timer, NULL))
240: return;
241: timerclear(&tv);
242: /* XXX Is there a better way to do this ? */
243: tv.tv_sec = ptb->rflag / 1000;
244: tv.tv_usec = (ptb->rflag % 1000) * 1000;
245:
246: evtimer_add(&mainstats.timer, &tv);
247: } else if (evtimer_pending(&mainstats.timer, NULL))
248: evtimer_del(&mainstats.timer);
249: }
1.11 claudio 250:
1.20 claudio 251: static int
252: clock_gettime_tv(clockid_t clock_id, struct timeval *tv)
253: {
254: struct timespec ts;
255:
256: if (clock_gettime(clock_id, &ts) == -1)
257: return (-1);
258:
259: TIMESPEC_TO_TIMEVAL(tv, &ts);
260:
261: return (0);
1.11 claudio 262: }
263:
264: static void
1.20 claudio 265: print_tcp_header(void)
1.11 claudio 266: {
267: char **kv;
1.20 claudio 268:
1.11 claudio 269: printf("%12s %14s %12s %8s ", "elapsed_ms", "bytes", "mbps",
270: "bwidth");
1.20 claudio 271: for (kv = ptb->kvars; ptb->kvars != NULL && *kv != NULL; kv++)
272: printf("%s%s", kv != ptb->kvars ? "," : "", *kv);
1.11 claudio 273: printf("\n");
274: }
275:
276: static void
1.20 claudio 277: kget(u_long addr, void *buf, size_t size)
1.1 djm 278: {
1.20 claudio 279: if (kvm_read(ptb->kvmh, addr, buf, size) != (ssize_t)size)
280: errx(1, "kvm_read: %s", kvm_geterr(ptb->kvmh));
1.1 djm 281: }
282:
283: static u_long
1.20 claudio 284: kfind_tcb(int sock)
1.1 djm 285: {
286: struct inpcbtable tcbtab;
287: struct inpcb *head, *next, *prev;
288: struct inpcb inpcb;
289: struct tcpcb tcpcb;
290:
291: struct sockaddr_storage me, them;
292: socklen_t melen, themlen;
293: struct sockaddr_in *in4;
294: struct sockaddr_in6 *in6;
295: char tmp1[64], tmp2[64];
1.11 claudio 296: int nretry;
1.1 djm 297:
1.11 claudio 298: nretry = 10;
1.1 djm 299: melen = themlen = sizeof(struct sockaddr_storage);
300: if (getsockname(sock, (struct sockaddr *)&me, &melen) == -1)
301: err(1, "getsockname");
302: if (getpeername(sock, (struct sockaddr *)&them, &themlen) == -1)
303: err(1, "getpeername");
304: if (me.ss_family != them.ss_family)
305: errx(1, "%s: me.ss_family != them.ss_family", __func__);
306: if (me.ss_family != AF_INET && me.ss_family != AF_INET6)
307: errx(1, "%s: unknown socket family", __func__);
1.20 claudio 308: if (ptb->vflag >= 2) {
1.1 djm 309: saddr_ntop((struct sockaddr *)&me, me.ss_len,
310: tmp1, sizeof(tmp1));
311: saddr_ntop((struct sockaddr *)&them, them.ss_len,
312: tmp2, sizeof(tmp2));
313: fprintf(stderr, "Our socket local %s remote %s\n", tmp1, tmp2);
314: }
1.20 claudio 315: if (ptb->vflag >= 2)
316: fprintf(stderr, "Using PCB table at %lu\n", ptb->ktcbtab);
1.11 claudio 317: retry:
1.20 claudio 318: kget(ptb->ktcbtab, &tcbtab, sizeof(tcbtab));
1.1 djm 319: prev = head = (struct inpcb *)&CIRCLEQ_FIRST(
1.20 claudio 320: &((struct inpcbtable *)ptb->ktcbtab)->inpt_queue);
1.1 djm 321: next = CIRCLEQ_FIRST(&tcbtab.inpt_queue);
322:
1.20 claudio 323: if (ptb->vflag >= 2)
1.1 djm 324: fprintf(stderr, "PCB head at %p\n", head);
325: while (next != head) {
1.20 claudio 326: if (ptb->vflag >= 2)
1.1 djm 327: fprintf(stderr, "Checking PCB %p\n", next);
1.20 claudio 328: kget((u_long)next, &inpcb, sizeof(inpcb));
1.11 claudio 329: if (CIRCLEQ_PREV(&inpcb, inp_queue) != prev) {
330: if (nretry--) {
331: warnx("pcb prev pointer insane");
332: goto retry;
1.28 haesbaer 333: } else
1.11 claudio 334: errx(1, "pcb prev pointer insane,"
335: " all attempts exausted");
336: }
1.1 djm 337: prev = next;
338: next = CIRCLEQ_NEXT(&inpcb, inp_queue);
339:
340: if (me.ss_family == AF_INET) {
341: if ((inpcb.inp_flags & INP_IPV6) != 0) {
1.20 claudio 342: if (ptb->vflag >= 2)
1.1 djm 343: fprintf(stderr, "Skip: INP_IPV6");
344: continue;
345: }
1.20 claudio 346: if (ptb->vflag >= 2) {
1.1 djm 347: inet_ntop(AF_INET, &inpcb.inp_laddr,
348: tmp1, sizeof(tmp1));
349: inet_ntop(AF_INET, &inpcb.inp_faddr,
350: tmp2, sizeof(tmp2));
351: fprintf(stderr, "PCB %p local: [%s]:%d "
352: "remote: [%s]:%d\n", prev,
353: tmp1, inpcb.inp_lport,
354: tmp2, inpcb.inp_fport);
355: }
356: in4 = (struct sockaddr_in *)&me;
357: if (memcmp(&in4->sin_addr, &inpcb.inp_laddr,
358: sizeof(struct in_addr)) != 0 ||
359: in4->sin_port != inpcb.inp_lport)
360: continue;
361: in4 = (struct sockaddr_in *)&them;
362: if (memcmp(&in4->sin_addr, &inpcb.inp_faddr,
363: sizeof(struct in_addr)) != 0 ||
364: in4->sin_port != inpcb.inp_fport)
365: continue;
366: } else {
367: if ((inpcb.inp_flags & INP_IPV6) == 0)
368: continue;
1.20 claudio 369: if (ptb->vflag >= 2) {
1.1 djm 370: inet_ntop(AF_INET6, &inpcb.inp_laddr6,
371: tmp1, sizeof(tmp1));
372: inet_ntop(AF_INET6, &inpcb.inp_faddr6,
373: tmp2, sizeof(tmp2));
374: fprintf(stderr, "PCB %p local: [%s]:%d "
375: "remote: [%s]:%d\n", prev,
376: tmp1, inpcb.inp_lport,
377: tmp2, inpcb.inp_fport);
378: }
379: in6 = (struct sockaddr_in6 *)&me;
380: if (memcmp(&in6->sin6_addr, &inpcb.inp_laddr6,
381: sizeof(struct in6_addr)) != 0 ||
382: in6->sin6_port != inpcb.inp_lport)
383: continue;
384: in6 = (struct sockaddr_in6 *)&them;
385: if (memcmp(&in6->sin6_addr, &inpcb.inp_faddr6,
386: sizeof(struct in6_addr)) != 0 ||
387: in6->sin6_port != inpcb.inp_fport)
388: continue;
389: }
1.20 claudio 390: kget((u_long)inpcb.inp_ppcb, &tcpcb, sizeof(tcpcb));
1.1 djm 391: if (tcpcb.t_state != TCPS_ESTABLISHED) {
1.20 claudio 392: if (ptb->vflag >= 2)
1.1 djm 393: fprintf(stderr, "Not established\n");
394: continue;
395: }
1.20 claudio 396: if (ptb->vflag >= 2)
1.1 djm 397: fprintf(stderr, "Found PCB at %p\n", prev);
1.20 claudio 398: return ((u_long)prev);
1.1 djm 399: }
400:
401: errx(1, "No matching PCB found");
402: }
403:
404: static void
1.20 claudio 405: kupdate_stats(u_long tcbaddr, struct inpcb *inpcb,
406: struct tcpcb *tcpcb, struct socket *sockb)
1.1 djm 407: {
1.20 claudio 408: kget(tcbaddr, inpcb, sizeof(*inpcb));
409: kget((u_long)inpcb->inp_ppcb, tcpcb, sizeof(*tcpcb));
410: kget((u_long)inpcb->inp_socket, sockb, sizeof(*sockb));
1.1 djm 411: }
412:
413: static void
414: check_kvar(const char *var)
415: {
1.16 deraadt 416: u_int i;
1.1 djm 417:
418: for (i = 0; allowed_kvars[i] != NULL; i++)
419: if (strcmp(allowed_kvars[i], var) == 0)
420: return;
421: errx(1, "Unrecognised kvar: %s", var);
422: }
423:
424: static void
425: list_kvars(void)
426: {
1.16 deraadt 427: u_int i;
1.1 djm 428:
1.26 haesbaer 429: printf("Supported kernel variables:\n");
1.1 djm 430: for (i = 0; allowed_kvars[i] != NULL; i++)
1.26 haesbaer 431: printf("\t%s\n", allowed_kvars[i]);
1.1 djm 432: }
433:
434: static char **
435: check_prepare_kvars(char *list)
436: {
437: char *item, **ret = NULL;
1.16 deraadt 438: u_int n = 0;
1.1 djm 439:
440: while ((item = strsep(&list, ", \t\n")) != NULL) {
441: check_kvar(item);
442: if ((ret = realloc(ret, sizeof(*ret) * (++n + 1))) == NULL)
443: errx(1, "realloc(kvars)");
444: if ((ret[n - 1] = strdup(item)) == NULL)
445: errx(1, "strdup");
446: ret[n] = NULL;
447: }
1.20 claudio 448: return (ret);
1.1 djm 449: }
450:
451: static void
1.20 claudio 452: stats_prepare(struct statctx *sc)
1.1 djm 453: {
1.20 claudio 454: sc->buf = ptb->dummybuf;
455: sc->buflen = ptb->dummybuf_len;
456:
457: if (ptb->kvars)
458: sc->tcp_tcbaddr = kfind_tcb(sc->fd);
459: if (clock_gettime_tv(CLOCK_MONOTONIC, &sc->t_start) == -1)
460: err(1, "clock_gettime_tv");
1.1 djm 461: sc->t_last = sc->t_start;
462:
463: }
464:
465: static void
1.20 claudio 466: tcp_stats_display(unsigned long long total_elapsed, long double mbps,
1.11 claudio 467: float bwperc, struct statctx *sc, struct inpcb *inpcb,
468: struct tcpcb *tcpcb, struct socket *sockb)
469: {
470: int j;
471:
472: printf("%12llu %14llu %12.3Lf %7.2f%% ", total_elapsed, sc->bytes,
473: mbps, bwperc);
474:
1.20 claudio 475: if (ptb->kvars != NULL) {
476: kupdate_stats(sc->tcp_tcbaddr, inpcb, tcpcb,
1.11 claudio 477: sockb);
1.1 djm 478:
1.20 claudio 479: for (j = 0; ptb->kvars[j] != NULL; j++) {
1.11 claudio 480: #define S(a) #a
481: #define P(b, v, f) \
1.20 claudio 482: if (strcmp(ptb->kvars[j], S(b.v)) == 0) { \
1.11 claudio 483: printf("%s"f, j > 0 ? "," : "", b->v); \
484: continue; \
485: }
486: P(inpcb, inp_flags, "0x%08x")
487: P(sockb, so_rcv.sb_cc, "%lu")
1.26 haesbaer 488: P(sockb, so_rcv.sb_hiwat, "%lu")
1.19 claudio 489: P(sockb, so_rcv.sb_wat, "%lu")
1.11 claudio 490: P(sockb, so_snd.sb_cc, "%lu")
1.26 haesbaer 491: P(sockb, so_snd.sb_hiwat, "%lu")
1.19 claudio 492: P(sockb, so_snd.sb_wat, "%lu")
1.26 haesbaer 493: P(tcpcb, last_ack_sent, "%u")
494: P(tcpcb, max_sndwnd, "%lu")
495: P(tcpcb, rcv_adv, "%u")
496: P(tcpcb, rcv_nxt, "%u")
497: P(tcpcb, rcv_scale, "%u")
498: P(tcpcb, rcv_wnd, "%lu")
499: P(tcpcb, rfbuf_cnt, "%u")
500: P(tcpcb, rfbuf_ts, "%u")
501: P(tcpcb, snd_cwnd, "%lu")
502: P(tcpcb, snd_max, "%u")
503: P(tcpcb, snd_nxt, "%u")
504: P(tcpcb, snd_scale, "%u")
505: P(tcpcb, snd_ssthresh, "%lu")
1.11 claudio 506: P(tcpcb, snd_una, "%u")
507: P(tcpcb, snd_wl1, "%u")
508: P(tcpcb, snd_wl2, "%u")
509: P(tcpcb, snd_wnd, "%lu")
510: P(tcpcb, t_rcvtime, "%u")
1.26 haesbaer 511: P(tcpcb, t_rtseq, "%u")
512: P(tcpcb, t_rttmin, "%hu")
1.11 claudio 513: P(tcpcb, t_rtttime, "%u")
1.26 haesbaer 514: P(tcpcb, t_rttvar, "%hu")
1.11 claudio 515: P(tcpcb, t_srtt, "%hu")
1.26 haesbaer 516: P(tcpcb, ts_recent, "%u")
1.19 claudio 517: P(tcpcb, ts_recent_age, "%u")
1.11 claudio 518: #undef S
1.1 djm 519: #undef P
520: }
521: }
522: printf("\n");
523: }
524:
525: static void
1.20 claudio 526: tcp_process_slice(int fd, short event, void *bula)
1.1 djm 527: {
1.11 claudio 528: unsigned long long total_elapsed, since_last;
529: long double mbps, slice_mbps = 0;
530: float bwperc;
1.20 claudio 531: struct statctx *sc;
1.11 claudio 532: struct timeval t_cur, t_diff;
533: struct inpcb inpcb;
534: struct tcpcb tcpcb;
535: struct socket sockb;
536:
1.20 claudio 537: TAILQ_FOREACH(sc, &sc_queue, entry) {
538: if (clock_gettime_tv(CLOCK_MONOTONIC, &t_cur) == -1)
539: err(1, "clock_gettime_tv");
540: if (ptb->kvars != NULL) /* process kernel stats */
541: kupdate_stats(sc->tcp_tcbaddr, &inpcb, &tcpcb,
1.11 claudio 542: &sockb);
1.20 claudio 543:
1.11 claudio 544: timersub(&t_cur, &sc->t_start, &t_diff);
545: total_elapsed = t_diff.tv_sec * 1000 + t_diff.tv_usec / 1000;
546: timersub(&t_cur, &sc->t_last, &t_diff);
547: since_last = t_diff.tv_sec * 1000 + t_diff.tv_usec / 1000;
548: bwperc = (sc->bytes * 100.0) / mainstats.slice_bytes;
549: mbps = (sc->bytes * 8) / (since_last * 1000.0);
550: slice_mbps += mbps;
551:
1.20 claudio 552: tcp_stats_display(total_elapsed, mbps, bwperc, sc,
1.11 claudio 553: &inpcb, &tcpcb, &sockb);
554:
555: sc->t_last = t_cur;
556: sc->bytes = 0;
557: }
1.1 djm 558:
1.11 claudio 559: /* process stats for this slice */
560: if (slice_mbps > mainstats.peak_mbps)
561: mainstats.peak_mbps = slice_mbps;
1.20 claudio 562: printf("Conn: %3d Mbps: %12.3Lf Peak Mbps: %12.3Lf Avg Mbps: %12.3Lf\n",
563: mainstats.nconns, slice_mbps, mainstats.peak_mbps,
564: slice_mbps / mainstats.nconns);
565: mainstats.slice_bytes = 0;
566:
567: set_slice_timer(mainstats.nconns > 0);
568: }
569:
570: static void
571: udp_process_slice(int fd, short event, void *v_sc)
572: {
573: struct statctx *sc = v_sc;
1.31 ! haesbaer 574: unsigned long long total_elapsed, since_last, pps;
! 575: long double slice_mbps;
1.20 claudio 576: struct timeval t_cur, t_diff;
577:
578: if (clock_gettime_tv(CLOCK_MONOTONIC, &t_cur) == -1)
579: err(1, "clock_gettime_tv");
580: /* Calculate pps */
581: timersub(&t_cur, &sc->t_start, &t_diff);
582: total_elapsed = t_diff.tv_sec * 1000 + t_diff.tv_usec / 1000;
583: timersub(&t_cur, &sc->t_last, &t_diff);
584: since_last = t_diff.tv_sec * 1000 + t_diff.tv_usec / 1000;
585: slice_mbps = (sc->bytes * 8) / (since_last * 1000.0);
586: pps = (sc->udp_slice_pkts * 1000) / since_last;
587: if (slice_mbps > mainstats.peak_mbps)
588: mainstats.peak_mbps = slice_mbps;
1.31 ! haesbaer 589: printf("Elapsed: %11llu Mbps: %11.3Lf Peak Mbps: %11.3Lf %s PPS: %7llu\n",
1.20 claudio 590: total_elapsed, slice_mbps, mainstats.peak_mbps,
591: ptb->sflag ? "Rx" : "Tx", pps);
592:
593: /* Clean up this slice time */
594: sc->t_last = t_cur;
595: sc->bytes = 0;
596: sc->udp_slice_pkts = 0;
597: set_slice_timer(1);
1.11 claudio 598: }
1.1 djm 599:
1.20 claudio 600: static void
601: udp_server_handle_sc(int fd, short event, void *v_sc)
1.11 claudio 602: {
603: ssize_t n;
1.20 claudio 604: struct statctx *sc = v_sc;
1.1 djm 605:
1.11 claudio 606: again:
1.20 claudio 607: n = read(fd, ptb->dummybuf, ptb->dummybuf_len);
608: if (n == 0)
609: return;
610: else if (n == -1) {
1.11 claudio 611: if (errno == EINTR)
612: goto again;
613: else if (errno == EWOULDBLOCK)
1.20 claudio 614: return;
1.11 claudio 615: warn("fd %d read error", fd);
1.20 claudio 616: return;
617: }
1.11 claudio 618:
1.20 claudio 619: if (ptb->vflag >= 3)
620: fprintf(stderr, "read: %zd bytes\n", n);
621: /* If this was our first packet, start slice timer */
622: if (mainstats.peak_mbps == 0)
623: set_slice_timer(1);
624: /* Account packet */
625: sc->udp_slice_pkts++;
626: sc->bytes += n;
627: }
628:
629: static void
630: tcp_server_handle_sc(int fd, short event, void *v_sc)
631: {
632: struct statctx *sc = v_sc;
633: ssize_t n;
634:
635: again:
636: n = read(sc->fd, sc->buf, sc->buflen);
637: if (n == -1) {
638: if (errno == EINTR)
639: goto again;
640: else if (errno == EWOULDBLOCK)
641: return;
642: warn("fd %d read error", sc->fd);
643: return;
644: } else if (n == 0) {
645: if (ptb->vflag)
646: fprintf(stderr, "%8d closed by remote end\n", sc->fd);
1.23 sthen 647: event_del(&sc->ev);
1.20 claudio 648: close(sc->fd);
649: TAILQ_REMOVE(&sc_queue, sc, entry);
650: free(sc);
651: mainstats.nconns--;
652: set_slice_timer(mainstats.nconns > 0);
653: return;
1.1 djm 654: }
1.20 claudio 655: if (ptb->vflag >= 3)
1.11 claudio 656: fprintf(stderr, "read: %zd bytes\n", n);
1.20 claudio 657: sc->bytes += n;
658: mainstats.slice_bytes += n;
659: }
1.11 claudio 660:
1.20 claudio 661: static void
662: tcp_server_accept(int fd, short event, void *bula)
663: {
664: int sock, r;
665: struct statctx *sc;
666: struct sockaddr_storage ss;
667: socklen_t sslen;
668: char tmp[128];
669:
670: sslen = sizeof(ss);
671: again:
672: if ((sock = accept(fd, (struct sockaddr *)&ss, &sslen)) == -1) {
673: if (errno == EINTR)
674: goto again;
675: warn("accept");
676: return;
677: }
678: saddr_ntop((struct sockaddr *)&ss, sslen,
679: tmp, sizeof(tmp));
680: if ((r = fcntl(sock, F_GETFL, 0)) == -1)
681: err(1, "fcntl(F_GETFL)");
682: r |= O_NONBLOCK;
683: if (fcntl(sock, F_SETFL, r) == -1)
684: err(1, "fcntl(F_SETFL, O_NONBLOCK)");
1.24 haesbaer 685: if (ptb->Tflag != -1 && ss.ss_family == AF_INET) {
686: if (setsockopt(sock, IPPROTO_IP, IP_TOS,
687: &ptb->Tflag, sizeof(ptb->Tflag)))
688: err(1, "setsockopt IP_TOS");
689: }
690: if (ptb->Tflag != -1 && ss.ss_family == AF_INET6) {
691: if (setsockopt(sock, IPPROTO_IPV6, IPV6_TCLASS,
692: &ptb->Tflag, sizeof(ptb->Tflag)))
693: err(1, "setsockopt IPV6_TCLASS");
694: }
1.20 claudio 695: /* Alloc client structure and register reading callback */
696: if ((sc = calloc(1, sizeof(*sc))) == NULL)
697: err(1, "calloc");
698: sc->fd = sock;
699: stats_prepare(sc);
700: event_set(&sc->ev, sc->fd, EV_READ | EV_PERSIST,
701: tcp_server_handle_sc, sc);
702: event_add(&sc->ev, NULL);
703: TAILQ_INSERT_TAIL(&sc_queue, sc, entry);
704: mainstats.nconns++;
705: set_slice_timer(mainstats.nconns > 0);
706: if (ptb->vflag)
1.28 haesbaer 707: fprintf(stderr, "Accepted connection from %s, fd = %d\n",
708: tmp, sc->fd);
1.1 djm 709: }
710:
1.20 claudio 711: static void
712: server_init(struct addrinfo *aitop, struct statctx *udp_sc)
1.1 djm 713: {
714: char tmp[128];
1.11 claudio 715: int sock, on = 1;
1.1 djm 716: struct addrinfo *ai;
1.20 claudio 717: struct event *ev;
1.11 claudio 718: nfds_t lnfds;
1.1 djm 719:
1.20 claudio 720: if (setpgid(0, 0) == -1)
721: err(1, "setpgid");
722:
1.11 claudio 723: lnfds = 0;
1.1 djm 724: for (ai = aitop; ai != NULL; ai = ai->ai_next) {
725: saddr_ntop(ai->ai_addr, ai->ai_addrlen, tmp, sizeof(tmp));
1.20 claudio 726: if (ptb->vflag)
727: fprintf(stderr, "Try to bind to %s\n", tmp);
1.1 djm 728: if ((sock = socket(ai->ai_family, ai->ai_socktype,
729: ai->ai_protocol)) == -1) {
730: if (ai->ai_next == NULL)
731: err(1, "socket");
1.20 claudio 732: if (ptb->vflag)
1.1 djm 733: warn("socket");
734: continue;
735: }
1.22 mikeb 736: if (ptb->Vflag) {
737: if (setsockopt(sock, SOL_SOCKET, SO_RTABLE,
738: &ptb->Vflag, sizeof(ptb->Vflag)) == -1) {
739: if (errno == ENOPROTOOPT)
740: warn("set rtable");
741: else
742: err(1, "setsockopt SO_RTABLE");
743: }
744: }
1.24 haesbaer 745: if (ptb->Tflag != -1 && ai->ai_family == AF_INET) {
746: if (setsockopt(sock, IPPROTO_IP, IP_TOS,
747: &ptb->Tflag, sizeof(ptb->Tflag)))
748: err(1, "setsockopt IP_TOS");
749: }
750: if (ptb->Tflag != -1 && ai->ai_family == AF_INET6) {
751: if (setsockopt(sock, IPPROTO_IPV6, IPV6_TCLASS,
752: &ptb->Tflag, sizeof(ptb->Tflag)))
753: err(1, "setsockopt IPV6_TCLASS");
754: }
1.1 djm 755: if (setsockopt(sock, SOL_SOCKET, SO_REUSEADDR,
756: &on, sizeof(on)) == -1)
757: warn("reuse port");
758: if (bind(sock, ai->ai_addr, ai->ai_addrlen) != 0) {
759: if (ai->ai_next == NULL)
760: err(1, "bind");
1.20 claudio 761: if (ptb->vflag)
1.1 djm 762: warn("bind");
763: close(sock);
764: continue;
765: }
1.20 claudio 766: if (ptb->Sflag) {
1.1 djm 767: if (setsockopt(sock, SOL_SOCKET, SO_RCVBUF,
1.20 claudio 768: &ptb->Sflag, sizeof(ptb->Sflag)) == -1)
769: warn("set receive buffer size");
1.1 djm 770: }
1.20 claudio 771: if (TCP_MODE) {
772: if (listen(sock, 64) == -1) {
773: if (ai->ai_next == NULL)
774: err(1, "listen");
775: if (ptb->vflag)
776: warn("listen");
777: close(sock);
778: continue;
779: }
1.1 djm 780: }
1.20 claudio 781: if ((ev = calloc(1, sizeof(*ev))) == NULL)
782: err(1, "calloc");
783: if (UDP_MODE)
784: event_set(ev, sock, EV_READ | EV_PERSIST,
785: udp_server_handle_sc, udp_sc);
786: else
787: event_set(ev, sock, EV_READ | EV_PERSIST,
788: tcp_server_accept, NULL);
789: event_add(ev, NULL);
790: if (ptb->vflag >= 3)
791: fprintf(stderr, "bound to fd %d\n", sock);
1.11 claudio 792: lnfds++;
1.1 djm 793: }
794: freeaddrinfo(aitop);
1.11 claudio 795: if (lnfds == 0)
1.1 djm 796: errx(1, "No working listen addresses found");
1.11 claudio 797: }
798:
799: static void
1.20 claudio 800: client_handle_sc(int fd, short event, void *v_sc)
801: {
802: struct statctx *sc = v_sc;
803: ssize_t n;
1.1 djm 804:
1.20 claudio 805: again:
806: if ((n = write(sc->fd, sc->buf, sc->buflen)) == -1) {
807: if (errno == EINTR || errno == EAGAIN ||
808: (UDP_MODE && errno == ENOBUFS))
809: goto again;
810: err(1, "write");
1.11 claudio 811: }
1.20 claudio 812: if (TCP_MODE && n == 0) {
1.28 haesbaer 813: fprintf(stderr, "Remote end closed connection");
1.20 claudio 814: exit(1);
1.1 djm 815: }
1.20 claudio 816: if (ptb->vflag >= 3)
1.28 haesbaer 817: fprintf(stderr, "write: %zd bytes\n", n);
1.20 claudio 818: sc->bytes += n;
819: mainstats.slice_bytes += n;
820: if (UDP_MODE)
821: sc->udp_slice_pkts++;
1.1 djm 822: }
823:
1.20 claudio 824: static void
1.25 haesbaer 825: client_init(struct addrinfo *aitop, int nconn, struct statctx *udp_sc,
826: struct addrinfo *aib)
1.1 djm 827: {
1.20 claudio 828: struct statctx *sc;
829: struct addrinfo *ai;
1.14 claudio 830: char tmp[128];
831: int i, r, sock;
1.1 djm 832:
1.20 claudio 833: sc = udp_sc;
1.4 henning 834: for (i = 0; i < nconn; i++) {
835: for (sock = -1, ai = aitop; ai != NULL; ai = ai->ai_next) {
836: saddr_ntop(ai->ai_addr, ai->ai_addrlen, tmp,
837: sizeof(tmp));
1.20 claudio 838: if (ptb->vflag && i == 0)
1.4 henning 839: fprintf(stderr, "Trying %s\n", tmp);
840: if ((sock = socket(ai->ai_family, ai->ai_socktype,
841: ai->ai_protocol)) == -1) {
842: if (ai->ai_next == NULL)
843: err(1, "socket");
1.20 claudio 844: if (ptb->vflag)
1.4 henning 845: warn("socket");
846: continue;
847: }
1.25 haesbaer 848: if (aib != NULL) {
849: saddr_ntop(aib->ai_addr, aib->ai_addrlen,
850: tmp, sizeof(tmp));
851: if (ptb->vflag)
852: fprintf(stderr,
853: "Try to bind to %s\n", tmp);
854: if (bind(sock, (struct sockaddr *)aib->ai_addr,
855: aib->ai_addrlen) == -1)
856: err(1, "bind");
857: freeaddrinfo(aib);
858: }
1.24 haesbaer 859: if (ptb->Tflag != -1 && ai->ai_family == AF_INET) {
860: if (setsockopt(sock, IPPROTO_IP, IP_TOS,
861: &ptb->Tflag, sizeof(ptb->Tflag)))
862: err(1, "setsockopt IP_TOS");
863: }
864: if (ptb->Tflag != -1 && ai->ai_family == AF_INET6) {
865: if (setsockopt(sock, IPPROTO_IPV6, IPV6_TCLASS,
866: &ptb->Tflag, sizeof(ptb->Tflag)))
867: err(1, "setsockopt IPV6_TCLASS");
868: }
1.22 mikeb 869: if (ptb->Vflag) {
870: if (setsockopt(sock, SOL_SOCKET, SO_RTABLE,
871: &ptb->Vflag, sizeof(ptb->Vflag)) == -1) {
872: if (errno == ENOPROTOOPT)
873: warn("set rtable");
874: else
875: err(1, "setsockopt SO_RTABLE");
876: }
877: }
1.20 claudio 878: if (ptb->Sflag) {
1.4 henning 879: if (setsockopt(sock, SOL_SOCKET, SO_SNDBUF,
1.20 claudio 880: &ptb->Sflag, sizeof(ptb->Sflag)) == -1)
1.4 henning 881: warn("set TCP send buffer size");
882: }
883: if (connect(sock, ai->ai_addr, ai->ai_addrlen) != 0) {
884: if (ai->ai_next == NULL)
885: err(1, "connect");
1.20 claudio 886: if (ptb->vflag)
1.4 henning 887: warn("connect");
888: close(sock);
889: sock = -1;
890: continue;
891: }
892: break;
1.1 djm 893: }
1.4 henning 894: if (sock == -1)
895: errx(1, "No host found");
896: if ((r = fcntl(sock, F_GETFL, 0)) == -1)
897: err(1, "fcntl(F_GETFL)");
898: r |= O_NONBLOCK;
899: if (fcntl(sock, F_SETFL, r) == -1)
900: err(1, "fcntl(F_SETFL, O_NONBLOCK)");
1.20 claudio 901: /* Alloc and prepare stats */
902: if (TCP_MODE) {
903: if ((sc = calloc(1, sizeof(*sc))) == NULL)
904: err(1, "calloc");
905: }
906: sc->fd = sock;
907: stats_prepare(sc);
908: event_set(&sc->ev, sc->fd, EV_WRITE | EV_PERSIST,
909: client_handle_sc, sc);
910: event_add(&sc->ev, NULL);
911: TAILQ_INSERT_TAIL(&sc_queue, sc, entry);
912: mainstats.nconns++;
913: set_slice_timer(mainstats.nconns > 0);
1.14 claudio 914: }
915: freeaddrinfo(aitop);
916:
1.20 claudio 917: if (ptb->vflag && nconn > 1)
1.29 haesbaer 918: fprintf(stderr, "%d connections established\n",
919: mainstats.nconns);
1.14 claudio 920: }
921:
1.24 haesbaer 922: static int
923: map_tos(char *s, int *val)
924: {
925: /* DiffServ Codepoints and other TOS mappings */
926: const struct toskeywords {
927: const char *keyword;
928: int val;
929: } *t, toskeywords[] = {
930: { "af11", IPTOS_DSCP_AF11 },
931: { "af12", IPTOS_DSCP_AF12 },
932: { "af13", IPTOS_DSCP_AF13 },
933: { "af21", IPTOS_DSCP_AF21 },
934: { "af22", IPTOS_DSCP_AF22 },
935: { "af23", IPTOS_DSCP_AF23 },
936: { "af31", IPTOS_DSCP_AF31 },
937: { "af32", IPTOS_DSCP_AF32 },
938: { "af33", IPTOS_DSCP_AF33 },
939: { "af41", IPTOS_DSCP_AF41 },
940: { "af42", IPTOS_DSCP_AF42 },
941: { "af43", IPTOS_DSCP_AF43 },
942: { "critical", IPTOS_PREC_CRITIC_ECP },
943: { "cs0", IPTOS_DSCP_CS0 },
944: { "cs1", IPTOS_DSCP_CS1 },
945: { "cs2", IPTOS_DSCP_CS2 },
946: { "cs3", IPTOS_DSCP_CS3 },
947: { "cs4", IPTOS_DSCP_CS4 },
948: { "cs5", IPTOS_DSCP_CS5 },
949: { "cs6", IPTOS_DSCP_CS6 },
950: { "cs7", IPTOS_DSCP_CS7 },
951: { "ef", IPTOS_DSCP_EF },
952: { "inetcontrol", IPTOS_PREC_INTERNETCONTROL },
953: { "lowdelay", IPTOS_LOWDELAY },
954: { "netcontrol", IPTOS_PREC_NETCONTROL },
955: { "reliability", IPTOS_RELIABILITY },
956: { "throughput", IPTOS_THROUGHPUT },
957: { NULL, -1 },
958: };
959:
960: for (t = toskeywords; t->keyword != NULL; t++) {
961: if (strcmp(s, t->keyword) == 0) {
962: *val = t->val;
963: return (1);
964: }
965: }
966:
967: return (0);
968: }
969:
1.30 henning 970: static void
971: quit(int sig, short event, void *arg)
972: {
973: exit(0);
974: }
975:
1.1 djm 976: int
977: main(int argc, char **argv)
978: {
979: extern int optind;
980: extern char *optarg;
1.30 henning 981: struct timeval tv;
982: unsigned int secs;
1.1 djm 983:
984: char kerr[_POSIX2_LINE_MAX], *tmp;
1.25 haesbaer 985: struct addrinfo *aitop, *aib, hints;
1.1 djm 986: const char *errstr;
1.11 claudio 987: struct rlimit rl;
1.20 claudio 988: int ch, herr, nconn;
1.12 deraadt 989: struct nlist nl[] = { { "_tcbtable" }, { "" } };
1.25 haesbaer 990: const char *host = NULL, *port = DEFAULT_PORT, *srcbind = NULL;
1.30 henning 991: struct event ev_sigint, ev_sigterm, ev_sighup, ev_progtimer;
1.20 claudio 992: struct statctx *udp_sc = NULL;
1.1 djm 993:
1.20 claudio 994: /* Init world */
1.26 haesbaer 995: setlinebuf(stdout);
1.20 claudio 996: ptb = &tcpbench;
997: ptb->dummybuf_len = 0;
998: ptb->Sflag = ptb->sflag = ptb->vflag = ptb->Vflag = 0;
999: ptb->kvmh = NULL;
1000: ptb->kvars = NULL;
1001: ptb->rflag = DEFAULT_STATS_INTERVAL;
1.24 haesbaer 1002: ptb->Tflag = -1;
1.20 claudio 1003: nconn = 1;
1.25 haesbaer 1004: aib = NULL;
1.30 henning 1005: secs = 0;
1.1 djm 1006:
1.30 henning 1007: while ((ch = getopt(argc, argv, "b:B:hlk:n:p:r:sS:t:T:uvV:")) != -1) {
1.1 djm 1008: switch (ch) {
1.25 haesbaer 1009: case 'b':
1010: srcbind = optarg;
1011: break;
1.1 djm 1012: case 'l':
1013: list_kvars();
1014: exit(0);
1015: case 'k':
1016: if ((tmp = strdup(optarg)) == NULL)
1017: errx(1, "strdup");
1.20 claudio 1018: ptb->kvars = check_prepare_kvars(tmp);
1.1 djm 1019: free(tmp);
1020: break;
1021: case 'r':
1.20 claudio 1022: ptb->rflag = strtonum(optarg, 0, 60 * 60 * 24 * 1000,
1.1 djm 1023: &errstr);
1024: if (errstr != NULL)
1025: errx(1, "statistics interval is %s: %s",
1026: errstr, optarg);
1027: break;
1028: case 'p':
1029: port = optarg;
1030: break;
1031: case 's':
1.20 claudio 1032: ptb->sflag = 1;
1.1 djm 1033: break;
1034: case 'S':
1.20 claudio 1035: ptb->Sflag = strtonum(optarg, 0, 1024*1024*1024,
1.1 djm 1036: &errstr);
1037: if (errstr != NULL)
1038: errx(1, "receive space interval is %s: %s",
1039: errstr, optarg);
1040: break;
1041: case 'B':
1.20 claudio 1042: ptb->dummybuf_len = strtonum(optarg, 0, 1024*1024*1024,
1.1 djm 1043: &errstr);
1044: if (errstr != NULL)
1045: errx(1, "read/write buffer size is %s: %s",
1046: errstr, optarg);
1047: break;
1048: case 'v':
1.20 claudio 1049: ptb->vflag++;
1.9 claudio 1050: break;
1051: case 'V':
1.20 claudio 1052: ptb->Vflag = (unsigned int)strtonum(optarg, 0,
1.9 claudio 1053: RT_TABLEID_MAX, &errstr);
1054: if (errstr)
1.17 guenther 1055: errx(1, "rtable value is %s: %s",
1.9 claudio 1056: errstr, optarg);
1.1 djm 1057: break;
1.4 henning 1058: case 'n':
1059: nconn = strtonum(optarg, 0, 65535, &errstr);
1060: if (errstr != NULL)
1061: errx(1, "number of connections is %s: %s",
1062: errstr, optarg);
1063: break;
1.20 claudio 1064: case 'u':
1065: ptb->uflag = 1;
1.24 haesbaer 1066: break;
1067: case 'T':
1068: if (map_tos(optarg, &ptb->Tflag))
1069: break;
1070: errstr = NULL;
1071: if (strlen(optarg) > 1 && optarg[0] == '0' &&
1072: optarg[1] == 'x')
1073: ptb->Tflag = (int)strtol(optarg, NULL, 16);
1074: else
1075: ptb->Tflag = (int)strtonum(optarg, 0, 255,
1076: &errstr);
1077: if (ptb->Tflag == -1 || ptb->Tflag > 255 || errstr)
1078: errx(1, "illegal tos value %s", optarg);
1.20 claudio 1079: break;
1.30 henning 1080: case 't':
1081: secs = strtonum(optarg, 1, UINT_MAX, &errstr);
1082: if (errstr != NULL)
1083: errx(1, "secs is %s: %s",
1084: errstr, optarg);
1085: break;
1.1 djm 1086: case 'h':
1087: default:
1088: usage();
1089: }
1090: }
1091:
1092: argv += optind;
1093: argc -= optind;
1.20 claudio 1094: if ((argc != (ptb->sflag ? 0 : 1)) ||
1095: (UDP_MODE && (ptb->kvars || nconn != 1)))
1.1 djm 1096: usage();
1.4 henning 1097:
1.20 claudio 1098: if (!ptb->sflag)
1.1 djm 1099: host = argv[0];
1.20 claudio 1100: /*
1101: * Rationale,
1102: * If TCP, use a big buffer with big reads/writes.
1103: * If UDP, use a big buffer in server and a buffer the size of a
1104: * ethernet packet.
1105: */
1106: if (!ptb->dummybuf_len) {
1107: if (ptb->sflag || TCP_MODE)
1108: ptb->dummybuf_len = DEFAULT_BUF;
1109: else
1110: ptb->dummybuf_len = DEFAULT_UDP_PKT;
1111: }
1.1 djm 1112:
1.13 claudio 1113: bzero(&hints, sizeof(hints));
1.25 haesbaer 1114: if (UDP_MODE) {
1.20 claudio 1115: hints.ai_socktype = SOCK_DGRAM;
1.25 haesbaer 1116: hints.ai_protocol = IPPROTO_UDP;
1.27 haesbaer 1117: } else {
1.20 claudio 1118: hints.ai_socktype = SOCK_STREAM;
1.25 haesbaer 1119: hints.ai_protocol = IPPROTO_TCP;
1120: }
1.20 claudio 1121: if (ptb->sflag)
1.4 henning 1122: hints.ai_flags = AI_PASSIVE;
1.25 haesbaer 1123: if (srcbind != NULL) {
1124: hints.ai_flags |= AI_NUMERICHOST;
1125: herr = getaddrinfo(srcbind, NULL, &hints, &aib);
1126: hints.ai_flags &= ~AI_NUMERICHOST;
1127: if (herr != 0) {
1128: if (herr == EAI_SYSTEM)
1129: err(1, "getaddrinfo");
1130: else
1131: errx(1, "getaddrinfo: %s", gai_strerror(herr));
1132: }
1133: }
1.13 claudio 1134: if ((herr = getaddrinfo(host, port, &hints, &aitop)) != 0) {
1135: if (herr == EAI_SYSTEM)
1136: err(1, "getaddrinfo");
1137: else
1138: errx(1, "getaddrinfo: %s", gai_strerror(herr));
1.1 djm 1139: }
1.20 claudio 1140: if (ptb->kvars) {
1141: if ((ptb->kvmh = kvm_openfiles(NULL, NULL, NULL,
1.1 djm 1142: O_RDONLY, kerr)) == NULL)
1143: errx(1, "kvm_open: %s", kerr);
1144: drop_gid();
1.20 claudio 1145: if (kvm_nlist(ptb->kvmh, nl) < 0 || nl[0].n_type == 0)
1.1 djm 1146: errx(1, "kvm: no namelist");
1.20 claudio 1147: ptb->ktcbtab = nl[0].n_value;
1.1 djm 1148: } else
1149: drop_gid();
1150:
1.11 claudio 1151: if (getrlimit(RLIMIT_NOFILE, &rl) == -1)
1152: err(1, "getrlimit");
1153: if (rl.rlim_cur < MAX_FD)
1154: rl.rlim_cur = MAX_FD;
1155: if (setrlimit(RLIMIT_NOFILE, &rl))
1156: err(1, "setrlimit");
1157: if (getrlimit(RLIMIT_NOFILE, &rl) == -1)
1158: err(1, "getrlimit");
1159:
1.20 claudio 1160: /* Init world */
1161: TAILQ_INIT(&sc_queue);
1162: if ((ptb->dummybuf = malloc(ptb->dummybuf_len)) == NULL)
1163: err(1, "malloc");
1164: arc4random_buf(ptb->dummybuf, ptb->dummybuf_len);
1165:
1166: /* Setup libevent and signals */
1167: event_init();
1168: signal_set(&ev_sigterm, SIGTERM, signal_handler, NULL);
1169: signal_set(&ev_sighup, SIGHUP, signal_handler, NULL);
1170: signal_set(&ev_sigint, SIGINT, signal_handler, NULL);
1171: signal_add(&ev_sigint, NULL);
1172: signal_add(&ev_sigterm, NULL);
1173: signal_add(&ev_sighup, NULL);
1174: signal(SIGPIPE, SIG_IGN);
1175:
1.27 haesbaer 1176: if (UDP_MODE) {
1177: if ((udp_sc = calloc(1, sizeof(*udp_sc))) == NULL)
1178: err(1, "calloc");
1179: udp_sc->fd = -1;
1180: stats_prepare(udp_sc);
1181: evtimer_set(&mainstats.timer, udp_process_slice, udp_sc);
1182: } else {
1.20 claudio 1183: print_tcp_header();
1184: evtimer_set(&mainstats.timer, tcp_process_slice, NULL);
1.27 haesbaer 1185: }
1.20 claudio 1186:
1.27 haesbaer 1187: if (ptb->sflag)
1.20 claudio 1188: server_init(aitop, udp_sc);
1.30 henning 1189: else {
1190: if (secs > 0) {
1191: timerclear(&tv);
1192: tv.tv_sec = secs + 1;
1193: evtimer_set(&ev_progtimer, quit, NULL);
1194: evtimer_add(&ev_progtimer, &tv);
1195: }
1.25 haesbaer 1196: client_init(aitop, nconn, udp_sc, aib);
1.30 henning 1197: }
1.20 claudio 1198:
1199: /* libevent main loop*/
1200: event_dispatch();
1.1 djm 1201:
1.20 claudio 1202: return (0);
1.1 djm 1203: }