|
Lines 336-341
Link Here
|
| 336 |
# 5 3068cyl 3198cyl 130cyl logical reiserfs type=83 |
336 |
# 5 3068cyl 3198cyl 130cyl logical reiserfs type=83 |
| 337 |
# |
337 |
# |
| 338 |
my @parted_info_list = (); |
338 |
my @parted_info_list = (); |
|
|
339 |
=cut |
| 339 |
my $parted_info = `parted -s $dev_disk unit cyl print`; |
340 |
my $parted_info = `parted -s $dev_disk unit cyl print`; |
| 340 |
if ( $? == 0 ) { |
341 |
if ( $? == 0 ) { |
| 341 |
my @parted_info_split = split(/\n/, $parted_info); |
342 |
my @parted_info_split = split(/\n/, $parted_info); |
|
Lines 362-368
Link Here
|
| 362 |
[$p_startcyl, $p_endcyl, $p_sizecyl, $p_type]; |
363 |
[$p_startcyl, $p_endcyl, $p_sizecyl, $p_type]; |
| 363 |
} |
364 |
} |
| 364 |
} |
365 |
} |
| 365 |
|
366 |
=cut |
| 366 |
if (!IsDMDevice($disk) && !IsDMRaidSlave($disk)){ |
367 |
if (!IsDMDevice($disk) && !IsDMRaidSlave($disk)){ |
| 367 |
# get partitions of $disk |
368 |
# get partitions of $disk |
| 368 |
opendir(BLOCK_DEVICES, "$sb/$disk") || |
369 |
opendir(BLOCK_DEVICES, "$sb/$disk") || |