9e806850697bc5fdddd55fdd9d4f7a0baaf3a86a
[vlc.git] / modules / access_output / http.c
1 /*****************************************************************************
2  * http.c
3  *****************************************************************************
4  * Copyright (C) 2001-2003 VideoLAN
5  * $Id: http.c,v 1.5 2003/08/03 16:36:20 bigben Exp $
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <stdlib.h>
28 #include <string.h>
29 #include <errno.h>
30
31 #include <vlc/vlc.h>
32 #include <vlc/input.h>
33 #include <vlc/sout.h>
34
35 #include "httpd.h"
36
37 #define FREE( p ) if( p ) { free( p); (p) = NULL; }
38
39 #define DEFAULT_PORT 8080
40
41 /*****************************************************************************
42  * Exported prototypes
43  *****************************************************************************/
44 static int     Open   ( vlc_object_t * );
45 static void    Close  ( vlc_object_t * );
46
47 static int     Write( sout_access_out_t *, sout_buffer_t * );
48 static int     Seek ( sout_access_out_t *, off_t  );
49
50 /*****************************************************************************
51  * Module descriptor
52  *****************************************************************************/
53 vlc_module_begin();
54     set_description( _("HTTP stream ouput") );
55     set_capability( "sout access", 0 );
56     add_shortcut( "http" );
57     set_callbacks( Open, Close );
58 vlc_module_end();
59
60 struct sout_access_out_sys_t
61 {
62     httpd_t             *p_httpd;
63
64     /* host */
65     httpd_host_t        *p_httpd_host;
66
67     /* stream */
68     httpd_stream_t      *p_httpd_stream;
69
70     /* gather header from stream */
71     int                 i_header_allocated;
72     int                 i_header_size;
73     uint8_t             *p_header;
74     vlc_bool_t          b_header_complete;
75 };
76
77 static struct
78 {
79     char *psz_ext;
80     char *psz_mime;
81 } http_mime[] =
82 {
83     { ".avi",   "video/avi" },
84     { ".asf",   "video/x-ms-asf" },
85     { ".m1a",   "audio/mpeg" },
86     { ".m2a",   "audio/mpeg" },
87     { ".m1v",   "video/mpeg" },
88     { ".m2v",   "video/mpeg" },
89     { ".mp2",   "audio/mpeg" },
90     { ".mp3",   "audio/mpeg" },
91     { ".mpa",   "audio/mpeg" },
92     { ".mpg",   "video/mpeg" },
93     { ".mpeg",  "video/mpeg" },
94     { ".mpe",   "video/mpeg" },
95     { ".mov",   "video/quicktime" },
96     { ".moov",  "video/quicktime" },
97     { ".ogg",   "application/ogg" },
98     { ".ogm",   "application/ogg" },
99     { ".wav",   "audio/wav" },
100     { NULL,     NULL }
101 };
102
103 static char *GetMime( char *psz_name )
104 {
105     char *psz_ext;
106
107     psz_ext = strrchr( psz_name, '.' );
108     if( psz_ext )
109     {
110         int i;
111
112         for( i = 0; http_mime[i].psz_ext != NULL ; i++ )
113         {
114             if( !strcmp( http_mime[i].psz_ext, psz_ext ) )
115             {
116                 return( http_mime[i].psz_mime );
117             }
118         }
119     }
120     return( "application/octet-stream" );
121 }
122 /*****************************************************************************
123  * Open: open the file
124  *****************************************************************************/
125 static int Open( vlc_object_t *p_this )
126 {
127     sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
128     sout_access_out_sys_t   *p_sys;
129
130     char                *psz_parser, *psz_name;
131
132     char                *psz_bind_addr;
133     int                 i_bind_port;
134     char                *psz_file_name;
135
136     if( !( p_sys = p_access->p_sys =
137                 malloc( sizeof( sout_access_out_sys_t ) ) ) )
138     {
139         msg_Err( p_access, "Not enough memory" );
140         return( VLC_EGENERIC );
141     }
142
143     /* *** parse p_access->psz_name to extract bind address, port and file name *** */
144     /* p_access->psz_name host.name:port/filename */
145     psz_name = psz_parser = strdup( p_access->psz_name );
146
147     psz_bind_addr = psz_parser;
148     i_bind_port = 0;
149     psz_file_name = "";
150
151     while( *psz_parser && *psz_parser != ':' && *psz_parser != '/' )
152     {
153         psz_parser++;
154     }
155     if( *psz_parser == ':' )
156     {
157         *psz_parser = '\0';
158         psz_parser++;
159         i_bind_port = atoi( psz_parser );
160
161         while( *psz_parser && *psz_parser != '/' )
162         {
163             psz_parser++;
164         }
165     }
166     if( *psz_parser == '/' )
167     {
168         *psz_parser = '\0';
169         psz_parser++;
170         psz_file_name = psz_parser;
171     }
172
173     if( i_bind_port <= 0 )
174     {
175         i_bind_port = DEFAULT_PORT;
176     }
177
178     if( !*psz_file_name )
179     {
180         psz_file_name = strdup( "/" );
181     }
182     else if( *psz_file_name != '/' )
183     {
184         char *p = psz_file_name;
185
186         psz_file_name = malloc( strlen( p ) + 2 );
187         strcpy( psz_file_name, "/" );
188         strcat( psz_file_name, p );
189     }
190
191     p_sys->p_httpd = httpd_Find( VLC_OBJECT(p_access), VLC_TRUE );
192     if( !p_sys->p_httpd )
193     {
194         msg_Err( p_access, "cannot start httpd daemon" );
195
196         free( psz_name );
197         free( psz_file_name );
198         free( p_sys );
199         return( VLC_EGENERIC );
200     }
201
202     p_sys->p_httpd_host =
203         p_sys->p_httpd->pf_register_host( p_sys->p_httpd,
204                                           psz_bind_addr, i_bind_port );
205
206     if( !p_sys->p_httpd_host )
207     {
208         msg_Err( p_access, "cannot listen on %s:%d", psz_bind_addr, i_bind_port );
209         httpd_Release( p_sys->p_httpd );
210
211         free( psz_name );
212         free( psz_file_name );
213         free( p_sys );
214         return( VLC_EGENERIC );
215     }
216
217     p_sys->p_httpd_stream =
218         p_sys->p_httpd->pf_register_stream( p_sys->p_httpd,
219                                             psz_file_name,
220                                             GetMime( psz_file_name ),
221                                             sout_cfg_find_value( p_access->p_cfg, "user" ),
222                                             sout_cfg_find_value( p_access->p_cfg, "pwd" ) );
223
224     if( !p_sys->p_httpd_stream )
225     {
226         msg_Err( p_access, "cannot add stream %s", psz_file_name );
227         p_sys->p_httpd->pf_unregister_host( p_sys->p_httpd, p_sys->p_httpd_host );
228         httpd_Release( p_sys->p_httpd );
229
230         free( psz_name );
231         free( psz_file_name );
232         free( p_sys );
233
234         return( VLC_EGENERIC );
235     }
236
237     p_sys->i_header_allocated = 1024;
238     p_sys->i_header_size      = 0;
239     p_sys->p_header           = malloc( p_sys->i_header_allocated );
240     p_sys->b_header_complete  = VLC_FALSE;
241
242     p_access->pf_write       = Write;
243     p_access->pf_seek        = Seek;
244
245     return VLC_SUCCESS;
246 }
247
248 /*****************************************************************************
249  * Close: close the target
250  *****************************************************************************/
251 static void Close( vlc_object_t * p_this )
252 {
253     sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
254     sout_access_out_sys_t   *p_sys = p_access->p_sys;
255
256     p_sys->p_httpd->pf_unregister_stream( p_sys->p_httpd, p_sys->p_httpd_stream );
257     p_sys->p_httpd->pf_unregister_host( p_sys->p_httpd, p_sys->p_httpd_host );
258
259     httpd_Release( p_sys->p_httpd );
260
261     FREE( p_sys->p_header );
262
263     msg_Info( p_access, "Close" );
264
265     free( p_sys );
266 }
267
268 /*****************************************************************************
269  * Write:
270  *****************************************************************************/
271 static int Write( sout_access_out_t *p_access, sout_buffer_t *p_buffer )
272 {
273     sout_access_out_sys_t   *p_sys = p_access->p_sys;
274     int i_err = 0;
275
276     while( p_buffer )
277     {
278         sout_buffer_t *p_next;
279
280         if( p_buffer->i_flags & SOUT_BUFFER_FLAGS_HEADER )
281         {
282             /* gather header */
283             if( p_sys->b_header_complete )
284             {
285                 /* free previously gathered header */
286                 p_sys->i_header_size = 0;
287                 p_sys->b_header_complete = VLC_FALSE;
288             }
289             if( p_buffer->i_size + p_sys->i_header_size > p_sys->i_header_allocated )
290             {
291                 p_sys->i_header_allocated = p_buffer->i_size + p_sys->i_header_size + 1024;
292                 p_sys->p_header = realloc( p_sys->p_header, p_sys->i_header_allocated );
293             }
294             memcpy( &p_sys->p_header[p_sys->i_header_size],
295                     p_buffer->p_buffer,
296                     p_buffer->i_size );
297             p_sys->i_header_size += p_buffer->i_size;
298         }
299         else if( !p_sys->b_header_complete )
300         {
301             p_sys->b_header_complete = VLC_TRUE;
302
303             p_sys->p_httpd->pf_header_stream( p_sys->p_httpd,
304                                               p_sys->p_httpd_stream,
305                                               p_sys->p_header, p_sys->i_header_size );
306         }
307             /* send data */
308         i_err = p_sys->p_httpd->pf_send_stream( p_sys->p_httpd, p_sys->p_httpd_stream,
309                                                 p_buffer->p_buffer, p_buffer->i_size );
310
311         p_next = p_buffer->p_next;
312         sout_BufferDelete( p_access->p_sout, p_buffer );
313         p_buffer = p_next;
314
315         if( i_err < 0 )
316         {
317             break;
318         }
319     }
320
321     if( i_err < 0 )
322     {
323         sout_buffer_t *p_next;
324         while( p_buffer )
325         {
326             p_next = p_buffer->p_next;
327             sout_BufferDelete( p_access->p_sout, p_buffer );
328             p_buffer = p_next;
329         }
330     }
331
332     return( i_err < 0 ? VLC_EGENERIC : VLC_SUCCESS );
333 }
334
335 /*****************************************************************************
336  * Seek: seek to a specific location in a file
337  *****************************************************************************/
338 static int Seek( sout_access_out_t *p_access, off_t i_pos )
339 {
340     msg_Err( p_access, "http sout access cannot seek" );
341     return( VLC_EGENERIC );
342 }
343