could someone test the following patch that add non hidden support for
for bewan/gazel usb modems (type is obviously wrong but uneeded for
hisax_st5481 module anyway) ?
Index: network/isdn.pm
===================================================================
RCS file: /cooker/gi/perl-install/network/isdn.pm,v
retrieving revision 1.78
diff -u -p -r1.78 isdn.pm
--- network/isdn.pm 8 Sep 2003 14:54:48 -0000 1.78
+++ network/isdn.pm 22 Oct 2003 16:07:30 -0000
@@ -187,11 +187,13 @@ sub isdn_ask {
isdn_ask_step_1:
my $e = $in->ask_from_list_(N("ISDN Configuration"),
$label . "\n" . N("What kind of card do you have?"),
- [ N_("ISA / PCMCIA"), N_("PCI"), N_("I don't know") ]
+ [ N_("ISA / PCMCIA"), N_("PCI"), N_("USB"), N_("I don't know") ]
) or return;
isdn_ask_step_1b:
if ($e =~ /PCI/) {
$isdn->{card_type} = 'pci';
+ } elsif ($e =~ /USB/) {
+ $isdn->{card_type} = 'usb';
} else {
$in->ask_from_list_(N("ISDN Configuration"),
N("
@@ -206,7 +208,7 @@ If you have a PCMCIA card, you have to k
$e = $in->ask_from_listf(N("ISDN Configuration"),
N("Which of the following is your ISDN card?"),
sub { $_[0]{description} },
- [ grep { $_->{card} eq $isdn->{card_type} } @isdndata ]) or goto isdn_ask_step_1b;
+ [ grep { $_->{card} eq $isdn->{card_type} } @isdndata ]) or goto ($isdn->{card_type} =~ /usb|pci/ ? 'isdn_ask_step_1' : 'isdn_ask_step_1b');
$e->{$_} and $isdn->{$_} = $e->{$_} foreach qw(driver type mem io io0 io1 irq firmware);
isdn_ask_step_3:
@@ -247,7 +249,7 @@ sub isdn_detect_backend {
if (my ($c) = modules::probe_category('network/isdn')) {
$isdn->{$_} = $c->{$_} foreach qw(description vendor id driver options firmware);
$isdn->{$_} = sprintf("%0x", $isdn->{$_}) foreach 'vendor', 'id';
- $isdn->{card_type} = 'pci';
+ $isdn->{card_type} = $c->{bus} eq 'USB' ? 'usb' : 'pci';
($isdn->{type}) = $isdn->{options} =~ /type=(\d+)/;
# $c->{options} !~ /id=HiSax/ && $isdn->{driver} eq "hisax" and $c->{options} .= " id=HiSax";
if ($c->{options} !~ /protocol=/ && $isdn->{protocol} =~ /\d/) {
Index: network/isdn_consts.pm
===================================================================
RCS file: /cooker/gi/perl-install/network/isdn_consts.pm,v
retrieving revision 1.12
diff -u -p -r1.12 isdn_consts.pm
--- network/isdn_consts.pm 28 May 2003 13:39:35 -0000 1.12
+++ network/isdn_consts.pm 22 Oct 2003 16:07:30 -0000
@@ -324,6 +324,16 @@ our @isdndata =
type => '36',
card => 'pci',
},
+ { description => "BeWAN R834 (USB)",
+ driver => 'hisax_st5481',
+ type => '99',
+ card => 'usb',
+ },
+ { description => "Gazel 128 (USB)",
+ driver => 'hisax_st5481',
+ type => '99',
+ card => 'usb',
+ },
);
1;
thanks.
