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