aboutsummaryrefslogtreecommitdiffstats
path: root/ro/1
diff options
context:
space:
mode:
authorYuri Chornoivan <yurchor@ukr.net>2016-09-29 19:10:09 +0300
committerYuri Chornoivan <yurchor@ukr.net>2016-09-29 19:10:09 +0300
commitd8bfd2f39746d1cf2a415a41393b17161d7bea2f (patch)
tree461aa11acc85729af613741e727b4dee6d2e5626 /ro/1
parent9bc1339fec4e6af50452314de71f88b72beec999 (diff)
downloadwww-d8bfd2f39746d1cf2a415a41393b17161d7bea2f.tar
www-d8bfd2f39746d1cf2a415a41393b17161d7bea2f.tar.gz
www-d8bfd2f39746d1cf2a415a41393b17161d7bea2f.tar.bz2
www-d8bfd2f39746d1cf2a415a41393b17161d7bea2f.tar.xz
www-d8bfd2f39746d1cf2a415a41393b17161d7bea2f.zip
Update Hungarian translation
Diffstat (limited to 'ro/1')
0 files changed, 0 insertions, 0 deletions
ef='#n12'>12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
package partition_table::empty; # $Id$

#- this is a mainly dummy partition table. If we find it's empty, we just call -
#- zero_MBR which will take care of bless'ing us to the partition table type best
#- suited


use diagnostics;
use strict;
use vars qw(@ISA);

@ISA = qw(partition_table::raw);

use common;
use partition_table::raw;
use partition_table;
use c;


sub read($$) {
    my ($hd, $sector) = @_;
    my $tmp;

    my $F = partition_table::raw::openit($hd) or die "failed to open device";
    c::lseek_sector(fileno($F), $sector, 0) or die "reading of partition in sector $sector failed";

    #- check magic number
    sysread $F, $tmp, 1024 or die "error reading magic number on disk $hd->{device}";
    $tmp eq substr($tmp, 0, 1) x 1024 or die "bad magic number on disk $hd->{device}";

    partition_table::raw::zero_MBR($hd);

    $hd->{primary}{raw}, $hd->{primary}{info};
}

1;