Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
use strict;
use warnings;
-use PVE::SafeSyslog;
-use PVE::Diskmanage;
use HTTP::Status qw(:constants);
+
+use PVE::Diskmanage;
use PVE::JSONSchema qw(get_standard_option);
+use PVE::SafeSyslog;
+use PVE::API2::Disks::Directory;
use PVE::API2::Disks::LVM;
use PVE::API2::Disks::LVMThin;
-use PVE::API2::Disks::Directory;
use PVE::API2::Disks::ZFS;
use PVE::RESTHandler;
-
use base qw(PVE::RESTHandler);
__PACKAGE__->register_method ({
{ name => 'lvmthin' },
{ name => 'directory' },
{ name => 'zfs' },
- ];
+ ];
return $result;
}});
use strict;
use warnings;
+
use PVE::ProcFSTools;
use Data::Dumper;
use Cwd qw(abs_path);
if (defined($type) && $type eq 'ata' && $line =~ m/^([ \d]{2}\d)\s+(\S+)\s+(\S{6})\s+(\d+)\s+(\d+)\s+(\S+)\s+(\S+)\s+(.*)$/) {
my $entry = {};
-
$entry->{name} = $2 if defined $2;
$entry->{flags} = $3 if defined $3;
# the +0 makes a number out of the strings