From ff222086af89ba44ac861ab1e9eaeee48d761d30 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 17 Mar 2005 22:05:21 +0000
Subject: MonitorsDB is full of bad EISA_ID :-(

---
 convert/verify_MonitorsDB | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 convert/verify_MonitorsDB

diff --git a/convert/verify_MonitorsDB b/convert/verify_MonitorsDB
new file mode 100644
index 00000000..9da8ec6f
--- /dev/null
+++ b/convert/verify_MonitorsDB
@@ -0,0 +1,16 @@
+#!/usr/bin/perl
+
+use lib qw(/usr/lib/libDrakX);
+use Xconfig::monitor;
+
+my $monitors_db = Xconfig::monitor::readMonitorsDB("../lst/MonitorsDB");
+foreach (@$monitors_db) {
+    if ($_->{EISA_ID} =~ /^\w{3}[0-9a-f]{4}$/i) {
+	# perfect!
+    } elsif ($_->{EISA_ID} =~ /^([a-z]{3})([0-9a-f]{0,3})$/i) {
+	# we can correct this
+	printf "$_->{EISA_ID} should be %s%04x\n", $1, hex($2);
+    } else {
+	print "bad EISA_ID $_->{EISA_ID}\n";
+    }
+}
-- 
cgit v1.2.1