source: MondoRescue/branches/stable/mondo/src/mondoarchive/mondo-cli.c@ 1842

/***************************************************************************
$Id: mondo-cli.c 1842 2007-12-15 01:24:34Z bruno $
*******************************************************************/

/**
 * @file
 * Functions for handling command-line arguments passed to mondoarchive.
 */

/** @def BOOT_LOADER_CHARS The characters allowed for boot loader on this platform. */

#include "my-stuff.h"
#include "mondostructures.h"
#include "mondo-cli-EXT.h"
#include "libmondo.h"
#include <pthread.h>

#include "mr_mem.h"
#include "mr_msg.h"
#include "mr_gettext.h"
#include "mr_conf.h"

//static char cvsid[] = "$Id: mondo-cli.c 1842 2007-12-15 01:24:34Z bruno $";

extern bool g_text_mode;
extern char g_startdir[MAX_STR_LEN];    ///< ????? @bug ?????
extern bool g_sigpipe;

extern struct mr_ar_conf *mr_conf;

/*@ file pointer **************************************************/
extern FILE *g_tape_stream;

/*@ long long *****************************************************/
extern long long g_tape_posK;

/*@ long **********************************************************/
extern long g_noof_sets;

/*@ bool******** **************************************************/
bool g_debugging = FALSE;       ///< ????? @bug ????? @ingroup globalGroup
bool g_running_live = FALSE;    ///< ????? @bug ????? @ingroup globalGroup
extern bool g_cd_recovery;

extern void setup_tmpdir(char *path);

/**
 * Whether we're restoring from ISOs. Obviously not, since this is the
 * backup program.
 * @note You @b MUST declare this variable somewhere in your program if
 * you use libmondo. Otherwise the link will fail.
 * @ingroup globalGroup
 */
bool g_ISO_restore_mode = FALSE;

extern double g_kernel_version;
extern int g_current_media_number;
extern pid_t g_main_pid;
extern char *resolve_softlinks_to_get_to_actual_device_file(char *);

/* Do we use extended attributes and acl ? 
 * By default no, use --acl & --attr options to force their usage */
char *g_getfacl = NULL;
char *g_getfattr = NULL;

/* Reference to global bkpinfo */
extern struct s_bkpinfo *bkpinfo;

/**
 * @addtogroup cliGroup
 * @{
 */
/**
 * Populate @p bkpinfo from the command-line parameters stored in @p argc and @p argv.
 * @param argc The argument count, including the program name; @p argc passed to main().
 * @param argv The argument vector; @p argv passed to main().
 * @param bkpinfo The backup information structure to populate.
 * @return The number of problems with the command line (0 for success).
 */
int
handle_incoming_parameters(int argc, char *argv[])
{
    /*@ int *** */
    int res = 0;
    int retval = 0;
    int i = 0;

    /*@ buffers *************** */
    char *tmp = NULL;
    char flag_val[128][MAX_STR_LEN];
    bool flag_set[128];

    sensibly_set_tmpdir_and_scratchdir();

    for (i = 0; i < 128; i++) {
        flag_val[i][0] = '\0';
        flag_set[i] = FALSE;
    }
    res = retrieve_switches_from_command_line(argc, argv, flag_val,
                                            flag_set);
    retval += res;
    if (!retval) {
        res = process_switches(flag_val, flag_set);
        retval += res;
    }
/*
  if (!retval)
    {
*/
    mr_msg(3, "Switches:-");
    for (i = 0; i < 128; i++) {
        if (flag_set[i]) {
            mr_msg(3, "-%c %s", i, flag_val[i]);
        }
    }
//    }
    mr_asprintf(&tmp, "rm -Rf %s/tmp.mondo.*", bkpinfo->tmpdir);
    paranoid_system(tmp);
    mr_free(tmp);

    mr_asprintf(&tmp, "rm -Rf %s/mondo.scratch.*", bkpinfo->scratchdir);
    paranoid_system(tmp);
    mr_free(tmp);

    sprintf(bkpinfo->scratchdir + strlen(bkpinfo->scratchdir),
            "/mondo.scratch.%ld", random() % 32767);

    mr_asprintf(&tmp, "mkdir -p %s/tmpfs", bkpinfo->tmpdir);
    paranoid_system(tmp);
    mr_free(tmp);

    mr_asprintf(&tmp, "mkdir -p %s", bkpinfo->scratchdir);
    paranoid_system(tmp);
    mr_free(tmp);
    return (retval);
}


