summaryrefslogtreecommitdiffstats
path: root/kernel/check_mar.pl
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>2002-10-30 17:22:17 +0000
committerMystery Man <unknown@mandriva.org>2002-10-30 17:22:17 +0000
commit75ebb7492ad8f729ae6ea34960f07b7ed650310c (patch)
tree560408cfbe6ae46f9938457e2dcad4e31e8dc2c4 /kernel/check_mar.pl
parentb91853177bc253b1afe8af21bd4fd4ed2f5dcd68 (diff)
downloaddrakx-KA9_0_noscsi.tar
drakx-KA9_0_noscsi.tar.gz
drakx-KA9_0_noscsi.tar.bz2
drakx-KA9_0_noscsi.tar.xz
drakx-KA9_0_noscsi.zip
This commit was manufactured by cvs2svn to create tag 'KA9_0_noscsi'.KA9_0_noscsi
Diffstat (limited to 'kernel/check_mar.pl')
-rwxr-xr-xkernel/check_mar.pl31
1 files changed, 0 insertions, 31 deletions
diff --git a/kernel/check_mar.pl b/kernel/check_mar.pl
deleted file mode 100755
index d29e65088..000000000
--- a/kernel/check_mar.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/perl
-
-use MDK::Common;
-
-my $mar = '../mdk-stage1/mar/mar';
--x $mar or die "ERROR: Sorry, need $mar binary\n";
-
-my %sanity_check = (
- hd => [
- if_(arch() !~ /x86_64/, 'aic7xxx'),
- qw(sym53c8xx initio),
- if_(arch() !~ /ppc/, 'advansys'),
- ],
- network => [
- qw(3c59x eepro100 tulip via-rhine ne2k-pci 8139too),
- if_(arch() !~ /ppc|x86_64/, 'e100'),
- if_(arch() !~ /ppc|ia64/, 'tlan'),
- ],
-);
-
-my $main_version = chomp_(cat_("all.kernels/.main"));
-
-foreach (keys %sanity_check) {
- my $marfile = "all.modules/$main_version/${_}_modules.mar";
- -e $mar or die "ERROR: missing $marfile\n";
-
- my @l = map { /(\S+)\.o/ } `$mar -l $marfile`;
- my @pbs = difference2($sanity_check{$_}, \@l);
-
- @pbs and die "ERROR: sanity check should prove that " . join(" ", @pbs) . " be part of $marfile\n";
-}