admin.c 22.5 KB
Newer Older
1
2
3
4
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

5
6
#include <string.h>
#include <stdlib.h>
7
8
#include <stdarg.h>
#include <time.h>
9
10
11
#include <libxml/xmlmemory.h>
#include <libxml/parser.h>
#include <libxml/tree.h>
12

13
#include "cfgfile.h"
14
15
16
17
18
19
20
#include "connection.h"
#include "refbuf.h"
#include "client.h"
#include "source.h"
#include "global.h"
#include "event.h"
#include "stats.h"
21
#include "os.h"
22
#include "xslt.h"
23
24
25
26
27

#include "format.h"
#include "format_mp3.h"

#include "logging.h"
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
28
29
30
#ifdef _WIN32
#define snprintf _snprintf
#endif
31
32
33

#define CATMODULE "admin"

34
35
36
#define COMMAND_ERROR             (-1)

/* Mount-specific commands */
37
#define COMMAND_RAW_FALLBACK        1
38
#define COMMAND_METADATA_UPDATE     2
39
40
41
42
43
44
#define COMMAND_RAW_SHOW_LISTENERS  3
#define COMMAND_RAW_MOVE_CLIENTS    4

#define COMMAND_TRANSFORMED_FALLBACK        50
#define COMMAND_TRANSFORMED_SHOW_LISTENERS  53
#define COMMAND_TRANSFORMED_MOVE_CLIENTS    54
45
46

/* Global commands */
47
#define COMMAND_RAW_LIST_MOUNTS   101
48
#define COMMAND_RAW_STATS         102
49
#define COMMAND_RAW_LISTSTREAM    103
50
#define COMMAND_PLAINTEXT_LISTSTREAM    104
51
52
53
#define COMMAND_TRANSFORMED_LIST_MOUNTS   201
#define COMMAND_TRANSFORMED_STATS         202
#define COMMAND_TRANSFORMED_LISTSTREAM    203
54

55
/* Client management commands */
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
#define COMMAND_RAW_KILL_CLIENT   301
#define COMMAND_RAW_KILL_SOURCE   302
#define COMMAND_TRANSFORMED_KILL_CLIENT   401
#define COMMAND_TRANSFORMED_KILL_SOURCE   402

#define FALLBACK_RAW_REQUEST "fallbacks"
#define FALLBACK_TRANSFORMED_REQUEST "fallbacks.xsl"
#define METADATA_REQUEST "metadata"
#define LISTCLIENTS_RAW_REQUEST "listclients"
#define LISTCLIENTS_TRANSFORMED_REQUEST "listclients.xsl"
#define STATS_RAW_REQUEST "stats"
#define STATS_TRANSFORMED_REQUEST "stats.xsl"
#define LISTMOUNTS_RAW_REQUEST "listmounts"
#define LISTMOUNTS_TRANSFORMED_REQUEST "listmounts.xsl"
#define STREAMLIST_RAW_REQUEST "streamlist"
#define STREAMLIST_TRANSFORMED_REQUEST "streamlist.xsl"
72
#define STREAMLIST_PLAINTEXT_REQUEST "streamlist.txt"
73
74
75
76
77
78
79
80
81
82
83
84
#define MOVECLIENTS_RAW_REQUEST "moveclients"
#define MOVECLIENTS_TRANSFORMED_REQUEST "moveclients.xsl"
#define KILLCLIENT_RAW_REQUEST "killclient"
#define KILLCLIENT_TRANSFORMED_REQUEST "killclient.xsl"
#define KILLSOURCE_RAW_REQUEST "killsource"
#define KILLSOURCE_TRANSFORMED_REQUEST "killsource.xsl"
#define ADMIN_XSL_RESPONSE "response.xsl"
#define DEFAULT_RAW_REQUEST ""
#define DEFAULT_TRANSFORMED_REQUEST ""

