Blob


1 /* $OpenBSD: control.c,v 1.8 2021/03/02 04:10:07 jsg Exp $ */
3 /*
4 * Copyright (c) 2022 Omar Polo <op@openbsd.org>
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;
234 TAILQ_FOREACH(c, &ctl_conns, entry) {
235 if (!c->monitor)
236 continue;
238 imsg_compose_event(&c->iev, IMSG_CTL_MONITOR, 0, 0,
239 -1, &type, sizeof(type));
243 static int
244 new_mode(int val, int newval)
246 if (newval == MODE_UNDEF)
247 return val;
248 if (newval == MODE_TOGGLE)
249 return !val;
250 return !!newval;
253 void
254 control_dispatch_imsg(int fd, short event, void *bula)
256 struct ctl_conn *c;
257 struct imsg imsg;
258 struct player_mode mode;
259 struct player_seek seek;
260 ssize_t n, off;
262 if ((c = control_connbyfd(fd)) == NULL) {
263 log_warnx("%s: fd %d: not found", __func__, fd);
264 return;
267 if (event & EV_READ) {
268 if (((n = imsg_read(&c->iev.ibuf)) == -1 && errno != EAGAIN) ||
269 n == 0) {
270 control_close(fd);
271 return;
274 if (event & EV_WRITE) {
275 if (msgbuf_write(&c->iev.ibuf.w) <= 0 && errno != EAGAIN) {
276 control_close(fd);
277 return;
281 for (;;) {
282 if ((n = imsg_get(&c->iev.ibuf, &imsg)) == -1) {
283 control_close(fd);
284 return;
286 if (n == 0)
287 break;
289 switch (imsg.hdr.type) {
290 case IMSG_CTL_PLAY:
291 switch (play_state) {
292 case STATE_STOPPED:
293 main_playlist_resume();
294 break;
295 case STATE_PLAYING:
296 /* do nothing */
297 break;
298 case STATE_PAUSED:
299 play_state = STATE_PLAYING;
300 main_send_player(IMSG_RESUME, -1, NULL ,0);
301 break;
303 control_notify(imsg.hdr.type);
304 break;
305 case IMSG_CTL_TOGGLE_PLAY:
306 switch (play_state) {
307 case STATE_STOPPED:
308 control_notify(IMSG_CTL_PLAY);
309 main_playlist_resume();
310 break;
311 case STATE_PLAYING:
312 control_notify(IMSG_CTL_PAUSE);
313 play_state = STATE_PAUSED;
314 main_send_player(IMSG_PAUSE, -1, NULL, 0);
315 break;
316 case STATE_PAUSED:
317 control_notify(IMSG_CTL_PLAY);
318 play_state = STATE_PLAYING;
319 main_send_player(IMSG_RESUME, -1, NULL, 0);
320 break;
322 break;
323 case IMSG_CTL_PAUSE:
324 if (play_state != STATE_PLAYING)
325 break;
326 play_state = STATE_PAUSED;
327 main_send_player(IMSG_PAUSE, -1, NULL, 0);
328 control_notify(imsg.hdr.type);
329 break;
330 case IMSG_CTL_STOP:
331 if (play_state == STATE_STOPPED)
332 break;
333 play_state = STATE_STOPPED;
334 main_send_player(IMSG_STOP, -1, NULL, 0);
335 control_notify(imsg.hdr.type);
336 break;
337 case IMSG_CTL_FLUSH:
338 playlist_truncate();
339 control_notify(IMSG_CTL_COMMIT);
340 break;
341 case IMSG_CTL_SHOW:
342 main_send_playlist(&c->iev);
343 break;
344 case IMSG_CTL_STATUS:
345 main_send_status(&c->iev);
346 break;
347 case IMSG_CTL_NEXT:
348 control_notify(imsg.hdr.type);
349 main_send_player(IMSG_STOP, -1, NULL, 0);
350 main_playlist_advance();
351 break;
352 case IMSG_CTL_PREV:
353 control_notify(imsg.hdr.type);
354 main_send_player(IMSG_STOP, -1, NULL, 0);
355 main_playlist_previous();
356 break;
357 case IMSG_CTL_JUMP:
358 main_playlist_jump(&c->iev, &imsg);
359 break;
360 case IMSG_CTL_MODE:
361 if (IMSG_DATA_SIZE(imsg) != sizeof(mode)) {
362 log_warnx("%s: got wrong size", __func__);
363 break;
365 memcpy(&mode, imsg.data, sizeof(mode));
366 consume = new_mode(consume, mode.consume);
367 repeat_all = new_mode(repeat_all, mode.repeat_all);
368 repeat_one = new_mode(repeat_one, mode.repeat_one);
369 main_send_status(&c->iev);
370 control_notify(imsg.hdr.type);
371 break;
372 case IMSG_CTL_BEGIN:
373 if (control_state.tx != -1) {
374 main_senderr(&c->iev, "locked");
375 break;
377 control_state.tx = c->iev.ibuf.fd;
378 imsg_compose_event(&c->iev, IMSG_CTL_BEGIN, 0, 0, -1,
379 NULL, 0);
380 break;
381 case IMSG_CTL_ADD:
382 if (control_state.tx != -1 &&
383 control_state.tx != c->iev.ibuf.fd) {
384 main_senderr(&c->iev, "locked");
385 break;
387 main_enqueue(control_state.tx != -1,
388 &control_state.play,&c->iev, &imsg);
389 if (control_state.tx == -1)
390 control_notify(imsg.hdr.type);
391 break;
392 case IMSG_CTL_COMMIT:
393 if (control_state.tx != c->iev.ibuf.fd) {
394 main_senderr(&c->iev, "locked");
395 break;
397 if (IMSG_DATA_SIZE(imsg) != sizeof(off)) {
398 main_senderr(&c->iev, "wrong size");
399 break;
401 memcpy(&off, imsg.data, sizeof(off));
402 playlist_swap(&control_state.play, off);
403 memset(&control_state.play, 0,
404 sizeof(control_state.play));
405 control_state.tx = -1;
406 imsg_compose_event(&c->iev, IMSG_CTL_COMMIT, 0, 0, -1,
407 NULL, 0);
408 control_notify(imsg.hdr.type);
409 break;
410 case IMSG_CTL_MONITOR:
411 c->monitor = 1;
412 break;
413 case IMSG_CTL_SEEK:
414 if (IMSG_DATA_SIZE(imsg) != sizeof(seek)) {
415 main_senderr(&c->iev, "wrong size");
416 break;
418 memcpy(&seek, imsg.data, sizeof(seek));
419 main_seek(&seek);
420 break;
421 default:
422 log_debug("%s: error handling imsg %d", __func__,
423 imsg.hdr.type);
424 break;
426 imsg_free(&imsg);
429 imsg_event_add(&c->iev);
432 int
433 control_imsg_relay(struct imsg *imsg)
435 struct ctl_conn *c;
437 if ((c = control_connbypid(imsg->hdr.pid)) == NULL)
438 return (0);
440 return (imsg_compose_event(&c->iev, imsg->hdr.type, 0, imsg->hdr.pid,
441 -1, imsg->data, IMSG_DATA_SIZE(*imsg)));