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

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