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

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

r3341@localhost: bruno | 2009-08-13 22:36:24 +0200

  • Replacement of some strcpy
  • Change allocation done in resolve_softlinks_to_get_to_actual_device_file(), where_is_root_mounted(), bkptype_to_string(), which_boot_loader()
  • 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 2330 2009-08-18 13:20:49Z 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 2330 2009-08-18 13:20:49Z 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    tmp = 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    char *output;
159    switch (bt) {
160    case none:
161        mr_asprintf(output, "none");
162        break;
163    case iso:
164        mr_asprintf(output, "iso");
165        break;
166    case cdr:
167        mr_asprintf(output, "cdr");
168        break;
169    case cdrw:
170        mr_asprintf(output, "cdrw");
171        break;
172    case cdstream:
173        mr_asprintf(output, "cdstream");
174        break;
175    case nfs:
176        mr_asprintf(output, "nfs");
177        break;
178    case tape:
179        mr_asprintf(output, "tape");
180        break;
181    case udev:
182        mr_asprintf(output, "udev");
183        break;
184    case usb:
185        mr_asprintf(output, "usb");
186        break;
187    default:
188        mr_asprintf(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_two = NULL;
575    char *command = NULL;
576#ifndef __FreeBSD__
577    char *dvd_last_resort = NULL;
578#endif
579    char *mountpoint = NULL;
580    static char the_last_place_i_found_it[MAX_STR_LEN] = "";
581
582    /*@ intialize *************************************************** */
583
584    output = NULL;
585#ifndef __FreeBSD__
586    mr_asprintf(dvd_last_resort, "%s", "");;
587#endif
588
589    /*@ end vars **************************************************** */
590
591    if (g_cdrom_drive_is_here[0] && !isdigit(g_cdrom_drive_is_here[0])) {
592        mr_asprintf(output, "%s", g_cdrom_drive_is_here);
593        log_msg(3, "Been there, done that. Returning %s", output);
594        return(output);
595    }
596    if (the_last_place_i_found_it[0] != '\0' && !try_to_mount) {
597        mr_asprintf(output, "%s", the_last_place_i_found_it);
598        log_msg(3, "find_cdrom_device() --- returning last found location - '%s'", output);
599        return(output);
600    }
601
602    mr_asprintf(mountpoint, "%s/cd.mnt", bkpinfo->tmpdir);
603    make_hole_for_dir(mountpoint);
604
605    if (find_home_of_exe("cdrecord")) {
606        mr_asprintf(cdr_exe, "cdrecord");
607    } else {
608        mr_asprintf(cdr_exe, "dvdrecord");
609    }
610
611    if (!find_home_of_exe(cdr_exe)) {
612        mr_asprintf(output, "/dev/cdrom");
613        log_msg(4, "Can't find cdrecord; assuming %s", output);
614        mr_free(cdr_exe);
615        if (!does_device_exist(output)) {
616            log_msg(4, "That didn't work. Sorry.");
617            mr_free(output);
618            return(output);
619        } else {
620            return(output);
621        }
622    }
623
624    mr_asprintf(command, "%s -scanbus 2> /dev/null", cdr_exe);
625    fin = popen(command, "r");
626    log_msg(4, "command=%s", command);
627    mr_free(command);
628
629    if (!fin) {
630        log_OS_error("Cannot popen command");
631        mr_free(cdr_exe);
632        return(NULL);
633    }
634
635    malloc_string(tmp);
636    tmp[0] = '\0';
637    for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
638         (void)fgets(tmp, MAX_STR_LEN, fin)) {
639        p = strchr(tmp, '\'');
640        if (p) {
641            q = strchr(++p, '\'');
642            if (q) {
643                for (r = q; *(r - 1) == ' '; r--);
644                *r = '\0';
645                p = strchr(++q, '\'');
646                if (p) {
647                    q = strchr(++p, '\'');
648                    if (q) {
649                        while (*(q - 1) == ' ') {
650                            q--;
651                        }
652                        *q = '\0';
653                        mr_asprintf(phrase_two, "%s", p);
654                    }
655                }
656            }
657        }
658    }
659    paranoid_pclose(fin);
660
661#ifndef __FreeBSD__
662    if (!phrase_two || strlen(phrase_two) == 0) {
663        log_msg(4, "Not running phase two. String is empty.");
664    } else {
665        mr_asprintf(command, "dmesg | grep \"%s\" 2> /dev/null", phrase_two);
666        fin = popen(command, "r");
667        mr_free(command);
668
669        if (!fin) {
670            log_msg(4, "Cannot run 2nd command - non-fatal, fortunately");
671        } else {
672            for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
673                 (void)fgets(tmp, MAX_STR_LEN, fin)) {
674                log_msg(5, "--> '%s'", tmp);
675                if (tmp[0] != ' ' && tmp[1] != ' ') {
676                    p = strchr(tmp, ':');
677                    if (p) {
678                        *p = '\0';
679                        if (strstr(tmp, "DVD")) {
680                            mr_free(dvd_last_resort);
681                            mr_asprintf(dvd_last_resort, "/dev/%s", tmp);
682                            log_msg(4, "Ignoring '%s' because it's a DVD drive", tmp);
683                        } else {
684                            mr_asprintf(output, "/dev/%s", tmp);
685                            found_it = TRUE;
686                        }
687                    }
688                }
689            }
690            paranoid_pclose(fin);
691        }
692    }
693    mr_free(phrase_two);
694    paranoid_free(tmp);
695
696#endif
697#ifdef __FreeBSD__
698    if (!found_it) {
699        log_msg(4, "OK, approach 2");
700        if (!(output = set_dev_to_this_if_rx_OK("/dev/cdrom"))) {
701            if (!(output = set_dev_to_this_if_rx_OK("/dev/cdrom1"))) {
702                if (!(output = set_dev_to_this_if_rx_OK("/dev/dvd"))) {
703                    if (!(output = set_dev_to_this_if_rx_OK("/dev/acd0"))) {
704                        if (!(output = set_dev_to_this_if_rx_OK("/dev/cd01"))) {
705                            if (!(output = set_dev_to_this_if_rx_OK("/dev/acd1"))) {
706                                if (!(output = set_dev_to_this_if_rx_OK("/dev/cd1"))) {
707                                    mr_free(cdr_exe);
708                                    return(NULL);
709                                }
710                            }
711                        }
712                    }
713                }
714            }
715        }
716    }
717#else
718    if (!found_it && strlen(dvd_last_resort) > 0) {
719        log_msg(4, "Well, I'll use the DVD - %s - as a last resort", dvd_last_resort);
720        mr_asprintf(output, "%s", dvd_last_resort);
721        found_it = TRUE;
722    }
723    mr_free(dvd_last_resort);
724
725    if (found_it) {
726        mr_asprintf(tmp1, "grep \"%s=ide-scsi\" " CMDLINE " &> /dev/null", strrchr(output, '/') + 1);
727        if (system(tmp1) == 0) {
728            log_msg(4, "%s is not right. It's being SCSI-emulated. Continuing.", output);
729            found_it = FALSE;
730            mr_free(output);
731        }
732        mr_free(tmp1);
733    }
734
735    if (found_it) {
736        log_msg(4, "(find_cdrom_device) --> '%s'", output);
737        if (!does_device_exist(output)) {
738            found_it = FALSE;
739            log_msg(4, "OK, I was wrong, I haven't found it... yet.");
740            mr_free(output);
741        }
742    }
743
744    if (!found_it) {
745        log_msg(4, "OK, approach 2");
746        if (!(output = set_dev_to_this_if_rx_OK("/dev/scd0"))) {
747            if (!(output = set_dev_to_this_if_rx_OK("/dev/sr0"))) {
748                if (!(output = set_dev_to_this_if_rx_OK("/dev/cdrom"))) {
749                    if (!(output = set_dev_to_this_if_rx_OK("/dev/cdrom0"))) {
750                        if (!(output = set_dev_to_this_if_rx_OK("/dev/cdrom1"))) {
751                            if (!(output = set_dev_to_this_if_rx_OK("/dev/sr1"))) {
752                                if (!(output = set_dev_to_this_if_rx_OK("/dev/dvd"))) {
753                                    if (!(output = set_dev_to_this_if_rx_OK(g_cdrw_drive_is_here))) {
754                                        mr_free(cdr_exe);
755                                        return(NULL);
756                                    }
757                                }
758                            }
759                        }
760                    }
761                }
762            }
763        }
764    }
765#endif
766
767    if (found_it && try_to_mount) {
768        if (mount_CDROM_here(output, mountpoint)) {
769            log_msg(4, "[Cardigans] I've changed my mind");
770            found_it = FALSE;
771            mr_free(output);
772        } else {
773            mr_asprintf(tmp1, "%s/archives", mountpoint);
774            if (!does_file_exist(tmp)) {
775                log_msg(4, "[Cardigans] I'll take it back");
776                found_it = FALSE;
777                mr_free(output);
778            } else {
779                mr_asprintf(command, "umount %s", output);
780                paranoid_system(command);
781                mr_free(command);
782
783                log_msg(4, "I'm confident the Mondo CD is in %s", output);
784            }
785            mr_free(tmp1);
786        }
787    }
788    unlink(mountpoint);
789    mr_free(mountpoint);
790
791    if (found_it) {
792        if (!does_file_exist(output)) {
793            log_msg(3, "I still haven't found it.");
794            mr_free(cdr_exe);
795            mr_free(output);
796            return (NULL);
797        }
798        log_msg(3, "(find_cdrom_device) --> '%s'", output);
799        strcpy(the_last_place_i_found_it, output);
800        strcpy(g_cdrom_drive_is_here, output);
801        mr_free(cdr_exe);
802        return (output);
803    }
804
805    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);
806    mr_free(cdr_exe);
807
808    log_msg(1, "command=%s", command);
809    mr_asprintf(tmp1, "%s", call_program_and_get_last_line_of_output(command));
810    mr_free(command);
811
812    mr_free(output);
813    if (strlen(tmp1) > 0) {
814        mr_asprintf(output, "%s", tmp1);
815        log_msg(4, "Finally found it at %s", output);
816    } else {
817        log_msg(4, "Still couldn't find it.");
818    }
819    mr_free(tmp1);
820
821    return (output);
822}
823
824
825char *find_dvd_device()
826{
827    char *tmp = NULL;
828    int devno = -1;
829    char *output = NULL;
830
831    if (g_dvd_drive_is_here[0]) {
832        mr_asprintf(output, g_dvd_drive_is_here);
833        log_msg(3, "Been there, done that. Returning %s", output);
834        return (output);
835    }
836
837    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"));
838    log_msg(5, "tmp = '%s'", tmp);
839    if (!tmp[0])
840        mr_free(tmp);
841        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")
842            );
843    if (tmp[0]) {
844        devno = atoi(tmp) - 1;
845    }
846    mr_free(tmp);
847
848    if (devno >= 0) {
849        mr_asprintf(output, "/dev/scd%d", devno);
850        strcpy(g_dvd_drive_is_here, output);
851        log_msg(2, "I think DVD is at %s", output);
852    } else {
853        log_msg(2, "I cannot find DVD");
854    }
855
856    return (output);
857}
858
859
860
861
862
863#include <sys/ioctl.h>
864
865/**
866 * Find the size of the specified @p drive, in megabytes. Uses @c ioctl calls
867 * and @c dmesg.
868 * @param drive The device to find the size of.
869 * @return size in megabytes.
870 */
871long get_phys_size_of_drive(char *drive)
872{
873    int fd;
874#if linux
875    unsigned long long s = 0;
876    int fileid, cylinders = 0, cylindersleft = 0;
877    int cylindersize = 0;
878    int gotgeo = 0;
879
880
881    struct hd_geometry hdgeo;
882#elif __FreeBSD__
883    off_t s;
884#endif
885
886    long outvalA = -1;
887    long outvalB = -1;
888    long outvalC = -1;
889
890    if ((fd = open(drive, O_RDONLY)) != -1) {
891        if (ioctl(fd,
892#if linux
893#ifdef BLKGETSIZE64
894                  BLKGETSIZE64,
895#else
896                  BLKGETSIZE,
897#endif
898#elif __FreeBSD__
899                  DIOCGMEDIASIZE,
900#endif
901                  &s) != -1) {
902            close(fd);
903            // s>>11 works for older disks but not for newer ones
904            outvalB =
905#if linux
906#ifdef BLKGETSIZE64
907                s >> 20
908#else
909                s >> 11
910#endif
911#else
912                s >> 20
913#endif
914                ;
915        }
916    }
917
918    if (outvalB <= 0) {
919        log_msg(1, "Error getting size of %s: %s", drive, strerror(errno));
920#if linux
921        fileid = open(drive, O_RDONLY);
922        if (fileid != -1) {
923            if (ioctl(fileid, HDIO_GETGEO, &hdgeo) != -1) {
924                if (hdgeo.cylinders && hdgeo.heads && hdgeo.sectors) {
925                    cylindersleft = cylinders = hdgeo.cylinders;
926                    cylindersize = hdgeo.heads * hdgeo.sectors / 2;
927                    outvalA = cylindersize * cylinders / 1024;
928                    log_msg(2, "Got Harddisk geometry, C:%d, H:%d, S:%d",
929                            hdgeo.cylinders, hdgeo.heads, hdgeo.sectors);
930                    gotgeo = 1;
931                } else {
932                    log_msg(1, "Harddisk geometry wrong");
933                }
934            } else {
935                log_msg(1,
936                        "Error in ioctl() getting new hard disk geometry (%s), resizing in unsafe mode",
937                        strerror(errno));
938            }
939            close(fileid);
940        } else {
941            log_msg(1, "Failed to open %s for reading: %s", drive,
942                    strerror(errno));
943        }
944        if (!gotgeo) {
945            log_msg(1, "Failed to get harddisk geometry, using old mode");
946        }
947#endif
948    }
949// OLDER DISKS will give ridiculously low value for outvalB (so outvalA is returned) :)
950// NEWER DISKS will give sane value for outvalB (close to outvalA, in other words) :)
951
952    outvalC = (outvalA > outvalB) ? outvalA : outvalB;
953
954//  log_msg (5, "drive = %s, error = %s", drive, strerror (errno));
955//  fatal_error ("GPSOD: Unable to get size of drive");
956    log_msg(1, "%s --> %ld or %ld --> %ld", drive, outvalA, outvalB,
957            outvalC);
958
959    return (outvalC);
960}
961
962/**
963 * Determine whether @p format is supported by the kernel. Uses /proc/filesystems
964 * under Linux and @c lsvfs under FreeBSD.
965 * @param format The format to test.
966 * @return TRUE if the format is supported, FALSE if not.
967 */
968bool is_this_a_valid_disk_format(char *format)
969{
970    char *good_formats = NULL;
971    char *command = NULL;
972    char *format_sz = NULL;
973
974    FILE *pin;
975    int retval;
976
977    assert_string_is_neither_NULL_nor_zerolength(format);
978
979    mr_asprintf(format_sz, "%s ", format);
980
981#ifdef __FreeBSD__
982    mr_asprintf(command, "lsvfs | tr -s '\t' ' ' | grep -v Filesys | grep -v -- -- | cut -d' ' -f1 | tr -s '\n' ' '");
983#else
984    mr_asprintf(command, "grep -v nodev /proc/filesystems | tr -s '\t' ' ' | cut -d' ' -f2 | tr -s '\n' ' '");
985#endif
986
987    pin = popen(command, "r");
988    mr_free(command);
989
990    if (!pin) {
991        log_OS_error("Unable to read good formats");
992        retval = 0;
993    } else {
994        mr_getline(&good_formats, pin);
995        if (pclose(pin)) {
996            log_OS_error("Cannot pclose good formats");
997        }
998        mr_strip_spaces(good_formats);
999        mr_strcat(good_formats, " swap lvm raid ntfs-3g ntfs 7 ");  // " ntfs 7 " -- um, cheating much? :)
1000        if (strstr(good_formats, format_sz)) {
1001            retval = 1;
1002        } else {
1003            retval = 0;
1004        }
1005        mr_free(good_formats);
1006    }
1007    mr_free(format_sz);
1008
1009    return (retval);
1010}
1011
1012
1013/** @def SWAPLIST_COMMAND The command to list the swap files/partitions in use. */
1014
1015/**
1016 * Determine whether @p device_raw is currently mounted.
1017 * @param device_raw The device to check.
1018 * @return TRUE if it's mounted, FALSE if not.
1019 */
1020bool is_this_device_mounted(char *device_raw)
1021{
1022
1023    /*@ pointers **************************************************** */
1024    FILE *fin;
1025
1026    /*@ buffers ***************************************************** */
1027    char *incoming;
1028    char *device_with_tab = NULL;
1029    char *device_with_space = NULL;
1030    char *tmp = NULL;
1031    bool retval = FALSE;
1032
1033#ifdef __FreeBSD__
1034#define SWAPLIST_COMMAND "swapinfo"
1035#else
1036#define SWAPLIST_COMMAND "cat /proc/swaps"
1037#endif
1038
1039    /*@ end vars **************************************************** */
1040
1041    if (device_raw == NULL) {
1042        return(FALSE);
1043    }
1044
1045    malloc_string(incoming);
1046    if (device_raw[0] != '/' && !strstr(device_raw, ":/")) {
1047        log_msg(1, "%s needs to have a '/' prefixed - I'll do it",
1048                device_raw);
1049        mr_asprintf(tmp, "/%s", device_raw);
1050    } else {
1051        mr_asprintf(tmp, "%s", device_raw);
1052    }
1053    log_msg(1, "Is %s mounted?", tmp);
1054    if (!strcmp(tmp, "/proc") || !strcmp(tmp, "proc")) {
1055        log_msg(1,
1056                "I don't know how the heck /proc made it into the mountlist. I'll ignore it.");
1057        mr_free(tmp);
1058        return(FALSE);
1059    }
1060    mr_asprintf(device_with_tab, "%s\t", tmp);
1061    mr_asprintf(device_with_space, "%s ", tmp);
1062    mr_free(tmp);
1063
1064    if (!(fin = popen("mount", "r"))) {
1065        log_OS_error("Cannot popen 'mount'");
1066        return(FALSE);
1067    }
1068    for ((void)fgets(incoming, MAX_STR_LEN - 1, fin); !feof(fin);
1069         (void)fgets(incoming, MAX_STR_LEN - 1, fin)) {
1070        if (strstr(incoming, device_with_space) //> incoming
1071            || strstr(incoming, device_with_tab))   // > incoming)
1072        {
1073            paranoid_pclose(fin);
1074            paranoid_free(incoming);
1075            return(TRUE);
1076        }
1077    }
1078    mr_free(device_with_tab);
1079    mr_free(device_with_space);
1080    paranoid_pclose(fin);
1081    mr_asprintf(tmp, "%s | grep -E \"^%s\" > /dev/null 2> /dev/null", SWAPLIST_COMMAND, device_with_space);
1082    log_msg(4, "tmp (command) = '%s'", tmp);
1083    if (!system(tmp)) {
1084        retval = TRUE;
1085    }
1086    mr_free(tmp);
1087    paranoid_free(incoming);
1088    return(retval);
1089}
1090
1091#ifdef __FreeBSD__
1092//                       CODE IS FREEBSD-SPECIFIC
1093/**
1094 * Create a loopback device for specified @p fname.
1095 * @param fname The file to associate with a device.
1096 * @return /dev entry for the device, or NULL if it couldn't be allocated.
1097 */
1098char *make_vn(char *fname)
1099{
1100    char *device = (char *) malloc(MAX_STR_LEN);
1101    char *mddevice = (char *) malloc(32);
1102    char command[MAX_STR_LEN];
1103    int vndev = 2;
1104    if (atoi
1105        (call_program_and_get_last_line_of_output
1106         ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1107        do {
1108            sprintf(mddevice, "vn%ic", vndev++);
1109            sprintf(command, "vnconfig %s %s", mddevice, fname);
1110            if (vndev > 10) {
1111                return NULL;
1112            }
1113        }
1114        while (system(command));
1115    } else {
1116        sprintf(command, "mdconfig -a -t vnode -f %s", fname);
1117        mddevice = call_program_and_get_last_line_of_output(command);
1118        if (!strstr(mddevice, "md")) {
1119            return NULL;
1120        }
1121    }
1122    sprintf(device, "/dev/%s", mddevice);
1123    return device;
1124}
1125
1126
1127
1128//                       CODE IS FREEBSD-SPECIFIC
1129/**
1130 * Deallocate specified @p dname.
1131 * This should be called when you are done with the device created by make_vn(),
1132 * so the system does not run out of @c vn devices.
1133 * @param dname The device to deallocate.
1134 * @return 0 for success, nonzero for failure.
1135 */
1136int kick_vn(char *dname)
1137{
1138    char *command = NULL;
1139    int res = 0;
1140
1141    if (strncmp(dname, "/dev/", 5) == 0) {
1142        dname += 5;
1143    }
1144
1145    if (atoi
1146        (call_program_and_get_last_line_of_output
1147         ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1148        mr_asprintf(command, "vnconfig -d %s", dname);
1149    } else {
1150        mr_asprintf(command, "mdconfig -d -u %s", dname);
1151    }
1152    res = system(command);
1153    mr_free(command);
1154    return(res);
1155}
1156#endif
1157
1158
1159/**
1160 * Mount the CD-ROM at @p mountpoint.
1161 * @param device The device (or file if g_ISO_restore_mode) to mount.
1162 * @param mountpoint The place to mount it.
1163 * @return 0 for success, nonzero for failure.
1164 */
1165int mount_USB_here(char *device, char *mountpoint)
1166{
1167    /*@ buffer ****************************************************** */
1168    char *command = NULL;
1169    int retval;
1170
1171    assert_string_is_neither_NULL_nor_zerolength(device);
1172    assert_string_is_neither_NULL_nor_zerolength(mountpoint);
1173
1174    make_hole_for_dir(mountpoint);
1175    if (isdigit(device[0])) {
1176        return(1);
1177    }
1178    log_msg(4, "(mount_USB_here --- device=%s, mountpoint=%s", device, mountpoint);
1179
1180#ifdef __FreeBSD__
1181    mr_asprintf(command, "mount_vfat %s %s 2>> %s", device, mountpoint, MONDO_LOGFILE);
1182
1183#else
1184    mr_asprintf(command, "mount %s -t vfat %s 2>> %s", device, mountpoint, MONDO_LOGFILE);
1185#endif
1186
1187    log_msg(4, command);
1188    retval = system(command);
1189    log_msg(1, "system(%s) returned %d", command, retval);
1190    mr_free(command);
1191
1192    return (retval);
1193}
1194
1195/**
1196 * Mount the CD-ROM at @p mountpoint.
1197 * @param device The device (or file if g_ISO_restore_mode) to mount.
1198 * @param mountpoint The place to mount it.
1199 * @return 0 for success, nonzero for failure.
1200 */
1201int mount_CDROM_here(char *device, const char *mountpoint)
1202{
1203    /*@ buffer ****************************************************** */
1204    char *command = NULL;
1205    int retval;
1206#ifdef __FreeBSD__
1207    char *dev = NULL;
1208#else
1209    char *options = NULL;
1210#endif
1211
1212    assert_string_is_neither_NULL_nor_zerolength(mountpoint);
1213
1214    make_hole_for_dir(mountpoint);
1215
1216    if ((device == NULL) || (isdigit(device[0]))) {
1217        mr_free(device);
1218        device = find_cdrom_device(FALSE);
1219    }
1220#ifndef __FreeBSD__
1221    mr_asprintf(options, "ro");
1222#endif
1223
1224    if (g_ISO_restore_mode) {
1225
1226#ifdef __FreeBSD__
1227        mr_asprintf(dev, "%s", make_vn(device));
1228        if (!dev) {
1229            mr_asprintf(command, "Unable to mount ISO (make_vn(%s) failed)", device);
1230            fatal_error(command);
1231        }
1232        mr_free(device);
1233        device = dev;
1234#else
1235        mr_strcat(options, ",loop");
1236#endif
1237
1238    }
1239    log_msg(4, "(mount_CDROM_here --- device=%s, mountpoint=%s", device, mountpoint);
1240    /*@ end vars *************************************************** */
1241
1242#ifdef __FreeBSD__
1243    mr_asprintf(command, "mount_cd9660 -r %s %s 2>> %s", device, mountpoint, MONDO_LOGFILE);
1244
1245#else
1246    mr_asprintf(command, "mount %s -o %s -t iso9660 %s 2>> %s", device, options, mountpoint, MONDO_LOGFILE);
1247    paranoid_free(options);
1248#endif
1249
1250    log_msg(4, command);
1251    if (strncmp(device, "/dev/", 5) == 0) {
1252        retract_CD_tray_and_defeat_autorun();
1253    }
1254    retval = system(command);
1255    log_msg(1, "system(%s) returned %d", command, retval);
1256    mr_free(command);
1257
1258    return (retval);
1259}
1260
1261
1262
1263
1264
1265
1266/**
1267 * Ask the user for CD number @p cd_number_i_want.
1268 * Sets g_current_media_number once the correct CD is inserted.
1269 * @param bkpinfo The backup information structure. Fields used:
1270 * - @c bkpinfo->backup_media_type
1271 * - @c bkpinfo->prefix
1272 * - @c bkpinfo->isodir
1273 * - @c bkpinfo->media_device
1274 * - @c bkpinfo->please_dont_eject_when_restoring
1275 * @param cd_number_i_want The CD number to ask for.
1276 */
1277void
1278insist_on_this_cd_number(int cd_number_i_want)
1279{
1280
1281    /*@ int ************************************************************* */
1282    int res = 0;
1283
1284
1285    /*@ buffers ********************************************************* */
1286    char *tmp = NULL;
1287    char *mds = NULL;
1288    char *request = NULL;
1289
1290    assert(bkpinfo != NULL);
1291    assert(cd_number_i_want > 0);
1292
1293//  log_msg(3, "Insisting on CD number %d", cd_number_i_want);
1294
1295    if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
1296        log_msg(3,
1297                "No need to insist_on_this_cd_number when the backup type isn't CD-R(W) or NFS or ISO");
1298        return;
1299    }
1300    mr_asprintf(tmp, "mkdir -p " MNT_CDROM);
1301    run_program_and_log_output(tmp, 5);
1302    mr_free(tmp);
1303
1304    if (g_ISO_restore_mode || bkpinfo->backup_media_type == iso || bkpinfo->backup_media_type == nfs) {
1305        // BERLIOS --- I'm tempted to do something about this...
1306        // Why unmount and remount again and again?
1307        log_msg(3, "Remounting CD");
1308        g_ISO_restore_mode = TRUE;
1309        if (is_this_device_mounted(MNT_CDROM)) {
1310            run_program_and_log_output("umount " MNT_CDROM, 5);
1311        }
1312        mr_asprintf(tmp, "mkdir -p %s/isodir &> /dev/null", bkpinfo->tmpdir);
1313        (void)system(tmp);
1314        mr_free(tmp);
1315
1316        if (((bkpinfo->isodir == NULL) && (bkpinfo->nfs_remote_dir == NULL)) || (bkpinfo->prefix == NULL)) {
1317            fatal_error("Unable to prepare ISO file name. Please report to dev team");
1318        }
1319        if (bkpinfo->nfs_remote_dir) {
1320            // NFS
1321            mr_asprintf(tmp, "%s/%s/%s-%d.iso", bkpinfo->isodir, bkpinfo->nfs_remote_dir, bkpinfo->prefix, cd_number_i_want);
1322        } else {
1323            // ISO
1324            mr_asprintf(tmp, "%s/%s-%d.iso", bkpinfo->isodir, bkpinfo->prefix, cd_number_i_want);
1325        }
1326        if (!does_file_exist(tmp)) {
1327            mr_free(tmp);
1328            if (bkpinfo->nfs_remote_dir) {
1329                // NFS
1330                mr_asprintf(tmp, "%s/isodir/%s/%s-%d.iso", bkpinfo->tmpdir, bkpinfo->nfs_remote_dir, bkpinfo->prefix, cd_number_i_want);
1331            } else {
1332                // ISO
1333                mr_asprintf(tmp, "%s/isodir/%s-%d.iso", bkpinfo->tmpdir, bkpinfo->prefix, cd_number_i_want);
1334            }
1335            if (does_file_exist(tmp)) {
1336                log_msg(1, "FIXME - hacking bkpinfo->isodir from '%s' to %s/isodir", bkpinfo->isodir, bkpinfo->tmpdir);
1337                mr_free(bkpinfo->isodir);
1338                mr_asprintf(bkpinfo->isodir, "%s/isodir", bkpinfo->tmpdir);
1339            }
1340        }
1341        log_msg(3, "Mounting %s at %s", tmp, MNT_CDROM);
1342        if (mount_CDROM_here(tmp, MNT_CDROM)) {
1343            mr_free(tmp);
1344            fatal_error("Mommy!");
1345        }
1346        mr_free(tmp);
1347    }
1348    if ((res = what_number_cd_is_this()) != cd_number_i_want) {
1349        log_msg(3, "Currently, we hold %d but we want %d", res, cd_number_i_want);
1350        mds = media_descriptor_string(bkpinfo->backup_media_type);
1351        log_msg(3, "Insisting on %s #%d", mds, cd_number_i_want);
1352        mr_asprintf(request, "Please insert %s #%d and press Enter.", mds, cd_number_i_want);
1353        mr_free(mds);
1354
1355        while (what_number_cd_is_this() != cd_number_i_want) {
1356            paranoid_system("sync");
1357            if (is_this_device_mounted(MNT_CDROM)) {
1358                res =
1359                    run_program_and_log_output("umount " MNT_CDROM, FALSE);
1360            } else {
1361                res = 0;
1362            }
1363            if (res) {
1364                log_to_screen("WARNING - failed to unmount CD-ROM drive");
1365            }
1366            if (!bkpinfo->please_dont_eject) {
1367                res = eject_device(bkpinfo->media_device);
1368            } else {
1369                res = 0;
1370            }
1371            if (res) {
1372                log_to_screen("WARNING - failed to eject CD-ROM disk");
1373            }
1374            popup_and_OK(request);
1375            if (!bkpinfo->please_dont_eject) {
1376                inject_device(bkpinfo->media_device);
1377            }
1378            paranoid_system("sync");
1379        }
1380        mr_free(request);
1381
1382        log_msg(1, "Thankyou. Proceeding...");
1383        g_current_media_number = cd_number_i_want;
1384    }
1385}
1386
1387/* @} - end of deviceGroup */
1388
1389
1390/**
1391 * Ask user for details of backup/restore information.
1392 * Called when @c mondoarchive doesn't get any parameters.
1393 * @param bkpinfo The backup information structure to fill out with the user's data.
1394 * @param archiving_to_media TRUE if archiving, FALSE if restoring.
1395 * @return 0, always.
1396 * @bug No point of `int' return value.
1397 * @ingroup archiveGroup
1398 */
1399int interactively_obtain_media_parameters_from_user(bool archiving_to_media)
1400// archiving_to_media is TRUE if I'm being called by mondoarchive
1401// archiving_to_media is FALSE if I'm being called by mondorestore
1402{
1403    char *tmp = NULL;
1404    char *p = NULL;
1405    char *mds = NULL;
1406    char *sz_size = NULL;
1407    char *command = NULL;
1408    char *comment = NULL;
1409    char *prompt;
1410    int i;
1411    FILE *fin;
1412
1413    malloc_string(prompt);
1414    malloc_string(tmp1);
1415    assert(bkpinfo != NULL);
1416    bkpinfo->nonbootable_backup = FALSE;
1417
1418    // Tape, CD, NFS, ...?
1419    srandom(getpid());
1420    bkpinfo->backup_media_type =
1421        (g_restoring_live_from_cd) ? cdr :
1422        which_backup_media_type(bkpinfo->restore_data);
1423    if (bkpinfo->backup_media_type == none) {
1424        log_to_screen("User has chosen not to backup the PC");
1425        finish(1);
1426    }
1427    /* Why asking to remove the media with tape ?
1428    if (bkpinfo->backup_media_type == tape && bkpinfo->restore_data) {
1429        popup_and_OK("Please remove media from drive(s)");
1430    }
1431    */
1432    tmp = bkptype_to_string(bkpinfo->backup_media_type);
1433    log_msg(3, "media type = %s", tmp);
1434    mr_free(tmp);
1435
1436    bkpinfo->cdrw_speed = (bkpinfo->backup_media_type == cdstream) ? 2 : 4;
1437    bkpinfo->compression_level = (bkpinfo->backup_media_type == cdstream) ? 1 : 5;
1438    bkpinfo->use_lzo = (bkpinfo->backup_media_type == cdstream) ? TRUE : FALSE;
1439    mvaddstr_and_log_it(2, 0, " ");
1440
1441    // Find device's /dev (or SCSI) entry
1442    switch (bkpinfo->backup_media_type) {
1443    case cdr:
1444    case cdrw:
1445    case dvd:
1446    case usb:
1447        /* Never try to eject a USB device */
1448        if (bkpinfo->backup_media_type == usb) {
1449            bkpinfo->please_dont_eject = TRUE;
1450        }
1451        if (archiving_to_media) {
1452            if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
1453                if (ask_me_yes_or_no
1454                    ("Is your computer a laptop, or does the CD writer incorporate BurnProof technology?"))
1455                {
1456                    bkpinfo->manual_cd_tray = TRUE;
1457                }
1458            }
1459            if ((bkpinfo->compression_level =
1460                 which_compression_level()) == -1) {
1461                log_to_screen("User has chosen not to backup the PC");
1462                finish(1);
1463            }
1464            mds = media_descriptor_string(bkpinfo->backup_media_type);
1465            mr_asprintf(comment, "What speed is your %s (re)writer?", mds);
1466            mr_free(bkpinfo->media_device);
1467            if (bkpinfo->backup_media_type == dvd) {
1468                bkpinfo->media_device = find_dvd_device();
1469                mr_asprintf(tmp, "1");
1470                mr_asprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE);  // 4.7 salesman's GB = 4.482 real GB = 4482 MB
1471                log_msg(1, "Setting to DVD defaults");
1472            } else {
1473                mr_asprintf(bkpinfo->media_device, "%s", VANILLA_SCSI_CDROM);
1474                mr_asprintf(tmp, "4");
1475                mr_asprintf(sz_size, "%d", 650);
1476                log_msg(1, "Setting to CD defaults");
1477            }
1478            if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
1479                p = popup_and_get_string("Speed", comment, tmp);
1480                mr_free(tmp);
1481
1482                if (p == NULL) {
1483                    log_to_screen("User has chosen not to backup the PC");
1484                    mr_free(comment);
1485                    finish(1);
1486                }
1487                /* tmp now has the new value given by the user */
1488                tmp = p;
1489            }
1490            mr_free(comment);
1491
1492            bkpinfo->cdrw_speed = atoi(tmp1);   // if DVD then this shouldn't ever be used anyway :)
1493
1494            mr_asprintf(comment, "How much data (in Megabytes) will each %s store?", mds);
1495            mr_free(mds);
1496            p = popup_and_get_string("Size", comment, sz_size);
1497            mr_free(sz_size);
1498            mr_free(comment);
1499
1500            if (p == NULL) {
1501                log_to_screen("User has chosen not to backup the PC");
1502                finish(1);
1503            }
1504            sz_size = p;
1505
1506            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1507                bkpinfo->media_size[i] = atoi(sz_size);
1508            }
1509
1510            if (bkpinfo->media_size[0] <= 0) {
1511                log_to_screen("User has chosen not to backup the PC");
1512                finish(1);
1513            }
1514        }
1515        /* No break because we continue even for usb */
1516    case cdstream:
1517        mds = media_descriptor_string(bkpinfo->backup_media_type);
1518
1519        mr_free(bkpinfo->media_device);
1520        if ((bkpinfo->disaster_recovery) && (bkpinfo->backup_media_type != usb)) {
1521            mr_asprintf(bkpinfo->media_device, "/dev/cdrom");
1522            log_msg(2, "CD-ROM device assumed to be at %s", bkpinfo->media_device);
1523        } else if ((bkpinfo->restore_data && (bkpinfo->backup_media_type != usb)) || bkpinfo->backup_media_type == dvd) {
1524            if ((bkpinfo->backup_media_type == dvd) || ((bkpinfo->media_device = find_cdrom_device(FALSE)) != NULL)) {
1525                mr_asprintf(comment, "Please specify your %s drive's /dev entry", mds);
1526                p = popup_and_get_string("Device?", comment, bkpinfo->media_device);
1527                mr_free(comment);
1528
1529                if (p == NULL) {
1530                    log_to_screen("User has chosen not to backup the PC");
1531                    finish(1);
1532                }
1533                mr_free(bkpinfo->media_device);
1534                bkpinfo->media_device = p;
1535            }
1536            if (bkpinfo->media_device != NULL) {
1537                log_msg(2, "%s device found at %s", mds, bkpinfo->media_device);
1538            } else {
1539                log_msg(2, "%s device not found (bkpinfo->media_device is NULL)", mds);
1540            }
1541        } else {
1542            if (((bkpinfo->media_device = find_cdrw_device()) != NULL) && (bkpinfo->backup_media_type != usb)) {
1543                mr_free(bkpinfo->media_device);
1544            }
1545            if (bkpinfo->media_device != NULL) {
1546                if (bkpinfo->backup_media_type == usb) {
1547                    mr_asprintf(tmp, "I think your %s media corresponds to %s. Is this correct?", mds, bkpinfo->media_device);
1548                } else {
1549                    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);
1550                }
1551                if (!ask_me_yes_or_no(tmp)) {
1552                    mr_free(bkpinfo->media_device);
1553                }
1554                mr_free(tmp);
1555            }
1556            if (!bkpinfo->media_device) {
1557                if (bkpinfo->backup_media_type == usb) {
1558                    p = popup_and_get_string("/dev entry?", "What is the /dev entry of your USB Disk/Key, please?", NULL);
1559                } else {
1560                    if (g_kernel_version < 2.6) {
1561                        p = popup_and_get_string("Device node?", "What is the SCSI node of your CD (re)writer, please?", NULL);
1562                    } else {
1563                        p = popup_and_get_string("/dev entry?", "What is the /dev entry of your CD (re)writer, please?", NULL);
1564                    }
1565                }
1566                if (p == NULL) {
1567                    log_to_screen("User has chosen not to backup the PC");
1568                    finish(1);
1569                }
1570                bkpinfo->media_device = p;
1571            }
1572        }
1573        mr_free(mds);
1574
1575        if (bkpinfo->backup_media_type == cdstream) {
1576            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1577                bkpinfo->media_size[i] = 650;
1578            }
1579        }
1580        break;
1581    case udev:
1582        if (!ask_me_yes_or_no
1583            ("This option is for advanced users only. Are you sure?")) {
1584            log_to_screen("User has chosen not to backup the PC");
1585            finish(1);
1586        }
1587    case tape:
1588
1589        mr_free(bkpinfo->media_device);
1590        if ((!bkpinfo->restore_mode) && ((bkpinfo->media_device = find_tape_device_and_size(NULL)) == NULL)) {
1591            log_msg(3, "Ok, using vanilla scsi tape.");
1592            mr_asprintf(bkpinfo->media_device, "%s", VANILLA_SCSI_TAPE);
1593            if ((fin = fopen(bkpinfo->media_device, "r"))) {
1594                paranoid_fclose(fin);
1595            } else {
1596                mr_free(bkpinfo->media_device);
1597                mr_asprintf(bkpinfo->media_device, "/dev/osst0");
1598            }
1599        }
1600        if (bkpinfo->media_device != NULL) {
1601            if ((fin = fopen(bkpinfo->media_device, "r"))) {
1602                paranoid_fclose(fin);
1603            } else {
1604                if (does_file_exist("/tmp/mondo-restore.cfg")) {
1605                    mr_free(bkpinfo->media_device);
1606                    bkpinfo->media_device = read_cfg_var("/tmp/mondo-restore.cfg", "media-dev");
1607                }
1608            }
1609        }
1610        if (bkpinfo->media_device != NULL) {
1611            mr_asprintf(tmp, "I think I've found your tape streamer at %s; am I right on the money?", bkpinfo->media_device);
1612            if (!ask_me_yes_or_no(tmp)) {
1613                mr_free(bkpinfo->media_device);
1614            }
1615            mr_free(tmp);
1616        }
1617        if (bkpinfo->media_device == NULL) {
1618            p = popup_and_get_string("Device name?", "What is the /dev entry of your tape streamer?", bkpinfo->media_device);
1619            if (p == NULL) {
1620                log_to_screen("User has chosen not to backup the PC");
1621                finish(1);
1622            }
1623            bkpinfo->media_device = p;
1624        }
1625        mr_asprintf(tmp, "ls -l %s", bkpinfo->media_device);
1626        if (run_program_and_log_output(tmp, FALSE)) {
1627            log_to_screen("User has not specified a valid /dev entry");
1628            finish(1);
1629        }
1630        mr_free(tmp);
1631
1632        bkpinfo->use_obdr = ask_me_yes_or_no
1633            ("Do you want to activate OBDR support for your tapes ?");
1634        bkpinfo->media_size[0] = 0;
1635        log_msg(4, "media_size[0] = %ld", bkpinfo->media_size[0]);
1636        if (bkpinfo->media_size[0] <= 0) {
1637            bkpinfo->media_size[0] = 0;
1638        }
1639        for (i = 1; i <= MAX_NOOF_MEDIA; i++) {
1640            bkpinfo->media_size[i] = bkpinfo->media_size[0];
1641        }
1642        if (archiving_to_media) {
1643            if ((bkpinfo->compression_level =
1644                 which_compression_level()) == -1) {
1645                log_to_screen("User has chosen not to backup the PC");
1646                finish(1);
1647            }
1648        }
1649        break;
1650
1651
1652
1653    case nfs:
1654        /* Never try to eject a NFS device */
1655        bkpinfo->please_dont_eject = TRUE;
1656
1657        /* Initiate bkpinfo nfs_mount path from running environment if not already done */
1658        if (bkpinfo->nfs_mount == NULL) {
1659            mr_asprintf(bkpinfo->nfs_mount, "%s", call_program_and_get_last_line_of_output("mount | grep \":\" | cut -d' ' -f1 | head -n1"));
1660        }
1661#ifdef __FreeBSD__
1662        if (TRUE)
1663#else
1664        if (!bkpinfo->disaster_recovery)
1665#endif
1666        {
1667            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);
1668            if (p == NULL) {
1669                log_to_screen("User has chosen not to backup the PC");
1670                finish(1);
1671            }
1672            mr_free(bkpinfo->nfs_mount);
1673            bkpinfo->nfs_mount = p;
1674            if (!bkpinfo->restore_data) {
1675                if ((bkpinfo->compression_level =
1676                     which_compression_level()) == -1) {
1677                    log_to_screen("User has chosen not to backup the PC");
1678                    finish(1);
1679                }
1680            }
1681            // check whether already mounted - we better remove
1682            // surrounding spaces and trailing '/' for this
1683            mr_strip_spaces(bkpinfo->nfs_mount);
1684            if (bkpinfo->nfs_mount[strlen(bkpinfo->nfs_mount) - 1] == '/')
1685                bkpinfo->nfs_mount[strlen(bkpinfo->nfs_mount) - 1] = '\0';
1686            mr_asprintf(command, "mount | grep \"%s \" | cut -d' ' -f3", bkpinfo->nfs_mount);
1687            mr_free(bkpinfo->isodir);
1688            mr_asprintf(bkpinfo->isodir, "%s", call_program_and_get_last_line_of_output(command));
1689            mr_free(command);
1690
1691            if (!bkpinfo->restore_data) {
1692                mr_asprintf(comment, "How much data (in Megabytes) will each media store?");
1693                // BERLIOS: 4480 shouldn't be hardcoded here
1694                sz_size = popup_and_get_string("Size", comment, "4480");
1695                mr_free(comment);
1696                if (sz_size == NULL) {
1697                    log_to_screen("User has chosen not to backup the PC");
1698                    finish(1);
1699                }
1700            } else {
1701                mr_asprintf(sz_size, "0");
1702            }
1703            for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1704                bkpinfo->media_size[i] = atoi(sz_size);
1705            }
1706            mr_free(sz_size);
1707            if (bkpinfo->media_size[0] < 0) {
1708                log_to_screen("User has chosen not to backup the PC");
1709                finish(1);
1710            }
1711        }
1712        if (bkpinfo->disaster_recovery) {
1713            mr_asprintf(command ,"umount %s/isodir 2> /dev/null", bkpinfo->tmpdir);
1714            (void)system(command);
1715            mr_free(command);
1716
1717            p = popup_and_get_string("NFS share", "Which remote NFS share should I mount?", bkpinfo->nfs_mount);
1718            if (p == NULL) {
1719                log_to_screen("User has chosen not to backup the PC");
1720                finish(1);
1721            }
1722            mr_free(bkpinfo->nfs_mount);
1723            bkpinfo->nfs_mount = p;
1724        }
1725        /* Initiate bkpinfo isodir path from running environment if mount already done */
1726        mr_free(bkpinfo->isodir);
1727        if (is_this_device_mounted(bkpinfo->nfs_mount)) {
1728            mr_asprintf(bkpinfo->isodir, "%s", call_program_and_get_last_line_of_output("mount | grep \":\" | cut -d' ' -f3 | head -n1"));
1729
1730        } else {
1731            mr_asprintf(bkpinfo->isodir, "%s/nfsdir", bkpinfo->tmpdir);
1732            mr_asprintf(command, "mkdir -p %s", bkpinfo->isodir);
1733            run_program_and_log_output(command, 5);
1734            mr_free(command);
1735
1736            mr_asprintf(tmp, "mount -t nfs -o nolock %s %s", bkpinfo->nfs_mount, bkpinfo->isodir);
1737            run_program_and_log_output(tmp, 3);
1738            mr_free(tmp);
1739
1740            malloc_string(g_selfmounted_isodir);
1741            strcpy(g_selfmounted_isodir, bkpinfo->isodir);
1742        }
1743        if (!is_this_device_mounted(bkpinfo->nfs_mount)) {
1744            popup_and_OK("Please mount that partition before you try to backup to or restore from it.");
1745            finish(1);
1746        }
1747        p = popup_and_get_string("Directory", "Which directory within that mountpoint?", bkpinfo->nfs_remote_dir);
1748        if (p == NULL) {
1749            log_to_screen("User has chosen not to backup the PC");
1750            finish(1);
1751        }
1752        mr_free(bkpinfo->nfs_remote_dir);
1753        bkpinfo->nfs_remote_dir = p;
1754
1755        // check whether writable - we better remove surrounding spaces for this
1756        mr_strip_spaces(bkpinfo->nfs_remote_dir);
1757
1758        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);
1759        if (p == NULL) {
1760            log_to_screen("User has chosen not to backup the PC");
1761            finish(1);
1762        }
1763        mr_free(bkpinfo->prefix);
1764        bkpinfo->prefix = p;
1765        log_msg(3, "prefix set to %s", bkpinfo->prefix);
1766
1767        log_msg(3, "Just set nfs_remote_dir to %s", bkpinfo->nfs_remote_dir);
1768        log_msg(3, "isodir is still %s", bkpinfo->isodir);
1769        break;
1770
1771    case iso:
1772        if (!bkpinfo->disaster_recovery) {
1773            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);
1774            if (p == NULL) {
1775                log_to_screen("User has chosen not to backup the PC");
1776                finish(1);
1777            }
1778            bkpinfo->isodir = p;
1779
1780            if (archiving_to_media) {
1781                if ((bkpinfo->compression_level =
1782                     which_compression_level()) == -1) {
1783                    log_to_screen("User has chosen not to backup the PC");
1784                    finish(1);
1785                }
1786                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);
1787                if (p == NULL) {
1788                    log_to_screen("User has chosen not to backup the PC");
1789                    finish(1);
1790                }
1791                for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1792                    bkpinfo->media_size[i] = atoi(p);
1793                }
1794                mr_free(p);
1795            } else {
1796                for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
1797                    bkpinfo->media_size[i] = 650;
1798                }
1799            }
1800        }
1801        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);
1802        if (p == NULL) {
1803            log_to_screen("User has chosen not to backup the PC");
1804            finish(1);
1805        }
1806        mr_free(bkpinfo->prefix);
1807        bkpinfo->prefix = p;
1808        log_msg(3, "prefix set to %s", bkpinfo->prefix);
1809        break;
1810
1811    default:
1812        fatal_error
1813            ("I, Mojo Jojo, shall defeat those pesky Powerpuff Girls!");
1814    }
1815
1816    if (archiving_to_media) {
1817
1818        mr_free(bkpinfo->boot_device);
1819#ifdef __FreeBSD__
1820#define EXAMPLEBD   "/dev/ad0"
1821        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/'"));
1822#else
1823#define EXAMPLEBD   "/dev/hda"
1824        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].*//'"));
1825#endif
1826        i = which_boot_loader(bkpinfo->boot_device);
1827        if (i == 'U')           // unknown
1828        {
1829
1830            p = popup_and_get_string("Boot device", "What is your boot device? (e.g. "EXAMPLEBD")", bkpinfo->boot_device);
1831#undef EXAMPLEBD
1832            if (p == NULL) {
1833                log_to_screen("User has chosen not to backup the PC");
1834                finish(1);
1835            }
1836            mr_free(bkpinfo->boot_device);
1837            bkpinfo->boot_device = p;
1838#ifdef __FreeBSD__
1839            i = which_boot_loader(bkpinfo->boot_device);
1840#else
1841            if (does_string_exist_in_boot_block(bkpinfo->boot_device, "LILO")) {
1842                i = 'L';
1843            } else
1844                if (does_string_exist_in_boot_block(bkpinfo->boot_device, "ELILO")) {
1845                i = 'E';
1846            } else
1847                if (does_string_exist_in_boot_block(bkpinfo->boot_device, "GRUB")) {
1848                i = 'G';
1849            } else {
1850                i = 'U';
1851            }
1852#endif
1853            if (i == 'U') {
1854                if (ask_me_yes_or_no("Unidentified boot loader. Shall I restore it byte-for-byte at restore time and hope for the best?")) {
1855                    i = 'R';    // raw
1856                } else {
1857                    log_to_screen("I cannot find your boot loader. Please run mondoarchive with parameters.");
1858                    finish(1);
1859                }
1860            }
1861        }
1862        bkpinfo->boot_loader = i;
1863        mr_free(bkpinfo->include_paths);
1864        mr_asprintf(p, "/");
1865        bkpinfo->include_paths = p;
1866
1867        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);
1868        if (p == NULL) {
1869            log_to_screen("User has chosen not to backup the PC");
1870            finish(1);
1871        }
1872        mr_free(bkpinfo->include_paths);
1873        bkpinfo->include_paths = p;
1874
1875        mr_asprintf(tmp, "%s", list_of_NFS_mounts_only());
1876        if (strlen(tmp) > 2) {
1877            mr_strcat(bkpinfo->exclude_paths, " %s",tmp);
1878        }
1879        mr_free(tmp);
1880// NTFS
1881        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};'"));
1882        if (strlen(tmp) > 2) {
1883            p = popup_and_get_string("NTFS partitions", "Please enter/confirm the NTFS partitions you wish to backup as well.", tmp);
1884
1885            if (p == NULL) {
1886                log_to_screen("User has chosen not to backup the PC");
1887                finish(1);
1888            }
1889            mr_free(bkpinfo->image_devs);
1890            bkpinfo->image_devs = p;
1891        }
1892
1893
1894        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);
1895        if (p == NULL) {
1896            log_to_screen("User has chosen not to backup the PC");
1897            finish(1);
1898        }
1899        mr_free(bkpinfo->exclude_paths);
1900        bkpinfo->exclude_paths = p;
1901
1902        p = popup_and_get_string("Temporary directory", "Please enter your temporary directory.", bkpinfo->tmpdir);
1903        if (p == NULL) {
1904            log_to_screen("User has chosen not to backup the PC");
1905            finish(1);
1906        }
1907        mr_free(bkpinfo->tmpdir);
1908        bkpinfo->tmpdir = p;
1909
1910        p = popup_and_get_string("Scratch directory", "Please enter your scratch directory.", bkpinfo->scratchdir);
1911        if (p == NULL) {
1912            log_to_screen("User has chosen not to backup the PC");
1913            finish(1);
1914        }
1915        mr_free(bkpinfo->scratchdir);
1916        bkpinfo->scratchdir = p;
1917
1918// Interactive mode:
1919#ifdef __IA64__
1920        bkpinfo->make_cd_use_lilo = TRUE;
1921#else
1922        bkpinfo->make_cd_use_lilo = FALSE;
1923#endif
1924        bkpinfo->backup_data = TRUE;
1925        bkpinfo->verify_data =
1926            ask_me_yes_or_no
1927            ("Will you want to verify your backups after Mondo has created them?");
1928
1929#ifndef __FreeBSD__
1930        if (!ask_me_yes_or_no
1931            ("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."))
1932#endif
1933        {
1934            mr_free(bkpinfo->kernel_path);
1935            mr_asprintf(bkpinfo->kernel_path, "FAILSAFE");
1936        }
1937
1938        if (!ask_me_yes_or_no
1939            ("Are you sure you want to proceed? Hit 'no' to abort.")) {
1940            log_to_screen("User has chosen not to backup the PC");
1941            finish(1);
1942        }
1943    } else {
1944        bkpinfo->restore_data = TRUE;   // probably...
1945    }
1946
1947    if (bkpinfo->backup_media_type == iso
1948        || bkpinfo->backup_media_type == nfs) {
1949        g_ISO_restore_mode = TRUE;
1950    }
1951#ifdef __FreeSD__
1952// skip
1953#else
1954    if (bkpinfo->backup_media_type == nfs) {
1955        log_msg(3, "I think the NFS mount is mounted at %s", bkpinfo->isodir);
1956    }
1957    log_it("isodir = %s", bkpinfo->isodir);
1958    if (bkpinfo->nfs_mount) {
1959        log_it("nfs_mount = '%s'", bkpinfo->nfs_mount);
1960    }
1961    if (bkpinfo->nfs_user) {
1962        log_it("nfs_user = '%s'", bkpinfo->nfs_user);
1963    }
1964#endif
1965
1966    log_it("media device = %s", bkpinfo->media_device);
1967    log_it("media size = %ld", bkpinfo->media_size[1]);
1968    tmp = bkptype_to_string(bkpinfo->backup_media_type);
1969    log_it("media type = %s", tmp);
1970    mr_free(tmp);
1971
1972    if (bkpinfo->prefix) {
1973        log_it("prefix = %s", bkpinfo->prefix);
1974    }
1975    log_it("compression = %ld", bkpinfo->compression_level);
1976    if (bkpinfo->include_paths) {
1977        log_it("include_paths = '%s'", bkpinfo->include_paths);
1978    }
1979    if (bkpinfo->exclude_paths) {
1980        log_it("exclude_paths = '%s'", bkpinfo->exclude_paths);
1981    }
1982    log_it("scratchdir = '%s'", bkpinfo->scratchdir);
1983    log_it("tmpdir = '%s'", bkpinfo->tmpdir);
1984    if (bkpinfo->image_devs) {
1985        log_it("image_devs = '%s'", bkpinfo->image_devs);
1986    }
1987    log_it("boot_device = '%s' (loader=%c)", bkpinfo->boot_device, bkpinfo->boot_loader);
1988    if (bkpinfo->media_size[0] < 0) {
1989        if (archiving_to_media) {
1990            fatal_error("Media size is less than zero.");
1991        } else {
1992            log_msg(2, "Warning - media size is less than zero.");
1993            bkpinfo->media_size[0] = 0;
1994        }
1995    }
1996    paranoid_free(sz_size);
1997    paranoid_free(tmp1);
1998    paranoid_free(prompt);
1999    return (0);
2000}
2001
2002
2003
2004
2005/**
2006 * @addtogroup utilityGroup
2007 * @{
2008 */
2009/**
2010 * Get a space-separated list of NFS devices and mounts.
2011 * @return The list created.
2012 * @note The return value points to static data that will be overwritten with each call.
2013 */
2014char *list_of_NFS_devices_and_mounts(void)
2015{
2016    char *exclude_these_devices = NULL;
2017    char *exclude_these_directories = NULL;
2018    static char result_sz[1024];
2019
2020    mr_asprintf(exclude_these_directories,"%s",list_of_NFS_mounts_only());
2021    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;}'"));
2022    snprintf(result_sz, 1023, "%s %s", exclude_these_directories, exclude_these_devices);
2023    mr_free(exclude_these_devices);
2024    mr_free(exclude_these_directories);
2025    return (result_sz);
2026}
2027
2028
2029
2030
2031/**
2032 * Get a space-separated list of NFS mounts.
2033 * @return The list created.
2034 * @note The return value points to static data that will be overwritten with each call.
2035 * @bug Even though we only want the mounts, the devices are still checked.
2036 */
2037char *list_of_NFS_mounts_only(void)
2038{
2039    char *exclude_these_directories = NULL;
2040    static char result_sz[512];
2041
2042    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;}'"));
2043    snprintf(result_sz, 511, "%s", exclude_these_directories);
2044    mr_free(exclude_these_directories);
2045    return (result_sz);
2046}
2047
2048/* @} - end of utilityGroup */
2049
2050
2051
2052
2053
2054/**
2055 * Create a randomly-named FIFO. The format is @p stub "." [random] [random] where
2056 * [random] is a random number between 1 and 32767.
2057 * @param store_name_here Where to store the new filename.
2058 * @param stub A random number will be appended to this to make the FIFO's name.
2059 * @ingroup deviceGroup
2060 */
2061void make_fifo(char *store_name_here, char *stub)
2062{
2063    char *tmp = NULL;
2064
2065    assert_string_is_neither_NULL_nor_zerolength(stub);
2066
2067    sprintf(store_name_here, "%s%d%d", stub, (int) (random() % 32768),
2068            (int) (random() % 32768));
2069    make_hole_for_file(store_name_here);
2070    mkfifo(store_name_here, S_IRWXU | S_IRWXG);
2071    mr_asprintf(tmp, "chmod 770 %s", store_name_here);
2072    paranoid_system(tmp);
2073    mr_free(tmp);
2074}
2075
2076
2077
2078
2079
2080
2081/**
2082 * Set the tmpdir and scratchdir to reside on the partition with the most free space.
2083 * Automatically excludes DOS, NTFS, SMB, and NFS filesystems.
2084 * @param bkpinfo The backup information structure. @c bkpinfo->tmpdir and @c bkpinfo->scratchdir will be set.
2085 * @ingroup utilityGroup
2086 */
2087void sensibly_set_scratchdir()
2088{
2089    char *tmp = NULL; 
2090    char *command = NULL;
2091    char *sz = NULL;
2092
2093#ifdef __FreeBSD__
2094    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;}'"));
2095#else
2096    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;}'"));
2097#endif
2098
2099    if (tmp[0] != '/') {
2100        mr_asprintf(sz, "%s", tmp);
2101        mr_free(tmp);
2102        mr_asprintf(tmp, "/%s", sz);
2103        mr_free(sz);
2104    }
2105    if (!tmp[0]) {
2106        fatal_error("I couldn't figure out the scratchdir!");
2107    }
2108
2109    /* Cleaning a potential previous scratchdir */
2110    if (bkpinfo->scratchdir) {
2111        mr_asprintf(command, "rm -Rf %s", bkpinfo->scratchdir);
2112        paranoid_system(command);
2113        mr_free(command);
2114    }
2115    mr_free(bkpinfo->scratchdir);
2116
2117    mr_asprintf(bkpinfo->scratchdir , "%s/mondo.scratch.%d", tmp, (int) (random() % 32768));
2118    log_it("bkpinfo->scratchdir is being set to %s", bkpinfo->scratchdir);
2119
2120    /* Cleaning potential previous scratchdir */
2121    mr_asprintf(command, "rm -Rf %s/mondo.scratch.*", tmp);
2122    mr_free(tmp);
2123
2124    paranoid_system(command);
2125    mr_free(command);
2126}
2127
2128
2129
2130
2131
2132
2133/**
2134 * @addtogroup deviceGroup
2135 * @{
2136 */
2137/**
2138 * If we can read @p dev, set @return output to it.
2139 * If @p dev cannot be read, set @p output to NULL.
2140 * @param dev The device to check for.
2141 * @return output Set to @p dev if @p dev exists, NULL otherwise.
2142 */
2143char *set_dev_to_this_if_rx_OK(char *dev)
2144{
2145    char *command = NULL;
2146    char *output = NULL;
2147
2148    if (!dev || dev[0] == '\0') {
2149        return(NULL);
2150    }
2151    log_msg(10, "Injecting %s", dev);
2152    inject_device(dev);
2153    if (!does_file_exist(dev)) {
2154        log_msg(10, "%s doesn't exist. Returning FALSE.", dev);
2155        return(NULL);
2156    }
2157    mr_asprintf(command, "dd bs=%ld count=1 if=%s of=/dev/null &> /dev/null", 512L, dev);
2158    if (!run_program_and_log_output(command, FALSE)
2159        && !run_program_and_log_output(command, FALSE)) {
2160        mr_asprintf(output, "%s", dev);
2161        log_msg(4, "Found it - %s", dev);
2162    } else {
2163        log_msg(4, "It's not %s", dev);
2164    }
2165    mr_free(command);
2166    return(output);
2167}
2168
2169
2170
2171
2172
2173/**
2174 * Find out what number CD is in the drive.
2175 * @param bkpinfo The backup information structure. The @c bkpinfo->media_device field is the only one used.
2176 * @return The current CD number, or -1 if it could not be found.
2177 * @note If the CD is not mounted, it will be mounted
2178 * (and remain mounted after this function returns).
2179 */
2180int what_number_cd_is_this()
2181{
2182    int cd_number = -1;
2183    char *mountdev = NULL;
2184    char *tmp = NULL;
2185
2186    assert(bkpinfo != NULL);
2187    //  log_it("Asking what_number_cd_is_this");
2188    if (g_ISO_restore_mode) {
2189        mr_asprintf(tmp, "mount | grep iso9660 | awk '{print $3;}'");
2190        mr_asprintf(mountdev, "%s%s", call_program_and_get_last_line_of_output(tmp), "/archives/THIS-CD-NUMBER");
2191        cd_number = atoi(last_line_of_file(mountdev));
2192        mr_free(mountdev);
2193        mr_free(tmp);
2194
2195        return (cd_number);
2196    }
2197
2198    if (bkpinfo->media_device) {
2199        mr_asprintf(mountdev, "%s", bkpinfo->media_device);
2200    }
2201    if (!mountdev) {
2202        log_it("(what_number_cd_is_this) Warning - media_device unknown. Finding out...");
2203        mr_free(bkpinfo->media_device);
2204        bkpinfo->media_device = find_cdrom_device(FALSE);
2205        mr_asprintf(mountdev, "%s", bkpinfo->media_device);
2206    }
2207    if (!is_this_device_mounted(MNT_CDROM)) {
2208        if (bkpinfo->backup_media_type == usb) {
2209            mount_USB_here(mountdev, MNT_CDROM);
2210        } else {
2211            mount_CDROM_here(mountdev, MNT_CDROM);
2212        }
2213    }
2214    mr_free(mountdev);
2215
2216    cd_number = atoi(last_line_of_file(MNT_CDROM "/archives/THIS-CD-NUMBER"));
2217    return (cd_number);
2218}
2219
2220
2221
2222
2223
2224
2225
2226/**
2227 * Find out what device is mounted as root (/).
2228 * @return Root device.
2229 * @note The returned string points to static storage and will be overwritten with every call.
2230 * @bug A bit of a misnomer; it's actually finding out the root device.
2231 * The mountpoint (where it's mounted) will obviously be '/'.
2232 */
2233char *where_is_root_mounted() {
2234    /*@ buffers **************** */
2235    char *output;
2236
2237
2238#ifdef __FreeBSD__
2239    mr_asprintf(output, call_program_and_get_last_line_of_output("mount | grep \" on / \" | cut -d' ' -f1"));
2240#else
2241    mr_asprintf(output, call_program_and_get_last_line_of_output("mount | grep \" on / \" | cut -d' ' -f1 | sed s/[0-9]// | sed s/[0-9]//"));
2242    if (strstr(output, "/dev/cciss/")) {
2243        mr_free(output);
2244        mr_asprintf(output, call_program_and_get_last_line_of_output("mount | grep \" on / \" | cut -d' ' -f1 | cut -dp -f1"));
2245    }
2246    if (strstr(output, "/dev/md")) {
2247        mr_free(output);
2248        mr_asprintf(output, call_program_and_get_last_line_of_output("mount | grep \" on / \" | cut -d' ' -f1"));
2249    }
2250#endif
2251
2252    return (output);
2253}
2254
2255
2256/**
2257 * Find out which boot loader is in use.
2258 * @param which_device Device to look for the boot loader on.
2259 * @return 'L' for LILO, 'E'for ELILO, 'G' for GRUB, 'B' or 'D' for FreeBSD boot loaders, or 'U' for Unknown.
2260 * @note Under Linux, all drives are examined, not just @p which_device.
2261 */
2262#ifdef __FreeBSD__
2263char which_boot_loader(char *which_device) {
2264    int count_lilos = 0;
2265    int count_grubs = 0;
2266    int count_boot0s = 0;
2267    int count_dangerouslydedicated = 0;
2268
2269    log_it("looking at drive %s's MBR", which_device);
2270    if (does_string_exist_in_boot_block(which_device, "GRUB")) {
2271        count_grubs++;
2272    }
2273    if (does_string_exist_in_boot_block(which_device, "LILO")) {
2274        count_lilos++;
2275    }
2276    if (does_string_exist_in_boot_block(which_device, "Drive")) {
2277        count_boot0s++;
2278    }
2279    if (does_string_exist_in_first_N_blocks(which_device, "FreeBSD/i386", 17)) {
2280        count_dangerouslydedicated++;
2281    }
2282    log_it("%d grubs and %d lilos and %d elilos and %d boot0s and %d DD\n",
2283           count_grubs, count_lilos, count_elilos, count_boot0s,
2284           count_dangerouslydedicated);
2285
2286    if (count_grubs && !count_lilos) {
2287        return ('G');
2288    } else if (count_lilos && !count_grubs) {
2289        return ('L');
2290    } else if (count_grubs == 1 && count_lilos == 1) {
2291        log_it("I'll bet you used to use LILO but switched to GRUB...");
2292        return ('G');
2293    } else if (count_boot0s == 1) {
2294        return ('B');
2295    } else if (count_dangerouslydedicated) {
2296        return ('D');
2297    } else {
2298        log_it("Unknown boot loader");
2299        return ('U');
2300    }
2301}
2302
2303#else
2304
2305char which_boot_loader(char *which_device) {
2306    /*@ buffer ***************************************************** */
2307    char *list_drives_cmd = NULL;
2308    char *tmp = NULL;
2309    char *current_drive;
2310
2311    /*@ pointers *************************************************** */
2312    FILE *pdrives;
2313
2314    /*@ int ******************************************************** */
2315    int count_lilos = 0;
2316    int count_grubs = 0;
2317
2318    /*@ end vars *************************************************** */
2319
2320
2321#ifdef __IA64__
2322    /* No choice for it */
2323    return ('E');
2324#endif
2325
2326    tmp = where_is_root_mounted();
2327    mr_asprintf(list_drives_cmd, "parted2fdisk -l 2>/dev/null | grep \"/dev/.*:\" | tr -s ':' ' ' | tr -s ' ' '\n' | grep /dev/; echo %s", tmp);
2328    mr_free(tmp);
2329    log_it("list_drives_cmd = %s", list_drives_cmd);
2330
2331    pdrives = popen(list_drives_cmd, "r");
2332    mr_free(list_drives_cmd);
2333
2334    if (!pdrives) {
2335        log_OS_error("Unable to open list of drives");
2336        return ('\0');
2337    }
2338
2339    malloc_string(current_drive);
2340    for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
2341         (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
2342        strip_spaces(current_drive);
2343        log_it("looking at drive %s's MBR", current_drive);
2344        if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
2345            count_grubs++;
2346            mr_free(which_device);
2347            mr_asprintf(which_device, "%s", current_drive);
2348            break;
2349        }
2350        if (does_string_exist_in_boot_block(current_drive, "LILO")) {
2351            count_lilos++;
2352            mr_free(which_device);
2353            mr_asprintf(which_device, "%s", current_drive);
2354            break;
2355        }
2356    }
2357    if (pclose(pdrives)) {
2358        log_OS_error("Cannot pclose pdrives");
2359    }
2360    log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
2361    if (count_grubs && !count_lilos) {
2362        paranoid_free(current_drive);
2363        return ('G');
2364    } else if (count_lilos && !count_grubs) {
2365        paranoid_free(current_drive);
2366        return ('L');
2367    } else if (count_grubs == 1 && count_lilos == 1) {
2368        log_it("I'll bet you used to use LILO but switched to GRUB...");
2369        paranoid_free(current_drive);
2370        return ('G');
2371    } else {
2372        // We need to look on each partition then
2373        mr_asprintf(list_drives_cmd, "parted2fdisk -l 2>/dev/null | grep -E \"^/dev/\" | tr -s ':' ' ' | tr -s ' ' '\n' | grep /dev/");
2374        log_it("list_drives_cmd = %s", list_drives_cmd);
2375
2376        if (!(pdrives = popen(list_drives_cmd, "r"))) {
2377            log_OS_error("Unable to open list of drives");
2378            mr_free(list_drives_cmd);
2379            paranoid_free(current_drive);
2380            return ('\0');
2381        }
2382        mr_free(list_drives_cmd);
2383
2384        for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
2385            (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
2386            strip_spaces(current_drive);
2387            log_it("looking at partition %s's BR", current_drive);
2388            if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
2389                count_grubs++;
2390                mr_free(which_device);
2391                mr_asprintf(which_device, "%s", current_drive);
2392                break;
2393            }
2394            if (does_string_exist_in_boot_block(current_drive, "LILO")) {
2395                count_lilos++;
2396                mr_free(which_device);
2397                mr_asprintf(which_device, "%s", current_drive);
2398                break;
2399            }
2400        }
2401        if (pclose(pdrives)) {
2402            log_OS_error("Cannot pclose pdrives");
2403        }
2404        log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
2405        paranoid_free(current_drive);
2406        if (count_grubs && !count_lilos) {
2407            return ('G');
2408        } else if (count_lilos && !count_grubs) {
2409            return ('L');
2410        } else if (count_grubs == 1 && count_lilos == 1) {
2411            log_it("I'll bet you used to use LILO but switched to GRUB...");
2412            return ('G');
2413        } else {
2414            log_it("Unknown boot loader");
2415            return ('U');
2416        }
2417    }
2418}
2419#endif
2420
2421
2422
2423
2424/**
2425 * Write zeroes over the first 16K of @p device.
2426 * @param device The device to zero.
2427 * @return 0 for success, 1 for failure.
2428 */
2429int zero_out_a_device(char *device)
2430{
2431    FILE *fout;
2432    int i;
2433
2434    assert_string_is_neither_NULL_nor_zerolength(device);
2435
2436    log_it("Zeroing drive %s", device);
2437    if (!(fout = fopen(device, "w"))) {
2438        log_OS_error("Unable to open/write to device");
2439        return (1);
2440    }
2441    for (i = 0; i < 16384; i++) {
2442        fputc('\0', fout);
2443    }
2444    paranoid_fclose(fout);
2445    log_it("Device successfully zeroed.");
2446    return (0);
2447}
2448
2449/**
2450 * Return the device pointed to by @p incoming.
2451 * @param incoming The device to resolve symlinks for.
2452 * @return The path to the real device file.
2453 * @note The returned string points to static storage that will be overwritten with each call.
2454 * @bug Won't work with file v4.0; needs to be written in C.
2455 */
2456char *resolve_softlinks_to_get_to_actual_device_file(char *incoming)
2457{
2458    char *output;
2459    char *command = NULL;
2460    char *curr_fname;
2461    char *scratch = NULL;
2462    char *tmp = NULL;
2463    char *p;
2464
2465    struct stat statbuf;
2466    malloc_string(curr_fname);
2467    if (!does_file_exist(incoming)) {
2468        log_it("resolve_softlinks_to_get_to_actual_device_file --- device not found");
2469        mr_asprintf(output, "%s", incoming);
2470    } else {
2471        strcpy(curr_fname, incoming);
2472        lstat(curr_fname, &statbuf);
2473        while (S_ISLNK(statbuf.st_mode)) {
2474            log_msg(1, "curr_fname = %s", curr_fname);
2475            mr_asprintf(command, "file %s", curr_fname);
2476            mr_asprintf(tmp, "%s", call_program_and_get_last_line_of_output(command));
2477            mr_free(command);
2478            for (p = tmp + strlen(tmp); p != tmp && *p != '`' && *p != ' '; p--);
2479            p++;
2480            mr_asprintf(scratch, "%s", p);
2481            for (p = scratch; *p != '\0' && *p != '\''; p++);
2482            *p = '\0';
2483            log_msg(0, "curr_fname %s --> '%s' --> %s", curr_fname, tmp, scratch);
2484            mr_free(tmp);
2485
2486            if (scratch[0] == '/') {
2487                strcpy(curr_fname, scratch);    // copy whole thing because it's an absolute softlink
2488            } else {            // copy over the basename cos it's a relative softlink
2489                p = curr_fname + strlen(curr_fname);
2490                while (p != curr_fname && *p != '/') {
2491                    p--;
2492                }
2493                if (*p == '/') {
2494                    p++;
2495                }
2496                strcpy(p, scratch);
2497            }
2498            mr_free(scratch);
2499            lstat(curr_fname, &statbuf);
2500        }
2501        mr_asprintf(output, "%s", curr_fname);
2502        log_it("resolved %s to %s", incoming, output);
2503    }
2504    paranoid_free(curr_fname);
2505    return (output);
2506}
2507
2508/* @} - end of deviceGroup */
2509
2510
2511/**
2512 * Return the type of partition format (GPT or MBR)
2513 */
2514char *which_partition_format(const char *drive)
2515{
2516    char *output;
2517    char *tmp = NULL;
2518    char *command = NULL;
2519    char *fdisk = NULL;
2520#ifdef __IA64__
2521    struct stat buf;
2522#endif
2523    log_msg(0, "Looking for partition table format type");
2524    mr_asprintf(fdisk, "/sbin/parted2fdisk");
2525    log_msg(1, "Using %s", fdisk);
2526    mr_asprintf(command, "%s -l %s | grep 'EFI GPT'", fdisk, drive);
2527    mr_free(fdisk);
2528
2529    mr_asprintf(tmp, "%s", call_program_and_get_last_line_of_output(command));
2530    mr_free(command);
2531
2532    if (strstr(tmp, "GPT") == NULL) {
2533        mr_asprintf(output, "MBR");
2534    } else {
2535        mr_asprintf(output, "GPT");
2536    }
2537    mr_free(tmp);
2538
2539    log_msg(0, "Found %s partition table format type", output);
2540    return (output);
2541}
2542
2543/* @} - end of deviceGroup */
Note: See TracBrowser for help on using the repository browser.