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