]> git.sesse.net Git - vlc/blob - modules/access/pvr.c
666987932110e5f266344894facd1eb5f3a7bb18
[vlc] / modules / access / pvr.c
1 /*****************************************************************************
2  * pvr.c
3  *****************************************************************************
4  * Copyright (C) 2001, 2002 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Eric Petit <titer@videolan.org>
8  *          Paul Corke <paulc@datatote.co.uk>
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
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
31
32 #include <vlc_common.h>
33 #include <vlc_plugin.h>
34 #include <vlc_access.h>
35 #include <vlc_fs.h>
36 #include <vlc_url.h>
37
38 #include <sys/types.h>
39 #include <fcntl.h>
40 #include <unistd.h>
41 #include <linux/types.h>
42 #include <sys/ioctl.h>
43 #include <sys/poll.h>
44 #ifdef HAVE_NEW_LINUX_VIDEODEV2_H
45 #   ifdef VIDEODEV2_H_FILE
46 #   include VIDEODEV2_H_FILE
47 #   else
48 #   include <linux/videodev2.h>
49 #   endif
50 #else
51 #include "videodev2.h"
52 #endif
53
54 /*****************************************************************************
55  * Module descriptor
56  *****************************************************************************/
57 static int  Open ( vlc_object_t * );
58 static void Close( vlc_object_t * );
59
60 #define CACHING_TEXT N_("Caching value in ms")
61 #define CACHING_LONGTEXT N_( \
62     "Default caching value for PVR streams. This " \
63     "value should be set in milliseconds." )
64
65 #define DEVICE_TEXT N_( "Device" )
66 #define DEVICE_LONGTEXT N_( "PVR video device" )
67
68 #define RADIO_DEVICE_TEXT N_( "Radio device" )
69 #define RADIO_DEVICE_LONGTEXT N_( "PVR radio device" )
70
71 #define NORM_TEXT N_( "Norm" )
72 #define NORM_LONGTEXT N_( "Norm of the stream " \
73     "(Automatic, SECAM, PAL, or NTSC)." )
74
75 #define WIDTH_TEXT N_( "Width" )
76 #define WIDTH_LONGTEXT N_( "Width of the stream to capture " \
77     "(-1 for autodetection)." )
78
79 #define HEIGHT_TEXT N_( "Height" )
80 #define HEIGHT_LONGTEXT N_( "Height of the stream to capture " \
81     "(-1 for autodetection)." )
82
83 #define FREQUENCY_TEXT N_( "Frequency" )
84 #define FREQUENCY_LONGTEXT N_( "Frequency to capture (in kHz), if applicable." )
85
86 #define FRAMERATE_TEXT N_( "Framerate" )
87 #define FRAMERATE_LONGTEXT N_( "Framerate to capture, if applicable " \
88     "(-1 for autodetect)." )
89
90 #define KEYINT_TEXT N_( "Key interval" )
91 #define KEYINT_LONGTEXT N_( "Interval between keyframes (-1 for autodetect)." )
92
93 #define BFRAMES_TEXT N_( "B Frames" )
94 #define BFRAMES_LONGTEXT N_("If this option is set, B-Frames will be used. " \
95     "Use this option to set the number of B-Frames.")
96
97 #define BITRATE_TEXT N_( "Bitrate" )
98 #define BITRATE_LONGTEXT N_( "Bitrate to use (-1 for default)." )
99
100 #define BITRATE_PEAK_TEXT N_( "Bitrate peak" )
101 #define BITRATE_PEAK_LONGTEXT N_( "Peak bitrate in VBR mode." )
102
103 #define BITRATE_MODE_TEXT N_( "Bitrate mode" )
104 #define BITRATE_MODE_LONGTEXT N_( "Bitrate mode to use (VBR or CBR)." )
105
106 #define BITMASK_TEXT N_( "Audio bitmask" )
107 #define BITMASK_LONGTEXT N_("Bitmask that will "\
108     "get used by the audio part of the card." )
109
110 #define VOLUME_TEXT N_( "Volume" )
111 #define VOLUME_LONGTEXT N_("Audio volume (0-65535)." )
112
113 #define CHAN_TEXT N_( "Channel" )
114 #define CHAN_LONGTEXT N_( "Channel of the card to use (Usually, 0 = tuner, " \
115     "1 = composite, 2 = svideo)" )
116
117 static const int i_norm_list[] =
118     { V4L2_STD_UNKNOWN, V4L2_STD_SECAM, V4L2_STD_PAL, V4L2_STD_NTSC };
119 static const char *const psz_norm_list_text[] =
120     { N_("Automatic"), N_("SECAM"), N_("PAL"),  N_("NTSC") };
121
122 static const int i_bitrates[] = { 0, 1 };
123 static const char *const psz_bitrates_list_text[] = { N_("vbr"), N_("cbr") };
124
125 static const int pi_radio_range[2] = { 65000, 108000 };
126
127 vlc_module_begin ()
128     set_shortname( N_("PVR") )
129     set_description( N_("IVTV MPEG Encoding cards input") )
130     set_category( CAT_INPUT )
131     set_subcategory( SUBCAT_INPUT_ACCESS )
132     set_capability( "access", 0 )
133     add_shortcut( "pvr" )
134
135     add_integer( "pvr-caching", DEFAULT_PTS_DELAY / 1000, NULL, CACHING_TEXT,
136                  CACHING_LONGTEXT, true )
137     add_string( "pvr-device", "/dev/video0", NULL, DEVICE_TEXT,
138                  DEVICE_LONGTEXT, false )
139     add_string( "pvr-radio-device", "/dev/radio0", NULL, RADIO_DEVICE_TEXT,
140                  RADIO_DEVICE_LONGTEXT, false )
141     add_integer( "pvr-norm", V4L2_STD_UNKNOWN , NULL, NORM_TEXT,
142                  NORM_LONGTEXT, false )
143        change_integer_list( i_norm_list, psz_norm_list_text, NULL )
144     add_integer( "pvr-width", -1, NULL, WIDTH_TEXT, WIDTH_LONGTEXT, true )
145     add_integer( "pvr-height", -1, NULL, HEIGHT_TEXT, HEIGHT_LONGTEXT,
146                  true )
147     add_integer( "pvr-frequency", -1, NULL, FREQUENCY_TEXT, FREQUENCY_LONGTEXT,
148                  false )
149     add_integer( "pvr-framerate", -1, NULL, FRAMERATE_TEXT, FRAMERATE_LONGTEXT,
150                  true )
151     add_integer( "pvr-keyint", -1, NULL, KEYINT_TEXT, KEYINT_LONGTEXT,
152                  true )
153     add_integer( "pvr-bframes", -1, NULL, FRAMERATE_TEXT, FRAMERATE_LONGTEXT,
154                  true )
155     add_integer( "pvr-bitrate", -1, NULL, BITRATE_TEXT, BITRATE_LONGTEXT,
156                  false )
157     add_integer( "pvr-bitrate-peak", -1, NULL, BITRATE_PEAK_TEXT,
158                  BITRATE_PEAK_LONGTEXT, true )
159     add_integer( "pvr-bitrate-mode", -1, NULL, BITRATE_MODE_TEXT,
160                  BITRATE_MODE_LONGTEXT, true )
161         change_integer_list( i_bitrates, psz_bitrates_list_text, NULL )
162     add_integer( "pvr-audio-bitmask", -1, NULL, BITMASK_TEXT,
163                  BITMASK_LONGTEXT, true )
164     add_integer( "pvr-audio-volume", -1, NULL, VOLUME_TEXT,
165                  VOLUME_LONGTEXT, true )
166     add_integer( "pvr-channel", -1, NULL, CHAN_TEXT, CHAN_LONGTEXT, true )
167
168     set_callbacks( Open, Close )
169 vlc_module_end ()
170
171 /*****************************************************************************
172  * Prototypes
173  *****************************************************************************/
174 static ssize_t Read   ( access_t *, uint8_t *, size_t );
175 static int Control( access_t *, int, va_list );
176
177 /* ivtv specific ioctls */
178 #define IVTV_IOC_G_CODEC    0xFFEE7703
179 #define IVTV_IOC_S_CODEC    0xFFEE7704
180
181 /* for use with IVTV_IOC_G_CODEC and IVTV_IOC_S_CODEC */
182
183 struct ivtv_ioctl_codec {
184     uint32_t aspect;
185     uint32_t audio_bitmask;
186     uint32_t bframes;
187     uint32_t bitrate_mode;
188     uint32_t bitrate;
189     uint32_t bitrate_peak;
190     uint32_t dnr_mode;
191     uint32_t dnr_spatial;
192     uint32_t dnr_temporal;
193     uint32_t dnr_type;
194     uint32_t framerate;
195     uint32_t framespergop;
196     uint32_t gop_closure;
197     uint32_t pulldown;
198     uint32_t stream_type;
199 };
200
201 struct access_sys_t
202 {
203     /* file descriptor */
204     int i_fd;
205     int i_radio_fd;
206
207     char *psz_videodev;
208     char *psz_radiodev;
209
210     /* options */
211     int i_standard;
212     int i_width;
213     int i_height;
214     int i_frequency;
215     int i_framerate;
216     int i_keyint;
217     int i_bframes;
218     int i_bitrate;
219     int i_bitrate_peak;
220     int i_bitrate_mode;
221     int i_audio_bitmask;
222     int i_input;
223     int i_volume;
224
225     /* driver version */
226     bool b_v4l2_api;
227 };
228
229 /*****************************************************************************
230  * ConfigureIVTV: set up codec parameters using the old ivtv api
231  *****************************************************************************/
232 static int ConfigureIVTV( access_t * p_access )
233 {
234     access_sys_t *p_sys = (access_sys_t *) p_access->p_sys;
235     struct ivtv_ioctl_codec codec;
236     int result;
237
238     memset( &codec, 0, sizeof(struct ivtv_ioctl_codec) );
239
240     result = ioctl( p_sys->i_fd, IVTV_IOC_G_CODEC, &codec );
241     if( result < 0 )
242     {
243         msg_Err( p_access, "Failed to read current capture card settings." );
244         return VLC_EGENERIC;
245     }
246
247     if( p_sys->i_framerate != -1 )
248     {
249         switch( p_sys->i_framerate )
250         {
251             case 30:
252                 codec.framerate = 0;
253                 break;
254
255             case 25:
256                 codec.framerate = 1;
257                 break;
258
259             default:
260                 msg_Warn( p_access, "Invalid framerate, reverting to 25." );
261                 codec.framerate = 1;
262                 break;
263         }
264     }
265
266     if( p_sys->i_bitrate != -1 )
267     {
268         codec.bitrate = p_sys->i_bitrate;
269     }
270
271     if( p_sys->i_bitrate_peak != -1 )
272     {
273         codec.bitrate_peak = p_sys->i_bitrate_peak;
274     }
275
276     if( p_sys->i_bitrate_mode != -1 )
277     {
278         codec.bitrate_mode = p_sys->i_bitrate_mode;
279     }
280
281     if( p_sys->i_audio_bitmask != -1 )
282     {
283         codec.audio_bitmask = p_sys->i_audio_bitmask;
284     }
285
286     if( p_sys->i_keyint != -1 )
287     {
288         codec.framespergop = p_sys->i_keyint;
289     }
290
291     if( p_sys->i_bframes != -1 )
292     {
293         codec.bframes = p_sys->i_bframes;
294     }
295
296     result = ioctl( p_sys->i_fd, IVTV_IOC_S_CODEC, &codec );
297     if( result  < 0 )
298     {
299         msg_Err( p_access, "Failed to write new capture card settings." );
300         return VLC_EGENERIC;
301     }
302
303     msg_Dbg( p_access, "Setting codec parameters to:  framerate: "
304                         "%d, bitrate: %d/%d/%d",
305                         codec.framerate, codec.bitrate,
306                         codec.bitrate_peak, codec.bitrate_mode );
307     return VLC_SUCCESS;
308 }
309
310 #ifdef HAVE_NEW_LINUX_VIDEODEV2_H
311
312 #define MAX_V4L2_CTRLS (6)
313 /*****************************************************************************
314  * AddV4L2Ctrl: adds a control to the v4l2 controls list
315  *****************************************************************************/
316 static void AddV4L2Ctrl( access_t * p_access,
317                          struct v4l2_ext_controls * p_controls,
318                          uint32_t i_id, uint32_t i_value )
319 {
320     if( p_controls->count >= MAX_V4L2_CTRLS )
321     {
322         msg_Err( p_access, "Tried to set too many v4l2 controls at once." );
323         return;
324     }
325
326     p_controls->controls[p_controls->count].id    = i_id;
327     p_controls->controls[p_controls->count].value = i_value;
328     p_controls->count++;
329 }
330
331 /*****************************************************************************
332  * V4L2SampleRate: calculate v4l2 sample rate from pvr-audio-bitmask
333  *****************************************************************************/
334 static uint32_t V4L2SampleRate( uint32_t i_bitmask )
335 {
336     switch( i_bitmask & 0x0003 )
337     {
338         case 0x0001: return V4L2_MPEG_AUDIO_SAMPLING_FREQ_48000;
339         case 0x0002: return V4L2_MPEG_AUDIO_SAMPLING_FREQ_32000;
340     }
341     return V4L2_MPEG_AUDIO_SAMPLING_FREQ_44100;
342 }
343
344 /*****************************************************************************
345  * V4L2AudioEncoding: calculate v4l2 audio encoding level from pvr-audio-bitmask
346  *****************************************************************************/
347 static uint32_t V4L2AudioEncoding( uint32_t i_bitmask )
348 {
349     switch( i_bitmask & 0x000c )
350     {
351         case 0x0004: return V4L2_MPEG_AUDIO_ENCODING_LAYER_1;
352         case 0x0008: return V4L2_MPEG_AUDIO_ENCODING_LAYER_2;
353     }
354     return 0xffffffff;
355 }
356
357 /*****************************************************************************
358  * V4L2AudioL1Bitrate: calculate v4l2 audio bitrate for layer-1 audio from pvr-audio-bitmask
359  *****************************************************************************/
360 static uint32_t V4L2AudioL1Bitrate( uint32_t i_bitmask )
361 {
362     switch( i_bitmask & 0x00f0 )
363     {
364         case 0x0010: return V4L2_MPEG_AUDIO_L1_BITRATE_32K;
365         case 0x0020: return V4L2_MPEG_AUDIO_L1_BITRATE_64K;
366         case 0x0030: return V4L2_MPEG_AUDIO_L1_BITRATE_96K;
367         case 0x0040: return V4L2_MPEG_AUDIO_L1_BITRATE_128K;
368         case 0x0050: return V4L2_MPEG_AUDIO_L1_BITRATE_160K;
369         case 0x0060: return V4L2_MPEG_AUDIO_L1_BITRATE_192K;
370         case 0x0070: return V4L2_MPEG_AUDIO_L1_BITRATE_224K;
371         case 0x0080: return V4L2_MPEG_AUDIO_L1_BITRATE_256K;
372         case 0x0090: return V4L2_MPEG_AUDIO_L1_BITRATE_288K;
373         case 0x00a0: return V4L2_MPEG_AUDIO_L1_BITRATE_320K;
374         case 0x00b0: return V4L2_MPEG_AUDIO_L1_BITRATE_352K;
375         case 0x00c0: return V4L2_MPEG_AUDIO_L1_BITRATE_384K;
376         case 0x00d0: return V4L2_MPEG_AUDIO_L1_BITRATE_416K;
377         case 0x00e0: return V4L2_MPEG_AUDIO_L1_BITRATE_448K;
378     }
379     return V4L2_MPEG_AUDIO_L1_BITRATE_320K;
380 }
381
382 /*****************************************************************************
383  * V4L2AudioL2Bitrate: calculate v4l2 audio bitrate for layer-1 audio from pvr-audio-bitmask
384  *****************************************************************************/
385 static uint32_t V4L2AudioL2Bitrate( uint32_t i_bitmask )
386 {
387     switch( i_bitmask & 0x00f0 )
388     {
389         case 0x0010: return V4L2_MPEG_AUDIO_L2_BITRATE_32K;
390         case 0x0020: return V4L2_MPEG_AUDIO_L2_BITRATE_48K;
391         case 0x0030: return V4L2_MPEG_AUDIO_L2_BITRATE_56K;
392         case 0x0040: return V4L2_MPEG_AUDIO_L2_BITRATE_64K;
393         case 0x0050: return V4L2_MPEG_AUDIO_L2_BITRATE_80K;
394         case 0x0060: return V4L2_MPEG_AUDIO_L2_BITRATE_96K;
395         case 0x0070: return V4L2_MPEG_AUDIO_L2_BITRATE_112K;
396         case 0x0080: return V4L2_MPEG_AUDIO_L2_BITRATE_128K;
397         case 0x0090: return V4L2_MPEG_AUDIO_L2_BITRATE_160K;
398         case 0x00a0: return V4L2_MPEG_AUDIO_L2_BITRATE_192K;
399         case 0x00b0: return V4L2_MPEG_AUDIO_L2_BITRATE_224K;
400         case 0x00c0: return V4L2_MPEG_AUDIO_L2_BITRATE_256K;
401         case 0x00d0: return V4L2_MPEG_AUDIO_L2_BITRATE_320K;
402         case 0x00e0: return V4L2_MPEG_AUDIO_L2_BITRATE_384K;
403     }
404     return V4L2_MPEG_AUDIO_L2_BITRATE_192K;
405 }
406
407 /*****************************************************************************
408  * V4L2AudioMode: calculate v4l2 audio mode from pvr-audio-bitmask
409  *****************************************************************************/
410 static uint32_t V4L2AudioMode( uint32_t i_bitmask )
411 {
412     switch( i_bitmask & 0x0300 )
413     {
414         case 0x0100: return V4L2_MPEG_AUDIO_MODE_JOINT_STEREO;
415         case 0x0200: return V4L2_MPEG_AUDIO_MODE_DUAL;
416         case 0x0300: return V4L2_MPEG_AUDIO_MODE_MONO;
417     }
418     return V4L2_MPEG_AUDIO_MODE_STEREO;
419 }
420
421 /*****************************************************************************
422  * ConfigureV4L2: set up codec parameters using the new v4l2 api
423  *****************************************************************************/
424 static int ConfigureV4L2( access_t * p_access )
425 {
426     access_sys_t *p_sys = (access_sys_t *) p_access->p_sys;
427     struct v4l2_ext_controls controls;
428     int result;
429
430     memset( &controls, 0, sizeof(struct v4l2_ext_controls) );
431     controls.ctrl_class  = V4L2_CTRL_CLASS_MPEG;
432     controls.error_idx   = 0;
433     controls.reserved[0] = 0;
434     controls.reserved[1] = 0;
435     controls.count       = 0;
436     controls.controls    = calloc( MAX_V4L2_CTRLS,
437                                    sizeof( struct v4l2_ext_control ) );
438
439     if( controls.controls == NULL )
440         return VLC_ENOMEM;
441
442     /* Note: Ignore frame rate.  Doesn't look like it can be changed. */
443     if( p_sys->i_bitrate != -1 )
444     {
445         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_VIDEO_BITRATE,
446                      p_sys->i_bitrate );
447         msg_Dbg( p_access, "Setting [%u] bitrate = %u",
448                  controls.count - 1, p_sys->i_bitrate );
449     }
450
451     if( p_sys->i_bitrate_peak != -1 )
452     {
453         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_VIDEO_BITRATE_PEAK,
454                      p_sys->i_bitrate_peak );
455         msg_Dbg( p_access, "Setting [%u] bitrate_peak = %u",
456                  controls.count - 1, p_sys->i_bitrate_peak );
457     }
458
459     if( p_sys->i_bitrate_mode != -1 )
460     {
461         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_VIDEO_BITRATE_MODE,
462                      p_sys->i_bitrate_mode );
463         msg_Dbg( p_access, "Setting [%u] bitrate_mode = %u",
464                  controls.count - 1, p_sys->i_bitrate_mode );
465     }
466
467     if( p_sys->i_audio_bitmask != -1 )
468     {
469         /* Sample rate */
470         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_AUDIO_SAMPLING_FREQ,
471                     V4L2SampleRate( p_sys->i_audio_bitmask ) );
472
473         /* Encoding layer and bitrate */
474         switch( V4L2AudioEncoding( p_sys->i_audio_bitmask ) )
475         {
476             case V4L2_MPEG_AUDIO_ENCODING_LAYER_1:
477                  AddV4L2Ctrl( p_access, &controls,
478                               V4L2_CID_MPEG_AUDIO_SAMPLING_FREQ,
479                               V4L2_MPEG_AUDIO_ENCODING_LAYER_1 );
480                  AddV4L2Ctrl( p_access, &controls,
481                               V4L2_CID_MPEG_AUDIO_L1_BITRATE,
482                               V4L2AudioL1Bitrate( p_sys->i_audio_bitmask ) );
483                  break;
484
485             case V4L2_MPEG_AUDIO_ENCODING_LAYER_2:
486                  AddV4L2Ctrl( p_access, &controls,
487                               V4L2_CID_MPEG_AUDIO_SAMPLING_FREQ,
488                               V4L2_MPEG_AUDIO_ENCODING_LAYER_2 );
489                  AddV4L2Ctrl( p_access, &controls,
490                               V4L2_CID_MPEG_AUDIO_L2_BITRATE,
491                               V4L2AudioL2Bitrate( p_sys->i_audio_bitmask ) );
492                  break;
493         }
494
495         /* Audio mode - stereo or mono */
496         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_AUDIO_MODE,
497                      V4L2AudioMode( p_sys->i_audio_bitmask ) );
498
499         /* See if the user wants any other audio feature */
500         if( ( p_sys->i_audio_bitmask & 0x1ff00 ) != 0 )
501         {
502             /* It would be possible to support the bits that represent:
503              *   V4L2_CID_MPEG_AUDIO_MODE_EXTENSION
504              *   V4L2_CID_MPEG_AUDIO_EMPHASIS
505              *   V4L2_CID_MPEG_AUDIO_CRC
506              * but they are not currently used.  Tell the user.
507              */
508             msg_Err( p_access, "There were bits in pvr-audio-bitmask that were not used.");
509         }
510         msg_Dbg( p_access, "Setting audio controls");
511     }
512
513     if( p_sys->i_keyint != -1 )
514     {
515         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_VIDEO_GOP_SIZE,
516                      p_sys->i_keyint );
517         msg_Dbg( p_access, "Setting [%u] keyint = %u",
518                  controls.count - 1, p_sys->i_keyint );
519     }
520
521     if( p_sys->i_bframes != -1 )
522     {
523         AddV4L2Ctrl( p_access, &controls, V4L2_CID_MPEG_VIDEO_B_FRAMES,
524                      p_sys->i_bframes );
525         msg_Dbg( p_access, "Setting [%u] bframes = %u",
526                  controls.count - 1, p_sys->i_bframes );
527     }
528
529     result = ioctl( p_sys->i_fd, VIDIOC_S_EXT_CTRLS, &controls );
530     if( result < 0 )
531     {
532         msg_Err( p_access, "Failed to write %u new capture card settings.",
533                             controls.error_idx );
534     }
535     free( controls.controls );
536     return VLC_SUCCESS;
537 }
538
539 #endif /* HAVE_NEW_LINUX_VIDEODEV2_H */
540
541 /*****************************************************************************
542  * Open: open the device
543  *****************************************************************************/
544 static int Open( vlc_object_t * p_this )
545 {
546     access_t *p_access = (access_t*) p_this;
547     access_sys_t * p_sys;
548     char * psz_tofree;
549     char * psz_parser;
550     struct v4l2_capability device_capability;
551     int result;
552
553     memset( &device_capability, 0, sizeof(struct v4l2_capability) );
554
555     access_InitFields( p_access );
556     ACCESS_SET_CALLBACKS( Read, NULL, Control, NULL );
557     p_sys = p_access->p_sys = calloc( 1, sizeof( access_sys_t ));
558     if( !p_sys ) return VLC_ENOMEM;
559
560     /* defaults values */
561     var_Create( p_access, "pvr-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
562
563     p_sys->psz_videodev = var_CreateGetString( p_access, "pvr-device" );
564     p_sys->psz_radiodev = var_CreateGetString( p_access, "pvr-radio-device" );
565     p_sys->i_standard   = var_CreateGetInteger( p_access, "pvr-norm" );
566     p_sys->i_width      = var_CreateGetInteger( p_access, "pvr-width" );
567     p_sys->i_height     = var_CreateGetInteger( p_access, "pvr-height" );
568     p_sys->i_frequency  = var_CreateGetInteger( p_access, "pvr-frequency" );
569     p_sys->i_framerate  = var_CreateGetInteger( p_access, "pvr-framerate" );
570     p_sys->i_keyint     = var_CreateGetInteger( p_access, "pvr-keyint" );
571     p_sys->i_bframes    = var_CreateGetInteger( p_access, "pvr-bframes" );
572     p_sys->i_bitrate    = var_CreateGetInteger( p_access, "pvr-bitrate" );
573     p_sys->i_bitrate_peak  = var_CreateGetInteger( p_access, "pvr-bitrate-peak" );
574     p_sys->i_bitrate_mode  = var_CreateGetInteger( p_access, "pvr-bitrate-mode" );
575     p_sys->i_audio_bitmask = var_CreateGetInteger( p_access, "pvr-audio-bitmask" );
576     p_sys->i_volume     = var_CreateGetInteger( p_access, "pvr-audio-volume" );
577     p_sys->i_input      = var_CreateGetInteger( p_access, "pvr-channel" );
578
579     /* parse command line options */
580     psz_tofree = strdup( p_access->psz_location );
581     if( !psz_tofree )
582     {
583         free( p_sys->psz_radiodev );
584         free( p_sys->psz_videodev );
585         free( p_sys );
586         return VLC_ENOMEM;
587     }
588
589     psz_parser = psz_tofree;
590     while( *psz_parser )
591     {
592         /* Leading slash -> device path */
593         if( *psz_parser == '/' )
594         {
595             free( p_sys->psz_videodev );
596             p_sys->psz_videodev = decode_URI_duplicate( psz_parser );
597             break;
598         }
599
600         /* Extract option name */
601         const char *optname = psz_parser;
602         psz_parser = strchr( psz_parser, '=' );
603         if( psz_parser == NULL )
604             break;
605         *psz_parser++ = '\0';
606
607         /* Extract option value */
608         char *optval = psz_parser;
609         while( memchr( ":,", *psz_parser, 3 /* includes \0 */ ) == NULL )
610             psz_parser++;
611         if( *psz_parser ) /* more options to come */
612             *psz_parser++ = '\0'; /* skip , or : */
613
614         if ( !strcmp( optname, "norm" ) )
615         {
616             if ( !strcmp( optval, "secam" ) )
617                 p_sys->i_standard = V4L2_STD_SECAM;
618             else if ( !strcmp( optval, "pal" ) )
619                 p_sys->i_standard = V4L2_STD_PAL;
620             else if ( !strcmp( optval, "ntsc" ) )
621                 p_sys->i_standard = V4L2_STD_NTSC;
622             else
623                 p_sys->i_standard = atoi( optval );
624         }
625         else if( !strcmp( optname, "channel" ) )
626             p_sys->i_input = atoi( optval );
627         else if( !strcmp( optname, "device" ) )
628         {
629             free( p_sys->psz_videodev );
630             if( asprintf( &p_sys->psz_videodev, "/dev/video%s", optval ) == -1)
631                 p_sys->psz_videodev = NULL;
632         }
633         else if( !strcmp( optname, "frequency" ) )
634             p_sys->i_frequency = atoi( optval );
635         else if( !strcmp( optname, "framerate" ) )
636             p_sys->i_framerate = atoi( optval );
637         else if( !strcmp( optname, "keyint" ) )
638             p_sys->i_keyint = atoi( optval );
639         else if( !strcmp( optname, "bframes" ) )
640             p_sys->i_bframes = atoi( optval );
641         else if( !strcmp( optname, "width" ) )
642             p_sys->i_width = atoi( optval );
643         else if( !strcmp( optname, "height" ) )
644             p_sys->i_height = atoi( optval );
645         else if( !strcmp( optname, "audio" ) )
646             p_sys->i_audio_bitmask = atoi( optval );
647         else if( !strcmp( optname, "bitrate" ) )
648             p_sys->i_bitrate = atoi( optval );
649         else if( !strcmp( optname, "maxbitrate" ) )
650             p_sys->i_bitrate_peak = atoi( optval );
651         else if( !strcmp( optname, "bitratemode" ) )
652         {
653             if( !strcmp( optval, "vbr" ) )
654                 p_sys->i_bitrate_mode = 0;
655             else if( !strcmp( optval, "cbr" ) )
656                 p_sys->i_bitrate_mode = 1;
657         }
658         else if( !strcmp( optname, "size" ) )
659         {
660             p_sys->i_width = strtol( optval, &optval, 0 );
661             p_sys->i_height = atoi( optval );
662         }
663     }
664     free( psz_tofree );
665
666     /* open the device */
667     p_sys->i_fd = vlc_open( p_sys->psz_videodev, O_RDWR );
668     if( p_sys->i_fd < 0 )
669     {
670         msg_Err( p_access, "Cannot open device %s (%m).",
671                  p_sys->psz_videodev );
672         Close( VLC_OBJECT(p_access) );
673         return VLC_EGENERIC;
674     }
675     msg_Dbg( p_access, "Using video device: %s.", p_sys->psz_videodev);
676
677     /* See what version of ivtvdriver is running */
678     result = ioctl( p_sys->i_fd, VIDIOC_QUERYCAP, &device_capability );
679     if( result < 0 )
680     {
681         msg_Err( p_access, "unknown ivtv/pvr driver version in use" );
682         Close( VLC_OBJECT(p_access) );
683         return VLC_EGENERIC;
684     }
685
686     msg_Dbg( p_access, "%s driver (%s on %s) version %02x.%02x.%02x",
687               device_capability.driver,
688               device_capability.card,
689               device_capability.bus_info,
690             ( device_capability.version >> 16 ) & 0xff,
691             ( device_capability.version >>  8 ) & 0xff,
692             ( device_capability.version       ) & 0xff);
693
694     if ( strncmp( (char *) device_capability.driver, "ivtv", 4 )
695            || device_capability.version >= 0x000800 )
696     {
697         /* Drivers > 0.8.0 use v4l2 API instead of IVTV ioctls */
698         msg_Dbg( p_access, "this driver uses the v4l2 API" );
699         p_sys->b_v4l2_api = true;
700     }
701     else
702     {
703         p_sys->b_v4l2_api = false;
704     }
705
706     /* set the input */
707     if ( p_sys->i_input != -1 )
708     {
709         result = ioctl( p_sys->i_fd, VIDIOC_S_INPUT, &p_sys->i_input );
710         if ( result < 0 )
711             msg_Warn( p_access, "Failed to select the requested input pin." );
712         else
713             msg_Dbg( p_access, "input set to: %d", p_sys->i_input );
714     }
715
716     /* set the video standard */
717     if ( p_sys->i_standard != V4L2_STD_UNKNOWN )
718     {
719         result = ioctl( p_sys->i_fd, VIDIOC_S_STD, &p_sys->i_standard );
720         if ( result  < 0 )
721             msg_Warn( p_access, "Failed to set the requested video standard." );
722         else
723             msg_Dbg( p_access, "video standard set to: %x",
724                      p_sys->i_standard);
725     }
726
727     /* set the picture size */
728     if ( (p_sys->i_width != -1) || (p_sys->i_height != -1) )
729     {
730         struct v4l2_format vfmt;
731
732         memset( &vfmt, 0, sizeof(struct v4l2_format) );
733         vfmt.type = V4L2_BUF_TYPE_VIDEO_CAPTURE;
734
735         result = ioctl( p_sys->i_fd, VIDIOC_G_FMT, &vfmt );
736         if ( result < 0 )
737         {
738             msg_Warn( p_access, "Failed to read current picture size." );
739         }
740         else
741         {
742             if ( p_sys->i_width != -1 )
743             {
744                 vfmt.fmt.pix.width = p_sys->i_width;
745             }
746
747             if ( p_sys->i_height != -1 )
748             {
749                 vfmt.fmt.pix.height = p_sys->i_height;
750             }
751
752             result = ioctl( p_sys->i_fd, VIDIOC_S_FMT, &vfmt );
753             if ( result < 0 )
754             {
755                 msg_Warn( p_access, "Failed to set requested picture size." );
756             }
757             else
758             {
759                 msg_Dbg( p_access, "picture size set to: %dx%d",
760                          vfmt.fmt.pix.width, vfmt.fmt.pix.height );
761             }
762         }
763     }
764
765     /* set the frequency */
766     if ( p_sys->i_frequency != -1 )
767     {
768         int i_fd;
769         struct v4l2_tuner vt;
770
771          /* TODO: let the user choose the tuner */
772         memset( &vt, 0, sizeof(struct v4l2_tuner) );
773
774         if ( (p_sys->i_frequency >= pi_radio_range[0])
775               && (p_sys->i_frequency <= pi_radio_range[1]) )
776         {
777             p_sys->i_radio_fd = vlc_open( p_sys->psz_radiodev, O_RDWR );
778             if( p_sys->i_radio_fd < 0 )
779             {
780                 msg_Err( p_access, "Cannot open radio device (%m)." );
781                 Close( VLC_OBJECT(p_access) );
782                 return VLC_EGENERIC;
783             }
784             msg_Dbg( p_access, "using radio device: %s",
785                      p_sys->psz_radiodev );
786             i_fd = p_sys->i_radio_fd;
787         }
788         else
789         {
790             i_fd = p_sys->i_fd;
791             p_sys->i_radio_fd = -1;
792         }
793
794         result = ioctl( i_fd, VIDIOC_G_TUNER, &vt );
795         if ( result < 0 )
796         {
797             msg_Warn( p_access, "Failed to read tuner information (%m)." );
798         }
799         else
800         {
801             struct v4l2_frequency vf;
802
803             memset( &vf, 0, sizeof(struct v4l2_frequency) );
804             vf.tuner = vt.index;
805
806             result = ioctl( i_fd, VIDIOC_G_FREQUENCY, &vf );
807             if ( result < 0 )
808             {
809                 msg_Warn( p_access, "Failed to read tuner frequency (%m)." );
810             }
811             else
812             {
813                 if( vt.capability & V4L2_TUNER_CAP_LOW )
814                     vf.frequency = p_sys->i_frequency * 16;
815                 else
816                     vf.frequency = (p_sys->i_frequency * 16 + 500) / 1000;
817
818                 result = ioctl( i_fd, VIDIOC_S_FREQUENCY, &vf );
819                 if( result < 0 )
820                 {
821                     msg_Warn( p_access, "Failed to set tuner frequency (%m)." );
822                 }
823                 else
824                 {
825                     msg_Dbg( p_access, "tuner frequency set to: %d",
826                              p_sys->i_frequency );
827                 }
828             }
829         }
830     }
831
832     /* control parameters */
833     if ( p_sys->i_volume != -1 )
834     {
835         struct v4l2_control ctrl;
836
837         memset( &ctrl, 0, sizeof(struct v4l2_control) );
838         ctrl.id = V4L2_CID_AUDIO_VOLUME;
839         ctrl.value = p_sys->i_volume;
840
841         result = ioctl( p_sys->i_fd, VIDIOC_S_CTRL, &ctrl );
842         if ( result < 0 )
843         {
844             msg_Warn( p_access, "Failed to set the volume." );
845         }
846     }
847
848     /* codec parameters */
849     if ( (p_sys->i_framerate != -1)
850             || (p_sys->i_bitrate_mode != -1)
851             || (p_sys->i_bitrate_peak != -1)
852             || (p_sys->i_keyint != -1)
853             || (p_sys->i_bframes != -1)
854             || (p_sys->i_bitrate != -1)
855             || (p_sys->i_audio_bitmask != -1) )
856     {
857         if( p_sys->b_v4l2_api )
858         {
859 #ifdef HAVE_NEW_LINUX_VIDEODEV2_H
860             result = ConfigureV4L2( p_access );
861             if( result != VLC_SUCCESS )
862             {
863                 Close( VLC_OBJECT(p_access) );
864                 return result;
865             }
866 #else
867             msg_Warn( p_access, "You have new ivtvdrivers, "
868                       "but this vlc was built against an old v4l2 version." );
869 #endif
870         }
871         else
872         {
873             result = ConfigureIVTV( p_access );
874             if( result != VLC_SUCCESS )
875             {
876                 Close( VLC_OBJECT(p_access) );
877                 return result;
878             }
879         }
880     }
881
882     return VLC_SUCCESS;
883 }
884
885 /*****************************************************************************
886  * Close: close the device
887  *****************************************************************************/
888 static void Close( vlc_object_t * p_this )
889 {
890     access_t *p_access = (access_t*) p_this;
891     access_sys_t *p_sys = (access_sys_t *) p_access->p_sys;
892
893     if ( p_sys->i_fd != -1 )
894         close( p_sys->i_fd );
895     if ( p_sys->i_radio_fd != -1 )
896         close( p_sys->i_radio_fd );
897     free( p_sys->psz_videodev );
898     free( p_sys->psz_radiodev );
899     free( p_sys );
900 }
901
902 /*****************************************************************************
903  * Read
904  *****************************************************************************/
905 static ssize_t Read( access_t * p_access, uint8_t * p_buffer, size_t i_len )
906 {
907     access_sys_t *p_sys = (access_sys_t *) p_access->p_sys;
908     struct pollfd ufd;
909     int i_ret;
910
911     ufd.fd = p_sys->i_fd;
912     ufd.events = POLLIN;
913
914     if( p_access->info.b_eof )
915         return 0;
916
917     do
918     {
919         if( !vlc_object_alive (p_access) )
920             return 0;
921
922         ufd.revents = 0;
923     }
924     while( ( i_ret = poll( &ufd, 1, 500 ) ) == 0 );
925
926     if( i_ret < 0 )
927     {
928         msg_Err( p_access, "Polling error (%m)." );
929         return -1;
930     }
931
932     i_ret = read( p_sys->i_fd, p_buffer, i_len );
933     if( i_ret == 0 )
934     {
935         p_access->info.b_eof = true;
936     }
937     else if( i_ret > 0 )
938     {
939         p_access->info.i_pos += i_ret;
940     }
941
942     return i_ret;
943 }
944
945 /*****************************************************************************
946  * Control
947  *****************************************************************************/
948 static int Control( access_t *p_access, int i_query, va_list args )
949 {
950     bool   *pb_bool;
951     int64_t      *pi_64;
952
953     switch( i_query )
954     {
955         /* */
956         case ACCESS_CAN_SEEK:
957         case ACCESS_CAN_FASTSEEK:
958             pb_bool = (bool*)va_arg( args, bool* );
959             *pb_bool = false;
960             break;
961         case ACCESS_CAN_PAUSE:
962             pb_bool = (bool*)va_arg( args, bool* );
963             *pb_bool = false;
964             break;
965         case ACCESS_CAN_CONTROL_PACE:
966             pb_bool = (bool*)va_arg( args, bool* );
967             *pb_bool = false;
968             break;
969
970         /* */
971         case ACCESS_GET_PTS_DELAY:
972             pi_64 = (int64_t*)va_arg( args, int64_t * );
973             *pi_64 = var_GetInteger( p_access, "pvr-caching" ) * 1000;
974             break;
975
976         /* */
977         case ACCESS_SET_PAUSE_STATE:
978             /* Nothing to do */
979             break;
980
981         case ACCESS_GET_TITLE_INFO:
982         case ACCESS_SET_TITLE:
983         case ACCESS_SET_SEEKPOINT:
984         case ACCESS_SET_PRIVATE_ID_STATE:
985         case ACCESS_GET_CONTENT_TYPE:
986             return VLC_EGENERIC;
987
988         default:
989             msg_Warn( p_access, "Unimplemented query in control." );
990             return VLC_EGENERIC;
991
992     }
993     return VLC_SUCCESS;
994 }