client.c 10 KB
Newer Older
1 2 3 4 5
/* Icecast
 *
 * This program is distributed under the GNU General Public License, version 2.
 * A copy of this license is included with this source.
 *
6
 * Copyright 2000-2004, Jack Moffitt <jack@xiph.org,
7 8 9 10
 *                      Michael Smith <msmith@xiph.org>,
 *                      oddsock <oddsock@xiph.org>,
 *                      Karl Heyes <karl@xiph.org>
 *                      and others (see AUTHORS for details).
Philipp Schafft's avatar
Philipp Schafft committed
11
 * Copyright 2011-2014, Philipp "ph3-der-loewe" Schafft <lion@lion.leolix.org>,
12 13
 */

Jack Moffitt's avatar
Jack Moffitt committed
14
/* client.c
15 16 17 18
 **
 ** client interface implementation
 **
 */
Jack Moffitt's avatar
Jack Moffitt committed
19

20 21 22 23
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

Jack Moffitt's avatar
Jack Moffitt committed
24 25 26
#include <stdlib.h>
#include <string.h>

Marvin Scholz's avatar
Marvin Scholz committed
27 28 29
#include "common/thread/thread.h"
#include "common/avl/avl.h"
#include "common/httpp/httpp.h"
Jack Moffitt's avatar
Jack Moffitt committed
30

31
#include "cfgfile.h"
Jack Moffitt's avatar
Jack Moffitt committed
32 33
#include "connection.h"
#include "refbuf.h"
Karl Heyes's avatar
Karl Heyes committed
34
#include "format.h"
35
#include "stats.h"
36
#include "fserve.h"
Jack Moffitt's avatar
Jack Moffitt committed
37 38

#include "client.h"
Philipp Schafft's avatar
Philipp Schafft committed
39
#include "auth.h"
Jack Moffitt's avatar
Jack Moffitt committed
40
#include "logging.h"
41

42 43
#include "util.h"

Philipp Schafft's avatar
Philipp Schafft committed
44 45 46
/* for ADMIN_COMMAND_ERROR */
#include "admin.h"

47 48 49
#ifdef _WIN32
#define snprintf _snprintf
#endif
Jack Moffitt's avatar
Jack Moffitt committed
50

51 52 53
#undef CATMODULE
#define CATMODULE "client"

54 55
static inline void client_send_500(client_t *client, const char *message);

56 57 58 59 60
/* create a client_t with the provided connection and parser details. Return
 * 0 on success, -1 if server limit has been reached.  In either case a
 * client_t is returned just in case a message needs to be returned. Should
 * be called with global lock held.
 */
61
int client_create(client_t **c_ptr, connection_t *con, http_parser_t *parser)
Jack Moffitt's avatar
Jack Moffitt committed
62
{
Marvin Scholz's avatar
Marvin Scholz committed
63 64 65
    ice_config_t    *config;
    client_t        *client = (client_t *) calloc(1, sizeof(client_t));
    int              ret    = -1;
66 67

    if (client == NULL)
68
        abort();
69

70
    config = config_get_config();
71 72

    global.clients++;
Marvin Scholz's avatar
Marvin Scholz committed
73
    if (config->client_limit < global.clients) {
74
        ICECAST_LOG_WARN("server client limit reached (%d/%d)", config->client_limit, global.clients);
Marvin Scholz's avatar
Marvin Scholz committed
75
    } else {
76
        ret = 0;
Marvin Scholz's avatar
Marvin Scholz committed
77
    }
Jack Moffitt's avatar
Jack Moffitt committed
78

79 80 81
    config_release_config ();

    stats_event_args (NULL, "clients", "%d", global.clients);
82 83
    client->con = con;
    client->parser = parser;
Philipp Schafft's avatar
Philipp Schafft committed
84 85
    client->protocol = ICECAST_PROTOCOL_HTTP;
    client->admin_command = ADMIN_COMMAND_ERROR;
86 87
    client->refbuf = refbuf_new (PER_CLIENT_REFBUF_SIZE);
    client->refbuf->len = 0; /* force reader code to ignore buffer contents */
88
    client->pos = 0;
89
    client->write_to_client = format_generic_write_to_client;
90
    *c_ptr = client;
Jack Moffitt's avatar
Jack Moffitt committed
91

92
    return ret;
Jack Moffitt's avatar
Jack Moffitt committed
93 94
}

