2 * This file is part of DisOrder.
3 * Copyright (C) 2004-2008 Richard Kettlewell
4 * Portions copyright (C) 2007 Mark Wooding
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 /** @file lib/configuration.c
20 * @brief Configuration file support
26 #include <sys/types.h>
37 #include "configuration.h"
43 #include "inputline.h"
53 /** @brief Path to config file
55 * set_configfile() sets the deafult if it is null.
59 /** @brief Read user configuration
61 * If clear, the user-specific configuration is not read.
63 int config_per_user = 1;
65 /** @brief Config file parser state */
67 /** @brief Filename */
69 /** @brief Line number */
71 /** @brief Configuration object under construction */
72 struct config *config;
75 /** @brief Current configuration */
76 struct config *config;
78 /** @brief One configuration item */
80 /** @brief Name as it appears in the config file */
82 /** @brief Offset in @ref config structure */
84 /** @brief Pointer to item type */
85 const struct conftype *type;
86 /** @brief Pointer to item-specific validation routine */
87 int (*validate)(const struct config_state *cs,
88 int nvec, char **vec);
91 /** @brief Type of a configuration item */
93 /** @brief Pointer to function to set item */
94 int (*set)(const struct config_state *cs,
95 const struct conf *whoami,
96 int nvec, char **vec);
97 /** @brief Pointer to function to free item */
98 void (*free)(struct config *c, const struct conf *whoami);
101 /** @brief Compute the address of an item */
102 #define ADDRESS(C, TYPE) ((TYPE *)((char *)(C) + whoami->offset))
103 /** @brief Return the value of an item */
104 #define VALUE(C, TYPE) (*ADDRESS(C, TYPE))
106 static int set_signal(const struct config_state *cs,
107 const struct conf *whoami,
108 int nvec, char **vec) {
112 error(0, "%s:%d: '%s' requires one argument",
113 cs->path, cs->line, whoami->name);
116 if((n = find_signal(vec[0])) == -1) {
117 error(0, "%s:%d: unknown signal '%s'",
118 cs->path, cs->line, vec[0]);
121 VALUE(cs->config, int) = n;
125 static int set_collections(const struct config_state *cs,
126 const struct conf *whoami,
127 int nvec, char **vec) {
128 struct collectionlist *cl;
129 const char *root, *encoding, *module;
148 error(0, "%s:%d: '%s' requires at least one argument",
149 cs->path, cs->line, whoami->name);
152 error(0, "%s:%d: '%s' requires at most three arguments",
153 cs->path, cs->line, whoami->name);
156 /* Sanity check root */
158 error(0, "%s:%d: collection root must start with '/'",
162 if(root[1] && root[strlen(root)-1] == '/') {
163 error(0, "%s:%d: collection root must not end with '/'",
171 encoding = nl_langinfo(CODESET);
172 cl = ADDRESS(cs->config, struct collectionlist);
174 cl->s = xrealloc(cl->s, cl->n * sizeof (struct collection));
175 cl->s[cl->n - 1].module = xstrdup(module);
176 cl->s[cl->n - 1].encoding = xstrdup(encoding);
177 cl->s[cl->n - 1].root = xstrdup(root);
181 static int set_boolean(const struct config_state *cs,
182 const struct conf *whoami,
183 int nvec, char **vec) {
187 error(0, "%s:%d: '%s' takes only one argument",
188 cs->path, cs->line, whoami->name);
191 if(!strcmp(vec[0], "yes")) state = 1;
192 else if(!strcmp(vec[0], "no")) state = 0;
194 error(0, "%s:%d: argument to '%s' must be 'yes' or 'no'",
195 cs->path, cs->line, whoami->name);
198 VALUE(cs->config, int) = state;
202 static int set_string(const struct config_state *cs,
203 const struct conf *whoami,
204 int nvec, char **vec) {
206 error(0, "%s:%d: '%s' takes only one argument",
207 cs->path, cs->line, whoami->name);
210 VALUE(cs->config, char *) = xstrdup(vec[0]);
214 static int set_stringlist(const struct config_state *cs,
215 const struct conf *whoami,
216 int nvec, char **vec) {
218 struct stringlist *sl;
220 sl = ADDRESS(cs->config, struct stringlist);
222 for(n = 0; n < nvec; ++n) {
224 sl->s = xrealloc(sl->s, (sl->n * sizeof (char *)));
225 sl->s[sl->n - 1] = xstrdup(vec[n]);
230 static int set_integer(const struct config_state *cs,
231 const struct conf *whoami,
232 int nvec, char **vec) {
236 error(0, "%s:%d: '%s' takes only one argument",
237 cs->path, cs->line, whoami->name);
240 if(xstrtol(ADDRESS(cs->config, long), vec[0], &e, 0)) {
241 error(errno, "%s:%d: converting integer", cs->path, cs->line);
245 error(0, "%s:%d: invalid integer syntax", cs->path, cs->line);
251 static int set_stringlist_accum(const struct config_state *cs,
252 const struct conf *whoami,
253 int nvec, char **vec) {
255 struct stringlist *s;
256 struct stringlistlist *sll;
258 sll = ADDRESS(cs->config, struct stringlistlist);
264 sll->s = xrealloc(sll->s, (sll->n * sizeof (struct stringlist)));
265 s = &sll->s[sll->n - 1];
267 s->s = xmalloc((nvec + 1) * sizeof (char *));
268 for(n = 0; n < nvec; ++n)
269 s->s[n] = xstrdup(vec[n]);
273 static int set_string_accum(const struct config_state *cs,
274 const struct conf *whoami,
275 int nvec, char **vec) {
277 struct stringlist *sl;
279 sl = ADDRESS(cs->config, struct stringlist);
284 for(n = 0; n < nvec; ++n) {
286 sl->s = xrealloc(sl->s, (sl->n * sizeof (char *)));
287 sl->s[sl->n - 1] = xstrdup(vec[n]);
292 static int set_restrict(const struct config_state *cs,
293 const struct conf *whoami,
294 int nvec, char **vec) {
298 static const struct restriction {
302 { "remove", RESTRICT_REMOVE },
303 { "scratch", RESTRICT_SCRATCH },
304 { "move", RESTRICT_MOVE },
307 for(n = 0; n < nvec; ++n) {
308 if((i = TABLE_FIND(restrictions, name, vec[n])) < 0) {
309 error(0, "%s:%d: invalid restriction '%s'",
310 cs->path, cs->line, vec[n]);
313 r |= restrictions[i].bit;
315 VALUE(cs->config, unsigned) = r;
319 static int parse_sample_format(const struct config_state *cs,
320 struct stream_header *format,
321 int nvec, char **vec) {
326 error(0, "%s:%d: wrong number of arguments", cs->path, cs->line);
329 if(xstrtol(&t, p, &p, 0)) {
330 error(errno, "%s:%d: converting bits-per-sample", cs->path, cs->line);
333 if(t != 8 && t != 16) {
334 error(0, "%s:%d: bad bite-per-sample (%ld)", cs->path, cs->line, t);
337 if(format) format->bits = t;
339 case 'l': case 'L': t = ENDIAN_LITTLE; p++; break;
340 case 'b': case 'B': t = ENDIAN_BIG; p++; break;
341 default: t = ENDIAN_NATIVE; break;
343 if(format) format->endian = t;
345 error(errno, "%s:%d: expected `/' after bits-per-sample",
350 if(xstrtol(&t, p, &p, 0)) {
351 error(errno, "%s:%d: converting sample-rate", cs->path, cs->line);
354 if(t < 1 || t > INT_MAX) {
355 error(0, "%s:%d: silly sample-rate (%ld)", cs->path, cs->line, t);
358 if(format) format->rate = t;
360 error(0, "%s:%d: expected `/' after sample-rate",
365 if(xstrtol(&t, p, &p, 0)) {
366 error(errno, "%s:%d: converting channels", cs->path, cs->line);
370 error(0, "%s:%d: silly number (%ld) of channels", cs->path, cs->line, t);
373 if(format) format->channels = t;
375 error(0, "%s:%d: junk after channels", cs->path, cs->line);
381 static int set_sample_format(const struct config_state *cs,
382 const struct conf *whoami,
383 int nvec, char **vec) {
384 return parse_sample_format(cs, ADDRESS(cs->config, struct stream_header),
388 static int set_namepart(const struct config_state *cs,
389 const struct conf *whoami,
390 int nvec, char **vec) {
391 struct namepartlist *npl = ADDRESS(cs->config, struct namepartlist);
398 error(0, "%s:%d: namepart needs at least 3 arguments", cs->path, cs->line);
402 error(0, "%s:%d: namepart needs at most 5 arguments", cs->path, cs->line);
405 reflags = nvec >= 5 ? regsub_flags(vec[4]) : 0;
406 if(!(re = pcre_compile(vec[1],
408 |regsub_compile_options(reflags),
409 &errstr, &erroffset, 0))) {
410 error(0, "%s:%d: error compiling regexp /%s/: %s (offset %d)",
411 cs->path, cs->line, vec[1], errstr, erroffset);
414 npl->s = xrealloc(npl->s, (npl->n + 1) * sizeof (struct namepart));
415 npl->s[npl->n].part = xstrdup(vec[0]);
416 npl->s[npl->n].re = re;
417 npl->s[npl->n].replace = xstrdup(vec[2]);
418 npl->s[npl->n].context = xstrdup(vec[3]);
419 npl->s[npl->n].reflags = reflags;
421 /* XXX a bit of a bodge; relies on there being very few parts. */
422 for(n = 0; (n < cs->config->nparts
423 && strcmp(cs->config->parts[n], vec[0])); ++n)
425 if(n >= cs->config->nparts) {
426 cs->config->parts = xrealloc(cs->config->parts,
427 (cs->config->nparts + 1) * sizeof (char *));
428 cs->config->parts[cs->config->nparts++] = xstrdup(vec[0]);
433 static int set_transform(const struct config_state *cs,
434 const struct conf *whoami,
435 int nvec, char **vec) {
436 struct transformlist *tl = ADDRESS(cs->config, struct transformlist);
443 error(0, "%s:%d: transform needs at least 3 arguments", cs->path, cs->line);
447 error(0, "%s:%d: transform needs at most 5 arguments", cs->path, cs->line);
450 reflags = (nvec >= 5 ? regsub_flags(vec[4]) : 0);
451 if(!(re = pcre_compile(vec[1],
453 |regsub_compile_options(reflags),
454 &errstr, &erroffset, 0))) {
455 error(0, "%s:%d: error compiling regexp /%s/: %s (offset %d)",
456 cs->path, cs->line, vec[1], errstr, erroffset);
459 tl->t = xrealloc(tl->t, (tl->n + 1) * sizeof (struct namepart));
460 tl->t[tl->n].type = xstrdup(vec[0]);
461 tl->t[tl->n].context = xstrdup(vec[3] ? vec[3] : "*");
462 tl->t[tl->n].re = re;
463 tl->t[tl->n].replace = xstrdup(vec[2]);
464 tl->t[tl->n].flags = reflags;
469 static int set_backend(const struct config_state *cs,
470 const struct conf *whoami,
471 int nvec, char **vec) {
472 int *const valuep = ADDRESS(cs->config, int);
475 error(0, "%s:%d: '%s' requires one argument",
476 cs->path, cs->line, whoami->name);
479 if(!strcmp(vec[0], "alsa")) {
480 #if HAVE_ALSA_ASOUNDLIB_H
481 *valuep = BACKEND_ALSA;
483 error(0, "%s:%d: ALSA is not available on this platform",
487 } else if(!strcmp(vec[0], "command"))
488 *valuep = BACKEND_COMMAND;
489 else if(!strcmp(vec[0], "network"))
490 *valuep = BACKEND_NETWORK;
491 else if(!strcmp(vec[0], "coreaudio")) {
492 #if HAVE_COREAUDIO_AUDIOHARDWARE_H
493 *valuep = BACKEND_COREAUDIO;
495 error(0, "%s:%d: Core Audio is not available on this platform",
499 } else if(!strcmp(vec[0], "oss")) {
500 #if HAVE_SYS_SOUNDCARD_H
501 *valuep = BACKEND_OSS;
503 error(0, "%s:%d: OSS is not available on this platform",
508 error(0, "%s:%d: invalid '%s' value '%s'",
509 cs->path, cs->line, whoami->name, vec[0]);
515 static int set_rights(const struct config_state *cs,
516 const struct conf *whoami,
517 int nvec, char **vec) {
519 error(0, "%s:%d: '%s' requires one argument",
520 cs->path, cs->line, whoami->name);
523 if(parse_rights(vec[0], 0, 1)) {
524 error(0, "%s:%d: invalid rights string '%s'",
525 cs->path, cs->line, vec[0]);
528 *ADDRESS(cs->config, char *) = vec[0];
534 static void free_none(struct config attribute((unused)) *c,
535 const struct conf attribute((unused)) *whoami) {
538 static void free_string(struct config *c,
539 const struct conf *whoami) {
540 xfree(VALUE(c, char *));
543 static void free_stringlist(struct config *c,
544 const struct conf *whoami) {
546 struct stringlist *sl = ADDRESS(c, struct stringlist);
548 for(n = 0; n < sl->n; ++n)
553 static void free_stringlistlist(struct config *c,
554 const struct conf *whoami) {
556 struct stringlistlist *sll = ADDRESS(c, struct stringlistlist);
557 struct stringlist *sl;
559 for(n = 0; n < sll->n; ++n) {
561 for(m = 0; m < sl->n; ++m)
568 static void free_collectionlist(struct config *c,
569 const struct conf *whoami) {
570 struct collectionlist *cll = ADDRESS(c, struct collectionlist);
571 struct collection *cl;
574 for(n = 0; n < cll->n; ++n) {
583 static void free_namepartlist(struct config *c,
584 const struct conf *whoami) {
585 struct namepartlist *npl = ADDRESS(c, struct namepartlist);
589 for(n = 0; n < npl->n; ++n) {
592 pcre_free(np->re); /* ...whatever pcre_free is set to. */
599 static void free_transformlist(struct config *c,
600 const struct conf *whoami) {
601 struct transformlist *tl = ADDRESS(c, struct transformlist);
605 for(n = 0; n < tl->n; ++n) {
608 pcre_free(t->re); /* ...whatever pcre_free is set to. */
615 /* configuration types */
617 static const struct conftype
618 type_signal = { set_signal, free_none },
619 type_collections = { set_collections, free_collectionlist },
620 type_boolean = { set_boolean, free_none },
621 type_string = { set_string, free_string },
622 type_stringlist = { set_stringlist, free_stringlist },
623 type_integer = { set_integer, free_none },
624 type_stringlist_accum = { set_stringlist_accum, free_stringlistlist },
625 type_string_accum = { set_string_accum, free_stringlist },
626 type_sample_format = { set_sample_format, free_none },
627 type_restrict = { set_restrict, free_none },
628 type_namepart = { set_namepart, free_namepartlist },
629 type_transform = { set_transform, free_transformlist },
630 type_rights = { set_rights, free_none },
631 type_backend = { set_backend, free_none };
633 /* specific validation routine */
635 #define VALIDATE_FILE(test, what) do { \
639 for(n = 0; n < nvec; ++n) { \
640 if(stat(vec[n], &sb) < 0) { \
641 error(errno, "%s:%d: %s", cs->path, cs->line, vec[n]); \
644 if(!test(sb.st_mode)) { \
645 error(0, "%s:%d: %s is not a %s", \
646 cs->path, cs->line, vec[n], what); \
652 static int validate_isabspath(const struct config_state *cs,
653 int nvec, char **vec) {
656 for(n = 0; n < nvec; ++n)
657 if(vec[n][0] != '/') {
658 error(errno, "%s:%d: %s: not an absolute path",
659 cs->path, cs->line, vec[n]);
665 static int validate_isdir(const struct config_state *cs,
666 int nvec, char **vec) {
667 VALIDATE_FILE(S_ISDIR, "directory");
671 static int validate_isreg(const struct config_state *cs,
672 int nvec, char **vec) {
673 VALIDATE_FILE(S_ISREG, "regular file");
677 static int validate_player(const struct config_state *cs,
679 char attribute((unused)) **vec) {
681 error(0, "%s:%d: should be at least 'player PATTERN MODULE'",
688 static int validate_tracklength(const struct config_state *cs,
690 char attribute((unused)) **vec) {
692 error(0, "%s:%d: should be at least 'tracklength PATTERN MODULE'",
699 static int validate_allow(const struct config_state *cs,
701 char attribute((unused)) **vec) {
703 error(0, "%s:%d: must be 'allow NAME PASS'", cs->path, cs->line);
709 static int validate_non_negative(const struct config_state *cs,
710 int nvec, char **vec) {
714 error(0, "%s:%d: missing argument", cs->path, cs->line);
718 error(0, "%s:%d: too many arguments", cs->path, cs->line);
721 if(xstrtol(&n, vec[0], 0, 0)) {
722 error(0, "%s:%d: %s", cs->path, cs->line, strerror(errno));
726 error(0, "%s:%d: must not be negative", cs->path, cs->line);
732 static int validate_positive(const struct config_state *cs,
733 int nvec, char **vec) {
737 error(0, "%s:%d: missing argument", cs->path, cs->line);
741 error(0, "%s:%d: too many arguments", cs->path, cs->line);
744 if(xstrtol(&n, vec[0], 0, 0)) {
745 error(0, "%s:%d: %s", cs->path, cs->line, strerror(errno));
749 error(0, "%s:%d: must be positive", cs->path, cs->line);
755 static int validate_isauser(const struct config_state *cs,
756 int attribute((unused)) nvec,
760 if(!(pw = getpwnam(vec[0]))) {
761 error(0, "%s:%d: no such user as '%s'", cs->path, cs->line, vec[0]);
767 static int validate_sample_format(const struct config_state *cs,
768 int attribute((unused)) nvec,
770 return parse_sample_format(cs, 0, nvec, vec);
773 static int validate_any(const struct config_state attribute((unused)) *cs,
774 int attribute((unused)) nvec,
775 char attribute((unused)) **vec) {
779 static int validate_url(const struct config_state attribute((unused)) *cs,
780 int attribute((unused)) nvec,
784 /* absoluteURI = scheme ":" ( hier_part | opaque_part )
785 scheme = alpha *( alpha | digit | "+" | "-" | "." ) */
787 n = strspn(s, ("abcdefghijklmnopqrstuvwxyz"
788 "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
791 error(0, "%s:%d: invalid url '%s'", cs->path, cs->line, vec[0]);
794 if(!strncmp(s, "http:", 5)
795 || !strncmp(s, "https:", 6)) {
797 /* we only do a rather cursory check */
798 if(strncmp(s, "//", 2)) {
799 error(0, "%s:%d: invalid url '%s'", cs->path, cs->line, vec[0]);
806 static int validate_alias(const struct config_state *cs,
810 int in_brackets = 0, c;
813 error(0, "%s:%d: missing argument", cs->path, cs->line);
817 error(0, "%s:%d: too many arguments", cs->path, cs->line);
821 while((c = (unsigned char)*s++)) {
825 else if(!isalnum(c)) {
826 error(0, "%s:%d: invalid part name in alias expansion in '%s'",
827 cs->path, cs->line, vec[0]);
835 } else if(c == '\\') {
836 if(!(c = (unsigned char)*s++)) {
837 error(0, "%s:%d: unterminated escape in alias expansion in '%s'",
838 cs->path, cs->line, vec[0]);
840 } else if(c != '\\' && c != '{') {
841 error(0, "%s:%d: invalid escape in alias expansion in '%s'",
842 cs->path, cs->line, vec[0]);
850 error(0, "%s:%d: unterminated part name in alias expansion in '%s'",
851 cs->path, cs->line, vec[0]);
857 static int validate_addrport(const struct config_state attribute((unused)) *cs,
859 char attribute((unused)) **vec) {
862 error(0, "%s:%d: missing address",
866 error(0, "%s:%d: missing port name/number",
872 error(0, "%s:%d: expected ADDRESS PORT",
878 static int validate_port(const struct config_state attribute((unused)) *cs,
880 char attribute((unused)) **vec) {
883 error(0, "%s:%d: missing address",
890 error(0, "%s:%d: expected [ADDRESS] PORT",
896 static int validate_algo(const struct config_state attribute((unused)) *cs,
900 error(0, "%s:%d: invalid algorithm specification", cs->path, cs->line);
903 if(!valid_authhash(vec[0])) {
904 error(0, "%s:%d: unsuported algorithm '%s'", cs->path, cs->line, vec[0]);
910 /** @brief Item name and and offset */
911 #define C(x) #x, offsetof(struct config, x)
912 /** @brief Item name and and offset */
913 #define C2(x,y) #x, offsetof(struct config, y)
915 /** @brief All configuration items */
916 static const struct conf conf[] = {
917 { C(alias), &type_string, validate_alias },
918 { C(allow), &type_stringlist_accum, validate_allow },
919 { C(api), &type_backend, validate_any },
920 { C(authorization_algorithm), &type_string, validate_algo },
921 { C(broadcast), &type_stringlist, validate_addrport },
922 { C(broadcast_from), &type_stringlist, validate_addrport },
923 { C(channel), &type_string, validate_any },
924 { C(checkpoint_kbyte), &type_integer, validate_non_negative },
925 { C(checkpoint_min), &type_integer, validate_non_negative },
926 { C(collection), &type_collections, validate_any },
927 { C(connect), &type_stringlist, validate_addrport },
928 { C(cookie_login_lifetime), &type_integer, validate_positive },
929 { C(cookie_key_lifetime), &type_integer, validate_positive },
930 { C(dbversion), &type_integer, validate_positive },
931 { C(default_rights), &type_rights, validate_any },
932 { C(device), &type_string, validate_any },
933 { C(gap), &type_integer, validate_non_negative },
934 { C(history), &type_integer, validate_positive },
935 { C(home), &type_string, validate_isabspath },
936 { C(listen), &type_stringlist, validate_port },
937 { C(lock), &type_boolean, validate_any },
938 { C(mail_sender), &type_string, validate_any },
939 { C(mixer), &type_string, validate_any },
940 { C(multicast_loop), &type_boolean, validate_any },
941 { C(multicast_ttl), &type_integer, validate_non_negative },
942 { C(namepart), &type_namepart, validate_any },
943 { C(new_bias), &type_integer, validate_positive },
944 { C(new_bias_age), &type_integer, validate_positive },
945 { C(new_max), &type_integer, validate_positive },
946 { C2(nice, nice_rescan), &type_integer, validate_non_negative },
947 { C(nice_rescan), &type_integer, validate_non_negative },
948 { C(nice_server), &type_integer, validate_any },
949 { C(nice_speaker), &type_integer, validate_any },
950 { C(noticed_history), &type_integer, validate_positive },
951 { C(password), &type_string, validate_any },
952 { C(player), &type_stringlist_accum, validate_player },
953 { C(plugins), &type_string_accum, validate_isdir },
954 { C(prefsync), &type_integer, validate_positive },
955 { C(queue_pad), &type_integer, validate_positive },
956 { C(replay_min), &type_integer, validate_non_negative },
957 { C(refresh), &type_integer, validate_positive },
958 { C(reminder_interval), &type_integer, validate_positive },
959 { C(remote_userman), &type_boolean, validate_any },
960 { C2(restrict, restrictions), &type_restrict, validate_any },
961 { C(sample_format), &type_sample_format, validate_sample_format },
962 { C(scratch), &type_string_accum, validate_isreg },
963 { C(sendmail), &type_string, validate_isabspath },
964 { C(short_display), &type_integer, validate_positive },
965 { C(signal), &type_signal, validate_any },
966 { C(smtp_server), &type_string, validate_any },
967 { C(sox_generation), &type_integer, validate_non_negative },
968 { C2(speaker_backend, api), &type_backend, validate_any },
969 { C(speaker_command), &type_string, validate_any },
970 { C(stopword), &type_string_accum, validate_any },
971 { C(templates), &type_string_accum, validate_isdir },
972 { C(tracklength), &type_stringlist_accum, validate_tracklength },
973 { C(transform), &type_transform, validate_any },
974 { C(trust), &type_string_accum, validate_any },
975 { C(url), &type_string, validate_url },
976 { C(user), &type_string, validate_isauser },
977 { C(username), &type_string, validate_any },
980 /** @brief Find a configuration item's definition by key */
981 static const struct conf *find(const char *key) {
984 if((n = TABLE_FIND(conf, name, key)) < 0)
989 /** @brief Set a new configuration value */
990 static int config_set(const struct config_state *cs,
991 int nvec, char **vec) {
992 const struct conf *which;
994 D(("config_set %s", vec[0]));
995 if(!(which = find(vec[0]))) {
996 error(0, "%s:%d: unknown configuration key '%s'",
997 cs->path, cs->line, vec[0]);
1000 return (which->validate(cs, nvec - 1, vec + 1)
1001 || which->type->set(cs, which, nvec - 1, vec + 1));
1004 static int config_set_args(const struct config_state *cs,
1005 const char *which, ...) {
1011 vector_append(v, (char *)which);
1012 va_start(ap, which);
1013 while((s = va_arg(ap, char *)))
1014 vector_append(v, s);
1016 vector_terminate(v);
1017 return config_set(cs, v->nvec, v->vec);
1020 /** @brief Error callback used by config_include() */
1021 static void config_error(const char *msg, void *u) {
1022 const struct config_state *cs = u;
1024 error(0, "%s:%d: %s", cs->path, cs->line, msg);
1027 /** @brief Include a file by name */
1028 static int config_include(struct config *c, const char *path) {
1030 char *buffer, *inputbuffer, **vec;
1032 struct config_state cs;
1037 D(("%s: reading configuration", path));
1038 if(!(fp = fopen(path, "r"))) {
1039 error(errno, "error opening %s", path);
1042 while(!inputline(path, fp, &inputbuffer, '\n')) {
1044 if(!(buffer = mb2utf8(inputbuffer))) {
1045 error(errno, "%s:%d: cannot convert to UTF-8", cs.path, cs.line);
1051 if(!(vec = split(buffer, &n, SPLIT_COMMENTS|SPLIT_QUOTES,
1052 config_error, &cs))) {
1058 if(!strcmp(vec[0], "include")) {
1060 error(0, "%s:%d: must be 'include PATH'", cs.path, cs.line);
1063 config_include(c, vec[1]);
1065 ret |= config_set(&cs, n, vec);
1067 for(n = 0; vec[n]; ++n) xfree(vec[n]);
1072 error(errno, "error reading %s", path);
1079 static const char *const default_stopwords[] = {
1138 #define NDEFAULT_STOPWORDS (sizeof default_stopwords / sizeof *default_stopwords)
1140 static const char *const default_players[] = {
1146 #define NDEFAULT_PLAYERS (sizeof default_players / sizeof *default_players)
1148 /** @brief Make a new default configuration */
1149 static struct config *config_default(void) {
1150 struct config *c = xmalloc(sizeof *c);
1151 const char *logname;
1153 struct config_state cs;
1156 cs.path = "<internal>";
1159 /* Strings had better be xstrdup'd as they will get freed at some point. */
1162 c->home = xstrdup(pkgstatedir);
1163 if(!(pw = getpwuid(getuid())))
1164 fatal(0, "cannot determine our username");
1165 logname = pw->pw_name;
1166 c->username = xstrdup(logname);
1169 c->signal = SIGKILL;
1170 c->alias = xstrdup("{/artist}{/album}{/title}{ext}");
1172 c->device = xstrdup("default");
1173 c->nice_rescan = 10;
1174 c->speaker_command = 0;
1175 c->sample_format.bits = 16;
1176 c->sample_format.rate = 44100;
1177 c->sample_format.channels = 2;
1178 c->sample_format.endian = ENDIAN_NATIVE;
1180 c->replay_min = 8 * 3600;
1182 c->multicast_ttl = 1;
1183 c->multicast_loop = 1;
1184 c->authorization_algorithm = xstrdup("sha1");
1185 c->noticed_history = 31;
1186 c->short_display = 32;
1190 c->cookie_login_lifetime = 86400;
1191 c->cookie_key_lifetime = 86400 * 7;
1192 if(sendmail_binary[0] && strcmp(sendmail_binary, "none"))
1193 c->sendmail = xstrdup(sendmail_binary);
1194 c->smtp_server = xstrdup("127.0.0.1");
1196 c->reminder_interval = 600; /* 10m */
1197 c->new_bias_age = 7 * 86400; /* 1 week */
1198 c->new_bias = 9000000; /* 100 times the base weight */
1199 /* Default stopwords */
1200 if(config_set(&cs, (int)NDEFAULT_STOPWORDS, (char **)default_stopwords))
1202 /* Default player configuration */
1203 for(n = 0; n < NDEFAULT_PLAYERS; ++n) {
1204 if(config_set_args(&cs, "player",
1205 default_players[n], "execraw", "disorder-decode", (char *)0))
1207 if(config_set_args(&cs, "tracklength",
1208 default_players[n], "disorder-tracklength", (char *)0))
1214 char *config_get_file2(struct config *c, const char *name) {
1217 byte_xasprintf(&s, "%s/%s", c->home, name);
1221 /** @brief Set the default configuration file */
1222 static void set_configfile(void) {
1224 byte_xasprintf(&configfile, "%s/config", pkgconfdir);
1227 /** @brief Free a configuration object */
1228 static void config_free(struct config *c) {
1232 for(n = 0; n < (int)(sizeof conf / sizeof *conf); ++n)
1233 conf[n].type->free(c, &conf[n]);
1234 for(n = 0; n < c->nparts; ++n)
1241 /** @brief Set post-parse defaults */
1242 static void config_postdefaults(struct config *c,
1244 struct config_state cs;
1245 const struct conf *whoami;
1248 static const char *namepart[][4] = {
1249 { "title", "/([0-9]+ *[-:]? *)?([^/]+)\\.[a-zA-Z0-9]+$", "$2", "display" },
1250 { "title", "/([^/]+)\\.[a-zA-Z0-9]+$", "$1", "sort" },
1251 { "album", "/([^/]+)/[^/]+$", "$1", "*" },
1252 { "artist", "/([^/]+)/[^/]+/[^/]+$", "$1", "*" },
1253 { "ext", "(\\.[a-zA-Z0-9]+)$", "$1", "*" },
1255 #define NNAMEPART (int)(sizeof namepart / sizeof *namepart)
1257 static const char *transform[][5] = {
1258 { "track", "^.*/([0-9]+ *[-:]? *)?([^/]+)\\.[a-zA-Z0-9]+$", "$2", "display", "" },
1259 { "track", "^.*/([^/]+)\\.[a-zA-Z0-9]+$", "$1", "sort", "" },
1260 { "dir", "^.*/([^/]+)$", "$1", "*", "" },
1261 { "dir", "^(the) ([^/]*)", "$2, $1", "sort", "i", },
1262 { "dir", "[[:punct:]]", "", "sort", "g", }
1264 #define NTRANSFORM (int)(sizeof transform / sizeof *transform)
1266 cs.path = "<internal>";
1269 if(!c->namepart.n) {
1270 whoami = find("namepart");
1271 for(n = 0; n < NNAMEPART; ++n)
1272 set_namepart(&cs, whoami, 4, (char **)namepart[n]);
1274 if(!c->transform.n) {
1275 whoami = find("transform");
1276 for(n = 0; n < NTRANSFORM; ++n)
1277 set_transform(&cs, whoami, 5, (char **)transform[n]);
1280 if(c->speaker_command)
1281 c->api = BACKEND_COMMAND;
1282 else if(c->broadcast.n)
1283 c->api = BACKEND_NETWORK;
1285 c->api = DEFAULT_BACKEND;
1288 if(c->api == BACKEND_COMMAND && !c->speaker_command)
1289 fatal(0, "'api command' but speaker_command is not set");
1290 if(c->api == BACKEND_NETWORK && !c->broadcast.n)
1291 fatal(0, "'api network' but broadcast is not set");
1293 /* Override sample format */
1295 case BACKEND_NETWORK:
1296 c->sample_format.rate = 44100;
1297 c->sample_format.channels = 2;
1298 c->sample_format.bits = 16;
1299 c->sample_format.endian = ENDIAN_BIG;
1301 case BACKEND_COREAUDIO:
1302 c->sample_format.rate = 44100;
1303 c->sample_format.channels = 2;
1304 c->sample_format.bits = 16;
1305 c->sample_format.endian = ENDIAN_NATIVE;
1308 if(!c->default_rights) {
1309 rights_type r = RIGHTS__MASK & ~(RIGHT_ADMIN|RIGHT_REGISTER
1311 |RIGHT_SCRATCH__MASK
1312 |RIGHT_REMOVE__MASK);
1313 /* The idea is to approximate the meaning of the old 'restrict' directive
1314 * in the default rights if they are not overridden. */
1315 if(c->restrictions & RESTRICT_SCRATCH)
1316 r |= RIGHT_SCRATCH_MINE|RIGHT_SCRATCH_RANDOM;
1318 r |= RIGHT_SCRATCH_ANY;
1319 if(!(c->restrictions & RESTRICT_MOVE))
1320 r |= RIGHT_MOVE_ANY;
1321 if(c->restrictions & RESTRICT_REMOVE)
1322 r |= RIGHT_REMOVE_MINE;
1324 r |= RIGHT_REMOVE_ANY;
1325 c->default_rights = rights_string(r);
1329 /** @brief (Re-)read the config file
1330 * @param server If set, do extra checking
1332 int config_read(int server) {
1338 c = config_default();
1339 /* standalone Disobedience installs might not have a global config file */
1340 if(access(configfile, F_OK) == 0)
1341 if(config_include(c, configfile))
1343 /* if we can read the private config file, do */
1344 if((privconf = config_private())
1345 && access(privconf, R_OK) == 0
1346 && config_include(c, privconf))
1349 /* if there's a per-user system config file for this user, read it */
1350 if(config_per_user) {
1351 if(!(pw = getpwuid(getuid())))
1352 fatal(0, "cannot determine our username");
1353 if((privconf = config_usersysconf(pw))
1354 && access(privconf, F_OK) == 0
1355 && config_include(c, privconf))
1358 /* if we have a password file, read it */
1359 if((privconf = config_userconf(0, pw))
1360 && access(privconf, F_OK) == 0
1361 && config_include(c, privconf))
1365 /* install default namepart and transform settings */
1366 config_postdefaults(c, server);
1367 /* everything is good so we shall use the new config */
1368 config_free(config);
1369 /* warn about obsolete directives */
1371 error(0, "'restrict' will be removed in a future version");
1373 error(0, "'allow' will be removed in a future version");
1375 error(0, "'trust' will be removed in a future version");
1380 /** @brief Return the path to the private configuration file */
1381 char *config_private(void) {
1385 byte_xasprintf(&s, "%s.private", configfile);
1389 /** @brief Return the path to user's personal configuration file */
1390 char *config_userconf(const char *home, const struct passwd *pw) {
1393 if(!home && !pw && !(pw = getpwuid(getuid())))
1394 fatal(0, "cannot determine our username");
1395 byte_xasprintf(&s, "%s/.disorder/passwd", home ? home : pw->pw_dir);
1399 /** @brief Return the path to user-specific system configuration */
1400 char *config_usersysconf(const struct passwd *pw) {
1404 if(!strchr(pw->pw_name, '/')) {
1405 byte_xasprintf(&s, "%s.%s", configfile, pw->pw_name);
1411 char *config_get_file(const char *name) {
1412 return config_get_file2(config, name);