format_mp3.c 11.5 KB
Newer Older
1
/* -*- c-basic-offset: 4; -*- */
Michael Smith's avatar
Michael Smith committed
2
3
/* format_mp3.c
**
Michael Smith's avatar
Michael Smith committed
4
** format plugin for mp3
Michael Smith's avatar
Michael Smith committed
5
6
7
**
*/

8
9
10
11
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

Michael Smith's avatar
Michael Smith committed
12
13
14
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
Karl Heyes's avatar
Karl Heyes committed
15
16
17
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
Michael Smith's avatar
Michael Smith committed
18

brendan's avatar
brendan committed
19
20
21
22
#ifdef HAVE_ALLOCA_H
#include <alloca.h>
#endif

Michael Smith's avatar
Michael Smith committed
23
#include "refbuf.h"
Michael Smith's avatar
Michael Smith committed
24
25
#include "source.h"
#include "client.h"
Michael Smith's avatar
Michael Smith committed
26
27
28

#include "stats.h"
#include "format.h"
Michael Smith's avatar
Michael Smith committed
29
30
31
32
33
34
#include "httpp/httpp.h"

#include "logging.h"

#include "format_mp3.h"

Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
35
36
37
#ifdef WIN32
#define strcasecmp stricmp
#define strncasecmp strnicmp
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
38
#define alloca _alloca
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
39
40
#endif

Michael Smith's avatar
Michael Smith committed
41
42
#define CATMODULE "format-mp3"

43
44
45
/* Note that this seems to be 8192 in shoutcast - perhaps we want to be the
 * same for compability with crappy clients?
 */
Michael Smith's avatar
Michael Smith committed
46
#define ICY_METADATA_INTERVAL 16000
Michael Smith's avatar
Michael Smith committed
47

48
49
50
51
static void format_mp3_free_plugin(format_plugin_t *self);
static int format_mp3_get_buffer(format_plugin_t *self, char *data, 
        unsigned long len, refbuf_t **buffer);
static refbuf_queue_t *format_mp3_get_predata(format_plugin_t *self);
Michael Smith's avatar
Michael Smith committed
52
53
54
55
56
57
58
59
static void *format_mp3_create_client_data(format_plugin_t *self,
        source_t *source, client_t *client);
static int format_mp3_write_buf_to_client(format_plugin_t *self,
        client_t *client, unsigned char *buf, int len);
static void format_mp3_send_headers(format_plugin_t *self, 
        source_t *source, client_t *client);

typedef struct {
Michael Smith's avatar
Michael Smith committed
60
   int use_metadata;
Michael Smith's avatar
Michael Smith committed
61
62
   int interval;
   int offset;
Michael Smith's avatar
Michael Smith committed
63
64
   int metadata_age;
   int metadata_offset;
Michael Smith's avatar
Michael Smith committed
65
} mp3_client_data;
Ed "oddsock" Zaleski's avatar
Ed "oddsock" Zaleski committed
66

67
format_plugin_t *format_mp3_get_plugin(http_parser_t *parser)
Michael Smith's avatar
Michael Smith committed
68
{
69
    char *metadata;
70
    format_plugin_t *plugin;
Michael Smith's avatar
Michael Smith committed
71
    mp3_state *state = calloc(1, sizeof(mp3_state));
Michael Smith's avatar
Michael Smith committed
72

73
    plugin = (format_plugin_t *)malloc(sizeof(format_plugin_t));
Michael Smith's avatar
Michael Smith committed
74

75
76
77
78
    plugin->type = FORMAT_TYPE_MP3;
    plugin->has_predata = 0;
    plugin->get_buffer = format_mp3_get_buffer;
    plugin->get_predata = format_mp3_get_predata;
Michael Smith's avatar
Michael Smith committed
79
    plugin->write_buf_to_client = format_mp3_write_buf_to_client;
80
    plugin->create_client_data = format_mp3_create_client_data;
Michael Smith's avatar
Michael Smith committed
81
    plugin->client_send_headers = format_mp3_send_headers;
82
    plugin->free_plugin = format_mp3_free_plugin;
83
    plugin->format_description = "MP3 audio";
Michael Smith's avatar
Michael Smith committed
84

85
    plugin->_state = state;
Michael Smith's avatar
Michael Smith committed
86

Michael Smith's avatar
Michael Smith committed
87
88
    state->metadata_age = 0;
    state->metadata = strdup("");
Michael Smith's avatar
Michael Smith committed
89
    thread_mutex_create(&(state->lock));
Michael Smith's avatar
Michael Smith committed
90

91
92
93
94
    metadata = httpp_getvar(parser, "icy-metaint");
    if(metadata)
        state->inline_metadata_interval = atoi(metadata);

95
    return plugin;
Michael Smith's avatar
Michael Smith committed
96
97
}

