connection.c 28.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12
/* Icecast
 *
 * This program is distributed under the GNU General Public License, version 2.
 * A copy of this license is included with this source.
 *
 * Copyright 2000-2004, Jack Moffitt <jack@xiph.org, 
 *                      Michael Smith <msmith@xiph.org>,
 *                      oddsock <oddsock@xiph.org>,
 *                      Karl Heyes <karl@xiph.org>
 *                      and others (see AUTHORS for details).
 */

13
/* -*- c-basic-offset: 4; indent-tabs-mode: nil; -*- */
14 15 16 17
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

Jack Moffitt's avatar
Jack Moffitt committed
18 19 20
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
21
#include <time.h>
Jack Moffitt's avatar
Jack Moffitt committed
22
#include <sys/types.h>
23
#include <sys/stat.h>
24 25 26
#ifdef HAVE_POLL
#include <sys/poll.h>
#endif
27 28 29

#ifndef _WIN32
#include <sys/time.h>
Jack Moffitt's avatar
Jack Moffitt committed
30 31
#include <sys/socket.h>
#include <netinet/in.h>
32
#else
33
#include <winsock2.h>
34 35
#define snprintf _snprintf
#define strcasecmp stricmp
36
#define strncasecmp strnicmp
37
#endif
Jack Moffitt's avatar
Jack Moffitt committed
38 39 40

#include "os.h"

Karl Heyes's avatar
Karl Heyes committed
41 42 43 44
#include "thread/thread.h"
#include "avl/avl.h"
#include "net/sock.h"
#include "httpp/httpp.h"
Jack Moffitt's avatar
Jack Moffitt committed
45

46
#include "cfgfile.h"
Jack Moffitt's avatar
Jack Moffitt committed
47 48 49 50 51 52 53
#include "global.h"
#include "util.h"
#include "connection.h"
#include "refbuf.h"
#include "client.h"
#include "stats.h"
#include "logging.h"
54
#include "xslt.h"
55
#include "fserve.h"
56
#include "sighandler.h"
57 58

#include "yp.h"
Jack Moffitt's avatar
Jack Moffitt committed
59
#include "source.h"
Michael Smith's avatar
Michael Smith committed
60
#include "format.h"
61
#include "format_mp3.h"
Michael Smith's avatar
Michael Smith committed
62
#include "event.h"
63
#include "admin.h"
Michael Smith's avatar
Michael Smith committed
64
#include "auth.h"
Jack Moffitt's avatar
Jack Moffitt committed
65 66 67 68

#define CATMODULE "connection"

typedef struct con_queue_tag {
69 70
    connection_t *con;
    struct con_queue_tag *next;
Jack Moffitt's avatar
Jack Moffitt committed
71 72 73
} con_queue_t;

typedef struct _thread_queue_tag {
74 75
    thread_type *thread_id;
    struct _thread_queue_tag *next;
Jack Moffitt's avatar
Jack Moffitt committed
76 77 78 79 80 81 82 83 84 85 86 87
} thread_queue_t;

static mutex_t _connection_mutex;
static unsigned long _current_id = 0;
static int _initialized = 0;
static cond_t _pool_cond;

static con_queue_t *_queue = NULL;
static mutex_t _queue_mutex;

static thread_queue_t *_conhands = NULL;

88
rwlock_t _source_shutdown_rwlock;
Jack Moffitt's avatar
Jack Moffitt committed
89 90 91 92 93

static void *_handle_connection(void *arg);

void connection_initialize(void)
{
94 95 96 97 98 99
    if (_initialized) return;
    
    thread_mutex_create(&_connection_mutex);
    thread_mutex_create(&_queue_mutex);
    thread_rwlock_create(&_source_shutdown_rwlock);
    thread_cond_create(&_pool_cond);
100
    thread_cond_create(&global.shutdown_cond);
Jack Moffitt's avatar
Jack Moffitt committed
101

102
    _initialized = 1;
Jack Moffitt's avatar
Jack Moffitt committed
103 104 105 106
}

