diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-10-26 13:06:51 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-10-26 13:06:51 +0000 |
| commit | f491ebbba3c4256b7b358a59516d0225ea7e5436 (patch) | |
| tree | 42b76731a7208a3dba26a93aaf69bfc1b42c8446 /perl-install | |
| parent | 7a534fa8d1e05bb1023accb094b80055b948754b (diff) | |
| download | drakx-backup-do-not-use-f491ebbba3c4256b7b358a59516d0225ea7e5436.tar drakx-backup-do-not-use-f491ebbba3c4256b7b358a59516d0225ea7e5436.tar.gz drakx-backup-do-not-use-f491ebbba3c4256b7b358a59516d0225ea7e5436.tar.bz2 drakx-backup-do-not-use-f491ebbba3c4256b7b358a59516d0225ea7e5436.tar.xz drakx-backup-do-not-use-f491ebbba3c4256b7b358a59516d0225ea7e5436.zip | |
no adjust start and end on GPT
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/partition_table_gpt.pm | 3 | ||||
| -rw-r--r-- | perl-install/partition_table_raw.pm | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/partition_table_gpt.pm b/perl-install/partition_table_gpt.pm index 4662d58a8..4a0514d8e 100644 --- a/perl-install/partition_table_gpt.pm +++ b/perl-install/partition_table_gpt.pm @@ -225,6 +225,9 @@ sub raw_add { push @$raw, $part; } +sub adjustStart {} +sub adjustEnd {} + sub first_usable_sector { my ($hd) = @_; $hd->{primary}{info}{firstUsableLBA}; diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm index 5dfc82e74..1087d7fbb 100644 --- a/perl-install/partition_table_raw.pm +++ b/perl-install/partition_table_raw.pm @@ -77,7 +77,7 @@ sub adjustStart($$) { sub adjustEnd($$) { my ($hd, $part) = @_; my $end = $part->{start} + $part->{size}; - $end == $hd->{totalsectors} and return; + $end > $hd->{geom}{cylinders} * cylinder_size($hd) && $end <= $hd->{totalsectors} and return; my $end1 = round_down($end, cylinder_size($hd)); my $end2 = round_up($end - ($hd->{geom}{heads} > 2 ? 2 : 1) * $hd->{geom}{sectors}, cylinder_size($hd)); $end2 <= $hd->{geom}{cylinders} * cylinder_size($hd) or die "adjustEnd go beyond end of device geometry ($end2 > $hd->{totalsectors})"; |