source: trunk/mondo/mondo/common/libmondo-devices.c @ 688

Last change on this file since 688 was 688, checked in by bcornec, 13 years ago

Huge memory management patch.
Still not finished but a lot as been done.
What remains is around some functions returning strings, and some structure members.
(Could not finish due to laptop failure !)

  • Property svn:keywords set to Id
File size: 65.7 KB
Line 
1/*
2 * $Id: libmondo-devices.c 688 2006-07-17 13:44:46Z bcornec $
3 * Subroutines for handling devices
4 */
5/**
6 * @file
7 * Functions to handle interactions with backup devices.
8 */
9
10#include "my-stuff.h"
11#include "mondostructures.h"
12#include "libmondo-files-EXT.h"
13#include "libmondo-devices.h"
14#include "libmondo-string-EXT.h"
15#include "libmondo-tools-EXT.h"
16#include "newt-specific-EXT.h"
17#include "libmondo-fork-EXT.h"
18#include "libmondo-stream-EXT.h"
19
20#include <sys/ioctl.h>
21#include <sys/types.h>
22#include <unistd.h>
23#ifdef __FreeBSD__
24#define DKTYPENAMES
25#define FSTYPENAMES
26#include <sys/disklabel.h>
27#include <sys/disk.h>
28#elif linux
29#define u64 unsigned long long
30#include <linux/fs.h>           /* for BLKGETSIZE64 */
31#include <linux/hdreg.h>
32#endif
33
34/*@unused@*/
35//static char cvsid[] = "$Id: libmondo-devices.c 688 2006-07-17 13:44:46Z bcornec $";
36
37extern int g_current_media_number;
38extern double g_kernel_version;
39
40extern bool g_ISO_restore_mode;
41extern struct s_bkpinfo *g_bkpinfo_DONTUSETHIS;
42extern char *g_erase_tmpdir_and_scratchdir;
43extern char *g_selfmounted_isodir;
44
45static char *g_cdrw_drive_is_here = NULL;
46static char *g_cdrom_drive_is_here = NULL;
47static char *g_dvd_drive_is_here = NULL;
48
49
50/**
51 * ????? @bug ?????
52 * @ingroup globalGroup
53 */
54bool g_restoring_live_from_cd = FALSE;
55
56extern t_bkptype g_backup_media_type;   // set by main()
57
58
59
60
61void set_g_cdrom_and_g_dvd_to_bkpinfo_value(struct s_bkpinfo *bkpinfo)
62{
63    if (bkpinfo->media_device != NULL) {
64        paranoid_alloc(g_cdrom_drive_is_here, bkpinfo->media_device);   // just in case
65    }
66    if (bkpinfo->media_device != NULL) {
67        paranoid_alloc(g_dvd_drive_is_here, bkpinfo->media_device); // just in case
68    }
69}
70
71
72
73/**
74 * Retract all CD trays and wait for autorun to complete.
75 * @ingroup deviceGroup
76 */
77void retract_CD_tray_and_defeat_autorun(void)
78{
79//  log_it("rctada: Retracting all CD trays", __LINE__);
80    if (strlen(g_cdrom_drive_is_here) > 0) {
81        inject_device(g_cdrom_drive_is_here);
82    }
83    if (strlen(g_dvd_drive_is_here) > 0) {
84        inject_device(g_dvd_drive_is_here);
85    }
86    if (strlen(g_cdrw_drive_is_here) > 0) {
87        inject_device(g_cdrw_drive_is_here);
88    }
89//  log_it("rctada: killing autorun");
90//  run_program_and_log_output("killall autorun", TRUE);
91    if (!run_program_and_log_output("ps | grep autorun | grep -v grep", 5)) {
92        log_it("autorun detected; sleeping for 2 seconds");
93        sleep(2);
94    }
95    log_it("rctada: Unmounting all CD drives", __LINE__);
96    run_program_and_log_output("umount /dev/cdr* /dev/dvd*", 5);
97}
98
99
100
101/**
102 * Determine whether we're booted off a ramdisk.
103 * @return @c TRUE (we are) or @c FALSE (we aren't).
104 * @ingroup utilityGroup
105 */
106bool am_I_in_disaster_recovery_mode(void)
107{
108    char *tmp, *comment;
109    bool is_this_a_ramdisk = FALSE;
110
111    asprintf(&tmp, where_is_root_mounted());
112    asprintf(&comment, "root is mounted at %s\n", tmp);
113    log_msg(0, comment);
114    paranoid_free(comment);
115
116    log_msg(0,
117            "No, Schlomo, that doesn't mean %s is the root partition. It's just a debugging message. Relax. It's part of am_I_in_disaster_recovery_mode().",
118            tmp);
119
120#ifdef __FreeBSD__
121    if (strstr(tmp, "/dev/md")) {
122        is_this_a_ramdisk = TRUE;
123    }
124#else
125    if (!strncmp(tmp, "/dev/ram", 8)
126        || (!strncmp(tmp, "/dev/rd", 7) && !strcmp(tmp, "/dev/rd/")
127            && strncmp(tmp, "/dev/rd/cd", 10)) || strstr(tmp, "rootfs")
128        || !strcmp(tmp, "/dev/root")) {
129        is_this_a_ramdisk = TRUE;
130    } else {
131        is_this_a_ramdisk = FALSE;
132    }
133#endif
134    paranoid_free(tmp);
135
136    if (is_this_a_ramdisk) {
137        if (!does_file_exist("/THIS-IS-A-RAMDISK")
138            && !does_file_exist("/tmp/mountlist.txt.sample")) {
139            log_to_screen
140                (_("Using /dev/root is stupid of you but I'll forgive you."));
141            is_this_a_ramdisk = FALSE;
142        }
143    }
144    if (does_file_exist("/THIS-IS-A-RAMDISK")) {
145        is_this_a_ramdisk = TRUE;
146    }
147    log_msg(1, "Is this a ramdisk? result = %d", is_this_a_ramdisk);
148    return (is_this_a_ramdisk);
149}
150
151
152/**
153 * Turn @c bkpinfo->backup_media_type into a human-readable string.
154 * @return The human readable string (e.g. @c cdr becomes <tt>"cdr"</tt>).
155 * @note The returned string points to static storage that will be overwritten with each call.
156 * @ingroup stringGroup
157 */
158char *bkptype_to_string(t_bkptype bt)
159{
160    char *output = NULL;
161
162    paranoid_free(output);
163
164    switch (bt) {
165    case none:
166        asprintf(&output, _("none"));
167        break;
168    case iso:
169        asprintf(&output, _("iso"));
170        break;
171    case cdr:
172        asprintf(&output, _("cdr"));
173        break;
174    case cdrw:
175        asprintf(&output, _("cdrw"));
176        break;
177    case cdstream:
178        asprintf(&output, _("cdstream"));
179        break;
180    case nfs:
181        asprintf(&output, _("nfs"));
182        break;
183    case tape:
184        asprintf(&output, _("tape"));
185        break;
186    case udev:
187        asprintf(&output, _("udev"));
188        break;
189    default:
190        asprintf(&output, _("default"));
191    }
192    return (output);
193}
194
195
196/**
197 * @addtogroup deviceGroup
198 * @{
199 */
200/**
201 * Eject the tray of the specified CD device.
202 * @param dev The device to eject.
203 * @return the return value of the @c eject command. (0=success, nonzero=failure)
204 */
205int eject_device(char *dev)
206{
207    char *command;
208    int res1 = 0, res2 = 0;
209
210    if (IS_THIS_A_STREAMING_BACKUP(g_backup_media_type)
211        && g_backup_media_type != udev) {
212        asprintf(&command, "mt -f %s offline", dev);
213        res1 = run_program_and_log_output(command, 1);
214        paranoid_free(command);
215    } else {
216        res1 = 0;
217    }
218
219#ifdef __FreeBSD__
220    if (strstr(dev, "acd")) {
221        asprintf(&command, "cdcontrol -f %s eject", dev);
222    } else {
223        asprintf(&command, "camcontrol eject `echo %s | sed 's|/dev/||'`",
224                dev);
225    }
226#else
227    asprintf(&command, "eject %s", dev);
228#endif
229
230    log_msg(3, "Ejecting %s", dev);
231    res2 = run_program_and_log_output(command, 1);
232    paranoid_free(command);
233    if (res1 && res2) {
234        return (1);
235    } else {
236        return (0);
237    }
238}
239
240
241/**
242 * Load (inject) the tray of the specified CD device.
243 * @param dev The device to load/inject.
244 * @return 0 for success, nonzero for failure.
245 */
246int inject_device(char *dev)
247{
248    char *command;
249    int i;
250
251#ifdef __FreeBSD__
252    if (strstr(dev, "acd")) {
253        asprintf(&command, "cdcontrol -f %s close", dev);
254    } else {
255        asprintf(&command, "camcontrol load `echo %s | sed 's|/dev/||'`",
256                dev);
257    }
258#else
259    asprintf(&command, "eject -t %s", dev);
260#endif
261    i = run_program_and_log_output(command, FALSE);
262    paranoid_free(command);
263    return (i);
264}
265
266
267/**
268 * Determine whether the specified @p device (really, you can use any file)
269 * exists.
270 * @return TRUE if it exists, FALSE if it doesn't.
271 */
272bool does_device_exist(char *device)
273{
274
275    /*@ buffers *********************************************************** */
276    char *tmp;
277    bool ret;
278
279    assert_string_is_neither_NULL_nor_zerolength(device);
280
281    asprintf(&tmp, "ls %s > /dev/null 2> /dev/null", device);
282
283    if (system(tmp)) {
284        ret = FALSE;
285    } else {
286        ret = TRUE;
287    }
288    paranoid_free(tmp);
289    return(ret);
290}
291
292
293/**
294 * Determine whether a non-Microsoft partition exists on any connected hard drive.
295 * @return TRUE (there's a Linux/FreeBSD partition) or FALSE (Microsoft has taken over yet another innocent PC).
296 */
297bool does_nonMS_partition_exist(void)
298{
299#if __FreeBSD__
300    return
301        !system
302        ("for drive in /dev/ad? /dev/da?; do fdisk $drive | grep -q FreeBSD && exit 0; done; false");
303#else
304    return
305        !system
306        ("parted2fdisk -l 2>/dev/null | grep '^/dev/' | grep -Eqv '(MS|DOS|FAT|NTFS)'");
307#endif
308}
309
310/**
311 * Determine whether the specified @p partno exists on the specified @p drive.
312 * @param drive The drive to search for the partition in.
313 * @param partno The partition number to look for.
314 * @return 0 if it exists, nonzero otherwise.
315 */
316int does_partition_exist(const char *drive, int partno)
317{
318    /*@ buffers **************************************************** */
319    char *program;
320    char *incoming = NULL;
321    char *searchstr;
322    char *tmp;
323
324    /*@ ints ******************************************************* */
325    int res = 0;
326    size_t n = 0;
327
328    /*@ pointers *************************************************** */
329    FILE *fin;
330
331
332    /*@ end vars *************************************************** */
333    assert_string_is_neither_NULL_nor_zerolength(drive);
334    assert(partno >= 0 && partno < 999);
335
336#ifdef __FreeBSD__
337    // We assume here that this is running from mondorestore. (It is.)
338    asprintf(&program, "ls %s >/dev/null 2>&1", drive);
339    res = system(program);
340    paranoid_free(program);
341    return(res);
342#endif
343
344    asprintf(&program, "parted2fdisk -l %s 2> /dev/null", drive);
345    fin = popen(program, "r");
346    if (!fin) {
347        log_it("program=%s", program);
348        log_OS_error("Cannot popen-in program");
349        paranoid_free(program);
350        return (0);
351    }
352    paranoid_free(program);
353
354    searchstr = build_partition_name(drive, partno);
355    asprintf(&tmp, "%s ", searchstr);
356    paranoid_free(searchstr);
357
358    for (res = 0; !res && getline(&incoming, &n, fin);) {
359        if (strstr(incoming, tmp)) {
360            res = 1;
361        }
362    }
363    paranoid_free(incoming);
364
365    if (pclose(fin)) {
366        log_OS_error("Cannot pclose fin");
367    }
368    paranoid_free(tmp);
369    return (res);
370}
371
372
373/**
374 * Determine whether given NULL-terminated @p str exists in the MBR of @p dev.
375 * @param dev The device to look in.
376 * @param str The string to look for.
377 * @return TRUE if it exists, FALSE if it doesn't.
378 */
379bool does_string_exist_in_boot_block(char *dev, char *str)
380{
381    /*@ buffers **************************************************** */
382    char *command;
383
384    /*@ end vars *************************************************** */
385    int ret;
386
387    assert_string_is_neither_NULL_nor_zerolength(dev);
388    assert_string_is_neither_NULL_nor_zerolength(str);
389
390    asprintf(&command,
391            "dd if=%s bs=446 count=1 2> /dev/null | strings | grep \"%s\" > /dev/null 2> /dev/null",
392            dev, str);
393    ret = system(command);
394    paranoid_free(command);
395    if (ret) {
396        return (FALSE);
397    } else {
398        return (TRUE);
399    }
400}
401
402
403/**
404 * Determine whether specified @p str exists in the first @p n sectors of
405 * @p dev.
406 * @param dev The device to look in.
407 * @param str The string to look for.
408 * @param n The number of 512-byte sectors to search.
409 */
410bool does_string_exist_in_first_N_blocks(char *dev, char *str, int n)
411{
412    /*@ buffers **************************************************** */
413    char *command;
414    /*@ end vars *************************************************** */
415    int ret;
416
417    asprintf(&command,
418            "dd if=%s bs=512 count=%i 2> /dev/null | strings | grep \"%s\" > /dev/null 2> /dev/null",
419            dev, n, str);
420    ret = system(command);
421    paranoid_free(command);
422
423    if (ret) {
424        return (FALSE);
425    } else {
426        return (TRUE);
427    }
428}
429
430
431/**
432 * Try to mount CD-ROM at @p mountpoint. If the CD-ROM is not found or has
433 * not been specified, call find_cdrom_device() to find it.
434 * @param bkpinfo The backup information structure. The only field used is @c bkpinfo->media_device.
435 * @param mountpoint Where to mount the CD-ROM.
436 * @return 0 for success, nonzero for failure.
437 * @see mount_CDROM_here
438 */
439bool find_and_mount_actual_cd(struct s_bkpinfo *bkpinfo, char *mountpoint)
440{
441    /*@ buffers ***************************************************** */
442
443    /*@ int's  ****************************************************** */
444    bool res = TRUE;
445    char *dev = NULL;
446
447    /*@ end vars **************************************************** */
448
449    assert(bkpinfo != NULL);
450    assert_string_is_neither_NULL_nor_zerolength(mountpoint);
451
452    if (g_backup_media_type == dvd) {
453        if (g_dvd_drive_is_here != NULL) {
454            asprintf(&dev, g_dvd_drive_is_here);
455        } else {
456            dev = find_dvd_device();
457        }
458    } else {
459        if (g_cdrom_drive_is_here != NULL) {
460            asprintf(&dev, g_cdrom_drive_is_here);
461        } else {
462            // find_cdrom_device allocates the string
463            dev = find_cdrom_device(FALSE);
464        }
465    }
466
467    if (bkpinfo->backup_media_type != iso) {
468        retract_CD_tray_and_defeat_autorun();
469    }
470
471    if ((dev == NULL) || (! mount_CDROM_here(dev, mountpoint))) {
472        paranoid_free(dev);
473        if (!popup_and_get_string
474            (_("CD-ROM device"), _("Please enter your CD-ROM's /dev device"), dev)) {
475            res = FALSE;
476        } else {
477            res = mount_CDROM_here(dev, mountpoint);
478        }
479    }
480    if (res) {
481        log_msg(1, _("mount failed"));
482    } else {
483        log_msg(1, _("mount succeeded with %s"), dev);
484    }
485    paranoid_free(dev);
486    return(res);
487}
488
489
490/**
491 * Locate a CD-R/W writer's SCSI node.
492 * @param cdrw_device SCSI node will be placed here. Caller needs to free it.
493 * @return the cdrw device or NULL if not found
494 */
495char *find_cdrw_device(void)
496{
497    /*@ buffers ************************ */
498    char *comment;
499    char *tmp;
500    char *cdr_exe;
501    char *command;
502    char *cdrw_device;
503
504    if (g_cdrw_drive_is_here != NULL) {
505        asprintf(&cdrw_device, g_cdrw_drive_is_here);
506        log_msg(3, "Been there, done that. Returning %s", cdrw_device);
507        return(cdrw_device);
508    }
509    if (g_backup_media_type == dvd) {
510        log_msg(1,
511                "This is dumb. You're calling find_cdrw_device() but you're backing up to DVD. WTF?");
512        return(NULL);
513    }
514    run_program_and_log_output("insmod ide-scsi", -1);
515    if (find_home_of_exe("cdrecord")) {
516        asprintf(&cdr_exe, "cdrecord");
517    } else {
518        asprintf(&cdr_exe, "dvdrecord");
519    }
520    if (find_home_of_exe(cdr_exe)) {
521        asprintf(&command,
522                "%s -scanbus 2> /dev/null | tr -s '\t' ' ' | grep \"[0-9]*,[0-9]*,[0-9]*\" | grep -v \"[0-9]*) \\*\" | grep CD | cut -d' ' -f2 | head -n1",
523                cdr_exe);
524        asprintf(&tmp, call_program_and_get_last_line_of_output(command));
525        paranoid_free(command);
526    } else {
527        asprintf(&tmp, " ");
528    }
529    paranoid_free(cdr_exe);
530
531    if (strlen(tmp) < 2) {
532        paranoid_free(tmp);
533        return(NULL);
534    } else {
535        cdrw_device = tmp;
536
537        asprintf(&comment, "Found CDRW device - %s", cdrw_device);
538        log_it(comment);
539        paranoid_free(comment);
540
541        paranoid_free(g_cdrw_drive_is_here);
542        asprintf(&g_cdrw_drive_is_here, cdrw_device);
543        return(cdrw_device);
544    }
545}
546
547
548/**
549 * Attempt to locate a CD-ROM device's /dev entry.
550 * Several different methods may be used to find the device, including
551 * calling @c cdrecord, searching @c dmesg, and trial-and-error.
552 * @param output Where to put the located /dev entry. Needs to be freed by the caller.
553 * @param try_to_mount Whether to mount the CD as part of the test; if mount
554 * fails then return failure.
555 * @return output if success or NULL otherwise.
556 */
557char *find_cdrom_device(bool try_to_mount)
558{
559    /*@ pointers **************************************************** */
560    FILE *fin = NULL;
561    char *p = NULL;
562    char *q = NULL;
563    char *r = NULL;
564    char *output = NULL;
565    size_t n = 0;
566
567    /*@ bool's ****************************************************** */
568    bool found_it = FALSE;
569
570    /*@ buffers ***************************************************** */
571    char *tmp = NULL;
572    char *cdr_exe = NULL;
573#ifndef __FreeBSD__
574    char *phrase_two = NULL;
575    char *dvd_last_resort = NULL;
576#endif
577    char *command = NULL;
578    char *mountpoint = NULL;
579    static char *the_last_place_i_found_it = NULL;
580
581    /*@ end vars **************************************************** */
582
583    if ((g_cdrom_drive_is_here != NULL) && !isdigit(g_cdrom_drive_is_here[0])) {
584        asprintf(&output, g_cdrom_drive_is_here);
585        log_msg(3, "Been there, done that. Returning %s", output);
586        return(output);
587    }
588    if ((the_last_place_i_found_it != NULL) && !try_to_mount) {
589        asprintf(&output, the_last_place_i_found_it);
590        log_msg(3,
591                "find_cdrom_device() --- returning last found location - '%s'",
592                output);
593        return(output);
594    }
595
596    if (find_home_of_exe("cdrecord")) {
597        asprintf(&cdr_exe, "cdrecord");
598    } else {
599        asprintf(&cdr_exe, "dvdrecord");
600    }
601    if (!find_home_of_exe(cdr_exe)) {
602        asprintf(&output, "/dev/cdrom");
603        log_msg(4, "Can't find cdrecord; assuming %s", output);
604        if (!does_device_exist(output)) {
605            log_msg(4, "That didn't work. Sorry.");
606            paranoid_free(cdr_exe);
607            paranoid_free(output);
608            return(NULL);
609        } else {
610            paranoid_free(cdr_exe);
611            return(output);
612        }
613    }
614
615    asprintf(&command, "%s -scanbus 2> /dev/null", cdr_exe);
616    fin = popen(command, "r");
617    if (!fin) {
618        log_msg(4, "command=%s", command);
619        log_OS_error("Cannot popen command");
620        paranoid_free(cdr_exe);
621        paranoid_free(command);
622        return (NULL);
623    }
624    paranoid_free(command);
625
626    for (getline(&tmp, &n, fin); !feof(fin);
627         getline(&tmp, &n, fin)) {
628        p = strchr(tmp, '\'');
629        if (p) {
630            q = strchr(++p, '\'');
631            if (q) {
632                for (r = q; *(r - 1) == ' '; r--);
633                *r = '\0';
634                p = strchr(++q, '\'');
635                if (p) {
636                    q = strchr(++p, '\'');
637                    if (q) {
638                        while (*(q - 1) == ' ') {
639                            q--;
640                        }
641                        *q = '\0';
642#ifndef __FreeBSD__
643                        paranoid_free(phrase_two);
644                        asprintf(&phrase_two, p);
645#endif
646                    }
647                }
648            }
649        }
650    }
651    paranoid_pclose(fin);
652    paranoid_free(tmp);
653    tmp = NULL;
654    n = 0;
655
656#ifndef __FreeBSD__
657    if (strlen(phrase_two) == 0) {
658        log_msg(4, "Not running phase two. String is empty.");
659    } else {
660        asprintf(&command, "dmesg | grep \"%s\" 2> /dev/null", phrase_two);
661        fin = popen(command, "r");
662        if (!fin) {
663            log_msg(4, "Cannot run 2nd command - non-fatal, fortunately");
664        } else {
665            for (getline(&tmp, &n, fin); !feof(fin);
666                 getline(&tmp, &n, fin)) {
667                log_msg(5, "--> '%s'", tmp);
668                if (tmp[0] != ' ' && tmp[1] != ' ') {
669                    p = strchr(tmp, ':');
670                    if (p) {
671                        *p = '\0';
672                        if (strstr(tmp, "DVD")) {
673                            paranoid_free(dvd_last_resort);
674                            asprintf(&dvd_last_resort, "/dev/%s", tmp);
675                            log_msg(4,
676                                    "Ignoring '%s' because it's a DVD drive",
677                                    tmp);
678                        } else {
679                            asprintf(&output, "/dev/%s", tmp);
680                            found_it = TRUE;
681                        }
682                    }
683                }
684            }
685            paranoid_free(tmp);
686            paranoid_pclose(fin);
687        }
688        paranoid_free(command);
689    }
690    paranoid_free(phrase_two);
691
692#endif
693#ifdef __FreeBSD__
694    if (!found_it) {
695        log_msg(4, "OK, approach 2");
696        if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/cdrom"))) {
697            if (!
698                (found_it =
699                 set_dev_to_this_if_rx_OK(output, "/dev/cdrom1"))) {
700                if (!
701                    (found_it =
702                     set_dev_to_this_if_rx_OK(output, "/dev/dvd"))) {
703                    if (!
704                        (found_it =
705                         set_dev_to_this_if_rx_OK(output, "/dev/acd0"))) {
706                        if (!
707                            (found_it =
708                             set_dev_to_this_if_rx_OK(output,
709                                                      "/dev/cd01"))) {
710                            if (!
711                                (found_it =
712                                 set_dev_to_this_if_rx_OK(output,
713                                                          "/dev/acd1"))) {
714                                if (!
715                                    (found_it =
716                                     set_dev_to_this_if_rx_OK(output,
717                                                              "/dev/cd1")))
718                                {
719                                    paranoid_free(cdr_exe);
720                                    return(NULL);
721                                }
722                            }
723                        }
724                    }
725                }
726            }
727        }
728    }
729#else
730    if (dvd_last_resort != NULL) {
731        if (!found_it && strlen(dvd_last_resort) > 0) {
732            log_msg(4, "Well, I'll use the DVD - %s - as a last resort",
733                    dvd_last_resort);
734            paranoid_free(output);
735            asprintf(&output, dvd_last_resort);
736            found_it = TRUE;
737        }
738    }
739    paranoid_free(dvd_last_resort);
740
741    if (found_it) {
742        asprintf(&tmp, "grep \"%s=ide-scsi\" /proc/cmdline &> /dev/null",
743                strrchr(output, '/') + 1);
744        if (system(tmp) == 0) {
745            log_msg(4,
746                    "%s is not right. It's being SCSI-emulated. Continuing.",
747                    output);
748            found_it = FALSE;
749            paranoid_free(output);
750        }
751        paranoid_free(tmp);
752    }
753
754    if (found_it) {
755        log_msg(4, "(find_cdrom_device) --> '%s'", output);
756        if (!does_device_exist(output)) {
757            log_msg(4, "OK, I was wrong, I haven't found it... yet.");
758            found_it = FALSE;
759            paranoid_free(output);
760        }
761    }
762
763    if (!found_it) {
764        log_msg(4, "OK, approach 2");
765        if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/scd0"))) {
766            if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/sr0"))) {
767                if (!
768                    (found_it =
769                     set_dev_to_this_if_rx_OK(output, "/dev/cdrom"))) {
770                    if (!
771                        (found_it =
772                         set_dev_to_this_if_rx_OK(output,
773                                                  "/dev/cdrom0"))) {
774                        if (!
775                            (found_it =
776                             set_dev_to_this_if_rx_OK(output,
777                                                      "/dev/cdrom1"))) {
778                            if (!
779                                (found_it =
780                                 set_dev_to_this_if_rx_OK(output,
781                                                          "/dev/sr1"))) {
782                                if (!
783                                    (found_it =
784                                     set_dev_to_this_if_rx_OK(output,
785                                                              "/dev/dvd")))
786                                {
787                                    if (!
788                                        (found_it =
789                                         set_dev_to_this_if_rx_OK(output,
790                                                                  g_cdrw_drive_is_here)))
791                                    {
792                                        paranoid_free(cdr_exe);
793                                        return(NULL);
794                                    }
795                                }
796                            }
797                        }
798                    }
799                }
800            }
801        }
802    }
803#endif
804
805    asprintf(&mountpoint, "/tmp/cd.%d", (int) (random() % 32767));
806    make_hole_for_dir(mountpoint);
807
808    if (found_it && try_to_mount) {
809        if (! mount_CDROM_here(output, mountpoint)) {
810            log_msg(4, "[Cardigans] I've changed my mind");
811            found_it = FALSE;
812            paranoid_free(output);
813        } else {
814            asprintf(&tmp, "%s/archives", mountpoint);
815            if (!does_file_exist(tmp)) {
816                log_msg(4, "[Cardigans] I'll take it back");
817                found_it = FALSE;
818                paranoid_free(output);
819            } else {
820                asprintf(&command, "umount %s", output);
821                paranoid_system(command);
822                paranoid_free(command);
823                log_msg(4, "I'm confident the Mondo CD is in %s", output);
824            }
825            paranoid_free(tmp);
826        }
827    }
828    unlink(mountpoint);
829    paranoid_free(mountpoint);
830
831    if (found_it) {
832        if (!does_file_exist(output)) {
833            log_msg(3, "I still haven't found it.");
834            paranoid_free(output);
835            return(NULL);
836        }
837        log_msg(3, "(find_cdrom_device) --> '%s'", output);
838        asprintf(&the_last_place_i_found_it, output);
839        paranoid_free(g_cdrom_drive_is_here);
840        asprintf(&g_cdrom_drive_is_here, output);
841        return(output);
842    }
843
844    asprintf(&command,
845            "%s -scanbus | grep \"[0-9],[0-9],[0-9]\" | grep \"[D|C][V|D]\" | grep -n \"\" | grep \"%s\" | cut -d':' -f2",
846            cdr_exe, g_cdrw_drive_is_here);
847    paranoid_free(cdr_exe);
848
849    log_msg(1, "command=%s", command);
850    asprintf(&tmp, call_program_and_get_last_line_of_output(command));
851    paranoid_free(command);
852
853    if (tmp[0]) {
854        output = tmp;
855        log_msg(4, "Finally found it at %s", output);
856    } else {
857        paranoid_free(tmp);
858        paranoid_free(output);
859        log_msg(4, "Still couldn't find it.");
860    }
861    return(output);
862}
863
864
865char *find_dvd_device()
866{
867    char *tmp = NULL;
868    int retval = 0, devno = -1;
869    char *output = NULL; 
870
871    if (g_dvd_drive_is_here != NULL) {
872        asprintf(&output, g_dvd_drive_is_here);
873        log_msg(3, "Been there, done that. Returning %s", output);
874        return (output);
875    }
876
877    asprintf(&tmp, call_program_and_get_last_line_of_output
878            ("dvdrecord -scanbus 2> /dev/null | grep \") '\" | grep -n \"\" | grep DVD | cut -d':' -f1")
879        );
880    log_msg(5, "tmp = '%s'", tmp);
881    if (!tmp[0]) {
882        paranoid_free(tmp);
883        asprintf(&tmp, call_program_and_get_last_line_of_output
884                ("cdrecord -scanbus 2> /dev/null | grep \") '\" | grep -n \"\" | grep DVD | cut -d':' -f1")
885            );
886    }
887    if (tmp[0]) {
888        devno = atoi(tmp) - 1;
889    }
890    paranoid_free(tmp);
891
892    if (devno >= 0) {
893        retval = 0;
894        asprintf(&output, "/dev/scd%d", devno);
895        paranoid_free(g_dvd_drive_is_here);
896        asprintf(&g_dvd_drive_is_here, output);
897        log_msg(2, "I think DVD is at %s", output);
898    } else {
899        log_msg(2, "I cannot find DVD");
900    }
901
902    return(output);
903}
904
905
906/**
907 * Find the size of the specified @p drive, in megabytes. Uses @c ioctl calls
908 * and @c dmesg.
909 * @param drive The device to find the size of.
910 * @return size in megabytes.
911 */
912long get_phys_size_of_drive(char *drive)
913{
914    int fd;
915#if linux
916    unsigned long long s = 0;
917    int fileid, cylinders = 0, cylindersleft = 0;
918    int cylindersize = 0;
919    int gotgeo = 0;
920
921
922    struct hd_geometry hdgeo;
923#elif __FreeBSD__
924    off_t s;
925#endif
926
927    long outvalA = -1;
928    long outvalB = -1;
929    long outvalC = -1;
930
931    if ((fd = open(drive, O_RDONLY)) != -1) {
932        if (ioctl(fd,
933#if linux
934#ifdef BLKGETSIZE64
935                  BLKGETSIZE64,
936#else
937                  BLKGETSIZE,
938#endif
939#elif __FreeBSD__
940                  DIOCGMEDIASIZE,
941#endif
942                  &s) != -1) {
943            close(fd);
944            // s>>11 works for older disks but not for newer ones
945            outvalB =
946#if linux
947#ifdef BLKGETSIZE64
948                s >> 20
949#else
950                s >> 11
951#endif
952#else
953                s >> 20
954#endif
955                ;
956        }
957    }
958
959    if (outvalB <= 0) {
960        log_msg(1, "Error getting size of %s: %s", drive, strerror(errno));
961#if linux
962    fileid = open(drive, O_RDONLY);
963    if (fileid) {
964        if (ioctl(fileid, HDIO_GETGEO, &hdgeo) != -1) {
965            if (hdgeo.cylinders && hdgeo.heads && hdgeo.sectors) {
966                cylindersleft = cylinders = hdgeo.cylinders;
967                cylindersize = hdgeo.heads * hdgeo.sectors / 2;
968                outvalA = cylindersize * cylinders / 1024;
969                log_msg(2, "Got Harddisk geometry, C:%d, H:%d, S:%d",
970                        hdgeo.cylinders, hdgeo.heads, hdgeo.sectors);
971                gotgeo = 1;
972            } else {
973                log_msg(1, "Harddisk geometry wrong");
974            }
975        } else {
976            log_msg(1,
977                    "Error in ioctl() getting new hard disk geometry (%s), resizing in unsafe mode",
978                    strerror(errno));
979        }
980        close(fileid);
981    } else {
982        log_msg(1, "Failed to open %s for reading: %s", drive,
983                strerror(errno));
984    }
985    if (!gotgeo) {
986        log_msg(1, "Failed to get harddisk geometry, using old mode");
987    }
988#endif
989    }
990// OLDER DISKS will give ridiculously low value for outvalB (so outvalA is returned) :)
991// NEWER DISKS will give sane value for outvalB (close to outvalA, in other words) :)
992
993    outvalC = (outvalA > outvalB) ? outvalA : outvalB;
994
995//  log_msg (5, "drive = %s, error = %s", drive, strerror (errno));
996//  fatal_error ("GPSOD: Unable to get size of drive");
997    log_msg(1, "%s --> %ld or %ld --> %ld", drive, outvalA, outvalB,
998            outvalC);
999
1000    return (outvalC);
1001}
1002
1003
1004/**
1005 * Determine whether @p format is supported by the kernel. Uses /proc/filesystems
1006 * under Linux and @c lsvfs under FreeBSD.
1007 * @param format The format to test.
1008 * @return TRUE if the format is supported, FALSE if not.
1009 */
1010bool is_this_a_valid_disk_format(char *format)
1011{
1012    char *good_formats = NULL;
1013    char *command = NULL;
1014    char *tmp = NULL;
1015    char *format_sz = NULL;
1016
1017    FILE *pin = NULL;
1018    bool retval;
1019    size_t n = 0;
1020    assert_string_is_neither_NULL_nor_zerolength(format);
1021
1022    asprintf(&format_sz, "%s ", format);
1023
1024#ifdef __FreeBSD__
1025    asprintf(&command,
1026            "lsvfs | tr -s '\t' ' ' | grep -v Filesys | grep -v -- -- | cut -d' ' -f1 | tr -s '\n' ' '");
1027#else
1028    asprintf(&command,
1029            "grep -v nodev /proc/filesystems | tr -s '\t' ' ' | cut -d' ' -f2 | tr -s '\n' ' '");
1030#endif
1031
1032    pin = popen(command, "r");
1033    paranoid_free(command);
1034
1035    if (!pin) {
1036        log_OS_error("Unable to read good formats");
1037        retval = FALSE;
1038    } else {
1039        getline(&good_formats, &n , pin);
1040        if (pclose(pin)) {
1041            log_OS_error("Cannot pclose good formats");
1042        }
1043        strip_spaces(good_formats);
1044        // " ntfs 7 " -- um, cheating much? :)
1045        asprintf(&tmp, " %s swap lvm raid ntfs 7 ",good_formats);
1046        paranoid_free(good_formats);
1047        good_formats = tmp;
1048
1049        if (strstr(good_formats, format_sz)) {
1050            retval = TRUE;
1051        } else {
1052            retval = FALSE;
1053        }
1054        paranoid_free(good_formats);
1055    }
1056    paranoid_free(format_sz);
1057    return (retval);
1058}
1059
1060
1061/** @def SWAPLIST_COMMAND The command to list the swap files/partitions in use. */
1062
1063/**
1064 * Determine whether @p device_raw is currently mounted.
1065 * @param device_raw The device to check.
1066 * @return TRUE if it's mounted, FALSE if not.
1067 */
1068bool is_this_device_mounted(char *device_raw)
1069{
1070
1071    /*@ pointers **************************************************** */
1072    FILE *fin;
1073
1074    /*@ buffers ***************************************************** */
1075    char *incoming = NULL;
1076    char *device_with_tab;
1077    char *device_with_space;
1078    char *tmp;
1079    size_t n = 0;
1080
1081#ifdef __FreeBSD__
1082#define SWAPLIST_COMMAND "swapinfo"
1083#else
1084#define SWAPLIST_COMMAND "cat /proc/swaps"
1085#endif
1086
1087    /*@ end vars **************************************************** */
1088
1089    assert(device_raw != NULL);
1090//  assert_string_is_neither_NULL_nor_zerolength(device_raw);
1091    if (device_raw[0] != '/' && !strstr(device_raw, ":/")) {
1092        log_msg(1, "%s needs to have a '/' prefixed - I'll do it",
1093                device_raw);
1094        asprintf(&tmp, "/%s", device_raw);
1095    } else {
1096        asprintf(&tmp, device_raw);
1097    }
1098    log_msg(1, "Is %s mounted?", tmp);
1099    if (!strcmp(tmp, "/proc") || !strcmp(tmp, "proc")) {
1100        log_msg(1,
1101                "I don't know how the heck /proc made it into the mountlist. I'll ignore it.");
1102        return (FALSE);
1103    }
1104    asprintf(&device_with_tab, "%s\t", tmp);
1105    asprintf(&device_with_space, "%s ", tmp);
1106    paranoid_free(tmp);
1107
1108    if (!(fin = popen("mount", "r"))) {
1109        log_OS_error("Cannot popen 'mount'");
1110        return (FALSE);
1111    }
1112    for (getline(&incoming, &n, fin); !feof(fin);
1113         getline(&incoming, &n, fin)) {
1114        if (strstr(incoming, device_with_space) //> incoming
1115            || strstr(incoming, device_with_tab))   // > incoming)
1116        {
1117            paranoid_pclose(fin);
1118            return(TRUE);
1119        }
1120    }
1121    paranoid_free(incoming);
1122    paranoid_free(device_with_tab);
1123    paranoid_pclose(fin);
1124
1125    asprintf(&tmp, "%s | grep -w \"%s\" > /dev/null 2> /dev/null",
1126            SWAPLIST_COMMAND, device_with_space);
1127    paranoid_free(device_with_space);
1128
1129    log_msg(4, "tmp (command) = '%s'", tmp);
1130    if (!system(tmp)) {
1131        paranoid_free(tmp);
1132        return(TRUE);
1133    }
1134    paranoid_free(tmp);
1135    return (FALSE);
1136}
1137
1138
1139#ifdef __FreeBSD__
1140//                       CODE IS FREEBSD-SPECIFIC
1141/**
1142 * Create a loopback device for specified @p fname.
1143 * @param fname The file to associate with a device.
1144 * @return /dev entry for the device (to be freed by the caller),
1145 * or NULL if it couldn't be allocated.
1146 */
1147char *make_vn(char *fname)
1148{
1149    char *device = NULL;
1150    char *mddevice = NULL;
1151    char *command = NULL;
1152    int vndev = 2;
1153
1154    if (atoi
1155        (call_program_and_get_last_line_of_output
1156         ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1157        do {
1158            paranoid_free(mddevice);
1159            asprintf(&mddevice, "vn%ic", vndev++);
1160
1161            paranoid_free(command);
1162            asprintf(&command, "vnconfig %s %s", mddevice, fname);
1163
1164            if (vndev > 10) {
1165                paranoid_free(command);
1166                paranoid_free(mddevice);
1167                return NULL;
1168            }
1169        }
1170        while (system(command));
1171        paranoid_free(command);
1172    } else {
1173        asprintf(&command, "mdconfig -a -t vnode -f %s", fname);
1174        asprintf(&mddevice, call_program_and_get_last_line_of_output(command));
1175        paranoid_free(command);
1176
1177        if (!strstr(mddevice, "md")) {
1178            paranoid_free(mddevice);
1179            return NULL;
1180        }
1181    }
1182    asprintf(&device, "/dev/%s", mddevice);
1183    paranoid_free(mddevice);
1184    return(device);
1185}
1186
1187
1188//                       CODE IS FREEBSD-SPECIFIC
1189/**
1190 * Deallocate specified @p dname.
1191 * This should be called when you are done with the device created by make_vn(),
1192 * so the system does not run out of @c vn devices.
1193 * @param dname The device to deallocate.
1194 * @return 0 for success, nonzero for failure.
1195 */
1196int kick_vn(char *dname)
1197{
1198    char *command;
1199    int ret = 0;
1200
1201    if (strncmp(dname, "/dev/", 5) == 0) {
1202        dname += 5;
1203    }
1204
1205    if (atoi
1206        (call_program_and_get_last_line_of_output
1207         ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1208        asprintf(&command, "vnconfig -d %s", dname);
1209        ret = system(command);
1210        paranoid_free(command);
1211        return(ret);
1212    } else {
1213        asprintf(&command, "mdconfig -d -u %s", dname);
1214        ret = system(command);
1215        paranoid_free(command);
1216        return(ret);
1217    }
1218     /*NOTREACHED*/ return 255;
1219}
1220#endif
1221
1222
1223/**
1224 * Mount the CD-ROM at @p mountpoint.
1225 * @param device The device (or file if g_ISO_restore_mode) to mount.
1226 * @param mountpoint The place to mount it.
1227 * @return TRUE for success, FALSE for failure.
1228 */
1229bool mount_CDROM_here(char *device, char *mountpoint)
1230{
1231    /*@ buffer ****************************************************** */
1232    char *command = NULL;
1233    int retval = 0;
1234
1235    assert_string_is_neither_NULL_nor_zerolength(device);
1236    assert_string_is_neither_NULL_nor_zerolength(mountpoint);
1237
1238    make_hole_for_dir(mountpoint);
1239    if (isdigit(device[0])) {
1240        paranoid_free(device);
1241        device = find_cdrom_device(FALSE);
1242    }
1243    if (g_ISO_restore_mode) {
1244
1245#ifdef __FreeBSD__
1246        char *dev = NULL;
1247
1248        dev = make_vn(device));
1249        if (!dev) {
1250            asprintf(&command, "Unable to mount ISO (make_vn(%s) failed)",
1251                    device);
1252            fatal_error(command);
1253        }
1254        paranoid_free(device);
1255        device = dev;
1256#endif
1257    }
1258
1259    log_msg(4, "(mount_CDROM_here --- device=%s, mountpoint=%s", device,
1260            mountpoint);
1261    /*@ end vars *************************************************** */
1262
1263#ifdef __FreeBSD__
1264    asprintf(&command, "mount_cd9660 -r %s %s 2>> %s",
1265            device, mountpoint, MONDO_LOGFILE);
1266#else
1267    asprintf(&command, "mount %s -o ro,loop -t iso9660 %s 2>> %s",
1268            device, mountpoint, MONDO_LOGFILE);
1269#endif
1270
1271    log_msg(4, command);
1272    if (strncmp(device, "/dev/", 5) == 0) {
1273        retract_CD_tray_and_defeat_autorun();
1274    }
1275    retval = system(command);
1276    log_msg(1, "system(%s) returned %d", command, retval);
1277    paranoid_free(command);
1278
1279    if (retval == 0) {
1280        return(TRUE);
1281    } else {
1282        return(FALSE);
1283    }
1284}
1285
1286
1287/**
1288 * Ask the user for CD number @p cd_number_i_want.
1289 * Sets g_current_media_number once the correct CD is inserted.
1290 * @param bkpinfo The backup information structure. Fields used:
1291 * - @c bkpinfo->backup_media_type
1292 * - @c bkpinfo->prefix
1293 * - @c bkpinfo->isodir
1294 * - @c bkpinfo->media_device
1295 * - @c bkpinfo->please_dont_eject_when_restoring
1296 * @param cd_number_i_want The CD number to ask for.
1297 */
1298void
1299insist_on_this_cd_number(struct s_bkpinfo *bkpinfo, int cd_number_i_want)
1300{
1301
1302    /*@ int ************************************************************* */
1303    int res = 0;
1304
1305
1306    /*@ buffers ********************************************************* */
1307    char *tmp;
1308    char *request;
1309
1310    assert(bkpinfo != NULL);
1311    assert(cd_number_i_want > 0);
1312
1313//  log_msg(3, "Insisting on CD number %d", cd_number_i_want);
1314
1315    if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
1316        log_msg(3,
1317                "No need to insist_on_this_cd_number when the backup type isn't CD-R(W) or NFS or ISO");
1318        return;
1319    }
1320
1321    asprintf(&tmp, "mkdir -p " MNT_CDROM);
1322    run_program_and_log_output(tmp, 5);
1323    paranoid_free(tmp);
1324
1325    if (g_ISO_restore_mode || bkpinfo->backup_media_type == iso
1326        || bkpinfo->backup_media_type == nfs) {
1327        log_msg(3, "Remounting CD");
1328        g_ISO_restore_mode = TRUE;
1329// FIXME --- I'm tempted to do something about this...
1330// Why unmount and remount again and again?
1331        if (is_this_device_mounted(MNT_CDROM)) {
1332            run_program_and_log_output("umount " MNT_CDROM, 5);
1333        }
1334        system("mkdir -p /tmp/isodir &> /dev/null");
1335        asprintf(&tmp, "%s/%s/%s-%d.iso", bkpinfo->isodir,
1336                bkpinfo->nfs_remote_dir, bkpinfo->prefix,
1337                cd_number_i_want);
1338        if (!does_file_exist(tmp)) {
1339            paranoid_free(tmp);
1340            asprintf(&tmp, "/tmp/isodir/%s/%s-%d.iso",
1341                    bkpinfo->nfs_remote_dir, bkpinfo->prefix,
1342                    cd_number_i_want);
1343            if (does_file_exist(tmp)) {
1344                log_msg(1,
1345                        "FIXME - hacking bkpinfo->isodir from '%s' to /tmp/isodir",
1346                        bkpinfo->isodir);
1347                strcpy(bkpinfo->isodir, "/tmp/isodir");
1348            }
1349        }
1350        log_msg(3, "Mounting %s at %s", tmp, MNT_CDROM);
1351        if (! mount_CDROM_here(tmp, MNT_CDROM)) {
1352            fatal_error("Mommy!");
1353        }
1354        paranoid_free(tmp);
1355    }
1356    if ((res = what_number_cd_is_this(bkpinfo)) != cd_number_i_want) {
1357        log_msg(3, "Currently, we hold %d but we want %d", res,
1358                cd_number_i_want);
1359        asprintf(&tmp, "Insisting on %s #%d",
1360                media_descriptor_string(bkpinfo->backup_media_type),
1361                cd_number_i_want);
1362        asprintf(&request, "Please insert %s #%d and press Enter.",
1363                media_descriptor_string(bkpinfo->backup_media_type),
1364                cd_number_i_want);
1365        log_msg(3, tmp);
1366        paranoid_free(tmp);
1367
1368        while (what_number_cd_is_this(bkpinfo) != cd_number_i_want) {
1369            sync();
1370            if (is_this_device_mounted(MNT_CDROM)) {
1371                res =
1372                    run_program_and_log_output("umount " MNT_CDROM, FALSE);
1373            } else {
1374                res = 0;
1375            }
1376            if (res) {
1377                log_to_screen(_("WARNING - failed to unmount CD-ROM drive"));
1378            }
1379            if (!bkpinfo->please_dont_eject) {
1380                res = eject_device(bkpinfo->media_device);
1381            } else {
1382                res = 0;
1383            }
1384            if (res) {
1385                log_to_screen(_("WARNING - failed to eject CD-ROM disk"));
1386            }
1387            popup_and_OK(request);
1388            if (!bkpinfo->please_dont_eject) {
1389                inject_device(bkpinfo->media_device);
1390            }
1391            sync();
1392        }
1393        paranoid_free(request);
1394
1395        log_msg(1, "Thankyou. Proceeding...");
1396        g_current_media_number = cd_number_i_want;
1397    }
1398}
1399/* @} - end of deviceGroup */
1400
1401
1402/**
1403 * Ask user for details of backup/restore information.
1404 * Called when @c mondoarchive doesn't get any parameters.
1405 * @param bkpinfo The backup information structure to fill out with the user's data.
1406 * @param archiving_to_media TRUE if archiving, FALSE if restoring.
1407 * @return 0, always.
1408 * @bug No point of `int' return value.
1409 * @ingroup archiveGroup
1410 */
1411int interactively_obtain_media_parameters_from_user(struct s_bkpinfo
1412                                                    *bkpinfo,
1413                                                    bool
1414                                                    archiving_to_media)
1415// archiving_to_media is TRUE if I'm being called by mondoarchive
1416// archiving_to_media is FALSE if I'm being called by mondorestore
1417{
1418    char *tmp = NULL;
1419    char *tmp1 = NULL;
1420    char *tmp2 = NULL;
1421    char *sz_size = NULL;
1422    char *command = NULL;
1423    char *comment = NULL;
1424    char *prompt = NULL;
1425    int i = 0;
1426    FILE *fin = NULL;
1427
1428    assert(bkpinfo != NULL);
1429    bkpinfo->nonbootable_backup = FALSE;
1430
1431// Tape, CD, NFS, ...?
1432    srandom(getpid());
1433    bkpinfo->backup_media_type =
1434        (g_restoring_live_from_cd) ? cdr :
1435        which_backup_media_type(bkpinfo->restore_data);
1436    if (bkpinfo->backup_media_type == none) {
1437        log_to_screen(_("User has chosen not to backup the PC"));
1438        finish(1);
1439    }
1440    if (bkpinfo->backup_media_type == tape && bkpinfo->restore_data) {
1441        popup_and_OK(_("Please remove CD/floppy from drive(s)"));
1442    }
1443    log_msg(3, "media type = %s",
1444            bkptype_to_string(bkpinfo->backup_media_type));
1445    if (archiving_to_media) {
1446        sensibly_set_tmpdir_and_scratchdir(bkpinfo);
1447    }
1448    bkpinfo->cdrw_speed = (bkpinfo->backup_media_type == cdstream) ? 2 : 4;
1449    bkpinfo->compression_level =
1450        (bkpinfo->backup_media_type == cdstream) ? 1 : 5;
1451    bkpinfo->use_lzo =
1452        (bkpinfo->backup_media_type == cdstream) ? TRUE : FALSE;
1453
1454/*
1455  if (find_home_of_exe("star") && (!find_home_of_exe("afio") || find_home_of_exe("selinuxenabled")))
1456    {
1457      bkpinfo->use_star = FALSE;   
1458      bkpinfo->use_lzo = FALSE;
1459      log_to_screen("Using star, not afio");
1460      if (!find_home_of_exe("afio"))
1461    { log_to_screen("...because afio not found"); }
1462      if (find_home_of_exe("selinuxenabled"))
1463    { log_to_screen("...because SELINUX found"); }
1464    }
1465*/
1466
1467    mvaddstr_and_log_it(2, 0, " ");
1468
1469// Find device's /dev (or SCSI) entry
1470    switch (bkpinfo->backup_media_type) {
1471    case cdr:
1472    case cdrw:
1473    case dvd:
1474        if (archiving_to_media) {
1475            if (bkpinfo->backup_media_type != dvd) {
1476                if (ask_me_yes_or_no
1477                    (_("Is your computer a laptop, or does the CD writer incorporate BurnProof technology?")))
1478                {
1479                    bkpinfo->manual_cd_tray = TRUE;
1480                }
1481            }
1482            if ((bkpinfo->compression_level =
1483                 which_compression_level()) == -1) {
1484                log_to_screen(_("User has chosen not to backup the PC"));
1485                finish(1);
1486            }
1487            asprintf(&comment, _("What speed is your %s (re)writer?"),
1488                    media_descriptor_string(bkpinfo->backup_media_type));
1489            if (bkpinfo->backup_media_type == dvd) {
1490                bkpinfo->media_device = find_dvd_device();
1491                asprintf(&tmp, "1");
1492                asprintf(&sz_size, "%d", DEFAULT_DVD_DISK_SIZE);    // 4.7 salesman's GB = 4.482 real GB = 4582 MB
1493                log_msg(1, "Setting to DVD defaults");
1494            } else {
1495                paranoid_alloc(bkpinfo->media_device,VANILLA_SCSI_CDROM );
1496                asprintf(&tmp, "4");
1497                asprintf(&sz_size, "650");
1498                log_msg(1, "Setting to CD defaults");
1499            }
1500            if (bkpinfo->backup_media_type != dvd) {
1501                if (!popup_and_get_string(_("Speed"), comment, tmp)) {
1502                    log_to_screen(_("User has chosen not to backup the PC"));
1503                    finish(1);
1504                }
1505            }
1506            paranoid_free(comment);
1507
1508            bkpinfo->cdrw_speed = atoi(tmp);    // if DVD then this shouldn't ever be used anyway :)
1509            paranoid_free(tmp);
1510
1511            asprintf(&comment,
1512                    _("How much data (in Megabytes) will each %s store?"),
1513                    media_descriptor_string(bkpinfo->backup_media_type));
1514
1515            if (!popup_and_get_string("Size", comment, sz_size)) {
1516                log_to_screen(_("User has chosen not to backup the PC"));
1517                finish(1);
1518            }
1519            paranoid_free(comment);
1520
1521            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1522                bkpinfo->media_size[i] = atoi(sz_size);
1523            }
1524            paranoid_free(sz_size);
1525
1526            if (bkpinfo->media_size[0] <= 0) {
1527                log_to_screen(_("User has chosen not to backup the PC"));
1528                finish(1);
1529            }
1530        }
1531    case cdstream:
1532        if (bkpinfo->disaster_recovery) {
1533            paranoid_alloc(bkpinfo->media_device, "/dev/cdrom");
1534            log_msg(2, "CD-ROM device assumed to be at %s",
1535                    bkpinfo->media_device);
1536        } else if (bkpinfo->restore_data
1537                   || bkpinfo->backup_media_type == dvd) {
1538            if (bkpinfo->media_device == NULL) {
1539                asprintf(&bkpinfo->media_device, "/dev/cdrom");
1540            }                   // just for the heck of it :)
1541            log_msg(1, "bkpinfo->media_device = %s",
1542                    bkpinfo->media_device);
1543            if ((bkpinfo->backup_media_type == dvd)
1544                || ((tmp = find_cdrom_device(FALSE)) != NULL)) {
1545                paranoid_free(bkpinfo->media_device);
1546                bkpinfo->media_device = tmp;
1547                log_msg(1, "bkpinfo->media_device = %s",
1548                        bkpinfo->media_device);
1549                asprintf(&comment,
1550                        _("Please specify your %s drive's /dev entry"),
1551                        media_descriptor_string(bkpinfo->
1552                                                backup_media_type));
1553                if (!popup_and_get_string
1554                    (_("Device?"), comment, bkpinfo->media_device)) {
1555                    log_to_screen(_("User has chosen not to backup the PC"));
1556                    finish(1);
1557                }
1558                paranoid_free(comment);
1559            }
1560            log_msg(2, "%s device found at %s",
1561                    media_descriptor_string(bkpinfo->backup_media_type),
1562                    bkpinfo->media_device);
1563        } else {
1564            bkpinfo->media_device = find_cdrw_device();
1565            if (bkpinfo->media_device != NULL) {
1566                asprintf(&tmp,
1567                        _("I think I've found your %s burner at SCSI node %s; am I right on the money?"),
1568                        media_descriptor_string(bkpinfo->
1569                                                backup_media_type),
1570                        bkpinfo->media_device);
1571                if (!ask_me_yes_or_no(tmp)) {
1572                    paranoid_free(bkpinfo->media_device);
1573                }
1574                paranoid_free(tmp);
1575            } else {
1576                if (g_kernel_version < 2.6) {
1577                    i = popup_and_get_string(_("Device node?"),
1578                                             _("What is the SCSI node of your CD (re)writer, please?"),
1579                                             bkpinfo->media_device);
1580                } else {
1581                    i = popup_and_get_string(_("/dev entry?"),
1582                                             _("What is the /dev entry of your CD (re)writer, please?"),
1583                                             bkpinfo->media_device);
1584                }
1585                if (!i) {
1586                    log_to_screen(_("User has chosen not to backup the PC"));
1587                    finish(1);
1588                }
1589            }
1590        }
1591        if (bkpinfo->backup_media_type == cdstream) {
1592            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1593                bkpinfo->media_size[i] = 650;
1594            }
1595        }
1596        break;
1597    case udev:
1598        if (!ask_me_yes_or_no
1599            (_("This option is for advanced users only. Are you sure?"))) {
1600            log_to_screen(_("User has chosen not to backup the PC"));
1601            finish(1);
1602        }
1603    case tape:
1604
1605        paranoid_free(bkpinfo->media_device);
1606        if (find_tape_device_and_size(bkpinfo->media_device, sz_size)) {
1607            log_msg(3, _("Ok, using vanilla scsi tape."));
1608            paranoid_alloc(bkpinfo->media_device,VANILLA_SCSI_TAPE"0" );
1609            if ((fin = fopen(bkpinfo->media_device, "r"))) {
1610                paranoid_fclose(fin);
1611            } else {
1612                paranoid_alloc(bkpinfo->media_device,"/dev/osst0");
1613            }
1614        }
1615        if (bkpinfo->media_device != NULL) {
1616            if ((fin = fopen(bkpinfo->media_device, "r"))) {
1617                paranoid_fclose(fin);
1618            } else {
1619                if (does_file_exist("/tmp/mondo-restore.cfg")) {
1620                    read_cfg_var("/tmp/mondo-restore.cfg", "media-dev",
1621                                 bkpinfo->media_device);
1622                }
1623            }
1624            asprintf(&tmp,
1625                    _("I think I've found your tape streamer at %s; am I right on the money?"),
1626                    bkpinfo->media_device);
1627            if (!ask_me_yes_or_no(tmp)) {
1628                paranoid_free(bkpinfo->media_device);
1629            }
1630            paranoid_free(tmp);
1631        }
1632        if (bkpinfo->media_device == NULL) {
1633            if (!popup_and_get_string
1634                (_("Device name?"),
1635                 _("What is the /dev entry of your tape streamer?"),
1636                 bkpinfo->media_device)) {
1637                log_to_screen(_("User has chosen not to backup the PC"));
1638                finish(1);
1639            }
1640        }
1641        asprintf(&tmp, "ls -l %s", bkpinfo->media_device);
1642        if (run_program_and_log_output(tmp, FALSE)) {
1643            log_to_screen(_("User has not specified a valid /dev entry"));
1644            finish(1);
1645        }
1646        paranoid_free(tmp);
1647        log_msg(4, "sz_size = %s", sz_size);
1648        paranoid_free(sz_size);
1649        bkpinfo->media_size[0] = 0;
1650        log_msg(4, "media_size[0] = %ld", bkpinfo->media_size[0]);
1651        if (bkpinfo->media_size[0] <= 0) {
1652            bkpinfo->media_size[0] = 0;
1653        }
1654        for (i = 1; i <= MAX_NOOF_MEDIA; i++) {
1655            bkpinfo->media_size[i] = bkpinfo->media_size[0];
1656        }
1657        if (archiving_to_media) {
1658            if ((bkpinfo->compression_level =
1659                 which_compression_level()) == -1) {
1660                log_to_screen(_("User has chosen not to backup the PC"));
1661                finish(1);
1662            }
1663        }
1664        break;
1665
1666
1667
1668    case nfs:
1669        if (!bkpinfo->nfs_mount[0]) {
1670            strcpy(bkpinfo->nfs_mount,
1671                   call_program_and_get_last_line_of_output
1672                   ("mount | grep \":\" | cut -d' ' -f1 | head -n1"));
1673        }
1674#ifdef __FreeBSD__
1675        if (TRUE)
1676#else
1677        if (!bkpinfo->disaster_recovery)
1678#endif
1679        {
1680            if (!popup_and_get_string
1681                (_("NFS dir."),
1682                 _("Please enter path and directory where archives are stored remotely. (Mondo has taken a guess at the correct value. If it is incorrect, delete it and type the correct one.)"),
1683                 bkpinfo->nfs_mount)) {
1684                log_to_screen(_("User has chosen not to backup the PC"));
1685                finish(1);
1686            }
1687            if (!bkpinfo->restore_data) {
1688                if ((bkpinfo->compression_level =
1689                     which_compression_level()) == -1) {
1690                    log_to_screen(_("User has chosen not to backup the PC"));
1691                    finish(1);
1692                }
1693            }
1694            // check whether already mounted - we better remove
1695            // surrounding spaces and trailing '/' for this
1696            strip_spaces(bkpinfo->nfs_mount);
1697            if (bkpinfo->nfs_mount[strlen(bkpinfo->nfs_mount) - 1] == '/')
1698                bkpinfo->nfs_mount[strlen(bkpinfo->nfs_mount) - 1] = '\0';
1699            asprintf(&command, "mount | grep \"%s \" | cut -d' ' -f3",
1700                    bkpinfo->nfs_mount);
1701            strcpy(bkpinfo->isodir,
1702                   call_program_and_get_last_line_of_output(command));
1703            paranoid_free(command);
1704
1705            asprintf(&comment,
1706                    _("How much data (in Megabytes) will each media store?"));
1707            if (!popup_and_get_string(_("Size"), comment, sz_size)) {
1708                log_to_screen(_("User has chosen not to backup the PC"));
1709                finish(1);
1710            }
1711            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1712                bkpinfo->media_size[i] = atoi(sz_size);
1713            }
1714            if (bkpinfo->media_size[0] <= 0) {
1715                log_to_screen(_("User has chosen not to backup the PC"));
1716                finish(1);
1717            }
1718            paranoid_free(comment);
1719        }
1720        if (bkpinfo->disaster_recovery) {
1721            system("umount /tmp/isodir 2> /dev/null");
1722            if (!popup_and_get_string
1723                (_("NFS share"), _("Which remote NFS share should I mount?"),
1724                 bkpinfo->nfs_mount)) {
1725                log_to_screen(_("User has chosen not to backup the PC"));
1726                finish(1);
1727            }
1728        }
1729        if (!is_this_device_mounted(bkpinfo->nfs_mount)) {
1730            sprintf(bkpinfo->isodir, "/tmp/isodir.mondo.%d",
1731                    (int) (random() % 32768));
1732            asprintf(&command, "mkdir -p %s", bkpinfo->isodir);
1733            run_program_and_log_output(command, 5);
1734            paranoid_free(command);
1735
1736            asprintf(&tmp, "mount -t nfs -o nolock %s %s", bkpinfo->nfs_mount,
1737                    bkpinfo->isodir);
1738            run_program_and_log_output(tmp, 5);
1739            paranoid_free(tmp);
1740            malloc_string(g_selfmounted_isodir);
1741            strcpy(g_selfmounted_isodir, bkpinfo->isodir);
1742        }
1743        if (!is_this_device_mounted(bkpinfo->nfs_mount)) {
1744            popup_and_OK
1745                (_("Please mount that partition before you try to backup to or restore from it."));
1746            finish(1);
1747        }
1748        if (!popup_and_get_string
1749            (_("Directory"), _("Which directory within that mountpoint?"),bkpinfo->nfs_remote_dir)) {
1750            log_to_screen(_("User has chosen not to backup the PC"));
1751            finish(1);
1752        }
1753
1754        asprintf(&command, "echo hi > '%s/%s/.dummy.txt'", bkpinfo->isodir,
1755                bkpinfo->nfs_remote_dir);
1756        while (run_program_and_log_output(command, FALSE)) {
1757            asprintf(&prompt,
1758                     _("Directory '%s' under mountpoint '%s' does not exist or is not writable. You can fix this or change the directory and retry or cancel the backup."),
1759                     bkpinfo->nfs_remote_dir, bkpinfo->isodir);
1760            if (!popup_and_get_string
1761                (_("Directory"), prompt, bkpinfo->nfs_remote_dir)) {
1762                log_to_screen(_("User has chosen not to backup the PC"));
1763                finish(1);
1764            }
1765            paranoid_free(prompt);
1766
1767            paranoid_free(command);
1768            asprintf(&command, "echo hi > %s/%s/.dummy.txt",
1769                     bkpinfo->isodir, bkpinfo->nfs_remote_dir);
1770        }
1771        paranoid_free(command);
1772
1773        if (!popup_and_get_string
1774            (_("Prefix."),
1775             _("Please enter the prefix that will be prepended to your ISO filename.  Example: machine1 to obtain machine1-[1-9]*.iso files"),
1776            bkpinfo->prefix)) {
1777            log_to_screen(_("User has chosen not to backup the PC"));
1778            finish(1);
1779        }
1780        log_msg(3, "prefix set to %s", bkpinfo->prefix);
1781
1782        for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1783            bkpinfo->media_size[i] = 650;
1784        }
1785        log_msg(3, "Just set nfs_remote_dir to %s",
1786                bkpinfo->nfs_remote_dir);
1787        log_msg(3, "isodir is still %s", bkpinfo->isodir);
1788        break;
1789
1790    case iso:
1791        if (!bkpinfo->disaster_recovery) {
1792            if (!popup_and_get_string
1793                (_("Storage dir."),
1794                 _("Please enter the full path that contains your ISO images.  Example: /mnt/raid0_0"),
1795                 bkpinfo->isodir)) {
1796                log_to_screen(_("User has chosen not to backup the PC"));
1797                finish(1);
1798            }
1799            if (archiving_to_media) {
1800                if ((bkpinfo->compression_level =
1801                     which_compression_level()) == -1) {
1802                    log_to_screen(_("User has chosen not to backup the PC"));
1803                    finish(1);
1804                }
1805                if (!popup_and_get_string
1806                    (_("ISO size."),
1807                     _("Please enter how big you want each ISO image to be (in megabytes). This should be less than or equal to the size of the CD-R[W]'s or DVD's you plan to backup to."), sz_size)) {
1808                    log_to_screen(_("User has chosen not to backup the PC"));
1809                    finish(1);
1810                }
1811                for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1812                    bkpinfo->media_size[i] = atoi(sz_size);
1813                }
1814                paranoid_free(sz_size);
1815
1816                if (!popup_and_get_string
1817                    (_("Prefix."),
1818                     _("Please enter the prefix that will be prepended to your ISO filename.  Example: machine1 to obtain machine1-[1-9]*.iso files"),
1819                     bkpinfo->prefix)) {
1820                    log_to_screen("User has chosen not to backup the PC");
1821                    finish(1);
1822                }
1823                log_msg(3, "prefix set to %s", bkpinfo->prefix);
1824            } else {
1825                for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1826                    bkpinfo->media_size[i] = 650;
1827                }
1828            }
1829        }
1830        break;
1831    default:
1832        fatal_error
1833            ("I, Mojo Jojo, shall defeat those pesky Powerpuff Girls!");
1834    }
1835    if (archiving_to_media) {
1836
1837#ifdef __FreeBSD__
1838        bkpinfo->boot_device = call_program_and_get_last_line_of_output
1839               ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/\\([0-9]\\).*/\\1/'"));
1840#else
1841        bkpinfo->boot_device = call_program_and_get_last_line_of_output
1842               ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/[0-9].*//'"));
1843#endif
1844        i = which_boot_loader(bkpinfo->boot_device);
1845        if (i == 'U')           // unknown
1846        {
1847
1848#ifdef __FreeBSD__
1849            if (!popup_and_get_string
1850                (_("Boot device"),
1851                 _("What is your boot device? (e.g. /dev/ad0)"),
1852                 bkpinfo->boot_device)) {
1853                log_to_screen(_("User has chosen not to backup the PC"));
1854                finish(1);
1855            }
1856            i = which_boot_loader(bkpinfo->boot_device);
1857#else
1858            if (!popup_and_get_string
1859                (_("Boot device"),
1860                 _("What is your boot device? (e.g. /dev/hda)"),
1861                 bkpinfo->boot_device)) {
1862                log_to_screen(_("User has chosen not to backup the PC"));
1863                finish(1);
1864            }
1865            if (does_string_exist_in_boot_block
1866                (bkpinfo->boot_device, "LILO")) {
1867                i = 'L';
1868            } else
1869                if (does_string_exist_in_boot_block
1870                    (bkpinfo->boot_device, "ELILO")) {
1871                i = 'E';
1872            } else
1873                if (does_string_exist_in_boot_block
1874                    (bkpinfo->boot_device, "GRUB")) {
1875                i = 'G';
1876            } else {
1877                i = 'U';
1878            }
1879#endif
1880            if (i == 'U') {
1881                if (ask_me_yes_or_no
1882                    (_("Unidentified boot loader. Shall I restore it byte-for-byte at restore time and hope for the best?")))
1883                {
1884                    i = 'R';    // raw
1885                } else {
1886                    log_to_screen
1887                        (_("I cannot find your boot loader. Please run mondoarchive with parameters."));
1888                    finish(1);
1889                }
1890            }
1891        }
1892        bkpinfo->boot_loader = i;
1893        asprintf(&bkpinfo->include_paths, "/");
1894        if (!popup_and_get_string
1895            (_("Backup paths"),
1896             _("Please enter paths which you want me to backup. The default is '/' (i.e. everything)."),
1897             bkpinfo->include_paths)) {
1898            log_to_screen(_("User has chosen not to backup the PC"));
1899            finish(1);
1900        }
1901
1902        tmp = list_of_NFS_mounts_only();
1903        if (strlen(tmp) > 2) {
1904            if (bkpinfo->exclude_paths != NULL) {
1905                tmp1 = bkpinfo->exclude_paths;
1906                asprintf(&bkpinfo->exclude_paths, "%s %s", tmp1, tmp);
1907                paranoid_free(tmp1);
1908            } else {
1909                bkpinfo->exclude_paths = tmp;
1910            }
1911        }
1912        paranoid_free(tmp);
1913// NTFS
1914        tmp = call_program_and_get_last_line_of_output
1915               ("parted2fdisk -l | grep -i ntfs | awk '{ print $1};' | tr -s '\\n' ' ' | awk '{ print $0};'");
1916        if (strlen(tmp) > 2) {
1917            if (!popup_and_get_string
1918                (_("NTFS partitions"),
1919                 _("Please enter/confirm the NTFS partitions you wish to backup as well."),
1920                 tmp1)) {
1921                log_to_screen(_("User has chosen not to backup the PC"));
1922                finish(1);
1923            }
1924            if (bkpinfo->image_devs != NULL) {
1925                tmp2 = bkpinfo->image_devs;
1926                asprintf(&bkpinfo->image_devs, "%s %s", tmp2, tmp1);
1927                paranoid_free(tmp2);
1928            } else {
1929                bkpinfo->image_devs = tmp1;
1930            }
1931            paranoid_free(tmp1);
1932        }
1933        paranoid_free(tmp);
1934
1935        if (!popup_and_get_string
1936            (_("Exclude paths"),
1937             _("Please enter paths which you do NOT want to backup. Separate them with spaces. NB: /tmp and /proc are always excluded. :-) Just hit 'Enter' if you want to do a full system backup."),
1938             bkpinfo->exclude_paths)) {
1939            log_to_screen(_("User has chosen not to backup the PC"));
1940            finish(1);
1941        }
1942        bkpinfo->make_cd_use_lilo = FALSE;
1943        bkpinfo->backup_data = TRUE;
1944        bkpinfo->verify_data =
1945            ask_me_yes_or_no
1946            (_("Will you want to verify your backups after Mondo has created them?"));
1947
1948#ifndef __FreeBSD__
1949        if (!ask_me_yes_or_no
1950            (_("Are you confident that your kernel is a sane, sensible, standard Linux kernel? Say 'no' if you are using a Gentoo <1.4 or Debian <3.0, please."))){
1951            paranoid_alloc(bkpinfo->kernel_path, "FAILSAFE");
1952        }
1953#endif
1954
1955        if (!ask_me_yes_or_no
1956            (_("Are you sure you want to proceed? Hit 'no' to abort."))) {
1957            log_to_screen(_("User has chosen not to backup the PC"));
1958            finish(1);
1959        }
1960    } else {
1961        bkpinfo->restore_data = TRUE;   // probably...
1962    }
1963
1964    if (bkpinfo->backup_media_type == iso
1965        || bkpinfo->backup_media_type == nfs) {
1966        g_ISO_restore_mode = TRUE;
1967    }
1968#ifdef __FreeSD__
1969// skip
1970#else
1971    if (bkpinfo->backup_media_type == nfs) {
1972        log_msg(3, "I think the NFS mount is mounted at %s",
1973                bkpinfo->isodir);
1974    }
1975    log_it("isodir = %s", bkpinfo->isodir);
1976    log_it("nfs_mount = '%s'", bkpinfo->nfs_mount);
1977#endif
1978
1979    log_it("media device = %s", bkpinfo->media_device);
1980    log_it("media size = %ld", bkpinfo->media_size[1]);
1981    log_it("media type = %s",
1982           bkptype_to_string(bkpinfo->backup_media_type));
1983    log_it("prefix = %s", bkpinfo->prefix);
1984    log_it("compression = %ld", bkpinfo->compression_level);
1985    log_it("include_paths = '%s'", bkpinfo->include_paths);
1986    log_it("exclude_paths = '%s'", bkpinfo->exclude_paths);
1987    log_it("scratchdir = '%s'", bkpinfo->scratchdir);
1988    log_it("tmpdir = '%s'", bkpinfo->tmpdir);
1989    log_it("boot_device = '%s' (loader=%c)", bkpinfo->boot_device,
1990           bkpinfo->boot_loader);
1991    log_it("prefix = %s", bkpinfo->prefix);
1992    if (bkpinfo->media_size[0] < 0) {
1993        if (archiving_to_media) {
1994            fatal_error("Media size is less than zero.");
1995        } else {
1996            log_msg(2, "Warning - media size is less than zero.");
1997            bkpinfo->media_size[0] = 0;
1998        }
1999    }
2000    return (0);
2001}
2002
2003
2004/**
2005 * Get a space-separated list of NFS mounts.
2006 * @return The list created.
2007 * @note The return value should be freed by caller
2008 * @bug Even though we only want the mounts, the devices are still checked.
2009 */
2010char *list_of_NFS_mounts_only(void)
2011{
2012    return(call_program_and_get_last_line_of_output
2013           ("mount -t coda,ncpfs,nfs,smbfs,cifs | tr -s '\t' ' ' | cut -d' ' -f3 | tr -s '\n' ' ' | awk '{print $0;}'"));
2014    /* BERLIOS : Useless
2015    asprintf(&exclude_these_devices,
2016           call_program_and_get_last_line_of_output
2017           ("tr -s '\t' ' ' < /etc/fstab | grep -E '( (coda|ncpfs|nfs|smbfs|cifs) )' | cut -d' ' -f1 | tr -s '\n' ' ' | awk '{print $0;}'"));
2018           */
2019}
2020
2021
2022/* @} - end of utilityGroup */
2023
2024/**
2025 * Create a randomly-named FIFO. The format is @p stub "." [random] [random] where
2026 * [random] is a random number between 1 and 32767.
2027 * @param store_name_here Where to store the new filename.
2028 * @param stub A random number will be appended to this to make the FIFO's name.
2029 * @ingroup deviceGroup
2030 */
2031void make_fifo(char *store_name_here, char *stub)
2032{
2033    char *tmp;
2034
2035    assert_string_is_neither_NULL_nor_zerolength(stub);
2036
2037    sprintf(store_name_here, "%s%d%d", stub, (int) (random() % 32768),
2038            (int) (random() % 32768));
2039    make_hole_for_file(store_name_here);
2040    mkfifo(store_name_here, S_IRWXU | S_IRWXG);
2041    asprintf(&tmp, "chmod 770 %s", store_name_here);
2042    paranoid_system(tmp);
2043    paranoid_free(tmp);
2044}
2045
2046
2047/**
2048 * Set the tmpdir and scratchdir to reside on the partition with the most free space.
2049 * Automatically excludes DOS, NTFS, SMB, and NFS filesystems.
2050 * @param bkpinfo The backup information structure. @c bkpinfo->tmpdir and @c bkpinfo->scratchdir will be set.
2051 * @ingroup utilityGroup
2052 */
2053void sensibly_set_tmpdir_and_scratchdir(struct s_bkpinfo *bkpinfo)
2054{
2055    char *tmp = NULL;
2056    char *command = NULL;
2057    char *sz = NULL;
2058    int i = 0;
2059
2060    assert(bkpinfo != NULL);
2061
2062#ifdef __FreeBSD__
2063    tmp = call_program_and_get_last_line_of_output
2064           ("df -m -P -t nonfs,msdosfs,ntfs,smbfs,smb,cifs | tr -s '\t' ' ' | grep -vE \"none|Filesystem\" | awk '{printf \"%s %s\\n\", $4, $6;}' | sort -n | tail -n1 | awk '{print $NF;}'");
2065#else
2066    tmp = call_program_and_get_last_line_of_output
2067           ("df -m -P -x nfs -x vfat -x ntfs -x smbfs -x smb -x cifs | sed 's/                  /devdev/' | tr -s '\t' ' ' | grep -vE \"none|Filesystem|/dev/shm\" | awk '{printf \"%s %s\\n\", $4, $6;}' | sort -n | tail -n1 | awk '{print $NF;}'");
2068#endif
2069
2070    if (tmp[0] != '/') {
2071        asprintf(&sz, "/%s", tmp);
2072        paranoid_free(tmp);
2073        tmp = sz;
2074    }
2075    if (!tmp[0]) {
2076        fatal_error("I couldn't figure out the tempdir!");
2077    }
2078    i = (int) (random() % 32768);
2079    asprintf(&bkpinfo->tmpdir, "%s/mondo.tmp.%d", tmp, i);
2080    log_it("bkpinfo->tmpdir is being set to %s", bkpinfo->tmpdir);
2081
2082    asprintf(&bkpinfo->scratchdir, "%s/mondo.scratch.%d", tmp, i);
2083    log_it("bkpinfo->scratchdir is being set to %s", bkpinfo->scratchdir);
2084
2085    asprintf(&g_erase_tmpdir_and_scratchdir, "rm -Rf %s %s", bkpinfo->tmpdir,
2086            bkpinfo->scratchdir);
2087
2088    asprintf(&command, "rm -Rf %s/mondo.tmp.* %s/mondo.scratch.*", tmp, tmp);
2089    paranoid_free(tmp);
2090
2091    paranoid_system(command);
2092    paranoid_free(command);
2093}
2094
2095
2096/**
2097 * @addtogroup deviceGroup
2098 * @{
2099 */
2100/**
2101 * If we can read @p dev, set @p output to it.
2102 * If @p dev cannot be read, set @p output to "".
2103 * @param dev The device to check for.
2104 * @param output Set to @p dev if @p dev exists, NULL otherwise. Needs to be freed by caller
2105 * @return TRUE if @p dev exists, FALSE if it doesn't.
2106 */
2107bool set_dev_to_this_if_rx_OK(char *output, char *dev)
2108{
2109    char *command;
2110
2111    paranoid_free(output);
2112    if (!dev || dev[0] == '\0') {
2113        return (FALSE);
2114    }
2115    log_msg(10, "Injecting %s", dev);
2116    inject_device(dev);
2117    if (!does_file_exist(dev)) {
2118        log_msg(10, "%s doesn't exist. Returning FALSE.", dev);
2119        return (FALSE);
2120    }
2121    asprintf(&command, "dd bs=%ld count=1 if=%s of=/dev/null &> /dev/null",
2122            512L, dev);
2123    if (!run_program_and_log_output(command, FALSE)
2124        && !run_program_and_log_output(command, FALSE)) {
2125        asprintf(&output, dev);
2126        log_msg(4, "Found it - %s", dev);
2127        paranoid_free(command);
2128        return (TRUE);
2129    } else {
2130        log_msg(4, "It's not %s", dev);
2131        paranoid_free(command);
2132        return (FALSE);
2133    }
2134}
2135
2136
2137/**
2138 * Find out what number CD is in the drive.
2139 * @param bkpinfo The backup information structure. The @c bkpinfo->media_device field is the only one used.
2140 * @return The current CD number, or -1 if it could not be found.
2141 * @note If the CD is not mounted, it will be mounted
2142 * (and remain mounted after this function returns).
2143 */
2144int what_number_cd_is_this(struct s_bkpinfo *bkpinfo)
2145{
2146    int cd_number = -1;
2147    char *mountdev = NULL;
2148    char *tmp = NULL;
2149    char *tmp1 = NULL;
2150
2151    assert(bkpinfo != NULL);
2152    if (g_ISO_restore_mode) {
2153        asprintf(&tmp, "mount | grep iso9660 | awk '{print $3;}'");
2154
2155        tmp1 = call_program_and_get_last_line_of_output(tmp);
2156        paranoid_free(tmp);
2157
2158        asprintf(&mountdev, "%s/archives/THIS-CD-NUMBER", tmp1);
2159        paranoid_free(tmp1);
2160
2161        tmp = last_line_of_file(mountdev);
2162        cd_number = atoi(tmp);
2163        paranoid_free(mountdev);
2164        paranoid_free(tmp);
2165
2166        return (cd_number);
2167    }
2168
2169    if (bkpinfo->media_device == NULL) {
2170        log_it
2171            ("(what_number_cd_is_this) Warning - media_device unknown. Finding out...");
2172        bkpinfo->media_device = find_cdrom_device(FALSE);
2173    }
2174    if (!is_this_device_mounted(MNT_CDROM)) {
2175        (void)mount_CDROM_here(bkpinfo->media_device, MNT_CDROM);
2176    }
2177    tmp = last_line_of_file(MNT_CDROM "/archives/THIS-CD-NUMBER");
2178    cd_number = atoi(tmp);
2179    paranoid_free(tmp);
2180    return (cd_number);
2181}
2182
2183
2184/**
2185 * Find out what device is mounted as root (/).
2186 * @return Root device.
2187 * @note The returned string points to static storage and will be overwritten with every call.
2188 * @bug A bit of a misnomer; it's actually finding out the root device.
2189 * The mountpoint (where it's mounted) will obviously be '/'.
2190 */
2191char *where_is_root_mounted()
2192{
2193    char *tmp;
2194
2195#ifdef __FreeBSD__
2196    tmp = call_program_and_get_last_line_of_output
2197           ("mount | grep \" on / \" | cut -d' ' -f1");
2198#else
2199    tmp = call_program_and_get_last_line_of_output
2200           ("mount | grep \" on / \" | cut -d' ' -f1 | sed s/[0-9]// | sed s/[0-9]//");
2201    if (strstr(tmp, "/dev/cciss/")) {
2202        paranoid_free(tmp);
2203        tmp = call_program_and_get_last_line_of_output
2204               ("mount | grep \" on / \" | cut -d' ' -f1 | cut -dp -f1");
2205    }
2206    if (strstr(tmp, "/dev/md")) {
2207        paranoid_free(tmp);
2208        tmp = call_program_and_get_last_line_of_output
2209               ("mount | grep \" on / \" | cut -d' ' -f1");
2210    }
2211#endif
2212
2213    return (tmp);
2214}
2215
2216
2217/**
2218 * Find out which boot loader is in use.
2219 * @param which_device Device to look for the boot loader on.
2220 * @return 'L' for LILO, 'E'for ELILO, 'G' for GRUB, 'B' or 'D' for FreeBSD boot loaders, or 'U' for Unknown.
2221 * @note Under Linux, all drives are examined, not just @p which_device.
2222 */
2223#ifdef __FreeBSD__
2224char which_boot_loader(char *which_device)
2225{
2226    int count_lilos = 0;
2227    int count_grubs = 0;
2228    int count_boot0s = 0;
2229    int count_dangerouslydedicated = 0;
2230
2231    log_it("looking at drive %s's MBR", which_device);
2232    if (does_string_exist_in_boot_block(which_device, "GRUB")) {
2233        count_grubs++;
2234    }
2235    if (does_string_exist_in_boot_block(which_device, "LILO")) {
2236        count_lilos++;
2237    }
2238    if (does_string_exist_in_boot_block(which_device, "Drive")) {
2239        count_boot0s++;
2240    }
2241    if (does_string_exist_in_first_N_blocks
2242        (which_device, "FreeBSD/i386", 17)) {
2243        count_dangerouslydedicated++;
2244    }
2245    log_it("%d grubs and %d lilos and %d elilos and %d boot0s and %d DD\n",
2246           count_grubs, count_lilos, count_elilos, count_boot0s,
2247           count_dangerouslydedicated);
2248
2249    if (count_grubs && !count_lilos) {
2250        return ('G');
2251    } else if (count_lilos && !count_grubs) {
2252        return ('L');
2253    } else if (count_grubs == 1 && count_lilos == 1) {
2254        log_it("I'll bet you used to use LILO but switched to GRUB...");
2255        return ('G');
2256    } else if (count_boot0s == 1) {
2257        return ('B');
2258    } else if (count_dangerouslydedicated) {
2259        return ('D');
2260    } else {
2261        log_it("Unknown boot loader");
2262        return ('U');
2263    }
2264}
2265
2266#else
2267
2268char which_boot_loader(char *which_device)
2269{
2270    /*@ buffer ***************************************************** */
2271    char *list_drives_cmd;
2272    char *current_drive = NULL;
2273
2274    /*@ pointers *************************************************** */
2275    FILE *pdrives;
2276
2277    /*@ int ******************************************************** */
2278    int count_lilos = 0;
2279    int count_grubs = 0;
2280    size_t n = 0;
2281
2282    /*@ end vars *************************************************** */
2283
2284#ifdef __IA64__
2285    /* No choice for it */
2286    return ('E');
2287#endif
2288    assert(which_device != NULL);
2289    asprintf(&list_drives_cmd,
2290            "parted2fdisk -l 2>/dev/null | grep \"/dev/.*:\" | tr -s ':' ' ' | tr -s ' ' '\n' | grep /dev/; echo %s",
2291            where_is_root_mounted());
2292    log_it("list_drives_cmd = %s", list_drives_cmd);
2293
2294    if (!(pdrives = popen(list_drives_cmd, "r"))) {
2295        log_OS_error("Unable to open list of drives");
2296        paranoid_free(list_drives_cmd);
2297        return ('\0');
2298    }
2299    paranoid_free(list_drives_cmd);
2300
2301    for (getline(&current_drive, &n, pdrives); !feof(pdrives);
2302         getline(&current_drive, &n, pdrives)) {
2303        strip_spaces(current_drive);
2304        log_it("looking at drive %s's MBR", current_drive);
2305        if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
2306            count_grubs++;
2307            strcpy(which_device, current_drive);
2308            break;
2309        }
2310        if (does_string_exist_in_boot_block(current_drive, "LILO")) {
2311            count_lilos++;
2312            strcpy(which_device, current_drive);
2313            break;
2314        }
2315    }
2316    paranoid_free(current_drive);
2317
2318    if (pclose(pdrives)) {
2319        log_OS_error("Cannot pclose pdrives");
2320    }
2321    log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
2322    if (count_grubs && !count_lilos) {
2323        return ('G');
2324    } else if (count_lilos && !count_grubs) {
2325        return ('L');
2326    } else if (count_grubs == 1 && count_lilos == 1) {
2327        log_it("I'll bet you used to use LILO but switched to GRUB...");
2328        return ('G');
2329    } else {
2330        log_it("Unknown boot loader");
2331        return ('U');
2332    }
2333}
2334#endif
2335
2336
2337/**
2338 * Write zeroes over the first 16K of @p device.
2339 * @param device The device to zero.
2340 * @return 0 for success, 1 for failure.
2341 */
2342int zero_out_a_device(char *device)
2343{
2344    FILE *fout;
2345    int i;
2346
2347    assert_string_is_neither_NULL_nor_zerolength(device);
2348
2349    log_it("Zeroing drive %s", device);
2350    if (!(fout = fopen(device, "w"))) {
2351        log_OS_error("Unable to open/write to device");
2352        return (1);
2353    }
2354    for (i = 0; i < 16384; i++) {
2355        fputc('\0', fout);
2356    }
2357    paranoid_fclose(fout);
2358    log_it("Device successfully zeroed.");
2359    return (0);
2360}
2361
2362
2363/**
2364 * Return the device pointed to by @p incoming.
2365 * @param incoming The device to resolve symlinks for.
2366 * @return The path to the real device file.
2367 * @note The returned string points to a storage that need to be freed by the caller
2368 * @bug Won't work with file v4.0; needs to be written in C.
2369 */
2370char *resolve_softlinks_to_get_to_actual_device_file(char *incoming)
2371{
2372    char *output = NULL;
2373    char *command = NULL;
2374    char *curr_fname = NULL;
2375    char *scratch = NULL;
2376    char *tmp = NULL;
2377    char *p = NULL;
2378
2379    struct stat statbuf;
2380    if (!does_file_exist(incoming)) {
2381        log_it
2382            ("resolve_softlinks_to_get_to_actual_device_file --- device not found");
2383        asprintf(&output, incoming);
2384    } else {
2385        asprintf(&curr_fname, incoming);
2386        lstat(curr_fname, &statbuf);
2387        while (S_ISLNK(statbuf.st_mode)) {
2388            log_msg(1, "curr_fname = %s", curr_fname);
2389            asprintf(&command, "file %s", curr_fname);
2390            tmp = call_program_and_get_last_line_of_output(command);
2391            paranoid_free(command);
2392
2393            for (p = tmp + strlen(tmp); p != tmp && *p != '`' && *p != ' ';
2394                 p--);
2395            p++;
2396            asprintf(&scratch, p);
2397            for (p = scratch; *p != '\0' && *p != '\''; p++);
2398            *p = '\0';
2399            log_msg(0, "curr_fname %s --> '%s' --> %s", curr_fname, tmp, scratch);
2400            paranoid_free(tmp);
2401
2402            if (scratch[0] == '/') {
2403                paranoid_free(curr_fname);
2404                asprintf(&curr_fname, scratch); // copy whole thing because it's an absolute softlink
2405            } else {            // copy over the basename cos it's a relative softlink
2406                p = curr_fname + strlen(curr_fname);
2407                while (p != curr_fname && *p != '/') {
2408                    p--;
2409                }
2410                if (*p == '/') {
2411                    p++;
2412                }
2413                *p = '\0';
2414                asprintf(&tmp, "%s%s", curr_fname, scratch);
2415                paranoid_free(curr_fname);
2416                curr_fname = tmp;
2417            }
2418            paranoid_free(scratch);
2419            lstat(curr_fname, &statbuf);
2420        }
2421        asprintf(&output, curr_fname);
2422        log_it("resolved %s to %s", incoming, output);
2423        paranoid_free(curr_fname);
2424    }
2425    return (output);
2426}
2427
2428/* @} - end of deviceGroup */
2429
2430
2431/**
2432 * Return the type of partition format (GPT or MBR)
2433 * Caller needs to free the return value
2434 */
2435char *which_partition_format(const char *drive)
2436{
2437    char *output = NULL;
2438    char *tmp = NULL;
2439    char *command = NULL;
2440    char *fdisk = NULL;
2441
2442    log_msg(0, "Looking for partition table format type");
2443    asprintf(&fdisk, "/sbin/parted2fdisk");
2444    log_msg(1, "Using %s", fdisk);
2445    asprintf(&command, "%s -l %s | grep 'EFI GPT'", fdisk, drive);
2446    paranoid_free(fdisk);
2447
2448    tmp = call_program_and_get_last_line_of_output(command);
2449    paranoid_free(command);
2450
2451    if (strstr(tmp, "GPT") == NULL) {
2452        asprintf(&output, "MBR");
2453    } else {
2454        asprintf(&output, "GPT");
2455    }
2456    paranoid_free(tmp);
2457    log_msg(0, "Found %s partition table format type", output);
2458    return (output);
2459}
2460
2461/* @} - end of deviceGroup */
Note: See TracBrowser for help on using the repository browser.