/**
 * Store the sizespec(s) stored in @p value into @p bkpinfo.
 * @param bkpinfo The backup information structure; the @c bkpinfo->media_size field will be populated.
 * @param value The sizespec (e.g. "2g", "40m").
 * @return 0, always.
 * @bug Return code not needed.
 */
int process_the_s_switch(char *value)
{
    char *tmp = NULL;
    char *q = NULL;

    assert(bkpinfo != NULL);
    assert(value != NULL);

    mr_asprintf(&tmp, value);
    q = strchr(tmp, ',');
    if (q != NULL) {
        *q = '\0';
    }
    bkpinfo->media_size = friendly_sizestr_to_sizelong(tmp);
    mr_free(tmp);

    mr_msg(3, "media_size = %ld", bkpinfo->media_size);
    if (bkpinfo->media_size <= 0L) {
        mr_msg(1, "You gave media an invalid size\n");
        return (-1);
    }
    return (0);
}


/**
 * Process mondoarchive's command-line switches.
 * @param bkpinfo The backup information structure to populate.
 * @param flag_val An array of the argument passed to each switch (the letter is the index).
 * If a switch is not set or has no argument, the field in @p flag_val doesn't matter.
 * @param flag_set An array of <tt>bool</tt>s indexed by switch letter: TRUE if it's set,
 * FALSE if it's not.
 * @return The number of problems with the switches, or 0 for success.
 * @bug Maybe include a list of all switches (inc. intentionally undocumented ones not in the manual!) here?
 */