95 96 97 98 99 100 101 102 103 104 105
static inline void client_reuseconnection(client_t *client) {
    connection_t *con;
    reuse_t reuse;

    if (!client)
        return;

    con = client->con;
    con = connection_create(con->sock, con->serversock, strdup(con->ip));
    reuse = client->reuse;
    client->con->sock = -1; /* TODO: do not use magic */
106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121

    /* handle to keep the TLS connection */
#ifdef HAVE_OPENSSL
    if (client->con->ssl) {
        /* AHhhggrr.. That pain....
         * stealing SSL state...
         */
        con->ssl  = client->con->ssl;
        con->read = client->con->read;
        con->send = client->con->send;
        client->con->ssl  = NULL;
        client->con->read = NULL;
        client->con->send = NULL;
    }
#endif

122 123 124 125
    client->reuse = ICECAST_REUSE_CLOSE;

    client_destroy(client);

126 127
    if (reuse == ICECAST_REUSE_UPGRADETLS)
        connection_uses_ssl(con);
128 129 130
    connection_queue(con);
}

Jack Moffitt's avatar
Jack Moffitt committed
131 132
void client_destroy(client_t *client)
{
Philipp Schafft's avatar
Philipp Schafft committed
133
    ICECAST_LOG_DEBUG("Called to destory client %p", client);
Karl Heyes's avatar
Karl Heyes committed
134 135
    if (client == NULL)
        return;
136

137 138 139 140 141
    if (client->reuse != ICECAST_REUSE_CLOSE) {
        client_reuseconnection(client);
        return;
    }

142 143
    /* release the buffer now, as the buffer could be on the source queue
     * and may of disappeared after auth completes */
Marvin Scholz's avatar
Marvin Scholz committed
144
    if (client->refbuf) {
145 146 147 148
        refbuf_release (client->refbuf);
        client->refbuf = NULL;
    }

Philipp Schafft's avatar
Philipp Schafft committed
149
    if (auth_release_client(client))
150 151
        return;

152
    /* write log entry if ip is set (some things don't set it, like outgoing
153 154
     * slave requests
     */
Karl Heyes's avatar
Karl Heyes committed
155
    if (client->respcode && client->parser)
156
        logging_access(client);
157 158
    if (client->con)
        connection_close(client->con);
Karl Heyes's avatar
Karl Heyes committed
159 160
    if (client->parser)
        httpp_destroy(client->parser);
161 162
    if (client->encoding)
        httpp_encoding_release(client->encoding);
Jack Moffitt's avatar
Jack Moffitt committed
163

164
    global_lock();
165
    global.clients--;
166 167
    stats_event_args(NULL, "clients", "%d", global.clients);
    global_unlock();
168

169 170
    /* we need to free client specific format data (if any) */
    if (client->free_client_data)
171
        client->free_client_data(client);
172

Michael Smith's avatar
Michael Smith committed
173
    free(client->username);
Karl Heyes's avatar
Karl Heyes committed
174
    free(client->password);
Philipp Schafft's avatar
Philipp Schafft committed
175 176
    free(client->role);
    acl_release(client->acl);
Michael Smith's avatar
Michael Smith committed
177

178
    free(client);
Jack Moffitt's avatar
Jack Moffitt committed
179
}
180

181
/* helper function for reading data from a client */
182 183 184 185 186 187 188 189 190 191 192 193 194 195
static ssize_t __client_read_bytes_real(client_t *client, void *buf, size_t len)
{
    /* we have data to read from a refbuf first */
    if (client->refbuf->len < len)
        len = client->refbuf->len;
    memcpy (buf, client->refbuf->data, len);
    if (len < client->refbuf->len) {
        char *ptr = client->refbuf->data;
        memmove (ptr, ptr+len, client->refbuf->len - len);
    }
    client->refbuf->len -= len;
    return len;
}

196
int client_read_bytes(client_t *client, void *buf, unsigned len)
197
{
198 199
    ssize_t (*reader)(void*, void*, size_t) = (ssize_t(*)(void*,void*,size_t))__client_read_bytes_real;
    void *userdata = client;
200
    int bytes;
201

202 203 204 205 206 207 208 209 210
    if (!(client->refbuf && client->refbuf->len)) {
        reader = (ssize_t(*)(void*,void*,size_t))connection_read_bytes;
        userdata = client->con;
    }

    if (client->encoding) {
        bytes = httpp_encoding_read(client->encoding, buf, len, reader, userdata);
    } else {
        bytes = reader(userdata, buf, len);
211
    }
212

213
    if (bytes == -1 && client->con->error)
214
        ICECAST_LOG_DEBUG("reading from connection has failed");
215 216

    return bytes;
217 218
}

