Commit | Line | Data |
---|---|---|
460b9539 | 1 | /* |
2 | * This file is part of DisOrder. | |
f74f4f32 | 3 | * Copyright (C) 2004-2009 Richard Kettlewell |
460b9539 | 4 | * |
e7eb3a27 | 5 | * This program is free software: you can redistribute it and/or modify |
460b9539 | 6 | * it under the terms of the GNU General Public License as published by |
e7eb3a27 | 7 | * the Free Software Foundation, either version 3 of the License, or |
460b9539 | 8 | * (at your option) any later version. |
e7eb3a27 RK |
9 | * |
10 | * This program is distributed in the hope that it will be useful, | |
11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 | * GNU General Public License for more details. | |
14 | * | |
460b9539 | 15 | * You should have received a copy of the GNU General Public License |
e7eb3a27 | 16 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
460b9539 | 17 | */ |
c4e2cfdd RK |
18 | /** @file lib/client.c |
19 | * @brief Simple C client | |
20 | * | |
158d0961 | 21 | * See @ref lib/eclient.c for an asynchronous-capable client |
c4e2cfdd RK |
22 | * implementation. |
23 | */ | |
460b9539 | 24 | |
05b75f8d | 25 | #include "common.h" |
460b9539 | 26 | |
27 | #include <sys/types.h> | |
28 | #include <sys/socket.h> | |
29 | #include <netinet/in.h> | |
30 | #include <sys/un.h> | |
460b9539 | 31 | #include <unistd.h> |
32 | #include <errno.h> | |
33 | #include <netdb.h> | |
f0feb22e | 34 | #include <pcre.h> |
460b9539 | 35 | |
36 | #include "log.h" | |
37 | #include "mem.h" | |
460b9539 | 38 | #include "queue.h" |
39 | #include "client.h" | |
40 | #include "charset.h" | |
41 | #include "hex.h" | |
42 | #include "split.h" | |
43 | #include "vector.h" | |
44 | #include "inputline.h" | |
45 | #include "kvp.h" | |
46 | #include "syscalls.h" | |
47 | #include "printf.h" | |
48 | #include "sink.h" | |
49 | #include "addr.h" | |
50 | #include "authhash.h" | |
51 | #include "client-common.h" | |
5df73aeb | 52 | #include "rights.h" |
f0feb22e | 53 | #include "trackdb.h" |
758aa6c3 | 54 | #include "kvp.h" |
460b9539 | 55 | |
0590cedc | 56 | /** @brief Client handle contents */ |
460b9539 | 57 | struct disorder_client { |
0590cedc RK |
58 | /** @brief Stream to read from */ |
59 | FILE *fpin; | |
60 | /** @brief Stream to write to */ | |
61 | FILE *fpout; | |
62 | /** @brief Peer description */ | |
460b9539 | 63 | char *ident; |
0590cedc | 64 | /** @brief Username */ |
460b9539 | 65 | char *user; |
0590cedc | 66 | /** @brief Report errors to @c stderr */ |
460b9539 | 67 | int verbose; |
0590cedc | 68 | /** @brief Last error string */ |
e9e8a16d | 69 | const char *last; |
460b9539 | 70 | }; |
71 | ||
c4e2cfdd RK |
72 | /** @brief Create a new client |
73 | * @param verbose If nonzero, write extra junk to stderr | |
74 | * @return Pointer to new client | |
75 | * | |
fdf98378 | 76 | * You must call disorder_connect(), disorder_connect_user() or |
77 | * disorder_connect_cookie() to connect it. Use disorder_close() to | |
78 | * dispose of the client when finished with it. | |
c4e2cfdd | 79 | */ |
460b9539 | 80 | disorder_client *disorder_new(int verbose) { |
81 | disorder_client *c = xmalloc(sizeof (struct disorder_client)); | |
82 | ||
83 | c->verbose = verbose; | |
84 | return c; | |
85 | } | |
86 | ||
c4e2cfdd RK |
87 | /** @brief Read a response line |
88 | * @param c Client | |
89 | * @param rp Where to store response, or NULL (UTF-8) | |
90 | * @return Response code 0-999 or -1 on error | |
91 | */ | |
460b9539 | 92 | static int response(disorder_client *c, char **rp) { |
93 | char *r; | |
94 | ||
e9e8a16d RK |
95 | if(inputline(c->ident, c->fpin, &r, '\n')) { |
96 | byte_xasprintf((char **)&c->last, "input error: %s", strerror(errno)); | |
460b9539 | 97 | return -1; |
e9e8a16d | 98 | } |
460b9539 | 99 | D(("response: %s", r)); |
100 | if(rp) | |
101 | *rp = r; | |
102 | if(r[0] >= '0' && r[0] <= '9' | |
103 | && r[1] >= '0' && r[1] <= '9' | |
104 | && r[2] >= '0' && r[2] <= '9' | |
bb037be2 | 105 | && r[3] == ' ') { |
106 | c->last = r + 4; | |
460b9539 | 107 | return (r[0] * 10 + r[1]) * 10 + r[2] - 111 * '0'; |
bb037be2 | 108 | } else { |
e9e8a16d | 109 | c->last = "invalid reply format"; |
2e9ba080 | 110 | disorder_error(0, "invalid reply format from %s", c->ident); |
460b9539 | 111 | return -1; |
112 | } | |
113 | } | |
114 | ||
bb037be2 | 115 | /** @brief Return last response string |
116 | * @param c Client | |
117 | * @return Last response string (UTF-8, English) or NULL | |
118 | */ | |
119 | const char *disorder_last(disorder_client *c) { | |
120 | return c->last; | |
121 | } | |
122 | ||
c4e2cfdd RK |
123 | /** @brief Read and partially parse a response |
124 | * @param c Client | |
125 | * @param rp Where to store response text (or NULL) (UTF-8) | |
126 | * @return 0 on success, non-0 on error | |
127 | * | |
128 | * 5xx responses count as errors. | |
129 | * | |
130 | * @p rp will NOT be filled in for xx9 responses (where it is just | |
131 | * commentary for a command where it would normally be meaningful). | |
132 | * | |
133 | * NB that the response will NOT be converted to the local encoding. | |
460b9539 | 134 | */ |
135 | static int check_response(disorder_client *c, char **rp) { | |
136 | int rc; | |
137 | char *r; | |
138 | ||
139 | if((rc = response(c, &r)) == -1) | |
140 | return -1; | |
141 | else if(rc / 100 == 2) { | |
142 | if(rp) | |
143 | *rp = (rc % 10 == 9) ? 0 : xstrdup(r + 4); | |
f74f4f32 | 144 | xfree(r); |
460b9539 | 145 | return 0; |
146 | } else { | |
147 | if(c->verbose) | |
2e9ba080 | 148 | disorder_error(0, "from %s: %s", c->ident, utf82mb(r)); |
f74f4f32 | 149 | xfree(r); |
2bead829 | 150 | return rc; |
460b9539 | 151 | } |
152 | } | |
153 | ||
c4e2cfdd RK |
154 | /** @brief Issue a command and parse a simple response |
155 | * @param c Client | |
156 | * @param rp Where to store result, or NULL | |
157 | * @param cmd Command | |
39c53343 RK |
158 | * @param body Body or NULL |
159 | * @param nbody Length of body or -1 | |
c4e2cfdd RK |
160 | * @param ap Arguments (UTF-8), terminated by (char *)0 |
161 | * @return 0 on success, non-0 on error | |
162 | * | |
163 | * 5xx responses count as errors. | |
164 | * | |
165 | * @p rp will NOT be filled in for xx9 responses (where it is just | |
166 | * commentary for a command where it would normally be meaningful). | |
167 | * | |
168 | * NB that the response will NOT be converted to the local encoding | |
169 | * nor will quotes be stripped. See dequote(). | |
39c53343 RK |
170 | * |
171 | * If @p body is not NULL then the body is sent immediately after the | |
172 | * command. @p nbody should be the number of lines or @c -1 to count | |
173 | * them if @p body is NULL-terminated. | |
174 | * | |
175 | * Usually you would call this via one of the following interfaces: | |
176 | * - disorder_simple() | |
177 | * - disorder_simple_body() | |
178 | * - disorder_simple_list() | |
c4e2cfdd | 179 | */ |
460b9539 | 180 | static int disorder_simple_v(disorder_client *c, |
181 | char **rp, | |
39c53343 RK |
182 | const char *cmd, |
183 | char **body, int nbody, | |
184 | va_list ap) { | |
460b9539 | 185 | const char *arg; |
186 | struct dynstr d; | |
187 | ||
62ef2216 | 188 | if(!c->fpout) { |
e9e8a16d | 189 | c->last = "not connected"; |
2e9ba080 | 190 | disorder_error(0, "not connected to server"); |
62ef2216 | 191 | return -1; |
192 | } | |
460b9539 | 193 | if(cmd) { |
194 | dynstr_init(&d); | |
195 | dynstr_append_string(&d, cmd); | |
196 | while((arg = va_arg(ap, const char *))) { | |
197 | dynstr_append(&d, ' '); | |
198 | dynstr_append_string(&d, quoteutf8(arg)); | |
199 | } | |
200 | dynstr_append(&d, '\n'); | |
201 | dynstr_terminate(&d); | |
202 | D(("command: %s", d.vec)); | |
39c53343 RK |
203 | if(fputs(d.vec, c->fpout) < 0) |
204 | goto write_error; | |
f74f4f32 | 205 | xfree(d.vec); |
39c53343 RK |
206 | if(body) { |
207 | if(nbody < 0) | |
208 | for(nbody = 0; body[nbody]; ++nbody) | |
209 | ; | |
210 | for(int n = 0; n < nbody; ++n) { | |
211 | if(body[n][0] == '.') | |
212 | if(fputc('.', c->fpout) < 0) | |
213 | goto write_error; | |
214 | if(fputs(body[n], c->fpout) < 0) | |
215 | goto write_error; | |
216 | if(fputc('\n', c->fpout) < 0) | |
217 | goto write_error; | |
218 | } | |
219 | if(fputs(".\n", c->fpout) < 0) | |
220 | goto write_error; | |
460b9539 | 221 | } |
39c53343 RK |
222 | if(fflush(c->fpout)) |
223 | goto write_error; | |
460b9539 | 224 | } |
225 | return check_response(c, rp); | |
39c53343 RK |
226 | write_error: |
227 | byte_xasprintf((char **)&c->last, "write error: %s", strerror(errno)); | |
2e9ba080 | 228 | disorder_error(errno, "error writing to %s", c->ident); |
39c53343 | 229 | return -1; |
460b9539 | 230 | } |
231 | ||
c4e2cfdd RK |
232 | /** @brief Issue a command and parse a simple response |
233 | * @param c Client | |
234 | * @param rp Where to store result, or NULL (UTF-8) | |
235 | * @param cmd Command | |
236 | * @return 0 on success, non-0 on error | |
237 | * | |
238 | * The remaining arguments are command arguments, terminated by (char | |
239 | * *)0. They should be in UTF-8. | |
240 | * | |
241 | * 5xx responses count as errors. | |
242 | * | |
243 | * @p rp will NOT be filled in for xx9 responses (where it is just | |
244 | * commentary for a command where it would normally be meaningful). | |
245 | * | |
246 | * NB that the response will NOT be converted to the local encoding | |
247 | * nor will quotes be stripped. See dequote(). | |
460b9539 | 248 | */ |
249 | static int disorder_simple(disorder_client *c, | |
250 | char **rp, | |
251 | const char *cmd, ...) { | |
252 | va_list ap; | |
253 | int ret; | |
254 | ||
255 | va_start(ap, cmd); | |
39c53343 RK |
256 | ret = disorder_simple_v(c, rp, cmd, 0, 0, ap); |
257 | va_end(ap); | |
258 | return ret; | |
259 | } | |
260 | ||
261 | /** @brief Issue a command with a body and parse a simple response | |
262 | * @param c Client | |
263 | * @param rp Where to store result, or NULL (UTF-8) | |
264 | * @param body Pointer to body | |
265 | * @param nbody Size of body | |
266 | * @param cmd Command | |
267 | * @return 0 on success, non-0 on error | |
268 | * | |
269 | * See disorder_simple(). | |
270 | */ | |
271 | static int disorder_simple_body(disorder_client *c, | |
272 | char **rp, | |
273 | char **body, int nbody, | |
274 | const char *cmd, ...) { | |
275 | va_list ap; | |
276 | int ret; | |
277 | ||
278 | va_start(ap, cmd); | |
279 | ret = disorder_simple_v(c, rp, cmd, body, nbody, ap); | |
460b9539 | 280 | va_end(ap); |
281 | return ret; | |
282 | } | |
283 | ||
0227f67d RK |
284 | /** @brief Dequote a result string |
285 | * @param rc 0 on success, non-0 on error | |
286 | * @param rp Where result string is stored (UTF-8) | |
287 | * @return @p rc | |
288 | * | |
289 | * This is used as a wrapper around disorder_simple() to dequote | |
290 | * results in place. | |
291 | */ | |
292 | static int dequote(int rc, char **rp) { | |
293 | char **rr; | |
2bead829 | 294 | |
0227f67d RK |
295 | if(!rc) { |
296 | if((rr = split(*rp, 0, SPLIT_QUOTES, 0, 0)) && *rr) { | |
f74f4f32 | 297 | xfree(*rp); |
0227f67d | 298 | *rp = *rr; |
f74f4f32 | 299 | xfree(rr); |
0227f67d RK |
300 | return 0; |
301 | } | |
2e9ba080 | 302 | disorder_error(0, "invalid reply: %s", *rp); |
460b9539 | 303 | } |
2bead829 | 304 | return rc; |
460b9539 | 305 | } |
306 | ||
0227f67d | 307 | /** @brief Generic connection routine |
319d7107 | 308 | * @param conf Configuration to follow |
c4e2cfdd | 309 | * @param c Client |
0227f67d RK |
310 | * @param username Username to log in with or NULL |
311 | * @param password Password to log in with or NULL | |
312 | * @param cookie Cookie to log in with or NULL | |
c4e2cfdd RK |
313 | * @return 0 on success, non-0 on error |
314 | * | |
0227f67d RK |
315 | * @p cookie is tried first if not NULL. If it is NULL then @p |
316 | * username must not be. If @p username is not NULL then nor may @p | |
317 | * password be. | |
c4e2cfdd | 318 | */ |
319d7107 RK |
319 | int disorder_connect_generic(struct config *conf, |
320 | disorder_client *c, | |
321 | const char *username, | |
322 | const char *password, | |
323 | const char *cookie) { | |
f74f4f32 RK |
324 | int fd = -1, fd2 = -1, nrvec = 0, rc; |
325 | unsigned char *nonce = NULL; | |
460b9539 | 326 | size_t nl; |
f74f4f32 RK |
327 | char *res = NULL; |
328 | char *r = NULL, **rvec = NULL; | |
7b32e917 | 329 | const char *protocol, *algorithm, *challenge; |
f74f4f32 | 330 | struct sockaddr *sa = NULL; |
0227f67d | 331 | socklen_t salen; |
460b9539 | 332 | |
319d7107 | 333 | if((salen = find_server(conf, &sa, &c->ident)) == (socklen_t)-1) |
460b9539 | 334 | return -1; |
460b9539 | 335 | c->fpin = c->fpout = 0; |
336 | if((fd = socket(sa->sa_family, SOCK_STREAM, 0)) < 0) { | |
e9e8a16d | 337 | byte_xasprintf((char **)&c->last, "socket: %s", strerror(errno)); |
2e9ba080 | 338 | disorder_error(errno, "error calling socket"); |
460b9539 | 339 | return -1; |
340 | } | |
0227f67d | 341 | if(connect(fd, sa, salen) < 0) { |
e9e8a16d | 342 | byte_xasprintf((char **)&c->last, "connect: %s", strerror(errno)); |
2e9ba080 | 343 | disorder_error(errno, "error calling connect"); |
460b9539 | 344 | goto error; |
345 | } | |
346 | if((fd2 = dup(fd)) < 0) { | |
e9e8a16d | 347 | byte_xasprintf((char **)&c->last, "dup: %s", strerror(errno)); |
2e9ba080 | 348 | disorder_error(errno, "error calling dup"); |
460b9539 | 349 | goto error; |
350 | } | |
351 | if(!(c->fpin = fdopen(fd, "rb"))) { | |
e9e8a16d | 352 | byte_xasprintf((char **)&c->last, "fdopen: %s", strerror(errno)); |
2e9ba080 | 353 | disorder_error(errno, "error calling fdopen"); |
460b9539 | 354 | goto error; |
355 | } | |
356 | fd = -1; | |
357 | if(!(c->fpout = fdopen(fd2, "wb"))) { | |
e9e8a16d | 358 | byte_xasprintf((char **)&c->last, "fdopen: %s", strerror(errno)); |
2e9ba080 | 359 | disorder_error(errno, "error calling fdopen"); |
460b9539 | 360 | goto error; |
361 | } | |
362 | fd2 = -1; | |
2bead829 | 363 | if((rc = disorder_simple(c, &r, 0, (const char *)0))) |
364 | goto error_rc; | |
637fdea3 | 365 | if(!(rvec = split(r, &nrvec, SPLIT_QUOTES, 0, 0))) |
2bead829 | 366 | goto error; |
7b32e917 | 367 | if(nrvec != 3) { |
e9e8a16d | 368 | c->last = "cannot parse server greeting"; |
2e9ba080 | 369 | disorder_error(0, "cannot parse server greeting %s", r); |
2bead829 | 370 | goto error; |
637fdea3 | 371 | } |
f74f4f32 | 372 | protocol = rvec[0]; |
7b32e917 | 373 | if(strcmp(protocol, "2")) { |
e9e8a16d | 374 | c->last = "unknown protocol version"; |
2e9ba080 | 375 | disorder_error(0, "unknown protocol version: %s", protocol); |
2bead829 | 376 | goto error; |
7b32e917 | 377 | } |
f74f4f32 RK |
378 | algorithm = rvec[1]; |
379 | challenge = rvec[2]; | |
7b32e917 | 380 | if(!(nonce = unhex(challenge, &nl))) |
2bead829 | 381 | goto error; |
0227f67d RK |
382 | if(cookie) { |
383 | if(!dequote(disorder_simple(c, &c->user, "cookie", cookie, (char *)0), | |
384 | &c->user)) | |
385 | return 0; /* success */ | |
386 | if(!username) { | |
e9e8a16d | 387 | c->last = "cookie failed and no username"; |
2e9ba080 | 388 | disorder_error(0, "cookie did not work and no username available"); |
2bead829 | 389 | goto error; |
0227f67d RK |
390 | } |
391 | } | |
e9e8a16d RK |
392 | if(!(res = authhash(nonce, nl, password, algorithm))) { |
393 | c->last = "error computing authorization hash"; | |
394 | goto error; | |
395 | } | |
2bead829 | 396 | if((rc = disorder_simple(c, 0, "user", username, res, (char *)0))) |
397 | goto error_rc; | |
460b9539 | 398 | c->user = xstrdup(username); |
f74f4f32 RK |
399 | xfree(res); |
400 | free_strings(nrvec, rvec); | |
401 | xfree(nonce); | |
402 | xfree(sa); | |
403 | xfree(r); | |
460b9539 | 404 | return 0; |
405 | error: | |
2bead829 | 406 | rc = -1; |
407 | error_rc: | |
408 | if(c->fpin) { | |
409 | fclose(c->fpin); | |
410 | c->fpin = 0; | |
411 | } | |
412 | if(c->fpout) { | |
413 | fclose(c->fpout); | |
414 | c->fpout = 0; | |
415 | } | |
460b9539 | 416 | if(fd2 != -1) close(fd2); |
417 | if(fd != -1) close(fd); | |
2bead829 | 418 | return rc; |
460b9539 | 419 | } |
420 | ||
fdf98378 | 421 | /** @brief Connect a client with a specified username and password |
422 | * @param c Client | |
423 | * @param username Username to log in with | |
424 | * @param password Password to log in with | |
425 | * @return 0 on success, non-0 on error | |
426 | */ | |
427 | int disorder_connect_user(disorder_client *c, | |
428 | const char *username, | |
429 | const char *password) { | |
319d7107 RK |
430 | return disorder_connect_generic(config, |
431 | c, | |
fdf98378 | 432 | username, |
433 | password, | |
434 | 0); | |
435 | } | |
436 | ||
0227f67d RK |
437 | /** @brief Connect a client |
438 | * @param c Client | |
439 | * @return 0 on success, non-0 on error | |
440 | * | |
441 | * The connection will use the username and password found in @ref | |
442 | * config, or directly from the database if no password is found and | |
443 | * the database is readable (usually only for root). | |
444 | */ | |
445 | int disorder_connect(disorder_client *c) { | |
446 | const char *username, *password; | |
447 | ||
448 | if(!(username = config->username)) { | |
e9e8a16d | 449 | c->last = "no username"; |
2e9ba080 | 450 | disorder_error(0, "no username configured"); |
0227f67d RK |
451 | return -1; |
452 | } | |
453 | password = config->password; | |
199c2a23 RK |
454 | /* Maybe we can read the database */ |
455 | if(!password && trackdb_readable()) { | |
0227f67d RK |
456 | trackdb_init(TRACKDB_NO_RECOVER|TRACKDB_NO_UPGRADE); |
457 | trackdb_open(TRACKDB_READ_ONLY); | |
458 | password = trackdb_get_password(username); | |
459 | trackdb_close(); | |
460 | } | |
461 | if(!password) { | |
462 | /* Oh well */ | |
e9e8a16d | 463 | c->last = "no password"; |
2e9ba080 | 464 | disorder_error(0, "no password configured for user '%s'", username); |
0227f67d RK |
465 | return -1; |
466 | } | |
319d7107 RK |
467 | return disorder_connect_generic(config, |
468 | c, | |
0227f67d RK |
469 | username, |
470 | password, | |
471 | 0); | |
472 | } | |
473 | ||
474 | /** @brief Connect a client | |
475 | * @param c Client | |
476 | * @param cookie Cookie to log in with, or NULL | |
477 | * @return 0 on success, non-0 on error | |
478 | * | |
479 | * If @p cookie is NULL or does not work then we attempt to log in as | |
480 | * guest instead (so when the cookie expires only an extra round trip | |
481 | * is needed rathre than a complete new login). | |
482 | */ | |
483 | int disorder_connect_cookie(disorder_client *c, | |
484 | const char *cookie) { | |
319d7107 RK |
485 | return disorder_connect_generic(config, |
486 | c, | |
0227f67d RK |
487 | "guest", |
488 | "", | |
489 | cookie); | |
490 | } | |
491 | ||
c4e2cfdd RK |
492 | /** @brief Close a client |
493 | * @param c Client | |
494 | * @return 0 on succcess, non-0 on errior | |
495 | * | |
496 | * The client is still closed even on error. It might well be | |
497 | * appropriate to ignore the return value. | |
498 | */ | |
460b9539 | 499 | int disorder_close(disorder_client *c) { |
500 | int ret = 0; | |
501 | ||
502 | if(c->fpin) { | |
503 | if(fclose(c->fpin) < 0) { | |
e9e8a16d | 504 | byte_xasprintf((char **)&c->last, "fclose: %s", strerror(errno)); |
2e9ba080 | 505 | disorder_error(errno, "error calling fclose"); |
460b9539 | 506 | ret = -1; |
507 | } | |
508 | c->fpin = 0; | |
509 | } | |
510 | if(c->fpout) { | |
511 | if(fclose(c->fpout) < 0) { | |
e9e8a16d | 512 | byte_xasprintf((char **)&c->last, "fclose: %s", strerror(errno)); |
2e9ba080 | 513 | disorder_error(errno, "error calling fclose"); |
460b9539 | 514 | ret = -1; |
515 | } | |
516 | c->fpout = 0; | |
517 | } | |
f74f4f32 | 518 | xfree(c->ident); |
0227f67d | 519 | c->ident = 0; |
f74f4f32 | 520 | xfree(c->user); |
0227f67d | 521 | c->user = 0; |
375d9478 | 522 | return ret; |
460b9539 | 523 | } |
524 | ||
c4e2cfdd RK |
525 | /** @brief Play a track |
526 | * @param c Client | |
527 | * @param track Track to play (UTF-8) | |
528 | * @return 0 on success, non-0 on error | |
529 | */ | |
460b9539 | 530 | int disorder_play(disorder_client *c, const char *track) { |
531 | return disorder_simple(c, 0, "play", track, (char *)0); | |
532 | } | |
533 | ||
c4e2cfdd RK |
534 | /** @brief Move a track |
535 | * @param c Client | |
536 | * @param track Track to move (UTF-8) | |
537 | * @param delta Distance to move by | |
538 | * @return 0 on success, non-0 on error | |
539 | */ | |
460b9539 | 540 | int disorder_move(disorder_client *c, const char *track, int delta) { |
541 | char d[16]; | |
542 | ||
543 | byte_snprintf(d, sizeof d, "%d", delta); | |
544 | return disorder_simple(c, 0, "move", track, d, (char *)0); | |
545 | } | |
546 | ||
c4e2cfdd RK |
547 | /** @brief Shut down the server |
548 | * @param c Client | |
549 | * @return 0 on success, non-0 on error | |
550 | */ | |
460b9539 | 551 | int disorder_shutdown(disorder_client *c) { |
552 | return disorder_simple(c, 0, "shutdown", (char *)0); | |
553 | } | |
554 | ||
460b9539 | 555 | static void client_error(const char *msg, |
556 | void attribute((unused)) *u) { | |
2e9ba080 | 557 | disorder_error(0, "error parsing reply: %s", msg); |
460b9539 | 558 | } |
559 | ||
c4e2cfdd RK |
560 | /** @brief Get currently playing track |
561 | * @param c Client | |
562 | * @param qp Where to store track information | |
563 | * @return 0 on success, non-0 on error | |
564 | * | |
565 | * @p qp gets NULL if no track is playing. | |
566 | */ | |
460b9539 | 567 | int disorder_playing(disorder_client *c, struct queue_entry **qp) { |
568 | char *r; | |
569 | struct queue_entry *q; | |
2bead829 | 570 | int rc; |
460b9539 | 571 | |
2bead829 | 572 | if((rc = disorder_simple(c, &r, "playing", (char *)0))) |
573 | return rc; | |
460b9539 | 574 | if(r) { |
575 | q = xmalloc(sizeof *q); | |
576 | if(queue_unmarshall(q, r, client_error, 0)) | |
577 | return -1; | |
578 | *qp = q; | |
579 | } else | |
580 | *qp = 0; | |
581 | return 0; | |
582 | } | |
583 | ||
0590cedc | 584 | /** @brief Fetch the queue, recent list, etc */ |
460b9539 | 585 | static int disorder_somequeue(disorder_client *c, |
586 | const char *cmd, struct queue_entry **qp) { | |
587 | struct queue_entry *qh, **qt = &qh, *q; | |
588 | char *l; | |
2bead829 | 589 | int rc; |
460b9539 | 590 | |
2bead829 | 591 | if((rc = disorder_simple(c, 0, cmd, (char *)0))) |
592 | return rc; | |
460b9539 | 593 | while(inputline(c->ident, c->fpin, &l, '\n') >= 0) { |
594 | if(!strcmp(l, ".")) { | |
595 | *qt = 0; | |
596 | *qp = qh; | |
b251ac34 | 597 | xfree(l); |
460b9539 | 598 | return 0; |
599 | } | |
600 | q = xmalloc(sizeof *q); | |
601 | if(!queue_unmarshall(q, l, client_error, 0)) { | |
602 | *qt = q; | |
603 | qt = &q->next; | |
604 | } | |
b251ac34 | 605 | xfree(l); |
460b9539 | 606 | } |
e9e8a16d RK |
607 | if(ferror(c->fpin)) { |
608 | byte_xasprintf((char **)&c->last, "input error: %s", strerror(errno)); | |
2e9ba080 | 609 | disorder_error(errno, "error reading %s", c->ident); |
e9e8a16d RK |
610 | } else { |
611 | c->last = "input error: unexpxected EOF"; | |
2e9ba080 | 612 | disorder_error(0, "error reading %s: unexpected EOF", c->ident); |
e9e8a16d | 613 | } |
460b9539 | 614 | return -1; |
615 | } | |
616 | ||
c4e2cfdd RK |
617 | /** @brief Get recently played tracks |
618 | * @param c Client | |
619 | * @param qp Where to store track information | |
620 | * @return 0 on success, non-0 on error | |
621 | * | |
622 | * The last entry in the list is the most recently played track. | |
623 | */ | |
460b9539 | 624 | int disorder_recent(disorder_client *c, struct queue_entry **qp) { |
625 | return disorder_somequeue(c, "recent", qp); | |
626 | } | |
627 | ||
c4e2cfdd RK |
628 | /** @brief Get queue |
629 | * @param c Client | |
630 | * @param qp Where to store track information | |
631 | * @return 0 on success, non-0 on error | |
632 | * | |
633 | * The first entry in the list will be played next. | |
634 | */ | |
460b9539 | 635 | int disorder_queue(disorder_client *c, struct queue_entry **qp) { |
636 | return disorder_somequeue(c, "queue", qp); | |
637 | } | |
638 | ||
c4e2cfdd RK |
639 | /** @brief Read a dot-stuffed list |
640 | * @param c Client | |
641 | * @param vecp Where to store list (UTF-8) | |
642 | * @param nvecp Where to store number of items, or NULL | |
643 | * @return 0 on success, non-0 on error | |
644 | * | |
645 | * The list will have a final NULL not counted in @p nvecp. | |
646 | */ | |
460b9539 | 647 | static int readlist(disorder_client *c, char ***vecp, int *nvecp) { |
648 | char *l; | |
649 | struct vector v; | |
650 | ||
651 | vector_init(&v); | |
652 | while(inputline(c->ident, c->fpin, &l, '\n') >= 0) { | |
653 | if(!strcmp(l, ".")) { | |
654 | vector_terminate(&v); | |
655 | if(nvecp) | |
656 | *nvecp = v.nvec; | |
657 | *vecp = v.vec; | |
5d2b941b | 658 | xfree(l); |
460b9539 | 659 | return 0; |
660 | } | |
5d2b941b RK |
661 | vector_append(&v, xstrdup(l + (*l == '.'))); |
662 | xfree(l); | |
460b9539 | 663 | } |
e9e8a16d RK |
664 | if(ferror(c->fpin)) { |
665 | byte_xasprintf((char **)&c->last, "input error: %s", strerror(errno)); | |
2e9ba080 | 666 | disorder_error(errno, "error reading %s", c->ident); |
e9e8a16d RK |
667 | } else { |
668 | c->last = "input error: unexpxected EOF"; | |
2e9ba080 | 669 | disorder_error(0, "error reading %s: unexpected EOF", c->ident); |
e9e8a16d | 670 | } |
460b9539 | 671 | return -1; |
672 | } | |
673 | ||
c4e2cfdd RK |
674 | /** @brief Issue a comamnd and get a list response |
675 | * @param c Client | |
676 | * @param vecp Where to store list (UTF-8) | |
677 | * @param nvecp Where to store number of items, or NULL | |
678 | * @param cmd Command | |
679 | * @return 0 on success, non-0 on error | |
680 | * | |
681 | * The remaining arguments are command arguments, terminated by (char | |
682 | * *)0. They should be in UTF-8. | |
683 | * | |
684 | * 5xx responses count as errors. | |
39c53343 RK |
685 | * |
686 | * See disorder_simple(). | |
c4e2cfdd | 687 | */ |
460b9539 | 688 | static int disorder_simple_list(disorder_client *c, |
689 | char ***vecp, int *nvecp, | |
690 | const char *cmd, ...) { | |
691 | va_list ap; | |
692 | int ret; | |
693 | ||
694 | va_start(ap, cmd); | |
39c53343 | 695 | ret = disorder_simple_v(c, 0, cmd, 0, 0, ap); |
460b9539 | 696 | va_end(ap); |
697 | if(ret) return ret; | |
698 | return readlist(c, vecp, nvecp); | |
699 | } | |
700 | ||
c4e2cfdd RK |
701 | /** @brief Return the user we logged in with |
702 | * @param c Client | |
703 | * @return User name (owned by @p c, don't modify) | |
704 | */ | |
460b9539 | 705 | char *disorder_user(disorder_client *c) { |
706 | return c->user; | |
707 | } | |
708 | ||
460b9539 | 709 | static void pref_error_handler(const char *msg, |
710 | void attribute((unused)) *u) { | |
2e9ba080 | 711 | disorder_error(0, "error handling 'prefs' reply: %s", msg); |
460b9539 | 712 | } |
713 | ||
158d0961 | 714 | /** @brief Get all preferences for a trcak |
c4e2cfdd RK |
715 | * @param c Client |
716 | * @param track Track name | |
717 | * @param kp Where to store linked list of preferences | |
718 | * @return 0 on success, non-0 on error | |
719 | */ | |
460b9539 | 720 | int disorder_prefs(disorder_client *c, const char *track, struct kvp **kp) { |
721 | char **vec, **pvec; | |
2bead829 | 722 | int nvec, npvec, n, rc; |
460b9539 | 723 | struct kvp *k; |
724 | ||
2bead829 | 725 | if((rc = disorder_simple_list(c, &vec, &nvec, "prefs", track, (char *)0))) |
726 | return rc; | |
460b9539 | 727 | for(n = 0; n < nvec; ++n) { |
728 | if(!(pvec = split(vec[n], &npvec, SPLIT_QUOTES, pref_error_handler, 0))) | |
729 | return -1; | |
730 | if(npvec != 2) { | |
731 | pref_error_handler("malformed response", 0); | |
732 | return -1; | |
733 | } | |
734 | *kp = k = xmalloc(sizeof *k); | |
735 | k->name = pvec[0]; | |
736 | k->value = pvec[1]; | |
737 | kp = &k->next; | |
0d047a12 | 738 | xfree(pvec); |
460b9539 | 739 | } |
0d047a12 | 740 | free_strings(nvec, vec); |
460b9539 | 741 | *kp = 0; |
742 | return 0; | |
743 | } | |
744 | ||
c4e2cfdd RK |
745 | /** @brief Parse a boolean response |
746 | * @param cmd Command for use in error messsage | |
747 | * @param value Result from server | |
748 | * @param flagp Where to store result | |
749 | * @return 0 on success, non-0 on error | |
750 | */ | |
460b9539 | 751 | static int boolean(const char *cmd, const char *value, |
752 | int *flagp) { | |
753 | if(!strcmp(value, "yes")) *flagp = 1; | |
754 | else if(!strcmp(value, "no")) *flagp = 0; | |
755 | else { | |
2e9ba080 | 756 | disorder_error(0, "malformed response to '%s'", cmd); |
460b9539 | 757 | return -1; |
758 | } | |
759 | return 0; | |
760 | } | |
761 | ||
c4e2cfdd RK |
762 | /** @brief Get the length of a track |
763 | * @param c Client | |
764 | * @param track Track name (UTF-8) | |
765 | * @param valuep Where to store length in seconds | |
766 | * @return 0 on success, non-0 on error | |
767 | * | |
768 | * If the length is unknown 0 is returned. | |
769 | */ | |
460b9539 | 770 | int disorder_length(disorder_client *c, const char *track, |
771 | long *valuep) { | |
772 | char *value; | |
2bead829 | 773 | int rc; |
460b9539 | 774 | |
2bead829 | 775 | if((rc = disorder_simple(c, &value, "length", track, (char *)0))) |
776 | return rc; | |
460b9539 | 777 | *valuep = atol(value); |
778 | return 0; | |
779 | } | |
780 | ||
c4e2cfdd RK |
781 | /** @brief Set volume |
782 | * @param c Client | |
783 | * @param left New left channel value | |
784 | * @param right New right channel value | |
785 | * @return 0 on success, non-0 on error | |
786 | */ | |
460b9539 | 787 | int disorder_set_volume(disorder_client *c, int left, int right) { |
788 | char *ls, *rs; | |
789 | ||
790 | if(byte_asprintf(&ls, "%d", left) < 0 | |
791 | || byte_asprintf(&rs, "%d", right) < 0) | |
792 | return -1; | |
2bead829 | 793 | return disorder_simple(c, 0, "volume", ls, rs, (char *)0); |
460b9539 | 794 | } |
795 | ||
c4e2cfdd RK |
796 | /** @brief Get volume |
797 | * @param c Client | |
798 | * @param left Where to store left channel value | |
799 | * @param right Where to store right channel value | |
800 | * @return 0 on success, non-0 on error | |
801 | */ | |
460b9539 | 802 | int disorder_get_volume(disorder_client *c, int *left, int *right) { |
803 | char *r; | |
2bead829 | 804 | int rc; |
460b9539 | 805 | |
2bead829 | 806 | if((rc = disorder_simple(c, &r, "volume", (char *)0))) |
807 | return rc; | |
460b9539 | 808 | if(sscanf(r, "%d %d", left, right) != 2) { |
e9e8a16d | 809 | c->last = "malformed volume response"; |
2e9ba080 | 810 | disorder_error(0, "error parsing response to 'volume': '%s'", r); |
460b9539 | 811 | return -1; |
812 | } | |
813 | return 0; | |
814 | } | |
815 | ||
c4e2cfdd RK |
816 | /** @brief Log to a sink |
817 | * @param c Client | |
818 | * @param s Sink to write log lines to | |
819 | * @return 0 on success, non-0 on error | |
820 | */ | |
460b9539 | 821 | int disorder_log(disorder_client *c, struct sink *s) { |
822 | char *l; | |
2bead829 | 823 | int rc; |
460b9539 | 824 | |
2bead829 | 825 | if((rc = disorder_simple(c, 0, "log", (char *)0))) |
826 | return rc; | |
460b9539 | 827 | while(inputline(c->ident, c->fpin, &l, '\n') >= 0 && strcmp(l, ".")) |
828 | if(sink_printf(s, "%s\n", l) < 0) return -1; | |
e9e8a16d RK |
829 | if(ferror(c->fpin) || feof(c->fpin)) { |
830 | byte_xasprintf((char **)&c->last, "input error: %s", | |
831 | ferror(c->fpin) ? strerror(errno) : "unexpxected EOF"); | |
832 | return -1; | |
833 | } | |
460b9539 | 834 | return 0; |
835 | } | |
836 | ||
c4e2cfdd | 837 | /** @brief Get recently added tracks |
2a10b70b | 838 | * @param c Client |
c4e2cfdd | 839 | * @param vecp Where to store pointer to list (UTF-8) |
2a10b70b RK |
840 | * @param nvecp Where to store count |
841 | * @param max Maximum tracks to fetch, or 0 for all available | |
842 | * @return 0 on success, non-0 on error | |
843 | */ | |
844 | int disorder_new_tracks(disorder_client *c, | |
845 | char ***vecp, int *nvecp, | |
846 | int max) { | |
847 | char limit[32]; | |
848 | ||
849 | sprintf(limit, "%d", max); | |
850 | return disorder_simple_list(c, vecp, nvecp, "new", limit, (char *)0); | |
851 | } | |
852 | ||
c4e2cfdd RK |
853 | /** @brief Get server's RTP address information |
854 | * @param c Client | |
855 | * @param addressp Where to store address (UTF-8) | |
856 | * @param portp Where to store port (UTF-8) | |
857 | * @return 0 on success, non-0 on error | |
858 | */ | |
ca831831 RK |
859 | int disorder_rtp_address(disorder_client *c, char **addressp, char **portp) { |
860 | char *r; | |
861 | int rc, n; | |
862 | char **vec; | |
863 | ||
864 | if((rc = disorder_simple(c, &r, "rtp-address", (char *)0))) | |
865 | return rc; | |
866 | vec = split(r, &n, SPLIT_QUOTES, 0, 0); | |
867 | if(n != 2) { | |
e9e8a16d | 868 | c->last = "malformed RTP address"; |
2e9ba080 | 869 | disorder_error(0, "malformed rtp-address reply"); |
ca831831 RK |
870 | return -1; |
871 | } | |
872 | *addressp = vec[0]; | |
873 | *portp = vec[1]; | |
874 | return 0; | |
875 | } | |
876 | ||
758aa6c3 RK |
877 | /** @brief Get details of a scheduled event |
878 | * @param c Client | |
879 | * @param id Event ID | |
880 | * @param actiondatap Where to put details | |
881 | * @return 0 on success, non-0 on error | |
882 | */ | |
883 | int disorder_schedule_get(disorder_client *c, const char *id, | |
884 | struct kvp **actiondatap) { | |
885 | char **lines, **bits; | |
886 | int rc, nbits; | |
887 | ||
888 | *actiondatap = 0; | |
889 | if((rc = disorder_simple_list(c, &lines, NULL, | |
890 | "schedule-get", id, (char *)0))) | |
891 | return rc; | |
892 | while(*lines) { | |
893 | if(!(bits = split(*lines++, &nbits, SPLIT_QUOTES, 0, 0))) { | |
2e9ba080 | 894 | disorder_error(0, "invalid schedule-get reply: cannot split line"); |
758aa6c3 RK |
895 | return -1; |
896 | } | |
897 | if(nbits != 2) { | |
2e9ba080 | 898 | disorder_error(0, "invalid schedule-get reply: wrong number of fields"); |
758aa6c3 RK |
899 | return -1; |
900 | } | |
901 | kvp_set(actiondatap, bits[0], bits[1]); | |
902 | } | |
903 | return 0; | |
904 | } | |
905 | ||
906 | /** @brief Add a scheduled event | |
907 | * @param c Client | |
908 | * @param when When to trigger the event | |
909 | * @param priority Event priority ("normal" or "junk") | |
910 | * @param action What action to perform | |
911 | * @param ... Action-specific arguments | |
912 | * @return 0 on success, non-0 on error | |
913 | * | |
914 | * For action @c "play" the next argument is the track. | |
915 | * | |
916 | * For action @c "set-global" next argument is the global preference name | |
917 | * and the final argument the value to set it to, or (char *)0 to unset it. | |
918 | */ | |
919 | int disorder_schedule_add(disorder_client *c, | |
920 | time_t when, | |
921 | const char *priority, | |
922 | const char *action, | |
923 | ...) { | |
924 | va_list ap; | |
925 | char when_str[64]; | |
926 | int rc; | |
927 | ||
928 | snprintf(when_str, sizeof when_str, "%lld", (long long)when); | |
929 | va_start(ap, action); | |
930 | if(!strcmp(action, "play")) | |
6c13a317 RK |
931 | rc = disorder_simple(c, 0, "schedule-add", when_str, priority, |
932 | action, va_arg(ap, char *), | |
933 | (char *)0); | |
934 | else if(!strcmp(action, "set-global")) { | |
935 | const char *key = va_arg(ap, char *); | |
936 | const char *value = va_arg(ap, char *); | |
937 | rc = disorder_simple(c, 0,"schedule-add", when_str, priority, | |
938 | action, key, value, | |
939 | (char *)0); | |
940 | } else | |
2e9ba080 | 941 | disorder_fatal(0, "unknown action '%s'", action); |
758aa6c3 RK |
942 | va_end(ap); |
943 | return rc; | |
944 | } | |
945 | ||
39c53343 RK |
946 | /** @brief Set the contents of a playlst |
947 | * @param c Client | |
948 | * @param playlist Playlist to modify | |
949 | * @param tracks List of tracks | |
950 | * @param ntracks Length of @p tracks (or -1 to count up to the first NULL) | |
951 | * @return 0 on success, non-0 on error | |
952 | */ | |
953 | int disorder_playlist_set(disorder_client *c, | |
954 | const char *playlist, | |
955 | char **tracks, | |
956 | int ntracks) { | |
957 | return disorder_simple_body(c, 0, tracks, ntracks, | |
958 | "playlist-set", playlist, (char *)0); | |
959 | } | |
960 | ||
7788b7c7 RK |
961 | #include "client-stubs.c" |
962 | ||
460b9539 | 963 | /* |
964 | Local Variables: | |
965 | c-basic-offset:2 | |
966 | comment-column:40 | |
967 | End: | |
968 | */ |