int
process_switches(char flag_val[128][MAX_STR_LEN], bool flag_set[128])
{

    /*@ ints *** */
    int i = 0;
    int retval = 0;
    int percent = 0;

    /*@ buffers ** */
    char *tmp = NULL;
    char *tmp1 = NULL;
    char *tmp2 = NULL;
    char *psz = NULL;
    char *p = NULL;
    char *q = NULL;

    long itbs = 0L;

    struct stat buf;

    malloc_string(tmp);

    assert(bkpinfo != NULL);
    assert(flag_val != NULL);
    assert(flag_set != NULL);

    bkpinfo->internal_tape_block_size = mr_conf->internal_tape_blocksize;

    /* compulsory */
    i = flag_set['i'] + flag_set['n'] +
        flag_set['t'] + flag_set['u'] + flag_set['r'] +
        flag_set['w'] + flag_set['C'] + flag_set['U'];
    if (i == 0) {
        retval++;
        log_to_screen(_("You must specify the media type\n"));
    }
    if (i > 1) {
        retval++;
        log_to_screen(_("Please specify only one media type\n"));
    }
    if (flag_set['K']) {
        mr_conf->log_level = atoi(flag_val['K']);
        if (mr_conf->log_level < 3) {
            mr_conf->log_level = 3;
        }
    }
    if (flag_set['L'] && flag_set['0']) {
        retval++;
        log_to_screen(_("You cannot have 'no compression' _and_ LZOP.\n"));
    }
    bkpinfo->backup_data = flag_set['O'];
    bkpinfo->verify_data = flag_set['V'];
    if (flag_set['I'] && !bkpinfo->backup_data) {
        log_to_screen(_("-I switch is ignored if just verifying"));
    }
    if (flag_set['E'] && !bkpinfo->backup_data) {
        log_to_screen(_("-E switch is ignored if just verifying"));
    }

    if (!find_home_of_exe("afio")) {
        if (find_home_of_exe("star")) {
            flag_set['R'] = TRUE;
            mr_msg(1, "Using star instead of afio");
        } else {
            fatal_error
                ("Neither afio nor star is installed. Please install at least one.");
        }
    }

    if (flag_set['R']) {
        bkpinfo->use_star = TRUE;
        if (flag_set['L']) {
            fatal_error("You may not use star and lzop at the same time.");
        }
        if (!find_home_of_exe("star")) {
            fatal_error
                ("Please install 'star' RPM or tarball if you are going to use -R. Thanks.");
        }
    }
    if (flag_set['W']) {
        bkpinfo->nonbootable_backup = TRUE;
        log_to_screen("Warning - you have opted for non-bootable backup");
        if (flag_set['f'] || flag_set['l']) {
            log_to_screen
                (_("You don't need to specify bootloader or bootdevice"));
        }
    }
    if (flag_set['t'] && flag_set['H']) {
        fatal_error
            ("Sorry, you may not nuke w/o warning from tape. Drop -H, please.");
    }
    if (flag_set['I']) {
        if (!strcmp(bkpinfo->include_paths, "/")) {
            mr_msg(2, "'/' is pleonastic.");
            bkpinfo->include_paths[0] = '\0';
        }
        if (bkpinfo->include_paths[0]) {
            strcat(bkpinfo->include_paths, " ");
        }
        mr_asprintf(&tmp1, flag_val['I']);
        p = tmp1;
        q = tmp1;

        /* Cut the flag_val['I'] in parts containing all paths to test them */
        while (p != NULL) {
            q = strchr(p, ' ');
            if (q != NULL) {
                *q = '\0';
                if (stat(p, &buf) != 0) {
                    mr_msg(1, "ERROR ! %s doesn't exist", p);
                    fatal_error("ERROR ! You specified a directory to include which doesn't exist");
                }
                p = q+1 ;
            } else {
                if (stat(p, &buf) != 0) {
                    mr_msg(1, "ERROR ! %s doesn't exist", p);
                    fatal_error("ERROR ! You specified a directory to include which doesn't exist");
                }
                p = NULL;
            }
        }
        mr_free(tmp1);

        strncpy(bkpinfo->include_paths + strlen(bkpinfo->include_paths),
                flag_val['I'],
                4*MAX_STR_LEN - strlen(bkpinfo->include_paths));
        mr_msg(1, "include_paths is now '%s'", bkpinfo->include_paths);
        if (bkpinfo->include_paths[0] == '-') {
            retval++;
            log_to_screen(_("Please supply a sensible value with '-I'\n"));
        }
    }

    if (g_kernel_version >= 2.6 && !flag_set['d']
        && flag_set['w']) {
        fatal_error
            ("If you are using the 2.6.x kernel, please specify the CD-R(W) device.");
    }

    if (flag_set['J']) {
        if (flag_set['I']) {
            retval++;
            log_to_screen
                (_("Please do not use -J in combination with -I. If you want to make a list of files to backup, that's fine, use -J <filename> but please don't combine -J with -I. Thanks. :-)"));
        }
        bkpinfo->make_filelist = FALSE;
        strcpy(bkpinfo->include_paths, flag_val['J']);
    }

    if (flag_set['w'] || flag_set['C'] || flag_set['r']) {
        if (!flag_set['r'] && g_kernel_version <= 2.5
            && strstr(flag_val['d'], "/dev/")) {
            fatal_error
                ("Please don't give a /dev entry. Give a SCSI node for the parameter of the -d flag.");
        }
        if (flag_set['r'] && g_kernel_version <= 2.5
            && !strstr(flag_val['d'], "/dev/")) {
            fatal_error
                ("Please give a /dev entry, not a SCSI node, as the parameter of the -d flag.");
        }
        if (g_kernel_version >= 2.6 && !strstr(flag_val['d'], "/dev/")) {
            log_to_screen
                (_("Linus says 2.6 has a broken ide-scsi module. Proceed at your own risk..."));
        }

        if (system("which cdrecord > /dev/null 2> /dev/null")
            && system("which dvdrecord > /dev/null 2> /dev/null")) {
            fatal_error
                ("Please install dvdrecord/cdrecord and try again.");
        }
        if (flag_set['w']) {
            mr_msg(3, "flag_val['w'] = %s", flag_val['w']);
            bkpinfo->writer_speed = atoi(flag_val['w']);
        }

        if (bkpinfo->writer_speed < 1) {
            fatal_error
                ("You specified a silly speed for a burner");
        }
    }

    if (flag_set['t'] && !flag_set['d']) {
        log_it("Hmm! No tape drive specified. Let's see what we can do.");
        if (find_tape_device_and_size(flag_val['d'], tmp)) {
            log_to_screen
                ("Tape device not specified. I had problems to find it either");
        }
        flag_set['d'] = TRUE;
        mr_asprintf(&tmp2,
                _("You didn't specify a tape streamer device. I'm assuming %s"),
                flag_val['d']);
        log_to_screen(tmp2);
        mr_free(tmp2);
        percent = 0;
    }

    if (flag_set['U'])          // USB
    {
        if (! flag_set['d']) {
            fatal_error
                ("You need to specify a device file with -d for bootable USB device creation");
        }
        if (!flag_set['s']) {
            fatal_error("You did not specify a size (-s) for your USB device. Aborting");
        }
    }

    if (flag_set['r'])          // DVD
    {
        if (flag_set['m']) {
            fatal_error
                ("Manual CD tray (-m) not yet supported in conjunction w/ DVD drives. Drop -m.");
        }
        if (!flag_set['d']) {
            if (!find_dvd_device(flag_val['d'], FALSE)) {
                flag_set['d'] = TRUE;
                log_to_screen(_("I guess DVD drive is at %s"), flag_val['d']);
            }
        }
        if (!find_home_of_exe("growisofs")) {
            fatal_error
                ("Please install growisofs (probably part of dvd+rw-tools). If you want DVD support, you need it.");
        }
        if (!find_home_of_exe("dvd+rw-format")) {
            fatal_error
                ("Please install dvd+rw-format (probably part of dvd+rw-tools). If you want DVD support, you need it.");
        }
        if (strchr(flag_val['d'], ',')) {
            fatal_error
                ("Please don't give a SCSI node. Give a _device_, preferably a /dev entry, for the parameter of the -d flag.");
        }
    }

    if (flag_set['t'] || flag_set['u']) {   /* tape size */
        if (strchr(flag_val['d'], ',')) {
            fatal_error
                ("Please don't give a SCSI node. Give a _device_, preferably a /dev entry, for the parameter of the -d flag.");
        }
        if (flag_set['O']) {
            if (flag_set['s']) {
                if (flag_set['t']) {
                    fatal_error
                        ("For the moment, please don't specify a tape size. Mondo should handle end-of-tape gracefully anyway.");
                }
                if (process_the_s_switch(flag_val['s'])) {
                    fatal_error("Bad -s switch");
                }
            } else if (flag_set['u'] || flag_set['t']) {
                /* Force autodetection */
                bkpinfo->media_size = 0L;
            } else {
                retval++;
                log_to_screen("Tape size not specified.\n");
            }
        }
    } else {                    /* CD|USB size */
        if (flag_set['s']) {
            if (process_the_s_switch(flag_val['s'])) {
                fatal_error("Bad -s switch");
            }
        }
        if (flag_set['w']) {
            bkpinfo->wipe_media_first = TRUE;
        }                       /* CD-RW */
    }
    if (flag_set['n']) {
        strncpy(bkpinfo->nfs_mount, flag_val['n'], MAX_STR_LEN);
        if (!flag_set['d']) {
            strncpy(bkpinfo->nfs_remote_dir, "/", MAX_STR_LEN);
        }
        mr_asprintf(&tmp2, "mount | grep -E '^%s .*$' | cut -d' ' -f3",
                bkpinfo->nfs_mount);
        strncpy(bkpinfo->isodir,
                call_program_and_get_last_line_of_output(tmp2),
                MAX_STR_LEN / 4);
        mr_free(tmp2);
        if (strlen(bkpinfo->isodir) < 3) {
            retval++;
            log_to_screen(_("NFS share is not mounted. Please mount it.\n"));
        }
        mr_msg(3, "mount = %s", bkpinfo->nfs_mount);
        mr_msg(3, "isodir= %s", bkpinfo->isodir);
    }

    if (flag_set['C']) {
        bkpinfo->backup_media_type = cdstream;
    }
    if (flag_set['i']) {
        bkpinfo->backup_media_type = iso;
    }
    if (flag_set['n']) {
        bkpinfo->backup_media_type = nfs;
    }
    if (flag_set['r']) {
        bkpinfo->backup_media_type = dvd;
    }
    if (flag_set['t']) {
        bkpinfo->backup_media_type = tape;
    }
    if (flag_set['u']) {
        bkpinfo->backup_media_type = udev;
    }
    if (flag_set['w']) {
        bkpinfo->backup_media_type = cdrw;
    }
    if (flag_set['U']) {
        bkpinfo->backup_media_type = usb;
        /* Never try to eject a USB device */
        bkpinfo->please_dont_eject = TRUE;
    }
    if (flag_set['z']) {
        if (find_home_of_exe("getfattr")) {
            mr_asprintf(&g_getfattr,"getfattr");
        }
        if (find_home_of_exe("getfacl")) {
            mr_asprintf(&g_getfacl,"getfacl");
        }
    }

    /* optional, popular */
    if (flag_set['g']) {
        g_text_mode = FALSE;
    }

    if (flag_set['E']) {
        if (bkpinfo->exclude_paths != NULL) {
            mr_strcat(bkpinfo->exclude_paths, " ");
        }
        mr_asprintf(&tmp1, flag_val['E']);
        p = tmp1;
        q = tmp1;

        /* Cut the flag_val['E'] in parts containing all paths to test them */
        while (p != NULL) {
            q = strchr(p, ' ');
            if (q != NULL) {
                *q = '\0';
                /* Fix bug 14 where ending / cause a problem later 
                 * so handled here for the moment */
                q--;
                if (*q == '/') {
                    *q = '\0';
                }
                q++;
                /* End of bug fix */
                if (stat(p, &buf) != 0) {
                    mr_msg(1, "WARNING ! %s doesn't exist", p);
                }
                p = q+1 ;
            } else {
                if (stat(p, &buf) != 0) {
                    mr_msg(1, "WARNING ! %s doesn't exist", p);
                }
                p = NULL;
            }
        }
        mr_free(tmp1);
        mr_strcat(bkpinfo->exclude_paths, flag_val['E']);
    }
    if (flag_set['e']) {
        bkpinfo->please_dont_eject = TRUE;
    }
    if (flag_set['N'])          // exclude NFS mounts & devices
    {
        mr_asprintf(&psz, list_of_NFS_mounts_only());
        if (bkpinfo->exclude_paths != NULL) {
            mr_strcat(bkpinfo->exclude_paths, " ");
        }
        mr_strcat(bkpinfo->exclude_paths, psz);
        mr_free(psz);
        mr_msg(3, "-N means we're now excluding %s",
                bkpinfo->exclude_paths);
    }
    if (flag_set['b']) {
        mr_asprintf(&psz, flag_val['b']);
        mr_msg(1, "psz = '%s'", psz);
        if (psz[strlen(psz) - 1] == 'k') {
            psz[strlen(psz) - 1] = '\0';
            itbs = atol(psz) * 1024L;
        } else {
            itbs = atol(psz);
        }
        mr_free(psz);

        mr_msg(1, "'%s' --> %ld", flag_val['b'], itbs);
        mr_msg(1, "Internal tape block size is now %ld bytes", itbs);
        if (itbs % 512 != 0 || itbs < 256 || itbs > 1024L * 1024) {
            fatal_error
                ("Are you nuts? Silly, your internal tape block size is. Abort, I shall.");
        }
        bkpinfo->internal_tape_block_size = itbs;
    }

    if (flag_set['D']) {
        bkpinfo->differential = TRUE;
    } else {
        bkpinfo->differential = mr_conf->differential;
    }

    if (flag_set['x']) {
        strncpy(bkpinfo->image_devs, flag_val['x'], MAX_STR_LEN / 4);
        if (run_program_and_log_output("which ntfsclone", 2)) {
            fatal_error("Please install ntfsprogs package/tarball.");
        }
    }
    if (flag_set['m']) {
        bkpinfo->manual_tray = TRUE;
    }
    if (flag_set['k']) {
        mr_allocstr(bkpinfo->kernel_path, flag_val['k']);
        if (!strcmp(bkpinfo->kernel_path, "failsafe")) {
            mr_allocstr(bkpinfo->kernel_path, "FAILSAFE");
        }
        if (strcmp(bkpinfo->kernel_path, "FAILSAFE")
            && !does_file_exist(bkpinfo->kernel_path)) {
            retval++;
            mr_asprintf(&tmp2,
                    _("You specified kernel '%s', which does not exist\n"),
                    bkpinfo->kernel_path);
            log_to_screen(tmp2);
            mr_free(tmp2);
        }
    }

    if (flag_set['p']) {
        mr_allocstr(bkpinfo->prefix, flag_val['p']);
    }

    if (flag_set['d']) {        /* backup directory (if ISO/NFS/USB) */
        if (flag_set['i']) {
            strncpy(bkpinfo->isodir, flag_val['d'], MAX_STR_LEN / 4);
            mr_asprintf(&tmp2, "ls -l %s", bkpinfo->isodir);
            if (run_program_and_log_output(tmp2, 2)) {
                fatal_error
                    ("output folder does not exist - please create it");
            }
            mr_free(tmp2);
        } else if (flag_set['n']) {
            strncpy(bkpinfo->nfs_remote_dir, flag_val['d'], MAX_STR_LEN);
        } else {                /* backup device (if tape/CD-R/CD-RW) */
            mr_asprintf(&tmp2,flag_val['d']);
            mr_free(bkpinfo->media_device);
            bkpinfo->media_device = tmp2;
        }
    }

    if (flag_set['n']) {
        mr_asprintf(&tmp1,"%s/%s/.dummy.txt", bkpinfo->isodir,bkpinfo->nfs_remote_dir);
        mr_asprintf(&tmp2, "echo hi > %s", tmp1);
        if (run_program_and_log_output(tmp2, 2)) {
            retval++;
            mr_free(tmp2);
            mr_asprintf(&tmp2,
                    _("Are you sure directory '%s' exists in remote dir '%s'?\nIf so, do you have rights to write to it?\n"),
                    bkpinfo->nfs_remote_dir, bkpinfo->nfs_mount);
            log_to_screen(tmp2);
        }
        mr_free(tmp2);
        unlink(tmp1);
        mr_free(tmp1);
    }

    if (!flag_set['d']
        && (flag_set['w'] || flag_set['C'] || flag_set['U'])) {
        if (bkpinfo->media_device) {
            mr_msg(4, "Using device %s", bkpinfo->media_device);
            strncpy(flag_val['d'], bkpinfo->media_device, MAX_STR_LEN / 4);
            flag_set['d'] = TRUE;
        } else {
            fatal_error(_("No device provided either on command line or in the configuration file"));
        }
    }

    if (!flag_set['d'] && !flag_set['n'] && !flag_set['C']) {
        retval++;
        log_to_screen(_("Please specify the backup device/directory.\n"));
        fatal_error
            ("You didn't use -d to specify the backup device/directory.");
    }

    /* optional, obscure */
    for (i = '0'; i <= '9'; i++) {
        if (flag_set[i]) {
            bkpinfo->compression_level = i - '0';
        }                       /* not '\0' but '0' */
    }
    if (flag_set['S']) {
        sprintf(bkpinfo->scratchdir, "%s/mondo.scratch.%ld", flag_val['S'],
                random() % 32768);
    }
    if (flag_set['T']) {
        setup_tmpdir(flag_val['T']);
        mr_asprintf(&tmp2, "touch %s/.foo.dat", flag_val['T']);
        if (run_program_and_log_output(tmp2, 1)) {
            retval++;
            log_to_screen
                (_("Please specify a tempdir which I can write to. :)"));
            fatal_error("I cannot write to the tempdir you specified.");
        }
        mr_free(tmp2);

        mr_asprintf(&tmp2, "ln -sf %s/.foo.dat %s/.bar.dat", bkpinfo->tmpdir, bkpinfo->tmpdir);
        if (run_program_and_log_output(tmp2, 1)) {
            retval++;
            log_to_screen
                (_("Please don't specify a SAMBA or VFAT or NFS tmpdir."));
            fatal_error("I cannot write to the tempdir you specified.");
        }
        mr_free(tmp2);
    }

    if (flag_set['A']) {
        strncpy(bkpinfo->call_after_iso, flag_val['A'], MAX_STR_LEN);
    }
    if (flag_set['B']) {
        strncpy(bkpinfo->call_before_iso, flag_val['B'], MAX_STR_LEN);
    }
    if (flag_set['H']) {
        g_cd_recovery = TRUE;
    }
    if (flag_set['l']) {
#ifdef __FreeBSD__
#  define BOOT_LOADER_CHARS "GLBMR"
#else
#  ifdef __IA64__
#    define BOOT_LOADER_CHARS "GER"
#  else
#    define BOOT_LOADER_CHARS "GLR"
#  endif
#endif
        if (!strchr
            (BOOT_LOADER_CHARS,
             (bkpinfo->boot_loader = flag_val['l'][0]))) {
            mr_msg(1, "%c? What is %c? I need G, L, E or R.",
                    bkpinfo->boot_loader, bkpinfo->boot_loader);
            fatal_error
                ("Please specify GRUB, LILO, ELILO  or RAW with the -l switch");
        }
#undef BOOT_LOADER_CHARS
    }

    if (flag_set['f']) {
        strncpy(bkpinfo->boot_device,
                resolve_softlinks_to_get_to_actual_device_file(flag_val
                                                               ['f']),
                MAX_STR_LEN / 4);
    }

    if (flag_set['Q']) {
        if (bkpinfo->boot_device == NULL) {
            fatal_error("-f option required when using -Q\n");
        }
        i = which_boot_loader(bkpinfo->boot_device);
        mr_msg(3, "boot loader is %c, residing at %s", i, bkpinfo->boot_device);
        log_to_screen(_("boot loader is %c, residing at %s\n"), i, tmp);
        finish(0);
    }

    if (flag_set['P']) {
        strncpy(bkpinfo->postnuke_tarball, flag_val['P'], MAX_STR_LEN);
    }

    if (!flag_set['o']
        &&
        !run_program_and_log_output
        ("grep -Ei suse /etc/issue.net | grep -E '9.0' | grep 64", 2)) {
        bkpinfo->make_cd_use_lilo = TRUE;
        log_to_screen
            (_("Forcing you to use LILO. SuSE 9.0 (64-bit) has a broken mkfs.vfat binary."));
    }

    if (flag_set['o']) {
        bkpinfo->make_cd_use_lilo = TRUE;
    }
#ifndef __FreeBSD__
    else {
        if (!is_this_a_valid_disk_format("vfat")) {
            bkpinfo->make_cd_use_lilo = TRUE;
            log_to_screen
                (_("Your kernel appears not to support vfat filesystems. I am therefore"));
            log_to_screen
                (_("using LILO instead of SYSLINUX as the CD's boot loader."));
        }
        if (run_program_and_log_output("which mkfs.vfat", 2)) {
            bkpinfo->make_cd_use_lilo = TRUE;
#ifdef __IA32__
            log_to_screen
                (_("Your filesystem is missing 'mkfs.vfat', so I cannot use SYSLINUX as"));
            log_to_screen
                (_("your boot loader. I shall therefore use LILO instead."));
#endif
#ifdef __IA64__
            log_to_screen
                (_("Your filesystem is missing 'mkfs.vfat', so I cannot prepare the EFI"));
            log_to_screen(_("environment correctly. Please install it."));
            fatal_error("Aborting");
#endif
        }
#ifdef __IA64__
        /* We force ELILO usage on IA64 */
        bkpinfo->make_cd_use_lilo = TRUE;
#endif
    }
#endif

    if (bkpinfo->make_cd_use_lilo && !does_file_exist("/boot/boot.b")) {
        paranoid_system("touch /boot/boot.b");
    }

    i = flag_set['O'] + flag_set['V'];
    if (i == 0) {
        retval++;
        log_to_screen(_("Specify backup (-O), verify (-V) or both (-OV).\n"));
    }

/* and finally... */

    mr_free(tmp);
    return (retval);
}


