State more clearly in README that LGPLv3 is allowed
[deb_shairplay.git] / src / lib / raop.c
CommitLineData
23e7e3ae
JVH
1/**
2 * Copyright (C) 2011-2012 Juho Vähä-Herttua
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 */
14
2340bcd3
JVH
15#include <stdlib.h>
16#include <stdio.h>
17#include <string.h>
18#include <assert.h>
19
20#include "raop.h"
21#include "raop_rtp.h"
22#include "rsakey.h"
e4169f77 23#include "digest.h"
2340bcd3
JVH
24#include "httpd.h"
25#include "sdp.h"
26
27#include "global.h"
28#include "utils.h"
29#include "netutils.h"
30#include "logger.h"
566c9bf8 31#include "compat.h"
2340bcd3
JVH
32
33/* Actually 345 bytes for 2048-bit key */
34#define MAX_SIGNATURE_LEN 512
35
e4169f77
JVH
36/* Let's just decide on some length */
37#define MAX_PASSWORD_LEN 64
38
39/* MD5 as hex fits here */
268f72c8 40#define MAX_NONCE_LEN 32
e4169f77 41
2340bcd3
JVH
42struct raop_s {
43 /* Callbacks for audio */
44 raop_callbacks_t callbacks;
45
46 /* Logger instance */
47 logger_t logger;
48
49 /* HTTP daemon and RSA key */
50 httpd_t *httpd;
51 rsakey_t *rsakey;
52
53 /* Hardware address information */
54 unsigned char hwaddr[MAX_HWADDR_LEN];
55 int hwaddrlen;
e4169f77
JVH
56
57 /* Password information */
58 char password[MAX_PASSWORD_LEN+1];
2340bcd3
JVH
59};
60
61struct raop_conn_s {
62 raop_t *raop;
63 raop_rtp_t *raop_rtp;
64
65 unsigned char *local;
66 int locallen;
67
68 unsigned char *remote;
69 int remotelen;
e4169f77
JVH
70
71 char nonce[MAX_NONCE_LEN+1];
2340bcd3
JVH
72};
73typedef struct raop_conn_s raop_conn_t;
74
75static void *
76conn_init(void *opaque, unsigned char *local, int locallen, unsigned char *remote, int remotelen)
77{
78 raop_conn_t *conn;
2340bcd3
JVH
79
80 conn = calloc(1, sizeof(raop_conn_t));
81 if (!conn) {
82 return NULL;
83 }
84 conn->raop = opaque;
85 conn->raop_rtp = NULL;
86
c891f978
JVH
87 if (locallen == 4) {
88 logger_log(&conn->raop->logger, LOGGER_INFO,
46212791 89 "Local: %d.%d.%d.%d",
c891f978
JVH
90 local[0], local[1], local[2], local[3]);
91 } else if (locallen == 16) {
92 logger_log(&conn->raop->logger, LOGGER_INFO,
46212791 93 "Local: %02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x",
c891f978
JVH
94 local[0], local[1], local[2], local[3], local[4], local[5], local[6], local[7],
95 local[8], local[9], local[10], local[11], local[12], local[13], local[14], local[15]);
2340bcd3 96 }
c891f978
JVH
97 if (remotelen == 4) {
98 logger_log(&conn->raop->logger, LOGGER_INFO,
46212791 99 "Remote: %d.%d.%d.%d",
c891f978
JVH
100 remote[0], remote[1], remote[2], remote[3]);
101 } else if (remotelen == 16) {
102 logger_log(&conn->raop->logger, LOGGER_INFO,
46212791 103 "Remote: %02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x",
c891f978
JVH
104 remote[0], remote[1], remote[2], remote[3], remote[4], remote[5], remote[6], remote[7],
105 remote[8], remote[9], remote[10], remote[11], remote[12], remote[13], remote[14], remote[15]);
2340bcd3 106 }
2340bcd3
JVH
107
108 conn->local = malloc(locallen);
109 assert(conn->local);
110 memcpy(conn->local, local, locallen);
111
112 conn->remote = malloc(remotelen);
113 assert(conn->remote);
114 memcpy(conn->remote, remote, remotelen);
115
116 conn->locallen = locallen;
117 conn->remotelen = remotelen;
e4169f77
JVH
118
119 digest_generate_nonce(conn->nonce, sizeof(conn->nonce));
2340bcd3
JVH
120 return conn;
121}
122
123static void
124conn_request(void *ptr, http_request_t *request, http_response_t **response)
125{
126 raop_conn_t *conn = ptr;
127 raop_t *raop = conn->raop;
128
129 http_response_t *res;
130 const char *method;
131 const char *cseq;
132 const char *challenge;
e4169f77 133 int require_auth = 0;
2340bcd3
JVH
134
135 method = http_request_get_method(request);
136 cseq = http_request_get_header(request, "CSeq");
137 if (!method || !cseq) {
138 return;
139 }
140
141 res = http_response_init("RTSP/1.0", 200, "OK");
e4169f77
JVH
142 if (strlen(raop->password)) {
143 const char *authorization;
144
145 authorization = http_request_get_header(request, "Authorization");
146 if (authorization) {
46212791
JVH
147 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Our nonce: %s", conn->nonce);
148 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Authorization: %s", authorization);
e4169f77 149 }
268f72c8 150 if (!digest_is_valid("AppleTV", raop->password, conn->nonce, method, http_request_get_url(request), authorization)) {
e4169f77
JVH
151 char *authstr;
152 int authstrlen;
153
154 /* Allocate the authenticate string */
155 authstrlen = sizeof("Digest realm=\"AppleTV\", nonce=\"\"") + sizeof(conn->nonce) + 1;
156 authstr = malloc(authstrlen);
157
158 /* Concatenate the authenticate string */
159 memset(authstr, 0, authstrlen);
160 strcat(authstr, "Digest realm=\"AppleTV\", nonce=\"");
161 strcat(authstr, conn->nonce);
162 strcat(authstr, "\"");
163
164 /* Construct a new response */
165 require_auth = 1;
166 http_response_destroy(res);
167 res = http_response_init("RTSP/1.0", 401, "Unauthorized");
168 http_response_add_header(res, "WWW-Authenticate", authstr);
169 free(authstr);
170 } else {
46212791 171 logger_log(&conn->raop->logger, LOGGER_DEBUG, "AUTHENTICATION SUCCESS!");
e4169f77
JVH
172 }
173 }
174
2340bcd3
JVH
175 http_response_add_header(res, "CSeq", cseq);
176 http_response_add_header(res, "Apple-Jack-Status", "connected; type=analog");
177
178 challenge = http_request_get_header(request, "Apple-Challenge");
91c41e1d 179 if (!require_auth && challenge) {
2340bcd3
JVH
180 char signature[MAX_SIGNATURE_LEN];
181
182 memset(signature, 0, sizeof(signature));
183 rsakey_sign(raop->rsakey, signature, sizeof(signature), challenge,
184 conn->local, conn->locallen, raop->hwaddr, raop->hwaddrlen);
2340bcd3 185 http_response_add_header(res, "Apple-Response", signature);
c891f978 186
46212791
JVH
187 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Got challenge: %s", challenge);
188 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Got response: %s", signature);
2340bcd3 189 }
e4169f77
JVH
190
191 if (require_auth) {
192 /* Do nothing in case of authentication request */
193 } else if (!strcmp(method, "OPTIONS")) {
2340bcd3
JVH
194 http_response_add_header(res, "Public", "ANNOUNCE, SETUP, RECORD, PAUSE, FLUSH, TEARDOWN, OPTIONS, GET_PARAMETER, SET_PARAMETER");
195 } else if (!strcmp(method, "ANNOUNCE")) {
196 const char *data;
197 int datalen;
198
199 unsigned char aeskey[16];
200 unsigned char aesiv[16];
201 int aeskeylen, aesivlen;
202
203 data = http_request_get_data(request, &datalen);
204 if (data) {
ba0970e1
JVH
205 sdp_t *sdp;
206 const char *remotestr, *fmtpstr, *aeskeystr, *aesivstr;
207
208 sdp = sdp_init(data, datalen);
209 remotestr = sdp_get_connection(sdp);
210 fmtpstr = sdp_get_fmtp(sdp);
211 aeskeystr = sdp_get_rsaaeskey(sdp);
212 aesivstr = sdp_get_aesiv(sdp);
213
46212791
JVH
214 logger_log(&conn->raop->logger, LOGGER_DEBUG, "connection: %s", remotestr);
215 logger_log(&conn->raop->logger, LOGGER_DEBUG, "fmtp: %s", fmtpstr);
216 logger_log(&conn->raop->logger, LOGGER_DEBUG, "rsaaeskey: %s", aeskeystr);
217 logger_log(&conn->raop->logger, LOGGER_DEBUG, "aesiv: %s", aesivstr);
ba0970e1
JVH
218
219 aeskeylen = rsakey_decrypt(raop->rsakey, aeskey, sizeof(aeskey), aeskeystr);
220 aesivlen = rsakey_parseiv(raop->rsakey, aesiv, sizeof(aesiv), aesivstr);
46212791
JVH
221 logger_log(&conn->raop->logger, LOGGER_DEBUG, "aeskeylen: %d", aeskeylen);
222 logger_log(&conn->raop->logger, LOGGER_DEBUG, "aesivlen: %d", aesivlen);
2340bcd3 223
c891f978
JVH
224 if (conn->raop_rtp) {
225 /* This should never happen */
226 raop_rtp_destroy(conn->raop_rtp);
227 conn->raop_rtp = NULL;
228 }
ba0970e1 229 conn->raop_rtp = raop_rtp_init(&raop->logger, &raop->callbacks, remotestr, fmtpstr, aeskey, aesiv);
2340bcd3
JVH
230 sdp_destroy(sdp);
231 }
232 } else if (!strcmp(method, "SETUP")) {
ba0970e1 233 unsigned short remote_cport=0, remote_tport=0;
2340bcd3
JVH
234 unsigned short cport=0, tport=0, dport=0;
235 const char *transport;
236 char buffer[1024];
237 int use_udp;
238
239 transport = http_request_get_header(request, "Transport");
240 assert(transport);
241
46212791 242 logger_log(&conn->raop->logger, LOGGER_INFO, "Transport: %s", transport);
2340bcd3 243 use_udp = strncmp(transport, "RTP/AVP/TCP", 11);
ba0970e1
JVH
244 if (use_udp) {
245 char *original, *current, *tmpstr;
246
247 current = original = strdup(transport);
248 if (original) {
249 while ((tmpstr = utils_strsep(&current, ";")) != NULL) {
250 unsigned short value;
251 int ret;
252
253 ret = sscanf(tmpstr, "control_port=%hu", &value);
254 if (ret == 1) {
46212791 255 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Found remote control port: %hu", value);
ba0970e1
JVH
256 remote_cport = value;
257 }
258 ret = sscanf(tmpstr, "timing_port=%hu", &value);
259 if (ret == 1) {
46212791 260 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Found remote timing port: %hu", value);
ba0970e1
JVH
261 remote_tport = value;
262 }
263 }
264 }
265 free(original);
266 }
267 raop_rtp_start(conn->raop_rtp, use_udp, remote_cport, remote_tport, &cport, &tport, &dport);
2340bcd3
JVH
268
269 memset(buffer, 0, sizeof(buffer));
270 if (use_udp) {
271 snprintf(buffer, sizeof(buffer)-1,
ba0970e1 272 "RTP/AVP/UDP;unicast;mode=record;timing_port=%hu;events;control_port=%hu;server_port=%hu",
2340bcd3
JVH
273 tport, cport, dport);
274 } else {
275 snprintf(buffer, sizeof(buffer)-1,
276 "RTP/AVP/TCP;unicast;interleaved=0-1;mode=record;server_port=%u",
277 dport);
278 }
46212791 279 logger_log(&conn->raop->logger, LOGGER_INFO, "Responding with %s", buffer);
2340bcd3
JVH
280 http_response_add_header(res, "Transport", buffer);
281 http_response_add_header(res, "Session", "DEADBEEF");
282 } else if (!strcmp(method, "SET_PARAMETER")) {
036dec08 283 const char *content_type;
2340bcd3
JVH
284 const char *data;
285 int datalen;
2340bcd3 286
036dec08 287 content_type = http_request_get_header(request, "Content-Type");
2340bcd3 288 data = http_request_get_data(request, &datalen);
036dec08
JVH
289 if (!strcmp(content_type, "text/parameters")) {
290 char *datastr;
291 datastr = calloc(1, datalen+1);
292 if (data && datastr && conn->raop_rtp) {
293 memcpy(datastr, data, datalen);
294 if (!strncmp(datastr, "volume: ", 8)) {
295 float vol = 0.0;
296 sscanf(datastr+8, "%f", &vol);
297 raop_rtp_set_volume(conn->raop_rtp, vol);
298 }
2340bcd3 299 }
036dec08
JVH
300 free(datastr);
301 } else if (!strcmp(content_type, "image/jpeg")) {
3baaba9d
JVH
302 logger_log(&conn->raop->logger, LOGGER_INFO, "Got image data of %d bytes", datalen);
303 raop_rtp_set_coverart(conn->raop_rtp, data, datalen);
036dec08 304 } else if (!strcmp(content_type, "application/x-dmap-tagged")) {
3baaba9d
JVH
305 logger_log(&conn->raop->logger, LOGGER_INFO, "Got metadata of %d bytes", datalen);
306 raop_rtp_set_metadata(conn->raop_rtp, data, datalen);
2340bcd3
JVH
307 }
308 } else if (!strcmp(method, "FLUSH")) {
309 const char *rtpinfo;
310 int next_seq = -1;
311
312 rtpinfo = http_request_get_header(request, "RTP-Info");
c891f978 313 if (rtpinfo) {
46212791 314 logger_log(&conn->raop->logger, LOGGER_INFO, "Flush with RTP-Info: %s", rtpinfo);
c891f978
JVH
315 if (!strncmp(rtpinfo, "seq=", 4)) {
316 next_seq = strtol(rtpinfo+4, NULL, 10);
317 }
318 }
319 if (conn->raop_rtp) {
320 raop_rtp_flush(conn->raop_rtp, next_seq);
2340bcd3 321 }
2340bcd3
JVH
322 } else if (!strcmp(method, "TEARDOWN")) {
323 http_response_add_header(res, "Connection", "close");
c891f978
JVH
324 if (conn->raop_rtp) {
325 /* Destroy our RTP session */
326 raop_rtp_stop(conn->raop_rtp);
327 raop_rtp_destroy(conn->raop_rtp);
328 conn->raop_rtp = NULL;
329 }
2340bcd3
JVH
330 }
331 http_response_finish(res, NULL, 0);
332
46212791 333 logger_log(&conn->raop->logger, LOGGER_DEBUG, "Got request %s with URL %s", method, http_request_get_url(request));
2340bcd3
JVH
334 *response = res;
335}
336
337static void
338conn_destroy(void *ptr)
339{
340 raop_conn_t *conn = ptr;
341
342 if (conn->raop_rtp) {
c891f978 343 /* This is done in case TEARDOWN was not called */
2340bcd3
JVH
344 raop_rtp_destroy(conn->raop_rtp);
345 }
346 free(conn->local);
347 free(conn->remote);
348 free(conn);
349}
350
351raop_t *
406e9777 352raop_init(raop_callbacks_t *callbacks, const char *pemkey)
2340bcd3
JVH
353{
354 raop_t *raop;
355 httpd_t *httpd;
356 rsakey_t *rsakey;
357 httpd_callbacks_t httpd_cbs;
358
359 assert(callbacks);
360 assert(pemkey);
2340bcd3
JVH
361
362 /* Initialize the network */
363 if (netutils_init() < 0) {
364 return NULL;
365 }
366
367 /* Validate the callbacks structure */
b4cc5b07
JVH
368 if (!callbacks->audio_init ||
369 !callbacks->audio_process ||
2340bcd3
JVH
370 !callbacks->audio_destroy) {
371 return NULL;
372 }
373
2340bcd3
JVH
374 /* Allocate the raop_t structure */
375 raop = calloc(1, sizeof(raop_t));
376 if (!raop) {
377 return NULL;
378 }
379
380 /* Initialize the logger */
381 logger_init(&raop->logger);
382
383 /* Set HTTP callbacks to our handlers */
384 memset(&httpd_cbs, 0, sizeof(httpd_cbs));
385 httpd_cbs.opaque = raop;
386 httpd_cbs.conn_init = &conn_init;
387 httpd_cbs.conn_request = &conn_request;
388 httpd_cbs.conn_destroy = &conn_destroy;
389
390 /* Initialize the http daemon */
391 httpd = httpd_init(&raop->logger, &httpd_cbs, 10, 1);
392 if (!httpd) {
393 free(raop);
394 return NULL;
395 }
396
397 /* Copy callbacks structure */
398 memcpy(&raop->callbacks, callbacks, sizeof(raop_callbacks_t));
399
400 /* Initialize RSA key handler */
401 rsakey = rsakey_init_pem(pemkey);
402 if (!rsakey) {
403 free(httpd);
404 free(raop);
405 return NULL;
406 }
407
408 raop->httpd = httpd;
409 raop->rsakey = rsakey;
410
2340bcd3
JVH
411 return raop;
412}
413
414raop_t *
406e9777 415raop_init_from_keyfile(raop_callbacks_t *callbacks, const char *keyfile)
2340bcd3
JVH
416{
417 raop_t *raop;
418 char *pemstr;
419
420 if (utils_read_file(&pemstr, keyfile) < 0) {
421 return NULL;
422 }
406e9777 423 raop = raop_init(callbacks, pemstr);
2340bcd3
JVH
424 free(pemstr);
425 return raop;
426}
427
428void
429raop_destroy(raop_t *raop)
430{
431 if (raop) {
432 raop_stop(raop);
433
434 httpd_destroy(raop->httpd);
435 rsakey_destroy(raop->rsakey);
436 free(raop);
437
438 /* Cleanup the network */
439 netutils_cleanup();
440 }
441}
442
5a746b97
JVH
443int
444raop_is_running(raop_t *raop)
445{
446 assert(raop);
447
448 return httpd_is_running(raop->httpd);
449}
450
2340bcd3 451int
e4169f77 452raop_start(raop_t *raop, unsigned short *port, const char *hwaddr, int hwaddrlen, const char *password)
2340bcd3
JVH
453{
454 assert(raop);
455 assert(port);
406e9777
JVH
456 assert(hwaddr);
457
458 /* Validate hardware address */
459 if (hwaddrlen > MAX_HWADDR_LEN) {
460 return -1;
461 }
462
a68fedbb
JVH
463 memset(raop->password, 0, sizeof(raop->password));
464 if (password) {
465 /* Validate password */
466 if (strlen(password) > MAX_PASSWORD_LEN) {
467 return -1;
468 }
469
470 /* Copy password to the raop structure */
471 strncpy(raop->password, password, MAX_PASSWORD_LEN);
e4169f77
JVH
472 }
473
406e9777
JVH
474 /* Copy hwaddr to the raop structure */
475 memcpy(raop->hwaddr, hwaddr, hwaddrlen);
476 raop->hwaddrlen = hwaddrlen;
2340bcd3
JVH
477
478 return httpd_start(raop->httpd, port);
479}
480
481void
482raop_stop(raop_t *raop)
483{
484 assert(raop);
485
486 httpd_stop(raop->httpd);
487}
488