#define RAW         1
#define TRANSFORMED 2
85
#define PLAINTEXT   3
86
87
int admin_get_command(char *command)
{
88
89
90
91
92
    if(!strcmp(command, FALLBACK_RAW_REQUEST))
        return COMMAND_RAW_FALLBACK;
    else if(!strcmp(command, FALLBACK_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_FALLBACK;
    else if(!strcmp(command, METADATA_REQUEST))
93
        return COMMAND_METADATA_UPDATE;
94
95
96
97
98
    else if(!strcmp(command, LISTCLIENTS_RAW_REQUEST))
        return COMMAND_RAW_SHOW_LISTENERS;
    else if(!strcmp(command, LISTCLIENTS_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_SHOW_LISTENERS;
    else if(!strcmp(command, STATS_RAW_REQUEST))
99
        return COMMAND_RAW_STATS;
100
101
    else if(!strcmp(command, STATS_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_STATS;
102
103
    else if(!strcmp(command, "stats.xml")) /* The old way */
        return COMMAND_RAW_STATS;
104
105
106
107
108
    else if(!strcmp(command, LISTMOUNTS_RAW_REQUEST))
        return COMMAND_RAW_LIST_MOUNTS;
    else if(!strcmp(command, LISTMOUNTS_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_LIST_MOUNTS;
    else if(!strcmp(command, STREAMLIST_RAW_REQUEST))
109
        return COMMAND_RAW_LISTSTREAM;
110
111
    else if(!strcmp(command, STREAMLIST_PLAINTEXT_REQUEST))
        return COMMAND_PLAINTEXT_LISTSTREAM;
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
    else if(!strcmp(command, MOVECLIENTS_RAW_REQUEST))
        return COMMAND_RAW_MOVE_CLIENTS;
    else if(!strcmp(command, MOVECLIENTS_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_MOVE_CLIENTS;
    else if(!strcmp(command, KILLCLIENT_RAW_REQUEST))
        return COMMAND_RAW_KILL_CLIENT;
    else if(!strcmp(command, KILLCLIENT_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_KILL_CLIENT;
    else if(!strcmp(command, KILLSOURCE_RAW_REQUEST))
        return COMMAND_RAW_KILL_SOURCE;
    else if(!strcmp(command, KILLSOURCE_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_KILL_SOURCE;
    else if(!strcmp(command, DEFAULT_TRANSFORMED_REQUEST))
        return COMMAND_TRANSFORMED_STATS;
    else if(!strcmp(command, DEFAULT_RAW_REQUEST))
        return COMMAND_TRANSFORMED_STATS;
128
129
130
131
    else
        return COMMAND_ERROR;
}

132
static void command_fallback(client_t *client, source_t *source, int response);
133
static void command_metadata(client_t *client, source_t *source);
134
135
136
137
138
139
140
141
142
143
static void command_show_listeners(client_t *client, source_t *source,
        int response);
static void command_move_clients(client_t *client, source_t *source,
        int response);
static void command_stats(client_t *client, int response);
static void command_list_mounts(client_t *client, int response);
static void command_kill_client(client_t *client, source_t *source,
        int response);
static void command_kill_source(client_t *client, source_t *source,
        int response);
144
145
146
static void admin_handle_mount_request(client_t *client, source_t *source,
        int command);
static void admin_handle_general_request(client_t *client, int command);
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
static void admin_send_response(xmlDocPtr doc, client_t *client, 
        int response, char *xslt_template);
static void html_write(client_t *client, char *fmt, ...);

xmlDocPtr admin_build_sourcelist(char *current_source)
{
    avl_node *node;
    source_t *source;
    xmlNodePtr xmlnode, srcnode;
    xmlDocPtr doc;
    char buf[22];
    time_t now = time(NULL);

    doc = xmlNewDoc("1.0");
    xmlnode = xmlNewDocNode(doc, NULL, "icestats", NULL);
    xmlDocSetRootElement(doc, xmlnode);
163

164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
    if (current_source) {
        xmlNewChild(xmlnode, NULL, "current_source", current_source);
    }

    avl_tree_rlock(global.source_tree);

    node = avl_get_first(global.source_tree);
    while(node) {
        source = (source_t *)node->key;
        srcnode = xmlNewChild(xmlnode, NULL, "source", NULL);
        xmlSetProp(srcnode, "mount", source->mount);

        xmlNewChild(srcnode, NULL, "fallback", 
                    (source->fallback_mount != NULL)?
                    source->fallback_mount:"");
        memset(buf, '\000', sizeof(buf));
180
        snprintf(buf, sizeof(buf)-1, "%ld", source->listeners);
181
182
        xmlNewChild(srcnode, NULL, "listeners", buf);
        memset(buf, '\000', sizeof(buf));
183
        snprintf(buf, sizeof(buf)-1, "%ld", now - source->con->con_time);
184
185
186
187
188
189
190
191
192
193
194
195
        xmlNewChild(srcnode, NULL, "Connected", buf);
        xmlNewChild(srcnode, NULL, "Format", 
            source->format->format_description);
        node = avl_get_next(node);
    }
    avl_tree_unlock(global.source_tree);
    return(doc);
}

void admin_send_response(xmlDocPtr doc, client_t *client, 
        int response, char *xslt_template)
{
196
    xmlChar *buff = NULL;
197
198
199
200
201
202
203
204
    int len = 0;
    ice_config_t *config;
    char *fullpath_xslt_template;
    int fullpath_xslt_template_len;
    char *adminwebroot;

    client->respcode = 200;
    if (response == RAW) {
205
        xmlDocDumpMemory(doc, &buff, &len);
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
        html_write(client, "HTTP/1.0 200 OK\r\n"
               "Content-Length: %d\r\n"
               "Content-Type: text/xml\r\n"
               "\r\n", len);
        html_write(client, buff);
    }
    if (response == TRANSFORMED) {
        config = config_get_config();
        adminwebroot = config->adminroot_dir;
        config_release_config();
        fullpath_xslt_template_len = strlen(adminwebroot) + 
            strlen(xslt_template) + 2;
        fullpath_xslt_template = malloc(fullpath_xslt_template_len);
        memset(fullpath_xslt_template, '\000', fullpath_xslt_template_len);
        snprintf(fullpath_xslt_template, fullpath_xslt_template_len, "%s%s%s",
            adminwebroot, PATH_SEPARATOR, xslt_template);
        html_write(client, "HTTP/1.0 200 OK\r\n"
               "Content-Type: text/html\r\n"
               "\r\n");
        DEBUG1("Sending XSLT (%s)", fullpath_xslt_template);
        xslt_transform(doc, fullpath_xslt_template, client);
        free(fullpath_xslt_template);
    }
    if (buff) {
        xmlFree(buff);
    }
}
233
234
235
236
237
238
239
240
241
242
243
244
245
void admin_handle_request(client_t *client, char *uri)
{
    char *mount, *command_string;
    int command;

    if(strncmp("/admin/", uri, 7)) {
        ERROR0("Internal error: admin request isn't");
        client_send_401(client);
        return;
    }

    command_string = uri + 7;

246
    DEBUG1("Got command (%s)", command_string);
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
    command = admin_get_command(command_string);

    if(command < 0) {
        ERROR1("Error parsing command string or unrecognised command: %s",
                command_string);
        client_send_400(client, "Unrecognised command");
        return;
    }

    mount = httpp_get_query_param(client->parser, "mount");

    if(mount != NULL) {
        source_t *source;

        /* This is a mount request, handle it as such */
262
263
        if(!connection_check_admin_pass(client->parser)) {
            if(!connection_check_source_pass(client->parser, mount)) {
264
                INFO1("Bad or missing password on mount modification admin "
265
266
267
268
                      "request (command: %s)", command_string);
                client_send_401(client);
                return;
            }
269
270
271
        }
        
        avl_tree_rlock(global.source_tree);
Michael Smith's avatar
Michael Smith committed
272
        source = source_find_mount_raw(mount);
273

274
275
        if (source == NULL)
        {
276
277
278
279
            WARN2("Admin command %s on non-existent source %s", 
                    command_string, mount);
            client_send_400(client, "Source does not exist");
        }
280
281
282
283
284
285
286
        else
        {
            INFO2("Received admin command %s on mount \"%s\"", 
                    command_string, mount);
            admin_handle_mount_request(client, source, command);
        }
        avl_tree_unlock(global.source_tree);
287
288
289
    }
    else {

290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
        if (command == COMMAND_PLAINTEXT_LISTSTREAM) {
        /* this request is used by a slave relay to retrieve
           mounts from the master, so handle this request
           validating against the relay password */
            if(!connection_check_relay_pass(client->parser)) {
                INFO1("Bad or missing password on admin command "
                      "request (command: %s)", command_string);
                client_send_401(client);
                return;
            }
        }
        else {
            if(!connection_check_admin_pass(client->parser)) {
                INFO1("Bad or missing password on admin command "
                      "request (command: %s)", command_string);
                client_send_401(client);
                return;
            }
308
309
310
311
312
313
314
315
316
317
        }
        
        admin_handle_general_request(client, command);
    }
}

static void admin_handle_general_request(client_t *client, int command)
{
    switch(command) {
        case COMMAND_RAW_STATS:
318
            command_stats(client, RAW);
319
            break;
320
321
        case COMMAND_RAW_LIST_MOUNTS:
            command_list_mounts(client, RAW);
322
323
            break;
        case COMMAND_RAW_LISTSTREAM:
324
325
            command_list_mounts(client, RAW);
            break;
326
327
328
        case COMMAND_PLAINTEXT_LISTSTREAM:
            command_list_mounts(client, PLAINTEXT);
            break;
329
330
331
332
333
334
335
336
337
338
339
        case COMMAND_TRANSFORMED_STATS:
            command_stats(client, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_LIST_MOUNTS:
            command_list_mounts(client, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_LISTSTREAM:
            command_list_mounts(client, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_MOVE_CLIENTS:
            command_list_mounts(client, TRANSFORMED);
340
            break;
341
342
343
344
345
346
347
348
349
350
351
        default:
            WARN0("General admin request not recognised");
            client_send_400(client, "Unknown admin request");
            return;
    }
}

static void admin_handle_mount_request(client_t *client, source_t *source, 
        int command)
{
    switch(command) {
352
353
        case COMMAND_RAW_FALLBACK:
            command_fallback(client, source, RAW);
354
355
356
357
            break;
        case COMMAND_METADATA_UPDATE:
            command_metadata(client, source);
            break;
358
359
360
361
362
363
364
365
        case COMMAND_RAW_SHOW_LISTENERS:
            command_show_listeners(client, source, RAW);
            break;
        case COMMAND_RAW_MOVE_CLIENTS:
            command_move_clients(client, source, RAW);
            break;
        case COMMAND_RAW_KILL_CLIENT:
            command_kill_client(client, source, RAW);
366
            break;
367
368
        case COMMAND_RAW_KILL_SOURCE:
            command_kill_source(client, source, RAW);
369
            break;
370
371
        case COMMAND_TRANSFORMED_FALLBACK:
            command_fallback(client, source, RAW);
372
            break;
373
374
375
376
377
378
379
380
381
382
383
        case COMMAND_TRANSFORMED_SHOW_LISTENERS:
            command_show_listeners(client, source, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_MOVE_CLIENTS:
            command_move_clients(client, source, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_KILL_CLIENT:
            command_kill_client(client, source, TRANSFORMED);
            break;
        case COMMAND_TRANSFORMED_KILL_SOURCE:
            command_kill_source(client, source, TRANSFORMED);
384
            break;
385
386
387
        default:
            WARN0("Mount request not recognised");
            client_send_400(client, "Mount request unknown");
388
            break;
389
390
391
392
393
394
395
396
397
398
399
    }
}

#define COMMAND_REQUIRE(client,name,var) \
    do { \
        (var) = httpp_get_query_param((client)->parser, (name)); \
        if((var) == NULL) { \
            client_send_400((client), "Missing parameter"); \
            return; \
        } \
    } while(0);
400
401
#define COMMAND_OPTIONAL(client,name,var) \
    (var) = httpp_get_query_param((client)->parser, (name))
402

403
static void html_success(client_t *client, char *message)
404
405
406
407
408
409
410
411
412
413
414
415
{
    int bytes;

    client->respcode = 200;
    bytes = sock_write(client->con->sock, 
            "HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n" 
            "<html><head><title>Admin request successful</title></head>"
            "<body><p>%s</p></body></html>", message);
    if(bytes > 0) client->con->sent_bytes = bytes;
    client_destroy(client);
}

416
417
418
419
420
421
422
423
424
425
426
static void html_write(client_t *client, char *fmt, ...)
{
    int bytes;
    va_list ap;

    va_start(ap, fmt);
    bytes = sock_write_fmt(client->con->sock, fmt, ap);
    va_end(ap);
    if(bytes > 0) client->con->sent_bytes = bytes;
}

427
428
static void command_move_clients(client_t *client, source_t *source,
    int response)
429
430
431
432
433
{
    char *dest_source;
    source_t *dest;
    avl_node *client_node;
    client_t *current;
434
435
436
437
438
439
    xmlDocPtr doc;
    xmlNodePtr node;
    char buf[255];
    int parameters_passed = 0;

    DEBUG0("Doing optional check");
440
    if((COMMAND_OPTIONAL(client, "destination", dest_source))) {
441
442
443
444
445
446
447
448
449
450
451
        parameters_passed = 1;
    }
    DEBUG1("Done optional check (%d)", parameters_passed);
    if (!parameters_passed) {
        doc = admin_build_sourcelist(source->mount);
        admin_send_response(doc, client, response, 
             MOVECLIENTS_TRANSFORMED_REQUEST);
        xmlFreeDoc(doc);
        client_destroy(client);
        return;
    }
452
453
454
455
456
457
458

    if (strcmp (dest->mount, source->mount) == 0) 
    {
        client_send_400 (client, "supplied mountpoints are identical");
        return;
    }

459
460
461
462
463
464
465
    dest = source_find_mount(dest_source);

    if(dest == NULL) {
        client_send_400(client, "No such source");
        return;
    }

466
467
468
469
    doc = xmlNewDoc("1.0");
    node = xmlNewDocNode(doc, NULL, "iceresponse", NULL);
    xmlDocSetRootElement(doc, node);

470
471
472
473
474
475
476
477
478
479
480
481
    avl_tree_wlock(source->client_tree);
    client_node = avl_get_first(source->client_tree);
    while(client_node) {
        current = (client_t *)client_node->key;

        avl_tree_wlock(dest->pending_tree);
        avl_insert(dest->pending_tree, current);
        avl_tree_unlock(dest->pending_tree);

        client_node = avl_get_next(client_node);

        avl_delete(source->client_tree, current, source_remove_client);
482
        source->listeners--;
483
484
485
486
    }

    avl_tree_unlock(source->client_tree);
        
487
488
489
490
491
492
493
494
495
496
    memset(buf, '\000', sizeof(buf));
    snprintf(buf, sizeof(buf)-1, "Clients moved from %s to %s", dest_source, 
        source->mount);
    xmlNewChild(node, NULL, "message", buf);
    xmlNewChild(node, NULL, "return", "1");

    admin_send_response(doc, client, response, 
        ADMIN_XSL_RESPONSE);
    xmlFreeDoc(doc);
    client_destroy(client);
497
498
}

499
500
static void command_show_listeners(client_t *client, source_t *source,
    int response)
501
{
502
503
    xmlDocPtr doc;
    xmlNodePtr node, srcnode, listenernode;
504
505
    avl_node *client_node;
    client_t *current;
506
507
    char buf[22];
    char *userAgent = NULL;
508
509
    time_t now = time(NULL);

510
511
512
513
514
    doc = xmlNewDoc("1.0");
    node = xmlNewDocNode(doc, NULL, "icestats", NULL);
    srcnode = xmlNewChild(node, NULL, "source", NULL);
    xmlSetProp(srcnode, "mount", source->mount);
    xmlDocSetRootElement(doc, node);
515

516
    memset(buf, '\000', sizeof(buf));
517
    snprintf(buf, sizeof(buf)-1, "%ld", source->listeners);
518
    xmlNewChild(srcnode, NULL, "Listeners", buf);
519
520
521
522
523
524

    avl_tree_rlock(source->client_tree);

    client_node = avl_get_first(source->client_tree);
    while(client_node) {
        current = (client_t *)client_node->key;
525
526
527
528
529
530
531
532
533
534
        listenernode = xmlNewChild(srcnode, NULL, "listener", NULL);
        xmlNewChild(listenernode, NULL, "IP", current->con->ip);
        userAgent = httpp_getvar(current->parser, "user-agent");
        if (userAgent) {
            xmlNewChild(listenernode, NULL, "UserAgent", userAgent);
        }
        else {
            xmlNewChild(listenernode, NULL, "UserAgent", "Unknown");
        }
        memset(buf, '\000', sizeof(buf));
535
        snprintf(buf, sizeof(buf)-1, "%ld", now - current->con->con_time);
536
537
        xmlNewChild(listenernode, NULL, "Connected", buf);
        memset(buf, '\000', sizeof(buf));
538
        snprintf(buf, sizeof(buf)-1, "%lu", current->con->id);
539
        xmlNewChild(listenernode, NULL, "ID", buf);
540
541
542
543
        client_node = avl_get_next(client_node);
    }

    avl_tree_unlock(source->client_tree);
544
545
546
    admin_send_response(doc, client, response, 
        LISTCLIENTS_TRANSFORMED_REQUEST);
    xmlFreeDoc(doc);
547
548
549
    client_destroy(client);
}

550
551
static void command_kill_source(client_t *client, source_t *source,
    int response)
552
{
553
554
555
556
557
558
559
560
561
    xmlDocPtr doc;
    xmlNodePtr node;

    doc = xmlNewDoc("1.0");
    node = xmlNewDocNode(doc, NULL, "iceresponse", NULL);
    xmlNewChild(node, NULL, "message", "Source Removed");
    xmlNewChild(node, NULL, "return", "1");
    xmlDocSetRootElement(doc, node);

562
563
    source->running = 0;

564
565
566
567
    admin_send_response(doc, client, response, 
        ADMIN_XSL_RESPONSE);
    xmlFreeDoc(doc);
    client_destroy(client);
568
569
}

570
571
static void command_kill_client(client_t *client, source_t *source,
    int response)
572
573
574
575
{
    char *idtext;
    int id;
    client_t *listener;
576
577
578
    xmlDocPtr doc;
    xmlNodePtr node;
    char buf[50] = "";
579
580
581
582
583
584
585

    COMMAND_REQUIRE(client, "id", idtext);

    id = atoi(idtext);

    listener = source_find_client(source, id);

586
587
588
589
590
    doc = xmlNewDoc("1.0");
    node = xmlNewDocNode(doc, NULL, "iceresponse", NULL);
    xmlDocSetRootElement(doc, node);
    DEBUG1("Response is %d", response);

591
592
593
594
595
596
597
    if(listener != NULL) {
        INFO1("Admin request: client %d removed", id);

        /* This tags it for removal on the next iteration of the main source
         * loop
         */
        listener->con->error = 1;
598
599
600
601
        memset(buf, '\000', sizeof(buf));
        snprintf(buf, sizeof(buf)-1, "Client %d removed", id);
        xmlNewChild(node, NULL, "message", buf);
        xmlNewChild(node, NULL, "return", "1");
602
603
    }
    else {
604
605
606
607
        memset(buf, '\000', sizeof(buf));
        snprintf(buf, sizeof(buf)-1, "Client %d not found", id);
        xmlNewChild(node, NULL, "message", buf);
        xmlNewChild(node, NULL, "return", "0");
608
    }
609
610
611
612
    admin_send_response(doc, client, response, 
        ADMIN_XSL_RESPONSE);
    xmlFreeDoc(doc);
    client_destroy(client);
613
614
}

615
616
static void command_fallback(client_t *client, source_t *source,
    int response)
617
618
619
620
621
622
623
624
625
626
627
628
{
    char *fallback;
    char *old;

    DEBUG0("Got fallback request");

    COMMAND_REQUIRE(client, "fallback", fallback);

    old = source->fallback_mount;
    source->fallback_mount = strdup(fallback);
    free(old);

629
    html_success(client, "Fallback configured");
630
631
632
633
634
635
636
}

static void command_metadata(client_t *client, source_t *source)
{
    char *action;
    char *value;
    mp3_state *state;
637
638
639
640
#ifdef USE_YP
    int i;
    time_t current_time;
#endif
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665

    DEBUG0("Got metadata update request");

    COMMAND_REQUIRE(client, "mode", action);
    COMMAND_REQUIRE(client, "song", value);

    if(source->format->type != FORMAT_TYPE_MP3) {
        client_send_400(client, "Not mp3, cannot update metadata");
        return;
    }

    if(strcmp(action, "updinfo") != 0) {
        client_send_400(client, "No such action");
        return;
    }

    state = source->format->_state;

    thread_mutex_lock(&(state->lock));
    free(state->metadata);
    state->metadata = strdup(value);
    state->metadata_age++;
    state->metadata_raw = 0;
    thread_mutex_unlock(&(state->lock));

666
667
    DEBUG2("Metadata on mountpoint %s changed to \"%s\"", 
        source->mount, value);
668
    stats_event(source->mount, "title", value);
669
670
671
672
673
674
675
676
677
678
#ifdef USE_YP
    /* If we get an update on the mountpoint, force a
       yp touch */
    current_time = time(NULL);
    for (i=0; i<source->num_yp_directories; i++) {
        source->ypdata[i]->yp_last_touch = current_time - 
            source->ypdata[i]->yp_touch_interval + 2;
    }
#endif

679

680
    html_success(client, "Metadata update successful");
681
682
}

683
684
685
static void command_stats(client_t *client, int response) {
    xmlDocPtr doc;

686
687
    DEBUG0("Stats request, sending xml stats");

688
689
690
    stats_get_xml(&doc);
    admin_send_response(doc, client, response, STATS_TRANSFORMED_REQUEST);
    xmlFreeDoc(doc);
691
692
693
694
    client_destroy(client);
    return;
}

695
696
static void command_list_mounts(client_t *client, int response) {
    xmlDocPtr doc;
697
698
    avl_node *node;
    source_t *source;
699
700
701
702

    DEBUG0("List mounts request");


703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
    if (response == PLAINTEXT) {
        avl_tree_rlock(global.source_tree);

        node = avl_get_first(global.source_tree);
		html_write(client, 
            "HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n");
        while(node) {
            source = (source_t *)node->key;
            html_write(client, "%s\n", source->mount);
            node = avl_get_next(node);
        }
        avl_tree_unlock(global.source_tree);
    }
    else {

        doc = admin_build_sourcelist(NULL);

        admin_send_response(doc, client, response, 
            LISTMOUNTS_TRANSFORMED_REQUEST);
        xmlFreeDoc(doc);
    }
724
    client_destroy(client);
725

726
727
728
    return;
}