/**
 * Get the switches from @p argc and @p argv using getopt() and place them in
 * @p flag_set and @p flag_val.
 * @param argc The argument count (@p argc passed to main()).
 * @param argv The argument vector (@p argv passed to main()).
 * @param flag_val An array indexed by switch letter - if a switch is set and
 * has an argument then set flag_val[switch] to that argument.
 * @param flag_set An array indexed by switch letter - if a switch is set then
 * set flag_set[switch] to TRUE, else set it to FALSE.
 * @return The number of problems with the command line (0 for success).
 */
int
retrieve_switches_from_command_line(int argc, char *argv[],
                                    char flag_val[128][MAX_STR_LEN],
                                    bool flag_set[128])
{
    /*@ ints ** */
    int opt = 0;
    char *tmp = NULL;
    int i = 0;
    int len = 0;

    /*@ bools *** */
    bool bad_switches = FALSE;

    assert(flag_val != NULL);
    assert(flag_set != NULL);

    for (i = 0; i < 128; i++) {
        flag_val[i][0] = '\0';
        flag_set[i] = FALSE;
    }
    while ((opt =
            getopt(argc, argv,
                   "0123456789A:B:C:DE:FGHI:J:K:LNOP:QRS:T:UVWb:c:d:ef:gik:l:mn:op:rs:tuw:x:z"))
           != -1) {
        if (opt == '?') {
            bad_switches = TRUE;
            /*log_it("Invalid option: %c\n",optopt); */
        } else {
            if (flag_set[optopt]) {
                bad_switches = TRUE;
                mr_asprintf(&tmp, _("Switch -%c previously defined as %s\n"), opt,
                        flag_val[i]);
                log_to_screen(tmp);
                mr_free(tmp);
            } else {
                flag_set[opt] = TRUE;
                if (optarg) {
                    len = strlen(optarg);
                    if (optarg[0] != '/' && optarg[len - 1] == '/') {
                        optarg[--len] = '\0';
                        log_to_screen
                            (_("Warning - param '%s' should not have trailing slash!"),
                             optarg);
                    }
                    if (opt == 'd') {
                        if (strchr(flag_val[opt], '/')
                            && flag_val[opt][0] != '/') {
                            mr_asprintf(&tmp,
                                    _("-%c flag --- must be absolute path --- '%s' isn't absolute"),
                                    opt, flag_val[opt]);
                            log_to_screen(tmp);
                            mr_free(tmp);
                            bad_switches = TRUE;
                        }
                    }
                    strcpy(flag_val[opt], optarg);
                }
            }
        }
    }
    for (i = optind; i < argc; i++) {
        bad_switches = TRUE;
        mr_asprintf(&tmp, _("Invalid arg -- %s\n"), argv[i]);
        log_to_screen(tmp);
        mr_free(tmp);
    }
    return (bad_switches);
}


