summaryrefslogtreecommitdiffstats
path: root/move/move.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-06-02 13:57:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-06-02 13:57:46 +0000
commitbe72c5e94a95834dbceda0a8835b49ad0af6449b (patch)
tree02a70c64858b4bf6d841569b0cee7d9de283a958 /move/move.pm
parentd6f2f672def4eec78343947ca5afa95030fed3aa (diff)
downloaddrakx-be72c5e94a95834dbceda0a8835b49ad0af6449b.tar
drakx-be72c5e94a95834dbceda0a8835b49ad0af6449b.tar.gz
drakx-be72c5e94a95834dbceda0a8835b49ad0af6449b.tar.bz2
drakx-be72c5e94a95834dbceda0a8835b49ad0af6449b.tar.xz
drakx-be72c5e94a95834dbceda0a8835b49ad0af6449b.zip
- only look move key in fat partitions
- search for the usb key partition containing a mandrakemove
Diffstat (limited to 'move/move.pm')
-rw-r--r--move/move.pm36
1 files changed, 28 insertions, 8 deletions
diff --git a/move/move.pm b/move/move.pm
index f7f8137f5..1a68507a5 100644
--- a/move/move.pm
+++ b/move/move.pm
@@ -34,6 +34,7 @@ my $key_disabled;
my ($using_existing_user_config, $using_existing_host_config);
my $key_sysconf = '/home/.sysconf';
+my $key_part;
my $virtual_key_part;
my $key_mountopts = 'umask=077,uid=501,gid=501,shortname=mixed,nobadchars';
@@ -268,7 +269,8 @@ sub key_parts {
return () if $key_disabled;
my @keys = grep { detect_devices::isKeyUsb($_) } @{$o->{all_hds}{hds}};
- (fsedit::get_fstab(@keys), grep { detect_devices::isKeyUsb($_) } @{$o->{all_hds}{raw_hds}});
+ my @parts = (fsedit::get_fstab(@keys), grep { detect_devices::isKeyUsb($_) } @{$o->{all_hds}{raw_hds}});
+ grep { isFat({ type => fsedit::typeOfPart($_->{device}) }) } @parts;
}
sub key_mount {
@@ -281,19 +283,38 @@ sub key_mount {
if ($virtual_key_part) {
#- :/ merge_from_mtab didn't got my virtual key, need to add it manually
push @{$o->{fstab}}, $virtual_key_part;
+ $key_part = $virtual_key_part;
+ return;
}
- require fs;
- each_index {
- $_->{mntpoint} = $::i ? "/mnt/key$::i" : '/home';
+ foreach (key_parts($o)) {
+ if ($key_part) {
+ log::l("trying another usb key partition than $key_part->{device}");
+ fs::umount_part($key_part);
+ delete $key_part->{mntpoint};
+ }
+ $_->{mntpoint} = '/home';
$_->{options} = $key_mountopts;
- eval { fs::mount_part($_); 1 } or delete $_->{mntpoint};
- } key_parts($o);
+ if (eval { fs::mount_part($_); 1 }) {
+ $key_part = $_;
+ last if -e $key_sysconf;
+ } else {
+ delete $_->{mntpoint};
+ }
+ }
+
+
}
sub key_umount {
my ($o) = @_;
- eval { fs::umount_part($_) foreach key_parts($o); 1 };
+ $key_part or return;
+
+ eval {
+ fs::umount_part($key_part);
+ undef $key_part;
+ 1;
+ };
}
sub machine_ident() {
@@ -531,7 +552,6 @@ Continue at your own risk."), formatError($@) ]) if $@;
sub install_TrueFS_in_home {
my ($o) = @_;
- require fsedit;
my $home = fsedit::mntpoint2part('/home', $o->{fstab}) or return;
my %loopbacks = map {