diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-10-24 12:16:33 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-10-24 12:16:33 +0000 |
commit | df986ee73cb5d5b6a91f938b4351698ea359f29f (patch) | |
tree | 36313924e4eb63e04514be164f12bf3204fdcb8d /perl-install/partition_table_gpt.pm | |
parent | 0ccc4da1a3bb759bd4333e92efb4a72366b5cb00 (diff) | |
download | drakx-df986ee73cb5d5b6a91f938b4351698ea359f29f.tar drakx-df986ee73cb5d5b6a91f938b4351698ea359f29f.tar.gz drakx-df986ee73cb5d5b6a91f938b4351698ea359f29f.tar.bz2 drakx-df986ee73cb5d5b6a91f938b4351698ea359f29f.tar.xz drakx-df986ee73cb5d5b6a91f938b4351698ea359f29f.zip |
add methods first_usable_sector and last_usable_sector
Diffstat (limited to 'perl-install/partition_table_gpt.pm')
-rw-r--r-- | perl-install/partition_table_gpt.pm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/partition_table_gpt.pm b/perl-install/partition_table_gpt.pm index 7512bb0c2..4662d58a8 100644 --- a/perl-install/partition_table_gpt.pm +++ b/perl-install/partition_table_gpt.pm @@ -225,6 +225,15 @@ sub raw_add { push @$raw, $part; } +sub first_usable_sector { + my ($hd) = @_; + $hd->{primary}{info}{firstUsableLBA}; +} +sub last_usable_sector { + my ($hd) = @_; + $hd->{primary}{info}{lastUsableLBA} + 1; +} + sub info { my ($hd) = @_; my $nb_sect = 32; |