package common; # $Id$ use MDK::Common; use MDK::Common::System; use diagnostics; use strict; use vars qw(@ISA @EXPORT $SECTORSIZE); @ISA = qw(Exporter); # no need to export ``_'' @EXPORT = qw($SECTORSIZE __ translate untranslate formatXiB removeXiBSuffix formatTime setVirtual makedev unmakedev salt); # perl_checker: RE-EXPORT-ALL push @EXPORT, @MDK::Common::EXPORT; #-##################################################################################### #- Globals #-##################################################################################### $SECTORSIZE = 512; #-##################################################################################### #- Functions #-##################################################################################### sub _ { my $s = shift @_; my $t = translate($s); sprintf $t, @_; } sub __ { $_[0] } sub salt { my ($nb) = @_; require devices; local *F; open F, devices::make("random") or die "missing random"; my $s; read F, $s, $nb; local $_ = pack "b8" x $nb, unpack "b6" x $nb, $s; tr [\0-\x3f] [0-9a-zA-Z./]; $_; } sub makedev { ($_[0] << 8) | $_[1] } sub unmakedev { $_[0] >> 8, $_[0] & 0xff } sub translate { my ($s) = @_; $s ? c::dgettext('libDrakX', $s) : ''; } sub untranslate { my $s = shift || return; foreach (@_) { translate($_) eq $s and return $_ } die "untranslate failed"; } BEGIN { undef *availableRamMB } sub availableRamMB() { my $s = MDK::Common::System::availableRamMB(); #- HACK HACK: if i810 and memsize require detect_devices; return $s - 1 if $s == 128 && grep { $_->{driver} =~ /i810/ } detect_devices::probeall(); $s; } sub setVirtual { my $vt = ''; local *C; sysopen C, "/dev/console", 2 or die "failed to open /dev/console: $!"; ioctl(C, c::VT_GETSTATE(), $vt) or die "ioctl VT_GETSTATE failed"; ioctl(C, c::VT_ACTIVATE(), $_[0]) or die "ioctl VT_ACTIVATE failed"; ioctl(C, c::VT_WAITACTIVE(), $_[0]) or die "ioctl VT_WAITACTIVE failed"; unpack "S", $vt; } sub removeXiBSuffix { local $_ = shift; /(\d+)\s*kB?$/i and return $1 * 1024; /(\d+)\s*MB?$/i and return $1 * 1024 * 1024; /(\d+)\s*GB?$/i and return $1 * 1024 * 1024 * 1024; /(\d+)\s*TB?$/i and return $1 * 1024 * 1024 * 1024 * 1024; $_; } sub formatXiB { my ($newnb, $newbase) = (@_, 1); my ($nb, $base); my $decr = sub { ($nb, $base) = ($newnb, $newbase); $base >= 1024 ? ($newbase = $base / 1024) : ($newnb = $nb / 1024); }; foreach ('', _("KB"), _("MB"), _("GB")) { $decr->(); if ($newnb < 1 && $newnb * $newbase < 1) { my $v = $nb * $base; my $s = $v < 10 && int(10 * $v - 10 * int($v)); return int($v) . ($s ? ".$s" : '') . $_; } } int($newnb * $newbase) . _("TB"); } sub formatTime { my ($s, $m, $h) = gmtime($_[0]); if ($h) { sprintf "%02d:%02d", $h, $m; } elsif ($m > 1) { _("%d minutes", $m); } elsif ($m == 1) { _("1 minute"); } else { _("%d seconds", $s); } } sub usingRamdisk { scalar(grep { /ram3/ } cat_("/proc/mounts")) } sub expand_symlinks_but_simple { my ($f) = @_; my $link = readlink($f); my $f2 = expand_symlinks($f); if ($link && $link !~ m|/|) { # put back the last simple symlink $f2 =~ s|\Q$link\E$|basename($f)|e; } $f2 } sub sync { &MDK::Common::System::sync } # Group the list by n. Returns a reference of lists of length n sub group_n_lm { my $n = shift; my @l; push @l, [ splice(@_, 0, $n) ] while (@_); @l } sub screenshot_dir__and_move { my ($dir1, $dir2) = ("$::o->{prefix}/root", '/tmp/stage2'); if (-e $dir1) { if (-e "$dir2/DrakX-screenshots") { cp_af("$dir2/DrakX-screenshots", $dir1); rm_rf("$dir2/DrakX-screenshots"); } $dir1; } else { $dir2; } } sub take_screenshot { my ($in) = @_; my $dir = screenshot_dir__and_move() . '/DrakX-screenshots'; my $warn; if (!-e $dir) { mkdir $dir or $in->ask_warn('', _("Can't make screenshots before partitioning")), return; $warn = 1; } my $nb = 1; $nb++ while -e "$dir/$nb.png"; system("fb2png /dev/fb0 $dir/$nb.png 0"); $in->ask_warn('', _("Screenshots will be available after install in %s", "/root/DrakX-screenshots")) if $warn; } #-###################################################################################### #- Wonderful perl :( #-###################################################################################### 1; # ion value='30'>30space:mode:
authorMandrake <mandrake@mandriva.com>2010-05-17 01:25:50 +0000
committerMandrake <mandrake@mandriva.com>2010-05-17 01:25:50 +0000
commit3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8 (patch)
treee2e153d310478b3965ef12b89aedeb29c8865f93 /dkms-modules-info
parentfb84c64836e321430438377b49fee89497c1166b (diff)
downloadldetect-lst-3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8.tar
ldetect-lst-3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8.tar.gz
ldetect-lst-3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8.tar.bz2
ldetect-lst-3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8.tar.xz
ldetect-lst-3a03e5916a14a35aec2a3e9d5e8f24f64f18f5b8.zip
add dkms info for nvidia-current with kernel 2.6.33.4-desktop-1mnb
Diffstat (limited to 'dkms-modules-info')
-rw-r--r--dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.alias5
-rw-r--r--dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.description0
2 files changed, 5 insertions, 0 deletions
diff --git a/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.alias b/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.alias
new file mode 100644
index 00000000..a6b3d472
--- /dev/null
+++ b/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.alias
@@ -0,0 +1,5 @@
+char-major-195-*
+pci:v000010DEd00000E00sv*sd*bc04sc80i00*
+pci:v000010DEd00000AA3sv*sd*bc0Bsc40i00*
+pci:v000010DEd*sv*sd*bc03sc02i00*
+pci:v000010DEd*sv*sd*bc03sc00i00*
diff --git a/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.description b/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.description
new file mode 100644
index 00000000..e69de29b
--- /dev/null
+++ b/dkms-modules-info/2.6.33.4-desktop-1mnb/nvidia-current.description
generated by cgit v1.2.1 (git 2.21.0) at 2024-12-25 06:52:43 +0000