Michael Smith's avatar
Michael Smith committed
98
99
100
101
102
103
104
105
106
static int send_metadata(client_t *client, mp3_client_data *client_state,
        mp3_state *source_state)
{
    int send_metadata;
    int len_byte;
    int len;
    unsigned char *buf;
    int ret;
    int source_age;
107
108
    char    *fullmetadata = NULL;
    int    fullmetadata_size = 0;
Michael Smith's avatar
Michael Smith committed
109
110
111
112
113
114
115
116

    thread_mutex_lock(&(source_state->lock));
    if(source_state->metadata == NULL) {
        /* Shouldn't be possible */
        thread_mutex_unlock(&(source_state->lock));
        return 0;
    }

117
118
119
120
121
122
123
    if(source_state->metadata_raw) {
        fullmetadata_size = strlen(source_state->metadata);
        fullmetadata = source_state->metadata;
    }
    else {
        fullmetadata_size = strlen(source_state->metadata) + 
            strlen("StreamTitle='';StreamUrl=''") + 1;
124

125
        fullmetadata = alloca(fullmetadata_size);
126

127
128
129
        sprintf(fullmetadata, "StreamTitle='%s';StreamUrl=''", 
                source_state->metadata);
    }
130

Michael Smith's avatar
Michael Smith committed
131
    source_age = source_state->metadata_age;
Michael Smith's avatar
Michael Smith committed
132
133
    send_metadata = source_age != client_state->metadata_age;

134
135
    if(send_metadata && strlen(fullmetadata) > 0)
        len_byte = strlen(fullmetadata)/16 + 1 - 
Michael Smith's avatar
Michael Smith committed
136
137
138
            client_state->metadata_offset;
    else
        len_byte = 0;
Michael Smith's avatar
Michael Smith committed
139
140
141
142
143
144
145
    len = 1 + len_byte*16;
    buf = alloca(len);

    memset(buf, 0, len);

    buf[0] = len_byte;

146
    if (len > 1) {
147
        strncpy(buf+1, fullmetadata + client_state->metadata_offset, len-2);
148
    }
Michael Smith's avatar
Michael Smith committed
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165

    thread_mutex_unlock(&(source_state->lock));

    ret = sock_write_bytes(client->con->sock, buf, len);

    if(ret > 0 && ret < len) {
        client_state->metadata_offset += ret;
    }
    else if(ret == len) {
        client_state->metadata_age = source_age;
        client_state->offset = 0;
        client_state->metadata_offset = 0;
    }

    return ret;
}

Michael Smith's avatar
Michael Smith committed
166
167
168
169
static int format_mp3_write_buf_to_client(format_plugin_t *self, 
    client_t *client, unsigned char *buf, int len) 
{
    int ret;
Michael Smith's avatar
Michael Smith committed
170
    
171
172
    if(((mp3_state *)self->_state)->metadata && 
            ((mp3_client_data *)(client->format_data))->use_metadata)
Michael Smith's avatar
Michael Smith committed
173
174
175
    {
        mp3_client_data *state = client->format_data;
        int max = state->interval - state->offset;
Michael Smith's avatar
Michael Smith committed
176

Michael Smith's avatar
Michael Smith committed
177
178
179
180
181
182
183
184
185
186
187
        if(len == 0) /* Shouldn't happen */
            return 0;

        if(max > len)
            max = len;

        if(max > 0) {
            ret = sock_write_bytes(client->con->sock, buf, max);
            if(ret > 0)
                state->offset += ret;
        }
188
        else {
Michael Smith's avatar
Michael Smith committed
189
            ret = send_metadata(client, state, self->_state);
190
191
192
193
            if(ret > 0)
                client->con->sent_bytes += ret;
            ret = 0;
        }
194

Michael Smith's avatar
Michael Smith committed
195
196
197
198
    }
    else {
        ret = sock_write_bytes(client->con->sock, buf, len);
    }
Michael Smith's avatar
Michael Smith committed
199
200

    if(ret < 0) {
201
        if(sock_recoverable(sock_error())) {
Michael Smith's avatar
Michael Smith committed
202
203
204
205
206
207
208
209
210
211
212
            DEBUG1("Client had recoverable error %ld", ret);
            ret = 0;
        }
    }
    else
        client->con->sent_bytes += ret;

    return ret;
}

