dvb: Flag unused callback parameter.
[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 "tables/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_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     VLC_UNUSED(p_file);
257     access_sys_t *p_sys = p_args->p_access->p_sys;
258     char *psz_request = (char *)_psz_request;
259     char **pp_data = (char **)_pp_data;
260
261     vlc_mutex_lock( &p_sys->httpd_mutex );
262
263     p_sys->i_httpd_timeout = mdate() + INT64_C(3000000); /* 3 s */
264     p_sys->psz_request = psz_request;
265     p_sys->b_request_frontend_info = true;
266     if ( p_sys->i_ca_handle )
267     {
268         p_sys->b_request_mmi_info = true;
269     }
270     else
271     {
272         p_sys->psz_mmi_info = strdup( "No available CAM interface\n" );
273     }
274
275     do
276     {
277         vlc_cond_wait( &p_sys->httpd_cond, &p_sys->httpd_mutex );
278     }
279     while ( p_sys->b_request_frontend_info || p_sys->b_request_mmi_info );
280
281     p_sys->i_httpd_timeout = 0;
282     vlc_mutex_unlock( &p_sys->httpd_mutex );
283
284     *pi_data = strlen( psz_constant_header )
285                 + strlen( p_sys->psz_mmi_info )
286                 + strlen( psz_constant_middle )
287                 + strlen( p_sys->psz_frontend_info )
288                 + strlen( psz_constant_footer ) + 1;
289     *pp_data = malloc( *pi_data );
290
291     sprintf( *pp_data, "%s%s%s%s%s", psz_constant_header,
292              p_sys->psz_mmi_info, psz_constant_middle,
293              p_sys->psz_frontend_info, psz_constant_footer );
294     free( p_sys->psz_frontend_info );
295     free( p_sys->psz_mmi_info );
296
297     return VLC_SUCCESS;
298 }
299
300 /****************************************************************************
301  * HTTPExtractValue: Extract a GET variable from psz_request
302  ****************************************************************************/
303 char *HTTPExtractValue( char *psz_uri, const char *psz_name,
304                             char *psz_value, int i_value_max )
305 {
306     char *p = psz_uri;
307
308     while( (p = strstr( p, psz_name )) )
309     {
310         /* Verify that we are dealing with a post/get argument */
311         if( (p == psz_uri || *(p - 1) == '&' || *(p - 1) == '\n')
312               && p[strlen(psz_name)] == '=' )
313             break;
314         p++;
315     }
316
317     if( p )
318     {
319         int i_len;
320
321         p += strlen( psz_name );
322         if( *p == '=' ) p++;
323
324         if( strchr( p, '&' ) )
325         {
326             i_len = strchr( p, '&' ) - p;
327         }
328         else
329         {
330             /* for POST method */
331             if( strchr( p, '\n' ) )
332             {
333                 i_len = strchr( p, '\n' ) - p;
334                 if( i_len && *(p+i_len-1) == '\r' ) i_len--;
335             }
336             else
337             {
338                 i_len = strlen( p );
339             }
340         }
341         i_len = __MIN( i_value_max - 1, i_len );
342         if( i_len > 0 )
343         {
344             strncpy( psz_value, p, i_len );
345             psz_value[i_len] = '\0';
346         }
347         else
348         {
349             strncpy( psz_value, "", i_value_max );
350         }
351         p += i_len;
352     }
353     else
354     {
355         strncpy( psz_value, "", i_value_max );
356     }
357
358     return p;
359 }
360
361 #endif /* ENABLE_HTTPD */