root/usr.sbin/sysinst/partman.c
/*      $NetBSD: partman.c,v 1.58 2026/06/21 16:47:37 martin Exp $ */

/*
 * Copyright 2012 Eugene Lozovoy
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. The name of Eugene Lozovoy may not be used to endorse
 *    or promote products derived from this software without specific prior
 *    written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
 * THE POSSIBILITY OF SUCH DAMAGE.
 *
 */

/*
 * Copyright 2010 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
 * THE POSSIBILITY OF SUCH DAMAGE.
 *
 */

/* partman.c - extended partitioning */

#include <assert.h>
#include <fcntl.h>
#include <errno.h>
#include <libgen.h>
#include <paths.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <util.h>

#include "defs.h"
#include "msg_defs.h"
#include "menu_defs.h"

/* XXX: replace all MAX_* defines with vars that depend on kernel settings */
#define MAX_ENTRIES 96

#define MAX_RAID 8
#define MAX_IN_RAID 48
struct raid_comp {
        char name[SSTRSIZE];    /* display name for this component */
        struct disk_partitions *parts;  /* where is this on? */
        part_id id;             /* which partition in parts */
        bool is_spare;          /* is this a spare component? */
};
struct raid_desc {
        int enabled;
        int blocked;
        int node;               /* the N in raid${N} */
        int numRow, numCol, numSpare;
        int sectPerSU, SUsPerParityUnit, SUsPerReconUnit, raid_level;
        daddr_t total_size;
        struct raid_comp comp[MAX_IN_RAID];
};
struct raid_desc *raids;

#define MAX_VND 4
struct vnd_desc {
        int enabled;
        int blocked;
        int node;       /* the N in vnd${N} */
        char filepath[STRSIZE];
        daddr_t size;
        int readonly;
        int is_exist;
        int manual_geom;
        int secsize, nsectors, ntracks, ncylinders;
        struct pm_devs *pm;     /* device this is on */
        part_id pm_part;        /* which partition (in pm->parts) */
};
struct vnd_desc *vnds;

#define MAX_CGD 4
struct cgd_desc {
        int enabled;
        int blocked;
        int node;       /* the N in cgd${N} */
        char pm_name[SSTRSIZE];
        const char *keygen_type;
        const char *verify_type;
        const char *enc_type;
        const char *iv_type;
        int key_size;
        struct pm_devs *pm;     /* device this is on */
        part_id pm_part;        /* which partition (in pm->parts) */
};
struct cgd_desc *cgds;

#define MAX_LVM_VG 16
#define MAX_LVM_PV 255
#define MAX_LVM_LV 255

struct lvm_pv_reg {
        struct pm_devs *pm;
        daddr_t start;
};
struct lvm_pv_reg lvm_pvs[MAX_LVM_PV];  /* XXX - make dynamic */

typedef struct pv_t {
        struct pm_devs *pm;
        char pm_name[SSTRSIZE];
        part_id pm_part;
        int metadatasize;
        int metadatacopies;
        int labelsector;
        int setphysicalvolumesize;
} pv_t;
typedef struct lv_t {
        int blocked;
        daddr_t size;
        char name[SSTRSIZE];
        int readonly;
        int contiguous;
        char extents[SSTRSIZE];
        int minor;
        int mirrors;
        int regionsize;
        int persistent;
        int readahead;
        int stripes;
        int stripesize;
        int zero;
} lv_t;
typedef struct lvms_t {
        int enabled;
        int blocked;
        char name[SSTRSIZE];
        int maxlogicalvolumes;
        int maxphysicalvolumes;
        int physicalextentsize;
        daddr_t total_size;
        pv_t pv[MAX_LVM_PV];
        lv_t lv[MAX_LVM_LV];
} lvms_t;
lvms_t *lvms;

typedef struct structinfo_t {
        int max;
        uint entry_size;
        uint parent_size;
        void *entry_first;
        void *entry_enabled;
        void *entry_blocked;
        void *entry_node;
} structinfo_t;
structinfo_t raids_t_info, vnds_t_info, cgds_t_info, lvms_t_info, lv_t_info;

typedef struct pm_upddevlist_adv_t {
        const char *create_msg;
        int pe_type;
        structinfo_t *s;
        int sub_num;
        struct pm_upddevlist_adv_t *sub;
} pm_upddevlist_adv_t;

#define MAX_MNTS 48
struct {
    char dev[STRSIZE];
    const char *mnt_opts, *on;
} *mnts;

static int pm_cursel; /* Number of selected entry in main menu */
static int pm_changed; /* flag indicating that we have unsaved changes */
static int pm_raid_curspare; /* XXX: replace by true way */
static int pm_retvalue;

enum { /* RAIDframe menu enum */
        PMR_MENU_DEVS, PMR_MENU_DEVSSPARE, PMR_MENU_RAIDLEVEL, PMR_MENU_NUMROW,
        PMR_MENU_NUMCOL, PMR_MENU_NUMSPARE,     PMR_MENU_SECTPERSU,     PMR_MENU_SUSPERPARITYUNIT,
        PMR_MENU_SUSPERRECONUNIT, PMR_MENU_REMOVE, PMR_MENU_END
};

enum { /* VND menu enum */
        PMV_MENU_FILEPATH, PMV_MENU_EXIST, PMV_MENU_SIZE, PMV_MENU_RO, PMV_MENU_MGEOM,
        PMV_MENU_SECSIZE, PMV_MENU_NSECTORS, PMV_MENU_NTRACKS, PMV_MENU_NCYLINDERS,
        PMV_MENU_REMOVE, PMV_MENU_END
};

enum { /* CGD menu enum */
        PMC_MENU_DEV, PMC_MENU_ENCTYPE, PMC_MENU_KEYSIZE, PMC_MENU_IVTYPE,
        PMC_MENU_KEYGENTYPE, PMC_MENU_VERIFYTYPE, PMC_MENU_REMOVE, PMC_MENU_END
};

enum { /* LVM menu enum */
        PML_MENU_PV, PML_MENU_NAME, PML_MENU_MAXLOGICALVOLUMES,
        PML_MENU_MAXPHYSICALVOLUMES, PML_MENU_PHYSICALEXTENTSIZE,
        PML_MENU_REMOVE, PML_MENU_END
};

enum { /* LVM submenu (logical volumes) enum */
        PMLV_MENU_NAME, PMLV_MENU_SIZE, PMLV_MENU_READONLY, PMLV_MENU_CONTIGUOUS,
        PMLV_MENU_EXTENTS, PMLV_MENU_MINOR, PMLV_MENU_PERSISTENT,
        PMLV_MENU_MIRRORS, PMLV_MENU_REGIONSIZE, PMLV_MENU_READAHEAD,
        PMLV_MENU_STRIPES, PMLV_MENU_STRIPESIZE, PMLV_MENU_ZERO,
        PMLV_MENU_REMOVE, PMLV_MENU_END
};

struct part_entry pm_dev_list(int);
static int pm_raid_disk_add(menudesc *, void *);
static int pm_raid_disk_del(menudesc *, void *);
static int pm_cgd_disk_set(struct cgd_desc *, struct part_entry *);
static int pm_mount(struct pm_devs *, int);
static int pm_upddevlist(menudesc *, void *, struct install_partition_desc *);
static void pm_select(struct pm_devs *);


static int
pm_do_upddevlist(menudesc *m, void *arg)
{
        return pm_upddevlist(m, arg, ((struct part_entry*)arg)->install);
}

static void
pm_edit_size_value(msg prompt_msg, daddr_t bps, daddr_t cylsec, daddr_t *size)
{

        char answer[16], dflt[16];
        daddr_t new_size_val, mult;

        snprintf(dflt, sizeof dflt, "%" PRIu64 "%s", *size / sizemult,
            multname);

        msg_prompt_win(prompt_msg, -1, 18, 0, 0, dflt, answer, sizeof answer);

        mult = sizemult;
        new_size_val = parse_disk_pos(answer, &mult, bps, cylsec, NULL);

        if (new_size_val > 0)
                *size = new_size_val * mult;
}

static const char *
pm_get_mount(struct pm_devs *p, part_id id)
{

        if (p->mounted == NULL)
                return NULL;
        if (id >= p->parts->num_part)
                return NULL;
        return p->mounted[id];
}

bool pm_set_mount(struct pm_devs *p, part_id id, const char *path);

bool
pm_set_mount(struct pm_devs *p, part_id id, const char *path)
{

        if (p->parts == NULL || id >= p->parts->num_part)
                return false;

        if (p->mounted == NULL) {
                p->mounted = calloc(p->parts->num_part, sizeof(char*));
                if (p->mounted == NULL)
                        return false;
        }
        free(p->mounted[id]);
        p->mounted[id] = strdup(path);
        return p->mounted[id] != NULL;
}

/* Universal menu for RAID/VND/CGD/LVM entry edit */
static int
pm_edit(int menu_entries_count, void (*menu_fmt)(menudesc *, int, void *),
        int (*action)(menudesc *, void *), int (*check_fun)(void *),
        void (*entry_init)(void *, void *),     void *entry_init_arg,
        void *dev_ptr, int dev_ptr_delta, structinfo_t *s)
{
        int i, ok = 0;
        menu_ent *menu_entries;

        if (dev_ptr == NULL) {
                /* We should create new device */
                for (i = 0; i < s->max && !ok; i++)
                        if (*(int*)((char*)s->entry_enabled + dev_ptr_delta + s->entry_size * i) == 0) {
                                dev_ptr = (char*)s->entry_first + dev_ptr_delta + s->entry_size * i;
                                entry_init(dev_ptr, entry_init_arg);
                                ok = 1;
                        }
                if (!ok) {
                        /* We do not have free device slots */
                        hit_enter_to_continue(NULL, MSG_limitcount);
                        return -1;
                }
        }

        menu_entries = calloc(menu_entries_count, sizeof *menu_entries);
        for (i = 0; i < menu_entries_count - 1; i++)
                menu_entries[i] = (menu_ent) { .opt_action=action };
        menu_entries[i] = (menu_ent) {  .opt_name=MSG_fremove,
                                        .opt_flags=OPT_EXIT,
                                        .opt_action=action };

        int menu_no = -1;
        menu_no = new_menu(NULL, menu_entries, menu_entries_count,
                -1, -1, 0, 40, MC_NOCLEAR | MC_SCROLL,
                NULL, menu_fmt, NULL, NULL, MSG_DONE);

        process_menu(menu_no, dev_ptr);
        free_menu(menu_no);
        free(menu_entries);

        return check_fun(dev_ptr);
}

/* Show filtered partitions menu */
struct part_entry
pm_dev_list(int type)
{
        int dev_num = -1, num_devs = 0;
        bool ok;
        part_id i;
        int menu_no;
        struct disk_part_info info;
        menu_ent menu_entries[MAX_DISKS*MAXPARTITIONS];
        struct part_entry disk_entries[MAX_DISKS*MAXPARTITIONS];
        struct pm_devs *pm_i;

        SLIST_FOREACH(pm_i, &pm_head, l) {
                if (pm_i->parts == NULL)
                        continue;
                for (i = 0; i < pm_i->parts->num_part; i++) {
                        ok = false;
                        if (!pm_i->parts->pscheme->get_part_info(pm_i->parts,
                            i, &info))
                                continue;
                        if (info.flags &
                            (PTI_WHOLE_DISK|PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
                                continue;
                        switch (type) {
                                case PM_RAID:
                                        if (info.fs_type == FS_RAID)
                                                ok = 1;
                                        break;
                                case PM_CGD:
                                        if (info.fs_type == FS_CGD)
                                                ok = 1;
                                        break;
                                case PM_LVM:
                                        if (pm_is_lvmpv(pm_i, i, &info))
                                                ok = 1;
                                        break;
                        }
                        if (!ok)
                                continue;
                        if (pm_partusage(pm_i, i, 0) != 0)
                                continue;

                        disk_entries[num_devs].dev_ptr = pm_i;
                        disk_entries[num_devs].id = i;
                        disk_entries[num_devs].parts = pm_i->parts;

                        pm_i->parts->pscheme->get_part_device(
                            pm_i->parts, i, disk_entries[num_devs].fullname,
                            sizeof disk_entries[num_devs].fullname,
                            NULL, plain_name, false, true);

                        menu_entries[num_devs] = (struct menu_ent) {
                                .opt_name = disk_entries[num_devs].fullname,
                                .opt_action = set_menu_select,
                                .opt_flags = OPT_EXIT,
                        };
                        num_devs++;
                }
        }

        menu_no = new_menu(MSG_avdisks,
                menu_entries, num_devs, -1, -1,
                (num_devs+1<3)?3:num_devs+1, 13,
                MC_SCROLL | MC_NOCLEAR, NULL, NULL, NULL, NULL, MSG_cancel);
        if (menu_no == -1)
                return (struct part_entry) { 0 };
        process_menu(menu_no, &dev_num);
        free_menu(menu_no);

        if (dev_num < 0 || dev_num >= num_devs)
                return (struct part_entry) { 0 };

        pm_retvalue = dev_num;
        return disk_entries[dev_num];
}

/* Get unused raid*, cgd* or vnd* device */
static int
pm_manage_getfreenode(void *node, const char *d, structinfo_t *s)
{
        int i, ii, ok;
        char buf[SSTRSIZE];
        struct pm_devs *pm_i;

        *(int*)node = -1;
        for (i = 0; i < s->max; i++) {
                ok = 1;
                /* Check that node is not already reserved */
                for (ii = 0; ii < s->max; ii++) {
                        if (*(int*)((char*)s->entry_enabled + s->entry_size
                            * ii) == 0)
                                continue;
                        if (*(int*)((char*)s->entry_node + s->entry_size * ii)
                            == i) {
                                ok = 0;
                                break;
                        }
                }
                if (! ok)
                        continue;
                /* Check that node is not in the device list */
                snprintf(buf, SSTRSIZE, "%s%d", d, i);
                SLIST_FOREACH(pm_i, &pm_head, l)
                        if (! strcmp(pm_i->diskdev, buf)) {
                                ok = 0;
                                break;
                        }
                if (ok) {
                        *(int*)node = i;
                        return i;
                }
        }
        hit_enter_to_continue(NULL, MSG_nofreedev);
        return -1;
}

/*
 * Show a line for a device, usually with full size in the right
 * column, alternatively (if != NULL) with no_size_display
 * instead in parentheses (used for error displays or to note
 * a action that can be done to this device.
 */
static void
pm_fmt_disk_line(WINDOW *w, const char *line, const char *on,
    daddr_t total, const char *no_size_display)
{
        char out[STRSIZE], human[6];

        if (on != NULL) {
                snprintf(out, sizeof out, "%s %s %s", line,
                    msg_string(MSG_pm_menu_on), on);
                line = out;
        }
        if (no_size_display != NULL) {
                wprintw(w, "   %-56s (%s)", line, no_size_display);
        } else {
                humanize_number(human, sizeof(human),
                    total * 512, "",
                    HN_AUTOSCALE, HN_B | HN_NOSPACE | HN_DECIMAL);
                wprintw(w, "   %-56s %s", line, human);
        }
}

/***
 RAIDs
 ***/

static void
pm_raid_menufmt(menudesc *m, int opt, void *arg)
{
        int i, ok = 0;
        char buf[STRSIZE], rdev[STRSIZE], level[STRSIZE], *line;
        struct raid_desc *dev_ptr = ((struct part_entry *)arg)[opt].dev_ptr;

        if (dev_ptr->enabled == 0)
                return;
        buf[0] = '\0';
        sprintf(rdev, "raid%d", dev_ptr->node);
        for (i = 0; i < MAX_IN_RAID; i++) {
                if (dev_ptr->comp[i].parts != NULL) {
                        strlcat(buf, dev_ptr->comp[i].name, sizeof buf);
                        strlcat(buf, " ", sizeof buf);
                        ok = 1;
                }
        }
        if (ok) {
                sprintf(level, "%u", dev_ptr->raid_level);
                const char *args[] = { rdev, level };
                line = str_arg_subst(msg_string(MSG_raid_menufmt),
                    __arraycount(args), args);
                pm_fmt_disk_line(m->mw, line, buf, dev_ptr->total_size, NULL);
                free(line);
        } else {
                pm_fmt_disk_line(m->mw, buf, NULL, 0,
                    msg_string(MSG_raid_err_menufmt));
        }
}

static void
pm_raid_edit_menufmt(menudesc *m, int opt, void *arg)
{
        int i;
        char buf[STRSIZE];
        struct raid_desc *dev_ptr = arg;

        buf[0] = '\0';
        switch (opt) {
                case PMR_MENU_DEVS:
                        strlcpy(buf, msg_string(MSG_raid_disks_fmt),
                            sizeof buf);
                        strlcat(buf, ": ", sizeof buf);
                        for (i = 0; i < MAX_IN_RAID; i++) {
                                if (dev_ptr->comp[i].parts == NULL ||
                                     dev_ptr->comp[i].is_spare)
                                        continue;
                                strlcat(buf, " ", sizeof buf);
                                strlcat(buf, dev_ptr->comp[i].name, sizeof buf);
                        }
                        wprintw(m->mw, "%s", buf);
                        break;
                case PMR_MENU_DEVSSPARE:
                        strlcpy(buf, msg_string(MSG_raid_spares_fmt),
                            sizeof buf);
                        strlcat(buf, ": ", sizeof buf);
                        for (i = 0; i < MAX_IN_RAID; i++) {
                                if (dev_ptr->comp[i].parts == NULL ||
                                     !dev_ptr->comp[i].is_spare)
                                        continue;
                                strlcat(buf, " ", sizeof buf);
                                strlcat(buf, dev_ptr->comp[i].name, sizeof buf);
                        }
                        wprintw(m->mw, "%s", buf);
                        break;
                case PMR_MENU_RAIDLEVEL:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_level_fmt),
                            dev_ptr->raid_level);
                        break;
                case PMR_MENU_NUMROW:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_numrow_fmt), dev_ptr->numRow);
                        break;
                case PMR_MENU_NUMCOL:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_numcol_fmt), dev_ptr->numCol);
                        break;
                case PMR_MENU_NUMSPARE:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_numspare_fmt),
                            dev_ptr->numSpare);
                        break;
                case PMR_MENU_SECTPERSU:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_sectpersu_fmt),
                            dev_ptr->sectPerSU);
                        break;
                case PMR_MENU_SUSPERPARITYUNIT:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_superpar_fmt),
                            dev_ptr->SUsPerParityUnit);
                        break;
                case PMR_MENU_SUSPERRECONUNIT:
                        wprintw(m->mw, "%s: %u",
                            msg_string(MSG_raid_superrec_fmt),
                            dev_ptr->SUsPerReconUnit);
                        break;
        }
}

