47029cec7e14cbf2605d1a56358d7084260a4b89
[vlc.git] / modules / access_output / http.c
1 /*****************************************************************************
2  * http.c
3  *****************************************************************************
4  * Copyright (C) 2001-2005 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8  *          Jon Lech Johansen <jon@nanocrew.net>
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #include <stdlib.h>
29
30 #include <vlc/vlc.h>
31 #include <vlc/sout.h>
32
33 #ifdef HAVE_AVAHI_CLIENT
34     #include <vlc/intf.h>
35
36     #include "bonjour.h"
37
38     #if defined( WIN32 )
39         #define DIRECTORY_SEPARATOR '\\'
40     #else
41         #define DIRECTORY_SEPARATOR '/'
42     #endif
43 #endif
44
45 #include "vlc_httpd.h"
46
47 #define FREE( p ) if( p ) { free( p); (p) = NULL; }
48
49 #define DEFAULT_PORT        8080
50 #define DEFAULT_SSL_PORT    8443
51
52 /*****************************************************************************
53  * Module descriptor
54  *****************************************************************************/
55 static int  Open ( vlc_object_t * );
56 static void Close( vlc_object_t * );
57
58 #define SOUT_CFG_PREFIX "sout-http-"
59
60 #define USER_TEXT N_("Username")
61 #define USER_LONGTEXT N_("Allows you to give a user name that will be " \
62                          "requested to access the stream." )
63 #define PASS_TEXT N_("Password")
64 #define PASS_LONGTEXT N_("Allows you to give a password that will be " \
65                          "requested to access the stream." )
66 #define MIME_TEXT N_("Mime")
67 #define MIME_LONGTEXT N_("Allows you to give the mime returned by the server." )
68
69 #define CERT_TEXT N_( "Certificate file" )
70 #define CERT_LONGTEXT N_( "Path to the x509 PEM certificate file that will "\
71                           "be used by the HTTP/SSL stream output" )
72 #define KEY_TEXT N_( "Private key file" )
73 #define KEY_LONGTEXT N_( "Path to the x509 PEM private key file that will " \
74                          " be used by the HTTP/SSL stream output. Leave " \
75                          "empty if you don't have one." )
76 #define CA_TEXT N_( "Root CA file" )
77 #define CA_LONGTEXT N_( "Path to the x509 PEM trusted root CA certificates " \
78                         "(certificate authority) file that will be used by " \
79                         "the HTTP/SSL stream output. Leave empty if you " \
80                         "don't have one." )
81 #define CRL_TEXT N_( "CRL file" )
82 #define CRL_LONGTEXT N_( "Path to the x509 PEM Certificates Revocation List " \
83                          "file that will be HTTP/SSL stream output. Leave " \
84                          "empty if you don't have one." )
85 #define BONJOUR_TEXT N_( "Advertise with Bonjour")
86 #define BONJOUR_LONGTEXT N_( "Advertise the stream with the Bonjour protocol" )
87
88
89 vlc_module_begin();
90     set_description( _("HTTP stream output") );
91     set_capability( "sout access", 0 );
92     set_shortname( N_("HTTP" ) );
93     add_shortcut( "http" );
94     add_shortcut( "https" );
95     add_shortcut( "mmsh" );
96     set_category( CAT_SOUT );
97     set_subcategory( SUBCAT_SOUT_ACO );
98     add_string( SOUT_CFG_PREFIX "user", "", NULL,
99                 USER_TEXT, USER_LONGTEXT, VLC_TRUE );
100     add_string( SOUT_CFG_PREFIX "pwd", "", NULL,
101                 PASS_TEXT, PASS_LONGTEXT, VLC_TRUE );
102     add_string( SOUT_CFG_PREFIX "mime", "", NULL,
103                 MIME_TEXT, MIME_LONGTEXT, VLC_TRUE );
104     add_string( SOUT_CFG_PREFIX "cert", "vlc.pem", NULL,
105                 CERT_TEXT, CERT_LONGTEXT, VLC_TRUE );
106     add_string( SOUT_CFG_PREFIX "key", NULL, NULL,
107                 KEY_TEXT, KEY_LONGTEXT, VLC_TRUE );
108     add_string( SOUT_CFG_PREFIX "ca", NULL, NULL,
109                 CA_TEXT, CA_LONGTEXT, VLC_TRUE );
110     add_string( SOUT_CFG_PREFIX "crl", NULL, NULL,
111                 CRL_TEXT, CRL_LONGTEXT, VLC_TRUE );
112     add_bool( SOUT_CFG_PREFIX "bonjour", VLC_FALSE, NULL,
113               BONJOUR_TEXT, BONJOUR_LONGTEXT,VLC_TRUE);
114     set_callbacks( Open, Close );
115 vlc_module_end();
116
117
118 /*****************************************************************************
119  * Exported prototypes
120  *****************************************************************************/
121 static const char *ppsz_sout_options[] = {
122     "user", "pwd", "mime", "cert", "key", "ca", "crl", NULL
123 };
124
125 static int Write( sout_access_out_t *, block_t * );
126 static int Seek ( sout_access_out_t *, off_t  );
127
128 struct sout_access_out_sys_t
129 {
130     /* host */
131     httpd_host_t        *p_httpd_host;
132
133     /* stream */
134     httpd_stream_t      *p_httpd_stream;
135
136     /* gather header from stream */
137     int                 i_header_allocated;
138     int                 i_header_size;
139     uint8_t             *p_header;
140     vlc_bool_t          b_header_complete;
141
142 #ifdef HAVE_AVAHI_CLIENT
143     void                *p_bonjour;
144 #endif
145 };
146
147 /*****************************************************************************
148  * Open: open the file
149  *****************************************************************************/
150 static int Open( vlc_object_t *p_this )
151 {
152     sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
153     sout_access_out_sys_t   *p_sys;
154
155     char                *psz_parser;
156
157     char                *psz_bind_addr;
158     int                 i_bind_port;
159     char                *psz_file_name;
160     char                *psz_user = NULL;
161     char                *psz_pwd = NULL;
162     char                *psz_mime = NULL;
163     const char          *psz_cert = NULL, *psz_key = NULL, *psz_ca = NULL,
164                         *psz_crl = NULL;
165     vlc_value_t         val;
166
167     if( !( p_sys = p_access->p_sys =
168                 malloc( sizeof( sout_access_out_sys_t ) ) ) )
169     {
170         msg_Err( p_access, "Not enough memory" );
171         return VLC_ENOMEM ;
172     }
173
174     sout_CfgParse( p_access, SOUT_CFG_PREFIX, ppsz_sout_options, p_access->p_cfg );
175
176     /* p_access->psz_name = "hostname:port/filename" */
177     psz_bind_addr = psz_parser = strdup( p_access->psz_name );
178
179     i_bind_port = 0;
180     psz_file_name = "";
181
182     while( *psz_parser && *psz_parser != ':' && *psz_parser != '/' )
183     {
184         psz_parser++;
185     }
186     if( *psz_parser == ':' )
187     {
188         *psz_parser = '\0';
189         psz_parser++;
190         i_bind_port = atoi( psz_parser );
191
192         while( *psz_parser && *psz_parser != '/' )
193         {
194             psz_parser++;
195         }
196     }
197     if( *psz_parser == '/' )
198     {
199         *psz_parser = '\0';
200         psz_parser++;
201         psz_file_name = psz_parser;
202     }
203
204     if( !*psz_file_name )
205     {
206         psz_file_name = strdup( "/" );
207     }
208     else if( *psz_file_name != '/' )
209     {
210         char *p = psz_file_name;
211
212         psz_file_name = malloc( strlen( p ) + 2 );
213         strcpy( psz_file_name, "/" );
214         strcat( psz_file_name, p );
215     }
216     else
217     {
218         psz_file_name = strdup( psz_file_name );
219     }
220
221     /* SSL support */
222     if( p_access->psz_access && !strcmp( p_access->psz_access, "https" ) )
223     {
224         psz_cert = config_GetPsz( p_this, SOUT_CFG_PREFIX"cert" );
225         psz_key = config_GetPsz( p_this, SOUT_CFG_PREFIX"key" );
226         psz_ca = config_GetPsz( p_this, SOUT_CFG_PREFIX"ca" );
227         psz_crl = config_GetPsz( p_this, SOUT_CFG_PREFIX"crl" );
228
229         if( i_bind_port <= 0 )
230             i_bind_port = DEFAULT_SSL_PORT;
231     }
232     else
233     {
234         if( i_bind_port <= 0 )
235             i_bind_port = DEFAULT_PORT;
236     }
237
238     p_sys->p_httpd_host = httpd_TLSHostNew( VLC_OBJECT(p_access),
239                                             psz_bind_addr, i_bind_port,
240                                             psz_cert, psz_key, psz_ca,
241                                             psz_crl );
242     if( p_sys->p_httpd_host == NULL )
243     {
244         msg_Err( p_access, "cannot listen on %s:%d",
245                  psz_bind_addr, i_bind_port );
246         free( psz_file_name );
247         free( psz_bind_addr );
248         free( p_sys );
249         return VLC_EGENERIC;
250     }
251     free( psz_bind_addr );
252
253     if( p_access->psz_access && !strcmp( p_access->psz_access, "mmsh" ) )
254     {
255         psz_mime = strdup( "video/x-ms-asf-stream" );
256     }
257     else
258     {
259         var_Get( p_access, SOUT_CFG_PREFIX "mime", &val );
260         if( *val.psz_string )
261             psz_mime = val.psz_string;
262         else
263             free( val.psz_string );
264     }
265
266     var_Get( p_access, SOUT_CFG_PREFIX "user", &val );
267     if( *val.psz_string )
268         psz_user = val.psz_string;
269     else
270         free( val.psz_string );
271
272     var_Get( p_access, SOUT_CFG_PREFIX "pwd", &val );
273     if( *val.psz_string )
274         psz_pwd = val.psz_string;
275     else
276         free( val.psz_string );
277
278     p_sys->p_httpd_stream =
279         httpd_StreamNew( p_sys->p_httpd_host, psz_file_name, psz_mime,
280                          psz_user, psz_pwd, NULL );
281     if( psz_user ) free( psz_user );
282     if( psz_pwd ) free( psz_pwd );
283     if( psz_mime ) free( psz_mime );
284
285     if( p_sys->p_httpd_stream == NULL )
286     {
287         msg_Err( p_access, "cannot add stream %s", psz_file_name );
288         httpd_HostDelete( p_sys->p_httpd_host );
289
290         free( psz_file_name );
291         free( p_sys );
292         return VLC_EGENERIC;
293     }
294
295 #ifdef HAVE_AVAHI_CLIENT
296     if( config_GetInt(p_this, SOUT_CFG_PREFIX "bonjour") )
297     {
298         playlist_t          *p_playlist;
299         char                *psz_txt, *psz_name;
300
301         p_playlist = (playlist_t *)vlc_object_find( p_access,
302                                                     VLC_OBJECT_PLAYLIST,
303                                                     FIND_ANYWHERE );
304         if( p_playlist == NULL )
305         {
306             msg_Err( p_access, "unable to find playlist" );
307             httpd_StreamDelete( p_sys->p_httpd_stream );
308             httpd_HostDelete( p_sys->p_httpd_host );
309             free( (void *)p_sys );
310             return VLC_EGENERIC;
311         }
312
313         psz_name = strrchr( p_playlist->status.p_item->input.psz_uri,
314                             DIRECTORY_SEPARATOR );
315         if( psz_name != NULL ) psz_name++;
316         else psz_name = p_playlist->status.p_item->input.psz_uri;
317
318         asprintf( &psz_txt, "path=%s", psz_file_name );
319
320         p_sys->p_bonjour = bonjour_start_service( (vlc_object_t *)p_access,
321                                     strcmp( p_access->psz_access, "https" )
322                                        ? "_vlc-http._tcp" : "_vlc-https._tcp",
323                                                   psz_name, i_bind_port, psz_txt );
324         free( (void *)psz_txt );
325
326         if( p_sys->p_bonjour == NULL )
327         {
328             vlc_object_release( p_playlist );
329             httpd_StreamDelete( p_sys->p_httpd_stream );
330             httpd_HostDelete( p_sys->p_httpd_host );
331             free( (void *)p_sys );
332             return VLC_EGENERIC;
333         }
334         vlc_object_release( p_playlist );
335     }
336     else
337         p_sys->p_bonjour = NULL;
338 #endif
339
340     free( psz_file_name );
341
342     p_sys->i_header_allocated = 1024;
343     p_sys->i_header_size      = 0;
344     p_sys->p_header           = malloc( p_sys->i_header_allocated );
345     p_sys->b_header_complete  = VLC_FALSE;
346
347     p_access->pf_write       = Write;
348     p_access->pf_seek        = Seek;
349
350
351     /* update p_sout->i_out_pace_nocontrol */
352     p_access->p_sout->i_out_pace_nocontrol++;
353
354     return VLC_SUCCESS;
355 }
356
357 /*****************************************************************************
358  * Close: close the target
359  *****************************************************************************/
360 static void Close( vlc_object_t * p_this )
361 {
362     sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
363     sout_access_out_sys_t   *p_sys = p_access->p_sys;
364
365 #ifdef HAVE_AVAHI_CLIENT
366     if( p_sys->p_bonjour != NULL )
367         bonjour_stop_service( p_sys->p_bonjour );
368 #endif
369
370     /* update p_sout->i_out_pace_nocontrol */
371     p_access->p_sout->i_out_pace_nocontrol--;
372
373     httpd_StreamDelete( p_sys->p_httpd_stream );
374     httpd_HostDelete( p_sys->p_httpd_host );
375
376     FREE( p_sys->p_header );
377
378     msg_Dbg( p_access, "Close" );
379
380     free( p_sys );
381 }
382
383 /*****************************************************************************
384  * Write:
385  *****************************************************************************/
386 static int Write( sout_access_out_t *p_access, block_t *p_buffer )
387 {
388     sout_access_out_sys_t *p_sys = p_access->p_sys;
389     int i_err = 0;
390
391     while( p_buffer )
392     {
393         block_t *p_next;
394
395         if( p_buffer->i_flags & BLOCK_FLAG_HEADER )
396         {
397             /* gather header */
398             if( p_sys->b_header_complete )
399             {
400                 /* free previously gathered header */
401                 p_sys->i_header_size = 0;
402                 p_sys->b_header_complete = VLC_FALSE;
403             }
404             if( (int)(p_buffer->i_buffer + p_sys->i_header_size) >
405                 p_sys->i_header_allocated )
406             {
407                 p_sys->i_header_allocated =
408                     p_buffer->i_buffer + p_sys->i_header_size + 1024;
409                 p_sys->p_header =
410                     realloc( p_sys->p_header, p_sys->i_header_allocated );
411             }
412             memcpy( &p_sys->p_header[p_sys->i_header_size],
413                     p_buffer->p_buffer,
414                     p_buffer->i_buffer );
415             p_sys->i_header_size += p_buffer->i_buffer;
416         }
417         else if( !p_sys->b_header_complete )
418         {
419             p_sys->b_header_complete = VLC_TRUE;
420
421             httpd_StreamHeader( p_sys->p_httpd_stream, p_sys->p_header,
422                                 p_sys->i_header_size );
423         }
424
425         /* send data */
426         i_err = httpd_StreamSend( p_sys->p_httpd_stream, p_buffer->p_buffer,
427                                   p_buffer->i_buffer );
428
429         p_next = p_buffer->p_next;
430         block_Release( p_buffer );
431         p_buffer = p_next;
432
433         if( i_err < 0 )
434         {
435             break;
436         }
437     }
438
439     if( i_err < 0 )
440     {
441         block_ChainRelease( p_buffer );
442     }
443
444     return( i_err < 0 ? VLC_EGENERIC : VLC_SUCCESS );
445 }
446
447 /*****************************************************************************
448  * Seek: seek to a specific location in a file
449  *****************************************************************************/
450 static int Seek( sout_access_out_t *p_access, off_t i_pos )
451 {
452     msg_Warn( p_access, "HTTP sout access cannot seek" );
453     return VLC_EGENERIC;
454 }