control/http:
[vlc.git] / modules / control / http / http.c
1 /*****************************************************************************
2  * http.c : HTTP/HTTPS Remote control interface
3  *****************************************************************************
4  * Copyright (C) 2001-2006 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@netcourrier.com>
8  *          Laurent Aimar <fenrir@via.ecp.fr>
9  *          Christophe Massiot <massiot@via.ecp.fr>
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
24  *****************************************************************************/
25 #ifdef HAVE_CONFIG_H
26 # include "config.h"
27 #endif
28
29 #include "http.h"
30
31 /*****************************************************************************
32  * Module descriptor
33  *****************************************************************************/
34 static int  Open ( vlc_object_t * );
35 static void Close( vlc_object_t * );
36
37 #define HOST_TEXT N_( "Host address" )
38 #define HOST_LONGTEXT N_( \
39     "Address and port the HTTP interface will listen on. It defaults to " \
40     "all network interfaces (0.0.0.0)." \
41     " If you want the HTTP interface to be available only on the local " \
42     "machine, enter 127.0.0.1" )
43 #define SRC_TEXT N_( "Source directory" )
44 #define SRC_LONGTEXT N_( "Source directory" )
45 #define HANDLERS_TEXT N_( "Handlers" )
46 #define HANDLERS_LONGTEXT N_( \
47         "List of handler extensions and executable paths (for instance: " \
48         "php=/usr/bin/php,pl=/usr/bin/perl)." )
49 #define ART_TEXT N_( "Export album art as /art." )
50 #define ART_LONGTEXT N_( \
51         "Allow exporting album art for current playlist items at the " \
52         "/art and /art?id=<id> URLs." )
53 #define CERT_TEXT N_( "Certificate file" )
54 #define CERT_LONGTEXT N_( "HTTP interface x509 PEM certificate file " \
55                           "(enables SSL)." )
56 #define KEY_TEXT N_( "Private key file" )
57 #define KEY_LONGTEXT N_( "HTTP interface x509 PEM private key file." )
58 #define CA_TEXT N_( "Root CA file" )
59 #define CA_LONGTEXT N_( "HTTP interface x509 PEM trusted root CA " \
60                         "certificates file." )
61 #define CRL_TEXT N_( "CRL file" )
62 #define CRL_LONGTEXT N_( "HTTP interace Certificates Revocation List file." )
63
64 vlc_module_begin();
65     set_shortname( _("HTTP"));
66     set_description( _("HTTP remote control interface") );
67     set_category( CAT_INTERFACE );
68     set_subcategory( SUBCAT_INTERFACE_MAIN );
69         add_string ( "http-host", NULL, NULL, HOST_TEXT, HOST_LONGTEXT, VLC_TRUE );
70         add_string ( "http-src",  NULL, NULL, SRC_TEXT,  SRC_LONGTEXT,  VLC_TRUE );
71         add_obsolete_string ( "http-charset" );
72 #if defined( HAVE_FORK ) || defined( WIN32 )
73         add_string ( "http-handlers", NULL, NULL, HANDLERS_TEXT, HANDLERS_LONGTEXT, VLC_TRUE );
74 #endif
75         add_bool   ( "http-album-art", VLC_FALSE, NULL, ART_TEXT, ART_LONGTEXT, VLC_TRUE );
76         set_section( N_("HTTP SSL" ), 0 );
77         add_string ( "http-intf-cert", NULL, NULL, CERT_TEXT, CERT_LONGTEXT, VLC_TRUE );
78         add_string ( "http-intf-key",  NULL, NULL, KEY_TEXT,  KEY_LONGTEXT,  VLC_TRUE );
79         add_string ( "http-intf-ca",   NULL, NULL, CA_TEXT,   CA_LONGTEXT,   VLC_TRUE );
80         add_string ( "http-intf-crl",  NULL, NULL, CRL_TEXT,  CRL_LONGTEXT,  VLC_TRUE );
81     set_capability( "interface", 0 );
82     set_callbacks( Open, Close );
83 vlc_module_end();
84
85
86 /*****************************************************************************
87  * Local prototypes
88  *****************************************************************************/
89 int  E_(ArtCallback)( httpd_handler_sys_t *p_args,
90                           httpd_handler_t *p_handler, char *_p_url,
91                           uint8_t *_p_request, int i_type,
92                           uint8_t *_p_in, int i_in,
93                           char *psz_remote_addr, char *psz_remote_host,
94                           uint8_t **pp_data, int *pi_data );
95
96 /*****************************************************************************
97  * Local functions
98  *****************************************************************************/
99 #if !defined(__APPLE__) && !defined(SYS_BEOS) && !defined(WIN32)
100 static int DirectoryCheck( const char *psz_dir )
101 {
102     DIR           *p_dir;
103
104 #ifdef HAVE_SYS_STAT_H
105     struct stat   stat_info;
106
107     if( ( utf8_stat( psz_dir, &stat_info ) == -1 )
108       || !S_ISDIR( stat_info.st_mode ) )
109     {
110         return VLC_EGENERIC;
111     }
112 #endif
113
114     if( ( p_dir = utf8_opendir( psz_dir ) ) == NULL )
115     {
116         return VLC_EGENERIC;
117     }
118     closedir( p_dir );
119
120     return VLC_SUCCESS;
121 }
122 #endif
123
124
125 /*****************************************************************************
126  * Activate: initialize and create stuff
127  *****************************************************************************/
128 static int Open( vlc_object_t *p_this )
129 {
130     intf_thread_t *p_intf = (intf_thread_t*)p_this;
131     intf_sys_t    *p_sys;
132     char          *psz_address;
133     const char    *psz_cert = NULL, *psz_key = NULL, *psz_ca = NULL,
134                   *psz_crl = NULL;
135     int           i_port       = 0;
136     char          *psz_src = NULL;
137
138     psz_address = var_CreateGetNonEmptyString( p_intf, "http-host" );
139     if( psz_address != NULL )
140     {
141         char *psz_parser = strchr( psz_address, ':' );
142         if( psz_parser )
143         {
144             *psz_parser++ = '\0';
145             i_port = atoi( psz_parser );
146         }
147     }
148     else
149         psz_address = strdup("");
150
151     p_intf->p_sys = p_sys = malloc( sizeof( intf_sys_t ) );
152     if( !p_intf->p_sys )
153     {
154         return( VLC_ENOMEM );
155     }
156
157     p_sys->p_playlist = pl_Yield( p_this );
158     p_sys->p_input    = NULL;
159     p_sys->p_vlm      = NULL;
160     p_sys->psz_address = psz_address;
161     p_sys->i_port     = i_port;
162     p_sys->p_art_handler = NULL;
163
164     /* determine file handler associations */
165     p_sys->i_handlers = 0;
166     p_sys->pp_handlers = NULL;
167 #if defined( HAVE_FORK ) || defined( WIN32 )
168     psz_src = config_GetPsz( p_intf, "http-handlers" );
169     if( psz_src != NULL && *psz_src )
170     {
171         char *p = psz_src;
172         while( p != NULL )
173         {
174             http_association_t *p_handler;
175             char *psz_ext = p;
176             char *psz_program, *psz_options;
177             p = strchr( p, '=' );
178             if( p == NULL ) break;
179             *p++ = '\0';
180             psz_program = p;
181             p = strchr( p, ',' );
182             if( p != NULL )
183                 *p++ = '\0';
184
185             p_handler = malloc( sizeof( http_association_t ) );
186             p_handler->psz_ext = strdup( psz_ext );
187             psz_options = E_(FirstWord)( psz_program, psz_program );
188             p_handler->i_argc = 0;
189             p_handler->ppsz_argv = NULL;
190             TAB_APPEND( p_handler->i_argc, p_handler->ppsz_argv,
191                         strdup( psz_program ) );
192             while( psz_options != NULL && *psz_options )
193             {
194                 char *psz_next = E_(FirstWord)( psz_options, psz_options );
195                 TAB_APPEND( p_handler->i_argc, p_handler->ppsz_argv,
196                             strdup( psz_options ) );
197                 psz_options = psz_next;
198             }
199             /* NULL will be appended later on */
200
201             TAB_APPEND( p_sys->i_handlers, p_sys->pp_handlers, p_handler );
202         }
203     }
204     if( psz_src != NULL )
205         free( psz_src );
206 #endif
207
208     /* determine SSL configuration */
209     psz_cert = config_GetPsz( p_intf, "http-intf-cert" );
210     if ( psz_cert != NULL )
211     {
212         msg_Dbg( p_intf, "enabling TLS for HTTP interface (cert file: %s)",
213                  psz_cert );
214         psz_key = var_GetNonEmptyString( p_intf, "http-intf-key" );
215         psz_ca = var_GetNonEmptyString( p_intf, "http-intf-ca" );
216         psz_crl = var_GetNonEmptyString( p_intf, "http-intf-crl" );
217
218         if( i_port <= 0 )
219             i_port = 8443;
220     }
221     else
222     {
223         if( i_port <= 0 )
224             i_port= 8080;
225     }
226
227     msg_Dbg( p_intf, "base %s:%d", psz_address, i_port );
228
229     p_sys->p_httpd_host = httpd_TLSHostNew( VLC_OBJECT(p_intf), psz_address,
230                                             i_port, psz_cert, psz_key, psz_ca,
231                                             psz_crl );
232     if( p_sys->p_httpd_host == NULL )
233     {
234         msg_Err( p_intf, "cannot listen on %s:%d", psz_address, i_port );
235         pl_Release( p_this );
236         free( p_sys->psz_address );
237         free( p_sys );
238         return VLC_EGENERIC;
239     }
240     else
241     {
242         char psz_tmp[NI_MAXHOST + 6];
243
244         /* Ugly hack to run several HTTP servers on different ports */
245         snprintf( psz_tmp, sizeof (psz_tmp), "%s:%d", psz_address, i_port + 1 );
246         var_Create(p_intf->p_libvlc, "http-host", VLC_VAR_STRING );
247         var_SetString( p_intf->p_libvlc, "http-host", psz_tmp );
248     }
249
250     p_sys->i_files  = 0;
251     p_sys->pp_files = NULL;
252
253 #if defined(__APPLE__) || defined(SYS_BEOS) || defined(WIN32)
254     if ( ( psz_src = config_GetPsz( p_intf, "http-src" )) == NULL )
255     {
256         const char * psz_vlcpath = config_GetDataDir();
257         psz_src = malloc( strlen(psz_vlcpath) + strlen("/http" ) + 1 );
258         if( !psz_src ) return VLC_ENOMEM;
259         sprintf( psz_src, "%s/http", psz_vlcpath );
260     }
261 #else
262     psz_src = config_GetPsz( p_intf, "http-src" );
263
264     if( ( psz_src == NULL ) || ( *psz_src == '\0' ) )
265     {
266         static char const* ppsz_paths[] = {
267             "share/http",
268             "../share/http",
269             DATA_PATH"/http",
270             NULL
271         };
272         unsigned i;
273
274         if( psz_src != NULL )
275         {
276             free( psz_src );
277             psz_src = NULL;
278         }
279
280         for( i = 0; ppsz_paths[i] != NULL; i++ )
281             if( !DirectoryCheck( ppsz_paths[i] ) )
282             {
283                 psz_src = strdup( ppsz_paths[i] );
284                 break;
285             }
286     }
287 #endif
288
289     if( !psz_src || *psz_src == '\0' )
290     {
291         msg_Err( p_intf, "invalid web interface source directory" );
292         goto failed;
293     }
294
295     /* remove trainling \ or / */
296     if( psz_src[strlen( psz_src ) - 1] == '\\' ||
297         psz_src[strlen( psz_src ) - 1] == '/' )
298     {
299         psz_src[strlen( psz_src ) - 1] = '\0';
300     }
301
302     E_(ParseDirectory)( p_intf, psz_src, psz_src );
303     if( p_sys->i_files <= 0 )
304     {
305         msg_Err( p_intf, "cannot find any file in directory %s", psz_src );
306         goto failed;
307     }
308
309     free( psz_src );
310
311     if( config_GetInt( p_intf, "http-album-art" ) )
312     {
313         /* FIXME: we're leaking h */
314         httpd_handler_sys_t *h = malloc( sizeof( httpd_handler_sys_t ) );
315         if( !h )
316         {
317             msg_Err( p_intf, "not enough memory to allocate album art handler" );
318             goto failed;
319         }
320         h->file.p_intf = p_intf;
321         h->file.file = NULL;
322         h->file.name = NULL;
323         /* TODO: use ACL and login/password stuff here too */
324         h->p_handler = httpd_HandlerNew( p_sys->p_httpd_host,
325                                          "/art", NULL, NULL, NULL,
326                                          E_(ArtCallback), h );
327         p_sys->p_art_handler = h->p_handler;
328     }
329
330     return VLC_SUCCESS;
331
332 failed:
333     free( psz_src );
334     free( p_sys->pp_files );
335     httpd_HostDelete( p_sys->p_httpd_host );
336     free( p_sys->psz_address );
337     free( p_sys );
338     pl_Release( p_this );
339     return VLC_EGENERIC;
340 }
341
342 /*****************************************************************************
343  * Close: destroy interface
344  *****************************************************************************/
345 static void Close ( vlc_object_t *p_this )
346 {
347     intf_thread_t *p_intf = (intf_thread_t *)p_this;
348     intf_sys_t    *p_sys = p_intf->p_sys;
349
350     int i;
351
352     if( p_sys->p_vlm )
353     {
354         vlm_Delete( p_sys->p_vlm );
355     }
356     for( i = 0; i < p_sys->i_files; i++ )
357     {
358         if( p_sys->pp_files[i]->b_handler )
359             httpd_HandlerDelete( ((httpd_handler_sys_t *)p_sys->pp_files[i])->p_handler );
360         else
361             httpd_FileDelete( p_sys->pp_files[i]->p_file );
362         if( p_sys->pp_files[i]->p_redir )
363             httpd_RedirectDelete( p_sys->pp_files[i]->p_redir );
364         if( p_sys->pp_files[i]->p_redir2 )
365             httpd_RedirectDelete( p_sys->pp_files[i]->p_redir2 );
366
367         free( p_sys->pp_files[i]->file );
368         free( p_sys->pp_files[i]->name );
369         free( p_sys->pp_files[i] );
370     }
371     if( p_sys->pp_files )
372     {
373         free( p_sys->pp_files );
374     }
375     for( i = 0; i < p_sys->i_handlers; i++ )
376     {
377         http_association_t *p_handler = p_sys->pp_handlers[i];
378         int j;
379         free( p_handler->psz_ext );
380         for( j = 0; j < p_handler->i_argc; j++ )
381             free( p_handler->ppsz_argv[j] );
382         if( p_handler->i_argc )
383             free( p_handler->ppsz_argv );
384         free( p_handler );
385     }
386     if( p_sys->i_handlers )
387         free( p_sys->pp_handlers );
388     if( p_sys->p_art_handler )
389         httpd_HandlerDelete( p_sys->p_art_handler );
390     httpd_HostDelete( p_sys->p_httpd_host );
391     free( p_sys->psz_address );
392     free( p_sys );
393     pl_Release( p_this );
394 }
395
396 /****************************************************************************
397  * HttpCallback:
398  ****************************************************************************
399  * a file with b_html is parsed and all "macro" replaced
400  ****************************************************************************/
401 static void Callback404( httpd_file_sys_t *p_args, char **pp_data,
402                          int *pi_data )
403 {
404     char *p = *pp_data = malloc( 10240 );
405     if( !p )
406     {
407         return;
408     }
409     p += sprintf( p, "Content-Type: text/html\n" );
410     p += sprintf( p, "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n" );
411     p += sprintf( p, "<head>\n" );
412     p += sprintf( p, "<title>Error loading %s</title>\n", p_args->file );
413     p += sprintf( p, "</head>\n" );
414     p += sprintf( p, "<body>\n" );
415     p += sprintf( p, "<h1><center>Error loading %s for %s</center></h1>\n", p_args->file, p_args->name );
416     p += sprintf( p, "<a href=\"http://www.videolan.org/\">VideoLAN</a>\n" );
417     p += sprintf( p, "</body>\n" );
418     p += sprintf( p, "</html>\n" );
419
420     *pi_data = strlen( *pp_data );
421 }
422
423 static void ParseExecute( httpd_file_sys_t *p_args, char *p_buffer,
424                           int i_buffer, char *p_request,
425                           char **pp_data, int *pi_data )
426 {
427     intf_sys_t *p_sys = p_args->p_intf->p_sys;
428     int i_request = p_request != NULL ? strlen( p_request ) : 0;
429     char *dst;
430     vlc_value_t val;
431     char position[4]; /* percentage */
432     char time[12]; /* in seconds */
433     char length[12]; /* in seconds */
434     audio_volume_t i_volume;
435     char volume[5];
436     const char *state;
437     char stats[20];
438
439     assert( p_sys->p_input == NULL );
440     /* FIXME: proper locking anyone? */
441     p_sys->p_input = p_sys->p_playlist->p_input;
442     if( p_sys->p_input )
443     {
444         vlc_object_yield( p_sys->p_input );
445         var_Get( p_sys->p_input, "position", &val);
446         sprintf( position, "%d" , (int)((val.f_float) * 100.0));
447         var_Get( p_sys->p_input, "time", &val);
448         sprintf( time, I64Fi, (int64_t)val.i_time / I64C(1000000) );
449         var_Get( p_sys->p_input, "length", &val);
450         sprintf( length, I64Fi, (int64_t)val.i_time / I64C(1000000) );
451
452         var_Get( p_sys->p_input, "state", &val );
453         if( val.i_int == PLAYING_S )
454         {
455             state = "playing";
456         }
457         else if( val.i_int == OPENING_S )
458         {
459             state = "opening/connecting";
460         }
461         else if( val.i_int == BUFFERING_S )
462         {
463             state = "buffering";
464         }
465         else if( val.i_int == PAUSE_S )
466         {
467             state = "paused";
468         }
469         else
470         {
471             state = "stop";
472         }
473     }
474     else
475     {
476         sprintf( position, "%d", 0 );
477         sprintf( time, "%d", 0 );
478         sprintf( length, "%d", 0 );
479         state = "stop";
480     }
481
482     aout_VolumeGet( p_args->p_intf, &i_volume );
483     sprintf( volume, "%d", (int)i_volume );
484
485     p_args->vars = E_(mvar_New)( "variables", "" );
486     E_(mvar_AppendNewVar)( p_args->vars, "url_param",
487                            i_request > 0 ? "1" : "0" );
488     E_(mvar_AppendNewVar)( p_args->vars, "url_value", p_request );
489     E_(mvar_AppendNewVar)( p_args->vars, "version", VLC_Version() );
490     E_(mvar_AppendNewVar)( p_args->vars, "copyright", COPYRIGHT_MESSAGE );
491     E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_by", VLC_CompileBy() );
492     E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_host",
493                            VLC_CompileHost() );
494     E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_domain",
495                            VLC_CompileDomain() );
496     E_(mvar_AppendNewVar)( p_args->vars, "vlc_compiler", VLC_Compiler() );
497     E_(mvar_AppendNewVar)( p_args->vars, "vlc_changeset", VLC_Changeset() );
498     E_(mvar_AppendNewVar)( p_args->vars, "stream_position", position );
499     E_(mvar_AppendNewVar)( p_args->vars, "stream_time", time );
500     E_(mvar_AppendNewVar)( p_args->vars, "stream_length", length );
501     E_(mvar_AppendNewVar)( p_args->vars, "volume", volume );
502     E_(mvar_AppendNewVar)( p_args->vars, "stream_state", state );
503     E_(mvar_AppendNewVar)( p_args->vars, "charset", "UTF-8" );
504
505     /* Stats */
506     if( p_sys->p_input )
507     {
508         /* FIXME: Workarround a stupid assert in input_GetItem */
509         input_item_t *p_item = p_sys->p_input && p_sys->p_input->p
510                                ? input_GetItem( p_sys->p_input )
511                                : NULL;
512
513         if( p_item )
514         {
515             vlc_mutex_lock( &p_item->p_stats->lock );
516 #define STATS_INT( n ) sprintf( stats, "%d", p_item->p_stats->i_ ## n ); \
517                        E_(mvar_AppendNewVar)( p_args->vars, #n, stats );
518 #define STATS_FLOAT( n ) sprintf( stats, "%f", p_item->p_stats->f_ ## n ); \
519                        E_(mvar_AppendNewVar)( p_args->vars, #n, stats );
520             STATS_INT( read_bytes )
521             STATS_FLOAT( input_bitrate )
522             STATS_INT( demux_read_bytes )
523             STATS_FLOAT( demux_bitrate )
524             STATS_INT( decoded_video )
525             STATS_INT( displayed_pictures )
526             STATS_INT( lost_pictures )
527             STATS_INT( decoded_audio )
528             STATS_INT( played_abuffers )
529             STATS_INT( lost_abuffers )
530             STATS_INT( sent_packets )
531             STATS_INT( sent_bytes )
532             STATS_FLOAT( send_bitrate )
533 #undef STATS_INT
534 #undef STATS_FLOAT
535             vlc_mutex_unlock( &p_item->p_stats->lock );
536         }
537     }
538
539     E_(SSInit)( &p_args->stack );
540
541     /* allocate output */
542     *pi_data = i_buffer + 1000;
543     dst = *pp_data = malloc( *pi_data );
544
545     /* we parse executing all  <vlc /> macros */
546     E_(Execute)( p_args, p_request, i_request, pp_data, pi_data, &dst,
547                  &p_buffer[0], &p_buffer[i_buffer] );
548
549     *dst     = '\0';
550     *pi_data = dst - *pp_data;
551
552     if( p_sys->p_input != NULL )
553     {
554         vlc_object_release( p_sys->p_input );
555         p_sys->p_input = NULL;
556     }
557     E_(SSClean)( &p_args->stack );
558     E_(mvar_Delete)( p_args->vars );
559 }
560
561 int  E_(HttpCallback)( httpd_file_sys_t *p_args,
562                        httpd_file_t *p_file,
563                        uint8_t *_p_request,
564                        uint8_t **_pp_data, int *pi_data )
565 {
566     VLC_UNUSED(p_file);
567     char *p_request = (char *)_p_request;
568     char **pp_data = (char **)_pp_data;
569     FILE *f;
570
571     if( ( f = utf8_fopen( p_args->file, "r" ) ) == NULL )
572     {
573         Callback404( p_args, pp_data, pi_data );
574         return VLC_SUCCESS;
575     }
576
577     if( !p_args->b_html )
578     {
579         E_(FileLoad)( f, pp_data, pi_data );
580     }
581     else
582     {
583         int  i_buffer;
584         char *p_buffer;
585
586         /* first we load in a temporary buffer */
587         E_(FileLoad)( f, &p_buffer, &i_buffer );
588
589         ParseExecute( p_args, p_buffer, i_buffer, p_request, pp_data, pi_data );
590
591         free( p_buffer );
592     }
593
594     fclose( f );
595
596     return VLC_SUCCESS;
597 }
598
599 /****************************************************************************
600  * HandlerCallback:
601  ****************************************************************************
602  * call the external handler and parse vlc macros if Content-Type is HTML
603  ****************************************************************************/
604 int  E_(HandlerCallback)( httpd_handler_sys_t *p_args,
605                           httpd_handler_t *p_handler, char *_p_url,
606                           uint8_t *_p_request, int i_type,
607                           uint8_t *_p_in, int i_in,
608                           char *psz_remote_addr, char *psz_remote_host,
609                           uint8_t **_pp_data, int *pi_data )
610 {
611     VLC_UNUSED(p_handler); VLC_UNUSED(_p_in);
612     char *p_url = (char *)_p_url;
613     char *p_request = (char *)_p_request;
614     char **pp_data = (char **)_pp_data;
615     char *p_in = (char *)p_in;
616     int i_request = p_request != NULL ? strlen( p_request ) : 0;
617     char *p;
618     int i_env = 0;
619     char **ppsz_env = NULL;
620     char *psz_tmp;
621     char sep;
622     size_t i_buffer;
623     char *p_buffer;
624     char *psz_cwd, *psz_file = NULL;
625     int i_ret;
626
627 #ifdef WIN32
628     sep = '\\';
629 #else
630     sep = '/';
631 #endif
632
633     /* Create environment for the CGI */
634     TAB_APPEND( i_env, ppsz_env, strdup("GATEWAY_INTERFACE=CGI/1.1") );
635     TAB_APPEND( i_env, ppsz_env, strdup("SERVER_PROTOCOL=HTTP/1.1") );
636     TAB_APPEND( i_env, ppsz_env, strdup("SERVER_SOFTWARE=" COPYRIGHT_MESSAGE) );
637
638     switch( i_type )
639     {
640     case HTTPD_MSG_GET:
641         TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=GET") );
642         break;
643     case HTTPD_MSG_POST:
644         TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=POST") );
645         break;
646     case HTTPD_MSG_HEAD:
647         TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=HEAD") );
648         break;
649     default:
650         break;
651     }
652
653     if( i_request )
654     {
655         psz_tmp = malloc( sizeof("QUERY_STRING=") + i_request );
656         sprintf( psz_tmp, "QUERY_STRING=%s", p_request );
657         TAB_APPEND( i_env, ppsz_env, psz_tmp );
658
659         psz_tmp = malloc( sizeof("REQUEST_URI=?") + strlen(p_url)
660                            + i_request );
661         sprintf( psz_tmp, "REQUEST_URI=%s?%s", p_url, p_request );
662         TAB_APPEND( i_env, ppsz_env, psz_tmp );
663     }
664     else
665     {
666         psz_tmp = malloc( sizeof("REQUEST_URI=") + strlen(p_url) );
667         sprintf( psz_tmp, "REQUEST_URI=%s", p_url );
668         TAB_APPEND( i_env, ppsz_env, psz_tmp );
669     }
670
671     psz_tmp = malloc( sizeof("SCRIPT_NAME=") + strlen(p_url) );
672     sprintf( psz_tmp, "SCRIPT_NAME=%s", p_url );
673     TAB_APPEND( i_env, ppsz_env, psz_tmp );
674
675 #define p_sys p_args->file.p_intf->p_sys
676     psz_tmp = malloc( sizeof("SERVER_NAME=") + strlen(p_sys->psz_address) );
677     sprintf( psz_tmp, "SERVER_NAME=%s", p_sys->psz_address );
678     TAB_APPEND( i_env, ppsz_env, psz_tmp );
679
680     psz_tmp = malloc( sizeof("SERVER_PORT=") + 5 );
681     sprintf( psz_tmp, "SERVER_PORT=%u", p_sys->i_port );
682     TAB_APPEND( i_env, ppsz_env, psz_tmp );
683 #undef p_sys
684
685     p = getenv( "PATH" );
686     if( p != NULL )
687     {
688         psz_tmp = malloc( sizeof("PATH=") + strlen(p) );
689         sprintf( psz_tmp, "PATH=%s", p );
690         TAB_APPEND( i_env, ppsz_env, psz_tmp );
691     }
692
693 #ifdef WIN32
694     p = getenv( "windir" );
695     if( p != NULL )
696     {
697         psz_tmp = malloc( sizeof("SYSTEMROOT=") + strlen(p) );
698         sprintf( psz_tmp, "SYSTEMROOT=%s", p );
699         TAB_APPEND( i_env, ppsz_env, psz_tmp );
700     }
701 #endif
702
703     if( psz_remote_addr != NULL && *psz_remote_addr )
704     {
705         psz_tmp = malloc( sizeof("REMOTE_ADDR=") + strlen(psz_remote_addr) );
706         sprintf( psz_tmp, "REMOTE_ADDR=%s", psz_remote_addr );
707         TAB_APPEND( i_env, ppsz_env, psz_tmp );
708     }
709
710     if( psz_remote_host != NULL && *psz_remote_host )
711     {
712         psz_tmp = malloc( sizeof("REMOTE_HOST=") + strlen(psz_remote_host) );
713         sprintf( psz_tmp, "REMOTE_HOST=%s", psz_remote_host );
714         TAB_APPEND( i_env, ppsz_env, psz_tmp );
715     }
716
717     if( i_in )
718     {
719         p = p_in;
720         for ( ; ; )
721         {
722             if( !strncasecmp( p, "Content-Type: ", strlen("Content-Type: ") ) )
723             {
724                 char *end = strchr( p, '\r' );
725                 if( end == NULL )
726                     break;
727                 *end = '\0';
728                 psz_tmp = malloc( sizeof("CONTENT_TYPE=") + strlen(p) );
729                 sprintf( psz_tmp, "CONTENT_TYPE=%s", p );
730                 TAB_APPEND( i_env, ppsz_env, psz_tmp );
731                 *end = '\r';
732             }
733             if( !strncasecmp( p, "Content-Length: ",
734                               strlen("Content-Length: ") ) )
735             {
736                 char *end = strchr( p, '\r' );
737                 if( end == NULL )
738                     break;
739                 *end = '\0';
740                 psz_tmp = malloc( sizeof("CONTENT_LENGTH=") + strlen(p) );
741                 sprintf( psz_tmp, "CONTENT_LENGTH=%s", p );
742                 TAB_APPEND( i_env, ppsz_env, psz_tmp );
743                 *end = '\r';
744             }
745
746             p = strchr( p, '\n' );
747             if( p == NULL || p[1] == '\r' )
748             {
749                 p = NULL;
750                 break;
751             }
752             p++;
753         }
754     }
755
756     psz_file = strrchr( p_args->file.file, sep );
757     if( psz_file != NULL )
758     {
759         psz_file++;
760         psz_tmp = malloc( sizeof("SCRIPT_FILENAME=") + strlen(psz_file) );
761         sprintf( psz_tmp, "SCRIPT_FILENAME=%s", psz_file );
762         TAB_APPEND( i_env, ppsz_env, psz_tmp );
763
764         TAB_APPEND( p_args->p_association->i_argc,
765                     p_args->p_association->ppsz_argv, psz_file );
766     }
767
768     TAB_APPEND( i_env, ppsz_env, NULL );
769
770     TAB_APPEND( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
771                 NULL );
772
773     psz_tmp = strdup( p_args->file.file );
774     p = strrchr( psz_tmp, sep );
775     if( p != NULL )
776     {
777         *p = '\0';
778         psz_cwd = psz_tmp;
779     }
780     else
781     {
782         free( psz_tmp );
783         psz_cwd = NULL;
784     }
785
786     i_ret = vlc_execve( p_args->file.p_intf, p_args->p_association->i_argc,
787                         p_args->p_association->ppsz_argv, ppsz_env, psz_cwd,
788                         (char *)p_in, i_in, &p_buffer, &i_buffer );
789     TAB_REMOVE( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
790                 NULL );
791     TAB_REMOVE( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
792                 psz_file );
793     if( psz_cwd != NULL )
794         free( psz_cwd );
795     while( i_env )
796         TAB_REMOVE( i_env, ppsz_env, ppsz_env[0] );
797
798     if( i_ret == -1 )
799     {
800         Callback404( (httpd_file_sys_t *)p_args, pp_data, pi_data );
801         return VLC_SUCCESS;
802     }
803     p = p_buffer;
804     while( strncasecmp( p, "Content-Type: text/html",
805                         strlen("Content-Type: text/html") ) )
806     {
807         p = strchr( p, '\n' );
808         if( p == NULL || p[1] == '\r' )
809         {
810             p = NULL;
811             break;
812         }
813         p++;
814     }
815
816     if( p == NULL )
817     {
818         *pp_data = p_buffer;
819         *pi_data = i_buffer;
820     }
821     else
822     {
823         ParseExecute( (httpd_file_sys_t *)p_args, p_buffer, i_buffer,
824                       p_request, pp_data, pi_data );
825
826         free( p_buffer );
827     }
828
829     return VLC_SUCCESS;
830 }
831
832 int  E_(ArtCallback)( httpd_handler_sys_t *p_args,
833                           httpd_handler_t *p_handler, char *_p_url,
834                           uint8_t *p_request, int i_type,
835                           uint8_t *p_in, int i_in,
836                           char *psz_remote_addr, char *psz_remote_host,
837                           uint8_t **pp_data, int *pi_data )
838 {
839     VLC_UNUSED(p_handler); VLC_UNUSED(_p_url); VLC_UNUSED(i_type); 
840     VLC_UNUSED(p_in); VLC_UNUSED(i_in); VLC_UNUSED(psz_remote_addr); 
841     VLC_UNUSED(psz_remote_host); 
842
843     char *psz_art = NULL;
844     intf_thread_t *p_intf = p_args->file.p_intf;
845     intf_sys_t *p_sys = p_intf->p_sys;
846     char psz_id[16];
847     input_item_t *p_item = NULL;
848     int i_id;
849
850     psz_id[0] = '\0';
851     if( p_request )
852         E_(ExtractURIValue)( (char *)p_request, "id", psz_id, 15 );
853     i_id = atoi( psz_id );
854     if( i_id )
855     {
856         playlist_item_t *p_pl_item = playlist_ItemGetById( p_sys->p_playlist,
857                                                            i_id, VLC_FALSE );
858         if( p_pl_item )
859             p_item = p_pl_item->p_input;
860     }
861     else
862     {
863         /* FIXME: Workarround a stupid assert in input_GetItem */
864         if( p_sys->p_input && p_sys->p_input->p )
865             p_item = input_GetItem( p_sys->p_input );
866     }
867
868     if( p_item )
869     {
870         psz_art = input_item_GetArtURL( p_item );
871     }
872
873     if( psz_art && !strncmp( psz_art, "file://", strlen( "file://" ) ) )
874     {
875         FILE *f;
876         char *psz_ext;
877         char *psz_header;
878         char *p_data = NULL;
879         int i_header_size, i_data;
880
881         if( ( f = utf8_fopen( psz_art + strlen( "file://" ), "r" ) ) == NULL )
882         {
883             msg_Dbg( p_intf, "Couldn't open album art file %s",
884                      psz_art + strlen( "file://" ) );
885             Callback404( &p_args->file, (char**)pp_data, pi_data );
886             free( psz_art );
887             return VLC_SUCCESS;
888         }
889
890         E_(FileLoad)( f, &p_data, &i_data );
891
892         fclose( f );
893
894         psz_ext = strrchr( psz_art, '.' );
895         if( psz_ext ) psz_ext++;
896
897 #define HEADER  "Content-Type: image/%s\n" \
898                 "Content-Length: %d\n" \
899                 "\n"
900         i_header_size = asprintf( &psz_header, HEADER, psz_ext, i_data );
901 #undef HEADER
902
903         *pi_data = i_header_size + i_data;
904         *pp_data = (uint8_t*)malloc( *pi_data );
905         memcpy( *pp_data, psz_header, i_header_size );
906         memcpy( *pp_data+i_header_size, p_data, i_data );
907         free( psz_header );
908         free( p_data );
909     }
910     else
911     {
912         msg_Dbg( p_intf, "No album art found" );
913         Callback404( &p_args->file, (char**)pp_data, pi_data );
914     }
915
916     free( psz_art );
917
918     return VLC_SUCCESS;
919 }