summaryrefslogtreecommitdiffstats
path: root/perl-install/c/stuff.xs.pl
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-06-08 22:48:20 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-06-11 09:39:32 +0200
commit83565d0739e5746ea02c210106a2d1f1d1477eda (patch)
tree26f2c7d16ac0db03877aba5f03c09909d22048e6 /perl-install/c/stuff.xs.pl
parente07551ebb52e93af424de2d3a2bf07b01c94de92 (diff)
downloaddrakx-83565d0739e5746ea02c210106a2d1f1d1477eda.tar
drakx-83565d0739e5746ea02c210106a2d1f1d1477eda.tar.gz
drakx-83565d0739e5746ea02c210106a2d1f1d1477eda.tar.bz2
drakx-83565d0739e5746ea02c210106a2d1f1d1477eda.tar.xz
drakx-83565d0739e5746ea02c210106a2d1f1d1477eda.zip
detect GRUB_BIOS partitions (mga#18656)
let's abuse ->{pt_type} for tracking such partitions
Diffstat (limited to 'perl-install/c/stuff.xs.pl')
-rwxr-xr-xperl-install/c/stuff.xs.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl
index 72af65f27..a0fffc6c7 100755
--- a/perl-install/c/stuff.xs.pl
+++ b/perl-install/c/stuff.xs.pl
@@ -122,6 +122,8 @@ PedPartitionFlag string_to_pedpartflag(char*type) {
PedPartitionFlag flag = 0;
if (!strcmp(type, "ESP")) {
flag = PED_PARTITION_ESP;
+ } else if (!strcmp(type, "BIOS_GRUB")) {
+ flag = PED_PARTITION_BIOS_GRUB;
} else if (!strcmp(type, "LVM")) {
flag = PED_PARTITION_LVM;
} else if (!strcmp(type, "RAID")) {
@@ -687,6 +689,8 @@ get_disk_partitions(char * device_path)
char *flag = "";
if (ped_partition_get_flag(part, PED_PARTITION_ESP)) {
flag = "ESP";
+ } else if (ped_partition_get_flag(part, PED_PARTITION_BIOS_GRUB)) {
+ flag = "BIOS_GRUB";
} else if (ped_partition_get_flag(part, PED_PARTITION_LVM)) {
flag = "LVM";
} else if (ped_partition_get_flag(part, PED_PARTITION_RAID)) {