[Fai-commit] r3660 -
people/michael/features/setup_harddisks_2/implementation
fai-commit at lists.alioth.debian.org
fai-commit at lists.alioth.debian.org
Sun Jul 23 11:39:07 UTC 2006
Author: michael-guest
Date: 2006-07-23 11:39:07 +0000 (Sun, 23 Jul 2006)
New Revision: 3660
Modified:
people/michael/features/setup_harddisks_2/implementation/shdd2-sizes
Log:
updated to parted 1.7
Modified: people/michael/features/setup_harddisks_2/implementation/shdd2-sizes
===================================================================
--- people/michael/features/setup_harddisks_2/implementation/shdd2-sizes 2006-07-23 11:20:09 UTC (rev 3659)
+++ people/michael/features/setup_harddisks_2/implementation/shdd2-sizes 2006-07-23 11:39:07 UTC (rev 3660)
@@ -22,7 +22,7 @@
{
$ENV{"NO_DRY_RUN"} = "1";
my $error =
- &FAI::execute_command( "$FAI::parted_binary $disk unit TB print",
+ &FAI::execute_command( "$FAI::parted_binary $disk unit TiB print",
\@parted_print, 0 );
$ENV{"NO_DRY_RUN"} = "";
@@ -55,12 +55,15 @@
foreach my $line (@parted_print)
{
- print "$line";
- if ( $line =~ /^Disk geometry/ )
+ ( $FAI::debug > 0 ) and print "$line";
+ if ( $line =~ /^Disk /
+ || $line =~ /^\s*$/
+ || $line =~ /^WARNING: You are not superuser/
+ || $line =~ /^Sector / )
{
next;
}
- elsif ( $line =~ /^Disk label type: (.*)$/ )
+ elsif ( $line =~ /^Partition Table: (.*)$/ )
{
$FAI::current_config{$disk}{"disklabel"} = $1;
next;
@@ -106,7 +109,8 @@
if ( $FAI::current_config{$disk}{"disklabel"} eq "msdos" )
{
if ( $line =~
- /^(\d+)*\s+(\d+)B\s+(\d+)B\s+(\d+)B\s+(primary|logical|extended)/i )
+ /^\s*(\d+)*\s+(\d+)B\s+(\d+)B\s+(\d+)B\s+(primary|logical|extended)/i
+ )
{
$FAI::current_config{$disk}{"partitions"}{$1}{"begin_byte"} = $2;
@@ -124,7 +128,7 @@
}
else
{
- if ( $line =~ /^(\d+)*\s+(\d+)B\s+(\d+)B\s+(\d+)B/i )
+ if ( $line =~ /^\s*(\d+)*\s+(\d+)B\s+(\d+)B\s+(\d+)B/i )
{
$FAI::current_config{$disk}{"partitions"}{$1}{"begin_byte"} = $2;
@@ -134,10 +138,10 @@
}
}
- if ( $line =~ /^Disk geometry for.*(\d+)B - (\d+)B/i )
+ if ( $line =~ /^Disk .*: (\d+)B$/i )
{
- $FAI::current_config{$disk}{"begin_byte"} = $1;
- $FAI::current_config{$disk}{"end_byte"} = $2;
+ $FAI::current_config{$disk}{"begin_byte"} = 0;
+ $FAI::current_config{$disk}{"end_byte"} = $1;
}
}
@@ -150,7 +154,7 @@
foreach my $line (@parted_print)
{
- if ( $line =~ /^(\d+)\s+(\d+),(\d+),(\d+)\s+(\d+),(\d+),(\d+)/i )
+ if ( $line =~ /^\s*(\d+)\s+(\d+),(\d+),(\d+)\s+(\d+),(\d+),(\d+)/i )
{
$FAI::current_config{$disk}{"partitions"}{$1}{"begin_cylinder"} = $2;
$FAI::current_config{$disk}{"partitions"}{$1}{"begin_head"} = $3;
@@ -160,15 +164,14 @@
$FAI::current_config{$disk}{"partitions"}{$1}{"end_sector"} = $7;
}
- if (
- $line =~ /^Disk geometry for.*(\d+),(\d+),(\d+) - (\d+),(\d+),(\d+)/i )
+ if ( $line =~ /^Disk .*: (\d+),(\d+),(\d+)$/i )
{
- $FAI::current_config{$disk}{"begin_cylinder"} = $1;
- $FAI::current_config{$disk}{"begin_head"} = $2;
- $FAI::current_config{$disk}{"begin_sector"} = $3;
- $FAI::current_config{$disk}{"end_cylinder"} = $4;
- $FAI::current_config{$disk}{"end_head"} = $5;
- $FAI::current_config{$disk}{"end_sector"} = $6;
+ $FAI::current_config{$disk}{"begin_cylinder"} = 0;
+ $FAI::current_config{$disk}{"begin_head"} = 0;
+ $FAI::current_config{$disk}{"begin_sector"} = 0;
+ $FAI::current_config{$disk}{"end_cylinder"} = $1;
+ $FAI::current_config{$disk}{"end_head"} = $2;
+ $FAI::current_config{$disk}{"end_sector"} = $3;
}
}
More information about the Fai-commit
mailing list