op public repos

Blob

Date:: Tue Feb 22 09:45:11 2022 UTC
Message:: flush stdout after each monitor event otherwise the output may get buffered by a pipe and it's not pretty.
Actions:: History | Blame | Raw File
1 /*
2  * Copyright (c) 2022 Omar Polo <op@openbsd.org>
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 <sys/types.h>
18 #include <sys/socket.h>
19 #include <sys/queue.h>
20 #include <sys/uio.h>
21 #include <sys/un.h>
22 
23 #include <errno.h>
24 #include <event.h>
25 #include <limits.h>
26 #include <sndio.h>
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <stdint.h>
30 #include <string.h>
31 #include <syslog.h>
32 #include <unistd.h>
33 #include <imsg.h>
34 
35 #include "amused.h"
36 #include "log.h"
37 #include "playlist.h"
38 #include "xmalloc.h"
39 
40 static struct imsgbuf *ibuf;
41 
42 int	ctl_noarg(struct parse_result *, int, char **);
43 int	ctl_add(struct parse_result *, int, char **);
44 int	ctl_show(struct parse_result *, int, char **);
45 int	ctl_load(struct parse_result *, int, char **);
46 int	ctl_jump(struct parse_result *, int, char **);
47 int	ctl_repeat(struct parse_result *, int, char **);
48 
49 struct ctl_command ctl_commands[] = {
50 	{ "play",	PLAY,		ctl_noarg,	"" },
51 	{ "pause",	PAUSE,		ctl_noarg,	"" },
52 	{ "toggle",	TOGGLE,		ctl_noarg,	"" },
53 	{ "stop",	STOP,		ctl_noarg,	"" },
54 	{ "restart",	RESTART,	ctl_noarg,	"" },
55 	{ "add",	ADD,		ctl_add,	"files...", 1 },
56 	{ "flush",	FLUSH,		ctl_noarg,	"" },
57 	{ "show",	SHOW,		ctl_show,	"[-p]" },
58 	{ "status",	STATUS,		ctl_noarg,	"" },
59 	{ "next",	NEXT,		ctl_noarg,	"" },
60 	{ "prev",	PREV,		ctl_noarg,	"" },
61 	{ "load",	LOAD,		ctl_load,	"[file]", 1 },
62 	{ "jump",	JUMP,		ctl_jump,	"pattern" },
63 	{ "repeat",	REPEAT,		ctl_repeat,	"one|all on|off" },
64 	{ "monitor",	MONITOR,	ctl_noarg,	"" },
65 	{ NULL },
66 };
67 
68 __dead void
69 usage(void)
70 {
71 	fprintf(stderr, "usage: %s [-dv] [-s socket]\n", getprogname());
72 	exit(1);
73 }
74 
75 static __dead void
76 ctl_usage(struct ctl_command *ctl)
77 {
78 	fprintf(stderr, "usage: %s [-v] [-s socket] %s %s\n", getprogname(),
79 	    ctl->name, ctl->usage);
80 	exit(1);
81 }
82 
83 static int
84 parse(int argc, char **argv)
85 {
86 	struct ctl_command	*ctl = NULL;
87 	struct parse_result	 res;
88 	int			 i, status;
89 
90 	memset(&res, 0, sizeof(res));
91 
92 	for (i = 0; ctl_commands[i].name != NULL; ++i) {
93 		if (strncmp(ctl_commands[i].name, argv[0], strlen(argv[0]))
94 		    == 0) {
95 			if (ctl != NULL) {
96 				fprintf(stderr,
97 				    "ambiguous argument: %s\n", argv[0]);
98 				usage();
99 			}
100 			ctl = &ctl_commands[i];
101 		}
102 	}
103 
104 	if (ctl == NULL) {
105 		fprintf(stderr, "unknown argument: %s\n", argv[0]);
106 		usage();
107 	}
108 
109 	res.action = ctl->action;
110 	res.ctl = ctl;
111 
112 	if (!ctl->has_pledge) {
113 		/* pledge(2) default if command doesn't have its own */
114 		if (pledge("stdio", NULL) == -1)
115 			fatal("pledge");
116 	}
117 
118 	status = ctl->main(&res, argc, argv);
119 	close(ibuf->fd);
120 	free(ibuf);
121 	return status;
122 }
123 
124 static int
125 enqueue_tracks(char **files)
126 {
127 	char res[PATH_MAX];
128 	int enq = 0;
129 
130 	for (; *files != NULL; ++files) {
131 		memset(&res, 0, sizeof(res));
132 		if (realpath(*files, res) == NULL) {
133 			log_warn("realpath %s", *files);
134 			continue;
135 		}
136 
137 		imsg_compose(ibuf, IMSG_CTL_ADD, 0, 0, -1,
138 		    res, sizeof(res));
139 		enq++;
140 	}
141 
142 	return enq == 0;
143 }
144 
145 static int
146 jump_req(const char *arg)
147 {
148 	char path[PATH_MAX];
149 
150 	memset(path, 0, sizeof(path));
151 	strlcpy(path, arg, sizeof(path));
152 	imsg_compose(ibuf, IMSG_CTL_JUMP, 0, 0, -1, path, sizeof(path));
153 	return 0;
154 }
155 
156 static void
157 print_error_message(const char *prfx, struct imsg *imsg)
158 {
159 	size_t datalen;
160 	char *msg;
161 
162 	datalen = IMSG_DATA_SIZE(*imsg);
163 	if ((msg = calloc(1, datalen)) == NULL)
164 		fatal("calloc %zu", datalen);
165 	memcpy(msg, imsg->data, datalen);
166 	if (datalen == 0 || msg[datalen-1] != '\0')
167 		fatalx("malformed error message");
168 
169 	log_warnx("%s: %s", prfx, msg);
170 	free(msg);
171 }
172 
173 static int
174 show_add(struct imsg *imsg, int *ret, char ***files)
175 {
176 	if (**files == NULL) {
177 		log_warnx("received more replies than file sent");
178 		*ret = 1;
179 		return 1;
180 	}
181 
182 	if (imsg->hdr.type == IMSG_CTL_ERR)
183 		print_error_message(**files, imsg);
184 	else if (imsg->hdr.type == IMSG_CTL_ADD)
185 		log_debug("enqueued %s", **files);
186 	else
187 		fatalx("got invalid message %d", imsg->hdr.type);
188 
189 	(*files)++;
190 	return (**files) == NULL;
191 }
192 
193 static int
194 show_complete(struct parse_result *res, struct imsg *imsg, int *ret)
195 {
196 	struct player_status s;
197 	size_t datalen;
198 
199 	if (imsg->hdr.type == IMSG_CTL_ERR) {
200 		print_error_message("show failed", imsg);
201 		*ret = 1;
202 		return 1;
203 	}
204 
205 	datalen = IMSG_DATA_SIZE(*imsg);
206 	if (datalen == 0)
207 		return 1;
208 
209 	if (datalen != sizeof(s))
210 		fatalx("%s: data size mismatch", __func__);
211 	memcpy(&s, imsg->data, sizeof(s));
212 	if (s.path[sizeof(s.path)-1] != '\0')
213 		fatalx("%s: data corrupted?", __func__);
214 
215 	if (res->pretty)
216 		printf("%c ", s.status == STATE_PLAYING ? '>' : ' ');
217 	printf("%s\n", s.path);
218 	return 0;
219 }
220 
221 static int
222 show_status(struct imsg *imsg, int *ret)
223 {
224 	struct player_status s;
225 	size_t datalen;
226 
227 	if (imsg->hdr.type == IMSG_CTL_ERR) {
228 		print_error_message("show failed", imsg);
229 		*ret = 1;
230 		return 1;
231 	}
232 
233 	if (imsg->hdr.type != IMSG_CTL_STATUS)
234 		fatalx("%s: got wrong reply", __func__);
235 
236 	datalen = IMSG_DATA_SIZE(*imsg);
237 	if (datalen != sizeof(s))
238 		fatalx("%s: data size mismatch", __func__);
239 	memcpy(&s, imsg->data, sizeof(s));
240 	if (s.path[sizeof(s.path)-1] != '\0')
241 		fatalx("%s: data corrupted?", __func__);
242 
243 	switch (s.status) {
244 	case STATE_STOPPED:
245 		printf("stopped ");
246 		break;
247 	case STATE_PLAYING:
248 		printf("playing ");
249 		break;
250 	case STATE_PAUSED:
251 		printf("paused ");
252 		break;
253 	default:
254 		printf("unknown ");
255 		break;
256 	}
257 
258 	printf("%s\n", s.path);
259 	printf("repeat one %s -- repeat all %s\n",
260 	    s.rp.repeat_one ? "on" : "off",
261 	    s.rp.repeat_all ? "on" : "off");
262 	return 1;
263 }
264 
265 static int
266 show_load(struct parse_result *res, struct imsg *imsg, int *ret)
267 {
268 	FILE		*f;
269 	const char	*file;
270 	char		*line = NULL;
271 	char		 path[PATH_MAX];
272 	size_t		 linesize = 0;
273 	ssize_t		 linelen;
274 	int		 any = 0;
275 
276 	if (imsg->hdr.type == IMSG_CTL_ERR) {
277 		print_error_message("load failed", imsg);
278 		*ret = 1;
279 		return 1;
280 	}
281 
282 	if (imsg->hdr.type == IMSG_CTL_ADD)
283 		return 0;
284 
285 	if (imsg->hdr.type == IMSG_CTL_COMMIT)
286 		return 1;
287 
288 	if (imsg->hdr.type != IMSG_CTL_BEGIN)
289 		fatalx("got unexpected message %d", imsg->hdr.type);
290 
291 	if (res->file == NULL)
292 		f = stdin;
293 	else if ((f = fopen(res->file, "r")) == NULL) {
294 		log_warn("can't open %s", res->file);
295 		*ret = 1;
296 		return 1;
297 	}
298 
299 	while ((linelen = getline(&line, &linesize, f)) != -1) {
300 		if (linelen == 0)
301 			continue;
302 		line[linelen-1] = '\0';
303 		file = line;
304 		if (file[0] == '>' && file[1] == ' ')
305 			file += 2;
306 		if (file[0] == ' ' && file[1] == ' ')
307 			file += 2;
308 
309 		memset(&path, 0, sizeof(path));
310 		if (realpath(file, path) == NULL) {
311 			log_warn("realpath %s", file);
312 			continue;
313 		}
314 
315 		any++;
316 		imsg_compose(ibuf, IMSG_CTL_ADD, 0, 0, -1,
317 		    path, sizeof(path));
318 	}
319 
320 	free(line);
321 	if (ferror(f))
322 		fatal("getline");
323 	fclose(f);
324 
325 	if (!any) {
326 		*ret = 1;
327 		return 1;
328 	}
329 
330 	imsg_compose(ibuf, IMSG_CTL_COMMIT, 0, 0, -1,
331 	    NULL, 0);
332 	imsg_flush(ibuf);
333 	return 0;
334 }
335 
336 static int
337 show_monitor(struct imsg *imsg, int *ret)
338 {
339 	int type;
340 
341 	if (imsg->hdr.type != IMSG_CTL_MONITOR) {
342 		log_warnx("wrong message type received: %d",
343 		    imsg->hdr.type);
344 		*ret = 1;
345 		return 1;
346 	}
347 
348 	if (IMSG_DATA_SIZE(*imsg) != sizeof(type)) {
349 		log_warnx("size mismatch");
350 		*ret = 1;
351 		return 1;
352 	}
353 
354 	memcpy(&type, imsg->data, sizeof(type));
355 	switch (type) {
356 	case IMSG_CTL_PLAY:
357 		puts("play");
358 		break;
359 	case IMSG_CTL_TOGGLE_PLAY:
360 		puts("toggle");
361 		break;
362 	case IMSG_CTL_PAUSE:
363 		puts("pause");
364 		break;
365 	case IMSG_CTL_STOP:
366 		puts("stop");
367 		break;
368 	case IMSG_CTL_RESTART:
369 		puts("restart");
370 		break;
371 	case IMSG_CTL_FLUSH:
372 		puts("flush");
373 		break;
374 	case IMSG_CTL_NEXT:
375 		puts("next");
376 		break;
377 	case IMSG_CTL_PREV:
378 		puts("prev");
379 		break;
380 	case IMSG_CTL_JUMP:
381 		puts("jump");
382 		break;
383 	case IMSG_CTL_REPEAT:
384 		puts("repeat");
385 		break;
386 	case IMSG_CTL_ADD:
387 		puts("add");
388 		break;
389 	case IMSG_CTL_COMMIT:
390 		puts("load");
391 		break;
392 	default:
393 		puts("unknown");
394 		break;
395 	}
396 
397 	fflush(stdout);
398 	return 0;
399 }
400 
401 static int
402 ctlaction(struct parse_result *res)
403 {
404 	struct imsg imsg;
405 	ssize_t n;
406 	int ret = 0, done = 1;
407 	char **files;
408 
409 	switch (res->action) {
410 	case PLAY:
411 		imsg_compose(ibuf, IMSG_CTL_PLAY, 0, 0, -1, NULL, 0);
412 		if (verbose) {
413 			imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1,
414 			    NULL, 0);
415 			done = 0;
416 		}
417 		break;
418 	case PAUSE:
419 		imsg_compose(ibuf, IMSG_CTL_PAUSE, 0, 0, -1, NULL, 0);
420 		break;
421 	case TOGGLE:
422 		imsg_compose(ibuf, IMSG_CTL_TOGGLE_PLAY, 0, 0, -1, NULL, 0);
423 		if (verbose) {
424 			imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1,
425 			    NULL, 0);
426 			done = 0;
427 		}
428 		break;
429 	case STOP:
430 		imsg_compose(ibuf, IMSG_CTL_STOP, 0, 0, -1, NULL, 0);
431 		break;
432 	case RESTART:
433 		imsg_compose(ibuf, IMSG_CTL_RESTART, 0, 0, -1, NULL, 0);
434 		if (verbose) {
435 			imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1,
436 			    NULL, 0);
437 			done = 0;
438 		}
439 		break;
440 	case ADD:
441 		done = 0;
442 		files = res->files;
443 		ret = enqueue_tracks(res->files);
444 		break;
445 	case FLUSH:
446 		imsg_compose(ibuf, IMSG_CTL_FLUSH, 0, 0, -1, NULL, 0);
447 		break;
448 	case SHOW:
449 		done = 0;
450 		imsg_compose(ibuf, IMSG_CTL_SHOW, 0, 0, -1, NULL, 0);
451 		break;
452 	case STATUS:
453 		done = 0;
454 		imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
455 		break;
456 	case NEXT:
457 		imsg_compose(ibuf, IMSG_CTL_NEXT, 0, 0, -1, NULL, 0);
458 		if (verbose) {
459 			imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1,
460 			    NULL, 0);
461 			done = 0;
462 		}
463 		break;
464 	case PREV:
465 		imsg_compose(ibuf, IMSG_CTL_PREV, 0, 0, -1, NULL, 0);
466 		if (verbose) {
467 			imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1,
468 			    NULL, 0);
469 			done = 0;
470 		}
471 		break;
472 	case LOAD:
473 		done = 0;
474 		imsg_compose(ibuf, IMSG_CTL_BEGIN, 0, 0, -1, NULL, 0);
475 		break;
476 	case JUMP:
477 		done = 0;
478 		ret = jump_req(res->file);
479 		break;
480 	case REPEAT:
481 		imsg_compose(ibuf, IMSG_CTL_REPEAT, 0, 0, -1,
482 		    &res->rep, sizeof(res->rep));
483 		break;
484 	case MONITOR:
485 		done = 0;
486 		imsg_compose(ibuf, IMSG_CTL_MONITOR, 0, 0, -1,
487 		    NULL, 0);
488 		break;
489 	case NONE:
490 		/* action not expected */
491 		fatalx("invalid action %u", res->action);
492 		break;
493 	}
494 
495 	if (ret != 0)
496 		goto end;
497 
498 	imsg_flush(ibuf);
499 
500 	while (!done) {
501 		if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
502 			fatalx("imsg_read error");
503 		if (n == 0)
504 			fatalx("pipe closed");
505 
506 		while (!done) {
507 			if ((n = imsg_get(ibuf, &imsg)) == -1)
508 				fatalx("imsg_get error");
509 			if (n == 0)
510 				break;
511 
512 			switch (res->action) {
513 			case ADD:
514 				done = show_add(&imsg, &ret, &files);
515 				break;
516 			case SHOW:
517 				done = show_complete(res, &imsg, &ret);
518 				break;
519 			case PLAY:
520 			case TOGGLE:
521 			case RESTART:
522 			case STATUS:
523 			case NEXT:
524 			case PREV:
525 			case JUMP:
526 				done = show_status(&imsg, &ret);
527 				break;
528 			case LOAD:
529 				done = show_load(res, &imsg, &ret);
530 				break;
531 			case MONITOR:
532 				done = show_monitor(&imsg, &ret);
533 				break;
534 			default:
535 				done = 1;
536 				break;
537 			}
538 
539 			imsg_free(&imsg);
540 		}
541 	}
542 
543 end:
544 	return ret;
545 }
546 
547 int
548 ctl_noarg(struct parse_result *res, int argc, char **argv)
549 {
550 	if (argc != 1)
551 		ctl_usage(res->ctl);
552 	return ctlaction(res);
553 }
554 
555 int
556 ctl_add(struct parse_result *res, int argc, char **argv)
557 {
558 	if (argc < 2)
559 		ctl_usage(res->ctl);
560 	res->files = argv+1;
561 
562 	if (pledge("stdio rpath", NULL) == -1)
563 		fatal("pledge");
564 
565 	return ctlaction(res);
566 }
567 
568 int
569 ctl_show(struct parse_result *res, int argc, char **argv)
570 {
571 	int ch;
572 
573 	while ((ch = getopt(argc, argv, "p")) != -1) {
574 		switch (ch) {
575 		case 'p':
576 			res->pretty = 1;
577 			break;
578 		default:
579 			ctl_usage(res->ctl);
580 		}
581 	}
582 
583 	return ctlaction(res);
584 }
585 
586 int
587 ctl_load(struct parse_result *res, int argc, char **argv)
588 {
589 	if (argc < 2)
590 		res->file = NULL;
591 	else if (argc == 2)
592 		res->file = argv[1];
593 	else
594 		ctl_usage(res->ctl);
595 
596 	if (pledge("stdio rpath", NULL) == -1)
597 		fatal("pledge");
598 
599 	return ctlaction(res);
600 }
601 
602 int
603 ctl_jump(struct parse_result *res, int argc, char **argv)
604 {
605 	int ch;
606 
607 	while ((ch = getopt(argc, argv, "")) != -1)
608 		ctl_usage(res->ctl);
609 	argc -= optind;
610 	argv += optind;
611 
612 	if (argc != 1)
613 		ctl_usage(res->ctl);
614 
615 	res->file = argv[0];
616 	return ctlaction(res);
617 }
618 
619 int
620 ctl_repeat(struct parse_result *res, int argc, char **argv)
621 {
622 	int ch, b;
623 
624 	while ((ch = getopt(argc, argv, "")) != -1)
625 		ctl_usage(res->ctl);
626 	argc -= optind;
627 	argv += optind;
628 
629 	if (argc != 2)
630 		ctl_usage(res->ctl);
631 
632 	if (!strcmp(argv[1], "on"))
633 		b = 1;
634 	else if (!strcmp(argv[1], "off"))
635 		b = 0;
636 	else
637 		ctl_usage(res->ctl);
638 
639 	res->rep.repeat_one = -1;
640 	res->rep.repeat_all = -1;
641 	if (!strcmp(argv[0], "one"))
642 		res->rep.repeat_one = b;
643 	else if (!strcmp(argv[0], "all"))
644 		res->rep.repeat_all = b;
645 	else
646 		ctl_usage(res->ctl);
647 
648 	return ctlaction(res);
649 }
650 
651 static int
652 sockconn(void)
653 {
654 	struct sockaddr_un	sun;
655 	int			sock, saved_errno;
656 
657 	if ((sock = socket(AF_UNIX, SOCK_STREAM, 0)) == -1)
658 		fatal("socket");
659 
660 	memset(&sun, 0, sizeof(sun));
661 	sun.sun_family = AF_UNIX;
662 	strlcpy(sun.sun_path, csock, sizeof(sun.sun_path));
663 	if (connect(sock, (struct sockaddr *)&sun, sizeof(sun)) == -1) {
664 		saved_errno = errno;
665 		close(sock);
666 		errno = saved_errno;
667 		return -1;
668 	}
669 
670 	return sock;
671 }
672 
673 __dead void
674 ctl(int argc, char **argv)
675 {
676 	int ctl_sock, i = 0;
677 
678 	log_init(1, LOG_DAEMON);
679 	log_setverbose(verbose);
680 
681 	do {
682 		struct timespec	ts = { 0, 50000000 }; /* 0.05 seconds */
683 
684 		if ((ctl_sock = sockconn()) != -1)
685 			break;
686 		if (errno != ENOENT && errno != ECONNREFUSED)
687 			fatal("connect %s", csock);
688 
689 		if (i == 0)
690 			spawn_daemon();
691 
692 		nanosleep(&ts, NULL);
693 	} while (++i < 20);
694 
695 	if (ctl_sock == -1)
696 		fatalx("failed to connect to the daemon");
697 
698 	ibuf = xmalloc(sizeof(*ibuf));
699 	imsg_init(ibuf, ctl_sock);
700 
701 	optreset = 1;
702 	optind = 1;
703 
704 	exit(parse(argc, argv));
705 }