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

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

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