/**
 * Terminate Mondo in response to a signal.
 * @param sig The signal number received.
 */
void terminate_daemon(int sig)
{
    char *tmp = NULL;
    char *tmp2 = NULL;

    switch (sig) {
    case SIGINT:
        mr_asprintf(&tmp, _("SIGINT signal received from OS"));
        mr_asprintf(&tmp2, _("You interrupted me :-)"));
        break;
    case SIGKILL:
        mr_asprintf(&tmp, _("SIGKILL signal received from OS"));
        mr_asprintf(&tmp2,
               _("I seriously have no clue how this signal even got to me. Something's wrong with your system."));
        break;
    case SIGTERM:
        mr_asprintf(&tmp, _("SIGTERM signal received from OS"));
        mr_asprintf(&tmp2, _("Got terminate signal"));
        break;
    case SIGHUP:
        mr_asprintf(&tmp, _("SIGHUP signal received from OS"));
        mr_asprintf(&tmp2, _("Hangup on line"));
        break;
    case SIGSEGV:
        mr_asprintf(&tmp, _("SIGSEGV signal received from OS"));
        mr_asprintf(&tmp2,
               _("Internal programming error. Please send a backtrace as well as your log."));
        break;
    case SIGPIPE:
        mr_asprintf(&tmp, _("SIGPIPE signal received from OS"));
        mr_asprintf(&tmp2, _("Pipe was broken"));
        break;
    case SIGABRT:
        mr_asprintf(&tmp, _("SIGABRT signal received from OS"));
        mr_asprintf(&tmp2,
                _("Abort - probably failed assertion. I'm sleeping for a few seconds so you can read the message."));
        break;
    default:
        mr_asprintf(&tmp, _("(Unknown)"));
        mr_asprintf(&tmp2, _("(Unknown)"));
    }

    log_to_screen(tmp);
    log_to_screen(tmp2);
    mr_free(tmp);
    mr_free(tmp2);
    if (sig == SIGABRT) {
        sleep(10);
    }
    kill_buffer();
    fatal_error
        ("Mondoarchive is terminating in response to a signal from the OS");
    finish(254);                // just in case
}


/**
 * Turn signal-trapping on or off.
 * @param on If TRUE, turn it on; if FALSE, turn it off (we still trap it, just don't do as much).
 */
void set_signals(int on)
{
    int signals[] =
        { SIGTERM, SIGHUP, SIGTRAP, SIGABRT, SIGINT, SIGKILL, SIGSTOP, 0 };
    int i;

    signal(SIGPIPE, sigpipe_occurred);
    for (i = 0; signals[i]; i++) {
        if (on) {
            signal(signals[i], terminate_daemon);
        } else {
            signal(signals[i], termination_in_progress);
        }
    }
}


/**
 * Exit immediately without cleaning up.
 * @param sig The signal we are exiting due to.
 */
void termination_in_progress(int sig)
{
    mr_msg(1, "Termination in progress");
    usleep(1000);
    pthread_exit(0);
}

/* @} - end of cliGroup */