diff -Naur libDrakX.org/check_min_sys_requirements.pm libDrakX/check_min_sys_requirements.pm --- libDrakX.org/check_min_sys_requirements.pm 2017-11-15 00:52:57.000000000 +1000 +++ libDrakX/check_min_sys_requirements.pm 2017-12-14 18:58:33.075000000 +1000 @@ -30,7 +30,7 @@ } sub total_hdds_size { - my @output = `fdisk -l| grep "/dev/sd.:\\|/dev/hd.:\\|/dev/vd.:\\|/dev/mmcblk.:"`; + my @output = `fdisk -l| grep "/dev/sd.:\\|/dev/hd.:\\|/dev/vd.:\\|/dev/mmcblk.:\\|/dev/nvme.n.:"`; my $hdds; my $rounded; my $str; diff -Naur libDrakX.org/detect_devices.pm libDrakX/detect_devices.pm --- libDrakX.org/detect_devices.pm 2017-11-15 00:52:57.000000000 +1000 +++ libDrakX/detect_devices.pm 2017-12-14 20:22:49.280000000 +1000 @@ -33,7 +33,7 @@ #- 2. The first SCSI device if SCSI exists. Or #- 3. The first RAID device if RAID exists. - getIDE(), getSCSI(), getMmcBlk(), getXenBlk(), getVirtIO(), getDAC960(), getCompaqSmartArray(), getATARAID(); + getIDE(), getSCSI(), getNvme(), getMmcBlk(), getXenBlk(), getVirtIO(), getDAC960(), getCompaqSmartArray(), getATARAID(); } sub hds() { grep { may_be_a_hd($_) } get() } sub tapes() { grep { $_->{media_type} eq 'tape' } get() } @@ -409,6 +409,14 @@ } glob("/sys/bus/mmc/devices/*/block/*"); } +sub getNvme() { + -d '/sys/bus/pci/drivers/nvme' or return; + map { + my $d = basename($_); + { device => $d, info => "NVM Express [$d]", media_type => 'hd', bus => 'nvme' }; + } glob("/sys/block/nvme*n*"); +} + # cpu_name : arch() =~ /^alpha/ ? "cpu " : # arch() =~ /^ppc/ ? "processor" : "vendor_id"