summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2009-01-08 08:15:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2009-01-08 08:15:43 +0000
commita77fbe82060bb0b00639aeb5855c64db076f01e7 (patch)
treecbe21c25143e608aa1b8215cacd94ce1c2aa271d /perl-install
parenta185ff45425be7d41b41a0f92f0e3b7ec526e27b (diff)
downloaddrakx-a77fbe82060bb0b00639aeb5855c64db076f01e7.tar
drakx-a77fbe82060bb0b00639aeb5855c64db076f01e7.tar.gz
drakx-a77fbe82060bb0b00639aeb5855c64db076f01e7.tar.bz2
drakx-a77fbe82060bb0b00639aeb5855c64db076f01e7.tar.xz
drakx-a77fbe82060bb0b00639aeb5855c64db076f01e7.zip
- diskdrake:
o --smb: cifs must be used instead of smbfs (#42483)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS1
-rw-r--r--perl-install/fs/mount.pm2
-rw-r--r--perl-install/fs/mount_options.pm6
-rw-r--r--perl-install/fs/remote/smb.pm2
4 files changed, 6 insertions, 5 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 088a23a85..86eed4587 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,5 +1,6 @@
- diskdrake:
+ o --smb: cifs must be used instead of smbfs (#42483)
o ext4dev is now stable and called ext4 in 2.6.28+
- harddrake:
o fix displaying in proper category sound coprocessor & misc ACPI event keys
diff --git a/perl-install/fs/mount.pm b/perl-install/fs/mount.pm
index 2ea0cdc7f..a3c6d3a28 100644
--- a/perl-install/fs/mount.pm
+++ b/perl-install/fs/mount.pm
@@ -38,7 +38,7 @@ sub mount {
my @fs_modules = qw(ext3 ext4 hfs jfs nfs ntfs romfs reiserfs ufs xfs vfat);
my @types = (qw(ext2 proc sysfs usbfs usbdevfs iso9660 devfs devpts auto ntfs-3g), @fs_modules);
- push @types, 'smb', 'smbfs', 'davfs2' if !$::isInstall;
+ push @types, 'smb', 'cifs', 'davfs2' if !$::isInstall;
if (!member($fs, @types)) {
log::l("skipping mounting $dev partition ($fs)");
diff --git a/perl-install/fs/mount_options.pm b/perl-install/fs/mount_options.pm
index 8d3158d56..4a502f12f 100644
--- a/perl-install/fs/mount_options.pm
+++ b/perl-install/fs/mount_options.pm
@@ -30,7 +30,7 @@ sub unpack {
vfat => [ qw(flush umask=0 umask=0022) ],
ntfs => [ qw(umask=0 umask=0022) ],
nfs => [ qw(rsize=8192 wsize=8192) ],
- smbfs => [ qw(username= password=) ],
+ cifs => [ qw(username= password=) ],
davfs2 => [ qw(username= password= uid= gid=) ],
ext4 => [ qw(extents) ],
reiserfs => [ 'notail' ],
@@ -164,7 +164,7 @@ sub rationalize {
if ($part->{fs_type} ne 'reiserfs') {
$options->{notail} = 0;
}
- if (!fs::type::can_be_one_of_those_fs_types($part, 'vfat', 'smbfs', 'iso9660', 'udf')) {
+ if (!fs::type::can_be_one_of_those_fs_types($part, 'vfat', 'cifs', 'iso9660', 'udf')) {
delete $options->{'codepage='};
}
if (member($part->{mntpoint}, fs::type::directories_needed_to_boot())) {
@@ -216,7 +216,7 @@ sub set_default {
nosuid => 1, 'rsize=8192,wsize=8192' => 1, soft => 1,
});
}
- if ($part->{fs_type} eq 'smbfs') {
+ if ($part->{fs_type} eq 'cifs') {
add2hash($options, { 'username=' => '%' }) if !$options->{'credentials='};
}
if (fs::type::can_be_this_fs_type($part, 'vfat')) {
diff --git a/perl-install/fs/remote/smb.pm b/perl-install/fs/remote/smb.pm
index 1399d2f62..5d16164b6 100644
--- a/perl-install/fs/remote/smb.pm
+++ b/perl-install/fs/remote/smb.pm
@@ -12,7 +12,7 @@ our @ISA = 'fs::remote';
sub to_fstab_entry {
my ($class, $e) = @_;
- my $part = $class->to_fstab_entry_raw($e, 'smbfs');
+ my $part = $class->to_fstab_entry_raw($e, 'cifs');
if ($e->{server}{username}) {
my ($options, $unknown) = fs::mount_options::unpack($part);
$options->{"$_="} = $e->{server}{$_} foreach qw(username password domain);