Attachment 10945 Details for Bug 15752 – Script to test partition table read speed

Script to test partition table read speed

read_pt.pl (text/plain), 427 bytes, created by Martin Whitaker on 2019-04-16 22:11:46 CEST

(hide)

Description:

Filename:

MIME Type:

Creator: Martin Whitaker

Created: 2019-04-16 22:11:46 CEST

Size: 427 bytes

patch

obsolete

#!/bin/perl
use lib qw(/usr/lib/libDrakX);
use partition_table;

print "Detect devices\n";
my @drives = detect_devices::hds();

foreach my $hd (@drives) {
    $hd->{file} = devices::make($hd->{device});
}

print "Get geometries\n";
my @drives = partition_table::raw::get_geometries(@drives);

foreach my $hd (@drives) {
    my $name = $hd->{file};
    print "Read partition table on $name\n";
    partition_table::read($hd);
}

Actions: View

Attachments on bug 15752: 6329 | 10945 | 10946