X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/f03c5a86c8c9b1f03d8ced522597c9a9844002b4..81410abb0c32907b9edd292d512ee8844d177c34:/clients/disorder.c diff --git a/clients/disorder.c b/clients/disorder.c index 0dd71c7..7bc2f27 100644 --- a/clients/disorder.c +++ b/clients/disorder.c @@ -1,60 +1,74 @@ /* * This file is part of DisOrder. - * Copyright (C) 2004-2008 Richard Kettlewell + * Copyright (C) 2004-2013 Richard Kettlewell * - * This program is free software; you can redistribute it and/or modify + * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or + * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * - * This program is distributed in the hope that it will be useful, but - * WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * General Public License for more details. - * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 - * USA + * along with this program. If not, see . + */ +/** @file clients/disorder.c + * @brief Command-line client */ -#include -#include "types.h" +#include "common.h" #include #include -#include -#include -#include +#if HAVE_SYS_SOCKET_H +# include +#endif +#if HAVE_SYS_UN_H +# include +#endif #include -#include -#include #include #include #include -#include -#include -#include +#if HAVE_UNISTD_H +# include +#endif +#if HAVE_PCRE_H +# include +#endif #include +#if HAVE_GCRYPT_H +# include +#endif +#if HAVE_LANGINFO_H +# include +#endif #include "configuration.h" #include "syscalls.h" #include "log.h" #include "queue.h" #include "client.h" -#include "wstat.h" +#if !_WIN32 +# include "wstat.h" +#endif #include "table.h" #include "charset.h" #include "kvp.h" #include "split.h" #include "sink.h" -#include "plugin.h" #include "mem.h" #include "defs.h" -#include "authorize.h" +#if !_WIN32 +# include "authorize.h" +#endif #include "vector.h" #include "version.h" #include "dateparse.h" +#include "inputline.h" static disorder_client *client; @@ -98,14 +112,25 @@ static void cf_version(char attribute((unused)) **argv) { char *v; if(disorder_version(getclient(), &v)) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(v))); + v = nullcheck(utf82mb_f(v)); + xprintf("%s\n", v); + xfree(v); } static void print_queue_entry(const struct queue_entry *q) { if(q->track) xprintf("track %s\n", nullcheck(utf82mb(q->track))); if(q->id) xprintf(" id %s\n", nullcheck(utf82mb(q->id))); - if(q->submitter) xprintf(" submitted by %s at %s", - nullcheck(utf82mb(q->submitter)), ctime(&q->when)); + switch(q->origin) { + case origin_adopted: + case origin_picked: + case origin_scheduled: + xprintf(" %s by %s at %s", + track_origins[q->origin], + nullcheck(utf82mb(q->submitter)), ctime(&q->when)); + break; + default: + break; + } if(q->played) xprintf(" played at %s", ctime(&q->played)); if(q->state == playing_started || q->state == playing_paused) xprintf(" %lds so far", q->sofar); @@ -113,7 +138,11 @@ static void print_queue_entry(const struct queue_entry *q) { if(q->scratched) xprintf(" scratched by %s\n", nullcheck(utf82mb(q->scratched))); else xprintf(" %s\n", playing_states[q->state]); +#if _WIN32 + if(q->wstat) xprintf(" %#x\n", q->wstat); +#else if(q->wstat) xprintf(" %s\n", wstat(q->wstat)); +#endif } static void cf_playing(char attribute((unused)) **argv) { @@ -127,8 +156,9 @@ static void cf_playing(char attribute((unused)) **argv) { } static void cf_play(char **argv) { + char *id; while(*argv) - if(disorder_play(getclient(), *argv++)) exit(EXIT_FAILURE); + if(disorder_play(getclient(), *argv++, &id)) exit(EXIT_FAILURE); } static void cf_remove(char **argv) { @@ -153,7 +183,8 @@ static void cf_shutdown(char attribute((unused)) **argv) { static void cf_reconfigure(char attribute((unused)) **argv) { /* Re-check configuration for server */ - if(config_read(1)) fatal(0, "cannot read configuration"); + if(config_read(1, NULL)) + disorder_fatal(0, "cannot read configuration"); if(disorder_reconfigure(getclient())) exit(EXIT_FAILURE); } @@ -163,13 +194,12 @@ static void cf_rescan(char attribute((unused)) **argv) { static void cf_somequeue(int (*fn)(disorder_client *c, struct queue_entry **qp)) { - struct queue_entry *q; + struct queue_entry *q, *qbase; - if(fn(getclient(), &q)) exit(EXIT_FAILURE); - while(q) { + if(fn(getclient(), &qbase)) exit(EXIT_FAILURE); + for(q = qbase; q; q = q->next) print_queue_entry(q); - q = q->next; - } + queue_free(qbase, 1); } static void cf_recent(char attribute((unused)) **argv) { @@ -180,32 +210,56 @@ static void cf_queue(char attribute((unused)) **argv) { cf_somequeue(disorder_queue); } +#if _WIN32 +# define nl_langinfo(whatever) "ascii" /* hack */ +#endif + static void cf_quack(char attribute((unused)) **argv) { - xprintf("\n" - " .------------------.\n" - " | Naath is a babe! |\n" - " `---------+--------'\n" - " \\\n" - " >0\n" - " (<)'\n" - "~~~~~~~~~~~~~~~~~~~~~~\n" - "\n"); + if(!strcasecmp(nl_langinfo(CODESET), "utf-8")) { +#define TL "\xE2\x95\xAD" +#define TR "\xE2\x95\xAE" +#define BR "\xE2\x95\xAF" +#define BL "\xE2\x95\xB0" +#define H "\xE2\x94\x80" +#define V "\xE2\x94\x82" +#define T "\xE2\x94\xAC" + xprintf("\n" + " "TL H H H H H H H H H H H H H H H H H H TR"\n" + " "V" Naath is a babe! "V"\n" + " "BL H H H H H H H H H T H H H H H H H H BR"\n" + " \\\n" + " >0\n" + " (<)'\n" + "~~~~~~~~~~~~~~~~~~~~~~\n" + "\n"); + } else { + xprintf("\n" + " .------------------.\n" + " | Naath is a babe! |\n" + " `---------+--------'\n" + " \\\n" + " >0\n" + " (<)'\n" + "~~~~~~~~~~~~~~~~~~~~~~\n" + "\n"); + } } static void cf_somelist(char **argv, int (*fn)(disorder_client *c, const char *arg, const char *re, char ***vecp, int *nvecp)) { - char **vec; + char **vec, **base; const char *re; if(argv[1]) re = xstrdup(argv[1] + 1); else re = 0; - if(fn(getclient(), argv[0], re, &vec, 0)) exit(EXIT_FAILURE); - while(*vec) - xprintf("%s\n", nullcheck(utf82mb(*vec++))); + if(fn(getclient(), argv[0], re, &base, 0)) exit(EXIT_FAILURE); + for(vec = base; *vec; ++vec) + xprintf("%s\n", nullcheck(utf82mb_f(*vec))); + xfree(base); } static int isarg_regexp(const char *s) { @@ -213,7 +267,7 @@ static int isarg_regexp(const char *s) { } static void cf_dirs(char **argv) { - cf_somelist(argv, disorder_directories); + cf_somelist(argv, disorder_dirs); } static void cf_files(char **argv) { @@ -228,7 +282,7 @@ static void cf_get(char **argv) { char *value; if(disorder_get(getclient(), argv[0], argv[1], &value)) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(value))); + xprintf("%s\n", nullcheck(utf82mb_f(value))); } static void cf_length(char **argv) { @@ -247,12 +301,13 @@ static void cf_unset(char **argv) { } static void cf_prefs(char **argv) { - struct kvp *k; + struct kvp *k, *base; - if(disorder_prefs(getclient(), argv[0], &k)) exit(EXIT_FAILURE); - for(; k; k = k->next) + if(disorder_prefs(getclient(), argv[0], &base)) exit(EXIT_FAILURE); + for(k = base; k; k = k->next) xprintf("%s = %s\n", nullcheck(utf82mb(k->name)), nullcheck(utf82mb(k->value))); + kvp_free(base); } static void cf_search(char **argv) { @@ -262,6 +317,7 @@ static void cf_search(char **argv) { if(disorder_search(getclient(), *argv, &results, &nresults)) exit(EXIT_FAILURE); for(n = 0; n < nresults; ++n) xprintf("%s\n", nullcheck(utf82mb(results[n]))); + free_strings(nresults, results); } static void cf_random_disable(char attribute((unused)) **argv) { @@ -274,17 +330,20 @@ static void cf_random_enable(char attribute((unused)) **argv) { static void cf_stats(char attribute((unused)) **argv) { char **vec; + int nvec; + int n; - if(disorder_stats(getclient(), &vec, 0)) exit(EXIT_FAILURE); - while(*vec) - xprintf("%s\n", nullcheck(utf82mb(*vec++))); + if(disorder_stats(getclient(), &vec, &nvec)) exit(EXIT_FAILURE); + for(n = 0; n < nvec; ++n) + xprintf("%s\n", nullcheck(utf82mb(vec[n]))); + free_strings(nvec, vec); } static void cf_get_volume(char attribute((unused)) **argv) { - int l, r; + long l, r; if(disorder_get_volume(getclient(), &l, &r)) exit(EXIT_FAILURE); - xprintf("%d %d\n", l, r); + xprintf("%ld %ld\n", l, r); } static void cf_set_volume(char **argv) { @@ -300,32 +359,34 @@ static void cf_move(char **argv) { int e; if((e = xstrtol(&n, argv[1], 0, 10))) - fatal(e, "cannot convert '%s'", argv[1]); + disorder_fatal(e, "cannot convert '%s'", argv[1]); if(n > INT_MAX || n < INT_MIN) - fatal(e, "%ld out of range", n); + disorder_fatal(e, "%ld out of range", n); if(disorder_move(getclient(), argv[0], (int)n)) exit(EXIT_FAILURE); } static void cf_part(char **argv) { char *s; - if(disorder_part(getclient(), &s, argv[0], argv[1], argv[2])) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(s))); + if(disorder_part(getclient(), argv[0], argv[1], argv[2], &s)) exit(EXIT_FAILURE); + xprintf("%s\n", nullcheck(utf82mb_f(s))); } static int isarg_filename(const char *s) { return s[0] == '/'; } +#if !_WIN32 static void cf_authorize(char **argv) { authorize(getclient(), argv[0], argv[1]); } +#endif static void cf_resolve(char **argv) { char *track; - if(disorder_resolve(getclient(), &track, argv[0])) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(track))); + if(disorder_resolve(getclient(), argv[0], &track)) exit(EXIT_FAILURE); + xprintf("%s\n", nullcheck(utf82mb_f(track))); } static void cf_pause(char attribute((unused)) **argv) { @@ -356,7 +417,7 @@ static void cf_get_global(char **argv) { char *value; if(disorder_get_global(getclient(), argv[0], &value)) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(value))); + xprintf("%s\n", nullcheck(utf82mb_f(value))); } static void cf_set_global(char **argv) { @@ -380,7 +441,7 @@ static int isarg_integer(const char *s) { static void cf_new(char **argv) { char **vec; - if(disorder_new_tracks(getclient(), &vec, 0, argv[0] ? atoi(argv[0]) : 0)) + if(disorder_new_tracks(getclient(), argv[0] ? atol(argv[0]) : 0, &vec, 0)) exit(EXIT_FAILURE); while(*vec) xprintf("%s\n", nullcheck(utf82mb(*vec++))); @@ -417,7 +478,7 @@ static void cf_userinfo(char **argv) { if(disorder_userinfo(getclient(), argv[0], argv[1], &s)) exit(EXIT_FAILURE); - xprintf("%s\n", nullcheck(utf82mb(s))); + xprintf("%s\n", nullcheck(utf82mb_f(s))); } static int isarg_option(const char *arg) { @@ -459,19 +520,25 @@ static void cf_setup_guest(char **argv) { case 'h': help_setup_guest(); case 'r': online_registration = 1; break; case 'R': online_registration = 0; break; - default: fatal(0, "invalid option"); + default: disorder_fatal(0, "invalid option"); } } if(online_registration && !config->mail_sender) - fatal(0, "you MUST set mail_sender if you want online registration"); + disorder_fatal(0, "you MUST set mail_sender if you want online registration"); if(disorder_adduser(getclient(), "guest", "", online_registration ? "read,register" : "read")) exit(EXIT_FAILURE); } +/** @brief A scheduled event read from the server */ struct scheduled_event { + /** @brief When event should occur */ time_t when; + + /** @brief Details of action */ struct kvp *actiondata; + + /** @brief Event ID */ char *id; }; @@ -545,47 +612,129 @@ static void cf_schedule_del(char **argv) { } static void cf_schedule_play(char **argv) { - if(disorder_schedule_add(getclient(), - dateparse(argv[0]), - argv[1], - "play", - argv[2])) + if(disorder_schedule_add_play(getclient(), + dateparse(argv[0]), + argv[1], + argv[2])) exit(EXIT_FAILURE); } static void cf_schedule_set_global(char **argv) { - if(disorder_schedule_add(getclient(), - dateparse(argv[0]), - argv[1], - "set-global", - argv[2], - argv[3])) + if(disorder_schedule_add_set_global(getclient(), + dateparse(argv[0]), + argv[1], + argv[2], + argv[3])) exit(EXIT_FAILURE); } static void cf_schedule_unset_global(char **argv) { - if(disorder_schedule_add(getclient(), - dateparse(argv[0]), - argv[1], - "set-global", - argv[2], - (char *)0)) + if(disorder_schedule_add_unset_global(getclient(), + dateparse(argv[0]), + argv[1], + argv[2])) + exit(EXIT_FAILURE); +} + +static void cf_adopt(char **argv) { + if(disorder_adopt(getclient(), argv[0])) exit(EXIT_FAILURE); } -static const struct command { +static void cf_playlists(char attribute((unused)) **argv) { + char **vec; + int nvec; + int n; + + if(disorder_playlists(getclient(), &vec, &nvec)) + exit(EXIT_FAILURE); + for(n = 0; n < nvec; ++n) + xprintf("%s\n", nullcheck(utf82mb(vec[n]))); + free_strings(nvec, vec); +} + +static void cf_playlist_del(char **argv) { + if(disorder_playlist_delete(getclient(), argv[0])) + exit(EXIT_FAILURE); +} + +static void cf_playlist_get(char **argv) { + char **vec; + int nvec; + int n; + + if(disorder_playlist_get(getclient(), argv[0], &vec, &nvec)) + exit(EXIT_FAILURE); + for(n = 0; n < nvec; ++n) + xprintf("%s\n", nullcheck(utf82mb(vec[n]))); + free_strings(nvec, vec); +} + +static void cf_playlist_set(char **argv) { + struct vector v[1]; + FILE *input; + const char *tag; + char *l; + + if(argv[1]) { + // Read track list from file + if(!(input = fopen(argv[1], "r"))) + disorder_fatal(errno, "opening %s", argv[1]); + tag = argv[1]; + } else { + // Read track list from standard input + input = stdin; + tag = "stdin"; + } + vector_init(v); + while(!inputline(tag, input, &l, '\n')) { + if(!strcmp(l, ".")) + break; + vector_append(v, l); + } + if(ferror(input)) + disorder_fatal(errno, "reading %s", tag); + if(input != stdin) + fclose(input); + if(disorder_playlist_lock(getclient(), argv[0]) + || disorder_playlist_set(getclient(), argv[0], v->vec, v->nvec) + || disorder_playlist_unlock(getclient())) + exit(EXIT_FAILURE); +} + +/** @brief Command-line client's definition of a command */ +static const struct client_command { + /** @brief Command name */ const char *name; - int min, max; + + /** @brief Minimum number of argument */ + int min; + + /** @brief Maximum number of argument */ + int max; + + /** @brief Pointer to function implementing command */ void (*fn)(char **); + + /** @brief Function to recognize a valid argument, or NULL */ int (*isarg)(const char *); - const char *argstr, *desc; + + /** @brief Summary of arguments */ + const char *argstr; + + /** @brief Description */ + const char *desc; } commands[] = { { "adduser", 2, 3, cf_adduser, isarg_rights, "USERNAME PASSWORD [RIGHTS]", "Create a new user" }, + { "adopt", 1, 1, cf_adopt, 0, "ID", + "Adopt a randomly picked track" }, { "allfiles", 1, 2, cf_allfiles, isarg_regexp, "DIR [~REGEXP]", "List all files and directories in DIR" }, +#if !_WIN32 { "authorize", 1, 2, cf_authorize, isarg_rights, "USERNAME [RIGHTS]", "Authorize user USERNAME to connect" }, +#endif { "deluser", 1, 1, cf_deluser, 0, "USERNAME", "Delete user USERNAME" }, { "dirs", 1, 2, cf_dirs, isarg_regexp, "DIR [~REGEXP]", @@ -624,6 +773,14 @@ static const struct command { "Add TRACKS to the end of the queue" }, { "playing", 0, 0, cf_playing, 0, "", "Report the playing track" }, + { "playlist-del", 1, 1, cf_playlist_del, 0, "PLAYLIST", + "Delete a playlist" }, + { "playlist-get", 1, 1, cf_playlist_get, 0, "PLAYLIST", + "Get the contents of a playlist" }, + { "playlist-set", 1, 2, cf_playlist_set, isarg_filename, "PLAYLIST [PATH]", + "Set the contents of a playlist" }, + { "playlists", 0, 0, cf_playlists, 0, "", + "List playlists" }, { "prefs", 1, 1, cf_prefs, 0, "TRACK", "Display all the preferences for TRACK" }, { "quack", 0, 0, cf_quack, 0, 0, 0 }, @@ -723,11 +880,14 @@ int main(int argc, char **argv) { const char *user = 0, *password = 0; mem_init(); + network_init(); +#if HAVE_PCRE_H /* garbage-collect PCRE's memory */ pcre_malloc = xmalloc; pcre_free = xfree; - if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale"); - if(!setlocale(LC_TIME, "")) fatal(errno, "error calling setlocale"); +#endif + if(!setlocale(LC_CTYPE, "")) disorder_fatal(errno, "error calling setlocale"); + if(!setlocale(LC_TIME, "")) disorder_fatal(errno, "error calling setlocale"); while((n = getopt_long(argc, argv, "+hVc:dHlNu:p:", options, 0)) >= 0) { switch(n) { case 'h': help(); @@ -739,30 +899,40 @@ int main(int argc, char **argv) { case 'N': config_per_user = 0; break; case 'u': user = optarg; break; case 'p': password = optarg; break; - default: fatal(0, "invalid option"); + default: disorder_fatal(0, "invalid option"); } } - if(config_read(0)) fatal(0, "cannot read configuration"); + if(config_read(0, NULL)) disorder_fatal(0, "cannot read configuration"); if(user) { - config->username = user; + xfree(config->username); + config->username = xstrdup(user); config->password = 0; } - if(password) - config->password = password; + if(password) { + xfree(config->password); + config->password = xstrdup(password); + } if(local) - config->connect.n = 0; + config->connect.af = -1; n = optind; optind = 1; /* for subsequent getopt calls */ +#if HAVE_GCRYPT_H + /* gcrypt initialization */ + if(!gcry_check_version(NULL)) + disorder_fatal(0, "gcry_check_version failed"); + gcry_control(GCRYCTL_INIT_SECMEM, 0); + gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0); +#endif /* accumulate command args */ while(n < argc) { - if((i = TABLE_FIND(commands, struct command, name, argv[n])) < 0) - fatal(0, "unknown command '%s'", argv[n]); + if((i = TABLE_FIND(commands, name, argv[n])) < 0) + disorder_fatal(0, "unknown command '%s'", argv[n]); if(n + commands[i].min >= argc) - fatal(0, "missing arguments to '%s'", argv[n]); + disorder_fatal(0, "missing arguments to '%s'", argv[n]); vector_init(&args); /* Include the command name in the args, but at element -1, for * the benefit of subcommand getopt calls */ - vector_append(&args, argv[n]); + vector_append(&args, xstrdup(argv[n])); n++; for(j = 0; j < commands[i].min; ++j) vector_append(&args, nullcheck(mb2utf8(argv[n + j]))); @@ -772,10 +942,13 @@ int main(int argc, char **argv) { vector_append(&args, nullcheck(mb2utf8(argv[n + j]))); vector_terminate(&args); commands[i].fn(args.vec + 1); + vector_clear(&args); n += j; } if(client && disorder_close(client)) exit(EXIT_FAILURE); - if(fclose(stdout) < 0) fatal(errno, "error closing stdout"); + if(fclose(stdout) < 0) disorder_fatal(errno, "error closing stdout"); + config_free(config); + xfree(client); return status; }