static int
pm_raid_set_value(menudesc *m, void *arg)
{
        int retvalue = -1;
        int *out_var = NULL;
        char buf[SSTRSIZE];
        const char *msg_to_show = NULL;
        struct raid_desc *dev_ptr = arg;

        static menu_ent menuent_disk_adddel[] = {
            { .opt_name=MSG_add, .opt_flags=OPT_EXIT,
              .opt_action=pm_raid_disk_add },
            { .opt_name=MSG_remove, .opt_flags=OPT_EXIT,
              .opt_action=pm_raid_disk_del }
        };
        static int menu_disk_adddel = -1;
        if (menu_disk_adddel == -1) {
                menu_disk_adddel = new_menu(NULL, menuent_disk_adddel,
                        __arraycount(menuent_disk_adddel),
                        -1, -1, 0, 10, MC_NOCLEAR, NULL, NULL, NULL, NULL,
                        MSG_cancel);
        }

        switch (m->cursel) {
                case PMR_MENU_DEVS:
                        pm_raid_curspare = 0;
                        process_menu(menu_disk_adddel, dev_ptr);
                        return 0;
                case PMR_MENU_DEVSSPARE:
                        pm_raid_curspare = 1;
                        process_menu(menu_disk_adddel, dev_ptr);
                        return 0;
                case PMR_MENU_RAIDLEVEL:
                        process_menu(MENU_raidlevel, &retvalue);
                        if (retvalue >= 0)
                                dev_ptr->raid_level = retvalue;
                        return 0;
                case PMR_MENU_NUMROW:
                        hit_enter_to_continue(NULL, MSG_raid_nomultidim);
                        return 0;
#if 0 /* notyet */
                        msg_to_show = MSG_raid_numrow_ask;
                        out_var = &(dev_ptr->numRow);
                        break;
#endif
                case PMR_MENU_NUMCOL:
                        msg_to_show = MSG_raid_numcol_ask;
                        out_var = &(dev_ptr->numCol);
                        break;
                case PMR_MENU_NUMSPARE:
                        msg_to_show = MSG_raid_numspare_ask;
                        out_var = &(dev_ptr->numSpare);
                        break;
                case PMR_MENU_SECTPERSU:
                        msg_to_show = MSG_raid_sectpersu_ask;
                        out_var = &(dev_ptr->sectPerSU);
                        break;
                case PMR_MENU_SUSPERPARITYUNIT:
                        msg_to_show = MSG_raid_superpar_ask;
                        out_var = &(dev_ptr->SUsPerParityUnit);
                        break;
                case PMR_MENU_SUSPERRECONUNIT:
                        msg_to_show = MSG_raid_superrec_ask;
                        out_var = &(dev_ptr->SUsPerReconUnit);
                        break;
                case PMR_MENU_REMOVE:
                        dev_ptr->enabled = 0;
                        return 0;
        }
        if (out_var == NULL || msg_to_show == NULL)
                return -1;
        snprintf(buf, SSTRSIZE, "%d", *out_var);
        msg_prompt_win(msg_to_show, -1, 18, 0, 0, buf, buf, SSTRSIZE);
        if (atoi(buf) >= 0)
                *out_var = atoi(buf);
        return 0;
}

static void
pm_raid_init(void *arg, void *none)
{
        struct raid_desc *dev_ptr = arg;
        memset(dev_ptr, 0, sizeof(*dev_ptr));
        *dev_ptr = (struct raid_desc) {
                .enabled = 1,
                .blocked = 0,
                .sectPerSU = 32,
                .SUsPerParityUnit = 1,
                .SUsPerReconUnit = 1,
        };
}

static int
pm_raid_check(void *arg)
{
        size_t i, dev_num = 0;
        daddr_t min_size = 0, cur_size = 0;
        struct raid_desc *dev_ptr = arg;
        struct disk_part_info info;
        struct disk_partitions *parts;

        if (dev_ptr->blocked)
                return 0;

        for (i = 0; i < MAX_IN_RAID; i++) {
                if (dev_ptr->comp[i].parts != NULL) {
                        parts = dev_ptr->comp[i].parts;
                        if (!parts->pscheme->get_part_info(parts,
                            dev_ptr->comp[i].id, &info))
                                continue;
                        cur_size = info.size;
                        if (cur_size < min_size || dev_num == 0)
                                min_size = cur_size;
                        if (dev_ptr->comp[i].is_spare)
                                continue;
                        dev_num++;
                }
        }

        /* Calculate sum of available space */
        if (dev_num > 0) {
                switch (dev_ptr->raid_level) {
                        case 0:
                                dev_ptr->total_size = min_size * dev_num;
                                break;
                        case 1:
                                dev_ptr->total_size = min_size;
                                break;
                        case 4:
                        case 5:
                                dev_ptr->total_size = min_size * (dev_num - 1);
                                break;
                }
                pm_manage_getfreenode(&(dev_ptr->node), "raid", &raids_t_info);
                if (dev_ptr->node < 0)
                        dev_ptr->enabled = 0;
        }
        else
                dev_ptr->enabled = 0;
        return dev_ptr->enabled;
}

static int
pm_raid_disk_add(menudesc *m, void *arg)
{
        int i;
        struct raid_desc *dev_ptr = arg;
        struct part_entry disk_entrie = pm_dev_list(PM_RAID);
        if (pm_retvalue < 0)
                return pm_retvalue;

        for (i = 0; i < MAX_IN_RAID; i++)
                if (dev_ptr->comp[i].parts == NULL) {
                        dev_ptr->comp[i].parts = disk_entrie.parts;
                        dev_ptr->comp[i].id = disk_entrie.id;
                        dev_ptr->comp[i].is_spare = pm_raid_curspare;
                        strlcpy(dev_ptr->comp[i].name, disk_entrie.fullname,
                            sizeof dev_ptr->comp[i].name);
                        if (pm_raid_curspare)
                                dev_ptr->numSpare++;
                        else
                                dev_ptr->numCol++;
                        dev_ptr->numRow = 1;
                        break;
                }
        return 0;
}

static int
pm_raid_disk_del(menudesc *m, void *arg)
{
        int retvalue = -1, num_devs = 0;
        int i, pm_cur;
        int menu_no;
        struct raid_desc *dev_ptr = arg;
        menu_ent menu_entries[MAX_IN_RAID];
        struct part_entry submenu_args[MAX_IN_RAID];

        for (i = 0; i < MAX_IN_RAID; i++) {
                if (dev_ptr->comp[i].parts == NULL ||
                        dev_ptr->comp[i].is_spare != pm_raid_curspare)
                        continue;
                menu_entries[num_devs] = (struct menu_ent) {
                        .opt_name = dev_ptr->comp[i].name,
                        .opt_action = set_menu_select,
                        .opt_flags = OPT_EXIT,
                };
                submenu_args[num_devs].dev_ptr = dev_ptr;
                submenu_args[num_devs].index = i;
                num_devs++;
        }

        menu_no = new_menu(MSG_raid_disks,
                menu_entries, num_devs, -1, -1,
                (num_devs+1<3)?3:num_devs+1, 13,
                MC_SCROLL | MC_NOCLEAR, NULL, NULL, NULL, NULL, MSG_cancel);
        if (menu_no == -1)
                return -1;
        process_menu(menu_no, &retvalue);
        free_menu(menu_no);

        if (retvalue < 0 || retvalue >= num_devs)
                return -1;

        pm_cur = submenu_args[retvalue].index;

        if (dev_ptr->comp[pm_cur].is_spare)
                dev_ptr->numSpare--;
        else
                dev_ptr->numCol--;
        dev_ptr->numRow = (dev_ptr->numCol)?1:0;
        dev_ptr->comp[pm_cur].parts = NULL;

        return 0;
}

static int
pm_raid_commit(void)
{
        int i, ii;
        FILE *f;
        char f_name[STRSIZE], devname[STRSIZE];

        if (!have_raid)
                return 0;
        for (i = 0; i < MAX_RAID; i++) {
                if (! pm_raid_check(&raids[i]))
                        continue;

                /* Generating configure file for our raid */
                snprintf(f_name, SSTRSIZE, "/tmp/raid.%d.conf", raids[i].node);
                f = fopen(f_name, "w");
                if (f == NULL) {
                        endwin();
                        (void)fprintf(stderr,
                            "Could not open %s for writing\n", f_name);
                        if (logfp)
                                (void)fprintf(logfp,
                                    "Could not open %s for writing\n", f_name);
                        return 1;
                }
                scripting_fprintf(NULL, "cat <<EOF >%s\n", f_name);
                scripting_fprintf(f, "START array\n%d %d %d\n",
                    raids[i].numRow, raids[i].numCol, raids[i].numSpare);

                scripting_fprintf(f, "\nSTART disks\n");
                for (ii = 0; ii < MAX_IN_RAID; ii++) {
                        if (raids[i].comp[ii].parts != NULL &&
                            !raids[i].comp[ii].is_spare) {
                                strcpy(devname, raids[i].comp[ii].name);
                                if (raids[i].comp[ii].parts != NULL &&
                                    raids[i].comp[ii].id != NO_PART) {
                                        /* wedge may have moved */
                                        raids[i].comp[ii].parts->pscheme->
                                            get_part_device(
                                            raids[i].comp[ii].parts,
                                            raids[i].comp[ii].id,
                                            devname, sizeof devname, NULL,
                                            logical_name, true, true);
                                        raids[i].comp[ii].parts->pscheme->
                                            get_part_device(
                                            raids[i].comp[ii].parts,
                                            raids[i].comp[ii].id,
                                            raids[i].comp[ii].name,
                                            sizeof raids[i].comp[ii].name,
                                            NULL, plain_name, true, true);
                                }
                                scripting_fprintf(f,  "%s\n", devname);
                        }
                }

                scripting_fprintf(f, "\nSTART spare\n");
                for (ii = 0; ii < MAX_IN_RAID; ii++) {
                        if (raids[i].comp[ii].parts != NULL &&
                            raids[i].comp[ii].is_spare) {
                                strcpy(devname, raids[i].comp[ii].name);
                                if (raids[i].comp[ii].parts != NULL &&
                                    raids[i].comp[ii].id != NO_PART) {
                                        /* wedge may have moved */
                                        raids[i].comp[ii].parts->pscheme->
                                            get_part_device(
                                            raids[i].comp[ii].parts,
                                            raids[i].comp[ii].id,
                                            devname, sizeof devname, NULL,
                                            logical_name, true, true);
                                        raids[i].comp[ii].parts->pscheme->
                                            get_part_device(
                                            raids[i].comp[ii].parts,
                                            raids[i].comp[ii].id,
                                            raids[i].comp[ii].name,
                                            sizeof raids[i].comp[ii].name,
                                            NULL, plain_name, true, true);
                                }

                                scripting_fprintf(f,  "%s\n",
                                    devname);
                        }
                }

                scripting_fprintf(f, "\nSTART layout\n%d %d %d %d\n",
                    raids[i].sectPerSU, raids[i].SUsPerParityUnit,
                    raids[i].SUsPerReconUnit, raids[i].raid_level);

                scripting_fprintf(f, "\nSTART queue\nfifo 100\n\n");
                scripting_fprintf(NULL, "EOF\n");
                fclose (f);
                fflush(NULL);

                /* Raid initialization */
                if (run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "raidctl -C %s raid%d", f_name, raids[i].node) == 0 &&
                    run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "raidctl -I %d raid%d", rand(), raids[i].node) == 0 &&
                    run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "raidctl -vi raid%d", raids[i].node) == 0 &&
                    run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "raidctl -v -A yes raid%d", raids[i].node) == 0) {
                        /*
                         * RAID creation done, remove it from list to
                         * prevent its repeated reinitialization
                         */
                        raids[i].blocked = 1;
                }
        }
        return 0;
}

