source: MondoRescue/branches/2.2.10/mondo/src/common/libmondo-devices.c @ 2329

Last change on this file since 2329 was 2329, checked in by Bruno Cornec, 12 years ago

r3340@localhost: bruno | 2009-08-12 00:17:29 +0200
Improve portability by defining all cmdline usage in 1 include (/tmp for FreeBSD and /proc fior LInux). Also doing tht for scripts.

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