* mp4: parse another box.
[vlc.git] / modules / access_output / http.c
1 /*****************************************************************************
2  * http.c
3  *****************************************************************************
4  * Copyright (C) 2001-2003 VideoLAN
5  * $Id: http.c,v 1.3 2003/03/06 11:15:55 fenrir 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                                             NULL, NULL );
222
223     if( !p_sys->p_httpd_stream )
224     {
225         msg_Err( p_access, "cannot add stream %s", psz_file_name );
226         p_sys->p_httpd->pf_unregister_host( p_sys->p_httpd, p_sys->p_httpd_host );
227         httpd_Release( p_sys->p_httpd );
228
229         free( psz_name );
230         free( psz_file_name );
231         free( p_sys );
232
233         return( VLC_EGENERIC );
234     }
235
236     p_sys->i_header_allocated = 1024;
237     p_sys->i_header_size      = 0;
238     p_sys->p_header           = malloc( p_sys->i_header_allocated );
239     p_sys->b_header_complete  = VLC_FALSE;
240
241     p_access->pf_write       = Write;
242     p_access->pf_seek        = Seek;
243
244     return VLC_SUCCESS;
245 }
246
247 /*****************************************************************************
248  * Close: close the target
249  *****************************************************************************/
250 static void Close( vlc_object_t * p_this )
251 {
252     sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
253     sout_access_out_sys_t   *p_sys = p_access->p_sys;
254
255     p_sys->p_httpd->pf_unregister_stream( p_sys->p_httpd, p_sys->p_httpd_stream );
256     p_sys->p_httpd->pf_unregister_host( p_sys->p_httpd, p_sys->p_httpd_host );
257
258     httpd_Release( p_sys->p_httpd );
259
260     FREE( p_sys->p_header );
261
262     msg_Info( p_access, "Close" );
263
264     free( p_sys );
265 }
266
267 /*****************************************************************************
268  * Write:
269  *****************************************************************************/
270 static int Write( sout_access_out_t *p_access, sout_buffer_t *p_buffer )
271 {
272     sout_access_out_sys_t   *p_sys = p_access->p_sys;
273     int i_err = 0;
274
275     while( p_buffer )
276     {
277         sout_buffer_t *p_next;
278
279         if( p_buffer->i_flags & SOUT_BUFFER_FLAGS_HEADER )
280         {
281             /* gather header */
282             if( p_sys->b_header_complete )
283             {
284                 /* free previously gathered header */
285                 p_sys->i_header_size = 0;
286                 p_sys->b_header_complete = VLC_FALSE;
287             }
288             if( p_buffer->i_size + p_sys->i_header_size > p_sys->i_header_allocated )
289             {
290                 p_sys->i_header_allocated = p_buffer->i_size + p_sys->i_header_size + 1024;
291                 p_sys->p_header = realloc( p_sys->p_header, p_sys->i_header_allocated );
292             }
293             memcpy( &p_sys->p_header[p_sys->i_header_size],
294                     p_buffer->p_buffer,
295                     p_buffer->i_size );
296             p_sys->i_header_size += p_buffer->i_size;
297         }
298         else if( !p_sys->b_header_complete )
299         {
300             p_sys->b_header_complete = VLC_TRUE;
301
302             p_sys->p_httpd->pf_header_stream( p_sys->p_httpd,
303                                               p_sys->p_httpd_stream,
304                                               p_sys->p_header, p_sys->i_header_size );
305         }
306             /* send data */
307         i_err = p_sys->p_httpd->pf_send_stream( p_sys->p_httpd, p_sys->p_httpd_stream,
308                                                 p_buffer->p_buffer, p_buffer->i_size );
309
310         p_next = p_buffer->p_next;
311         sout_BufferDelete( p_access->p_sout, p_buffer );
312         p_buffer = p_next;
313
314         if( i_err < 0 )
315         {
316             break;
317         }
318     }
319
320     if( i_err < 0 )
321     {
322         sout_buffer_t *p_next;
323         while( p_buffer )
324         {
325             p_next = p_buffer->p_next;
326             sout_BufferDelete( p_access->p_sout, p_buffer );
327             p_buffer = p_next;
328         }
329     }
330
331     return( i_err < 0 ? VLC_EGENERIC : VLC_SUCCESS );
332 }
333
334 /*****************************************************************************
335  * Seek: seek to a specific location in a file
336  *****************************************************************************/
337 static int Seek( sout_access_out_t *p_access, off_t i_pos )
338 {
339     msg_Err( p_access, "http sout access cannot seek" );
340     return( VLC_EGENERIC );
341 }
342