/***
 VND
 ***/

static void
pm_vnd_menufmt(menudesc *m, int opt, void *arg)
{
        struct vnd_desc *dev_ptr = ((struct part_entry *)arg)[opt].dev_ptr;
        char dev[STRSIZE];

        if (dev_ptr->enabled == 0)
                return;
        sprintf(dev, "vnd%d", dev_ptr->node);
        if (strlen(dev_ptr->filepath) < 1)
                pm_fmt_disk_line(m->mw, dev, NULL,
                    0, msg_string(MSG_vnd_err_menufmt));
        else if (dev_ptr->is_exist)
                pm_fmt_disk_line(m->mw, dev, dev_ptr->filepath,
                    0, msg_string(MSG_vnd_assign));
        else
                pm_fmt_disk_line(m->mw, dev, dev_ptr->filepath,
                    dev_ptr->size, NULL);
}

static int
max_msg_length(const msg *p, size_t cnt)
{
        int len, m = 0;

        while (cnt > 0) {
                len = strlen(msg_string(*p));
                if (len > m)
                        m = len;
                cnt--; p++;
        }

        return m;
}

static void
pm_vnd_edit_menufmt(menudesc *m, int opt, void *arg)
{
        struct vnd_desc *dev_ptr = arg;
        char buf[SSTRSIZE];
        strcpy(buf, "-");
        static int lcol_width;
        if (lcol_width == 0) {
                static const msg labels[] = {
                    MSG_vnd_path_fmt, MSG_vnd_assign_fmt, MSG_vnd_size_fmt,
                    MSG_vnd_ro_fmt, MSG_vnd_geom_fmt, MSG_vnd_bps_fmt,
                    MSG_vnd_spt_fmt, MSG_vnd_tpc_fmt, MSG_vnd_cyl_fmt
                };
                lcol_width = max_msg_length(labels, __arraycount(labels)) + 3;
        }

        switch (opt) {
                case PMV_MENU_FILEPATH:
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_path_fmt), dev_ptr->filepath);
                        break;
                case PMV_MENU_EXIST:
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_assign_fmt),
                            dev_ptr->is_exist?
                                msg_string(MSG_No) : msg_string(MSG_Yes));
                        break;
                case PMV_MENU_SIZE:
                        if (!dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%" PRIu64,
                                    dev_ptr->size / sizemult);
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_size_fmt), buf);
                        break;
                case PMV_MENU_RO:
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_ro_fmt),
                            dev_ptr->readonly?
                                msg_string(MSG_Yes) : msg_string(MSG_No));
                        break;
                case PMV_MENU_MGEOM:
                        if (!dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%s",
                                    dev_ptr->manual_geom?
                                    msg_string(MSG_Yes) : msg_string(MSG_No));
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_geom_fmt), buf);
                        break;
                case PMV_MENU_SECSIZE:
                        if (dev_ptr->manual_geom && !dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%d", dev_ptr->secsize);
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_bps_fmt), buf);
                        break;
                case PMV_MENU_NSECTORS:
                        if (dev_ptr->manual_geom && !dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%d",
                                    dev_ptr->nsectors);
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_spt_fmt), buf);
                        break;
                case PMV_MENU_NTRACKS:
                        if (dev_ptr->manual_geom && !dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%d", dev_ptr->ntracks);
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_tpc_fmt), buf);
                        break;
                case PMV_MENU_NCYLINDERS:
                        if (dev_ptr->manual_geom && !dev_ptr->is_exist)
                                snprintf(buf, SSTRSIZE, "%d",
                                    dev_ptr->ncylinders);
                        wprintw(m->mw, "%*s %s", -lcol_width,
                            msg_string(MSG_vnd_cyl_fmt), buf);
                        break;
        }
}

static int
pm_vnd_set_value(menudesc *m, void *arg)
{
        struct vnd_desc *dev_ptr = arg;
        char buf[STRSIZE];
        const char *msg_to_show = NULL;
        int *out_var = NULL;

        switch (m->cursel) {
                case PMV_MENU_FILEPATH:
                        msg_prompt_win(MSG_vnd_path_ask, -1, 18, 0, 0,
                            dev_ptr->filepath, dev_ptr->filepath, STRSIZE);
                        if (dev_ptr->filepath[0] != '/') {
                                strlcpy(buf, dev_ptr->filepath, MOUNTLEN);
                                snprintf(dev_ptr->filepath, MOUNTLEN, "/%s",
                                    buf);
                        }
                        if (dev_ptr->filepath[strlen(dev_ptr->filepath) - 1]
                            == '/')
                                dev_ptr->filepath[strlen(dev_ptr->filepath)
                                     - 1] = '\0';
                        return 0;
                case PMV_MENU_EXIST:
                        dev_ptr->is_exist = !dev_ptr->is_exist;
                        return 0;
                case PMV_MENU_SIZE:
                        if (dev_ptr->is_exist)
                                return 0;

                        pm_edit_size_value(MSG_vnd_size_ask,
                            pm->sectorsize, pm->dlcylsize,
                            &dev_ptr->size);

                        break;
                case PMV_MENU_RO:
                        dev_ptr->readonly = !dev_ptr->readonly;
                        return 0;
                case PMV_MENU_MGEOM:
                        if (dev_ptr->is_exist)
                                return 0;
                        dev_ptr->manual_geom = !dev_ptr->manual_geom;
                        return 0;
                case PMV_MENU_SECSIZE:
                        if (!dev_ptr->manual_geom || dev_ptr->is_exist)
                                return 0;
                        msg_to_show = MSG_vnd_bps_ask;
                        out_var = &(dev_ptr->secsize);
                        break;
                case PMV_MENU_NSECTORS:
                        if (!dev_ptr->manual_geom || dev_ptr->is_exist)
                                return 0;
                        msg_to_show = MSG_vnd_spt_ask;
                        out_var = &(dev_ptr->nsectors);
                        break;
                case PMV_MENU_NTRACKS:
                        if (!dev_ptr->manual_geom || dev_ptr->is_exist)
                                return 0;
                        msg_to_show = MSG_vnd_tpc_ask;
                        out_var = &(dev_ptr->ntracks);
                        break;
                case PMV_MENU_NCYLINDERS:
                        if (!dev_ptr->manual_geom || dev_ptr->is_exist)
                                return 0;
                        msg_to_show = MSG_vnd_cyl_ask;
                        out_var = &(dev_ptr->ncylinders);
                        break;
                case PMV_MENU_REMOVE:
                        dev_ptr->enabled = 0;
                        return 0;
        }
        if (out_var == NULL || msg_to_show == NULL)
                return -1;
        snprintf(buf, SSTRSIZE, "%d", *out_var);
        msg_prompt_win(msg_to_show, -1, 18, 0, 0, buf, buf, SSTRSIZE);
        if (atoi(buf) >= 0)
                *out_var = atoi(buf);
        return 0;
}

static void
pm_vnd_init(void *arg, void *none)
{
        struct vnd_desc *dev_ptr = arg;
        memset(dev_ptr, 0, sizeof(*dev_ptr));
        *dev_ptr = (struct vnd_desc) {
                .enabled = 1,
                .blocked = 0,
                .filepath[0] = '\0',
                .is_exist = 0,
                .size = 1024,
                .readonly = 0,
                .manual_geom = 0,
                .secsize = 512,
                .nsectors = 18,
                .ntracks = 2,
                .ncylinders = 80
        };
}

static int
pm_vnd_check(void *arg)
{
        struct vnd_desc *dev_ptr = arg;

        if (dev_ptr->blocked)
                return 0;
        if (strlen(dev_ptr->filepath) < 1 ||
                        dev_ptr->size < 1)
                dev_ptr->enabled = 0;
        else {
                pm_manage_getfreenode(&(dev_ptr->node), "vnd", &vnds_t_info);
                if (dev_ptr->node < 0)
                        dev_ptr->enabled = 0;
        }
        return dev_ptr->enabled;
}

/* XXX: vndconfig always return 0? */
static int
pm_vnd_commit(void)
{
        int i, error;
        char r_o[3], buf[MOUNTLEN+3], resultpath[STRSIZE];
        const char *mpath, *mp_suit = NULL, *rp;
        struct pm_devs *pm_i, *pm_suit = NULL;
        part_id id, part_suit = NO_PART;
        struct disk_part_info info;

        if (!have_vnd)
                return 0;
        for (i = 0; i < MAX_VND; i++) {
                error = 0;
                if (! pm_vnd_check(&vnds[i]))
                        continue;

                /* Trying to assign target device */
                SLIST_FOREACH(pm_i, &pm_head, l) {
                        for (id = 0; id < pm_i->parts->num_part; id++) {
                                if (!pm_i->parts->pscheme->get_part_info(
                                    pm_i->parts, id, &info))
                                        continue;
                                if (info.flags & (PTI_SEC_CONTAINER|
                                    PTI_WHOLE_DISK|PTI_PSCHEME_INTERNAL|
                                    PTI_RAW_PART))
                                        continue;
                                if (info.last_mounted == NULL ||
                                    info.last_mounted[0] == 0)
                                        continue;
                                mpath = info.last_mounted;
                                strcpy(buf, mpath);
                                if (buf[strlen(buf)-1] != '/')
                                        strcat(buf, "/");
                                if (strstr(vnds[i].filepath, buf) !=
                                    vnds[i].filepath)
                                        continue;
                                if (part_suit == NO_PART || pm_suit == NULL ||
                                    strlen(buf) > strlen(mp_suit)) {
                                        part_suit = id;
                                        pm_suit = pm_i;
                                        mp_suit = mpath;
                                }
                        }
                }
                if (part_suit == NO_PART || pm_suit == NULL ||
                   mp_suit == NULL)
                        continue;

                /* Mounting assigned partition and try to get real file path*/
                if (pm_mount(pm_suit, part_suit) != 0)
                        continue;
                rp = pm_get_mount(pm_suit, part_suit);
                snprintf(resultpath, STRSIZE, "%s/%s",
                        rp,
                        &(vnds[i].filepath[strlen(rp)]));

                strcpy(r_o, vnds[i].readonly?"-r":"");
                /* If this is a new image */
                if (!vnds[i].is_exist) {
                        run_program(RUN_DISPLAY | RUN_PROGRESS, "mkdir -p %s ",
                            dirname(resultpath));
                        if (error == 0)
                                error = run_program(RUN_DISPLAY | RUN_PROGRESS,
                                    "dd if=/dev/zero of=%s bs=1m "
                                    "count=% " PRIi64 " progress=100 "
                                    "msgfmt=human",
                                    resultpath, vnds[i].size*(MEG/512));
                }
                if (error)
                        continue;

                /* If this is a new image with manual geometry */
                if (!vnds[i].is_exist && vnds[i].manual_geom)
                        error = run_program(RUN_DISPLAY | RUN_PROGRESS,
                            "vndconfig %s vnd%d %s %d %d %d %d",
                            r_o, vnds[i].node,
                            resultpath, vnds[i].secsize,
                            vnds[i].nsectors,
                            vnds[i].ntracks, vnds[i].ncylinders);
                else
                        /* If this is a existing image or image without manual
                         * geometry */
                        error = run_program(RUN_DISPLAY | RUN_PROGRESS,
                            "vndconfig %s vnd%d %s",
                            r_o, vnds[i].node, resultpath);

                if (error == 0) {
                        vnds[i].blocked = 1;
                        vnds[i].pm_part = part_suit;
                        vnds[i].pm = pm_suit;
                        vnds[i].pm->blocked++;
                }
        }
        return 0;
}

/***
 CGD
 ***/

static void
pm_cgd_menufmt(menudesc *m, int opt, void *arg)
{
        struct cgd_desc *dev_ptr = ((struct part_entry *)arg)[opt].dev_ptr;
        char desc[STRSIZE];
        struct disk_part_info info;

        if (dev_ptr->enabled == 0)
                return;
        if (dev_ptr->pm == NULL)
                wprintw(m->mw, "%s", msg_string(MSG_cgd_err_menufmt));
        else {
                snprintf(desc, sizeof desc, "cgd%d (%s-%d)",
                    dev_ptr->node, dev_ptr->enc_type, dev_ptr->key_size);
                dev_ptr->pm->parts->pscheme->get_part_info(dev_ptr->pm->parts,
                    dev_ptr->pm_part, &info);
                pm_fmt_disk_line(m->mw, desc, dev_ptr->pm_name,
                    info.size, NULL);
        }
}

static void
pm_cgd_edit_menufmt(menudesc *m, int opt, void *arg)
{
        struct cgd_desc *dev_ptr = arg;
        switch (opt) {
                case PMC_MENU_DEV:
                        wprintw(m->mw, "%-15s: %s",
                            msg_string(MSG_cgd_dev_fmt), dev_ptr->pm_name);
                        break;
                case PMC_MENU_ENCTYPE:
                        wprintw(m->mw, "%-15s: %s",
                            msg_string(MSG_cgd_enc_fmt), dev_ptr->enc_type);
                        break;
                case PMC_MENU_KEYSIZE:
                        wprintw(m->mw, "%-15s: %d",
                            msg_string(MSG_cgd_key_fmt), dev_ptr->key_size);
                        break;
                case PMC_MENU_IVTYPE:
                        wprintw(m->mw, "%-15s: %s",
                            msg_string(MSG_cgd_iv_fmt), dev_ptr->iv_type);
                        break;
                case PMC_MENU_KEYGENTYPE:
                        wprintw(m->mw, "%-15s: %s",
                            msg_string(MSG_cgd_keygen_fmt), dev_ptr->keygen_type);
                        break;
                case PMC_MENU_VERIFYTYPE:
                        wprintw(m->mw, "%-15s: %s",
                            msg_string(MSG_cgd_verif_fmt), dev_ptr->verify_type);
                        break;
        }
}

