chiark / gitweb /
core audio support in speaker
[disorder] / server / disorderd.c
CommitLineData
460b9539 1/*
2 * This file is part of DisOrder.
3 * Copyright (C) 2004, 2005, 2006 Richard Kettlewell
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
18 * USA
19 */
20
21#include <config.h>
6d2d327c 22#include "types.h"
460b9539 23
24#include <stdio.h>
25#include <getopt.h>
26#include <pwd.h>
27#include <grp.h>
28#include <sys/types.h>
29#include <errno.h>
30#include <stdlib.h>
31#include <string.h>
32#include <unistd.h>
33#include <signal.h>
34#include <sys/socket.h>
35#include <time.h>
36#include <locale.h>
37#include <syslog.h>
38#include <sys/time.h>
39#include <pcre.h>
40#include <fcntl.h>
41
42#include "daemonize.h"
43#include "event.h"
44#include "log.h"
45#include "configuration.h"
46#include "trackdb.h"
47#include "queue.h"
48#include "mem.h"
49#include "play.h"
50#include "server.h"
51#include "state.h"
52#include "syscalls.h"
53#include "defs.h"
54#include "user.h"
55#include "mixer.h"
56#include "eventlog.h"
e83d0967 57#include "printf.h"
460b9539 58
59static ev_source *ev;
60
61static void rescan_after(long offset);
62static void dbgc_after(long offset);
63static void volumecheck_after(long offset);
64
65static const struct option options[] = {
66 { "help", no_argument, 0, 'h' },
67 { "version", no_argument, 0, 'V' },
68 { "config", required_argument, 0, 'c' },
69 { "debug", no_argument, 0, 'd' },
70 { "foreground", no_argument, 0, 'f' },
71 { "log", required_argument, 0, 'l' },
72 { "pidfile", required_argument, 0, 'P' },
73 { "no-initial-rescan", no_argument, 0, 'N' },
18e6d6e6 74 { "wide-open", no_argument, 0, 'w' },
e83d0967 75 { "syslog", no_argument, 0, 's' },
460b9539 76 { 0, 0, 0, 0 }
77};
78
79/* display usage message and terminate */
80static void help(void) {
81 xprintf("Usage:\n"
82 " disorderd [OPTIONS]\n"
83 "Options:\n"
84 " --help, -h Display usage message\n"
85 " --version, -V Display version number\n"
86 " --config PATH, -c PATH Set configuration file\n"
87 " --debug, -d Turn on debugging\n"
88 " --foreground, -f Do not become a daemon\n"
e83d0967 89 " --syslog, -s Log to syslog even with -f\n"
460b9539 90 " --pidfile PATH, -P PATH Leave a pidfile\n");
91 xfclose(stdout);
92 exit(0);
93}
94
95/* display version number and terminate */
96static void version(void) {
97 xprintf("disorderd version %s\n", disorder_version_string);
98 xfclose(stdout);
99 exit(0);
100}
101
102/* SIGHUP callback */
103static int handle_sighup(ev_source attribute((unused)) *ev_,
104 int attribute((unused)) sig,
105 void attribute((unused)) *u) {
106 info("received SIGHUP");
107 reconfigure(ev, 1);
108 return 0;
109}
110
111/* fatal signals */
112
113static int handle_sigint(ev_source attribute((unused)) *ev_,
114 int attribute((unused)) sig,
115 void attribute((unused)) *u) {
116 info("received SIGINT");
117 quit(ev);
118}
119
120static int handle_sigterm(ev_source attribute((unused)) *ev_,
121 int attribute((unused)) sig,
122 void attribute((unused)) *u) {
123 info("received SIGTERM");
124 quit(ev);
125}
126
127static int rescan_again(ev_source *ev_,
128 const struct timeval attribute((unused)) *now,
129 void attribute((unused)) *u) {
130 trackdb_rescan(ev_);
131 rescan_after(86400);
132 return 0;
133}
134
135static void rescan_after(long offset) {
136 struct timeval w;
137
138 gettimeofday(&w, 0);
139 w.tv_sec += offset;
140 ev_timeout(ev, 0, &w, rescan_again, 0);
141}
142
143static int dbgc_again(ev_source attribute((unused)) *ev_,
144 const struct timeval attribute((unused)) *now,
145 void attribute((unused)) *u) {
146 trackdb_gc();
147 dbgc_after(60);
148 return 0;
149}
150
151static void dbgc_after(long offset) {
152 struct timeval w;
153
154 gettimeofday(&w, 0);
155 w.tv_sec += offset;
156 ev_timeout(ev, 0, &w, dbgc_again, 0);
157}
158
159static int volumecheck_again(ev_source attribute((unused)) *ev_,
160 const struct timeval attribute((unused)) *now,
161 void attribute((unused)) *u) {
162 int l, r;
163 char lb[32], rb[32];
164
165 if(!mixer_control(&l, &r, 0)) {
166 if(l != volume_left || r != volume_right) {
167 volume_left = l;
168 volume_right = r;
169 snprintf(lb, sizeof lb, "%d", l);
170 snprintf(rb, sizeof rb, "%d", r);
171 eventlog("volume", lb, rb, (char *)0);
172 }
173 }
174 volumecheck_after(60);
175 return 0;
176}
177
178static void volumecheck_after(long offset) {
179 struct timeval w;
180
181 gettimeofday(&w, 0);
182 w.tv_sec += offset;
183 ev_timeout(ev, 0, &w, volumecheck_again, 0);
184}
185
e83d0967
RK
186/* We fix the path to include the bindir and sbindir we were installed into */
187static void fix_path(void) {
188 char *path = getenv("PATH");
189 char *newpath;
190
191 if(!path)
192 error(0, "PATH is not set at all!");
193
31780899 194 if(*finkbindir && strcmp(finkbindir, "/"))
e83d0967
RK
195 /* We appear to be a finkized mac; include fink on the path in case the
196 * tools we need are there. */
197 byte_xasprintf(&newpath, "PATH=%s:%s:%s:%s",
198 path, bindir, sbindir, finkbindir);
199 else
200 byte_xasprintf(&newpath, "PATH=%s:%s:%s", path, bindir, sbindir);
201 putenv(newpath);
202 info("%s", newpath);
203}
204
205int main(int argc, char **argv) {
206 int n, background = 1, logsyslog = 0;
460b9539 207 const char *pidfile = 0;
208 int initial_rescan = 1;
209
210 set_progname(argv);
320598d4 211 mem_init();
460b9539 212 if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale");
213 /* garbage-collect PCRE's memory */
214 pcre_malloc = xmalloc;
215 pcre_free = xfree;
e83d0967 216 while((n = getopt_long(argc, argv, "hVc:dfP:Ns", options, 0)) >= 0) {
460b9539 217 switch(n) {
218 case 'h': help();
219 case 'V': version();
220 case 'c': configfile = optarg; break;
221 case 'd': debugging = 1; break;
222 case 'f': background = 0; break;
223 case 'P': pidfile = optarg; break;
224 case 'N': initial_rescan = 0; break;
e83d0967 225 case 's': logsyslog = 1; break;
18e6d6e6 226 case 'w': wideopen = 1; break;
460b9539 227 default: fatal(0, "invalid option");
228 }
229 }
230 /* go into background if necessary */
231 if(background)
232 daemonize(progname, LOG_DAEMON, pidfile);
e83d0967
RK
233 else if(logsyslog) {
234 /* If we're running under some kind of daemon supervisor then we may want
235 * to log to syslog but not to go into background */
236 openlog(progname, LOG_PID, LOG_DAEMON);
237 log_default = &log_syslog;
238 }
460b9539 239 info("process ID %lu", (unsigned long)getpid());
e83d0967 240 fix_path();
460b9539 241 srand(time(0)); /* don't start the same every time */
242 /* create event loop */
243 ev = ev_new();
244 if(ev_child_setup(ev)) fatal(0, "ev_child_setup failed");
245 /* read config */
c00fce3a 246 if(config_read(1))
460b9539 247 fatal(0, "cannot read configuration");
248 /* Start the speaker process (as root! - so it can choose its nice value) */
249 speaker_setup(ev);
250 /* set server nice value _after_ starting the speaker, so that they
251 * are independently niceable */
252 xnice(config->nice_server);
253 /* change user */
254 become_mortal();
255 /* make sure we're not root, whatever the config says */
256 if(getuid() == 0 || geteuid() == 0) fatal(0, "do not run as root");
257 /* open a lockfile - we only want one copy of the server to run at once. */
258 if(config->lock) {
259 const char *lockfile;
260 int lockfd;
261 struct flock lock;
262
263 lockfile = config_get_file("lock");
264 if((lockfd = open(lockfile, O_RDWR|O_CREAT, 0600)) < 0)
265 fatal(errno, "error opening %s", lockfile);
266 cloexec(lockfd);
267 memset(&lock, 0, sizeof lock);
268 lock.l_type = F_WRLCK;
269 lock.l_whence = SEEK_SET;
270 if(fcntl(lockfd, F_SETLK, &lock) < 0)
271 fatal(errno, "error locking %s", lockfile);
272 }
273 /* initialize database environment */
274 trackdb_init(TRACKDB_NORMAL_RECOVER);
275 trackdb_master(ev);
276 /* install new config */
277 reconfigure(ev, 0);
278 /* re-read config if we receive a SIGHUP */
279 if(ev_signal(ev, SIGHUP, handle_sighup, 0)) fatal(0, "ev_signal failed");
280 /* exit on SIGINT/SIGTERM */
281 if(ev_signal(ev, SIGINT, handle_sigint, 0)) fatal(0, "ev_signal failed");
282 if(ev_signal(ev, SIGTERM, handle_sigterm, 0)) fatal(0, "ev_signal failed");
283 /* ignore SIGPIPE */
284 signal(SIGPIPE, SIG_IGN);
285 /* start a rescan straight away */
286 if(initial_rescan)
287 trackdb_rescan(ev);
288 rescan_after(86400);
289 /* periodically tidy up the database */
290 dbgc_after(60);
291 /* periodically check the volume */
104ae93a 292 volumecheck_again(0, 0, 0);
460b9539 293 /* set initial state */
294 add_random_track();
295 play(ev);
296 /* enter the event loop */
297 n = ev_run(ev);
298 /* if we exit the event loop, something must have gone wrong */
299 fatal(errno, "ev_run returned %d", n);
300}
301
302/*
303Local Variables:
304c-basic-offset:2
305comment-column:40
e83d0967 306fill-column:79
460b9539 307End:
308*/