Lines Matching refs:basedir
22 my $basedir="";
57 "basedir|b=s" => \$basedir,
73 die $usage unless $basedir && ( $kernel || $kernelsyms );
79 $basedir =~ s-/+$--g;
82 if($basedir !~ m-/lib/modules-) {
87 if($basedir !~ m-/lib/modules/\d\.\d-) {
88 opendir(BD, $basedir) or die "can't open basedir $basedir : $!\n";
91 next unless -d "$basedir/$_";
95 warn("Guessed module directory as $basedir/$kdir\n");
100 die "Cannot find a kernel version under $basedir\n" unless $kdir;
101 $basedir = "$basedir/$kdir";
115 }, $basedir;
198 warn "writing $basedir/modules.dep\n" if $verbose;
199 open(STDOUT, ">$basedir/modules.dep")
200 or die "cannot open $basedir/modules.dep: $!";
202 my $kseries = $basedir =~ m,/2\.4\.[^/]*, ? '2.4' : 'others';