static int
pm_cgd_set_value(menudesc *m, void *arg)
{
        char *retstring;
        struct cgd_desc *dev_ptr = arg;

        switch (m->cursel) {
                case PMC_MENU_DEV:
                        pm_cgd_disk_set(dev_ptr, NULL);
                        return 0;
                case PMC_MENU_ENCTYPE:
                        process_menu(MENU_cgd_enctype, &retstring);
                        dev_ptr->enc_type = retstring;
                        if (! strcmp(retstring, "aes-xts"))
                                dev_ptr->key_size = 256;
                        if (! strcmp(retstring, "aes-cbc"))
                                dev_ptr->key_size = 192;
                        if (! strcmp(retstring, "blowfish-cbc"))
                                dev_ptr->key_size = 128;
                        if (! strcmp(retstring, "3des-cbc"))
                                dev_ptr->key_size = 192;
                        return 0;
                case PMC_MENU_KEYSIZE:
                        if (! strcmp(dev_ptr->enc_type, "aes-xts"))
                                dev_ptr->key_size +=
                                        (dev_ptr->key_size < 512)? 256 : -256;
                        if (! strcmp(dev_ptr->enc_type, "aes-cbc"))
                                dev_ptr->key_size +=
                                        (dev_ptr->key_size < 256)? 64 : -128;
                        if (! strcmp(dev_ptr->enc_type, "blowfish-cbc"))
                                dev_ptr->key_size = 128;
                        if (! strcmp(dev_ptr->enc_type, "3des-cbc"))
                                dev_ptr->key_size = 192;
                        return 0;
                case PMC_MENU_IVTYPE:
                        process_menu(MENU_cgd_ivtype, &retstring);
                        dev_ptr->iv_type = retstring;
                        return 0;
                case PMC_MENU_KEYGENTYPE:
                        process_menu(MENU_cgd_keygentype, &retstring);
                        dev_ptr->keygen_type = retstring;
                        return 0;
                case PMC_MENU_VERIFYTYPE:
                        process_menu(MENU_cgd_verifytype, &retstring);
                        dev_ptr->verify_type = retstring;
                        return 0;
                case PMC_MENU_REMOVE:
                        dev_ptr->enabled = 0;
                        return 0;
        }
        return -1;
}

static void
pm_cgd_init(void *arg1, void *arg2)
{
        struct cgd_desc *dev_ptr = arg1;
        struct part_entry *disk_entrie = arg2;

        memset(dev_ptr, 0, sizeof(*dev_ptr));
        *dev_ptr = (struct cgd_desc) {
                .enabled = 1,
                .blocked = 0,
                .pm = NULL,
                .pm_name[0] = '\0',
                .pm_part = 0,
                .keygen_type = "pkcs5_pbkdf2/sha1",
                .verify_type = "disklabel",
                .enc_type = "aes-xts",
                .iv_type = "encblkno1",
                .key_size = 256,
        };
        if (disk_entrie != NULL) {
                disk_entrie->parts->pscheme->get_part_device(
                    disk_entrie->parts,  disk_entrie->id,
                    disk_entrie->fullname, sizeof(disk_entrie->fullname),
                    NULL, logical_name, false, true);
                pm_cgd_disk_set(dev_ptr, disk_entrie);
        }
}

static int
pm_cgd_check(void *arg)
{
        struct cgd_desc *dev_ptr = arg;

        if (dev_ptr->blocked)
                return 0;
        if (dev_ptr->pm == NULL)
                dev_ptr->enabled = 0;
        else {
                pm_manage_getfreenode(&(dev_ptr->node), "cgd", &cgds_t_info);
                if (dev_ptr->node < 0)
                        dev_ptr->enabled = 0;
        }
        return dev_ptr->enabled;
}

static int
pm_cgd_disk_set(struct cgd_desc *dev_ptr, struct part_entry *disk_entrie)
{
        int alloc_disk_entrie = 0;

        if (disk_entrie == NULL) {
                alloc_disk_entrie = 1;
                disk_entrie = malloc (sizeof(struct part_entry));
                if (disk_entrie == NULL)
                        return -2;
                *disk_entrie = pm_dev_list(PM_CGD);
                if (pm_retvalue < 0) {
                        free(disk_entrie);
                        return -1;
                }
        }
        dev_ptr->pm = disk_entrie->dev_ptr;
        dev_ptr->pm_part = disk_entrie->id;
        strlcpy(dev_ptr->pm_name, disk_entrie->fullname, SSTRSIZE);

        if (alloc_disk_entrie)
                free(disk_entrie);
        return 0;
}

int
pm_cgd_edit_new(struct pm_devs *mypm, part_id id)
{
        struct part_entry pe = { .id = id, .parts = mypm->parts,
            .dev_ptr = mypm, .type = PM_CGD };

        return pm_edit(PMC_MENU_END, pm_cgd_edit_menufmt,
                pm_cgd_set_value, pm_cgd_check, pm_cgd_init,
                &pe, NULL, 0, &cgds_t_info);
}

int
pm_cgd_edit_old(struct part_entry *pe)
{
        return pm_edit(PMC_MENU_END, pm_cgd_edit_menufmt,
                pm_cgd_set_value, pm_cgd_check, pm_cgd_init,
                pe->dev_ptr != NULL ? pe : NULL,
                pe->dev_ptr, 0, &cgds_t_info);
}

static int
pm_cgd_commit(void)
{
        char devname[STRSIZE];
        int i, error = 0;

        if (!have_cgd)
                return 0;
        for (i = 0; i < MAX_CGD; i++) {
                if (! pm_cgd_check(&cgds[i]))
                        continue;
                if (run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "cgdconfig -g -V %s -i %s -k %s -o /tmp/cgd.%d.conf"
                        " %s %d", cgds[i].verify_type,
                        cgds[i].iv_type, cgds[i].keygen_type, cgds[i].node,
                        cgds[i].enc_type, cgds[i].key_size) != 0) {
                        error++;
                        continue;
                }
                if (cgds[i].pm != NULL && cgds[i].pm->parts != NULL) {
                        /* wedge device names may have changed */
                        cgds[i].pm->parts->pscheme->get_part_device(
                            cgds[i].pm->parts, cgds[i].pm_part,
                            devname, sizeof devname, NULL,
                            logical_name, true, true);
                        cgds[i].pm->parts->pscheme->get_part_device(
                            cgds[i].pm->parts, cgds[i].pm_part,
                            cgds[i].pm_name, sizeof cgds[i].pm_name, NULL,
                            plain_name, false, true);
                } else {
                        continue;
                }
                if (run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "cgdconfig -V re-enter cgd%d '%s' /tmp/cgd.%d.conf",
                        cgds[i].node, devname, cgds[i].node) != 0) {
                        error++;
                        continue;
                }
                cgds[i].pm->blocked++;
                cgds[i].blocked = 1;
        }
        return error;
}

/***
 LVM
 ***/

/* Add lvm logical volumes to pm list */
/* XXX: rewrite */
static void
pm_lvm_find(void)
{
        int i, ii, already_found;
        char dev[STRSIZE];
        struct pm_devs *pm_i;

        for (i = 0; i < MAX_LVM_VG; i++) {
                if (! lvms[i].blocked)
                        continue;
                for (ii = 0; ii < MAX_LVM_LV; ii++) {
                        if (! lvms[i].lv[ii].blocked || lvms[i].lv[ii].size < 1)
                                continue;
                        snprintf(dev, STRSIZE, "%s/%s", lvms[i].name,
                            lvms[i].lv[ii].name);
                        already_found = 0;
                        SLIST_FOREACH(pm_i, &pm_head, l)
                                if (!already_found && strcmp(pm_i->diskdev,
                                    dev) == 0) {
                                        pm_i->found = 1;
                                        already_found = 1;
                                }
                        if (already_found)
                                /* We already added this device, skipping */
                                continue;
                        pm_new->found = 1;
                        pm_new->ptstart = 0;
                        pm_new->ptsize = 0;
                        pm_new->no_part = true;
                        pm_new->refdev = &lvms[i].lv[ii];
                        pm_new->sectorsize = 1;
                        pm_new->dlcylsize = MEG;
                        strlcpy(pm_new->diskdev, dev, SSTRSIZE);
                        strlcpy(pm_new->diskdev_descr, dev, STRSIZE);

                        if (SLIST_EMPTY(&pm_head))
                                 SLIST_INSERT_HEAD(&pm_head, pm_new, l);
                        else
                                 SLIST_INSERT_AFTER(pm_i, pm_new, l);
                        pm_new = malloc(sizeof (struct pm_devs));
                        memset(pm_new, 0, sizeof *pm_new);
                }
        }
}

static int
pm_lvm_disk_add(menudesc *m, void *arg)
{
        int i;
        lvms_t *dev_ptr = arg;
        struct part_entry disk_entrie = pm_dev_list(PM_LVM);
        if (pm_retvalue < 0)
                return pm_retvalue;

        for (i = 0; i < MAX_LVM_PV; i++) {
                if (dev_ptr->pv[i].pm == NULL) {
                        dev_ptr->pv[i].pm = disk_entrie.dev_ptr;
                        dev_ptr->pv[i].pm_part = disk_entrie.id;
                        strlcpy(dev_ptr->pv[i].pm_name, disk_entrie.fullname,
                            sizeof(dev_ptr->pv[i].pm_name));
                        break;
                }
        }
        pm_retvalue = 1;
        return 0;
}

static int
pm_lvm_disk_del(menudesc *m, void *arg)
{
        int retvalue = -1, num_devs = 0;
        size_t i;
        int menu_no;
        lvms_t *dev_ptr = arg;
        menu_ent menu_entries[MAX_LVM_PV];
        struct part_entry submenu_args[MAX_LVM_PV];

        for (i = 0; i < MAX_LVM_PV; i++) {
                if (dev_ptr->pv[i].pm == NULL)
                        continue;
                menu_entries[num_devs] = (struct menu_ent) {
                        .opt_name = dev_ptr->pv[i].pm_name,
                        .opt_action = set_menu_select,
                        .opt_flags = OPT_EXIT,
                };
                submenu_args[num_devs].index = i;
                num_devs++;
        }

        menu_no = new_menu(MSG_lvm_disks,
                menu_entries, num_devs, -1, -1,
                (num_devs+1<3)?3:num_devs+1, 13,
                MC_SCROLL | MC_NOCLEAR, NULL, NULL, NULL, NULL, MSG_cancel);
        if (menu_no == -1)
                return -1;
        process_menu(menu_no, &retvalue);
        free_menu(menu_no);

        if (retvalue < 0 || retvalue >= num_devs)
                return -1;

        dev_ptr->pv[submenu_args[retvalue].index].pm = NULL;

        return 0;
}

static void
pm_lvm_menufmt(menudesc *m, int opt, void *arg)
{
        int i, ok = 0;
        daddr_t used_size = 0;
        char buf1[STRSIZE]; buf1[0] = 0;
        char buf2[STRSIZE]; buf2[0] = 0;
        char devs[STRSIZE]; devs[0] = 0;
        lvms_t *dev_ptr = ((struct part_entry *)arg)[opt].dev_ptr;

        if (dev_ptr->enabled == 0)
                return;
        snprintf(buf1, STRSIZE, "VG '%s'", dev_ptr->name);
        for (i = 0; i < MAX_LVM_PV; i++)
                if (dev_ptr->pv[i].pm != NULL) {
                        strlcat(devs, dev_ptr->pv[i].pm_name, STRSIZE);
                        strlcat(devs, " ", STRSIZE);
                        ok = 1;
                }
        for (i = 0; i < MAX_LVM_LV; i++)
                used_size += dev_ptr->lv[i].size;
        if (ok) {
                snprintf(buf2, STRSIZE, "%" PRIi64 "/%" PRIi64,
                        dev_ptr->total_size - used_size, dev_ptr->total_size);
                pm_fmt_disk_line(m->mw, buf1, devs, 0, buf2);
        } else {
                pm_fmt_disk_line(m->mw, buf1, NULL, 0,
                    msg_string(MSG_lvm_err_menufmt));
        }
}

static void
pm_lvm_edit_menufmt(menudesc *m, int opt, void *arg)
{
        int i;
        char buf[STRSIZE];
        lvms_t *dev_ptr = arg;
        strlcpy(buf, msg_string(MSG_auto), sizeof buf);

        switch (opt) {
                case PML_MENU_PV:
                        buf[0] = '\0';
                        for (i = 0; i < MAX_LVM_PV; i++) {
                                if (dev_ptr->pv[i].pm != NULL) {
                                        strlcat(buf, " ", sizeof buf);
                                        strlcat(buf, dev_ptr->pv[i].pm_name,
                                            sizeof buf);
                                }
                        }
                        wprintw(m->mw, "%-20s: %s",
                             msg_string(MSG_lvm_disks_fmt), buf);
                        break;
                case PML_MENU_NAME:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvm_name_fmt), dev_ptr->name);
                        break;
                case PML_MENU_MAXLOGICALVOLUMES:
                        if (dev_ptr->maxlogicalvolumes > 0)
                                snprintf(buf, STRSIZE, "%d",
                                    dev_ptr->maxlogicalvolumes);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvm_maxlv_fmt), buf);
                        break;
                case PML_MENU_MAXPHYSICALVOLUMES:
                        if (dev_ptr->maxphysicalvolumes > 0)
                                snprintf(buf, STRSIZE, "%d",
                                    dev_ptr->maxphysicalvolumes);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvm_maxpv_fmt), buf);
                        break;
                case PML_MENU_PHYSICALEXTENTSIZE:
                        if (dev_ptr->physicalextentsize > 0)
                                snprintf(buf, STRSIZE, "%dM",
                                    dev_ptr->physicalextentsize);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvm_extsiz_fmt), buf);
                        break;
        }
}

static int
pm_lvm_set_value(menudesc *m, void *arg)
{
        char buf[STRSIZE];
        const char *msg_to_show = NULL;
        int *out_var = NULL;
        lvms_t *dev_ptr = arg;

        static menu_ent menuent_disk_adddel[] = {
            { .opt_name=MSG_add, .opt_flags=OPT_EXIT,
              .opt_action=pm_lvm_disk_add },
            { .opt_name=MSG_remove, .opt_flags=OPT_EXIT,
              .opt_action=pm_lvm_disk_del }
        };
        static int menu_disk_adddel = -1;
        if (menu_disk_adddel == -1) {
                menu_disk_adddel = new_menu(NULL, menuent_disk_adddel,
                        __arraycount(menuent_disk_adddel),
                        -1, -1, 0, 10, MC_NOCLEAR, NULL, NULL, NULL, NULL,
                        MSG_cancel);
        }

        switch (m->cursel) {
                case PML_MENU_PV:
                        process_menu(menu_disk_adddel, arg);
                        return 0;
                case PML_MENU_NAME:
                        msg_prompt_win(MSG_lvm_name_ask, -1, 18, 0, 0,
                            dev_ptr->name, dev_ptr->name, SSTRSIZE);
                        return 0;
                case PML_MENU_MAXLOGICALVOLUMES:
                        msg_to_show = MSG_lvm_maxlv_ask;
                        out_var = &(dev_ptr->maxlogicalvolumes);
                        break;
                case PML_MENU_MAXPHYSICALVOLUMES:
                        msg_to_show = MSG_lvm_maxpv_ask;
                        out_var = &(dev_ptr->maxphysicalvolumes);
                        break;
                case PML_MENU_PHYSICALEXTENTSIZE:
                        msg_to_show = MSG_lvm_extsiz_ask;
                        out_var = &(dev_ptr->physicalextentsize);
                        break;
                case PML_MENU_REMOVE:
                        dev_ptr->enabled = 0;
                        return 0;
        }
        if (out_var == NULL || msg_to_show == NULL)
                return -1;
        snprintf(buf, SSTRSIZE, "%d", *out_var);
        msg_prompt_win(msg_to_show, -1, 18, 0, 0, buf, buf, SSTRSIZE);
        if (atoi(buf) >= 0)
                *out_var = atoi(buf);
        return 0;
}

