diff options
Diffstat (limited to 'v4l')
| -rw-r--r-- | v4l/ChangeLog | 10 | ||||
| -rw-r--r-- | v4l/scripts/cx88.pl | 61 |
2 files changed, 71 insertions, 0 deletions
diff --git a/v4l/ChangeLog b/v4l/ChangeLog index 48f4bc10c..f7cb55cba 100644 --- a/v4l/ChangeLog +++ b/v4l/ChangeLog @@ -1,3 +1,13 @@ +2005-09-29 14:23 mchehab + + * scripts/cx88.pl: + - New script to include PCI ID for cx88 boards. + + * doc/CARDLIST.cx88: + - Cardlist updated. Now includes PCI ID for each board. + + Signed-off-by: Mauro Carvalho Chehab <mchehab@brturbo.com.br> + 2005-09-28 20:04 nshmyrev * saa7134-cards.c: (saa7134_board_init1): diff --git a/v4l/scripts/cx88.pl b/v4l/scripts/cx88.pl new file mode 100644 index 000000000..459514157 --- /dev/null +++ b/v4l/scripts/cx88.pl @@ -0,0 +1,61 @@ +#!/usr/bin/perl -w +use strict; + +my %map = ( + "PCI_ANY_ID" => "0", + "PCI_VENDOR_ID_PHILIPS" => "1131", + "PCI_VENDOR_ID_ASUSTEK" => "1043", + "PCI_VENDOR_ID_MATROX" => "102B", + "PCI_VENDOR_ID_ATI" => "1002", +); + +sub fix_id($) { + my $id = shift; + $id = $map{$id} if defined($map{$id}); + $id =~ s/^0x//; + return $id; +} + +my $new_entry = -1; +my $nr = 0; +my ($id,$subvendor,$subdevice); +my %data; + +while (<>) { + # defines in header file + if (/#define\s+(CX88_BOARD_\w+)\s+(\d+)/) { + $data{$1}->{nr} = $2; + next; + } + # cx88_boards + if (/\[(CX88_BOARD_\w+)\]/) { + $id = $1; + $data{$id}->{id} = $id; +# $data{$id}->{nr} = $nr++; + }; + next unless defined($id); + + if (!defined($data{$id}) || !defined($data{$id}->{name})) { + $data{$id}->{name} = $1 if (/\.name\s*=\s*\"([^\"]+)\"/); + } + + # cx88_pci_tbl + $subvendor = fix_id($1) if (/\.subvendor\s*=\s*(\w+),/); + $subdevice = fix_id($1) if (/\.subdevice\s*=\s*(\w+),/); + if (/.card\s*=\s*(\w+),/) { + if (defined($data{$1}) && + defined($subvendor) && $subvendor ne "0" && + defined($subdevice) && $subdevice ne "0") { + push @{$data{$1}->{subid}}, "$subvendor:$subdevice"; + undef $subvendor; + undef $subdevice; + } + } +} + +foreach my $item (sort { $data{$a}->{nr} <=> $data{$b}->{nr} } keys %data) { + printf("%3d -> %-51s", $data{$item}->{nr}, $data{$item}->{name}); + printf(" [%s]",join(",",@{$data{$item}->{subid}})) + if defined($data{$item}->{subid}); + print "\n"; +} |