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