static void
pm_lvm_init(void *arg, void* none)
{
        lvms_t *dev_ptr = arg;

        memset(dev_ptr, 0, sizeof *dev_ptr);
        *dev_ptr = (struct lvms_t) {
                .enabled = 1,
                .blocked = 0,
                .maxlogicalvolumes = MAX_LVM_PV,
                .maxphysicalvolumes = MAX_LVM_LV,
                .physicalextentsize = -1,
        };
        sprintf(dev_ptr->name, "vg%.2d", rand()%100);
}

static int
pm_lvm_check(void *arg)
{
        size_t i;
        bool ok = false;
        lvms_t *dev_ptr = arg;
        dev_ptr->total_size = 0;
        struct disk_part_info info;

        for (i = 0; i < MAX_LVM_PV; i++) {
                if (dev_ptr->pv[i].pm != NULL) {
                        if (!dev_ptr->pv[i].pm->parts->pscheme->get_part_info(
                            dev_ptr->pv[i].pm->parts, dev_ptr->pv[i].pm_part,
                            &info))
                                continue;
                        ok = 1;
                        dev_ptr->total_size += info.size;
                }
        }
        if (!ok)
                dev_ptr->enabled = 0;
        return dev_ptr->enabled;
}

static void
pm_lvmlv_menufmt(menudesc *m, int opt, void *arg)
{
        char buf[STRSIZE];
        lv_t *dev_ptr = ((struct part_entry *)arg)[opt].dev_ptr;

        if (dev_ptr->size > 0) {
                snprintf(buf, STRSIZE, "'%s'", dev_ptr->name);
                pm_fmt_disk_line(m->mw, buf, NULL, dev_ptr->size, NULL);
        }
}

static void
pm_lvmlv_edit_menufmt(menudesc *m, int opt, void *arg)
{

        lv_t *dev_ptr = arg;
        char buf[STRSIZE];
        strlcpy(buf, msg_string(MSG_auto), STRSIZE);

        switch (opt) {
                case PMLV_MENU_NAME:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_name_fmt), dev_ptr->name);
                        break;
                case PMLV_MENU_SIZE:
                        wprintw(m->mw, "%-20s: %" PRIi64,
                            msg_string(MSG_lvmlv_size_fmt), dev_ptr->size);
                        break;
                case PMLV_MENU_READONLY:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_ro_fmt),
                            dev_ptr->readonly? msg_string(MSG_Yes) : msg_string(MSG_No));
                        break;
                case PMLV_MENU_CONTIGUOUS:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_cont_fmt),
                            dev_ptr->contiguous? msg_string(MSG_Yes) : msg_string(MSG_No));
                        break;
                case PMLV_MENU_EXTENTS:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_extnum_fmt),
                            (strlen(dev_ptr->extents) > 0) ?
                            dev_ptr->extents : msg_string(MSG_auto));
                        break;
                case PMLV_MENU_MINOR:
                        if (dev_ptr->minor > 0)
                                snprintf(buf, STRSIZE, "%dK", dev_ptr->minor);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_minor_fmt), buf);
                        break;
                case PMLV_MENU_MIRRORS:
                        wprintw(m->mw, "%-20s: %d",
                            msg_string(MSG_lvmlv_mirrors_fmt),
                            dev_ptr->mirrors);
                        break;
                case PMLV_MENU_REGIONSIZE:
                        if (dev_ptr->regionsize > 0)
                                snprintf(buf, STRSIZE, "%dM",
                                    dev_ptr->regionsize);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_regsiz_fmt), buf);
                        break;
                case PMLV_MENU_PERSISTENT:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_pers_fmt),
                            dev_ptr->persistent ?
                            msg_string(MSG_Yes) : msg_string(MSG_No));
                        break;
                case PMLV_MENU_READAHEAD:
                        if (dev_ptr->readahead > 0)
                                snprintf(buf, STRSIZE, "%d",
                                    dev_ptr->readahead);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_readahsect_fmt), buf);
                        break;
                case PMLV_MENU_STRIPES:
                        if (dev_ptr->stripes > 0)
                                snprintf(buf, STRSIZE, "%d", dev_ptr->stripes);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_stripes_fmt), buf);
                        break;
                case PMLV_MENU_STRIPESIZE:
                        if (dev_ptr->stripesize > 0)
                                snprintf(buf, STRSIZE, "%dK", dev_ptr->stripesize);
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_stripesiz_fmt), buf);
                        break;
                case PMLV_MENU_ZERO:
                        wprintw(m->mw, "%-20s: %s",
                            msg_string(MSG_lvmlv_zero_fmt),
                            dev_ptr->zero ?
                            msg_string(MSG_Yes) : msg_string(MSG_No));
                        break;
        }
}

static int
pm_lvmlv_set_value(menudesc *m, void *arg)
{
        char buf[STRSIZE];
        const char *msg_to_show = NULL;
        int *out_var = NULL;
        lv_t *dev_ptr = arg;

        switch (m->cursel) {
                case PMLV_MENU_NAME:
                        msg_prompt_win(MSG_lvmlv_name_ask, -1, 18, 0, 0,
                            dev_ptr->name, dev_ptr->name, SSTRSIZE);
                        return 0;
                case PMLV_MENU_SIZE:
                        pm_edit_size_value(MSG_lvmlv_size_ask,
                            pm->sectorsize, pm->dlcylsize,
                            &dev_ptr->size); /* XXX cylsize? */
                        break;
                case PMLV_MENU_READONLY:
                        dev_ptr->readonly = !dev_ptr->readonly;
                        return 0;
                case PMLV_MENU_CONTIGUOUS:
                        dev_ptr->contiguous = !dev_ptr->contiguous;
                        return 0;
                case PMLV_MENU_EXTENTS:
                        msg_prompt_win(MSG_lvmlv_extnum_ask, -1, 18, 0, 0,
                            dev_ptr->extents, dev_ptr->extents, SSTRSIZE);
                        return 0;
                case PMLV_MENU_MINOR:
                        msg_to_show = MSG_lvmlv_minor_ask;
                        out_var = &(dev_ptr->minor);
                        break;
                case PMLV_MENU_MIRRORS:
                        msg_to_show = MSG_lvmlv_mirrors_ask;
                        out_var = &(dev_ptr->mirrors);
                        break;
                case PMLV_MENU_REGIONSIZE:
                        msg_to_show = MSG_lvmlv_regsiz_ask;
                        out_var = &(dev_ptr->regionsize);
                        break;
                case PMLV_MENU_PERSISTENT:
                        dev_ptr->persistent = !dev_ptr->persistent;
                        return 0;
                case PMLV_MENU_READAHEAD:
                        msg_to_show = MSG_lvmlv_readahsect_ask;
                        out_var = &(dev_ptr->readahead);
                        break;
                case PMLV_MENU_STRIPES:
                        msg_to_show = MSG_lvmlv_stripes_ask;
                        out_var = &(dev_ptr->stripes);
                        break;
                case PMLV_MENU_STRIPESIZE:
                        if (dev_ptr->stripesize << 1 > 512)
                                dev_ptr->stripesize = 4;
                        else
                                dev_ptr->stripesize <<= 1;
                        return 0;
                case PMLV_MENU_ZERO:
                        dev_ptr->zero = !dev_ptr->zero;
                        return 0;
                case PMLV_MENU_REMOVE:
                        dev_ptr->size = 0;
                        return 0;
        }
        if (out_var == NULL || msg_to_show == NULL)
                return -1;
        snprintf(buf, SSTRSIZE, "%d", *out_var);
        msg_prompt_win(msg_to_show, -1, 18, 0, 0, buf, buf, SSTRSIZE);
        if (atoi(buf) >= 0)
                *out_var = atoi(buf);
        return 0;
}

static void
pm_lvmlv_init(void *arg, void *none)
{
        lv_t *dev_ptr = arg;
        memset(dev_ptr, 0, sizeof *(dev_ptr));
        *dev_ptr = (struct lv_t) {
                .blocked = 0,
                .size = 1024,
                .stripesize = 64,
        };
        sprintf (dev_ptr->name, "lvol%.2d", rand()%100);
}

static int
pm_lvmlv_check(void *arg)
{
        lv_t *dev_ptr = arg;
        if (dev_ptr->size > 0 && strlen(dev_ptr->name) > 0)
                return 1;
        else {
                dev_ptr->size = 0;
                return 0;
        }
}

static int
pm_lvm_commit(void)
{
        int i, ii, error;
        uint used_size = 0;
        char params[STRSIZE*3], devs[STRSIZE*3], arg[STRSIZE];

        if (!have_lvm)
                return 0;
        for (i = 0; i < MAX_LVM_VG; i++) {
                /* Stage 0: checks */
                if (! pm_lvm_check(&lvms[i]))
                        continue;
                for (ii = 0; ii < MAX_LVM_LV; ii++)
                        used_size += lvms[i].lv[ii].size;
                if (used_size > lvms[i].total_size)
                        continue;

                params[0] = '\0';
                devs[0] = '\0';
                error = 0;
                /* Stage 1: creating Physical Volumes (PV's) */
                for (ii = 0; ii < MAX_LVM_PV && ! error; ii++)
                        if (lvms[i].pv[ii].pm != NULL) {
                                run_program(RUN_SILENT | RUN_ERROR_OK,
                                    "lvm pvremove -ffy /dev/r%s",
                                    (char*)lvms[i].pv[ii].pm_name);
                                error += run_program(RUN_DISPLAY | RUN_PROGRESS,
                                    "lvm pvcreate -ffy /dev/r%s",
                                    (char*)lvms[i].pv[ii].pm_name);
                                if (error)
                                        break;
                                strlcat(devs, " /dev/r", sizeof devs);
                                strlcat(devs, lvms[i].pv[ii].pm_name,
                                    sizeof devs);
                        }
                if (error)
                        continue;
                /* Stage 2: creating Volume Groups (VG's) */
                if (lvms[i].maxlogicalvolumes > 0) {
                        snprintf(arg, sizeof arg, " -l %d",
                            lvms[i].maxlogicalvolumes);
                        strlcat(params, arg, sizeof params);
                }
                if (lvms[i].maxphysicalvolumes > 0) {
                        snprintf(arg, sizeof arg, " -p %d",
                            lvms[i].maxphysicalvolumes);
                        strlcat(params, arg, sizeof params);
                }
                if (lvms[i].physicalextentsize > 0) {
                        snprintf(arg, sizeof arg, " -s %d",
                            lvms[i].physicalextentsize);
                        strlcat(params, arg, sizeof params);
                }
                error += run_program(RUN_DISPLAY | RUN_PROGRESS,
                    "lvm vgcreate %s %s %s", params, lvms[i].name, devs);
                if (error)
                        continue;
                /* Stage 3: creating Logical Volumes (LV's) */
                for (ii = 0; ii < MAX_LVM_LV; ii++) {
                        if (lvms[i].lv[ii].size <= 0)
                                continue;

                        params[0] = '\0';
                        snprintf(arg, sizeof arg, " -C %c",
                            lvms[i].lv[ii].contiguous?'y':'n');
                        strlcat(params, arg, sizeof params);
                        snprintf(arg, sizeof arg, " -M %c",
                            lvms[i].lv[ii].persistent?'y':'n');
                        strlcat(params, arg, sizeof params);
                        snprintf(arg, sizeof arg, " -p %s",
                            lvms[i].lv[ii].readonly?"r":"rw");
                        strlcat(params, arg, sizeof params);
                        snprintf(arg, sizeof arg, " -Z %c",
                            lvms[i].lv[ii].zero?'y':'n');
                        strlcat(params, arg, sizeof params);
                        if (strlen(lvms[i].lv[ii].name) > 0) {
                                snprintf(arg, sizeof arg, " -n %s",
                                    lvms[i].lv[ii].name);
                                strlcat(params, arg, sizeof params);
                        }
                        if (strlen(lvms[i].lv[ii].extents) > 0) {
                                snprintf(arg, sizeof arg, " -l %s",
                                    lvms[i].lv[ii].extents);
                                strlcat(params, arg, sizeof params);
                        }
                        if (lvms[i].lv[ii].minor > 0) {
                                snprintf(arg, sizeof arg, " --minor %d",
                                    lvms[i].lv[ii].minor);
                                strlcat(params, arg, sizeof params);
                        }
                        if (lvms[i].lv[ii].mirrors > 0) {
                                snprintf(arg, sizeof arg, " -m %d",
                                    lvms[i].lv[ii].mirrors);
                                strlcat(params, arg, sizeof params);
                                if (lvms[i].lv[ii].regionsize > 0) {
                                        snprintf(arg, sizeof arg, " -R %d",
                                             lvms[i].lv[ii].regionsize);
                                        strlcat(params, arg, sizeof params);
                                }
                        }
                        if (lvms[i].lv[ii].readahead > 0) {
                                snprintf(arg, sizeof arg, " -r %d",
                                    lvms[i].lv[ii].readahead);
                                strlcat(params, arg, sizeof params);
                        }
                        if (lvms[i].lv[ii].stripes > 0) {
                                snprintf(arg, sizeof arg, " -i %d",
                                    lvms[i].lv[ii].stripes);
                                strlcat(params, arg, sizeof params);
                                if (lvms[i].lv[ii].stripesize > 0) {
                                        snprintf(arg, sizeof arg, " -I %d",
                                            lvms[i].lv[ii].stripesize);
                                        strlcat(params, arg, sizeof params);
                                }
                        }
                        snprintf(arg, sizeof arg, " -L %" PRIi64 "M",
                            lvms[i].lv[ii].size);
                        strlcat(params, arg, sizeof params);

                        error += run_program(RUN_DISPLAY | RUN_PROGRESS,
                            "lvm lvcreate %s %s", params, lvms[i].name);
                }
                if (! error) {
                        lvms[i].blocked = 1;
                        for (ii = 0; ii < MAX_LVM_PV; ii++)
                                if (lvms[i].pv[ii].pm != NULL)
                                        lvms[i].pv[ii].pm->blocked++;
                        for (ii = 0; ii < MAX_LVM_LV; ii++)
                                if (lvms[i].lv[ii].size > 0)
                                        lvms[i].lv[ii].blocked = 1;
                }
        }

        return 0;
}

/***
 Partman generic functions
 ***/

