Blob


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 */
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>
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>
35 #include "amused.h"
36 #include "log.h"
37 #include "playlist.h"
38 #include "xmalloc.h"
40 static struct imsgbuf *ibuf;
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 **);
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 { NULL },
65 };
67 __dead void
68 usage(void)
69 {
70 fprintf(stderr, "usage: %s [-dv] [-s socket]\n", getprogname());
71 fprintf(stderr, "%s version %s\n", getprogname(), AMUSED_VERSION);
72 exit(1);
73 }
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 }
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;
90 memset(&res, 0, sizeof(res));
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];
104 if (ctl == NULL) {
105 fprintf(stderr, "unknown argument: %s\n", argv[0]);
106 usage();
109 res.action = ctl->action;
110 res.ctl = ctl;
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");
118 status = ctl->main(&res, argc, argv);
119 close(ibuf->fd);
120 free(ibuf);
121 return status;
124 static int
125 enqueue_tracks(char **files)
127 char res[PATH_MAX];
128 int enq = 0;
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;
137 imsg_compose(ibuf, IMSG_CTL_ADD, 0, 0, -1,
138 res, sizeof(res));
139 enq++;
142 return enq == 0;
145 static int
146 jump_req(const char *arg)
148 char path[PATH_MAX];
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;
156 static void
157 print_error_message(const char *prfx, struct imsg *imsg)
159 size_t datalen;
160 char *msg;
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");
169 log_warnx("%s: %s", prfx, msg);
170 free(msg);
173 static int
174 show_add(struct imsg *imsg, int *ret, char ***files)
176 if (**files == NULL) {
177 log_warnx("received more replies than file sent");
178 *ret = 1;
179 return 1;
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);
189 (*files)++;
190 return (**files) == NULL;
193 static int
194 show_complete(struct parse_result *res, struct imsg *imsg, int *ret)
196 struct player_status s;
197 size_t datalen;
199 if (imsg->hdr.type == IMSG_CTL_ERR) {
200 print_error_message("show failed", imsg);
201 *ret = 1;
202 return 1;
205 datalen = IMSG_DATA_SIZE(*imsg);
206 if (datalen == 0)
207 return 1;
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__);
215 if (res->pretty)
216 printf("%c ", s.status == STATE_PLAYING ? '>' : ' ');
217 printf("%s\n", s.path);
218 return 0;
221 static int
222 show_status(struct imsg *imsg, int *ret)
224 struct player_status s;
225 size_t datalen;
227 if (imsg->hdr.type == IMSG_CTL_ERR) {
228 print_error_message("show failed", imsg);
229 *ret = 1;
230 return 1;
233 if (imsg->hdr.type != IMSG_CTL_STATUS)
234 fatalx("%s: got wrong reply", __func__);
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__);
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;
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;
265 static int
266 show_load(struct parse_result *res, struct imsg *imsg, int *ret)
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;
276 if (imsg->hdr.type == IMSG_CTL_ERR) {
277 print_error_message("load failed", imsg);
278 *ret = 1;
279 return 1;
282 if (imsg->hdr.type == IMSG_CTL_ADD)
283 return 0;
285 if (imsg->hdr.type == IMSG_CTL_COMMIT)
286 return 1;
288 if (imsg->hdr.type != IMSG_CTL_BEGIN)
289 fatalx("got unexpected message %d", imsg->hdr.type);
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;
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;
309 memset(&path, 0, sizeof(path));
310 if (realpath(file, path) == NULL) {
311 log_warn("realpath %s", file);
312 continue;
315 any++;
316 imsg_compose(ibuf, IMSG_CTL_ADD, 0, 0, -1,
317 path, sizeof(path));
320 free(line);
321 if (ferror(f))
322 fatal("getline");
323 fclose(f);
325 if (!any) {
326 *ret = 1;
327 return 1;
330 imsg_compose(ibuf, IMSG_CTL_COMMIT, 0, 0, -1,
331 NULL, 0);
332 imsg_flush(ibuf);
333 return 0;
336 static int
337 ctlaction(struct parse_result *res)
339 struct imsg imsg;
340 ssize_t n;
341 int ret = 0, done = 1;
342 char **files;
344 switch (res->action) {
345 case PLAY:
346 done = 0;
347 imsg_compose(ibuf, IMSG_CTL_PLAY, 0, 0, -1, NULL, 0);
348 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
349 break;
350 case PAUSE:
351 imsg_compose(ibuf, IMSG_CTL_PAUSE, 0, 0, -1, NULL, 0);
352 break;
353 case TOGGLE:
354 done = 0;
355 imsg_compose(ibuf, IMSG_CTL_TOGGLE_PLAY, 0, 0, -1, NULL, 0);
356 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
357 break;
358 case STOP:
359 imsg_compose(ibuf, IMSG_CTL_STOP, 0, 0, -1, NULL, 0);
360 break;
361 case RESTART:
362 done = 0;
363 imsg_compose(ibuf, IMSG_CTL_RESTART, 0, 0, -1, NULL, 0);
364 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
365 break;
366 case ADD:
367 done = 0;
368 files = res->files;
369 ret = enqueue_tracks(res->files);
370 break;
371 case FLUSH:
372 imsg_compose(ibuf, IMSG_CTL_FLUSH, 0, 0, -1, NULL, 0);
373 break;
374 case SHOW:
375 done = 0;
376 imsg_compose(ibuf, IMSG_CTL_SHOW, 0, 0, -1, NULL, 0);
377 break;
378 case STATUS:
379 done = 0;
380 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
381 break;
382 case NEXT:
383 done = 0;
384 imsg_compose(ibuf, IMSG_CTL_NEXT, 0, 0, -1, NULL, 0);
385 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
386 break;
387 case PREV:
388 done = 0;
389 imsg_compose(ibuf, IMSG_CTL_PREV, 0, 0, -1, NULL, 0);
390 imsg_compose(ibuf, IMSG_CTL_STATUS, 0, 0, -1, NULL, 0);
391 break;
392 case LOAD:
393 done = 0;
394 imsg_compose(ibuf, IMSG_CTL_BEGIN, 0, 0, -1, NULL, 0);
395 break;
396 case JUMP:
397 done = 0;
398 ret = jump_req(res->file);
399 break;
400 case REPEAT:
401 imsg_compose(ibuf, IMSG_CTL_REPEAT, 0, 0, -1,
402 &res->rep, sizeof(res->rep));
403 break;
404 case NONE:
405 /* action not expected */
406 fatalx("invalid action %u", res->action);
407 break;
410 if (ret != 0)
411 goto end;
413 imsg_flush(ibuf);
415 while (!done) {
416 if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
417 fatalx("imsg_read error");
418 if (n == 0)
419 fatalx("pipe closed");
421 while (!done) {
422 if ((n = imsg_get(ibuf, &imsg)) == -1)
423 fatalx("imsg_get error");
424 if (n == 0)
425 break;
427 switch (res->action) {
428 case ADD:
429 done = show_add(&imsg, &ret, &files);
430 break;
431 case SHOW:
432 done = show_complete(res, &imsg, &ret);
433 break;
434 case PLAY:
435 case TOGGLE:
436 case RESTART:
437 case STATUS:
438 case NEXT:
439 case PREV:
440 case JUMP:
441 done = show_status(&imsg, &ret);
442 break;
443 case LOAD:
444 done = show_load(res, &imsg, &ret);
445 break;
446 default:
447 done = 1;
448 break;
451 imsg_free(&imsg);
455 end:
456 return ret;
459 int
460 ctl_noarg(struct parse_result *res, int argc, char **argv)
462 if (argc != 1)
463 ctl_usage(res->ctl);
464 return ctlaction(res);
467 int
468 ctl_add(struct parse_result *res, int argc, char **argv)
470 if (argc < 2)
471 ctl_usage(res->ctl);
472 res->files = argv+1;
474 if (pledge("stdio rpath", NULL) == -1)
475 fatal("pledge");
477 return ctlaction(res);
480 int
481 ctl_show(struct parse_result *res, int argc, char **argv)
483 int ch;
485 while ((ch = getopt(argc, argv, "p")) != -1) {
486 switch (ch) {
487 case 'p':
488 res->pretty = 1;
489 break;
490 default:
491 ctl_usage(res->ctl);
495 return ctlaction(res);
498 int
499 ctl_load(struct parse_result *res, int argc, char **argv)
501 if (argc < 2)
502 res->file = NULL;
503 else if (argc == 2)
504 res->file = argv[1];
505 else
506 ctl_usage(res->ctl);
508 if (pledge("stdio rpath", NULL) == -1)
509 fatal("pledge");
511 return ctlaction(res);
514 int
515 ctl_jump(struct parse_result *res, int argc, char **argv)
517 int ch;
519 while ((ch = getopt(argc, argv, "")) != -1)
520 ctl_usage(res->ctl);
521 argc -= optind;
522 argv += optind;
524 if (argc != 1)
525 ctl_usage(res->ctl);
527 res->file = argv[0];
528 return ctlaction(res);
531 int
532 ctl_repeat(struct parse_result *res, int argc, char **argv)
534 int ch, b;
536 while ((ch = getopt(argc, argv, "")) != -1)
537 ctl_usage(res->ctl);
538 argc -= optind;
539 argv += optind;
541 if (argc != 2)
542 ctl_usage(res->ctl);
544 if (!strcmp(argv[1], "on"))
545 b = 1;
546 else if (!strcmp(argv[1], "off"))
547 b = 0;
548 else
549 ctl_usage(res->ctl);
551 res->rep.repeat_one = -1;
552 res->rep.repeat_all = -1;
553 if (!strcmp(argv[0], "one"))
554 res->rep.repeat_one = b;
555 else if (!strcmp(argv[0], "all"))
556 res->rep.repeat_all = b;
557 else
558 ctl_usage(res->ctl);
560 return ctlaction(res);
563 static int
564 sockconn(void)
566 struct sockaddr_un sun;
567 int sock, saved_errno;
569 if ((sock = socket(AF_UNIX, SOCK_STREAM, 0)) == -1)
570 fatal("socket");
572 memset(&sun, 0, sizeof(sun));
573 sun.sun_family = AF_UNIX;
574 strlcpy(sun.sun_path, csock, sizeof(sun.sun_path));
575 if (connect(sock, (struct sockaddr *)&sun, sizeof(sun)) == -1) {
576 saved_errno = errno;
577 close(sock);
578 errno = saved_errno;
579 return -1;
582 return sock;
585 __dead void
586 ctl(int argc, char **argv)
588 int ctl_sock, i = 0;
590 log_init(1, LOG_DAEMON);
591 log_setverbose(verbose);
593 do {
594 struct timespec ts = { 0, 50000000 }; /* 0.05 seconds */
596 if ((ctl_sock = sockconn()) != -1)
597 break;
598 if (errno != ENOENT && errno != ECONNREFUSED)
599 fatal("connect %s", csock);
601 if (i == 0)
602 spawn_daemon();
604 nanosleep(&ts, NULL);
605 } while (++i < 20);
607 if (ctl_sock == -1)
608 fatalx("failed to connect to the daemon");
610 ibuf = xmalloc(sizeof(*ibuf));
611 imsg_init(ibuf, ctl_sock);
613 optreset = 1;
614 optind = 1;
616 exit(parse(argc, argv));