1 /*****************************************************************************
2 * http.c : HTTP/HTTPS Remote control interface
3 *****************************************************************************
4 * Copyright (C) 2001-2006 the VideoLAN team
7 * Authors: Gildas Bazin <gbazin@netcourrier.com>
8 * Laurent Aimar <fenrir@via.ecp.fr>
9 * Christophe Massiot <massiot@via.ecp.fr>
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.
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.
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 *****************************************************************************/
28 /*****************************************************************************
30 *****************************************************************************/
31 static int Open ( vlc_object_t * );
32 static void Close( vlc_object_t * );
34 #define HOST_TEXT N_( "Host address" )
35 #define HOST_LONGTEXT N_( \
36 "Address and port the HTTP interface will listen on. It defaults to " \
37 "all network interfaces (0.0.0.0)." \
38 " If you want the HTTP interface to be available only on the local " \
39 "machine, enter 127.0.0.1" )
40 #define SRC_TEXT N_( "Source directory" )
41 #define SRC_LONGTEXT N_( "Source directory" )
42 #define CHARSET_TEXT N_( "Charset" )
43 #define CHARSET_LONGTEXT N_( \
44 "Charset declared in Content-Type header (default UTF-8)." )
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 CERT_TEXT N_( "Certificate file" )
50 #define CERT_LONGTEXT N_( "HTTP interface x509 PEM certificate file " \
52 #define KEY_TEXT N_( "Private key file" )
53 #define KEY_LONGTEXT N_( "HTTP interface x509 PEM private key file." )
54 #define CA_TEXT N_( "Root CA file" )
55 #define CA_LONGTEXT N_( "HTTP interface x509 PEM trusted root CA " \
56 "certificates file." )
57 #define CRL_TEXT N_( "CRL file" )
58 #define CRL_LONGTEXT N_( "HTTP interace Certificates Revocation List file." )
61 set_shortname( _("HTTP"));
62 set_description( _("HTTP remote control interface") );
63 set_category( CAT_INTERFACE );
64 set_subcategory( SUBCAT_INTERFACE_MAIN );
65 add_string ( "http-host", NULL, NULL, HOST_TEXT, HOST_LONGTEXT, VLC_TRUE );
66 add_string ( "http-src", NULL, NULL, SRC_TEXT, SRC_LONGTEXT, VLC_TRUE );
67 add_string ( "http-charset", "UTF-8", NULL, CHARSET_TEXT, CHARSET_LONGTEXT, VLC_TRUE );
68 #if defined( HAVE_FORK ) || defined( WIN32 )
69 add_string ( "http-handlers", NULL, NULL, HANDLERS_TEXT, HANDLERS_LONGTEXT, VLC_TRUE );
71 set_section( N_("HTTP SSL" ), 0 );
72 add_string ( "http-intf-cert", NULL, NULL, CERT_TEXT, CERT_LONGTEXT, VLC_TRUE );
73 add_string ( "http-intf-key", NULL, NULL, KEY_TEXT, KEY_LONGTEXT, VLC_TRUE );
74 add_string ( "http-intf-ca", NULL, NULL, CA_TEXT, CA_LONGTEXT, VLC_TRUE );
75 add_string ( "http-intf-crl", NULL, NULL, CRL_TEXT, CRL_LONGTEXT, VLC_TRUE );
76 set_capability( "interface", 0 );
77 set_callbacks( Open, Close );
81 /*****************************************************************************
83 *****************************************************************************/
84 static void Run ( intf_thread_t *p_intf );
86 /*****************************************************************************
88 *****************************************************************************/
89 #if !defined(__APPLE__) && !defined(SYS_BEOS) && !defined(WIN32)
90 static int DirectoryCheck( const char *psz_dir )
94 #ifdef HAVE_SYS_STAT_H
95 struct stat stat_info;
97 if( ( utf8_stat( psz_dir, &stat_info ) == -1 )
98 || !S_ISDIR( stat_info.st_mode ) )
104 if( ( p_dir = utf8_opendir( psz_dir ) ) == NULL )
115 /*****************************************************************************
116 * Activate: initialize and create stuff
117 *****************************************************************************/
118 static int Open( vlc_object_t *p_this )
120 intf_thread_t *p_intf = (intf_thread_t*)p_this;
123 const char *psz_cert = NULL, *psz_key = NULL, *psz_ca = NULL,
129 psz_address = config_GetPsz( p_intf, "http-host" );
130 if( psz_address != NULL )
132 char *psz_parser = strchr( psz_address, ':' );
135 *psz_parser++ = '\0';
136 i_port = atoi( psz_parser );
140 psz_address = strdup("");
142 p_intf->p_sys = p_sys = malloc( sizeof( intf_sys_t ) );
145 return( VLC_ENOMEM );
147 p_sys->p_playlist = NULL;
148 p_sys->p_input = NULL;
150 p_sys->psz_address = psz_address;
151 p_sys->i_port = i_port;
153 /* determine Content-Type value for HTML pages */
154 psz_src = config_GetPsz( p_intf, "http-charset" );
155 if( psz_src == NULL || !*psz_src )
157 if( psz_src != NULL ) free( psz_src );
158 psz_src = strdup("UTF-8");
161 p_sys->psz_html_type = malloc( 20 + strlen( psz_src ) );
162 if( p_sys->psz_html_type == NULL )
164 free( p_sys->psz_address );
169 sprintf( p_sys->psz_html_type, "text/html; charset=%s", psz_src );
170 msg_Dbg( p_intf, "using charset=%s", psz_src );
172 if( strcmp( psz_src, "UTF-8" ) )
174 char psz_encoding[strlen( psz_src ) + sizeof( "//translit")];
175 sprintf( psz_encoding, "%s//translit", psz_src);
177 p_sys->iconv_from_utf8 = vlc_iconv_open( psz_encoding, "UTF-8" );
178 if( p_sys->iconv_from_utf8 == (vlc_iconv_t)-1 )
179 msg_Warn( p_intf, "unable to perform charset conversion to %s",
183 p_sys->iconv_to_utf8 = vlc_iconv_open( "UTF-8", psz_src );
184 if( p_sys->iconv_to_utf8 == (vlc_iconv_t)-1 )
186 "unable to perform charset conversion from %s",
192 p_sys->iconv_from_utf8 = p_sys->iconv_to_utf8 = (vlc_iconv_t)-1;
195 p_sys->psz_charset = psz_src;
198 /* determine file handler associations */
199 p_sys->i_handlers = 0;
200 p_sys->pp_handlers = NULL;
201 #if defined( HAVE_FORK ) || defined( WIN32 )
202 psz_src = config_GetPsz( p_intf, "http-handlers" );
203 if( psz_src != NULL && *psz_src )
208 http_association_t *p_handler;
210 char *psz_program, *psz_options;
211 p = strchr( p, '=' );
212 if( p == NULL ) break;
215 p = strchr( p, ',' );
219 p_handler = malloc( sizeof( http_association_t ) );
220 p_handler->psz_ext = strdup( psz_ext );
221 psz_options = E_(FirstWord)( psz_program, psz_program );
222 p_handler->i_argc = 0;
223 p_handler->ppsz_argv = NULL;
224 TAB_APPEND( p_handler->i_argc, p_handler->ppsz_argv,
225 strdup( psz_program ) );
226 while( psz_options != NULL && *psz_options )
228 char *psz_next = E_(FirstWord)( psz_options, psz_options );
229 TAB_APPEND( p_handler->i_argc, p_handler->ppsz_argv,
230 strdup( psz_options ) );
231 psz_options = psz_next;
233 /* NULL will be appended later on */
235 TAB_APPEND( p_sys->i_handlers, p_sys->pp_handlers, p_handler );
238 if( psz_src != NULL )
242 /* determine SSL configuration */
243 psz_cert = config_GetPsz( p_intf, "http-intf-cert" );
244 if ( psz_cert != NULL )
246 msg_Dbg( p_intf, "enabling TLS for HTTP interface (cert file: %s)",
248 psz_key = config_GetPsz( p_intf, "http-intf-key" );
249 psz_ca = config_GetPsz( p_intf, "http-intf-ca" );
250 psz_crl = config_GetPsz( p_intf, "http-intf-crl" );
261 /* Ugly hack to allow to run several HTTP servers on different ports. */
262 sprintf( psz_tmp, ":%d", i_port + 1 );
263 config_PutPsz( p_intf, "http-host", psz_tmp );
265 msg_Dbg( p_intf, "base %s:%d", psz_address, i_port );
267 p_sys->p_httpd_host = httpd_TLSHostNew( VLC_OBJECT(p_intf), psz_address,
268 i_port, psz_cert, psz_key, psz_ca,
270 if( p_sys->p_httpd_host == NULL )
272 msg_Err( p_intf, "cannot listen on %s:%d", psz_address, i_port );
273 free( p_sys->psz_html_type );
274 free( p_sys->psz_address );
280 p_sys->pp_files = NULL;
282 #if defined(__APPLE__) || defined(SYS_BEOS) || defined(WIN32)
283 if ( ( psz_src = config_GetPsz( p_intf, "http-src" )) == NULL )
285 char * psz_vlcpath = p_intf->p_libvlc->psz_vlcpath;
286 psz_src = malloc( strlen(psz_vlcpath) + strlen("/share/http" ) + 1 );
287 if( !psz_src ) return VLC_ENOMEM;
289 sprintf( psz_src, "%s/http", psz_vlcpath );
291 sprintf( psz_src, "%s/share/http", psz_vlcpath );
295 psz_src = config_GetPsz( p_intf, "http-src" );
297 if( ( psz_src == NULL ) || ( *psz_src == '\0' ) )
299 static char const* ppsz_paths[] = {
307 if( psz_src != NULL )
313 for( i = 0; ppsz_paths[i] != NULL; i++ )
314 if( !DirectoryCheck( ppsz_paths[i] ) )
316 psz_src = strdup( ppsz_paths[i] );
322 if( !psz_src || *psz_src == '\0' )
324 msg_Err( p_intf, "invalid web interface source directory" );
328 /* remove trainling \ or / */
329 if( psz_src[strlen( psz_src ) - 1] == '\\' ||
330 psz_src[strlen( psz_src ) - 1] == '/' )
332 psz_src[strlen( psz_src ) - 1] = '\0';
335 E_(ParseDirectory)( p_intf, psz_src, psz_src );
338 if( p_sys->i_files <= 0 )
340 msg_Err( p_intf, "cannot find any file in directory %s", psz_src );
343 p_intf->pf_run = Run;
349 if( psz_src ) free( psz_src );
350 if( p_sys->pp_files )
352 free( p_sys->pp_files );
354 httpd_HostDelete( p_sys->p_httpd_host );
355 free( p_sys->psz_address );
356 free( p_sys->psz_html_type );
357 if( p_sys->iconv_from_utf8 != (vlc_iconv_t)-1 )
358 vlc_iconv_close( p_sys->iconv_from_utf8 );
359 if( p_sys->iconv_to_utf8 != (vlc_iconv_t)-1 )
360 vlc_iconv_close( p_sys->iconv_to_utf8 );
365 /*****************************************************************************
366 * Close: destroy interface
367 *****************************************************************************/
368 static void Close ( vlc_object_t *p_this )
370 intf_thread_t *p_intf = (intf_thread_t *)p_this;
371 intf_sys_t *p_sys = p_intf->p_sys;
377 vlm_Delete( p_sys->p_vlm );
379 for( i = 0; i < p_sys->i_files; i++ )
381 if( p_sys->pp_files[i]->b_handler )
382 httpd_HandlerDelete( ((httpd_handler_sys_t *)p_sys->pp_files[i])->p_handler );
384 httpd_FileDelete( p_sys->pp_files[i]->p_file );
385 if( p_sys->pp_files[i]->p_redir )
386 httpd_RedirectDelete( p_sys->pp_files[i]->p_redir );
387 if( p_sys->pp_files[i]->p_redir2 )
388 httpd_RedirectDelete( p_sys->pp_files[i]->p_redir2 );
390 free( p_sys->pp_files[i]->file );
391 free( p_sys->pp_files[i]->name );
392 free( p_sys->pp_files[i] );
394 if( p_sys->pp_files )
396 free( p_sys->pp_files );
398 for( i = 0; i < p_sys->i_handlers; i++ )
400 http_association_t *p_handler = p_sys->pp_handlers[i];
402 free( p_handler->psz_ext );
403 for( j = 0; j < p_handler->i_argc; j++ )
404 free( p_handler->ppsz_argv[j] );
405 if( p_handler->i_argc )
406 free( p_handler->ppsz_argv );
409 if( p_sys->i_handlers )
410 free( p_sys->pp_handlers );
411 httpd_HostDelete( p_sys->p_httpd_host );
412 free( p_sys->psz_address );
413 free( p_sys->psz_html_type );
415 if( p_sys->iconv_from_utf8 != (vlc_iconv_t)-1 )
416 vlc_iconv_close( p_sys->iconv_from_utf8 );
417 if( p_sys->iconv_to_utf8 != (vlc_iconv_t)-1 )
418 vlc_iconv_close( p_sys->iconv_to_utf8 );
422 /*****************************************************************************
423 * Run: http interface thread
424 *****************************************************************************/
425 static void Run( intf_thread_t *p_intf )
427 intf_sys_t *p_sys = p_intf->p_sys;
429 while( !p_intf->b_die )
431 /* get the playlist */
432 if( p_sys->p_playlist == NULL )
434 p_sys->p_playlist = vlc_object_find( p_intf, VLC_OBJECT_PLAYLIST, FIND_ANYWHERE );
437 /* Manage the input part */
438 if( p_sys->p_input == NULL )
440 if( p_sys->p_playlist )
442 p_sys->p_input = p_sys->p_playlist->p_input;
445 else if( p_sys->p_input->b_dead || p_sys->p_input->b_die )
447 p_sys->p_input = NULL;
452 msleep( INTF_IDLE_SLEEP );
457 vlc_object_release( p_sys->p_input );
458 p_sys->p_input = NULL;
461 if( p_sys->p_playlist )
463 vlc_object_release( p_sys->p_playlist );
464 p_sys->p_playlist = NULL;
468 /****************************************************************************
470 ****************************************************************************
471 * a file with b_html is parsed and all "macro" replaced
472 ****************************************************************************/
473 static void Callback404( httpd_file_sys_t *p_args, char **pp_data,
476 char *p = *pp_data = malloc( 10240 );
481 p += sprintf( p, "Content-Type: text/html\n" );
482 p += sprintf( p, "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n" );
483 p += sprintf( p, "<head>\n" );
484 p += sprintf( p, "<title>Error loading %s</title>\n", p_args->file );
485 p += sprintf( p, "</head>\n" );
486 p += sprintf( p, "<body>\n" );
487 p += sprintf( p, "<h1><center>Error loading %s for %s</center></h1>\n", p_args->file, p_args->name );
488 p += sprintf( p, "<a href=\"http://www.videolan.org/\">VideoLAN</a>\n" );
489 p += sprintf( p, "</body>\n" );
490 p += sprintf( p, "</html>\n" );
492 *pi_data = strlen( *pp_data );
495 static void ParseExecute( httpd_file_sys_t *p_args, char *p_buffer,
496 int i_buffer, char *p_request,
497 char **pp_data, int *pi_data )
499 int i_request = p_request != NULL ? strlen( p_request ) : 0;
502 char position[4]; /* percentage */
503 char time[12]; /* in seconds */
504 char length[12]; /* in seconds */
505 audio_volume_t i_volume;
510 #define p_sys p_args->p_intf->p_sys
513 var_Get( p_sys->p_input, "position", &val);
514 sprintf( position, "%d" , (int)((val.f_float) * 100.0));
515 var_Get( p_sys->p_input, "time", &val);
516 sprintf( time, "%d" , (int)(val.i_time / 1000000) );
517 var_Get( p_sys->p_input, "length", &val);
518 sprintf( length, "%d" , (int)(val.i_time / 1000000) );
520 var_Get( p_sys->p_input, "state", &val );
521 if( val.i_int == PLAYING_S )
523 sprintf( state, "playing" );
525 else if( val.i_int == PAUSE_S )
527 sprintf( state, "paused" );
531 sprintf( state, "stop" );
536 sprintf( position, "%d", 0 );
537 sprintf( time, "%d", 0 );
538 sprintf( length, "%d", 0 );
539 sprintf( state, "stop" );
543 aout_VolumeGet( p_args->p_intf, &i_volume );
544 sprintf( volume, "%d", (int)i_volume );
546 p_args->vars = E_(mvar_New)( "variables", "" );
547 E_(mvar_AppendNewVar)( p_args->vars, "url_param",
548 i_request > 0 ? "1" : "0" );
549 E_(mvar_AppendNewVar)( p_args->vars, "url_value", p_request );
550 E_(mvar_AppendNewVar)( p_args->vars, "version", VLC_Version() );
551 E_(mvar_AppendNewVar)( p_args->vars, "copyright", COPYRIGHT_MESSAGE );
552 E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_by", VLC_CompileBy() );
553 E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_host",
555 E_(mvar_AppendNewVar)( p_args->vars, "vlc_compile_domain",
556 VLC_CompileDomain() );
557 E_(mvar_AppendNewVar)( p_args->vars, "vlc_compiler", VLC_Compiler() );
558 #ifndef HAVE_SHARED_LIBVLC
559 E_(mvar_AppendNewVar)( p_args->vars, "vlc_changeset", VLC_Changeset() );
561 E_(mvar_AppendNewVar)( p_args->vars, "stream_position", position );
562 E_(mvar_AppendNewVar)( p_args->vars, "stream_time", time );
563 E_(mvar_AppendNewVar)( p_args->vars, "stream_length", length );
564 E_(mvar_AppendNewVar)( p_args->vars, "volume", volume );
565 E_(mvar_AppendNewVar)( p_args->vars, "stream_state", state );
566 E_(mvar_AppendNewVar)( p_args->vars, "charset", ((intf_sys_t *)p_args->p_intf->p_sys)->psz_charset );
569 #define p_sys p_args->p_intf->p_sys
572 input_item_t *p_item = p_sys->p_input->input.p_item;
575 vlc_mutex_lock( &p_item->p_stats->lock );
576 #define STATS_INT( n ) sprintf( stats, "%d", p_item->p_stats->i_ ## n ); \
577 E_(mvar_AppendNewVar)( p_args->vars, #n, stats );
578 #define STATS_FLOAT( n ) sprintf( stats, "%f", p_item->p_stats->f_ ## n ); \
579 E_(mvar_AppendNewVar)( p_args->vars, #n, stats );
580 STATS_INT( read_bytes )
581 STATS_FLOAT( input_bitrate )
582 STATS_INT( demux_read_bytes )
583 STATS_FLOAT( demux_bitrate )
584 STATS_INT( decoded_video )
585 STATS_INT( displayed_pictures )
586 STATS_INT( lost_pictures )
587 STATS_INT( decoded_audio )
588 STATS_INT( played_abuffers )
589 STATS_INT( lost_abuffers )
590 STATS_INT( sent_packets )
591 STATS_INT( sent_bytes )
592 STATS_FLOAT( send_bitrate )
595 vlc_mutex_unlock( &p_item->p_stats->lock );
600 E_(SSInit)( &p_args->stack );
602 /* allocate output */
603 *pi_data = i_buffer + 1000;
604 dst = *pp_data = malloc( *pi_data );
606 /* we parse executing all <vlc /> macros */
607 E_(Execute)( p_args, p_request, i_request, pp_data, pi_data, &dst,
608 &p_buffer[0], &p_buffer[i_buffer] );
611 *pi_data = dst - *pp_data;
613 E_(SSClean)( &p_args->stack );
614 E_(mvar_Delete)( p_args->vars );
617 int E_(HttpCallback)( httpd_file_sys_t *p_args,
618 httpd_file_t *p_file,
620 uint8_t **_pp_data, int *pi_data )
622 char *p_request = (char *)_p_request;
623 char **pp_data = (char **)_pp_data;
626 /* FIXME: do we need character encoding translation here? */
627 if( ( f = fopen( p_args->file, "r" ) ) == NULL )
629 Callback404( p_args, pp_data, pi_data );
633 if( !p_args->b_html )
635 E_(FileLoad)( f, pp_data, pi_data );
642 /* first we load in a temporary buffer */
643 E_(FileLoad)( f, &p_buffer, &i_buffer );
645 ParseExecute( p_args, p_buffer, i_buffer, p_request, pp_data, pi_data );
655 /****************************************************************************
657 ****************************************************************************
658 * call the external handler and parse vlc macros if Content-Type is HTML
659 ****************************************************************************/
660 int E_(HandlerCallback)( httpd_handler_sys_t *p_args,
661 httpd_handler_t *p_handler, char *_p_url,
662 uint8_t *_p_request, int i_type,
663 uint8_t *_p_in, int i_in,
664 char *psz_remote_addr, char *psz_remote_host,
665 uint8_t **_pp_data, int *pi_data )
667 char *p_url = (char *)_p_url;
668 char *p_request = (char *)_p_request;
669 char **pp_data = (char **)_pp_data;
670 char *p_in = (char *)p_in;
671 int i_request = p_request != NULL ? strlen( p_request ) : 0;
674 char **ppsz_env = NULL;
679 char *psz_cwd, *psz_file = NULL;
688 /* Create environment for the CGI */
689 TAB_APPEND( i_env, ppsz_env, strdup("GATEWAY_INTERFACE=CGI/1.1") );
690 TAB_APPEND( i_env, ppsz_env, strdup("SERVER_PROTOCOL=HTTP/1.1") );
691 TAB_APPEND( i_env, ppsz_env, strdup("SERVER_SOFTWARE=" COPYRIGHT_MESSAGE) );
696 TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=GET") );
699 TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=POST") );
702 TAB_APPEND( i_env, ppsz_env, strdup("REQUEST_METHOD=HEAD") );
710 psz_tmp = malloc( sizeof("QUERY_STRING=") + i_request );
711 sprintf( psz_tmp, "QUERY_STRING=%s", p_request );
712 TAB_APPEND( i_env, ppsz_env, psz_tmp );
714 psz_tmp = malloc( sizeof("REQUEST_URI=?") + strlen(p_url)
716 sprintf( psz_tmp, "REQUEST_URI=%s?%s", p_url, p_request );
717 TAB_APPEND( i_env, ppsz_env, psz_tmp );
721 psz_tmp = malloc( sizeof("REQUEST_URI=") + strlen(p_url) );
722 sprintf( psz_tmp, "REQUEST_URI=%s", p_url );
723 TAB_APPEND( i_env, ppsz_env, psz_tmp );
726 psz_tmp = malloc( sizeof("SCRIPT_NAME=") + strlen(p_url) );
727 sprintf( psz_tmp, "SCRIPT_NAME=%s", p_url );
728 TAB_APPEND( i_env, ppsz_env, psz_tmp );
730 #define p_sys p_args->file.p_intf->p_sys
731 psz_tmp = malloc( sizeof("SERVER_NAME=") + strlen(p_sys->psz_address) );
732 sprintf( psz_tmp, "SERVER_NAME=%s", p_sys->psz_address );
733 TAB_APPEND( i_env, ppsz_env, psz_tmp );
735 psz_tmp = malloc( sizeof("SERVER_PORT=") + 5 );
736 sprintf( psz_tmp, "SERVER_PORT=%u", p_sys->i_port );
737 TAB_APPEND( i_env, ppsz_env, psz_tmp );
740 p = getenv( "PATH" );
743 psz_tmp = malloc( sizeof("PATH=") + strlen(p) );
744 sprintf( psz_tmp, "PATH=%s", p );
745 TAB_APPEND( i_env, ppsz_env, psz_tmp );
749 p = getenv( "windir" );
752 psz_tmp = malloc( sizeof("SYSTEMROOT=") + strlen(p) );
753 sprintf( psz_tmp, "SYSTEMROOT=%s", p );
754 TAB_APPEND( i_env, ppsz_env, psz_tmp );
758 if( psz_remote_addr != NULL && *psz_remote_addr )
760 psz_tmp = malloc( sizeof("REMOTE_ADDR=") + strlen(psz_remote_addr) );
761 sprintf( psz_tmp, "REMOTE_ADDR=%s", psz_remote_addr );
762 TAB_APPEND( i_env, ppsz_env, psz_tmp );
765 if( psz_remote_host != NULL && *psz_remote_host )
767 psz_tmp = malloc( sizeof("REMOTE_HOST=") + strlen(psz_remote_host) );
768 sprintf( psz_tmp, "REMOTE_HOST=%s", psz_remote_host );
769 TAB_APPEND( i_env, ppsz_env, psz_tmp );
777 if( !strncasecmp( p, "Content-Type: ", strlen("Content-Type: ") ) )
779 char *end = strchr( p, '\r' );
783 psz_tmp = malloc( sizeof("CONTENT_TYPE=") + strlen(p) );
784 sprintf( psz_tmp, "CONTENT_TYPE=%s", p );
785 TAB_APPEND( i_env, ppsz_env, psz_tmp );
788 if( !strncasecmp( p, "Content-Length: ",
789 strlen("Content-Length: ") ) )
791 char *end = strchr( p, '\r' );
795 psz_tmp = malloc( sizeof("CONTENT_LENGTH=") + strlen(p) );
796 sprintf( psz_tmp, "CONTENT_LENGTH=%s", p );
797 TAB_APPEND( i_env, ppsz_env, psz_tmp );
801 p = strchr( p, '\n' );
802 if( p == NULL || p[1] == '\r' )
811 psz_file = strrchr( p_args->file.file, sep );
812 if( psz_file != NULL )
815 psz_tmp = malloc( sizeof("SCRIPT_FILENAME=") + strlen(psz_file) );
816 sprintf( psz_tmp, "SCRIPT_FILENAME=%s", psz_file );
817 TAB_APPEND( i_env, ppsz_env, psz_tmp );
819 TAB_APPEND( p_args->p_association->i_argc,
820 p_args->p_association->ppsz_argv, psz_file );
823 TAB_APPEND( i_env, ppsz_env, NULL );
825 TAB_APPEND( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
828 psz_tmp = strdup( p_args->file.file );
829 p = strrchr( psz_tmp, sep );
841 i_ret = vlc_execve( p_args->file.p_intf, p_args->p_association->i_argc,
842 p_args->p_association->ppsz_argv, ppsz_env, psz_cwd,
843 (char *)p_in, i_in, &p_buffer, &i_buffer );
844 TAB_REMOVE( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
846 TAB_REMOVE( p_args->p_association->i_argc, p_args->p_association->ppsz_argv,
848 if( psz_cwd != NULL )
851 TAB_REMOVE( i_env, ppsz_env, ppsz_env[0] );
855 Callback404( (httpd_file_sys_t *)p_args, pp_data, pi_data );
859 while( strncasecmp( p, "Content-Type: text/html",
860 strlen("Content-Type: text/html") ) )
862 p = strchr( p, '\n' );
863 if( p == NULL || p[1] == '\r' )
878 ParseExecute( (httpd_file_sys_t *)p_args, p_buffer, i_buffer,
879 p_request, pp_data, pi_data );