int
pm_getrefdev(struct pm_devs *pm_cur)
{
        int i, ii, dev_num, num_devs, num_devs_s;
        char descr[MENUSTRSIZE], dev[MENUSTRSIZE] = "";

        pm_cur->refdev = NULL;
        if (have_cgd && strncmp(pm_cur->diskdev, "cgd", 3) == 0) {
                dev_num = pm_cur->diskdev[3] - '0';
                for (i = 0; i < MAX_CGD; i++)
                        if (cgds[i].blocked && cgds[i].node == dev_num) {
                                pm_cur->refdev = &cgds[i];
                                snprintf(descr, sizeof descr,
                                    " (%s, %s-%d)", cgds[i].pm_name,
                                    cgds[i].enc_type, cgds[i].key_size);
                                strlcat(pm_cur->diskdev_descr, descr,
                                    sizeof(pm_cur->diskdev_descr));
                                break;
                        }
        } else if (have_vnd && strncmp(pm_cur->diskdev, "vnd", 3) == 0) {
                dev_num = pm_cur->diskdev[3] - '0';
                for (i = 0; i < MAX_VND; i++)
                        if (vnds[i].blocked && vnds[i].node == dev_num) {
                                pm_cur->refdev = &vnds[i];
                                vnds[i].pm->parts->pscheme->get_part_device(
                                    vnds[i].pm->parts, vnds[i].pm_part,
                                    dev, sizeof dev, NULL, plain_name, false,
                                    true);
                                snprintf(descr, sizeof descr, " (%s, %s)",
                                    dev, vnds[i].filepath);
                                strlcat(pm_cur->diskdev_descr, descr,
                                    sizeof(pm_cur->diskdev_descr));
                                break;
                        }
        } else if (have_raid && strncmp(pm_cur->diskdev, "raid", 4) == 0) {
                dev_num = pm_cur->diskdev[4] - '0';
                for (i = 0; i < MAX_RAID; i++)
                        if (raids[i].blocked && raids[i].node == dev_num) {
                                pm_cur->refdev = &raids[i];
                                num_devs = 0; num_devs_s = 0;
                                for (ii = 0; ii < MAX_IN_RAID; ii++)
                                        if (raids[i].comp[ii].parts != NULL) {
                                                if(raids[i].comp[ii].is_spare)
                                                        num_devs_s++;
                                                else
                                                        num_devs++;
                                        }
                                snprintf(descr, sizeof descr,
                                    " (lvl %d, %d disks, %d spare)",
                                    raids[i].raid_level, num_devs,
                                    num_devs_s);
                                strlcat(pm_cur->diskdev_descr, descr,
                                    sizeof(pm_cur->diskdev_descr));
                                break;
                        }
        } else
                return -1;
        return 0;
}

/*
 * Enable/disable items in the extended partition disk/partition action
 * menu
 */
void
pmdiskentry_enable(menudesc *menu, struct part_entry *pe)
{
        int i;
        menu_ent *m;
        bool enable;

        for (i = 0; i < menu->numopts; i++) {
                m = &menu->opts[i];

                enable = false;
                if (m->opt_name == MSG_unconfig) {
                        if (pe->type == PM_DISK)
                                enable = ((struct pm_devs *)pe->dev_ptr)
                                    ->refdev != NULL;
                } else if (m->opt_name == MSG_undo) {
                        if (pe->type != PM_DISK)
                                continue;
                        enable = ((struct pm_devs *)pe->dev_ptr)->unsaved;
                } else if (m->opt_name == MSG_switch_parts) {
                        enable = pm_from_pe(pe)->parts != NULL;
                } else {
                        continue;
                }

                if (enable)
                        m->opt_flags &= ~OPT_IGNORE;
                else
                        m->opt_flags |= OPT_IGNORE;
        }
}

/* Detect that partition is in use */
int
pm_partusage(struct pm_devs *pm_cur, int part_num, int do_del)
{
        int i, ii, retvalue = 0;
        struct disk_part_info info;
        part_id id;

        if (pm_cur->parts == NULL)
                return -1;      /* nothing can be in use */

        if (part_num < 0) {
                /* Check all partitions on device */
                for (id = 0; id < pm_cur->parts->num_part; id++) {
                        if (!pm_cur->parts->pscheme->get_part_info(
                            pm_cur->parts, id, &info))
                                continue;
                        if (info.flags & (PTI_SEC_CONTAINER|
                            PTI_WHOLE_DISK|PTI_PSCHEME_INTERNAL|
                            PTI_RAW_PART))
                                continue;
                        retvalue += pm_partusage(pm_cur, id, do_del);
                }
                return retvalue;
        }

        id = (part_id)part_num;
        if (id >= pm_cur->parts->num_part)
                return 0;

        for (i = 0; have_cgd && i < MAX_CGD; i++)
                if (cgds[i].enabled &&
                        cgds[i].pm == pm_cur &&
                        cgds[i].pm_part == id) {
                        if (do_del) {
                                cgds[i].pm = NULL;
                                cgds[i].pm_name[0] = '\0';
                        }
                        return 1;
                }
        for (i = 0; have_raid && i < MAX_RAID; i++)
                for (ii = 0; ii < MAX_IN_RAID; ii++)
                        if (raids[i].enabled &&
                                raids[i].comp[ii].parts == pm_cur->parts &&
                                raids[i].comp[ii].id == id) {
                                        if (do_del)
                                                raids[i].comp[ii].parts = NULL;
                                        return 1;
                        }
        for (i = 0; have_lvm && i < MAX_LVM_VG; i++)
                for (ii = 0; ii < MAX_LVM_PV; ii++)
                        if (lvms[i].enabled &&
                                lvms[i].pv[ii].pm == pm_cur &&
                                lvms[i].pv[ii].pm_part == id) {
                                        if (do_del)
                                                lvms[i].pv[ii].pm = NULL;
                                        return 1;
                        }

        return 0;
}

static void
pm_destroy_one(struct pm_devs *pm_i)
{
        part_id i;

        if (pm_i->parts != NULL) {
                if (pm_i->mounted != NULL) {
                        for (i = 0; i < pm_i->parts->num_part; i++)
                                free(pm_i->mounted[i]);
                }

                pm_i->parts->pscheme->free(pm_i->parts);
        }
        free(pm_i);
}

/* Clean up removed devices */
static int
pm_clean(void)
{
        int count = 0;
        struct pm_devs *pm_i, *tmp;

        SLIST_FOREACH_SAFE(pm_i, &pm_head, l, tmp)
                if (! pm_i->found) {
                        count++;
                        SLIST_REMOVE(&pm_head, pm_i, pm_devs, l);
                        pm_destroy_one(pm_i);
                }
        return count;
}

/* Free all pm storage */
void
pm_destroy_all(void)
{
        struct pm_devs *pm_i, *tmp;

        if (pm_new != pm)
                pm_destroy_one(pm_new);
        SLIST_FOREACH_SAFE(pm_i, &pm_head, l, tmp) {
                SLIST_REMOVE(&pm_head, pm_i, pm_devs, l);
                pm_destroy_one(pm_i);
        }
}

void
pm_set_lvmpv(struct pm_devs *my_pm, part_id pno, bool add)
{
        size_t i;
        struct disk_part_info info;

        if (!my_pm->parts->pscheme->get_part_info(my_pm->parts, pno, &info))
                return;

        if (add) {
                for (i = 0; i < __arraycount(lvm_pvs); i++)
                        if (lvm_pvs[i].pm == NULL && lvm_pvs[i].start == 0)
                                break;
                if (i >= __arraycount(lvm_pvs))
                        return;
                lvm_pvs[i].pm = my_pm;
                lvm_pvs[i].start = info.start;
                return;
        } else {
                for (i = 0; i < __arraycount(lvm_pvs); i++)
                        if (lvm_pvs[i].pm == my_pm &&
                            lvm_pvs[i].start == info.start)
                                break;
                if (i >= __arraycount(lvm_pvs))
                        return;
                lvm_pvs[i].pm = NULL;
                lvm_pvs[i].start = 0;
        }
}

bool
pm_is_lvmpv(struct pm_devs *my_pm, part_id id,
    const struct disk_part_info *info)
{
        size_t i;

        for (i = 0; i < __arraycount(lvm_pvs); i++) {
                if (lvm_pvs[i].pm != my_pm)
                        continue;
                if (lvm_pvs[i].start == info->start)
                        return true;
        }

        return false;
}

void
pm_setfstype(struct pm_devs *pm_cur, part_id id, int fstype, int fs_subtype)
{
        struct disk_part_info info;

        if (!pm_cur->parts->pscheme->get_part_info(pm_cur->parts, id, &info))
                return;

        info.nat_type = pm_cur->parts->pscheme->get_fs_part_type(PT_root,
            fstype, fs_subtype);
        if (info.nat_type == NULL)
                return;
        info.fs_type = fstype;
        info.fs_sub_type = fs_subtype;
        pm_cur->parts->pscheme->set_part_info(pm_cur->parts, id, &info, NULL);
}

static void
pm_select(struct pm_devs *pm_devs_in)
{
        pm = pm_devs_in;
        if (logfp)
                (void)fprintf(logfp, "Partman device: %s\n", pm->diskdev);
}

void
pm_rename(struct pm_devs *pm_cur)
{
#if 0   // XXX - convert to custom attribute or handle similar
        pm_select(pm_cur);
        msg_prompt_win(MSG_packname, -1, 18, 0, 0, pm_cur->bsddiskname,
                pm_cur->bsddiskname, sizeof pm_cur->bsddiskname);
#ifndef NO_DISKLABEL
        (void) savenewlabel(pm_cur->bsdlabel, MAXPARTITIONS);
#endif
#endif
}

int
pm_editpart(int part_num)
{
        struct partition_usage_set pset = {};

        usage_set_from_parts(&pset, pm->parts);
        edit_ptn(&(struct menudesc){.cursel = part_num}, &pset);
        free_usage_set(&pset);
        if (checkoverlap(pm->parts)) {
                hit_enter_to_continue(MSG_cantsave, NULL);
                return -1;
        }
        pm->unsaved = 1;
        return 0;
}

/* Safe erase of disk */
void
pm_shred(struct part_entry *pe, int shredtype)
{
        const char *srcdev;
        char dev[SSTRSIZE];
        struct pm_devs *my_pm;

        my_pm = pe->dev_ptr;
        if (pe->type == PM_DISK) {
                snprintf(dev, sizeof dev,
                    _PATH_DEV "r%s%c", my_pm->diskdev, 'a' + RAW_PART);
                if (pe->parts != NULL) {
                        pe->parts->pscheme->free(pe->parts);
                        pe->parts = NULL;
                        my_pm->parts = NULL;
                }
        } else if (pe->type == PM_PART) {
                pe->parts->pscheme->get_part_device(pe->parts, pe->id,
                    dev, sizeof dev, NULL, raw_dev_name, true, true);
        }

        switch (shredtype) {
                case SHRED_ZEROS:
                        srcdev = _PATH_DEVZERO;
                        break;
                case SHRED_RANDOM:
                        srcdev = _PATH_URANDOM;
                        break;
                default:
                        return;
        }
        run_program(RUN_DISPLAY | RUN_PROGRESS,
            "progress -f %s -b 1m dd bs=1m of=%s", srcdev, dev);
        pm_partusage(my_pm, -1, 1);
}

#if 0 // XXX
static int
pm_mountall_sort(const void *a, const void *b)
{
        return strcmp(mnts[*(const int *)a].on, mnts[*(const int *)b].on);
}
#endif

#if 0   // XXX
/* Mount all available partitions */
static int
pm_mountall(void)
{
        int num_devs = 0;
        int mnts_order[MAX_MNTS];
        int i, ii, error, ok;
        char dev[SSTRSIZE]; dev[0] = '\0';
        struct pm_devs *pm_i;

        localfs_dev[0] = '\0';
        if (mnts == NULL)
                mnts = calloc(MAX_MNTS, sizeof(*mnts));

        SLIST_FOREACH(pm_i, &pm_head, l) {
                ok = 0;
                for (i = 0; i < MAXPARTITIONS; i++) {
                        if (!(pm_i->bsdlabel[i].pi_flags & PIF_MOUNT &&
                                        pm_i->bsdlabel[i].mnt_opts != NULL))
                                continue;
                        mnts[num_devs].mnt_opts = pm_i->bsdlabel[i].mnt_opts;
                        if (strlen(pm_i->bsdlabel[i].mounted) > 0) {
                                /* Device is already mounted. So, doing mount_null */
                                strlcpy(mnts[num_devs].dev, pm_i->bsdlabel[i].mounted, MOUNTLEN);
                                mnts[num_devs].mnt_opts = "-t null";
                        } else {
                                pm_getdevstring(dev, SSTRSIZE, pm_i, i);
                                snprintf(mnts[num_devs].dev, STRSIZE, "/dev/%s", dev);
                        }
                        mnts[num_devs].on = pm_i->bsdlabel[i].pi_mount;
                        if (strcmp(pm_i->bsdlabel[i].pi_mount, "/") == 0) {
                                /* Use disk with / as a default if the user has
                                the sets on a local disk */
                                strlcpy(localfs_dev, pm_i->diskdev, SSTRSIZE);
                        }
                        num_devs++;
                        ok = 1;
                }
                if (ok)
                        md_pre_mount(NULL, 0);
        }
        if (strlen(localfs_dev) < 1) {
                hit_enter_to_continue(MSG_noroot, NULL);
                return -1;
        }
        for (i = 0; i < num_devs; i++)
                mnts_order[i] = i;
        qsort(mnts_order, num_devs, sizeof mnts_order[0], pm_mountall_sort);

        for (i = 0; i < num_devs; i++) {
                ii = mnts_order[i];
                make_target_dir(mnts[ii].on);
                error = target_mount_do(mnts[ii].mnt_opts, mnts[ii].dev, mnts[ii].on);
                if (error)
                        return error;
        }
        return 0;
}
#endif

/* Mount partition bypassing ordinary order */
static int
pm_mount(struct pm_devs *pm_cur, int part_num)
{
        int error = 0;
#if 0 // XXX
        char buf[MOUNTLEN];

        if (strlen(pm_cur->bsdlabel[part_num].mounted) > 0)
                return 0;

        snprintf(buf, sizeof(buf), "/tmp/%s%c", pm_cur->diskdev,
            part_num + 'a');
        if (! dir_exists_p(buf))
                run_program(RUN_DISPLAY | RUN_PROGRESS, "/bin/mkdir -p %s", buf);
        if (pm_cur->bsdlabel[part_num].pi_flags & PIF_MOUNT &&
                pm_cur->bsdlabel[part_num].mnt_opts != NULL &&
                strlen(pm_cur->bsdlabel[part_num].mounted) < 1)
                error += run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/mount %s /dev/%s%c %s",
                                pm_cur->bsdlabel[part_num].mnt_opts,
                                pm_cur->diskdev, part_num + 'a', buf);

        if (error)
                pm_cur->bsdlabel[part_num].mounted[0] = '\0';
        else {
                strlcpy(pm_cur->bsdlabel[part_num].mounted, buf, MOUNTLEN);
                pm_cur->blocked++;
        }
