ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Linux-DVB/DVB.pm
(Generate patch)

Comparing Linux-DVB/DVB.pm (file contents):
Revision 1.11 by root, Wed May 17 15:46:26 2006 UTC vs.
Revision 1.12 by root, Wed May 24 21:00:09 2006 UTC

… …
30package Linux::DVB; 30package Linux::DVB;
31 31
32use Fcntl (); 32use Fcntl ();
33 33
34BEGIN { 34BEGIN {
35 $VERSION = '0.4'; 35 $VERSION = '1.0';
36 @ISA = qw(Exporter); 36 @ISA = qw(Exporter);
37 37
38 require XSLoader; 38 require XSLoader;
39 XSLoader::load __PACKAGE__, $VERSION; 39 XSLoader::load __PACKAGE__, $VERSION;
40 40
… …
105 105
106 %$self = ( %$self, %{ $self->frontend_info } ); 106 %$self = ( %$self, %{ $self->frontend_info } );
107 107
108 $self; 108 $self;
109} 109}
110
111sub frontend_info { _frontend_info ($_[0]{fd}) }
112sub status { _read_status ($_[0]{fd}) }
113sub ber { _read_ber ($_[0]{fd}) }
114sub snr { _snr ($_[0]{fd}) }
115sub signal_strength { _signal_strength ($_[0]{fd}) }
116sub uncorrected { _uncorrected ($_[0]{fd}) }
117 110
118=item $fe->set (parameter => value, ...) 111=item $fe->set (parameter => value, ...)
119 112
120Sets frontend parameters. All values are stuffed into the 113Sets frontend parameters. All values are stuffed into the
121C<dvb_frontend_parameters> structure without conversion and passed to 114C<dvb_frontend_parameters> structure without conversion and passed to
… …
172=cut 165=cut
173 166
174sub parameters { _get ($_[0]{fd}, $_[0]{type}) } 167sub parameters { _get ($_[0]{fd}, $_[0]{type}) }
175sub get { _get ($_[0]{fd}, $_[0]{type}) } # unannounced alias 168sub get { _get ($_[0]{fd}, $_[0]{type}) } # unannounced alias
176sub event { _event ($_[0]{fd}, $_[0]{type}) } 169sub event { _event ($_[0]{fd}, $_[0]{type}) }
170
171=item $ok = $fe->diseqc_reset_overload
172
173If the bus has been automatically powered off due to power overload, this
174call restores the power to the bus. The call requires read/write access
175to the device. This call has no effect if the device is manually powered
176off. Not all DVB adapters support this call.
177
178=item $ok = $fe->diseqc_voltage (13|18)
179
180Set the DiSEqC voltage to either 13 or 18 volts.
181
182=item $ok = $fe->diseqc_tone (1|0)
183
184Enables (1) or disables (0) the DiSEqC continuous 22khz tone generation.
185
186=item $ok = $fe->diseqc_send_burst (0|1)
187
188Sends a 22KHz tone burst of type SEC_MINI_A (0) or SEC_MINI_B (1).
189
190=item $ok = $fe->diseqc_cmd ($command)
191
192Sends a DiSEqC command.
193
194=item $reply = $fe->diseqc_reply ($timeout)
195
196Receives a reply to a DiSEqC 2.0 command (or undef).
197
198=cut
177 199
178package Linux::DVB::Demux; 200package Linux::DVB::Demux;
179 201
180@ISA = qw(Linux::DVB); 202@ISA = qw(Linux::DVB);
181 203

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines