Blob


1 /* $OpenBSD: control.c,v 1.8 2021/03/02 04:10:07 jsg Exp $ */
3 /*
4 * Copyright (c) 2022, 2023 Omar Polo <op@omarpolo.com>
5 * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
6 *
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 */
20 #include "config.h"
22 #include <sys/stat.h>
23 #include <sys/socket.h>
24 #include <sys/un.h>
26 #include <netinet/in.h>
27 #include <net/if.h>
29 #include <errno.h>
30 #include <limits.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <unistd.h>
36 #include "amused.h"
37 #include "log.h"
38 #include "control.h"
39 #include "playlist.h"
41 #define CONTROL_BACKLOG 5
43 struct {
44 struct event ev;
45 struct event evt;
46 int fd;
47 struct playlist play;
48 int tx;
49 } control_state = {.fd = -1, .tx = -1};
51 struct ctl_conn {
52 TAILQ_ENTRY(ctl_conn) entry;
53 int monitor; /* 1 if client is in monitor mode */
54 struct imsgev iev;
55 };
57 TAILQ_HEAD(ctl_conns, ctl_conn) ctl_conns = TAILQ_HEAD_INITIALIZER(ctl_conns);
59 struct ctl_conn *control_connbyfd(int);
60 struct ctl_conn *control_connbypid(pid_t);
61 void control_close(int);
63 int
64 control_init(char *path)
65 {
66 struct sockaddr_un sun;
67 int fd;
68 mode_t old_umask;
70 if ((fd = socket(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC | SOCK_NONBLOCK,
71 0)) == -1) {
72 log_warn("%s: socket", __func__);
73 return (-1);
74 }
76 memset(&sun, 0, sizeof(sun));
77 sun.sun_family = AF_UNIX;
78 strlcpy(sun.sun_path, path, sizeof(sun.sun_path));
80 if (unlink(path) == -1)
81 if (errno != ENOENT) {
82 log_warn("%s: unlink %s", __func__, path);
83 close(fd);
84 return (-1);
85 }
87 old_umask = umask(S_IXUSR|S_IXGRP|S_IWOTH|S_IROTH|S_IXOTH);
88 if (bind(fd, (struct sockaddr *)&sun, sizeof(sun)) == -1) {
89 log_warn("%s: bind: %s", __func__, path);
90 close(fd);
91 umask(old_umask);
92 return (-1);
93 }
94 umask(old_umask);
96 if (chmod(path, S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP) == -1) {
97 log_warn("%s: chmod", __func__);
98 close(fd);
99 (void)unlink(path);
100 return (-1);
103 return (fd);
106 int
107 control_listen(int fd)
109 if (control_state.fd != -1)
110 fatalx("%s: received unexpected controlsock", __func__);
112 control_state.fd = fd;
113 if (listen(control_state.fd, CONTROL_BACKLOG) == -1) {
114 log_warn("%s: listen", __func__);
115 return (-1);
118 event_set(&control_state.ev, control_state.fd, EV_READ,
119 control_accept, NULL);
120 event_add(&control_state.ev, NULL);
121 evtimer_set(&control_state.evt, control_accept, NULL);
123 return (0);
126 void
127 control_accept(int listenfd, short event, void *bula)
129 int connfd;
130 socklen_t len;
131 struct sockaddr_un sun;
132 struct ctl_conn *c;
134 event_add(&control_state.ev, NULL);
135 if ((event & EV_TIMEOUT))
136 return;
138 len = sizeof(sun);
139 if ((connfd = accept4(listenfd, (struct sockaddr *)&sun, &len,
140 SOCK_CLOEXEC | SOCK_NONBLOCK)) == -1) {
141 /*
142 * Pause accept if we are out of file descriptors, or
143 * libevent will haunt us here too.
144 */
145 if (errno == ENFILE || errno == EMFILE) {
146 struct timeval evtpause = { 1, 0 };
148 event_del(&control_state.ev);
149 evtimer_add(&control_state.evt, &evtpause);
150 } else if (errno != EWOULDBLOCK && errno != EINTR &&
151 errno != ECONNABORTED)
152 log_warn("%s: accept4", __func__);
153 return;
156 if ((c = calloc(1, sizeof(struct ctl_conn))) == NULL) {
157 log_warn("%s: calloc", __func__);
158 close(connfd);
159 return;
162 imsg_init(&c->iev.ibuf, connfd);
163 c->iev.handler = control_dispatch_imsg;
164 c->iev.events = EV_READ;
165 event_set(&c->iev.ev, c->iev.ibuf.fd, c->iev.events,
166 c->iev.handler, &c->iev);
167 event_add(&c->iev.ev, NULL);
169 TAILQ_INSERT_TAIL(&ctl_conns, c, entry);
172 struct ctl_conn *
173 control_connbyfd(int fd)
175 struct ctl_conn *c;
177 TAILQ_FOREACH(c, &ctl_conns, entry) {
178 if (c->iev.ibuf.fd == fd)
179 break;
182 return (c);
185 struct ctl_conn *
186 control_connbypid(pid_t pid)
188 struct ctl_conn *c;
190 TAILQ_FOREACH(c, &ctl_conns, entry) {
191 if (c->iev.ibuf.pid == pid)
192 break;
195 return (c);
198 void
199 control_close(int fd)
201 struct ctl_conn *c;
203 if ((c = control_connbyfd(fd)) == NULL) {
204 log_warnx("%s: fd %d: not found", __func__, fd);
205 return;
208 /* abort the transaction if running by this user */
209 if (control_state.tx != -1 && c->iev.ibuf.fd == control_state.tx) {
210 playlist_free(&control_state.play);
211 control_state.tx = -1;
214 msgbuf_clear(&c->iev.ibuf.w);
215 TAILQ_REMOVE(&ctl_conns, c, entry);
217 event_del(&c->iev.ev);
218 close(c->iev.ibuf.fd);
220 /* Some file descriptors are available again. */
221 if (evtimer_pending(&control_state.evt, NULL)) {
222 evtimer_del(&control_state.evt);
223 event_add(&control_state.ev, NULL);
226 free(c);
229 void
230 control_notify(int type)
232 struct ctl_conn *c;
233 struct player_event ev;
235 memset(&ev, 0, sizeof(ev));
236 ev.event = type;
237 ev.position = current_position;
238 ev.duration = current_duration;
239 ev.mode.repeat_one = repeat_one;
240 ev.mode.repeat_all = repeat_all;
241 ev.mode.consume = consume;
243 TAILQ_FOREACH(c, &ctl_conns, entry) {
244 if (!c->monitor)
245 continue;
247 imsg_compose_event(&c->iev, IMSG_CTL_MONITOR, 0, 0,
248 -1, &ev, sizeof(ev));
252 static int
253 new_mode(int val, int newval)
255 if (newval == MODE_UNDEF)
256 return val;
257 if (newval == MODE_TOGGLE)
258 return !val;
259 return !!newval;
262 void
263 control_dispatch_imsg(int fd, short event, void *bula)
265 struct ctl_conn *c;
266 struct imsg imsg;
267 struct player_mode mode;
268 struct player_seek seek;
269 ssize_t n, off;
271 if ((c = control_connbyfd(fd)) == NULL) {
272 log_warnx("%s: fd %d: not found", __func__, fd);
273 return;
276 if (event & EV_READ) {
277 if (((n = imsg_read(&c->iev.ibuf)) == -1 && errno != EAGAIN) ||
278 n == 0) {
279 control_close(fd);
280 return;
283 if (event & EV_WRITE) {
284 if (msgbuf_write(&c->iev.ibuf.w) <= 0 && errno != EAGAIN) {
285 control_close(fd);
286 return;
290 for (;;) {
291 if ((n = imsg_get(&c->iev.ibuf, &imsg)) == -1) {
292 control_close(fd);
293 return;
295 if (n == 0)
296 break;
298 switch (imsg.hdr.type) {
299 case IMSG_CTL_PLAY:
300 switch (play_state) {
301 case STATE_STOPPED:
302 main_playlist_resume();
303 break;
304 case STATE_PLAYING:
305 /* do nothing */
306 break;
307 case STATE_PAUSED:
308 play_state = STATE_PLAYING;
309 main_send_player(IMSG_RESUME, -1, NULL ,0);
310 break;
312 control_notify(imsg.hdr.type);
313 break;
314 case IMSG_CTL_TOGGLE_PLAY:
315 switch (play_state) {
316 case STATE_STOPPED:
317 control_notify(IMSG_CTL_PLAY);
318 main_playlist_resume();
319 break;
320 case STATE_PLAYING:
321 control_notify(IMSG_CTL_PAUSE);
322 play_state = STATE_PAUSED;
323 main_send_player(IMSG_PAUSE, -1, NULL, 0);
324 break;
325 case STATE_PAUSED:
326 control_notify(IMSG_CTL_PLAY);
327 play_state = STATE_PLAYING;
328 main_send_player(IMSG_RESUME, -1, NULL, 0);
329 break;
331 break;
332 case IMSG_CTL_PAUSE:
333 if (play_state != STATE_PLAYING)
334 break;
335 play_state = STATE_PAUSED;
336 main_send_player(IMSG_PAUSE, -1, NULL, 0);
337 control_notify(imsg.hdr.type);
338 break;
339 case IMSG_CTL_STOP:
340 if (play_state == STATE_STOPPED)
341 break;
342 play_state = STATE_STOPPED;
343 main_send_player(IMSG_STOP, -1, NULL, 0);
344 control_notify(imsg.hdr.type);
345 break;
346 case IMSG_CTL_FLUSH:
347 playlist_truncate();
348 control_notify(IMSG_CTL_COMMIT);
349 break;
350 case IMSG_CTL_SHOW:
351 main_send_playlist(&c->iev);
352 break;
353 case IMSG_CTL_STATUS:
354 main_send_status(&c->iev);
355 break;
356 case IMSG_CTL_NEXT:
357 control_notify(imsg.hdr.type);
358 main_send_player(IMSG_STOP, -1, NULL, 0);
359 main_playlist_advance();
360 break;
361 case IMSG_CTL_PREV:
362 control_notify(imsg.hdr.type);
363 main_send_player(IMSG_STOP, -1, NULL, 0);
364 main_playlist_previous();
365 break;
366 case IMSG_CTL_JUMP:
367 main_playlist_jump(&c->iev, &imsg);
368 break;
369 case IMSG_CTL_MODE:
370 if (IMSG_DATA_SIZE(imsg) != sizeof(mode)) {
371 log_warnx("%s: got wrong size", __func__);
372 break;
374 memcpy(&mode, imsg.data, sizeof(mode));
375 consume = new_mode(consume, mode.consume);
376 repeat_all = new_mode(repeat_all, mode.repeat_all);
377 repeat_one = new_mode(repeat_one, mode.repeat_one);
378 main_send_status(&c->iev);
379 control_notify(imsg.hdr.type);
380 break;
381 case IMSG_CTL_BEGIN:
382 if (control_state.tx != -1) {
383 main_senderr(&c->iev, "locked");
384 break;
386 control_state.tx = c->iev.ibuf.fd;
387 imsg_compose_event(&c->iev, IMSG_CTL_BEGIN, 0, 0, -1,
388 NULL, 0);
389 break;
390 case IMSG_CTL_ADD:
391 if (control_state.tx != -1 &&
392 control_state.tx != c->iev.ibuf.fd) {
393 main_senderr(&c->iev, "locked");
394 break;
396 main_enqueue(control_state.tx != -1,
397 &control_state.play,&c->iev, &imsg);
398 if (control_state.tx == -1)
399 control_notify(imsg.hdr.type);
400 break;
401 case IMSG_CTL_COMMIT:
402 if (control_state.tx != c->iev.ibuf.fd) {
403 main_senderr(&c->iev, "locked");
404 break;
406 if (IMSG_DATA_SIZE(imsg) != sizeof(off)) {
407 main_senderr(&c->iev, "wrong size");
408 break;
410 memcpy(&off, imsg.data, sizeof(off));
411 playlist_swap(&control_state.play, off);
412 memset(&control_state.play, 0,
413 sizeof(control_state.play));
414 control_state.tx = -1;
415 imsg_compose_event(&c->iev, IMSG_CTL_COMMIT, 0, 0, -1,
416 NULL, 0);
417 control_notify(imsg.hdr.type);
418 break;
419 case IMSG_CTL_MONITOR:
420 c->monitor = 1;
421 break;
422 case IMSG_CTL_SEEK:
423 if (IMSG_DATA_SIZE(imsg) != sizeof(seek)) {
424 main_senderr(&c->iev, "wrong size");
425 break;
427 memcpy(&seek, imsg.data, sizeof(seek));
428 main_seek(&seek);
429 break;
430 default:
431 log_debug("%s: error handling imsg %d", __func__,
432 imsg.hdr.type);
433 break;
435 imsg_free(&imsg);
438 imsg_event_add(&c->iev);
441 int
442 control_imsg_relay(struct imsg *imsg)
444 struct ctl_conn *c;
446 if ((c = control_connbypid(imsg->hdr.pid)) == NULL)
447 return (0);
449 return (imsg_compose_event(&c->iev, imsg->hdr.type, 0, imsg->hdr.pid,
450 -1, imsg->data, IMSG_DATA_SIZE(*imsg)));