#endif
        return error;
}

void
pm_umount(struct pm_devs *pm_cur, int part_num)
{
        char buf[SSTRSIZE]; buf[0] = '\0';
        part_id id;

        if (part_num < 0)
                return;
        id = (part_id)part_num;

        pm_cur->parts->pscheme->get_part_device(pm_cur->parts, id, buf,
            sizeof buf, NULL, plain_name, false, true);

        if (run_program(RUN_DISPLAY | RUN_PROGRESS,
                        "umount -f /dev/%s", buf) == 0) {
                free(pm_cur->mounted[id]);
                pm_cur->mounted[id] = NULL;
                if (pm_cur->blocked > 0)
                        pm_cur->blocked--;
        }
}

int
pm_unconfigure(struct pm_devs *pm_cur)
{
        int error = 0;
        if (! strncmp(pm_cur->diskdev, "cgd", 3)) {
                error = run_program(RUN_DISPLAY | RUN_PROGRESS, "cgdconfig -u %s", pm_cur->diskdev);
                if (! error && pm_cur->refdev != NULL) {
                        ((struct cgd_desc*)pm_cur->refdev)->pm->blocked--;
                        ((struct cgd_desc*)pm_cur->refdev)->blocked = 0;
                }
        } else if (! strncmp(pm_cur->diskdev, "vnd", 3)) {
                error = run_program(RUN_DISPLAY | RUN_PROGRESS, "vndconfig -u %s", pm_cur->diskdev);
                if (! error && pm_cur->refdev != NULL) {
                        ((struct vnd_desc*)pm_cur->refdev)->pm->blocked--;
                        ((struct vnd_desc*)pm_cur->refdev)->blocked = 0;
                }
        } else if (! strncmp(pm_cur->diskdev, "raid", 4)) {
                error = run_program(RUN_DISPLAY | RUN_PROGRESS, "raidctl -u %s", pm_cur->diskdev);
                if (! error && pm_cur->refdev != NULL) {
                        ((struct raid_desc*)pm_cur->refdev)->blocked = 0;
#if 0 // XXX
                        for (i = 0; i < MAX_IN_RAID; i++)
                                if (((struct raid_desc*)pm_cur->refdev)->comp[i].parts != NULL)
                                        ((raids_t*)pm_cur->refdev)->pm[i]->blocked--;
#endif
                }
        } else if (! strncmp(pm_cur->diskdev, "dk", 2)) {
                if (pm_cur->refdev == NULL)
                        return -2;
                /* error = */
                run_program(RUN_DISPLAY | RUN_PROGRESS, "dkctl %s delwedge %s",
                        ((struct pm_devs*)pm_cur->refdev)->diskdev, pm_cur->diskdev);
#if 0 // XXX
                if (! error) {
                        if (pm_cur->refdev != NULL && ((struct pm_devs*)pm_cur->refdev)->blocked > 0)
                                ((struct pm_devs*)pm_cur->refdev)->blocked--;
                        sscanf(pm_cur->diskdev, "dk%d", &num);
                        if (num >= 0 && num < MAX_WEDGES)
                                wedges[num].allocated = 0;
                }
#endif
        } /* XXX: lvm */
        else
                error = run_program(RUN_DISPLAY | RUN_PROGRESS, "eject -t disk /dev/%sd",
                        pm_cur->diskdev);
        if (!error)
                pm_cur->found = 0;
        return error;
}

/* Last checks before leaving partition manager */
#if 0
static int
pm_lastcheck(void)
{
        FILE *file_tmp = fopen(concat_paths(targetroot_mnt, "/etc/fstab"), "r");
        if (file_tmp == NULL)
                return 1;
        fclose(file_tmp);
        return 0;
}
#endif

/* Are there unsaved changes? */
static int
pm_needsave(void)
{
        struct pm_devs *pm_i;
        SLIST_FOREACH(pm_i, &pm_head, l)
                if (pm_i->unsaved) {
                        /* Oops, we have unsaved changes */
                        pm_changed = 1;
                        msg_display(MSG_saveprompt);
                        return ask_yesno(NULL);
                }
        return 0;
}

/* Write all changes to disk */
static int
pm_commit(menudesc *m, void *arg)
{
        int retcode;
        struct pm_devs *pm_i;
        struct disk_partitions *secondary;

        pm_retvalue = -1;
        SLIST_FOREACH(pm_i, &pm_head, l) {
                if (! pm_i->unsaved)
                        continue;
                if (pm_i->parts == NULL) {
                        pm_i->unsaved = false;
                        continue;
                }
                if (!pm_i->parts->pscheme->write_to_disk(pm_i->parts)) {
                        if (logfp)
                                fprintf(logfp, "partitining error %s\n",
                                    pm_i->diskdev);
                        return -1;
                }
                if (pm_i->parts->pscheme->secondary_scheme != NULL) {
                        secondary = pm_i->parts->pscheme->
                            secondary_partitions(pm_i->parts, -1, false);
                        if (secondary != NULL) {
                                if (!secondary->pscheme->write_to_disk(
                                    secondary)) {
                                        if (logfp)
                                                fprintf(logfp,
                                                    "partitining error %s\n",
                                                    pm_i->diskdev);
                                        return -1;
                                }
                        }
                }
        }

        /* Call all functions that may create new devices */
        if ((retcode = pm_raid_commit()) != 0) {
                if (logfp)
                        fprintf(logfp, "RAIDframe configuring error #%d\n", retcode);
                return -1;
        }
        if ((retcode = pm_cgd_commit()) != 0) {
                if (logfp)
                        fprintf(logfp, "CGD configuring error #%d\n", retcode);
                return -1;
        }
        if ((retcode = pm_lvm_commit()) != 0) {
                if (logfp)
                        fprintf(logfp, "LVM configuring error #%d\n", retcode);
                return -1;
        }
        if ((retcode = pm_vnd_commit()) != 0) {
                if (logfp)
                        fprintf(logfp, "VND configuring error #%d\n", retcode);
                return -1;
        }
        if (m != NULL && arg != NULL)
                pm_do_upddevlist(m, arg);
        if (logfp)
                fflush (logfp);

        pm_retvalue = 0;
        return 0;
}

#if 0 // XXX
static int
pm_savebootsector(void)
{
        struct pm_devs *pm_i;
        SLIST_FOREACH(pm_i, &pm_head, l)
                if (pm_i->bootable) {
                        if (! strncmp("raid", pm_i->diskdev, 4))
                                if (run_program(RUN_DISPLAY | RUN_PROGRESS,
                                        "raidctl -v -A root %s", pm_i->diskdev) != 0) {
                                        if (logfp)
                                                fprintf(logfp, "Error writing RAID bootsector to %s\n",
                                                        pm_i->diskdev);
                                        continue;
                                }
                        if (pm_i->no_part) {
                                if (pm_i->rootpart < 0 ||
                                        run_program(RUN_DISPLAY | RUN_PROGRESS,
                                        "gpt biosboot -i %d %s",
                                        pm_i->rootpart + 1, pm_i->diskdev) != 0) {
                                        if (logfp)
                                                fprintf(logfp, "Error writing GPT bootsector to %s\n",
                                                        pm_i->diskdev);
                                        continue;
                                }
                        } else {
                                pm_select(pm_i);
                                if (
#ifndef NO_DISKLABEL
                                    !check_partitions(pm_i, pm_i->parts) ||
#endif
                                    md_post_newfs() != 0) {
                                        if (logfp)
                                                fprintf(logfp, "Error writing bootsector to %s\n",
                                                        pm_i->diskdev);
                                        continue;
                                }
                        }
                }
        return 0;
}
#endif

/* Function for 'Enter'-menu */
static int
pm_submenu(menudesc *m, void *arg)
{
        struct pm_devs *pm_cur = NULL;
        pm_retvalue = m->cursel + 1;
        struct part_entry *cur_pe = (struct part_entry *)arg + m->cursel;

        switch (cur_pe->type) {
                case PM_DISK:
                case PM_PART:
                case PM_SPEC:
                        if (cur_pe->dev_ptr != NULL) {
                                pm_cur = cur_pe->dev_ptr;
                                if (pm_cur == NULL)
                                        return -1;
                                if (pm_cur->blocked) {
                                        clear();
                                        refresh();
                                        msg_display(MSG_wannaunblock);
                                        if (!ask_noyes(NULL))
                                                return -2;
                                        pm_cur->blocked = 0;
                                }
                                pm_select(pm_cur);
                        }
                default:
                        break;
        }

        switch (cur_pe->type) {
                case PM_DISK:
                        process_menu(MENU_pmdiskentry, cur_pe);
                        break;
                case PM_PART:
                        process_menu(MENU_pmpartentry, cur_pe);
                        break;
                case PM_SPEC:
                        process_menu(MENU_pmpartentry, cur_pe);
                        break;
                case PM_RAID:
                        pm_edit(PMR_MENU_END, pm_raid_edit_menufmt,
                            pm_raid_set_value, pm_raid_check, pm_raid_init,
                            NULL, cur_pe->dev_ptr, 0, &raids_t_info);
                        break;
                case PM_VND:
                        return pm_edit(PMV_MENU_END, pm_vnd_edit_menufmt,
                            pm_vnd_set_value, pm_vnd_check, pm_vnd_init,
                            NULL, cur_pe->dev_ptr, 0, &vnds_t_info);
                case PM_CGD:
                        pm_cgd_edit_old(cur_pe);
                        break;
                case PM_LVM:
                        return pm_edit(PML_MENU_END, pm_lvm_edit_menufmt,
                            pm_lvm_set_value, pm_lvm_check, pm_lvm_init,
                            NULL, cur_pe->dev_ptr, 0, &lvms_t_info);
                case PM_LVMLV:
                        return pm_edit(PMLV_MENU_END, pm_lvmlv_edit_menufmt,
                            pm_lvmlv_set_value, pm_lvmlv_check, pm_lvmlv_init,
                            NULL, cur_pe->dev_ptr,
                            cur_pe->dev_ptr_delta, &lv_t_info);
        }
        return 0;
}

/* Functions that generate menu entries text */
static void
pm_menufmt(menudesc *m, int opt, void *arg)
{
        const char *dev_status = "";
        char buf[STRSIZE], dev[STRSIZE];
        part_id part_num = ((struct part_entry *)arg)[opt].id;
        struct pm_devs *pm_cur = ((struct part_entry *)arg)[opt].dev_ptr;
        struct disk_partitions *parts = ((struct part_entry *)arg)[opt].parts;
        struct disk_part_info info;
        const char *mount_point, *fstype;

        switch (((struct part_entry *)arg)[opt].type) {
                case PM_DISK:
                        if (pm_cur->blocked)
                                dev_status = msg_string(MSG_pmblocked);
                        else if (! pm_cur->unsaved)
                                dev_status = msg_string(MSG_pmunchanged);
                        else
                                dev_status = msg_string(MSG_pmused);
                        wprintw(m->mw, "%-43.42s %25.24s",
                                pm_cur->diskdev_descr,
                                dev_status);
                        break;
                case PM_PART:
                        if (parts->pscheme->get_part_device == NULL ||
                            !parts->pscheme->get_part_device(
                                parts,  part_num,
                                dev, sizeof dev, NULL, plain_name, false,
                                true))
                                        strcpy(dev, "-");

                        parts->pscheme->get_part_info(parts,
                            part_num, &info);
                        if (pm_cur->mounted != NULL &&
                            pm_cur->mounted[part_num] != NULL &&
                            pm_cur->mounted[part_num][0] != 0)
                                mount_point = msg_string(MSG_pmmounted);
                        else
                                mount_point = msg_string(MSG_pmunused);
                        fstype = getfslabelname(info.fs_type,
                            info.fs_sub_type);
                        if (info.last_mounted != NULL) {
                                snprintf(buf, STRSIZE, "%s (%s) %s",
                                    info.last_mounted, fstype,
                                     mount_point);
                                pm_fmt_disk_line(m->mw, dev, buf,
                                    info.size, NULL);
                        } else {
                                if (fstype != NULL) {
                                        strlcat(dev, " (", sizeof(dev));
                                        strlcat(dev, fstype, sizeof(dev));
                                        strlcat(dev, ")", sizeof(dev));
                                }
                                pm_fmt_disk_line(m->mw, dev, NULL,
                                    info.size, NULL);
                        }
                        break;
                case PM_SPEC:
                        /* XXX ? */
                        pm_fmt_disk_line(m->mw, pm_cur->diskdev_descr, NULL,
                            pm_cur->dlsize, NULL);
                        break;
                case PM_RAID:
                        pm_raid_menufmt(m, opt, arg);
                        break;
                case PM_VND:
                        pm_vnd_menufmt(m, opt, arg);
                        break;
                case PM_CGD:
                        pm_cgd_menufmt(m, opt, arg);
                        break;
                case PM_LVM:
                        pm_lvm_menufmt(m, opt, arg);
                        break;
                case PM_LVMLV:
                        pm_lvmlv_menufmt(m, opt, arg);
                        break;
        }
}

/* Submenu for RAID/LVM/CGD/VND */
static void
pm_upddevlist_adv(menudesc *m, void *arg, int *i,
        pm_upddevlist_adv_t *d)
{
        int ii;
        if (d->create_msg != NULL) {
                /* We want to have menu entry that creates a new device */
                ((struct part_entry *)arg)[*i].type = d->pe_type;
                ((struct part_entry *)arg)[*i].dev_ptr = NULL;
                ((struct part_entry *)arg)[*i].dev_ptr_delta = d->s->parent_size * d->sub_num;
                m->opts[(*i)++] = (struct menu_ent) {
                        .opt_name = d->create_msg,
                        .opt_action = pm_submenu,
                };
        }
        for (ii = 0; ii < d->s->max; ii++) {
                if (d->s->entry_enabled == NULL ||
                        d->s->entry_blocked == NULL ||
                        *(int*)((char*)d->s->entry_enabled + d->s->entry_size * ii +
                                d->s->parent_size * d->sub_num) == 0 ||
                        *(int*)((char*)d->s->entry_blocked + d->s->entry_size * ii +
                                d->s->parent_size * d->sub_num) != 0)
                        continue;
                /* We have a entry for displaying */
                pm_changed = 1;
                m->opts[*i] = (struct menu_ent) {
                        .opt_name = NULL,
                        .opt_action = pm_submenu,
                };
                ((struct part_entry *)arg)[*i].type = d->pe_type;
                ((struct part_entry *)arg)[*i].dev_ptr = (char*)d->s->entry_first +
                        d->s->entry_size * ii + d->s->parent_size * d->sub_num;
                (*i)++;
                /* We should show submenu for current entry */
                if (d->sub != NULL) {
                        d->sub->sub_num = ii;
                        pm_upddevlist_adv(m, arg, i, d->sub);
                }
        }
}