static void format_mp3_free_plugin(format_plugin_t *self)
Michael Smith's avatar
Michael Smith committed
213
{
214
    /* free the plugin instance */
Michael Smith's avatar
Michael Smith committed
215
216
    mp3_state *state = self->_state;
    thread_mutex_destroy(&(state->lock));
Michael Smith's avatar
Michael Smith committed
217
218

    free(state->metadata);
Michael Smith's avatar
Michael Smith committed
219
    free(state);
220
    free(self);
Michael Smith's avatar
Michael Smith committed
221
222
}

Michael Smith's avatar
Michael Smith committed
223
224
static int format_mp3_get_buffer(format_plugin_t *self, char *data, 
    unsigned long len, refbuf_t **buffer)
Michael Smith's avatar
Michael Smith committed
225
{
226
    refbuf_t *refbuf;
227
228
    mp3_state *state = self->_state;

229
230
231
232
    /* Set this to NULL in case it doesn't get set to a valid buffer later */
    *buffer = NULL;

    if(!data)
Michael Smith's avatar
Michael Smith committed
233
        return 0;
234

235
    if(state->inline_metadata_interval) {
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
        /* Source is sending metadata, handle it... */

        while(len > 0) {
            int to_read = state->inline_metadata_interval - state->offset;
            if(to_read > 0) {
                refbuf_t *old_refbuf = *buffer;

                if(to_read > len)
                    to_read = len;

                if(old_refbuf) {
                    refbuf = refbuf_new(to_read + old_refbuf->len);
                    memcpy(refbuf->data, old_refbuf->data, old_refbuf->len);
                    memcpy(refbuf->data+old_refbuf->len, data, to_read);

                    refbuf_release(old_refbuf);
                }
                else {
                    refbuf = refbuf_new(to_read);
                    memcpy(refbuf->data, data, to_read);
                }

                *buffer = refbuf;

                state->offset += to_read;
                data += to_read;
                len -= to_read;
            }
            else if(!state->metadata_length) {
                /* Next up is the metadata byte... */
                unsigned char byte = data[0];
                data++;
                len--;

                /* According to the "spec"... this byte * 16 */
                state->metadata_length = byte * 16;
272

273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
                if(state->metadata_length) {
                    state->metadata_buffer = 
                        calloc(state->metadata_length + 1, 1);

                    /* Ensure we have a null-terminator even if the source
                     * stream is invalid.
                     */
                    state->metadata_buffer[state->metadata_length] = 0;
                }
                else {
                    state->offset = 0;
                }

                state->metadata_offset = 0;
            }
            else {
                /* Metadata to read! */
                int readable = state->metadata_length - state->metadata_offset;

                if(readable > len)
                    readable = len;

                memcpy(state->metadata_buffer + state->metadata_offset, 
                        data, readable);

298
299
                state->metadata_offset += readable;

300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
                data += readable;
                len -= readable;

                if(state->metadata_offset == state->metadata_length)
                {
                    if(state->metadata_length)
                    {
                        thread_mutex_lock(&(state->lock));
                        free(state->metadata);
                        state->metadata = state->metadata_buffer;
                        state->metadata_buffer = NULL;
                        state->metadata_age++;
                        state->metadata_raw = 1;
                        thread_mutex_unlock(&(state->lock));
                    }
315
316
317

                    state->offset = 0;
                    state->metadata_length = 0;
318
319
320
321
322
323
324
325
                }
            }
        }

        /* Either we got a buffer above (in which case it can be used), or
         * we set *buffer to NULL in the prologue, so the return value is
         * correct anyway...
         */
326
327
328
        return 0;
    }
    else {
329
        /* Simple case - no metadata, just dump data directly to a buffer */
330
        refbuf = refbuf_new(len);
Michael Smith's avatar
Michael Smith committed
331

332
        memcpy(refbuf->data, data, len);
Michael Smith's avatar
Michael Smith committed
333

334
        *buffer = refbuf;
335
        return 0;
336
    }
Michael Smith's avatar
Michael Smith committed
337
338
}