219
void client_send_error(client_t *client, int status, int plain, const char *message)
220
{
221
    ssize_t ret;
222
    refbuf_t *data;
223

224 225 226 227 228
    if (status == 500) {
         client_send_500(client, message);
         return;
    }

229 230 231 232 233 234
    data = refbuf_new(PER_CLIENT_REFBUF_SIZE);
    if (!data) {
         client_send_500(client, message);
         return;
    }

235 236
    client->reuse = ICECAST_REUSE_KEEPALIVE;

237
    ret = util_http_build_header(client->refbuf->data, PER_CLIENT_REFBUF_SIZE, 0,
238
                                 0, status, NULL,
239
                                 plain ? "text/plain" : "text/html", "utf-8",
240
                                 NULL, NULL, client);
241

242 243 244 245 246 247
    if (ret == -1 || ret >= PER_CLIENT_REFBUF_SIZE) {
        ICECAST_LOG_ERROR("Dropping client as we can not build response headers.");
        client_send_500(client, "Header generation failed.");
        return;
    }

248 249 250 251 252
    if (plain) {
        strncpy(data->data, message, data->len);
        data->data[data->len-1] = 0;
    } else {
        snprintf(data->data, data->len,
253 254
                 "<html><head><title>Error %i</title></head><body><b>%i - %s</b></body></html>\r\n",
                 status, status, message);
255 256 257 258
    }
    data->len = strlen(data->data);

    snprintf(client->refbuf->data + ret, PER_CLIENT_REFBUF_SIZE - ret,
259
             "Content-Length: %llu\r\n\r\n",
260
             (long long unsigned int)data->len);
261

262
    client->respcode = status;
263
    client->refbuf->len = strlen (client->refbuf->data);
264 265
    client->refbuf->next = data;

266
    fserve_add_client (client, NULL);
267 268
}

269 270 271 272 273 274 275 276 277 278 279 280
void client_send_101(client_t *client, reuse_t reuse)
{
    ssize_t ret;

    if (!client)
        return;

    if (reuse != ICECAST_REUSE_UPGRADETLS) {
        client_send_500(client, "Bad reuse parameter");
        return;
    }

281 282
    client->reuse = reuse;

283 284 285 286 287 288
    ret = util_http_build_header(client->refbuf->data, PER_CLIENT_REFBUF_SIZE, 0,
                                 0, 101, NULL,
                                 "text/plain", "utf-8",
                                 NULL, NULL, client);

    snprintf(client->refbuf->data + ret, PER_CLIENT_REFBUF_SIZE - ret,
289
             "Content-Length: 0\r\nUpgrade: TLS/1.0, HTTP/1.0\r\n\r\n");
290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308

    client->respcode = 101;
    client->refbuf->len = strlen(client->refbuf->data);

    fserve_add_client(client, NULL);
}

void client_send_426(client_t *client, reuse_t reuse)
{
    ssize_t ret;

    if (!client)
        return;

    if (reuse != ICECAST_REUSE_UPGRADETLS) {
        client_send_500(client, "Bad reuse parameter");
        return;
    }

309 310
    client->reuse = reuse;

311 312 313 314 315 316
    ret = util_http_build_header(client->refbuf->data, PER_CLIENT_REFBUF_SIZE, 0,
                                 0, 426, NULL,
                                 "text/plain", "utf-8",
                                 NULL, NULL, client);

    snprintf(client->refbuf->data + ret, PER_CLIENT_REFBUF_SIZE - ret,
317
             "Content-Length: 0\r\nUpgrade: TLS/1.0, HTTP/1.0\r\n\r\n");
318 319 320 321 322 323 324 325 326

    client->respcode = 426;
    client->refbuf->len = strlen(client->refbuf->data);

    client->reuse = ICECAST_REUSE_KEEPALIVE;

    fserve_add_client(client, NULL);
}

327
/* this function is designed to work even if client is in bad state */
Marvin Scholz's avatar
Marvin Scholz committed
328 329
static inline void client_send_500(client_t *client, const char *message)
{
330 331
    const char header[] = "HTTP/1.0 500 Internal Server Error\r\nContent-Type: text/plain; charset=utf-8\r\n\r\n"
                          "500 - Internal Server Error\n---------------------------\n";
Philipp Schafft's avatar
Philipp Schafft committed
332 333
    const ssize_t header_len = sizeof(header) - 1;
    ssize_t ret;
334 335 336 337 338 339 340 341 342

    ret = client_send_bytes(client, header, header_len);

    /* only send message if we have one AND if header could have transmitted completly */
    if (message && ret == header_len)
        client_send_bytes(client, message, strlen(message));

    client_destroy(client);
}
343 344

/* helper function for sending the data to a client */
345
int client_send_bytes(client_t *client, const void *buf, unsigned len)
346
{
347
    int ret = client->con->send(client->con, buf, len);
348 349

    if (client->con->error)
350
        ICECAST_LOG_DEBUG("Client connection died");
351

352 353 354
    return ret;
}

355
void client_set_queue(client_t *client, refbuf_t *refbuf)
Karl Heyes's avatar
Karl Heyes committed
356 357 358 359
{
    refbuf_t *to_release = client->refbuf;

    client->refbuf = refbuf;
Karl Heyes's avatar
Karl Heyes committed
360
    if (refbuf)
361
        refbuf_addref(client->refbuf);
Karl Heyes's avatar
Karl Heyes committed
362 363
    client->pos = 0;
    if (to_release)
364
        refbuf_release(to_release);
Karl Heyes's avatar
Karl Heyes committed
365
}