/* Update partman main menu with devices list */
static int
pm_upddevlist(menudesc *m, void *arg, struct install_partition_desc *install)
{
        int i = 0;
        size_t ii;
        struct pm_devs *pm_i;
        struct disk_partitions *secondary;
        const struct disk_partitioning_scheme *ps;
        struct disk_part_info info;

        if (arg != NULL)
                pm_retvalue = m->cursel + 1;

        pm_changed = 0;
        /* Mark all devices as not found */
        SLIST_FOREACH(pm_i, &pm_head, l) {
                if (pm_i->parts != NULL && !pm_i->unsaved) {
                        pm_i->parts->pscheme->free(pm_i->parts);
                        pm_i->parts = NULL;
                }
                if (pm_i->found > 0)
                        pm_i->found = 0;
        }

        /* Detect all present devices */
        (void)find_disks("partman", false);
        if (have_lvm)
                pm_lvm_find();
        pm_clean();

        if (m == NULL || arg == NULL)
                return -1;

        SLIST_FOREACH(pm_i, &pm_head, l) {
                struct part_entry *cur_entry = ((struct part_entry *)arg)+i;
                memset(&m->opts[i], 0, sizeof m->opts[i]);
                m->opts[i].opt_action = pm_submenu;
                cur_entry->dev_ptr = pm_i;
                cur_entry->id = NO_PART;
                cur_entry->install = install;
                if (pm_i->no_part)
                        cur_entry->type = PM_SPEC;
                else {
                        ps = pm_i->parts != NULL ? pm_i->parts->pscheme : NULL;
                        secondary = NULL;

                        cur_entry->type = PM_DISK;

                        for (ii = 0; pm_i->parts != NULL &&
                            ii < pm_i->parts->num_part; ii++) {
                                if (!ps->get_part_info(
                                    pm_i->parts, ii, &info))
                                        continue;
                                if (info.flags & PTI_SEC_CONTAINER) {
                                        if (secondary == NULL &&
                                            ps->secondary_scheme != NULL)
                                                secondary = ps->
                                                    secondary_partitions(
                                                    pm_i->parts,
                                                    info.start, false);
                                        continue;
                                }
                                if (info.flags & (PTI_WHOLE_DISK|
                                    PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
                                        continue;
                                if (info.fs_type == FS_UNUSED)
                                        continue;
                                if (i >= MAX_ENTRIES)
                                        break;
                                i++;
                                cur_entry = ((struct part_entry *)arg)+i;
                                memset(&m->opts[i], 0, sizeof m->opts[i]);
                                m->opts[i].opt_action = pm_submenu;
                                cur_entry->parts = pm_i->parts;
                                cur_entry->dev_ptr = pm_i;
                                cur_entry->install = install;
                                cur_entry->id = ii;
                                cur_entry->type = PM_PART;
                        }

                        for (ii = 0; secondary != NULL &&
                            ii < secondary->num_part; ii++) {
                                if (!secondary->pscheme->get_part_info(
                                    secondary, ii, &info))
                                        continue;
                                if (info.flags & (PTI_WHOLE_DISK|
                                    PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
                                        continue;
                                if (info.fs_type == FS_UNUSED)
                                        continue;
                                if (i >= MAX_ENTRIES)
                                        break;
                                i++;
                                cur_entry = ((struct part_entry *)arg)+i;
                                memset(&m->opts[i], 0, sizeof m->opts[i]);
                                m->opts[i].opt_action = pm_submenu;
                                cur_entry->parts = secondary;
                                cur_entry->dev_ptr = pm_i;
                                cur_entry->install = install;
                                cur_entry->id = ii;
                                cur_entry->type = PM_PART;
                        }
                }
                i++;
        }
        for (ii = 0; ii <= (size_t)i; ii++) {
                m->opts[ii].opt_flags = OPT_EXIT;
        }
        if (have_cgd) {
                pm_upddevlist_adv(m, arg, &i,
                    &(pm_upddevlist_adv_t) {MSG_create_cgd, PM_CGD,
                    &cgds_t_info, 0, NULL});
        }
        pm_upddevlist_adv(m, arg, &i,
            &(pm_upddevlist_adv_t) {MSG_create_vnd, PM_VND,
            &vnds_t_info, 0, NULL});
        if (have_lvm) {
                pm_upddevlist_adv(m, arg, &i,
                    &(pm_upddevlist_adv_t) {MSG_create_vg, PM_LVM,
                    &lvms_t_info, 0,
                    &(pm_upddevlist_adv_t) {MSG_create_lv, PM_LVMLV,
                    &lv_t_info, 0,
                    NULL}});
        }
        if (have_raid) {
                pm_upddevlist_adv(m, arg, &i,
                    &(pm_upddevlist_adv_t) {MSG_create_raid, PM_RAID, &raids_t_info, 0, NULL});
        }

        m->opts[i++] = (struct menu_ent) {
                .opt_name = MSG_updpmlist,
                .opt_action = pm_do_upddevlist,
        };
        m->opts[i  ] = (struct menu_ent) {
                .opt_name = MSG_savepm,
                .opt_action = pm_commit,
        };

        if (pm_retvalue >= 0)
                m->cursel = pm_retvalue - 1;
        return i;
}

static void
pm_menuin(menudesc *m, void *arg)
{
        if (pm_cursel > m->numopts)
                m->cursel = m->numopts;
        else if (pm_cursel < 0)
                m->cursel = 0;
        else
                m->cursel = pm_cursel;
}

static void
pm_menuout(menudesc *m, void *arg)
{
        pm_cursel = m->cursel;
}

/* Main partman function */
int
partman(struct install_partition_desc *install)
{
        int menu_no, menu_num_entries;
        static int firstrun = 1;
        menu_ent menu_entries[MAX_ENTRIES+6];
        struct part_entry args[MAX_ENTRIES] = { 0 };

        if (firstrun) {
                check_available_binaries();

                if (!have_raid)
                        remove_raid_options();
                else if (!(raids = calloc(MAX_RAID, sizeof(*raids))))
                        have_raid = 0;

#define remove_vnd_options() (void)0
                if (!have_vnd)
                        remove_vnd_options();
                else if (!(vnds = calloc(MAX_VND, sizeof(*vnds))))
                        have_vnd = 0;

                if (!have_cgd)
                        remove_cgd_options();
                else if (!(cgds = calloc(MAX_CGD, sizeof(*cgds))))
                        have_cgd = 0;

                if (!have_lvm)
                        remove_lvm_options();
                else if (!(lvms = calloc(MAX_LVM_VG, sizeof(*lvms))))
                        have_lvm = 0;

                raids_t_info = (structinfo_t) {
                        .max = MAX_RAID,
                        .entry_size = sizeof raids[0],
                        .entry_first = &raids[0],
                        .entry_enabled = &(raids[0].enabled),
                        .entry_blocked = &(raids[0].blocked),
                        .entry_node = &(raids[0].node),
                };
                vnds_t_info = (structinfo_t) {
                        .max = MAX_VND,
                        .entry_size = sizeof vnds[0],
                        .entry_first = &vnds[0],
                        .entry_enabled = &(vnds[0].enabled),
                        .entry_blocked = &(vnds[0].blocked),
                        .entry_node = &(vnds[0].node),
                };
                cgds_t_info = (structinfo_t) {
                        .max = MAX_CGD,
                        .entry_size = sizeof cgds[0],
                        .entry_first = &cgds[0],
                        .entry_enabled = &(cgds[0].enabled),
                        .entry_blocked = &(cgds[0].blocked),
                        .entry_node = &(cgds[0].node),
                };
                lvms_t_info = (structinfo_t) {
                        .max = MAX_LVM_VG,
                        .entry_size = sizeof lvms[0],
                        .entry_first = &lvms[0],
                        .entry_enabled = &(lvms[0].enabled),
                        .entry_blocked = &(lvms[0].blocked),
                        .entry_node = NULL,
                };
                lv_t_info = (structinfo_t) {
                        .max = MAX_LVM_LV,
                        .entry_size = sizeof lvms[0].lv[0],
                        .entry_first = &lvms[0].lv[0],
                        .entry_enabled = &(lvms[0].lv[0].size),
                        .entry_blocked = &(lvms[0].lv[0].blocked),
                        .parent_size = sizeof lvms[0],
                };

                pm_cursel = 0;
                pm_changed = 0;
                firstrun = 0;
        }

        do {
                menu_num_entries = pm_upddevlist(&(menudesc){.opts = menu_entries},
                    args, install);
                menu_no = new_menu(MSG_partman_header,
                        menu_entries, menu_num_entries+1, 1, 1, 0, 75, /* Fixed width */
                        MC_ALWAYS_SCROLL | MC_NOBOX | MC_NOCLEAR,
                        pm_menuin, pm_menufmt, pm_menuout, NULL, MSG_finishpm);
                if (menu_no == -1)
                        pm_retvalue = -1;
                else {
                        pm_retvalue = 0;
                        clear();
                        refresh();
                        process_menu(menu_no, &args);
                        free_menu(menu_no);
                }

                if (pm_retvalue == 0 && pm != NULL && pm->parts != NULL)
                        if (pm_needsave())
                                pm_commit(NULL, NULL);

        } while (pm_retvalue > 0);

        /* retvalue <0 - error, retvalue ==0 - user quits, retvalue >0 - all ok */
        return (pm_retvalue >= 0)?0:-1;
}

void
update_wedges(const char *disk)
{
        check_available_binaries();

        if (!have_dk)
                return;

        run_program(RUN_SILENT | RUN_ERROR_OK,
            "dkctl %s makewedges", disk);
}

bool
pm_force_parts(struct pm_devs *my_pm)
{
        if (my_pm == NULL)
                return false;
        if (my_pm->parts != NULL)
                return true;

        const struct disk_partitioning_scheme *ps =
            select_part_scheme(my_pm, NULL, false, NULL);
        if (ps == NULL)
                return false;

        struct disk_partitions *parts =
           (*ps->create_new_for_disk)(my_pm->diskdev, 0,
           my_pm->dlsize, false, NULL);
        if (parts == NULL)
                return false;

        my_pm->parts = parts;
        if (pm->dlsize > ps->size_limit)
                pm->dlsize = ps->size_limit;

        return true;
}

void
pm_edit_partitions(struct part_entry *pe)
{
        struct pm_devs *my_pm = pm_from_pe(pe);
        struct partition_usage_set pset = { 0 };
        struct disk_partitions *parts, *np;

        if (!my_pm)
                return;

        if (!pm_force_parts(my_pm))
                return;
        parts = my_pm->parts;

        clear();
        refresh();

        if (my_pm->parts->pscheme->secondary_scheme != NULL) {
                if (!edit_outer_parts(my_pm->parts))
                        goto done;
                np = get_inner_parts(parts);
                if (np != NULL)
                        parts = np;
        }

        if (parts != NULL) {
                if (!pe->install ||
                    !usage_set_from_install_desc(&pset, pe->install, parts))
                        usage_set_from_parts(&pset, parts);
                edit_and_check_label(my_pm, &pset, false);

                if (pe->install)
                        merge_usage_set_into_install_desc(pe->install,
                            &pset);
                free_usage_set(&pset);
        }

done:
        pm_partusage(my_pm, -1, -1);
        my_pm->unsaved = true;
        pm_retvalue = 1;
}

part_id
pm_whole_disk(struct part_entry *pe, int t)
{
        struct pm_devs *my_pm = pm_from_pe(pe);
        struct disk_partitions *parts, *outer;
        struct disk_part_info info, oinfo;
        struct disk_part_free_space space;
        daddr_t align;
        int fst;
        struct partition_usage_set pset = { 0 };
        part_id new_part, id;
        size_t i, cnt;

        if (!my_pm)
                return NO_PART;

        if (!pm_force_parts(my_pm))
                return NO_PART;

        parts = my_pm->parts;
        parts->pscheme->delete_all_partitions(parts);
        if (parts->pscheme->secondary_scheme != NULL) {
                outer = parts;
                parts = parts->pscheme->secondary_partitions(outer,
                    0, true);
                if (parts == NULL) {
                        parts = outer;
                } else {
                        if (outer->pscheme->write_to_disk(outer))
                                my_pm->parts = parts;
                }
        }

        align = parts->pscheme->get_part_alignment(parts);

        memset(&info, 0, sizeof info);
        switch (t) {
        case SY_NEWRAID:
                fst = FS_RAID;
                break;
        case SY_NEWLVM:
                fst = FS_BSDFFS;
                break;
        case SY_NEWCGD:
                fst = FS_CGD;
                break;
        default:
                assert(false);
                return NO_PART;
        }
        info.nat_type = parts->pscheme->get_fs_part_type(PT_root, fst, 0);
        if (info.nat_type != NULL && parts->pscheme->get_default_fstype != NULL)
                parts->pscheme->get_default_fstype(info.nat_type,
                    &info.fs_type, &info.fs_sub_type);
        if (parts->pscheme->get_free_spaces(parts, &space, 1,
            5*align, align, -1, -1) != 1)
                return NO_PART;
        info.start = space.start;
        info.size = space.size;
        new_part = parts->pscheme->add_partition(parts, &info, NULL);
        if (new_part == NO_PART)
                return NO_PART;

        parts->pscheme->get_part_info(parts, new_part, &oinfo);

        clear();
        refresh();

        usage_set_from_parts(&pset, parts);
        edit_and_check_label(my_pm, &pset, false);
        free_usage_set(&pset);

        /*
         * Try to match our new partition after user edit
         */
        new_part = NO_PART;
        for (cnt = i = 0; i < parts->num_part; i++) {
                if (!parts->pscheme->get_part_info(parts,i, &info))
                        continue;
                if (info.flags & (PTI_SEC_CONTAINER|PTI_WHOLE_DISK|
                    PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
                        continue;
                if (info.nat_type != oinfo.nat_type)
                        continue;
                if (new_part == NO_PART)
                        new_part = i;
                cnt++;
        }
        if (cnt > 1) {
                /* multiple matches, retry matching with start */
                id = NO_PART;
                for (cnt = i = 0; i < parts->num_part; i++) {
                        if (!parts->pscheme->get_part_info(parts, i, &info))
                                continue;
                        if (info.flags & (PTI_SEC_CONTAINER|PTI_WHOLE_DISK|
                            PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
                                continue;
                        if (info.nat_type != oinfo.nat_type)
                                continue;
                        if (info.start != oinfo.start)
                                continue;
                        if (id == NO_PART)
                                id = i;
                        cnt++;
                }
                if (id != NO_PART)
                        new_part = id;
        }

        clear();
        refresh();

        pm_partusage(my_pm, -1, -1);
        my_pm->unsaved = true;
        pm_retvalue = 1;

        return new_part;
}

struct pm_devs *
pm_from_pe(struct part_entry *pe)
{
        switch (pe->type) {
        case PM_DISK:
                return pe->dev_ptr;
        default:
                assert(false);
        }
        return NULL;
}