Michael Smith's avatar
Michael Smith committed
339
static refbuf_queue_t *format_mp3_get_predata(format_plugin_t *self)
Michael Smith's avatar
Michael Smith committed
340
341
342
343
{
    return NULL;
}

Michael Smith's avatar
Michael Smith committed
344
345
346
347
348
349
350
351
352
static void *format_mp3_create_client_data(format_plugin_t *self, 
        source_t *source, client_t *client) 
{
    mp3_client_data *data = calloc(1,sizeof(mp3_client_data));
    char *metadata;

    data->interval = ICY_METADATA_INTERVAL;
    data->offset = 0;

353
    metadata = httpp_getvar(client->parser, "icy-metadata");
Michael Smith's avatar
Michael Smith committed
354
    if(metadata)
Michael Smith's avatar
Michael Smith committed
355
        data->use_metadata = atoi(metadata)>0?1:0;
Michael Smith's avatar
Michael Smith committed
356
357

    return data;
358
}
Michael Smith's avatar
Michael Smith committed
359

Michael Smith's avatar
Michael Smith committed
360
361
362
static void format_mp3_send_headers(format_plugin_t *self,
        source_t *source, client_t *client)
{
363
364
    http_var_t *var;
    avl_node *node;
Michael Smith's avatar
Michael Smith committed
365
366
367
    int bytes;
    
    client->respcode = 200;
Michael Smith's avatar
Michael Smith committed
368
    /* TODO: This may need to be ICY/1.0 for shoutcast-compatibility? */
Michael Smith's avatar
Michael Smith committed
369
370
371
372
373
374
375
    bytes = sock_write(client->con->sock, 
            "HTTP/1.0 200 OK\r\n" 
            "Content-Type: %s\r\n", 
            format_get_mimetype(source->format->type));

    if(bytes > 0) client->con->sent_bytes += bytes;

376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
    /* iterate through source http headers and send to client */
    avl_tree_rlock(source->parser->vars);
    node = avl_get_first(source->parser->vars);
    while (node) {
        var = (http_var_t *)node->key;
	if (!strcasecmp(var->name, "ice-audio-info")) {
	    /* convert ice-audio-info to icy-br */
	    char *brfield;
	    unsigned int bitrate;

	    brfield = strstr(var->value, "bitrate=");
	    if (brfield && sscanf(var->value, "bitrate=%u", &bitrate)) {
		bytes = sock_write(client->con->sock, "icy-br:%u\r\n", bitrate);
		if (bytes > 0)
		    client->con->sent_bytes += bytes;
	    }
	} else if (strcasecmp(var->name, "ice-password") &&
	    strcasecmp(var->name, "icy-metaint") &&
	    (!strncasecmp("ice-", var->name, 4) ||
	     !strncasecmp("icy-", var->name, 4))) {
	    bytes = sock_write(client->con->sock, "icy%s:%s\r\n",
			       var->name + 3, var->value);
            if (bytes > 0)
		client->con->sent_bytes += bytes;
        }
        node = avl_get_next(node);
    }
    avl_tree_unlock(source->parser->vars);
Michael Smith's avatar
Michael Smith committed
404

Michael Smith's avatar
Michael Smith committed
405
    if(((mp3_client_data *)(client->format_data))->use_metadata) {
406
        int bytes = sock_write(client->con->sock, "icy-metaint:%d\r\n", 
Michael Smith's avatar
Michael Smith committed
407
408
409
410
                ICY_METADATA_INTERVAL);
        if(bytes > 0)
            client->con->sent_bytes += bytes;
    }
411
412
413
414
415

    bytes = sock_write(client->con->sock,
		       "Server: %s\r\n", ICECAST_VERSION_STRING);
    if (bytes > 0)
	client->con->sent_bytes += bytes;
Michael Smith's avatar
Michael Smith committed
416
417
}