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

Last change on this file since 2349 was 2349, checked in by Bruno Cornec, 11 years ago
  • Solve tmp dir creation which sometimes was trying to create /%xx dirs. Should fix #293 for good
  • Adds fdisk -l result in Log File at restore time

(Backports from 2.2.9)

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