op public repos

Blob

Date:: Wed Dec 15 22:17:32 2021 UTC
Message:: add compat for vis
Actions:: History | Blame | Raw File
1 /*
2  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  */
16 
17 #include "compat.h"
18 
19 #include <sys/types.h>
20 #include <sys/socket.h>
21 
22 #include <netdb.h>
23 
24 #include <assert.h>
25 #include <endian.h>
26 #include <errno.h>
27 #include <fcntl.h>
28 #include <inttypes.h>
29 #include <signal.h>
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <syslog.h>
34 #include <tls.h>
35 #include <unistd.h>
36 
37 #include "9pclib.h"
38 #include "kamid.h"
39 #include "log.h"
40 #include "utils.h"
41 
42 #define DEBUG_PACKETS 0
43 
44 #define PROMPT "=% "
45 
46 /* flags */
47 int			 verbose;
48 int			 tls;
49 const char		*keypath;
50 const char		*crtpath;
51 const char		*host;
52 const char		*port;
53 
54 /* state */
55 struct tls_config	*tlsconf;
56 struct tls		*ctx;
57 struct bufferevent	*bev, *inbev;
58 
59 static void ATTR_DEAD	 usage(int);
60 
61 static void		 sig_handler(int, short, void *);
62 
63 static int		 openconn(void);
64 static void		 mark_nonblock(int);
65 
66 static void		 tls_readcb(int, short, void *);
67 static void		 tls_writecb(int, short, void *);
68 
69 static void		 client_read(struct bufferevent *, void *);
70 static void		 client_write(struct bufferevent *, void *);
71 static void		 client_error(struct bufferevent *, short, void *);
72 
73 static void		 repl_read(struct bufferevent *, void *);
74 static void		 repl_error(struct bufferevent *, short, void *);
75 
76 static void		 excmd_version(const char **, int);
77 static void		 excmd_attach(const char **, int);
78 static void		 excmd_clunk(const char **, int);
79 static void		 excmd_flush(const char **, int);
80 static void		 excmd_walk(const char ** , int);
81 static void		 excmd_open(const char ** , int);
82 static void		 excmd_read(const char ** , int);
83 static void		 excmd(const char **, int);
84 
85 static const char	*pp_qid_type(uint8_t);
86 static void		 pp_qid(const uint8_t *, uint32_t);
87 static void		 pp_msg(uint32_t, uint8_t, uint16_t, const uint8_t *);
88 static void		 handle_9p(const uint8_t *, size_t);
89 static void		 clr(void);
90 static void		 prompt(void);
91 
92 static void ATTR_DEAD
93 usage(int ret)
94 {
95 	fprintf(stderr,
96 	    "usage: %s [-chv] [-C crt] [-K key] [-H host] [-P port]\n",
97 	    getprogname());
98 	fprintf(stderr, PACKAGE_NAME " suite version " PACKAGE_VERSION "\n");
99 	exit(ret);
100 }
101 
102 static void
103 sig_handler(int sig, short event, void *d)
104 {
105 	/*
106 	 * Normal signal handler rules don't apply because libevent
107 	 * decouples for us.
108 	 */
109 
110 	switch (sig) {
111 	case SIGINT:
112 	case SIGTERM:
113 		clr();
114 		log_warnx("Shutting down...");
115 		event_loopbreak();
116 		return;
117 	default:
118 		fatalx("unexpected signal %d", sig);
119 	}
120 }
121 
122 static int
123 openconn(void)
124 {
125 	struct addrinfo hints, *res, *res0;
126 	int error;
127 	int save_errno;
128 	int s;
129 	const char *cause = NULL;
130 
131 	memset(&hints, 0, sizeof(hints));
132 	hints.ai_family = AF_UNSPEC;
133 	hints.ai_socktype = SOCK_STREAM;
134 	if ((error = getaddrinfo(host, port, &hints, &res0))) {
135 		warnx("%s", gai_strerror(error));
136 		return -1;
137 	}
138 
139 	s = -1;
140 	for (res = res0; res; res = res->ai_next) {
141 		s = socket(res->ai_family, res->ai_socktype,
142 		    res->ai_protocol);
143 		if (s == -1) {
144 			cause = "socket";
145 			continue;
146 		}
147 
148 		if (connect(s, res->ai_addr, res->ai_addrlen) == -1) {
149 			cause = "connect";
150 			save_errno = errno;
151 			close(s);
152 			errno = save_errno;
153 			s = -1;
154 			continue;
155 		}
156 
157 		break;
158 	}
159 
160 	freeaddrinfo(res0);
161 
162 	if (s == -1)
163 		warn("%s", cause);
164 
165 	return s;
166 }
167 
168 static void
169 mark_nonblock(int fd)
170 {
171 	int flags;
172 
173 	if ((flags = fcntl(fd, F_GETFL)) == -1)
174 		fatal("fcntl(F_GETFL)");
175 	if (fcntl(fd, F_SETFL, flags | O_NONBLOCK) == -1)
176 		fatal("fcntl(F_SETFL)");
177 }
178 
179 static void
180 tls_readcb(int fd, short event, void *d)
181 {
182 	struct bufferevent	*bufev = d;
183 	char			 buf[IBUF_READ_SIZE];
184 	int			 what = EVBUFFER_READ;
185 	int			 howmuch = IBUF_READ_SIZE;
186 	ssize_t			 ret;
187 	size_t			 len;
188 
189 	if (event == EV_TIMEOUT) {
190 		what |= EVBUFFER_TIMEOUT;
191 		goto err;
192 	}
193 
194 	if (bufev->wm_read.high != 0)
195 		howmuch = MIN(sizeof(buf), bufev->wm_read.high);
196 
197 	switch (ret = tls_read(ctx, buf, howmuch)) {
198 	case TLS_WANT_POLLIN:
199 	case TLS_WANT_POLLOUT:
200 		goto retry;
201 	case -1:
202 		what |= EVBUFFER_ERROR;
203 		goto err;
204 	}
205 	len = ret;
206 
207 	if (len == 0) {
208 		what |= EVBUFFER_EOF;
209 		goto err;
210 	}
211 
212 	if (evbuffer_add(bufev->input, buf, len) == -1) {
213 		what |= EVBUFFER_ERROR;
214 		goto err;
215 	}
216 
217 	event_add(&bufev->ev_read, NULL);
218 
219 	len = EVBUFFER_LENGTH(bufev->input);
220 	if (bufev->wm_read.low != 0 && len < bufev->wm_read.low)
221 		return;
222 	if (bufev->readcb != NULL)
223 		(*bufev->readcb)(bufev, bufev->cbarg);
224 	return;
225 
226 retry:
227 	event_add(&bufev->ev_read, NULL);
228 	return;
229 
230 err:
231 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
232 }
233 
234 static void
235 tls_writecb(int fd, short event, void *d)
236 {
237 	struct bufferevent	*bufev = d;
238 	ssize_t			 ret;
239 	size_t			 len;
240 	short			 what = EVBUFFER_WRITE;
241 	void			*data;
242 
243 	if (event == EV_TIMEOUT) {
244 		what |= EVBUFFER_TIMEOUT;
245 		goto err;
246 	}
247 
248 	len = EVBUFFER_LENGTH(bufev->output);
249 	if (len != 0) {
250 		data = EVBUFFER_DATA(bufev->output);
251 
252 #if DEBUG_PACKETS
253 		hexdump("outgoing msg", data, len);
254 #endif
255 
256 		switch (ret = tls_write(ctx, data, len)) {
257 		case TLS_WANT_POLLIN:
258 		case TLS_WANT_POLLOUT:
259 			goto retry;
260 		case -1:
261 			what |= EVBUFFER_ERROR;
262 			goto err;
263 		}
264 		evbuffer_drain(bufev->output, ret);
265 	}
266 
267 	if (EVBUFFER_LENGTH(bufev->output) != 0)
268 		event_add(&bufev->ev_write, NULL);
269 
270 	if (bufev->writecb != NULL &&
271 	    EVBUFFER_LENGTH(bufev->output) <= bufev->wm_write.low)
272 		(*bufev->writecb)(bufev, bufev->cbarg);
273 	return;
274 
275 retry:
276 	event_add(&bufev->ev_write, NULL);
277 	return;
278 err:
279 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
280 }
281 
282 static void
283 client_read(struct bufferevent *bev, void *d)
284 {
285 	struct evbuffer	*src = EVBUFFER_INPUT(bev);
286 	uint32_t	 len;
287 	uint8_t		*data;
288 
289 	for (;;) {
290 		if (EVBUFFER_LENGTH(src) < sizeof(len))
291 			return;
292 
293 		data = EVBUFFER_DATA(src);
294 
295 		memcpy(&len, data, sizeof(len));
296 		len = le32toh(len);
297 
298 		if (len < HEADERSIZE)
299 			fatal("incoming message is too small! (%d bytes)",
300 			    len);
301 
302 		if (len > EVBUFFER_LENGTH(src))
303 			return;
304 
305 #if DEBUG_PACKETS
306 		hexdump("incoming msg", data, len);
307 #endif
308 
309 		handle_9p(data, len);
310 		evbuffer_drain(src, len);
311 	}
312 }
313 
314 static void
315 client_write(struct bufferevent *bev, void *data)
316 {
317 	return; /* nothing to do */
318 }
319 
320 static void
321 client_error(struct bufferevent *bev, short err, void *data)
322 {
323 	if (err & EVBUFFER_ERROR)
324 		fatal("buffer event error");
325 
326 	if (err & EVBUFFER_EOF) {
327 		clr();
328 		log_info("EOF");
329 		event_loopbreak();
330 		return;
331 	}
332 
333 	clr();
334 	log_warnx("unknown event error");
335 	event_loopbreak();
336 }
337 
338 static void
339 repl_read(struct bufferevent *bev, void *d)
340 {
341 	size_t		 len;
342 	int		 argc;
343 	const char	*argv[10], **ap;
344 	char		*line;
345 
346 	line = evbuffer_readln(bev->input, &len, EVBUFFER_EOL_LF);
347 	if (line == NULL)
348 		return;
349 
350 	for (argc = 0, ap = argv; ap < &argv[9] &&
351 	    (*ap = strsep(&line, " \t")) != NULL;) {
352 		if (**ap != '\0')
353 			ap++, argc++;
354 	}
355 
356 	clr();
357 	excmd(argv, argc);
358 	prompt();
359 
360 	free(line);
361 }
362 
363 static void
364 repl_error(struct bufferevent *bev, short error, void *d)
365 {
366 	fatalx("an error occurred");
367 }
368 
369 static inline void
370 do_send(void)
371 {
372 	bufferevent_write_buffer(bev, evb);
373 }
374 
375 /* version [version-str] */
376 static void
377 excmd_version(const char **argv, int argc)
378 {
379 	const char	*s;
380 
381 	s = VERSION9P;
382 	if (argc == 2)
383 		s = argv[1];
384 
385 	tversion(s, MSIZE9P);
386 	do_send();
387 }
388 
389 /* attach fid uname aname */
390 static void
391 excmd_attach(const char **argv, int argc)
392 {
393 	uint32_t	 fid;
394 	const char	*errstr;
395 
396 	if (argc != 4)
397 		goto usage;
398 
399         fid = strtonum(argv[1], 0, UINT32_MAX, &errstr);
400 	if (errstr != NULL) {
401 		log_warnx("fid is %s: %s", errstr, argv[1]);
402 		return;
403 	}
404 
405 	tattach(fid, NOFID, argv[2], argv[3]);
406 	do_send();
407 	return;
408 
409 usage:
410 	log_warnx("usage: attach fid uname aname");
411 }
412 
413 /* clunk fid */
414 static void
415 excmd_clunk(const char **argv, int argc)
416 {
417 	uint32_t	 fid;
418 	const char	*errstr;
419 
420 	if (argc != 2)
421 		goto usage;
422 
423 	fid = strtonum(argv[1], 0, UINT32_MAX, &errstr);
424 	if (errstr != NULL) {
425 		log_warnx("fid is %s: %s", errstr, argv[1]);
426 		return;
427 	}
428 
429 	tclunk(fid);
430 	do_send();
431 	return;
432 
433 usage:
434 	log_warnx("usage: clunk fid");
435 }
436 
437 /* flush oldtag */
438 static void
439 excmd_flush(const char **argv, int argc)
440 {
441 	uint16_t	 oldtag;
442 	const char	*errstr;
443 
444 	if (argc != 2)
445 		goto usage;
446 
447 	oldtag = strtonum(argv[1], 0, UINT16_MAX, &errstr);
448 	if (errstr != NULL) {
449 		log_warnx("oldtag is %s: %s", errstr, argv[1]);
450 		return;
451 	}
452 
453 	tflush(oldtag);
454 	do_send();
455 	return;
456 
457 usage:
458 	log_warnx("usage: flush oldtag");
459 }
460 
461 /* walk fid newfid wnames... */
462 static void
463 excmd_walk(const char **argv, int argc)
464 {
465 	uint32_t	 fid, newfid;
466 	const char	*errstr;
467 
468 	if (argc < 3)
469 		goto usage;
470 
471 	fid = strtonum(argv[1], 0, UINT32_MAX, &errstr);
472 	if (errstr != NULL) {
473 		log_warnx("fid is %s: %s", errstr, argv[1]);
474 		return;
475 	}
476 
477 	newfid = strtonum(argv[2], 0, UINT32_MAX, &errstr);
478 	if (errstr != NULL) {
479 		log_warnx("newfid is %s: %s", errstr, argv[1]);
480 		return;
481 	}
482 
483 	twalk(fid, newfid, argv + 3, argc - 3);
484 	do_send();
485 	return;
486 
487 usage:
488 	log_warnx("usage: walk fid newfid wnames...");
489 }
490 
491 /* open fid mode [flag] */
492 static void
493 excmd_open(const char **argv, int argc)
494 {
495 	const char	*errstr;
496 	uint32_t	 fid;
497 	uint8_t		 mode = 0;
498 
499 	if (argc != 3 && argc != 4)
500 		goto usage;
501 
502 	fid = strtonum(argv[1], 0, UINT32_MAX, &errstr);
503 	if (errstr != NULL) {
504 		log_warnx("fid is %s: %s", errstr, argv[1]);
505 		return;
506 	}
507 
508 	/* parse mode */
509 	if (!strcmp("read", argv[2]) || !strcmp("r", argv[2]))
510 		mode = KOREAD;
511 	else if (!strcmp("write", argv[2]) || !strcmp("w", argv[2]))
512 		mode = KOWRITE;
513 	else if (!strcmp("readwrite", argv[2]) || !strcmp("rw", argv[2]))
514 		mode = KORDWR;
515 	else {
516 		log_warnx("invalid mode %s", argv[2]);
517 		return;
518 	}
519 
520 	/* parse flag */
521 	if (argv[3] != NULL) {
522 		if (!strcmp("trunc", argv[3]))
523 			mode |= KOTRUNC;
524 		else if (!strcmp("rclose", argv[3]))
525 			mode |= KORCLOSE;
526 		else {
527 			log_warnx("invalid flag %s", argv[3]);
528 			return;
529 		}
530 	}
531 
532 	topen(fid, mode);
533 	do_send();
534 	return;
535 
536 usage:
537 	log_warnx("usage: open fid mode [flag]");
538 }
539 
540 /* read fid offset count */
541 static void
542 excmd_read(const char **argv, int argc)
543 {
544 	uint64_t	 off;
545 	uint32_t	 fid, count;
546 	const char	*errstr;
547 
548 	if (argc != 4)
549 		goto usage;
550 
551 	fid = strtonum(argv[1], 0, UINT32_MAX, &errstr);
552 	if (errstr != NULL) {
553 		log_warnx("fid is %s: %s", errstr, argv[1]);
554 		return;
555 	}
556 
557 	/* should really be UNT64_MAX but it fails... */
558 	off = strtonum(argv[2], -1, UINT32_MAX, &errstr);
559 	if (errstr != NULL) {
560 		log_warnx("offset is %s: %s", errstr, argv[2]);
561 		return;
562 	}
563 
564 	count = strtonum(argv[3], 0, UINT32_MAX, &errstr);
565 	if (errstr != NULL) {
566 		log_warnx("count is %s: %s", errstr, argv[3]);
567 		return;
568 	}
569 
570 	tread(fid, off, count);
571 	do_send();
572 	return;
573 
574 usage:
575 	log_warnx("usage: read fid offset count");
576 }
577 
578 static void
579 excmd(const char **argv, int argc)
580 {
581 	struct cmd {
582 		const char	*name;
583 		void		(*fn)(const char **, int);
584 	} cmds[] = {
585 		{"version",	excmd_version},
586 		{"attach",	excmd_attach},
587 		{"clunk",	excmd_clunk},
588 		{"flush",	excmd_flush},
589 		{"walk",	excmd_walk},
590 		{"open",	excmd_open},
591 		{"read",	excmd_read},
592 	};
593 	size_t i;
594 
595 	if (argc == 0)
596 		return;
597 
598 	for (i = 0; i < sizeof(cmds)/sizeof(cmds[0]); ++i) {
599 		if (!strcmp(cmds[i].name, argv[0])) {
600 			cmds[i].fn(argv, argc);
601 			return;
602 		}
603 	}
604 
605 	log_warnx("Unknown command %s", *argv);
606 }
607 
608 static const char *
609 pp_qid_type(uint8_t type)
610 {
611         switch (type) {
612 	case QTDIR:	return "dir";
613 	case QTAPPEND:	return "append-only";
614 	case QTEXCL:	return "exclusive";
615 	case QTMOUNT:	return "mounted-channel";
616 	case QTAUTH:	return "authentication";
617 	case QTTMP:	return "non-backed-up";
618 	case QTSYMLINK: return "symlink";
619 	case QTFILE:	return "file";
620 	}
621 
622 	return "unknown";
623 }
624 
625 static void
626 pp_qid(const uint8_t *d, uint32_t len)
627 {
628 	uint64_t	path;
629 	uint32_t	vers;
630 	uint8_t		type;
631 
632 	if (len < 13) {
633 		printf("invalid");
634 		return;
635 	}
636 
637 	type = *d++;
638 
639 	memcpy(&vers, d, sizeof(vers));
640 	d += sizeof(vers);
641 	vers = le64toh(vers);
642 
643 	memcpy(&path, d, sizeof(path));
644 	d += sizeof(path);
645 	path = le64toh(path);
646 
647 	printf("qid{path=%"PRIu64" version=%"PRIu32" type=0x%x\"%s\"}",
648 	    path, vers, type, pp_qid_type(type));
649 }
650 
651 static void
652 pp_msg(uint32_t len, uint8_t type, uint16_t tag, const uint8_t *d)
653 {
654 	uint32_t	 msize, iounit, count;
655 	uint16_t	 slen;
656 	char		*v;
657 
658 	printf("len=%"PRIu32" type=%d[%s] tag=0x%x[%d] ", len,
659 	    type, pp_msg_type(type), tag, tag);
660 
661 	len -= HEADERSIZE;
662 
663 	switch (type) {
664 	case Rversion:
665 		if (len < 6) {
666 			printf("invalid: not enough space for msize "
667 			    "and version provided.");
668 			break;
669 		}
670 
671 		memcpy(&msize, d, sizeof(msize));
672 		d += sizeof(msize);
673 		len -= sizeof(msize);
674 		msize = le32toh(msize);
675 
676 		memcpy(&slen, d, sizeof(slen));
677 		d += sizeof(slen);
678 		len -= sizeof(slen);
679 		slen = le16toh(slen);
680 
681 		if (len != slen) {
682 			printf("invalid: version string length doesn't "
683 			    "match.  Got %d; want %d", slen, len);
684 			break;
685 		}
686 
687 		printf("msize=%"PRIu32" version[%"PRIu16"]=\"",
688 		    msize, slen);
689 		fwrite(d, 1, slen, stdout);
690 		printf("\"");
691 
692 		break;
693 
694 	case Rattach:
695 		pp_qid(d, len);
696 		break;
697 
698 	case Rclunk:
699 		if (len != 0)
700 			printf("invalid Rclunk: %"PRIu32" extra bytes", len);
701 		break;
702 
703 	case Rflush:
704 		if (len != 0)
705 			printf("invalid Rflush: %"PRIu32" extra bytes", len);
706 		break;
707 
708 	case Rwalk:
709 		if (len < 2) {
710 			printf("invaild Rwalk: less than two bytes (%d)",
711 			    (int)len);
712 			break;
713 		}
714 
715 		memcpy(&slen, d, sizeof(slen));
716 		d += sizeof(slen);
717 		len -= sizeof(slen);
718 		slen = le16toh(slen);
719 
720 		if (len != QIDSIZE * slen) {
721 			printf("invalid Rwalk: wanted %d bytes for %d qids "
722 			    "but got %"PRIu32" bytes instead",
723 			    QIDSIZE*slen, slen, len);
724 			break;
725 		}
726 
727 		printf("nwqid=%"PRIu16, slen);
728 
729 		for (; slen != 0; slen--) {
730 			printf(" ");
731 			pp_qid(d, len);
732 			d += QIDSIZE;
733 			len -= QIDSIZE;
734 		}
735 
736 		break;
737 
738 	case Ropen:
739 		if (len != QIDSIZE + 4) {
740 			printf("invalid Ropen: expected %d bytes; "
741 			    "got %u\n", QIDSIZE + 4, len);
742 			break;
743 		}
744 
745 		pp_qid(d, len);
746 		d += QIDSIZE;
747 		len -= QIDSIZE;
748 
749 		memcpy(&iounit, d, sizeof(iounit));
750 		d += sizeof(iounit);
751 		len -= sizeof(iounit);
752 		iounit = le32toh(iounit);
753 		printf(" iounit=%"PRIu32, iounit);
754 		break;
755 
756 	case Rread:
757 		if (len < sizeof(count)) {
758 			printf("invalid Rread: expected %zu bytes at least; "
759 			    "got %u\n", sizeof(count), len);
760 			break;
761 		}
762 
763 		memcpy(&count, d, sizeof(count));
764 		d += sizeof(count);
765 		len -= sizeof(count);
766 		count = le32toh(count);
767 
768 		if (len != count) {
769 			printf("invalid Rread: expected %d data bytes; "
770 			    "got %u\n", count, len);
771 			break;
772 		}
773 
774 		/* allocates three extra bytes, oh well... */
775 		if ((v = calloc(count + 1, 4)) == NULL)
776 			fatal("calloc");
777 		strvisx(v, d, count, VIS_SAFE | VIS_TAB | VIS_NL | VIS_CSTYLE);
778 		printf("data=%s", v);
779 		free(v);
780 
781 		break;
782 
783 	case Rerror:
784 		memcpy(&slen, d, sizeof(slen));
785 		d += sizeof(slen);
786 		len -= sizeof(slen);
787 		slen = le16toh(slen);
788 
789 		if (slen != len) {
790 			printf("invalid: error string length doesn't "
791 			    "match.  Got %d; want %d", slen, len);
792 			break;
793 		}
794 
795 		printf("error=\"");
796 		fwrite(d, 1, slen, stdout);
797 		printf("\"");
798 
799 		break;
800 
801 	default:
802 		if ((v = calloc(len + 1, 4)) == NULL)
803 			fatal("calloc");
804 		strvisx(v, d, len, VIS_SAFE | VIS_TAB | VIS_NL | VIS_CSTYLE);
805 		printf("body=%s", v);
806 		free(v);
807 	}
808 
809 	printf("\n");
810 }
811 
812 static void
813 handle_9p(const uint8_t *data, size_t size)
814 {
815         uint32_t len;
816 	uint16_t tag;
817 	uint8_t type;
818 
819 	assert(size >= HEADERSIZE);
820 
821 	memcpy(&len, data, sizeof(len));
822 	data += sizeof(len);
823 
824 	memcpy(&type, data, sizeof(type));
825 	data += sizeof(type);
826 
827 	memcpy(&tag, data, sizeof(tag));
828 	data += sizeof(tag);
829 
830 	len = le32toh(len);
831 	/* type is one byte long, no endianness issues */
832 	tag = le16toh(tag);
833 
834 	clr();
835 	pp_msg(len, type, tag, data);
836 	prompt();
837 }
838 
839 static void
840 clr(void)
841 {
842 	printf("\r");
843 	fflush(stdout);
844 }
845 
846 static void
847 prompt(void)
848 {
849 	printf("%s", PROMPT);
850 	fflush(stdout);
851 }
852 
853 int
854 main(int argc, char **argv)
855 {
856 	int		 ch, sock, handshake;
857 	struct event	 ev_sigint, ev_sigterm;
858 
859 	signal(SIGPIPE, SIG_IGN);
860 
861 	while ((ch = getopt(argc, argv, "C:cH:hK:P:v")) != -1) {
862 		switch (ch) {
863 		case 'C':
864 			crtpath = optarg;
865 			break;
866 		case 'c':
867 			tls = 1;
868 			break;
869 		case 'H':
870 			host = optarg;
871 			break;
872 		case 'h':
873 			usage(0);
874 			break;
875 		case 'K':
876 			keypath = optarg;
877 			break;
878 		case 'P':
879 			port = optarg;
880 			break;
881 		case 'v':
882 			verbose = 1;
883 			break;
884 		default:
885 			usage(1);
886 		}
887 	}
888 
889 	if (host == NULL)
890 		host = "localhost";
891 	if (port == NULL)
892 		port = "1337";
893 
894 	argc -= optind;
895 	argv += optind;
896 
897 	if (argc != 0)
898 		usage(1);
899 	/* if (!tls || (crtpath != NULL || keypath != NULL)) */
900 		/* usage(1); */
901 	if (!tls)
902                 errx(1, "must enable tls (for now)");
903 
904 	log_init(1, LOG_DAEMON);
905 	log_setverbose(verbose);
906 	log_procinit(getprogname());
907 
908 	if ((tlsconf = tls_config_new()) == NULL)
909 		fatalx("tls_config_new");
910 	tls_config_insecure_noverifycert(tlsconf);
911 	tls_config_insecure_noverifyname(tlsconf);
912 	if (tls_config_set_keypair_file(tlsconf, crtpath, keypath) == -1)
913 		fatalx("can't load certs (%s, %s)", crtpath, keypath);
914 
915 	if ((ctx = tls_client()) == NULL)
916 		fatal("tls_client");
917 	if (tls_configure(ctx, tlsconf) == -1)
918 		fatalx("tls_configure: %s", tls_error(ctx));
919 
920 	log_info("connecting to %s:%s...", host, port);
921 
922 	if ((sock = openconn()) == -1)
923 		fatalx("can't connect to %s:%s", host, port);
924 
925 	if (tls_connect_socket(ctx, sock, host) == -1)
926 		fatalx("tls_connect_socket: %s", tls_error(ctx));
927 
928 	for (handshake = 0; !handshake;) {
929 		switch (tls_handshake(ctx)) {
930 		case -1:
931 			fatalx("tls_handshake: %s", tls_error(ctx));
932 		case 0:
933 			handshake = 1;
934 			break;
935 		}
936 	}
937 
938 	log_info("connected!");
939 
940 	mark_nonblock(sock);
941 
942 	event_init();
943 
944 	/* initialize global evb */
945 	if ((evb = evbuffer_new()) == NULL)
946 		fatal("evbuffer_new");
947 
948 	signal_set(&ev_sigint, SIGINT, sig_handler, NULL);
949 	signal_set(&ev_sigterm, SIGINT, sig_handler, NULL);
950 
951 	signal_add(&ev_sigint, NULL);
952 	signal_add(&ev_sigterm, NULL);
953 
954 	bev = bufferevent_new(sock, client_read, client_write, client_error,
955 	    NULL);
956 	if (bev == NULL)
957 		fatal("bufferevent_new");
958 
959 	/* setup tls/io */
960 	event_set(&bev->ev_read, sock, EV_READ, tls_readcb, bev);
961 	event_set(&bev->ev_write, sock, EV_WRITE, tls_writecb, bev);
962 
963 	bufferevent_enable(bev, EV_READ|EV_WRITE);
964 
965 	mark_nonblock(0);
966 	inbev = bufferevent_new(0, repl_read, NULL, repl_error, NULL);
967 	bufferevent_enable(inbev, EV_READ);
968 
969 	prompt();
970 	event_dispatch();
971 
972 	bufferevent_free(bev);
973 	tls_free(ctx);
974 	tls_config_free(tlsconf);
975 	close(sock);
976 
977 	return 0;
978 }