void connection_shutdown(void)
{
107 108
    if (!_initialized) return;
    
109
    thread_cond_destroy(&global.shutdown_cond);
110 111 112 113
    thread_cond_destroy(&_pool_cond);
    thread_rwlock_destroy(&_source_shutdown_rwlock);
    thread_mutex_destroy(&_queue_mutex);
    thread_mutex_destroy(&_connection_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
114

115
    _initialized = 0;
Jack Moffitt's avatar
Jack Moffitt committed
116 117 118 119
}

static unsigned long _next_connection_id(void)
{
120
    unsigned long id;
Jack Moffitt's avatar
Jack Moffitt committed
121

122 123 124
    thread_mutex_lock(&_connection_mutex);
    id = _current_id++;
    thread_mutex_unlock(&_connection_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
125

126
    return id;
Jack Moffitt's avatar
Jack Moffitt committed
127 128
}

129
connection_t *create_connection(sock_t sock, sock_t serversock, char *ip) {
130 131 132 133
    connection_t *con;
    con = (connection_t *)malloc(sizeof(connection_t));
    memset(con, 0, sizeof(connection_t));
    con->sock = sock;
134
    con->serversock = serversock;
135 136 137
    con->con_time = time(NULL);
    con->id = _next_connection_id();
    con->ip = ip;
Michael Smith's avatar
Michael Smith committed
138 139 140 141

    con->event_number = EVENT_NO_EVENT;
    con->event = NULL;

142
    return con;
143 144
}

145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164
static int wait_for_serversock(int timeout)
{
#ifdef HAVE_POLL
    struct pollfd ufds[MAX_LISTEN_SOCKETS];
    int i, ret;

    for(i=0; i < global.server_sockets; i++) {
        ufds[i].fd = global.serversock[i];
        ufds[i].events = POLLIN;
        ufds[i].revents = 0;
    }

    ret = poll(ufds, global.server_sockets, timeout);
    if(ret < 0) {
        return -2;
    }
    else if(ret == 0) {
        return -1;
    }
    else {
165
        int dst;
166
        for(i=0; i < global.server_sockets; i++) {
167
            if(ufds[i].revents & POLLIN)
168
                return ufds[i].fd;
169 170 171 172 173 174 175 176 177
            if(ufds[i].revents & (POLLHUP|POLLERR|POLLNVAL))
            {
                if (ufds[i].revents & (POLLHUP|POLLERR))
                {
                    close (global.serversock[i]);
                    WARN0("Had to close a listening socket");
                }
                global.serversock[i] = -1;
            }
178
        }
179 180 181 182 183 184 185 186 187 188 189
        /* remove any closed sockets */
        for(i=0, dst=0; i < global.server_sockets; i++)
        {
            if (global.serversock[i] == -1)
                continue;
            if (i!=dst)
                global.serversock[dst] = global.serversock[i];
            dst++;
        }
        global.server_sockets = dst;
        return -1;
190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206
    }
#else
    fd_set rfds;
    struct timeval tv, *p=NULL;
    int i, ret;
    int max = -1;

    FD_ZERO(&rfds);

    for(i=0; i < global.server_sockets; i++) {
        FD_SET(global.serversock[i], &rfds);
        if(global.serversock[i] > max)
            max = global.serversock[i];
    }

    if(timeout >= 0) {
        tv.tv_sec = timeout/1000;
207
        tv.tv_usec = (timeout % 1000) * 1000;
208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227
        p = &tv;
    }

    ret = select(max+1, &rfds, NULL, NULL, p);
    if(ret < 0) {
        return -2;
    }
    else if(ret == 0) {
        return -1;
    }
    else {
        for(i=0; i < global.server_sockets; i++) {
            if(FD_ISSET(global.serversock[i], &rfds))
                return global.serversock[i];
        }
        return -1; /* Should be impossible, stop compiler warnings */
    }
#endif
}

Jack Moffitt's avatar
Jack Moffitt committed
228 229
static connection_t *_accept_connection(void)
{
230 231 232
    int sock;
    connection_t *con;
    char *ip;
233
    int serversock; 
Jack Moffitt's avatar
Jack Moffitt committed
234

235 236 237
    serversock = wait_for_serversock(100);
    if(serversock < 0)
        return NULL;
Jack Moffitt's avatar
Jack Moffitt committed
238

239 240
    /* malloc enough room for a full IP address (including ipv6) */
    ip = (char *)malloc(MAX_ADDR_LEN);
Jack Moffitt's avatar
Jack Moffitt committed
241

242 243
    sock = sock_accept(serversock, ip, MAX_ADDR_LEN);
    if (sock >= 0) {
244
        con = create_connection(sock, serversock, ip);
Jack Moffitt's avatar
Jack Moffitt committed
245

246 247
        return con;
    }
Jack Moffitt's avatar
Jack Moffitt committed
248

249 250 251 252
    if (!sock_recoverable(sock_error()))
        WARN2("accept() failed with error %d: %s", sock_error(), strerror(sock_error()));
    
    free(ip);
Jack Moffitt's avatar
Jack Moffitt committed
253

254
    return NULL;
Jack Moffitt's avatar
Jack Moffitt committed
255 256 257 258
}

static void _add_connection(connection_t *con)
{
259
    con_queue_t *node;
Jack Moffitt's avatar
Jack Moffitt committed
260

261 262 263 264 265 266 267
    node = (con_queue_t *)malloc(sizeof(con_queue_t));
    
    thread_mutex_lock(&_queue_mutex);
    node->con = con;
    node->next = _queue;
    _queue = node;
    thread_mutex_unlock(&_queue_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
268 269 270 271 272

}

static void _signal_pool(void)
{
273
    thread_cond_signal(&_pool_cond);
Jack Moffitt's avatar
Jack Moffitt committed
274 275
}

276
static void _push_thread(thread_queue_t **queue, thread_type *thread_id)
Jack Moffitt's avatar
Jack Moffitt committed
277
{
278 279 280 281 282 283 284 285 286 287 288 289 290 291
    /* create item */
    thread_queue_t *item = (thread_queue_t *)malloc(sizeof(thread_queue_t));
    item->thread_id = thread_id;
    item->next = NULL;


    thread_mutex_lock(&_queue_mutex);
    if (*queue == NULL) {
        *queue = item;
    } else {
        item->next = *queue;
        *queue = item;
    }
    thread_mutex_unlock(&_queue_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
292 293
}

294
static thread_type *_pop_thread(thread_queue_t **queue)
Jack Moffitt's avatar
Jack Moffitt committed
295
{
296 297
    thread_type *id;
    thread_queue_t *item;
Jack Moffitt's avatar
Jack Moffitt committed
298

299
    thread_mutex_lock(&_queue_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
300

301 302 303 304 305
    item = *queue;
    if (item == NULL) {
        thread_mutex_unlock(&_queue_mutex);
        return NULL;
    }
Jack Moffitt's avatar
Jack Moffitt committed
306

307 308 309 310
    *queue = item->next;
    item->next = NULL;
    id = item->thread_id;
    free(item);
Jack Moffitt's avatar
Jack Moffitt committed
311

312
    thread_mutex_unlock(&_queue_mutex);
Jack Moffitt's avatar
Jack Moffitt committed
313

314
    return id;
Jack Moffitt's avatar
Jack Moffitt committed
315 316 317 318
}

static void _build_pool(void)
{
319 320
    ice_config_t *config;
    int i;
321
    thread_type *tid;
322
    char buff[64];
Michael Smith's avatar
Michael Smith committed
323
    int threadpool_size;
Jack Moffitt's avatar
Jack Moffitt committed
324

325
    config = config_get_config();
Michael Smith's avatar
Michael Smith committed
326 327
    threadpool_size = config->threadpool_size;
    config_release_config();
Jack Moffitt's avatar
Jack Moffitt committed
328

329 330 331 332 333
    for (i = 0; i < threadpool_size; i++) {
        snprintf(buff, 64, "Connection Thread #%d", i);
        tid = thread_create(buff, _handle_connection, NULL, THREAD_ATTACHED);
        _push_thread(&_conhands, tid);
    }
Jack Moffitt's avatar
Jack Moffitt committed
334 335 336 337
}

static void _destroy_pool(void)
{
338 339 340 341 342 343 344 345 346 347 348 349
    thread_type *id;
    int i;

    i = 0;

    thread_cond_broadcast(&_pool_cond);
    id = _pop_thread(&_conhands);
    while (id != NULL) {
        thread_join(id);
        _signal_pool();
        id = _pop_thread(&_conhands);
    }
Jack Moffitt's avatar
Jack Moffitt committed
350 351 352 353
}

void connection_accept_loop(void)
{
354
    connection_t *con;
Jack Moffitt's avatar
Jack Moffitt committed
355

356
    _build_pool();
Jack Moffitt's avatar
Jack Moffitt committed
357

358 359
    while (global.running == ICE_RUNNING)
    {
360
        if (global . schedule_config_reread)
361 362 363 364 365
        {
            /* reread config file */
            INFO0("Scheduling config reread ...");

            connection_inject_event(EVENT_CONFIG_READ, NULL);
366
            global . schedule_config_reread = 0;
367 368
        }

369
        con = _accept_connection();
Jack Moffitt's avatar
Jack Moffitt committed
370

371 372 373 374 375
        if (con) {
            _add_connection(con);
            _signal_pool();
        }
    }
Jack Moffitt's avatar
Jack Moffitt committed
376

377 378 379
    /* Give all the other threads notification to shut down */
    thread_cond_broadcast(&global.shutdown_cond);

380
    _destroy_pool();
Jack Moffitt's avatar
Jack Moffitt committed
381

382 383 384
    /* wait for all the sources to shutdown */
    thread_rwlock_wlock(&_source_shutdown_rwlock);
    thread_rwlock_unlock(&_source_shutdown_rwlock);
Jack Moffitt's avatar
Jack Moffitt committed
385 386 387 388
}

static connection_t *_get_connection(void)
{
389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414
    con_queue_t *node = NULL;
    con_queue_t *oldnode = NULL;
    connection_t *con = NULL;

    thread_mutex_lock(&_queue_mutex);
    if (_queue) {
        node = _queue;
        while (node->next) {
            oldnode = node;
            node = node->next;
        }
        
        /* node is now the last node
        ** and oldnode is the previous one, or NULL
        */
        if (oldnode) oldnode->next = NULL;
        else (_queue) = NULL;
    }
    thread_mutex_unlock(&_queue_mutex);

    if (node) {
        con = node->con;
        free(node);
    }

    return con;
Jack Moffitt's avatar
Jack Moffitt committed
415 416
}

Michael Smith's avatar
Michael Smith committed
417 418 419 420 421 422 423 424 425 426
void connection_inject_event(int eventnum, void *event_data) {
    connection_t *con = calloc(1, sizeof(connection_t));

    con->event_number = eventnum;
    con->event = event_data;

    _add_connection(con);
    _signal_pool();
}

427 428 429
/* TODO: Make this return an appropriate error code so that we can use HTTP
 * codes where appropriate
 */
430
int connection_create_source(client_t *client, connection_t *con, http_parser_t *parser, char *mount) {
431 432
    source_t *source;
    char *contenttype;
Michael Smith's avatar
Michael Smith committed
433
    mount_proxy *mountproxy, *mountinfo = NULL;
Michael Smith's avatar
Michael Smith committed
434 435 436 437 438 439
    int source_limit;
    ice_config_t *config;

    config = config_get_config();
    source_limit = config->source_limit;
    config_release_config();
440

441 442 443 444 445 446 447 448 449 450 451 452 453
    /* check to make sure this source wouldn't
    ** be over the limit
    */
    global_lock();
    if (global.sources >= source_limit) {
        INFO1("Source (%s) logged in, but there are too many sources", mount);
        global_unlock();
        return 0;
    }
    global.sources++;
    global_unlock();

    stats_event_inc(NULL, "sources");
Michael Smith's avatar
Michael Smith committed
454
    
Michael Smith's avatar
Michael Smith committed
455 456 457 458
    config = config_get_config();
    mountproxy = config->mounts;
    thread_mutex_lock(&(config_locks()->mounts_lock));

Michael Smith's avatar
Michael Smith committed
459 460 461 462 463 464 465
    while(mountproxy) {
        if(!strcmp(mountproxy->mountname, mount)) {
            mountinfo = mountproxy;
            break;
        }
        mountproxy = mountproxy->next;
    }
466

467
    contenttype = httpp_getvar(parser, "content-type");
468

469 470 471 472
    if (contenttype != NULL) {
        format_type_t format = format_get_type(contenttype);
        if (format == FORMAT_ERROR) {
            WARN1("Content-type \"%s\" not supported, dropping source", contenttype);
Michael Smith's avatar
Michael Smith committed
473
            thread_mutex_unlock(&(config_locks()->mounts_lock));
474
            config_release_config();
475
            goto fail;
476 477
        } else {
            source = source_create(client, con, parser, mount, 
Michael Smith's avatar
Michael Smith committed
478
                    format, mountinfo);
Michael Smith's avatar
Michael Smith committed
479
            thread_mutex_unlock(&(config_locks()->mounts_lock));
480 481
        }
    } else {
482
        format_type_t format = FORMAT_TYPE_MP3;
483
        ERROR0("No content-type header, falling back to backwards compatibility mode for icecast 1.x relays. Assuming content is mp3.");
Michael Smith's avatar
Michael Smith committed
484
        source = source_create(client, con, parser, mount, format, mountinfo);
Michael Smith's avatar
Michael Smith committed
485
        thread_mutex_unlock(&(config_locks()->mounts_lock));
486
    }
487
    config_release_config();
488

489
    source->send_return = 1;
490 491 492 493
    source->shutdown_rwlock = &_source_shutdown_rwlock;
    sock_set_blocking(con->sock, SOCK_NONBLOCK);
    thread_create("Source Thread", source_main, (void *)source, THREAD_DETACHED);
    return 1;
494 495 496 497 498 499 500 501

fail:
    global_lock();
    global.sources--;
    global_unlock();

    stats_event_dec(NULL, "sources");
    return 0;
502 503
}

504 505
static int _check_pass_http(http_parser_t *parser, 
        char *correctuser, char *correctpass)
506 507 508 509 510 511 512 513 514 515 516 517 518
{
    /* This will look something like "Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ==" */
    char *header = httpp_getvar(parser, "authorization");
    char *userpass, *tmp;
    char *username, *password;

    if(header == NULL)
        return 0;

    if(strncmp(header, "Basic ", 6))
        return 0;

    userpass = util_base64_decode(header+6);
519 520 521
    if(userpass == NULL) {
        WARN1("Base64 decode of Authorization header \"%s\" failed",
                header+6);
522
        return 0;
523
    }
524 525 526 527 528 529 530 531 532 533

    tmp = strchr(userpass, ':');
    if(!tmp) {
        free(userpass);
        return 0;
    }
    *tmp = 0;
    username = userpass;
    password = tmp+1;

534
    if(strcmp(username, correctuser) || strcmp(password, correctpass)) {
535 536 537
        free(userpass);
        return 0;
    }
538
    free(userpass);
539 540 541 542

    return 1;
}

543 544 545 546 547 548 549 550
static int _check_pass_icy(http_parser_t *parser, char *correctpass)
{
    char *password;

    password = httpp_getvar(parser, HTTPP_VAR_ICYPASSWORD);
    if(!password)
        return 0;

551
    if (strcmp(password, correctpass))
552 553 554 555 556
        return 0;
    else
        return 1;
}

557
static int _check_pass_ice(http_parser_t *parser, char *correctpass)
558
{
559
    char *password;
560 561 562 563 564

    password = httpp_getvar(parser, "ice-password");
    if(!password)
        password = "";

565
    if (strcmp(password, correctpass))
566 567 568 569 570
        return 0;
    else
        return 1;
}

571
int connection_check_admin_pass(http_parser_t *parser)
572
{
573
    int ret;
Michael Smith's avatar
Michael Smith committed
574 575 576
    ice_config_t *config = config_get_config();
    char *pass = config->admin_password;
    char *user = config->admin_username;
577 578 579 580 581 582 583

    if(!pass || !user) {
        config_release_config();
        return 0;
    }

    ret = _check_pass_http(parser, user, pass);
Michael Smith's avatar
Michael Smith committed
584
    config_release_config();
585 586
    return ret;
}
Michael Smith's avatar
Michael Smith committed
587

588 589 590 591 592 593
int connection_check_relay_pass(http_parser_t *parser)
{
    int ret;
    ice_config_t *config = config_get_config();
    char *pass = config->relay_password;
    char *user = "relay";
Michael Smith's avatar
Michael Smith committed
594

595 596
    if(!pass || !user) {
        config_release_config();
597
        return 0;
598
    }
599

600 601 602
    ret = _check_pass_http(parser, user, pass);
    config_release_config();
    return ret;
603 604
}

605
int connection_check_source_pass(http_parser_t *parser, char *mount)
606
{
Michael Smith's avatar
Michael Smith committed
607 608
    ice_config_t *config = config_get_config();
    char *pass = config->source_password;
609
    char *user = "source";
610
    int ret;
Michael Smith's avatar
Michael Smith committed
611
    int ice_login = config->ice_login;
612
    char *protocol;
Michael Smith's avatar
Michael Smith committed
613 614 615

    mount_proxy *mountinfo = config->mounts;
    thread_mutex_lock(&(config_locks()->mounts_lock));
616

617 618
    while(mountinfo) {
        if(!strcmp(mountinfo->mountname, mount)) {
619 620 621 622
            if(mountinfo->password)
                pass = mountinfo->password;
            if(mountinfo->username)
                user = mountinfo->username;
623 624
            break;
        }
625
        mountinfo = mountinfo->next;
626 627
    }

Michael Smith's avatar
Michael Smith committed
628 629
    thread_mutex_unlock(&(config_locks()->mounts_lock));

630 631
    if(!pass) {
        WARN0("No source password set, rejecting source");
632
        config_release_config();
633 634 635
        return 0;
    }

636
    protocol = httpp_getvar(parser, HTTPP_VAR_PROTOCOL);
637 638 639 640 641 642 643 644 645 646 647
    if(protocol != NULL && !strcmp(protocol, "ICY")) {
        ret = _check_pass_icy(parser, pass);
    }
    else {
        ret = _check_pass_http(parser, user, pass);
        if(!ret && ice_login)
        {
            ret = _check_pass_ice(parser, pass);
            if(ret)
                WARN0("Source is using deprecated icecast login");
        }
648
    }
649
    config_release_config();
650
    return ret;
651 652
}

653 654 655
static void _handle_source_request(connection_t *con, 
        http_parser_t *parser, char *uri)
{
656 657
    client_t *client;

658
    client = client_create(con, parser);
659

660 661
    INFO1("Source logging in at mountpoint \"%s\"", uri);
    stats_event_inc(NULL, "source_connections");
662 663
                
    if (!connection_check_source_pass(parser, uri)) {
Michael Smith's avatar
Michael Smith committed
664 665 666 667
        /* We commonly get this if the source client is using the wrong
         * protocol: attempt to diagnose this and return an error
         */
        /* TODO: Do what the above comment says */
668
        INFO1("Source (%s) attempted to login with invalid or missing password", uri);
669
        client_send_401(client);
670
        return;
671
    }
672

673 674 675
    /* check to make sure this source has
    ** a unique mountpoint
    */
676

677
    avl_tree_rlock(global.source_tree);
Michael Smith's avatar
Michael Smith committed
678
    if (source_find_mount_raw(uri) != NULL) {
679 680
        avl_tree_unlock(global.source_tree);
        INFO1("Source tried to log in as %s, but mountpoint is already used", uri);
681
        client_send_404(client, "Mountpoint in use");
682 683 684
        return;
    }
    avl_tree_unlock(global.source_tree);
685

686
    if (!connection_create_source(client, con, parser, uri)) {
687
        client_send_404(client, "Mountpoint in use");
688
    }
689 690 691 692
}

static void _handle_stats_request(connection_t *con, 
        http_parser_t *parser, char *uri)
Jack Moffitt's avatar
Jack Moffitt committed
693
{
694
    stats_connection_t *stats;
695

696 697 698
    stats_event_inc(NULL, "stats_connections");
                
    if (!connection_check_admin_pass(parser)) {
699
        ERROR0("Bad password for stats connection");
700 701
        connection_close(con);
        httpp_destroy(parser);
702
        return;
703 704 705 706 707 708 709 710 711 712
    }
                    
    stats_event_inc(NULL, "stats");
                    
    /* create stats connection and create stats handler thread */
    stats = (stats_connection_t *)malloc(sizeof(stats_connection_t));
    stats->parser = parser;
    stats->con = con;
                    
    thread_create("Stats Connection", stats_connection, (void *)stats, THREAD_DETACHED);
713 714 715 716 717 718
}

static void _handle_get_request(connection_t *con,
        http_parser_t *parser, char *uri)
{
    char *fullpath;
719
    client_t *client;
720
    int bytes;
721 722
    struct stat statbuf;
    source_t *source;
Michael Smith's avatar
Michael Smith committed
723 724 725
    int fileserve;
    char *host;
    int port;
726
    int i;
Karl Heyes's avatar
Karl Heyes committed
727 728
    char *serverhost = NULL;
    int serverport = 0;
729
    aliases *alias;
Michael Smith's avatar
Michael Smith committed
730 731 732 733 734 735 736
    ice_config_t *config;
    int client_limit;

    config = config_get_config();
    fileserve = config->fileserve;
    host = config->hostname;
    port = config->port;
737 738 739 740 741 742 743 744
    for(i = 0; i < MAX_LISTEN_SOCKETS; i++) {
        if(global.serversock[i] == con->serversock) {
            serverhost = config->listeners[i].bind_address;
            serverport = config->listeners[i].port;
            break;
        }
    }
    alias = config->aliases;
Michael Smith's avatar
Michael Smith committed
745 746 747
    client_limit = config->client_limit;
    config_release_config();

748 749 750

    DEBUG0("Client connected");

751 752 753 754 755 756 757
    /* make a client */
    client = client_create(con, parser);
    stats_event_inc(NULL, "client_connections");
                    
    /* there are several types of HTTP GET clients
    ** media clients, which are looking for a source (eg, URI = /stream.ogg)
    ** stats clients, which are looking for /admin/stats.xml
758
    ** and directory server authorizers, which are looking for /GUID-xxxxxxxx 
759
    ** (where xxxxxx is the GUID in question) - this isn't implemented yet.
760 761 762 763
    ** we need to handle the latter two before the former, as the latter two
    ** aren't subject to the limits.
    */
    /* TODO: add GUID-xxxxxx */
764

765 766 767 768 769 770 771 772 773
    /* Handle aliases */
    while(alias) {
        if(strcmp(uri, alias->source) == 0 && (alias->port == -1 || alias->port == serverport) && (alias->bind_address == NULL || (serverhost != NULL && strcmp(alias->bind_address, serverhost) == 0))) {
            uri = alias->destination;
            break;
        }
        alias = alias->next;
    }

774
    /* Dispatch all admin requests */
775
    if (strncmp(uri, "/admin/", 7) == 0) {
776
        admin_handle_request(client, uri);
Michael Smith's avatar
Michael Smith committed
777 778 779
        return;
    }

780 781 782 783
    /* Here we are parsing the URI request to see
    ** if the extension is .xsl, if so, then process
    ** this request as an XSLT request
    */
784 785
    fullpath = util_get_path_from_normalised_uri(uri);
    if (util_check_valid_extension(fullpath) == XSLT_CONTENT) {
786 787
        /* If the file exists, then transform it, otherwise, write a 404 */
        if (stat(fullpath, &statbuf) == 0) {
788
            DEBUG0("Stats request, sending XSL transformed stats");
789
            client->respcode = 200;
790
            bytes = sock_write(client->con->sock, 
791 792 793
                    "HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n");
            if(bytes > 0) client->con->sent_bytes = bytes;
            stats_transform_xslt(client, fullpath);
794 795 796
            client_destroy(client);
        }
        else {
797
            client_send_404(client, "The file you requested could not be found");
798
        }
799 800
        free(fullpath);
        return;
801
    }
802
    else if(fileserve && stat(fullpath, &statbuf) == 0 && 
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
803
#ifdef _WIN32
804
            ((statbuf.st_mode) & _S_IFREG))
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
805
#else
806
            S_ISREG(statbuf.st_mode)) 
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
807
#endif
Michael Smith's avatar
Michael Smith committed
808
    {
809
        fserve_client_create(client, fullpath);
810 811 812
        free(fullpath);
        return;
    }
813 814 815 816 817 818
    free(fullpath);

    if(strcmp(util_get_extension(uri), "m3u") == 0) {
        char *sourceuri = strdup(uri);
        char *dot = strrchr(sourceuri, '.');
        *dot = 0;
819 820 821
        avl_tree_rlock(global.source_tree);
        source = source_find_mount(sourceuri);
           if (source) {
822 823 824 825
            client->respcode = 200;
            bytes = sock_write(client->con->sock,
                    "HTTP/1.0 200 OK\r\n"
                    "Content-Type: audio/x-mpegurl\r\n\r\n"
826
                    "http://%s:%d%s\r\n", 
Michael Smith's avatar
Michael Smith committed
827 828
                    host, 
                    port,
829 830 831
                    sourceuri
                    );
            if(bytes > 0) client->con->sent_bytes = bytes;
832
            client_destroy(client);
833
        }
Michael Smith's avatar
Michael Smith committed
834
        else if(fileserve) {
835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853
            fullpath = util_get_path_from_normalised_uri(sourceuri);
            if(stat(fullpath, &statbuf) == 0) {
                fserve_client_create(client, fullpath);
                free(fullpath);
            }
            else {
                free(fullpath);
                fullpath = util_get_path_from_normalised_uri(uri);
                if(stat(fullpath, &statbuf) == 0) {
                    fserve_client_create(client, fullpath);
                    free(fullpath);
                }
                else {
                    free(fullpath);
                    client_send_404(client, 
                            "The file you requested could not be found");
                }
            }
        }
854 855 856
        else {
            client_send_404(client, "The file you requested could not be found");
        }
857
        avl_tree_unlock(global.source_tree);
858 859 860 861
        free(sourceuri);
        return;
    }

862 863
    global_lock();
    if (global.clients >= client_limit) {
Michael Smith's avatar
Michael Smith committed
864 865
        client_send_504(client,
                "The server is already full. Try again later.");
866
        global_unlock();
867
        return;
868 869 870 871 872 873
    }
    global_unlock();
                    
    avl_tree_rlock(global.source_tree);
    source = source_find_mount(uri);
    if (source) {
874
        DEBUG0("Source found for client");
Michael Smith's avatar
Michael Smith committed
875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897

        /* The source may not be the requested source - it might have gone
         * via one or more fallbacks. We only reject it for no-mount if it's
         * the originally requested source
         */
        if(strcmp(uri, source->mount) == 0 && source->no_mount) {
            client_send_404(client, "This mount is unavailable.");
            avl_tree_unlock(global.source_tree);
            return;
        }

        /* Check for any required authentication first */
        if(source->authenticator != NULL) {
            if(auth_check_client(source, client) != AUTH_OK) {
                INFO1("Client attempted to log in to source (\"%s\")with "
                        "incorrect or missing password", uri);
                client_send_401(client);
                avl_tree_unlock(global.source_tree);
                return;
            }
        }

        /* And then check that there's actually room in the server... */
898 899
        global_lock();
        if (global.clients >= client_limit) {
Michael Smith's avatar
Michael Smith committed
900 901
            client_send_504(client, 
                    "The server is already full. Try again later.");
902
            global_unlock();
903 904
            avl_tree_unlock(global.source_tree);
            return;
905
        }
Michael Smith's avatar
Michael Smith committed
906 907 908 909
        /* Early-out for per-source max listeners. This gets checked again
         * by the source itself, later. This route gives a useful message to
         * the client, also.
         */
Michael Smith's avatar
Michael Smith committed
910 911 912 913 914
        else if(source->max_listeners != -1 && 
                source->listeners >= source->max_listeners) 
        {
            client_send_504(client, 
                    "Too many clients on this mountpoint. Try again later.");
915
            global_unlock();
Michael Smith's avatar
Michael Smith committed
916 917 918
            avl_tree_unlock(global.source_tree);
            return;
        }
919 920 921
        global.clients++;
        global_unlock();
                        
Michael Smith's avatar
Michael Smith committed
922 923 924 925
        client->format_data = source->format->create_client_data(
                source->format, source, client);

        source->format->client_send_headers(source->format, source, client);
926 927
                        
        bytes = sock_write(client->con->sock, "\r\n");
928
        if(bytes > 0) client->con->sent_bytes += bytes;
929 930
                            
        sock_set_blocking(client->con->sock, SOCK_NONBLOCK);
931
        sock_set_nodelay(client->con->sock);
932 933 934 935 936 937 938 939 940
                        
        avl_tree_wlock(source->pending_tree);
        avl_insert(source->pending_tree, (void *)client);
        avl_tree_unlock(source->pending_tree);
    }
                    
    avl_tree_unlock(global.source_tree);
                    
    if (!source) {
941 942
        DEBUG0("Source not found for client");
        client_send_404(client, "The source you requested could not be found.");
943
    }
944 945 946 947
}

static void *_handle_connection(void *arg)
{
948 949 950
    char header[4096];
    connection_t *con;
    http_parser_t *parser;
951
    char *rawuri, *uri;
952
    client_t *client;
Jack Moffitt's avatar
Jack Moffitt committed
953

954 955
    while (global.running == ICE_RUNNING) {
        memset(header, 0, 4096);
Jack Moffitt's avatar
Jack Moffitt committed
956

957 958
        thread_cond_wait(&_pool_cond);
        if (global.running != ICE_RUNNING) break;
Jack Moffitt's avatar
Jack Moffitt committed
959

960 961
        /* grab a connection and set the socket to blocking */
        while ((con = _get_connection())) {
Michael Smith's avatar
Michael Smith committed
962 963 964 965 966 967 968 969 970 971 972 973 974 975 976

            /* Handle meta-connections */
            if(con->event_number > 0) {
                switch(con->event_number) {
                    case EVENT_CONFIG_READ:
                        event_config_read(con->event);
                        break;
                    default:
                        ERROR1("Unknown event number: %d", con->event_number);
                        break;
                }
                free(con);
                continue;
            }

977
            stats_event_inc(NULL, "connections");
Jack Moffitt's avatar
Jack Moffitt committed
978

979
            sock_set_blocking(con->sock, SOCK_BLOCK);
Jack Moffitt's avatar
Jack Moffitt committed
980

981 982 983 984 985 986
            /* fill header with the http header */
            if (util_read_header(con->sock, header, 4096) == 0) {
                /* either we didn't get a complete header, or we timed out */
                connection_close(con);
                continue;
            }
Jack Moffitt's avatar
Jack Moffitt committed
987

988 989 990 991 992 993
            parser = httpp_create_parser();
            httpp_initialize(parser, NULL);
            if (httpp_parse(parser, header, strlen(header))) {
                /* handle the connection or something */
                
                if (strcmp("ICE",  httpp_getvar(parser, HTTPP_VAR_PROTOCOL)) &&
994
                    strcmp("HTTP", httpp_getvar(parser, HTTPP_VAR_PROTOCOL))) {
995
                    ERROR0("Bad HTTP protocol detected");
996 997 998 999
                    connection_close(con);
                    httpp_destroy(parser);
                    continue;
                }
Jack Moffitt's avatar
Jack Moffitt committed
1000

1001 1002 1003 1004
                rawuri = httpp_getvar(parser, HTTPP_VAR_URI);
                uri = util_normalise_uri(rawuri);

                if(!uri) {
1005
                    client = client_create(con, parser);
1006
                    client_send_404(client, "The path you requested was invalid");
1007 1008
                    continue;
                }
1009

1010
                if (parser->req_type == httpp_req_source) {
1011 1012 1013 1014 1015 1016 1017 1018 1019
                    _handle_source_request(con, parser, uri);
                }
                else if (parser->req_type == httpp_req_stats) {
                    _handle_stats_request(con, parser, uri);
                }
                else if (parser->req_type == httpp_req_get) {
                    _handle_get_request(con, parser, uri);
                }
                else {
1020
                    ERROR0("Wrong request type from client");
1021 1022
                    connection_close(con);
                    httpp_destroy(parser);
1023 1024 1025
                }

                free(uri);
1026
            } 
1027 1028
            else if(httpp_parse_icy(parser, header, strlen(header))) {
                /* TODO: Map incoming icy connections to /icy_0, etc. */
1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040
                char mount[20];
                int i = 0;

                strcpy(mount, "/");

                avl_tree_rlock(global.source_tree);
                while(source_find_mount(mount) != NULL) {
                    sprintf(mount, "/icy_%d", i++);
                }
                avl_tree_unlock(global.source_tree);

                _handle_source_request(con, parser, mount);
1041 1042
            }
            else {
1043
                ERROR0("HTTP request parsing failed");
1044 1045 1046 1047 1048 1049
                connection_close(con);
                httpp_destroy(parser);
                continue;
            }
        }
    }
Jack Moffitt's avatar
Jack Moffitt committed
1050

1051
    thread_exit(0);
Jack Moffitt's avatar
Jack Moffitt committed
1052

1053
    return NULL;
Jack Moffitt's avatar
Jack Moffitt committed
1054 1055 1056 1057
}

void connection_close(connection_t *con)
{
1058 1059 1060 1061
    sock_close(con->sock);
    if (con->ip) free(con->ip);
    if (con->host) free(con->host);
    free(con);
Jack Moffitt's avatar
Jack Moffitt committed
1062
}