Added check against NIT dvbpsi support.
[vlc.git] / modules / access / dvb / http.c
1 /*****************************************************************************
2  * http.c: HTTP interface
3  *****************************************************************************
4  * Copyright (C) 2005 the VideoLAN team
5  *
6  * Authors: Christophe Massiot <massiot@via.ecp.fr>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21  *****************************************************************************/
22
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #ifdef HAVE_CONFIG_H
28 # include "config.h"
29 #endif
30
31 #include <vlc_common.h>
32 #include <vlc_access.h>
33
34 #ifdef HAVE_UNISTD_H
35 #   include <unistd.h>
36 #endif
37
38 #include <fcntl.h>
39 #include <sys/types.h>
40
41 #include <errno.h>
42
43 /* Include dvbpsi headers */
44 #ifdef HAVE_DVBPSI_DR_H
45 #   include <dvbpsi/dvbpsi.h>
46 #   include <dvbpsi/descriptor.h>
47 #   include <dvbpsi/pat.h>
48 #   include <dvbpsi/pmt.h>
49 #   include <dvbpsi/dr.h>
50 #   include <dvbpsi/psi.h>
51 #   include <dvbpsi/demux.h>
52 #   include <dvbpsi/sdt.h>
53 #else
54 #   include "dvbpsi.h"
55 #   include "descriptor.h"
56 #   include "tables/pat.h"
57 #   include "tables/pmt.h"
58 #   include "descriptors/dr.h"
59 #   include "psi.h"
60 #   include "demux.h"
61 #   include "sdt.h"
62 #endif
63
64 #ifdef ENABLE_HTTPD
65 #   include "vlc_httpd.h"
66 #   include "vlc_acl.h"
67 #endif
68
69 #include "dvb.h"
70
71 #ifdef ENABLE_HTTPD
72 struct httpd_file_sys_t
73 {
74     access_t         *p_access;
75     httpd_file_t     *p_file;
76 };
77
78 static int HttpCallback( httpd_file_sys_t *p_args,
79                          httpd_file_t *p_file,
80                          uint8_t *_p_request,
81                          uint8_t **_pp_data, int *pi_data );
82
83 /*****************************************************************************
84  * HTTPOpen: Start the internal HTTP server
85  *****************************************************************************/
86 int HTTPOpen( access_t *p_access )
87 {
88     access_sys_t *p_sys = p_access->p_sys;
89     char          *psz_address, *psz_cert = NULL, *psz_key = NULL,
90                   *psz_ca = NULL, *psz_crl = NULL, *psz_user = NULL,
91                   *psz_password = NULL, *psz_acl = NULL;
92     int           i_port       = 0;
93     char          psz_tmp[10];
94     vlc_acl_t     *p_acl = NULL;
95     httpd_file_sys_t *f;
96
97     vlc_mutex_init( &p_sys->httpd_mutex );
98     vlc_cond_init( p_access, &p_sys->httpd_cond );
99     p_sys->b_request_frontend_info = p_sys->b_request_mmi_info = false;
100     p_sys->i_httpd_timeout = 0;
101
102     psz_address = var_GetNonEmptyString( p_access, "dvb-http-host" );
103     if( psz_address != NULL )
104     {
105         char *psz_parser = strchr( psz_address, ':' );
106         if( psz_parser )
107         {
108             *psz_parser++ = '\0';
109             i_port = atoi( psz_parser );
110         }
111     }
112     else
113         return VLC_SUCCESS;
114
115     /* determine SSL configuration */
116     psz_cert = var_GetNonEmptyString( p_access, "dvb-http-intf-cert" );
117     if ( psz_cert != NULL )
118     {
119         msg_Dbg( p_access, "enabling TLS for HTTP interface (cert file: %s)",
120                  psz_cert );
121         psz_key = config_GetPsz( p_access, "dvb-http-intf-key" );
122         psz_ca = config_GetPsz( p_access, "dvb-http-intf-ca" );
123         psz_crl = config_GetPsz( p_access, "dvb-http-intf-crl" );
124
125         if ( i_port <= 0 )
126             i_port = 8443;
127     }
128     else
129     {
130         if ( i_port <= 0 )
131             i_port= 8082;
132     }
133
134     /* Ugly hack to allow to run several HTTP servers on different ports. */
135     sprintf( psz_tmp, ":%d", i_port + 1 );
136     config_PutPsz( p_access, "dvb-http-host", psz_tmp );
137
138     msg_Dbg( p_access, "base %s:%d", psz_address, i_port );
139
140     p_sys->p_httpd_host = httpd_TLSHostNew( VLC_OBJECT(p_access), psz_address,
141                                             i_port, psz_cert, psz_key, psz_ca,
142                                             psz_crl );
143     free( psz_cert );
144     free( psz_key );
145     free( psz_ca );
146     free( psz_crl );
147
148     if ( p_sys->p_httpd_host == NULL )
149     {
150         msg_Err( p_access, "cannot listen on %s:%d", psz_address, i_port );
151         free( psz_address );
152         return VLC_EGENERIC;
153     }
154     free( psz_address );
155
156     psz_user = var_GetNonEmptyString( p_access, "dvb-http-user" );
157     psz_password = var_GetNonEmptyString( p_access, "dvb-http-password" );
158     psz_acl = var_GetNonEmptyString( p_access, "dvb-http-acl" );
159
160     if ( psz_acl != NULL )
161     {
162         p_acl = ACL_Create( p_access, false );
163         if( ACL_LoadFile( p_acl, psz_acl ) )
164         {
165             ACL_Destroy( p_acl );
166             p_acl = NULL;
167         }
168     }
169
170     /* Declare an index.html file. */
171     f = malloc( sizeof(httpd_file_sys_t) );
172     f->p_access = p_access;
173     f->p_file = httpd_FileNew( p_sys->p_httpd_host, "/index.html",
174                                "text/html; charset=UTF-8",
175                                psz_user, psz_password, p_acl,
176                                HttpCallback, f );
177
178     free( psz_user );
179     free( psz_password );
180     free( psz_acl );
181     if ( p_acl != NULL )
182         ACL_Destroy( p_acl );
183
184     if ( f->p_file == NULL )
185     {
186         free( f );
187         p_sys->p_httpd_file = NULL;
188         return VLC_EGENERIC;
189     }
190
191     p_sys->p_httpd_file = f;
192     p_sys->p_httpd_redir = httpd_RedirectNew( p_sys->p_httpd_host,
193                                               "/index.html", "/" );
194
195     return VLC_SUCCESS;
196 }
197
198 /*****************************************************************************
199  * HTTPClose: Stop the internal HTTP server
200  *****************************************************************************/
201 void HTTPClose( access_t *p_access )
202 {
203     access_sys_t *p_sys = p_access->p_sys;
204
205     if ( p_sys->p_httpd_host != NULL )
206     {
207         if ( p_sys->p_httpd_file != NULL )
208         {
209             /* Unlock the thread if it is stuck in HttpCallback */
210             vlc_mutex_lock( &p_sys->httpd_mutex );
211             if ( p_sys->b_request_frontend_info == true )
212             {
213                 p_sys->b_request_frontend_info = false;
214                 p_sys->psz_frontend_info = strdup("");
215             }
216             if ( p_sys->b_request_mmi_info == true )
217             {
218                 p_sys->b_request_mmi_info = false;
219                 p_sys->psz_mmi_info = strdup("");
220             }
221             vlc_cond_signal( &p_sys->httpd_cond );
222             vlc_mutex_unlock( &p_sys->httpd_mutex );
223
224             httpd_FileDelete( p_sys->p_httpd_file->p_file );
225             httpd_RedirectDelete( p_sys->p_httpd_redir );
226         }
227
228         httpd_HostDelete( p_sys->p_httpd_host );
229     }
230
231     vlc_mutex_destroy( &p_sys->httpd_mutex );
232     vlc_cond_destroy( &p_sys->httpd_cond );
233 }
234
235
236 static const char *psz_constant_header =
237     "<html>\n"
238     "<head><title>VLC DVB monitoring interface</title></head>\n"
239     "<body><a href=\"index.html\">Reload this page</a>\n"
240     "<h1>CAM info</h1>\n";
241
242 static const char *psz_constant_middle =
243     "<hr><h1>Frontend Info</h1>\n";
244
245 static const char *psz_constant_footer =
246     "</body></html>\n";
247
248 /****************************************************************************
249  * HttpCallback: Return the index.html file
250  ****************************************************************************/
251 static int HttpCallback( httpd_file_sys_t *p_args,
252                          httpd_file_t *p_file,
253                          uint8_t *_psz_request,
254                          uint8_t **_pp_data, int *pi_data )
255 {
256     access_sys_t *p_sys = p_args->p_access->p_sys;
257     char *psz_request = (char *)_psz_request;
258     char **pp_data = (char **)_pp_data;
259
260     vlc_mutex_lock( &p_sys->httpd_mutex );
261
262     p_sys->i_httpd_timeout = mdate() + INT64_C(3000000); /* 3 s */
263     p_sys->psz_request = psz_request;
264     p_sys->b_request_frontend_info = true;
265     if ( p_sys->i_ca_handle )
266     {
267         p_sys->b_request_mmi_info = true;
268     }
269     else
270     {
271         p_sys->psz_mmi_info = strdup( "No available CAM interface\n" );
272     }
273
274     do
275     {
276         vlc_cond_wait( &p_sys->httpd_cond, &p_sys->httpd_mutex );
277     }
278     while ( p_sys->b_request_frontend_info || p_sys->b_request_mmi_info );
279
280     p_sys->i_httpd_timeout = 0;
281     vlc_mutex_unlock( &p_sys->httpd_mutex );
282
283     *pi_data = strlen( psz_constant_header )
284                 + strlen( p_sys->psz_mmi_info )
285                 + strlen( psz_constant_middle )
286                 + strlen( p_sys->psz_frontend_info )
287                 + strlen( psz_constant_footer ) + 1;
288     *pp_data = malloc( *pi_data );
289
290     sprintf( *pp_data, "%s%s%s%s%s", psz_constant_header,
291              p_sys->psz_mmi_info, psz_constant_middle,
292              p_sys->psz_frontend_info, psz_constant_footer );
293     free( p_sys->psz_frontend_info );
294     free( p_sys->psz_mmi_info );
295
296     return VLC_SUCCESS;
297 }
298
299 /****************************************************************************
300  * HTTPExtractValue: Extract a GET variable from psz_request
301  ****************************************************************************/
302 char *HTTPExtractValue( char *psz_uri, const char *psz_name,
303                             char *psz_value, int i_value_max )
304 {
305     char *p = psz_uri;
306
307     while( (p = strstr( p, psz_name )) )
308     {
309         /* Verify that we are dealing with a post/get argument */
310         if( (p == psz_uri || *(p - 1) == '&' || *(p - 1) == '\n')
311               && p[strlen(psz_name)] == '=' )
312             break;
313         p++;
314     }
315
316     if( p )
317     {
318         int i_len;
319
320         p += strlen( psz_name );
321         if( *p == '=' ) p++;
322
323         if( strchr( p, '&' ) )
324         {
325             i_len = strchr( p, '&' ) - p;
326         }
327         else
328         {
329             /* for POST method */
330             if( strchr( p, '\n' ) )
331             {
332                 i_len = strchr( p, '\n' ) - p;
333                 if( i_len && *(p+i_len-1) == '\r' ) i_len--;
334             }
335             else
336             {
337                 i_len = strlen( p );
338             }
339         }
340         i_len = __MIN( i_value_max - 1, i_len );
341         if( i_len > 0 )
342         {
343             strncpy( psz_value, p, i_len );
344             psz_value[i_len] = '\0';
345         }
346         else
347         {
348             strncpy( psz_value, "", i_value_max );
349         }
350         p += i_len;
351     }
352     else
353     {
354         strncpy( psz_value, "", i_value_max );
355     }
356
357     return p;
358 }
359
360 #endif /* ENABLE_HTTPD */