source: MondoRescue/branches/2.2.9/mondo/src/common/libmondo-devices.c@ 2527

Last change on this file since 2527 was 2527, checked in by Bruno Cornec, 14 years ago

r3736@localhost: bruno | 2010-01-07 17:58:32 +0100

  • Fix #383 by using pvdisplay instead of relying on 8e as partition type
  • Try to fix #384 by always excluding the dfs per users wish
  • Property svn:keywords set to Id
File size: 92.9 KB
Line 
1/* libmondo-devices.c Subroutines for handling devices
2 $Id: libmondo-devices.c 2527 2010-01-07 18:28:10Z 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 "mr_str.h"
13#include "mondostructures.h"
14#include "libmondo-files-EXT.h"
15#include "libmondo-devices.h"
16#include "lib-common-externs.h"
17#include "libmondo-string-EXT.h"
18#include "libmondo-tools-EXT.h"
19#include "libmondo-gui-EXT.h"
20#include "libmondo-fork-EXT.h"
21#include "libmondo-stream-EXT.h"
22
23#include <sys/types.h>
24#ifdef __FreeBSD__
25#define DKTYPENAMES
26#define FSTYPENAMES
27#include <sys/disklabel.h>
28#include <sys/disk.h>
29#elif linux
30#define u64 unsigned long long
31#include <linux/fs.h> /* for BLKGETSIZE64 */
32#include <linux/hdreg.h>
33#endif
34
35/*@unused@*/
36//static char cvsid[] = "$Id: libmondo-devices.c 2527 2010-01-07 18:28:10Z bruno $";
37
38extern int g_current_media_number;
39extern double g_kernel_version;
40
41extern bool g_ISO_restore_mode;
42extern char *g_selfmounted_isodir;
43extern char *MONDO_LOGFILE;
44
45extern void setup_tmpdir(char *path);
46
47static char g_cdrw_drive_is_here[MAX_STR_LEN / 4] = "";
48static char g_cdrom_drive_is_here[MAX_STR_LEN / 4] = "";
49static char g_dvd_drive_is_here[MAX_STR_LEN / 4] = "";
50
51
52/**
53 * ????? @bug ?????
54 * @ingroup globalGroup
55 */
56bool g_restoring_live_from_cd = FALSE;
57bool g_restoring_live_from_netfs = FALSE;
58
59extern t_bkptype g_backup_media_type; // set by main()
60
61/* Reference to global bkpinfo */
62extern struct s_bkpinfo *bkpinfo;
63
64/* Stuff that handles the -I and -E option when a whole disk DSF is used */
65typedef struct mounted_fs_struct {
66 char device[MAX_STR_LEN]; /* The name of the device */
67 char mount_point[MAX_STR_LEN]; /* The devices mount point */
68 unsigned char check; /* 1 == included on DSF */
69 struct mounted_fs_struct *next;
70} MOUNTED_FS_STRUCT;
71
72static MOUNTED_FS_STRUCT *DSF_Head = NULL; /* Points to the first entry of mounted_fs_struct list */
73static MOUNTED_FS_STRUCT *DSF_Tail = NULL; /* Points to the last entry of mounted_fs_struct list */
74
75
76void set_g_cdrom_and_g_dvd_to_bkpinfo_value()
77{
78 strcpy(g_cdrom_drive_is_here, bkpinfo->media_device); // just in case
79 strcpy(g_dvd_drive_is_here, bkpinfo->media_device); // just in case
80}
81
82
83
84/**
85 * Retract all CD trays and wait for autorun to complete.
86 * @ingroup deviceGroup
87 */
88void retract_CD_tray_and_defeat_autorun(void)
89{
90// log_it("rctada: Retracting all CD trays", __LINE__);
91 if (strlen(g_cdrom_drive_is_here) > 0) {
92 inject_device(g_cdrom_drive_is_here);
93 }
94 if (strlen(g_dvd_drive_is_here) > 0) {
95 inject_device(g_dvd_drive_is_here);
96 }
97 if (strlen(g_cdrw_drive_is_here) > 0) {
98 inject_device(g_cdrw_drive_is_here);
99 }
100// log_it("rctada: killing autorun");
101// run_program_and_log_output("killall autorun", TRUE);
102 if (!run_program_and_log_output("ps | grep autorun | grep -v grep", 5)) {
103 log_it("autorun detected; sleeping for 2 seconds");
104 sleep(2);
105 }
106 log_it("rctada: Unmounting all CD drives", __LINE__);
107 run_program_and_log_output("umount /dev/cdr* /dev/dvd*", 5);
108}
109
110
111
112/**
113 * Determine whether we're booted off a ramdisk.
114 * @return @c TRUE (we are) or @c FALSE (we aren't).
115 * @ingroup utilityGroup
116 */
117bool am_I_in_disaster_recovery_mode(void)
118{
119 char *tmp = NULL;
120 char *comment;
121 bool is_this_a_ramdisk = FALSE;
122
123 malloc_string(comment);
124 mr_asprintf(&tmp, "%s", where_is_root_mounted());
125 sprintf(comment, "root is mounted at %s\n", tmp);
126 log_msg(0, comment);
127 log_msg(0,
128 "No, Schlomo, that doesn't mean %s is the root partition. It's just a debugging message. Relax. It's part of am_I_in_disaster_recovery_mode().",
129 tmp);
130
131#ifdef __FreeBSD__
132 if (strstr(tmp, "/dev/md")) {
133 is_this_a_ramdisk = TRUE;
134 }
135#else
136 if (!strncmp(tmp, "/dev/ram", 8)
137 || (!strncmp(tmp, "/dev/rd", 7) && !strcmp(tmp, "/dev/rd/")
138 && strncmp(tmp, "/dev/rd/cd", 10)) || strstr(tmp, "rootfs")
139 || !strcmp(tmp, "/dev/root")) {
140 is_this_a_ramdisk = TRUE;
141 } else {
142 is_this_a_ramdisk = FALSE;
143 }
144#endif
145 mr_free(tmp);
146
147 if (is_this_a_ramdisk) {
148 if (!does_file_exist("/THIS-IS-A-RAMDISK")) {
149 log_to_screen
150 ("Using /dev/root is stupid of you but I'll forgive you.");
151 is_this_a_ramdisk = FALSE;
152 }
153 }
154 if (does_file_exist("/THIS-IS-A-RAMDISK")) {
155 is_this_a_ramdisk = TRUE;
156 }
157 paranoid_free(comment);
158 log_msg(1, "Is this a ramdisk? result = %d", is_this_a_ramdisk);
159 return (is_this_a_ramdisk);
160}
161
162
163
164
165
166/**
167 * Turn @c bkpinfo->backup_media_type into a human-readable string.
168 * @return The human readable string (e.g. @c cdr becomes <tt>"cdr"</tt>).
169 * @note The returned string points to static storage that will be overwritten with each call.
170 * @ingroup stringGroup
171 */
172static char *bkptype_to_string(t_bkptype bt)
173{
174 static char output[MAX_STR_LEN / 4];
175 switch (bt) {
176 case none:
177 strcpy(output, "none");
178 break;
179 case iso:
180 strcpy(output, "iso");
181 break;
182 case cdr:
183 strcpy(output, "cdr");
184 break;
185 case cdrw:
186 strcpy(output, "cdrw");
187 break;
188 case cdstream:
189 strcpy(output, "cdstream");
190 break;
191 case netfs:
192 strcpy(output, "netfs");
193 break;
194 case tape:
195 strcpy(output, "tape");
196 break;
197 case udev:
198 strcpy(output, "udev");
199 break;
200 case usb:
201 strcpy(output, "usb");
202 break;
203 default:
204 strcpy(output, "default");
205 }
206 return (output);
207}
208
209
210
211/**
212 * @addtogroup deviceGroup
213 * @{
214 */
215/**
216 * Eject the tray of the specified CD device.
217 * @param dev The device to eject.
218 * @return the return value of the @c eject command. (0=success, nonzero=failure)
219 */
220int eject_device(char *dev)
221{
222 char *command;
223 int res1 = 0, res2 = 0;
224
225 malloc_string(command);
226
227 if (IS_THIS_A_STREAMING_BACKUP(g_backup_media_type)
228 && g_backup_media_type != udev) {
229 sprintf(command, "mt -f %s offline", dev);
230 res1 = run_program_and_log_output(command, 1);
231 } else {
232 res1 = 0;
233 }
234
235#ifdef __FreeBSD__
236 if (strstr(dev, "acd")) {
237 sprintf(command, "cdcontrol -f %s eject", dev);
238 } else {
239 sprintf(command, "camcontrol eject `echo %s | sed 's|/dev/||'`",
240 dev);
241 }
242#else
243 sprintf(command, "eject %s", dev);
244#endif
245
246 log_msg(3, "Ejecting %s", dev);
247 res2 = run_program_and_log_output(command, 1);
248 paranoid_free(command);
249 if (res1 && res2) {
250 return (1);
251 } else {
252 return (0);
253 }
254}
255
256/**
257 * Load (inject) the tray of the specified CD device.
258 * @param dev The device to load/inject.
259 * @return 0 for success, nonzero for failure.
260 */
261int inject_device(char *dev)
262{
263 char *command;
264 int i;
265
266 malloc_string(command);
267
268
269#ifdef __FreeBSD__
270 if (strstr(dev, "acd")) {
271 sprintf(command, "cdcontrol -f %s close", dev);
272 } else {
273 sprintf(command, "camcontrol load `echo %s | sed 's|/dev/||'`",
274 dev);
275 }
276#else
277 sprintf(command, "eject -t %s", dev);
278#endif
279 i = run_program_and_log_output(command, FALSE);
280 paranoid_free(command);
281 return (i);
282}
283
284
285/**
286 * Determine whether the specified @p device (really, you can use any file)
287 * exists.
288 * @return TRUE if it exists, FALSE if it doesn't.
289 */
290bool does_device_exist(char *device)
291{
292
293 /*@ buffers *********************************************************** */
294 char *tmp;
295 bool ret;
296
297 malloc_string(tmp);
298 assert_string_is_neither_NULL_nor_zerolength(device);
299
300 sprintf(tmp, "ls %s > /dev/null 2> /dev/null", device);
301
302 if (system(tmp)) {
303 ret = FALSE;
304 } else {
305 ret = TRUE;
306 }
307 paranoid_free(tmp);
308 return (ret);
309}
310
311
312/**
313 * Determine whether a non-Microsoft partition exists on any connected hard drive.
314 * @return TRUE (there's a Linux/FreeBSD partition) or FALSE (Microsoft has taken over yet another innocent PC).
315 */
316bool does_nonMS_partition_exist(void)
317{
318#if __FreeBSD__
319 return
320 !system
321 ("for drive in /dev/ad? /dev/da?; do fdisk $drive | grep -q FreeBSD && exit 0; done; false");
322#else
323 return
324 !system
325 ("parted2fdisk -l 2>/dev/null | grep '^/dev/' | grep -Eqv '(MS|DOS|FAT|NTFS)'");
326#endif
327}
328
329/**
330 * Determine whether the specified @p partno exists on the specified @p drive.
331 * @param drive The drive to search for the partition in.
332 * @param partno The partition number to look for.
333 * @return 0 if it exists, nonzero otherwise.
334 */
335int does_partition_exist(const char *drive, int partno)
336{
337 /*@ buffers **************************************************** */
338 char *program;
339 char *incoming;
340 char *searchstr = NULL;
341 char *tmp;
342
343 /*@ ints ******************************************************* */
344 int res = 0;
345
346 /*@ pointers *************************************************** */
347 FILE *fin;
348
349
350 /*@ end vars *************************************************** */
351 assert_string_is_neither_NULL_nor_zerolength(drive);
352 assert(partno >= 0 && partno < 999);
353
354 malloc_string(program);
355 malloc_string(incoming);
356 malloc_string(searchstr);
357 malloc_string(tmp);
358
359#ifdef __FreeBSD__
360 // We assume here that this is running from mondorestore. (It is.)
361 sprintf(program, "ls %s %s >/dev/null 2>&1", drive,
362 build_partition_name(tmp, drive, partno));
363 return system(program);
364#else
365 tmp[0] = '\0';
366#endif
367
368 sprintf(program, "parted2fdisk -l %s 2> /dev/null", drive);
369 fin = popen(program, "r");
370 if (!fin) {
371 log_it("program=%s", program);
372 log_OS_error("Cannot popen-in program");
373 return (0);
374 }
375 (void) build_partition_name(searchstr, drive, partno);
376 strcat(searchstr, " ");
377 for (res = 0; !res && fgets(incoming, MAX_STR_LEN - 1, fin);) {
378 if (strstr(incoming, searchstr)) {
379 res = 1;
380 }
381 }
382 if (pclose(fin)) {
383 log_OS_error("Cannot pclose fin");
384 }
385 paranoid_free(program);
386 paranoid_free(incoming);
387 paranoid_free(searchstr);
388 paranoid_free(tmp);
389 return (res);
390}
391
392
393
394
395
396/**
397 * Determine whether given NULL-terminated @p str exists in the MBR of @p dev.
398 * @param dev The device to look in.
399 * @param str The string to look for.
400 * @return TRUE if it exists, FALSE if it doesn't.
401 */
402bool does_string_exist_in_boot_block(char *dev, char *str)
403{
404 /*@ buffers **************************************************** */
405 char *command;
406
407 /*@ end vars *************************************************** */
408 int i;
409
410 assert_string_is_neither_NULL_nor_zerolength(dev);
411 assert_string_is_neither_NULL_nor_zerolength(str);
412
413 malloc_string(command);
414 sprintf(command,
415 "dd if=%s bs=446 count=1 2> /dev/null | strings | grep \"%s\" > /dev/null 2> /dev/null",
416 dev, str);
417 i = system(command);
418 paranoid_free(command);
419 if (i) {
420 return (FALSE);
421 } else {
422 return (TRUE);
423 }
424}
425
426/**
427 * Determine whether specified @p str exists in the first @p n sectors of
428 * @p dev.
429 * @param dev The device to look in.
430 * @param str The string to look for.
431 * @param n The number of 512-byte sectors to search.
432 */
433bool does_string_exist_in_first_N_blocks(char *dev, char *str, int n)
434{
435 /*@ buffers **************************************************** */
436 char *command;
437 /*@ end vars *************************************************** */
438 int i;
439
440 malloc_string(command);
441 sprintf(command,
442 "dd if=%s bs=512 count=%i 2> /dev/null | strings | grep \"%s\" > /dev/null 2> /dev/null",
443 dev, n, str);
444 i = system(command);
445 paranoid_free(command);
446 if (i) {
447 return (FALSE);
448 } else {
449 return (TRUE);
450 }
451}
452
453
454
455/**
456 * Try to mount CD-ROM at @p mountpoint. If the CD-ROM is not found or has
457 * not been specified, call find_cdrom_device() to find it.
458 * @param bkpinfo The backup information structure. The only field used is @c bkpinfo->media_device.
459 * @param mountpoint Where to mount the CD-ROM.
460 * @return 0 for success, nonzero for failure.
461 * @see mount_CDROM_here
462 */
463int find_and_mount_actual_cd(char *mountpoint)
464{
465 /*@ buffers ***************************************************** */
466
467 /*@ int's ****************************************************** */
468 int res;
469 char *dev;
470
471 /*@ end vars **************************************************** */
472
473 malloc_string(dev);
474 assert(bkpinfo != NULL);
475 assert_string_is_neither_NULL_nor_zerolength(mountpoint);
476
477 if (g_backup_media_type == dvd) {
478 strcpy(dev, g_dvd_drive_is_here);
479 if (!dev[0]) {
480 find_dvd_device(dev, FALSE);
481 }
482 } else {
483 strcpy(dev, g_cdrom_drive_is_here);
484 if (!dev[0]) {
485 find_cdrom_device(dev, FALSE);
486 }
487 }
488
489 if (bkpinfo->backup_media_type != iso) {
490 retract_CD_tray_and_defeat_autorun();
491 }
492
493 if (!dev[0] || (res = mount_CDROM_here(dev, mountpoint))) {
494 if (!popup_and_get_string
495 ("CD-ROM device", "Please enter your CD-ROM's /dev device",
496 dev, MAX_STR_LEN / 4)) {
497 res = 1;
498 } else {
499 res = mount_CDROM_here(dev, mountpoint);
500 }
501 }
502 if (res) {
503 log_msg(1, "mount failed");
504 } else {
505 log_msg(1, "mount succeeded with %s", dev);
506 }
507 paranoid_free(dev);
508 return (res);
509}
510
511
512
513
514
515
516/**
517 * Locate a CD-R/W writer's SCSI node.
518 * @param cdrw_device SCSI node will be placed here.
519 * @return 0 for success, nonzero for failure.
520 */
521int find_cdrw_device(char *cdrw_device)
522{
523 /*@ buffers ************************ */
524 char *comment;
525 char *tmp = NULL;
526 char *cdr_exe = NULL;
527 char *command;
528
529 malloc_string(comment);
530 malloc_string(command);
531 if (g_cdrw_drive_is_here[0]) {
532 strcpy(cdrw_device, g_cdrw_drive_is_here);
533 log_msg(3, "Been there, done that. Returning %s", cdrw_device);
534 paranoid_free(comment);
535 paranoid_free(command);
536 return (0);
537 }
538 if (g_backup_media_type == dvd) {
539 log_msg(1,
540 "This is dumb. You're calling find_cdrw_device() but you're backing up to DVD. WTF?");
541 paranoid_free(comment);
542 paranoid_free(command);
543 return (1);
544 }
545 run_program_and_log_output("insmod ide-scsi", -1);
546 if (find_home_of_exe("cdrecord")) {
547 mr_asprintf(&cdr_exe, "cdrecord");
548 } else {
549 mr_asprintf(&cdr_exe, "dvdrecord");
550 }
551 if (find_home_of_exe(cdr_exe)) {
552 sprintf(command,
553 "%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",
554 cdr_exe);
555 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
556 }
557 if ((tmp == NULL) || (strlen(tmp) < 2)) {
558 paranoid_free(comment);
559 mr_free(tmp);
560 mr_free(cdr_exe);
561 paranoid_free(command);
562 return 1;
563 } else {
564 strcpy(cdrw_device, tmp);
565 sprintf(comment, "Found CDRW device - %s", cdrw_device);
566 log_it(comment);
567 strcpy(g_cdrw_drive_is_here, cdrw_device);
568 paranoid_free(comment);
569 mr_free(tmp);
570 mr_free(cdr_exe);
571 paranoid_free(command);
572 return (0);
573 }
574}
575
576
577
578
579/**
580 * Attempt to locate a CD-ROM device's /dev entry.
581 * Several different methods may be used to find the device, including
582 * calling @c cdrecord, searching @c dmesg, and trial-and-error.
583 * @param output Where to put the located /dev entry.
584 * @param try_to_mount Whether to mount the CD as part of the test; if mount
585 * fails then return failure.
586 * @return 0 for success, nonzero for failure.
587 */
588int find_cdrom_device(char *output, bool try_to_mount)
589{
590 /*@ pointers **************************************************** */
591 FILE *fin;
592 char *p;
593 char *q;
594 char *r;
595 int retval = 0;
596
597 /*@ bool's ****************************************************** */
598 bool found_it = FALSE;
599
600 /*@ buffers ***************************************************** */
601 char *tmp;
602 char *tmp1 = NULL;
603 char *cdr_exe = NULL;
604 char *phrase_one;
605 char *phrase_two;
606 char *command;
607 char *dvd_last_resort;
608 char *mountpoint;
609 static char the_last_place_i_found_it[MAX_STR_LEN] = "";
610
611 /*@ intialize *************************************************** */
612 malloc_string(tmp);
613 malloc_string(phrase_one);
614 malloc_string(phrase_two);
615 malloc_string(command);
616 malloc_string(dvd_last_resort);
617 malloc_string(mountpoint);
618
619 output[0] = '\0';
620 phrase_one[0] = '\0';
621 phrase_two[0] = '\0';
622 dvd_last_resort[0] = '\0';
623
624 /*@ end vars **************************************************** */
625
626 if (g_cdrom_drive_is_here[0] && !isdigit(g_cdrom_drive_is_here[0])) {
627 strcpy(output, g_cdrom_drive_is_here);
628 log_msg(3, "Been there, done that. Returning %s", output);
629 retval = 0;
630 goto end_of_find_cdrom_device;
631 }
632 if (the_last_place_i_found_it[0] != '\0' && !try_to_mount) {
633 strcpy(output, the_last_place_i_found_it);
634 log_msg(3,
635 "find_cdrom_device() --- returning last found location - '%s'",
636 output);
637 retval = 0;
638 goto end_of_find_cdrom_device;
639 }
640
641 sprintf(mountpoint, "%s/cd.mnt", bkpinfo->tmpdir);
642 make_hole_for_dir(mountpoint);
643
644 if (find_home_of_exe("cdrecord")) {
645 mr_asprintf(&cdr_exe, "cdrecord");
646 } else {
647 mr_asprintf(&cdr_exe, "dvdrecord");
648 }
649 tmp[0] = '\0';
650 if (!find_home_of_exe(cdr_exe)) {
651 strcpy(output, "/dev/cdrom");
652 log_msg(4, "Can't find cdrecord; assuming %s", output);
653 if (!does_device_exist(output)) {
654 log_msg(4, "That didn't work. Sorry.");
655 retval = 1;
656 goto end_of_find_cdrom_device;
657 } else {
658 retval = 0;
659 goto end_of_find_cdrom_device;
660 }
661 }
662
663 sprintf(command, "%s -scanbus 2> /dev/null", cdr_exe);
664 fin = popen(command, "r");
665 if (!fin) {
666 log_msg(4, "command=%s", command);
667 log_OS_error("Cannot popen command");
668 mr_free(cdr_exe);
669 return (1);
670 }
671 for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
672 (void)fgets(tmp, MAX_STR_LEN, fin)) {
673 p = strchr(tmp, '\'');
674 if (p) {
675 q = strchr(++p, '\'');
676 if (q) {
677 for (r = q; *(r - 1) == ' '; r--);
678 *r = '\0';
679 strcpy(phrase_one, p);
680 p = strchr(++q, '\'');
681 if (p) {
682 q = strchr(++p, '\'');
683 if (q) {
684 while (*(q - 1) == ' ') {
685 q--;
686 }
687 *q = '\0';
688 strcpy(phrase_two, p);
689 }
690 }
691 }
692 }
693 }
694 paranoid_pclose(fin);
695
696#ifndef __FreeBSD__
697 if (strlen(phrase_two) == 0) {
698 log_msg(4, "Not running phase two. String is empty.");
699 } else {
700 sprintf(command, "dmesg | grep \"%s\" 2> /dev/null", phrase_two);
701 fin = popen(command, "r");
702 if (!fin) {
703 log_msg(4, "Cannot run 2nd command - non-fatal, fortunately");
704 } else {
705 for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
706 (void)fgets(tmp, MAX_STR_LEN, fin)) {
707 log_msg(5, "--> '%s'", tmp);
708 if (tmp[0] != ' ' && tmp[1] != ' ') {
709 p = strchr(tmp, ':');
710 if (p) {
711 *p = '\0';
712 if (strstr(tmp, "DVD")) {
713 sprintf(dvd_last_resort, "/dev/%s", tmp);
714 log_msg(4,
715 "Ignoring '%s' because it's a DVD drive",
716 tmp);
717 } else {
718 sprintf(output, "/dev/%s", tmp);
719 found_it = TRUE;
720 }
721 }
722 }
723 }
724 paranoid_pclose(fin);
725 }
726 }
727
728#endif
729#ifdef __FreeBSD__
730 if (!found_it) {
731 log_msg(4, "OK, approach 2");
732 if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/cdrom"))) {
733 if (!
734 (found_it =
735 set_dev_to_this_if_rx_OK(output, "/dev/cdrom1"))) {
736 if (!
737 (found_it =
738 set_dev_to_this_if_rx_OK(output, "/dev/dvd"))) {
739 if (!
740 (found_it =
741 set_dev_to_this_if_rx_OK(output, "/dev/acd0"))) {
742 if (!
743 (found_it =
744 set_dev_to_this_if_rx_OK(output,
745 "/dev/cd01"))) {
746 if (!
747 (found_it =
748 set_dev_to_this_if_rx_OK(output,
749 "/dev/acd1"))) {
750 if (!
751 (found_it =
752 set_dev_to_this_if_rx_OK(output,
753 "/dev/cd1")))
754 {
755 retval = 1;
756 goto end_of_find_cdrom_device;
757 }
758 }
759 }
760 }
761 }
762 }
763 }
764 }
765#else
766 if (!found_it && strlen(dvd_last_resort) > 0) {
767 log_msg(4, "Well, I'll use the DVD - %s - as a last resort",
768 dvd_last_resort);
769 strcpy(output, dvd_last_resort);
770 found_it = TRUE;
771 }
772 if (found_it) {
773 sprintf(tmp, "grep \"%s=ide-scsi\" /proc/cmdline &> /dev/null",
774 strrchr(output, '/') + 1);
775 if (system(tmp) == 0) {
776 log_msg(4,
777 "%s is not right. It's being SCSI-emulated. Continuing.",
778 output);
779 found_it = FALSE;
780 output[0] = '\0';
781 }
782 }
783
784 if (found_it) {
785 log_msg(4, "(find_cdrom_device) --> '%s'", output);
786 if (!does_device_exist(output)) {
787 found_it = FALSE;
788 log_msg(4, "OK, I was wrong, I haven't found it... yet.");
789 }
790 }
791
792 if (!found_it) {
793 log_msg(4, "OK, approach 2");
794 if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/scd0"))) {
795 if (!(found_it = set_dev_to_this_if_rx_OK(output, "/dev/sr0"))) {
796 if (!
797 (found_it =
798 set_dev_to_this_if_rx_OK(output, "/dev/cdrom"))) {
799 if (!
800 (found_it =
801 set_dev_to_this_if_rx_OK(output,
802 "/dev/cdrom0"))) {
803 if (!
804 (found_it =
805 set_dev_to_this_if_rx_OK(output,
806 "/dev/cdrom1"))) {
807 if (!
808 (found_it =
809 set_dev_to_this_if_rx_OK(output,
810 "/dev/sr1"))) {
811 if (!
812 (found_it =
813 set_dev_to_this_if_rx_OK(output,
814 "/dev/dvd")))
815 {
816 if (!
817 (found_it =
818 set_dev_to_this_if_rx_OK(output,
819 g_cdrw_drive_is_here)))
820 {
821 retval = 1;
822 goto end_of_find_cdrom_device;
823 }
824 }
825 }
826 }
827 }
828 }
829 }
830 }
831 }
832#endif
833
834 if (found_it && try_to_mount) {
835 if (mount_CDROM_here(output, mountpoint)) {
836 log_msg(4, "[Cardigans] I've changed my mind");
837 found_it = FALSE;
838 } else {
839 sprintf(tmp, "%s/archives", mountpoint);
840 if (!does_file_exist(tmp)) {
841 log_msg(4, "[Cardigans] I'll take it back");
842 found_it = FALSE;
843 } else {
844 sprintf(command, "umount %s", output);
845 paranoid_system(command);
846 log_msg(4, "I'm confident the Mondo CD is in %s", output);
847 }
848 }
849 }
850 unlink(mountpoint);
851
852 if (found_it) {
853 if (!does_file_exist(output)) {
854 log_msg(3, "I still haven't found it.");
855 return (1);
856 }
857 log_msg(3, "(find_cdrom_device) --> '%s'", output);
858 strcpy(the_last_place_i_found_it, output);
859 strcpy(g_cdrom_drive_is_here, output);
860 retval = 0;
861 goto end_of_find_cdrom_device;
862 }
863
864 sprintf(command,
865 "%s -scanbus | grep \"[0-9],[0-9],[0-9]\" | grep \"[D|C][V|D]\" | grep -n \"\" | grep \"%s\" | cut -d':' -f2",
866 cdr_exe, g_cdrw_drive_is_here);
867 log_msg(1, "command=%s", command);
868 mr_asprintf(&tmp1, "%s", call_program_and_get_last_line_of_output(command));
869 if (strlen(tmp1) > 0) {
870 strcpy(output, tmp1);
871 log_msg(4, "Finally found it at %s", output);
872 retval = 0;
873 } else {
874 log_msg(4, "Still couldn't find it.");
875 retval = 1;
876 }
877 mr_free(tmp1);
878
879 end_of_find_cdrom_device:
880 paranoid_free(tmp);
881 mr_free(cdr_exe);
882 paranoid_free(phrase_one);
883 paranoid_free(phrase_two);
884 paranoid_free(command);
885 paranoid_free(dvd_last_resort);
886 paranoid_free(mountpoint);
887 return (retval);
888}
889
890
891
892
893
894int find_dvd_device(char *output, bool try_to_mount)
895{
896 char *command;
897 char *tmp;
898 int retval = 0, devno = -1;
899
900 malloc_string(command);
901 malloc_string(tmp);
902
903 if (g_dvd_drive_is_here[0]) {
904 strcpy(output, g_dvd_drive_is_here);
905 log_msg(3, "Been there, done that. Returning %s", output);
906 return (0);
907 }
908
909 sprintf(tmp, "%s", call_program_and_get_last_line_of_output
910 ("dvdrecord -scanbus 2> /dev/null | grep \") '\" | grep -n \"\" | grep DVD | cut -d':' -f1")
911 );
912 log_msg(5, "tmp = '%s'", tmp);
913 if (!tmp[0])
914 sprintf(tmp, "%s", call_program_and_get_last_line_of_output
915 ("cdrecord -scanbus 2> /dev/null | grep \") '\" | grep -n \"\" | grep DVD | cut -d':' -f1")
916 );
917 if (tmp[0]) {
918 devno = atoi(tmp) - 1;
919 }
920 if (devno >= 0) {
921 retval = 0;
922 sprintf(output, "/dev/scd%d", devno);
923 strcpy(g_dvd_drive_is_here, output);
924 log_msg(2, "I think DVD is at %s", output);
925 } else {
926 log_msg(2, "I cannot find DVD");
927 retval = 1;
928 }
929
930 if (try_to_mount) {
931 log_msg(1, "Ignoring the fact that try_to_mount==TRUE");
932 }
933 return (retval);
934}
935
936
937
938
939
940#include <sys/ioctl.h>
941
942/**
943 * Find the size of the specified @p drive, in megabytes. Uses @c ioctl calls
944 * and @c dmesg.
945 * @param drive The device to find the size of.
946 * @return size in megabytes.
947 */
948long get_phys_size_of_drive(char *drive)
949{
950 int fd;
951#if linux
952 unsigned long long s = 0;
953 int fileid, cylinders = 0, cylindersleft = 0;
954 int cylindersize = 0;
955 int gotgeo = 0;
956
957
958 struct hd_geometry hdgeo;
959#elif __FreeBSD__
960 off_t s;
961#endif
962
963 long outvalA = -1;
964 long outvalB = -1;
965 long outvalC = -1;
966
967 if ((fd = open(drive, O_RDONLY)) != -1) {
968 if (ioctl(fd,
969#if linux
970#ifdef BLKGETSIZE64
971 BLKGETSIZE64,
972#else
973 BLKGETSIZE,
974#endif
975#elif __FreeBSD__
976 DIOCGMEDIASIZE,
977#endif
978 &s) != -1) {
979 close(fd);
980 // s>>11 works for older disks but not for newer ones
981 outvalB =
982#if linux
983#ifdef BLKGETSIZE64
984 s >> 20
985#else
986 s >> 11
987#endif
988#else
989 s >> 20
990#endif
991 ;
992 }
993 }
994
995 if (outvalB <= 0) {
996 log_msg(1, "Error getting size of %s: %s", drive, strerror(errno));
997#if linux
998 fileid = open(drive, O_RDONLY);
999 if (fileid != -1) {
1000 if (ioctl(fileid, HDIO_GETGEO, &hdgeo) != -1) {
1001 if (hdgeo.cylinders && hdgeo.heads && hdgeo.sectors) {
1002 cylindersleft = cylinders = hdgeo.cylinders;
1003 cylindersize = hdgeo.heads * hdgeo.sectors / 2;
1004 outvalA = cylindersize * cylinders / 1024;
1005 log_msg(2, "Got Harddisk geometry, C:%d, H:%d, S:%d",
1006 hdgeo.cylinders, hdgeo.heads, hdgeo.sectors);
1007 gotgeo = 1;
1008 } else {
1009 log_msg(1, "Harddisk geometry wrong");
1010 }
1011 } else {
1012 log_msg(1,
1013 "Error in ioctl() getting new hard disk geometry (%s), resizing in unsafe mode",
1014 strerror(errno));
1015 }
1016 close(fileid);
1017 } else {
1018 log_msg(1, "Failed to open %s for reading: %s", drive,
1019 strerror(errno));
1020 }
1021 if (!gotgeo) {
1022 log_msg(1, "Failed to get harddisk geometry, using old mode");
1023 }
1024#endif
1025 }
1026// OLDER DISKS will give ridiculously low value for outvalB (so outvalA is returned) :)
1027// NEWER DISKS will give sane value for outvalB (close to outvalA, in other words) :)
1028
1029 outvalC = (outvalA > outvalB) ? outvalA : outvalB;
1030
1031// log_msg (5, "drive = %s, error = %s", drive, strerror (errno));
1032// fatal_error ("GPSOD: Unable to get size of drive");
1033 log_msg(1, "%s --> %ld or %ld --> %ld", drive, outvalA, outvalB,
1034 outvalC);
1035
1036 return (outvalC);
1037}
1038
1039/**
1040 * Determine whether @p format is supported by the kernel. Uses /proc/filesystems
1041 * under Linux and @c lsvfs under FreeBSD.
1042 * @param format The format to test.
1043 * @return TRUE if the format is supported, FALSE if not.
1044 */
1045bool is_this_a_valid_disk_format(char *format)
1046{
1047 char *good_formats = NULL;
1048 char *command;
1049 char *format_sz;
1050
1051 FILE *pin;
1052 int retval;
1053 malloc_string(good_formats);
1054 malloc_string(command);
1055 malloc_string(format_sz);
1056
1057 assert_string_is_neither_NULL_nor_zerolength(format);
1058
1059 sprintf(format_sz, "%s ", format);
1060
1061#ifdef __FreeBSD__
1062 sprintf(command,
1063 "lsvfs | tr -s '\t' ' ' | grep -v Filesys | grep -v -- -- | cut -d' ' -f1 | tr -s '\n' ' '");
1064#else
1065 sprintf(command,
1066 "grep -v nodev /proc/filesystems | tr -s '\t' ' ' | cut -d' ' -f2 | tr -s '\n' ' '");
1067#endif
1068
1069 pin = popen(command, "r");
1070 if (!pin) {
1071 log_OS_error("Unable to read good formats");
1072 retval = 0;
1073 } else {
1074 strcpy(good_formats, " ");
1075 (void) fgets(good_formats + 1, MAX_STR_LEN - 1, pin);
1076 if (pclose(pin)) {
1077 log_OS_error("Cannot pclose good formats");
1078 }
1079 strip_spaces(good_formats);
1080 strcat(good_formats, " swap lvm raid ntfs-3g ntfs 7 "); // " ntfs 7 " -- um, cheating much? :)
1081 if (strstr(good_formats, format_sz)) {
1082 retval = 1;
1083 } else {
1084 retval = 0;
1085 }
1086 }
1087 paranoid_free(good_formats);
1088 paranoid_free(command);
1089 paranoid_free(format_sz);
1090 return (retval);
1091}
1092
1093
1094/** @def SWAPLIST_COMMAND The command to list the swap files/partitions in use. */
1095
1096/**
1097 * Determine whether @p device_raw is currently mounted.
1098 * @param device_raw The device to check.
1099 * @return TRUE if it's mounted, FALSE if not.
1100 */
1101bool is_this_device_mounted(char *device_raw)
1102{
1103
1104 /*@ pointers **************************************************** */
1105 FILE *fin;
1106
1107 /*@ buffers ***************************************************** */
1108 char *incoming;
1109 char *device_with_tab = NULL;
1110 char *device_with_space = NULL;
1111 char *tmp = NULL;
1112 bool retval = FALSE;
1113
1114#ifdef __FreeBSD__
1115#define SWAPLIST_COMMAND "swapinfo"
1116#else
1117#define SWAPLIST_COMMAND "cat /proc/swaps"
1118#endif
1119
1120 /*@ end vars **************************************************** */
1121
1122 malloc_string(incoming);
1123 assert(device_raw != NULL);
1124// assert_string_is_neither_NULL_nor_zerolength(device_raw);
1125 if (device_raw[0] != '/' && !strstr(device_raw, ":/")) {
1126 log_msg(1, "%s needs to have a '/' prefixed - I'll do it",
1127 device_raw);
1128 mr_asprintf(&tmp, "/%s", device_raw);
1129 } else {
1130 mr_asprintf(&tmp, "%s", device_raw);
1131 }
1132 log_msg(1, "Is %s mounted?", tmp);
1133 if (!strcmp(tmp, "/proc") || !strcmp(tmp, "proc")) {
1134 log_msg(1,
1135 "I don't know how the heck /proc made it into the mountlist. I'll ignore it.");
1136 mr_free(tmp);
1137 return(FALSE);
1138 }
1139 mr_asprintf(&device_with_tab, "%s\t", tmp);
1140 mr_asprintf(&device_with_space, "%s ", tmp);
1141 mr_free(tmp);
1142
1143 if (!(fin = popen("mount", "r"))) {
1144 log_OS_error("Cannot popen 'mount'");
1145 return(FALSE);
1146 }
1147 for ((void)fgets(incoming, MAX_STR_LEN - 1, fin); !feof(fin);
1148 (void)fgets(incoming, MAX_STR_LEN - 1, fin)) {
1149 if (strstr(incoming, device_with_space) //> incoming
1150 || strstr(incoming, device_with_tab)) // > incoming)
1151 {
1152 paranoid_pclose(fin);
1153 paranoid_free(incoming);
1154 return(TRUE);
1155 }
1156 }
1157 mr_free(device_with_tab);
1158 paranoid_pclose(fin);
1159 mr_asprintf(&tmp, "%s | grep -E \"^%s\" > /dev/null 2> /dev/null", SWAPLIST_COMMAND, device_with_space);
1160 mr_free(device_with_space);
1161 log_msg(4, "tmp (command) = '%s'", tmp);
1162 if (!system(tmp)) {
1163 retval = TRUE;
1164 }
1165 mr_free(tmp);
1166 paranoid_free(incoming);
1167 return(retval);
1168}
1169
1170#ifdef __FreeBSD__
1171// CODE IS FREEBSD-SPECIFIC
1172/**
1173 * Create a loopback device for specified @p fname.
1174 * @param fname The file to associate with a device.
1175 * @return /dev entry for the device, or NULL if it couldn't be allocated.
1176 */
1177char *make_vn(char *fname)
1178{
1179 char *device = (char *) malloc(MAX_STR_LEN);
1180 char *mddevice = (char *) malloc(32);
1181 char command[MAX_STR_LEN];
1182 int vndev = 2;
1183 if (atoi
1184 (call_program_and_get_last_line_of_output
1185 ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1186 do {
1187 sprintf(mddevice, "vn%ic", vndev++);
1188 sprintf(command, "vnconfig %s %s", mddevice, fname);
1189 if (vndev > 10) {
1190 return NULL;
1191 }
1192 }
1193 while (system(command));
1194 } else {
1195 sprintf(command, "mdconfig -a -t vnode -f %s", fname);
1196 mddevice = call_program_and_get_last_line_of_output(command);
1197 if (!strstr(mddevice, "md")) {
1198 return NULL;
1199 }
1200 }
1201 sprintf(device, "/dev/%s", mddevice);
1202 return device;
1203}
1204
1205
1206
1207// CODE IS FREEBSD-SPECIFIC
1208/**
1209 * Deallocate specified @p dname.
1210 * This should be called when you are done with the device created by make_vn(),
1211 * so the system does not run out of @c vn devices.
1212 * @param dname The device to deallocate.
1213 * @return 0 for success, nonzero for failure.
1214 */
1215int kick_vn(char *dname)
1216{
1217 char command[MAX_STR_LEN];
1218
1219 if (strncmp(dname, "/dev/", 5) == 0) {
1220 dname += 5;
1221 }
1222
1223 if (atoi
1224 (call_program_and_get_last_line_of_output
1225 ("/sbin/sysctl -n kern.osreldate")) < 500000) {
1226 sprintf(command, "vnconfig -d %s", dname);
1227 return system(command);
1228 } else {
1229 sprintf(command, "mdconfig -d -u %s", dname);
1230 return system(command);
1231 }
1232 /*NOTREACHED*/ return 255;
1233}
1234#endif
1235
1236
1237/**
1238 * Mount the CD-ROM at @p mountpoint.
1239 * @param device The device (or file if g_ISO_restore_mode) to mount.
1240 * @param mountpoint The place to mount it.
1241 * @return 0 for success, nonzero for failure.
1242 */
1243int mount_USB_here(char *device, char *mountpoint)
1244{
1245 /*@ buffer ****************************************************** */
1246 char *command;
1247 int retval;
1248
1249 malloc_string(command);
1250 assert_string_is_neither_NULL_nor_zerolength(device);
1251 assert_string_is_neither_NULL_nor_zerolength(mountpoint);
1252
1253 make_hole_for_dir(mountpoint);
1254 if (isdigit(device[0])) {
1255 return(1);
1256 }
1257 log_msg(4, "(mount_USB_here --- device=%s, mountpoint=%s", device,
1258 mountpoint);
1259
1260#ifdef __FreeBSD__
1261 sprintf(command, "mount_vfat %s %s 2>> %s",
1262 device, mountpoint, MONDO_LOGFILE);
1263
1264#else
1265 sprintf(command, "mount %s -t vfat %s 2>> %s",
1266 device, mountpoint, MONDO_LOGFILE);
1267#endif
1268
1269 log_msg(4, command);
1270 retval = system(command);
1271 log_msg(1, "system(%s) returned %d", command, retval);
1272
1273 paranoid_free(command);
1274 return (retval);
1275}
1276
1277/**
1278 * Mount the CD-ROM at @p mountpoint.
1279 * @param device The device (or file if g_ISO_restore_mode) to mount.
1280 * @param mountpoint The place to mount it.
1281 * @return 0 for success, nonzero for failure.
1282 */
1283int mount_CDROM_here(char *device, char *mountpoint)
1284{
1285 /*@ buffer ****************************************************** */
1286 char *command = NULL;
1287 int retval;
1288#ifdef __FreeBSD__
1289 char *dev = NULL;
1290#else
1291 char *options = NULL;
1292#endif
1293
1294 assert_string_is_neither_NULL_nor_zerolength(device);
1295 assert_string_is_neither_NULL_nor_zerolength(mountpoint);
1296
1297 make_hole_for_dir(mountpoint);
1298
1299 if (isdigit(device[0])) {
1300 find_cdrom_device(device, FALSE);
1301 }
1302#ifndef __FreeBSD__
1303 mr_asprintf(&options, "ro");
1304#endif
1305
1306 if (g_ISO_restore_mode) {
1307
1308#ifdef __FreeBSD__
1309 mr_asprintf(&dev, "%s", make_vn(device));
1310 if (!dev) {
1311 mr_asprintf(&command, "Unable to mount ISO (make_vn(%s) failed)", device);
1312 fatal_error(command);
1313 }
1314 strcpy(device, dev);
1315 paranoid_free(dev);
1316#else
1317 mr_strcat(options, ",loop");
1318#endif
1319
1320 }
1321 log_msg(4, "(mount_CDROM_here --- device=%s, mountpoint=%s", device,
1322 mountpoint);
1323 /*@ end vars *************************************************** */
1324
1325#ifdef __FreeBSD__
1326 mr_asprintf(&command, "mount_cd9660 -r %s %s 2>> %s", device, mountpoint, MONDO_LOGFILE);
1327
1328#else
1329 mr_asprintf(&command, "mount %s -o %s -t iso9660 %s 2>> %s", device, options, mountpoint, MONDO_LOGFILE);
1330 paranoid_free(options);
1331#endif
1332
1333 log_msg(4, command);
1334 if (strncmp(device, "/dev/", 5) == 0) {
1335 retract_CD_tray_and_defeat_autorun();
1336 }
1337 retval = system(command);
1338 log_msg(1, "system(%s) returned %d", command, retval);
1339 paranoid_free(command);
1340
1341 return (retval);
1342}
1343
1344
1345
1346
1347
1348
1349/**
1350 * Ask the user for CD number @p cd_number_i_want.
1351 * Sets g_current_media_number once the correct CD is inserted.
1352 * @param bkpinfo The backup information structure. Fields used:
1353 * - @c bkpinfo->backup_media_type
1354 * - @c bkpinfo->prefix
1355 * - @c bkpinfo->isodir
1356 * - @c bkpinfo->media_device
1357 * - @c bkpinfo->please_dont_eject_when_restoring
1358 * @param cd_number_i_want The CD number to ask for.
1359 */
1360void
1361insist_on_this_cd_number(int cd_number_i_want)
1362{
1363
1364 /*@ int ************************************************************* */
1365 int res = 0;
1366
1367
1368 /*@ buffers ********************************************************* */
1369 char *tmp;
1370 char *mds = NULL;
1371 char *request;
1372
1373 assert(bkpinfo != NULL);
1374 assert(cd_number_i_want > 0);
1375
1376// log_msg(3, "Insisting on CD number %d", cd_number_i_want);
1377
1378 if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
1379 log_msg(3,
1380 "No need to insist_on_this_cd_number when the backup type isn't CD-R(W) or NFS or ISO");
1381 return;
1382 }
1383 malloc_string(tmp);
1384 malloc_string(request);
1385 sprintf(tmp, "mkdir -p " MNT_CDROM);
1386 run_program_and_log_output(tmp, 5);
1387 if (g_ISO_restore_mode || bkpinfo->backup_media_type == iso
1388 || bkpinfo->backup_media_type == netfs) {
1389 log_msg(3, "Remounting CD");
1390 g_ISO_restore_mode = TRUE;
1391// FIXME --- I'm tempted to do something about this...
1392// Why unmount and remount again and again?
1393 if (is_this_device_mounted(MNT_CDROM)) {
1394 run_program_and_log_output("umount " MNT_CDROM, 5);
1395 }
1396 sprintf(tmp, "mkdir -p %s/isodir &> /dev/null", bkpinfo->tmpdir);
1397 (void)system(tmp);
1398 sprintf(tmp, "%s/%s/%s-%d.iso", bkpinfo->isodir,
1399 bkpinfo->netfs_remote_dir, bkpinfo->prefix,
1400 cd_number_i_want);
1401 if (!does_file_exist(tmp)) {
1402 sprintf(tmp, "%s/isodir/%s/%s-%d.iso", bkpinfo->tmpdir,
1403 bkpinfo->netfs_remote_dir, bkpinfo->prefix,
1404 cd_number_i_want);
1405 if (does_file_exist(tmp)) {
1406 log_msg(1,
1407 "FIXME - hacking bkpinfo->isodir from '%s' to %s/isodir",
1408 bkpinfo->isodir, bkpinfo->tmpdir);
1409 sprintf(bkpinfo->isodir, "%s/isodir", bkpinfo->tmpdir);
1410 }
1411 }
1412 log_msg(3, "Mounting %s at %s", tmp, MNT_CDROM);
1413 if (mount_CDROM_here(tmp, MNT_CDROM)) {
1414 fatal_error("Mommy!");
1415 }
1416// g_current_media_number = cd_number_i_want;
1417// return;
1418 }
1419 if ((res = what_number_cd_is_this()) != cd_number_i_want) {
1420 log_msg(3, "Currently, we hold %d but we want %d", res,
1421 cd_number_i_want);
1422 mds = media_descriptor_string(bkpinfo->backup_media_type);
1423 sprintf(tmp, "Insisting on %s #%d", mds, cd_number_i_want);
1424 sprintf(request, "Please insert %s #%d and press Enter.", mds, cd_number_i_want);
1425 mr_free(mds);
1426 log_msg(3, tmp);
1427 while (what_number_cd_is_this() != cd_number_i_want) {
1428 paranoid_system("sync");
1429 if (is_this_device_mounted(MNT_CDROM)) {
1430 res =
1431 run_program_and_log_output("umount " MNT_CDROM, FALSE);
1432 } else {
1433 res = 0;
1434 }
1435 if (res) {
1436 log_to_screen("WARNING - failed to unmount CD-ROM drive");
1437 }
1438 if (!bkpinfo->please_dont_eject) {
1439 res = eject_device(bkpinfo->media_device);
1440 } else {
1441 res = 0;
1442 }
1443 if (res) {
1444 log_to_screen("WARNING - failed to eject CD-ROM disk");
1445 }
1446 popup_and_OK(request);
1447 if (!bkpinfo->please_dont_eject) {
1448 inject_device(bkpinfo->media_device);
1449 }
1450 paranoid_system("sync");
1451 }
1452 log_msg(1, "Thankyou. Proceeding...");
1453 g_current_media_number = cd_number_i_want;
1454 }
1455 paranoid_free(tmp);
1456 paranoid_free(request);
1457}
1458
1459/* @} - end of deviceGroup */
1460
1461
1462
1463/**
1464 * Creates a singly linked list of all of the non-NETFS mounted file systems.
1465 * @param DSFptr A pointer to the structure MOUNTED_FS_STRUCT used to hold
1466 * the list of mounted file systems.
1467 * @return None.
1468 */
1469static void add_mounted_fs_struct (MOUNTED_FS_STRUCT *DSFptr)
1470{
1471 assert (DSFptr);
1472 if (DSF_Head == NULL) {
1473 DSF_Head = DSFptr;
1474 } else {
1475 DSF_Tail->next = DSFptr;
1476 }
1477 DSFptr->next = NULL;
1478 DSF_Tail = DSFptr;
1479}
1480
1481/**
1482 * Find the structure, in the singly linked list of all of the non-NETFS
1483 * mounted file systems, that contains the specified device.
1484 * @param device The device to find
1485 * @return NULL if it didn't find the device, a pointer to the
1486 * structure if it did.
1487 */
1488static MOUNTED_FS_STRUCT *find_device_in_list (char *device)
1489{
1490 MOUNTED_FS_STRUCT *DSFptr = NULL;
1491
1492 DSFptr = DSF_Head;
1493 while (DSFptr != NULL) {
1494 if (!strcmp(DSFptr->device, device)) {
1495 break;
1496 }
1497 DSFptr = DSFptr->next;
1498 }
1499 return (DSFptr);
1500}
1501
1502/**
1503 * Find the structure, in the singly linked list of all of the non-NETFS
1504 * mounted file systems, that contains the specified mount point.
1505 * @param mount_point The mount point to find
1506 * @return NULL is it didn't find the mount point, a pointer to the
1507 * structure if it did.
1508 */
1509static MOUNTED_FS_STRUCT *find_mount_point_in_list (char *mount_point)
1510{
1511 MOUNTED_FS_STRUCT *DSFptr = NULL;
1512
1513 DSFptr = DSF_Head;
1514 while (DSFptr != NULL) {
1515 if (!strcmp(DSFptr->mount_point, mount_point)) {
1516 break;
1517 }
1518 DSFptr = DSFptr->next;
1519 }
1520 return (DSFptr);
1521}
1522
1523/**
1524 * Frees the memory for all of the structures on the linked list of
1525 * all of the non-NETFS mounted file systems.
1526 */
1527static void free_mounted_fs_list (void) {
1528 MOUNTED_FS_STRUCT *DSFptr = NULL;
1529 MOUNTED_FS_STRUCT *DSFnext = NULL;
1530
1531 DSFptr = DSF_Head;
1532 while (DSFptr != NULL) {
1533 DSFnext = DSFptr->next;
1534 paranoid_free(DSFptr);
1535 DSFptr = DSFnext;
1536 }
1537 DSF_Head = NULL;
1538 DSF_Tail = NULL;
1539}
1540
1541
1542/**
1543 * Creates a linked list of all of the non-NETFS mounted file systems.
1544 * We use a linked list because we don't know how many mounted file
1545 * there are (and there can be a lot).
1546 * @return 0 on success and greated than 0 on failure.
1547 */
1548static int create_list_of_non_NETFS_mounted_file_systems (void)
1549{
1550 int i = 0;
1551 int mount_cnt = 0;
1552 int lastpos = 0;
1553 char *mounted_file_system = NULL;
1554 char *command = NULL;
1555 char *token = NULL;
1556 char token_chars[] =" :\t\r\f\a\0";
1557 MOUNTED_FS_STRUCT *DSFptr = NULL;
1558
1559 free_mounted_fs_list();
1560 /********
1561 * Find the number of mounted file system entries and their respective mount points.
1562 * I can't return all of the entries as one string because it's length can be longer
1563 * than MAX_STR_LEN which is used in call_program_and_get_last_line_of_output().
1564 * So start looping and get the number of mounted file systems and query them one by one.
1565 ********/
1566 /* Get the number of mounted file systems ((those that start with "/dev/" */
1567 mr_asprintf(&command, "mount 2>/dev/null | awk '{if($1 ~ \"^/dev/\"){print $0}}'|wc -l");
1568 log_msg(5, "Running: %s", command);
1569 mr_asprintf(&mounted_file_system, "%s", call_program_and_get_last_line_of_output(command));
1570 paranoid_free(command);
1571
1572 mount_cnt = atoi(mounted_file_system);
1573 log_msg (5, "mount_cnt: %d", mount_cnt);
1574 paranoid_free(mounted_file_system);
1575
1576 for (i=mount_cnt; i > 0; i--) {
1577 mr_asprintf(&command, "mount 2>/dev/null | awk '{if($1 ~ \"^/dev/\"){print $1,$3}}'|head -n %d", i);
1578 log_msg(5, "Running: %s", command);
1579 mr_asprintf(&mounted_file_system, "%s", call_program_and_get_last_line_of_output(command));
1580 paranoid_free(command);
1581
1582 log_msg (5, "mounted_file_system: %s", mounted_file_system);
1583 if ((token = mr_strtok(mounted_file_system, token_chars, &lastpos)) == NULL) {
1584 log_msg (4, "Could not get the list of mounted file systems");
1585 paranoid_free(mounted_file_system);
1586 mr_free(token);
1587 return (1);
1588 }
1589 if (token) {
1590 log_msg (5, "token: %s", token);
1591 }
1592 while (token != NULL) {
1593 log_msg (5, "token: %s", token);
1594 if ((DSFptr = (MOUNTED_FS_STRUCT *) calloc(1, sizeof(MOUNTED_FS_STRUCT))) == NULL) {
1595 fatal_error ("Cannot allocate memory");
1596 }
1597 add_mounted_fs_struct(DSFptr);
1598 strcpy(DSFptr->device, token);
1599 mr_free(token);
1600 if ((token = mr_strtok(mounted_file_system, token_chars, &lastpos)) == NULL) {
1601 log_msg (5, "Ran out of entries on the mounted file systems list");
1602 mr_free(mounted_file_system);
1603 mr_free(token);
1604 return (1);
1605 }
1606 log_msg (5, "token: %s", token);
1607 strcpy(DSFptr->mount_point, token);
1608 mr_free(token);
1609 token = mr_strtok(mounted_file_system, token_chars, &lastpos);
1610 }
1611 mr_free(mounted_file_system);
1612 }
1613 /********
1614 * DSFptr = DSF_Head;
1615 * while (DSFptr != NULL) {
1616 * printf ("Dev: %s MP: %s Check: %d\n", DSFptr->device, DSFptr->mount_point, DSFptr->check);
1617 * DSFptr = DSFptr->next;
1618 * }
1619 ********/
1620 return (0);
1621}
1622
1623
1624
1625/**
1626 * Given a whole disk device special file, determine which mounted file systems
1627 * are on the dsf's partitions and which mounted file systems are not.
1628 * @param dsf The whole disk device special file.
1629 * @param included_dsf_list A char pointer used to hold the list of mount points
1630 * that are on the dsf. Memory for the array will be allocated within the function.
1631 * @param excluded_dsf_list A char pointer used to hold the list of mount points
1632 * that are not on the dsf. Memory for the array will be allocated within the function.
1633 * @return 0 on success, -1 if no device special file was passed in, -2 if a device
1634 * special file was passed in but it has no partitions on it, or 1 on failure
1635 */
1636static int get_dsf_mount_list (const char *dsf, char **included_dsf_list, char **excluded_dsf_list) {
1637 int i = 0;
1638 int c = 0;
1639 int lastpos = 0;
1640 char VG[MAX_STR_LEN];
1641 char *tmp = NULL;
1642 char *command = NULL;
1643 char *partition_list = NULL;
1644 char partitions[64][MAX_STR_LEN];
1645 char *mount_list = NULL;
1646 char *token = NULL;
1647 char *ndsf = NULL;
1648 char token_chars[] =" \t\r\f\a\0";
1649 MOUNTED_FS_STRUCT *DSFptr = NULL;
1650
1651 memset((char *)partitions, 0, sizeof(partitions));
1652
1653 log_msg(5, "dsf: %s", dsf);
1654
1655 /********
1656 * See if a device special file was passed in (i.e. it must start with /dev/
1657 ********/
1658 if (strncmp(dsf, "/dev/", 5)) {
1659 log_msg (4, "%s does not start with /dev/ and (probably) is not a device special file", dsf);
1660 return (-1);
1661 }
1662 log_msg(4, " %s looks like a device special file", dsf);
1663 /* Verify that the dsf exists */
1664 mr_asprintf(&command, "ls -al %s 2>/dev/null | wc -l", dsf);
1665 log_msg(5, " Executing: %s", command);
1666 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1667 paranoid_free(command);
1668
1669 log_msg(5, " Return value: %s", tmp);
1670 c = atoi(tmp);
1671 paranoid_free(tmp);
1672
1673 if (!c) {
1674 log_to_screen("Cannot find device special file %s", dsf);
1675 return (1);
1676 }
1677 log_msg(4, " %s device special file exists", dsf);
1678
1679 /* Get a list of the mounted file systems */
1680 if (create_list_of_non_NETFS_mounted_file_systems()) {
1681 log_to_screen ("Could not get the list of mounted file systems");
1682 return (1);
1683 }
1684 log_msg (5, "Processing dsf: %s", dsf);
1685 /********
1686 * Get a list of the dsf's partitions. There could be no partitions on the disk
1687 * or a dsf of a partition was passed in (e.g. /dev/sda1 instead of /dev/sda).
1688 * Either way, it's an error.
1689 ********/
1690 mr_asprintf(&command, "parted2fdisk -l %s 2>/dev/null|grep -E \"^/dev/\"|awk '{printf(\"%%s \", $1)}END{print \"\"}'", dsf);
1691 log_msg(5, "Executing: %s", command);
1692 mr_asprintf(&partition_list, "%s", call_program_and_get_last_line_of_output(command));
1693 paranoid_free(command);
1694 log_msg(4, "Partition list for %s: %s", dsf, partition_list);
1695 if (!strlen(partition_list)) {
1696 /* There were no partitions on the disk */
1697 log_msg(4, "No partitions on device special file %s", dsf);
1698 log_msg(4, "I guess it's a partition itself");
1699 strcpy(partitions[0], dsf);
1700 ndsf = truncate_to_drive_name(dsf);
1701 } else {
1702 /* Fill the partition list */
1703 i = 0;
1704 lastpos = 0;
1705 while ((token = mr_strtok(partition_list, token_chars, &lastpos)) != NULL) {
1706 log_msg (4, "Found partition: %s", token);
1707 strcpy(partitions[i++], token);
1708 mr_free(token);
1709 }
1710 mr_asprintf(&ndsf, "%s", dsf);
1711 }
1712 mr_free(partition_list);
1713
1714 /* In any case we want to exclude the dsf itself from all MondRescue activities
1715 * at restore time (LVM, fdisk, ...) so we want it in our exclude_dev list */
1716 if ((DSFptr = find_device_in_list(dsf)) == NULL) {
1717 log_msg (4, "Can't find device %s in mounted file systems list", dsf);
1718 paranoid_free(tmp);
1719 mr_free(token);
1720 return (1);
1721 }
1722 DSFptr->check = 1;
1723
1724 /* For the rest ndsf is the new dsf to deal with */
1725 /********
1726 * At this point, we have a list of all of the partitions on the dsf. Now try to
1727 * see which partitions have a file system on them.
1728 *
1729 * Loop through each partition on the disk and:
1730 *
1731 * - If the partition is swap, it ignores it.
1732 *
1733 * - If the partition is mounted (e.g. /dev/sda1 is mounted on /boot), it adds an entry
1734 * to the linked list, copies to it the device name and mount point, and sets check == 1.
1735 *
1736 * - If the partition is part of a Volume Group that has Logical Volumes mounted, it adds
1737 * an entry to the linked list for each mounted Logical Volume in that Volume Group, copying
1738 * to it the device name and mount point, and sets check == 1. Note that if the Volume Group
1739 * contains more than one disk, it will still add the entry even if the Logical Volume's
1740 * extents are not on the dsf that was passed in to the function. For example, Volume Group
1741 * VolGroup00 contains the disks /dev/sda1 and /dev/sdb1, and the Logical Volumes LogVol01,
1742 * which is mounted on /var and has all of its extents on /dev/sda1, and LogVol02, which is
1743 * mounted as /usr and has all of its extents on /dev/sdb1. If you pass /dev/sda into the
1744 * function, both /var and /usr will be archived even though /usr is actually on/dev/sdb.
1745 *
1746 * - If the partition is part of a Volume Group that has Logical Volumes used in a mounted
1747 * software raid device, it adds an entry to the linked list, copies to it the software raid
1748 * device name and mount point, and sets check == 1.
1749 *
1750 * - If the partition is part of a mounted software raid device, it adds an entry to the linked
1751 * list, copies to it the software raid device name and mount point, and sets check == 1.
1752 *
1753 ********/
1754 for (i=0; strlen(partitions[i]); i++) {
1755 log_msg(4, "Processing partition: %s", partitions[i]);
1756 /* See if it's swap. If it is, ignore it. */
1757 mr_asprintf(&command, "parted2fdisk -l %s 2>/dev/null | awk '{if(($1==\"%s\")&&(toupper($0) ~ \"SWAP\")){print $1;exit}}'",
1758 ndsf, partitions[i]);
1759 log_msg(5, " Running: %s", command);
1760 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1761 paranoid_free(command);
1762 log_msg(5, " Return value: %s", tmp);
1763 c = strlen(tmp);
1764 paranoid_free(tmp);
1765 if (c) {
1766 log_msg(4, "It's swap. Ignoring partition %s", partitions[i]);
1767 continue;
1768 }
1769 /* It's not swap. See if we can find the mount point from the mount command. */
1770 mr_asprintf(&command, "mount 2>/dev/null | awk '{if((NF>0)&&($1==\"%s\")){print $3}}'", partitions[i]);
1771 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1772 paranoid_free(command);
1773 if (strlen(tmp)) {
1774 log_msg(4, " %s is mounted: %s", partitions[i], tmp);
1775 if ((DSFptr = find_mount_point_in_list(tmp)) == NULL) {
1776 log_msg (4, "Can't find mount point %s in mounted file systems list", tmp);
1777 paranoid_free(tmp);
1778 return (1);
1779 }
1780 DSFptr->check = 1;
1781 paranoid_free(tmp);
1782 continue;
1783 }
1784 paranoid_free(tmp);
1785 /* It's not swap and it's not mounted. See if it's LVM */
1786 log_msg(4, " It's not mounted. Checking to see if it's LVM...");
1787 /* Check for LVM */
1788 mr_asprintf(&command, "pvdisplay -c %s | grep '%s:' 2> /dev/null", partitions[i], partitions[i]);
1789 log_msg(5, " Running: %s", command);
1790 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1791 paranoid_free(command);
1792 if (strlen(tmp)) {
1793 log_msg(4, "Found an LVM partition at %s. Find the VG it's in...", partitions[i]);
1794 /* It's LVM: Find the VG it's in */
1795 mr_asprintf(&command, "pvdisplay -v %s 2>/dev/null|grep \"VG Name\"|awk '{print $NF}'", partitions[i]);
1796 log_msg(5, " Running: %s", command);
1797 strcpy(VG, call_program_and_get_last_line_of_output(command));
1798 paranoid_free(command);
1799 log_msg(4, " Volume Group: %s", VG);
1800 if (strlen(VG)) {
1801 /* Found the Volume Group. Now find all of the VG's mount points */
1802 log_msg(4, " Found the Volume Group. Now find all of the VG's mount points");
1803 mr_asprintf(&command, "mount 2>/dev/null|grep -E \"/dev/mapper/%s-|/dev/%s/\"|awk '{printf(\"%%s \",$3)}END{print \"\"}'", VG, VG);
1804 log_msg(5, " Running: %s", command);
1805 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1806 paranoid_free(command);
1807 log_msg(4, " VG %s mount_list: %s", VG, mount_list);
1808 lastpos = 0;
1809 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1810 log_msg (5, "mount point token: %s", token);
1811 if ((DSFptr = find_mount_point_in_list(token)) == NULL) {
1812 log_msg (4, "Can't find mount point %s in mounted file systems list", token);
1813 paranoid_free(tmp);
1814 mr_free(token);
1815 return (1);
1816 }
1817 DSFptr->check = 1;
1818 mr_free(token);
1819 }
1820 /********
1821 * Now we want to see if there are any software raid devices using
1822 * any of the Logical Volumes on the Volume Group.
1823 *******/
1824 paranoid_free(mount_list);
1825
1826 mr_asprintf(&command, "%s", "cat /proc/mdstat|grep -iv Personal|awk '{if($0~\"^.*[ ]+:\"){printf(\"/dev/%s \", $1)}}END{print \"\"}'");
1827 log_msg (5, "Running: %s", command);
1828 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1829 paranoid_free(command);
1830 log_msg(4, " Software raid device list: %s", mount_list);
1831 lastpos = 0;
1832 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1833 mr_asprintf(&command, "mdadm --detail %s 2>/dev/null | grep -c %s", token, VG);
1834 log_msg (5, "Running: %s", command);
1835 paranoid_free(tmp);
1836 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1837 paranoid_free(command);
1838 log_msg(4, "Number of Software raid device: %s", tmp);
1839 if (atoi(tmp)) {
1840 /* This device is on our disk */
1841 if ((DSFptr = find_device_in_list(token)) == NULL) {
1842 log_msg (4, "Can't find device %s in mounted file systems list", token);
1843 paranoid_free(tmp);
1844 mr_free(token);
1845 return (1);
1846 }
1847 DSFptr->check = 1;
1848 }
1849 }
1850 mr_free(token);
1851 paranoid_free(mount_list);
1852 } else {
1853 log_msg (4, "Error finding Volume Group for partition %s", partitions[i]);
1854 paranoid_free(tmp);
1855 return (1);
1856 }
1857 paranoid_free(tmp);
1858 continue;
1859 } else {
1860 log_msg (4, "Error finding partition type for the partition %s", partitions[i]);
1861 }
1862 paranoid_free(tmp);
1863 /********
1864 * It's not swap, mounted, or LVM. See if it's used in a software raid device.
1865 ********/
1866 log_msg (5, "It's not swap, mounted, or LVM. See if it's used in a software raid device.");
1867 mr_asprintf(&command, "mdadm --examine %s 2>/dev/null | awk '{if($1 == \"UUID\"){print $3}}'", partitions[i]);
1868 log_msg(4, " Running: %s", command);
1869 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1870 paranoid_free(command);
1871 if (!strlen(tmp)) {
1872 log_msg(4, " Partition %s is not used in a non-LVM software raid device", partitions[i]);
1873 paranoid_free(tmp);
1874 continue;
1875 }
1876 log_msg (5, " UUID: %s", tmp);
1877 /* Get the Software raid device list */
1878 mr_asprintf(&command, "%s", "cat /proc/mdstat|grep -iv Personal|awk '{if($0~\"^.*[ ]+:\"){printf(\"/dev/%s \", $1)}}END{print \"\"}'");
1879 log_msg (5, " Running: %s", command);
1880 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1881 paranoid_free(command);
1882 log_msg(4, " Software raid device list: %s", mount_list);
1883 /* Loop through the software raid device list to see if we can find the partition */
1884 lastpos = 0;
1885 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1886 mr_asprintf(&command, "mdadm --detail %s 2>/dev/null | grep -c %s", token, tmp);
1887 log_msg(4, " Running: %s", command);
1888 paranoid_free(tmp);
1889 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1890 paranoid_free(command);
1891 if (!atoi(tmp)) {
1892 log_msg (4," Didn't find partition %s in software raid device %s", partitions[i], token);
1893 } else {
1894 if ((DSFptr = find_device_in_list(token)) == NULL) {
1895 log_msg (4, "Can't find device %s in mounted file systems list", token);
1896 paranoid_free(tmp);
1897 mr_free(token);
1898 return (1);
1899 }
1900 DSFptr->check = 1;
1901 break;
1902 }
1903 mr_free(token);
1904 }
1905 paranoid_free(tmp);
1906 paranoid_free(mount_list);
1907 }
1908
1909 /* Determine how much memory to allocate for included_dsf_list and excluded_dsf_list */
1910 i = 0;
1911 DSFptr= DSF_Head;
1912 while (DSFptr != NULL) {
1913 i += strlen(DSFptr->mount_point) + 1;
1914 DSFptr = DSFptr->next;
1915 }
1916 log_msg (5, "i: %d", i);
1917 if ((*included_dsf_list = (char *) calloc(i+100, sizeof(char))) == NULL) {
1918 fatal_error ("Cannot allocate memory");
1919 }
1920 if ((*excluded_dsf_list = (char *) calloc(i+100, sizeof(char))) == NULL) {
1921 fatal_error ("Cannot allocate memory");
1922 }
1923 DSFptr= DSF_Head;
1924 while (DSFptr != NULL) {
1925 if (DSFptr->check) {
1926 log_msg (4, "%s is mounted on %s and is on disk %s\n", DSFptr->device, DSFptr->mount_point, ndsf);
1927 strcat(*included_dsf_list, DSFptr->mount_point);
1928 strcat(*included_dsf_list, " ");
1929 } else {
1930 log_msg (4, "%s is mounted on %s and is NOT on disk %s\n", DSFptr->device, DSFptr->mount_point, ndsf);
1931 strcat(*excluded_dsf_list, DSFptr->mount_point);
1932 strcat(*excluded_dsf_list, " ");
1933 }
1934 DSFptr = DSFptr->next;
1935 }
1936 mr_free(ndsf);
1937
1938 log_msg (5, "included_dsf_list: %s", *included_dsf_list);
1939 log_msg (5, "excluded_dsf_list: %s", *excluded_dsf_list);
1940 return (0);
1941}
1942
1943
1944
1945
1946
1947/* Update the bkpinfo structure for exclude & include paths
1948 * in order to handle correctly paths corresponding to devices */
1949void mr_make_devlist_from_pathlist(char *pathlist, char mode) {
1950
1951char *token = NULL;
1952int lastpos = 0;
1953char *mounted_on_dsf = NULL;
1954char *not_mounted_on_dsf = NULL;
1955char token_chars[] =" \t\r\f\a\0\n";
1956char *tmp = NULL;
1957char *tmp1 = NULL;
1958
1959while ((token = mr_strtok(pathlist, token_chars, &lastpos)) != NULL) {
1960 switch (get_dsf_mount_list(token, &mounted_on_dsf, &not_mounted_on_dsf)) {
1961 case 1:
1962 if (mode == 'E') {
1963 log_msg(1, "WARNING ! %s doesn't exist in -E option", token);
1964 } else {
1965 log_msg(1, "ERROR ! %s doesn't exist in -I option", token);
1966 fatal_error("Error processing -I option");
1967 }
1968 break;
1969 /* Everything is OK; proceed to archive data */
1970 case 0:
1971 if (mode == 'E') {
1972 if (strlen(mounted_on_dsf)) {
1973 log_to_screen("Excluding the following file systems on %s:\n", token);
1974 log_to_screen(" %s\n", mounted_on_dsf);
1975 log_msg (5, "Adding to bkpinfo->exclude_paths due to -E option: %s", mounted_on_dsf);
1976 strcat(bkpinfo->exclude_paths, " ");
1977 strcat(bkpinfo->exclude_paths, mounted_on_dsf);
1978 strcat(bkpinfo->exclude_paths, " ");
1979 mr_strcat(bkpinfo->exclude_devs, " %s ", token);
1980 }
1981 } else {
1982 log_to_screen("Archiving only the following file systems on %s:\n", token);
1983 log_to_screen(" %s\n", mounted_on_dsf);
1984 strcpy(bkpinfo->include_paths, "/");
1985 if (strlen(not_mounted_on_dsf)) {
1986 log_msg (5, "Adding to bkpinfo->exclude_paths due to -I option: %s", not_mounted_on_dsf);
1987 log_to_screen("Not archiving the following file systems:\n");
1988 log_to_screen(" %s\n", not_mounted_on_dsf);
1989 strcat(bkpinfo->exclude_paths, " ");
1990 strcat(bkpinfo->exclude_paths, not_mounted_on_dsf);
1991 strcat(bkpinfo->exclude_paths, "");
1992 }
1993 }
1994 break;
1995 /* It's a dsf but not a whole disk dsf */
1996 case -2:
1997 log_to_screen("Could %s be a partition instead of a whole disk device special file?\nIgnored.", token);
1998 break;
1999 /* A device special file was not passed in. Process it as a path. */
2000 case -1:
2001 /* we need to add a space after token to be sure our strstr test works correctly */
2002 mr_asprintf(&tmp1,"%s ",token);
2003 if (mode == 'E') {
2004 /* Add the token if not already in the list */
2005 mr_asprintf(&tmp,"%s ",bkpinfo->exclude_paths);
2006 if (strstr(tmp,tmp1) == NULL) {
2007 strcat(bkpinfo->exclude_paths, " ");
2008 strcat(bkpinfo->exclude_paths, tmp1);
2009 }
2010 } else {
2011 /* Add the token if not already in the list */
2012 mr_asprintf(&tmp,"%s ",bkpinfo->include_paths);
2013 if (strstr(tmp,tmp1) == NULL) {
2014 strcat(bkpinfo->include_paths, " ");
2015 strcat(bkpinfo->include_paths, tmp1);
2016 }
2017 }
2018 mr_free(tmp);
2019 mr_free(tmp1);
2020 break;
2021 }
2022 mr_free(token);
2023
2024 if (bkpinfo->include_paths != NULL) {
2025 log_msg(1, "include_paths is now '%s'", bkpinfo->include_paths);
2026 }
2027 if (bkpinfo->exclude_paths != NULL) {
2028 log_msg(1, "exclude_paths is now '%s'", bkpinfo->exclude_paths);
2029 }
2030 if (bkpinfo->exclude_devs != NULL) {
2031 log_msg(1, "exclude_devs is now '%s'", bkpinfo->exclude_devs);
2032 }
2033}
2034}
2035
2036
2037
2038
2039/**
2040 * Ask user for details of backup/restore information.
2041 * Called when @c mondoarchive doesn't get any parameters.
2042 * @param bkpinfo The backup information structure to fill out with the user's data.
2043 * @param archiving_to_media TRUE if archiving, FALSE if restoring.
2044 * @return 0, always.
2045 * @bug No point of `int' return value.
2046 * @ingroup archiveGroup
2047 */
2048int interactively_obtain_media_parameters_from_user(bool archiving_to_media)
2049// archiving_to_media is TRUE if I'm being called by mondoarchive
2050// archiving_to_media is FALSE if I'm being called by mondorestore
2051{
2052 char *tmp = NULL;
2053 char *tmp1 = NULL;
2054 char *mds = NULL;
2055 char *sz_size;
2056 char *command;
2057 char *comment;
2058 char *prompt;
2059 int i;
2060 FILE *fin;
2061
2062 malloc_string(sz_size);
2063 malloc_string(command);
2064 malloc_string(comment);
2065 malloc_string(prompt);
2066 malloc_string(tmp1);
2067 assert(bkpinfo != NULL);
2068 sz_size[0] = '\0';
2069 bkpinfo->nonbootable_backup = FALSE;
2070
2071 // Tape, CD, NETFS, ...?
2072 srandom(getpid());
2073 bkpinfo->backup_media_type =
2074 (g_restoring_live_from_cd) ? cdr :
2075 which_backup_media_type(bkpinfo->restore_data);
2076 if (bkpinfo->backup_media_type == none) {
2077 log_to_screen("User has chosen not to backup the PC");
2078 finish(1);
2079 }
2080 /* Why asking to remove the media with tape ?
2081 if (bkpinfo->backup_media_type == tape && bkpinfo->restore_data) {
2082 popup_and_OK("Please remove media from drive(s)");
2083 }
2084 */
2085 log_msg(3, "media type = %s",
2086 bkptype_to_string(bkpinfo->backup_media_type));
2087 if (archiving_to_media) {
2088 sensibly_set_tmpdir_and_scratchdir();
2089 }
2090 bkpinfo->cdrw_speed = (bkpinfo->backup_media_type == cdstream) ? 2 : 4;
2091 bkpinfo->compression_level =
2092 (bkpinfo->backup_media_type == cdstream) ? 1 : 5;
2093 bkpinfo->use_lzo =
2094 (bkpinfo->backup_media_type == cdstream) ? TRUE : FALSE;
2095 mvaddstr_and_log_it(2, 0, " ");
2096
2097 // Find device's /dev (or SCSI) entry
2098 switch (bkpinfo->backup_media_type) {
2099 case cdr:
2100 case cdrw:
2101 case dvd:
2102 case usb:
2103 /* Never try to eject a USB device */
2104 if (bkpinfo->backup_media_type == usb) {
2105 bkpinfo->please_dont_eject = TRUE;
2106 }
2107 if (archiving_to_media) {
2108 if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
2109 if (ask_me_yes_or_no
2110 ("Is your computer a laptop, or does the CD writer incorporate BurnProof technology?"))
2111 {
2112 bkpinfo->manual_cd_tray = TRUE;
2113 }
2114 }
2115 if ((bkpinfo->compression_level =
2116 which_compression_level()) == -1) {
2117 log_to_screen("User has chosen not to backup the PC");
2118 finish(1);
2119 }
2120 mds = media_descriptor_string(bkpinfo->backup_media_type);
2121 sprintf(comment, "What speed is your %s (re)writer?", mds);
2122 if (bkpinfo->backup_media_type == dvd) {
2123 find_dvd_device(bkpinfo->media_device, FALSE);
2124 strcpy(tmp1, "1");
2125 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
2126 log_msg(1, "Setting to DVD defaults");
2127 } else {
2128 strcpy(bkpinfo->media_device, VANILLA_SCSI_CDROM);
2129 strcpy(tmp1, "4");
2130 strcpy(sz_size, "650");
2131 log_msg(1, "Setting to CD defaults");
2132 }
2133 if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
2134 if (!popup_and_get_string("Speed", comment, tmp1, 4)) {
2135 log_to_screen("User has chosen not to backup the PC");
2136 finish(1);
2137 }
2138 }
2139 bkpinfo->cdrw_speed = atoi(tmp1); // if DVD then this shouldn't ever be used anyway :)
2140
2141 sprintf(comment,
2142 "How much data (in Megabytes) will each %s store?", mds);
2143 mr_free(mds);
2144 if (!popup_and_get_string("Size", comment, sz_size, 5)) {
2145 log_to_screen("User has chosen not to backup the PC");
2146 finish(1);
2147 }
2148 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2149 bkpinfo->media_size[i] = atoi(sz_size);
2150 }
2151 if (bkpinfo->media_size[0] <= 0) {
2152 log_to_screen("User has chosen not to backup the PC");
2153 finish(1);
2154 }
2155 }
2156 /* No break because we continue even for usb */
2157 case cdstream:
2158 mds = media_descriptor_string(bkpinfo->backup_media_type);
2159
2160 if ((bkpinfo->disaster_recovery) && (bkpinfo->backup_media_type != usb)) {
2161 strcpy(bkpinfo->media_device, "/dev/cdrom");
2162 log_msg(2, "CD-ROM device assumed to be at %s",
2163 bkpinfo->media_device);
2164 } else if ((bkpinfo->restore_data && (bkpinfo->backup_media_type != usb))
2165 || bkpinfo->backup_media_type == dvd) {
2166 if (!bkpinfo->media_device[0]) {
2167 strcpy(bkpinfo->media_device, "/dev/cdrom");
2168 } // just for the heck of it :)
2169 log_msg(1, "bkpinfo->media_device = %s",
2170 bkpinfo->media_device);
2171 if (bkpinfo->backup_media_type == dvd
2172 || find_cdrom_device(bkpinfo->media_device, FALSE)) {
2173 log_msg(1, "bkpinfo->media_device = %s",
2174 bkpinfo->media_device);
2175 sprintf(comment,
2176 "Please specify your %s drive's /dev entry", mds);
2177 if (!popup_and_get_string
2178 ("Device?", comment, bkpinfo->media_device,
2179 MAX_STR_LEN / 4)) {
2180 log_to_screen("User has chosen not to backup the PC");
2181 finish(1);
2182 }
2183 }
2184 log_msg(2, "%s device found at %s", mds, bkpinfo->media_device);
2185 } else {
2186 if ((find_cdrw_device(bkpinfo->media_device)) && (bkpinfo->backup_media_type != usb)) {
2187 bkpinfo->media_device[0] = '\0';
2188 }
2189 if (bkpinfo->media_device[0]) {
2190 if (bkpinfo->backup_media_type == usb) {
2191 mr_asprintf(&tmp, "I think your %s media corresponds to %s. Is this correct?", mds, bkpinfo->media_device);
2192 } else {
2193 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);
2194 }
2195 if (!ask_me_yes_or_no(tmp)) {
2196 bkpinfo->media_device[0] = '\0';
2197 }
2198 mr_free(tmp);
2199 }
2200 if (!bkpinfo->media_device[0]) {
2201 if (bkpinfo->backup_media_type == usb) {
2202 i = popup_and_get_string("/dev entry?",
2203 "What is the /dev entry of your USB Disk/Key, please?",
2204 bkpinfo->media_device,
2205 MAX_STR_LEN / 4);
2206 } else {
2207 if (g_kernel_version < 2.6) {
2208 i = popup_and_get_string("Device node?",
2209 "What is the SCSI node of your CD (re)writer, please?",
2210 bkpinfo->media_device,
2211 MAX_STR_LEN / 4);
2212 } else {
2213 i = popup_and_get_string("/dev entry?",
2214 "What is the /dev entry of your CD (re)writer, please?",
2215 bkpinfo->media_device,
2216 MAX_STR_LEN / 4);
2217 }
2218 }
2219 if (!i) {
2220 log_to_screen("User has chosen not to backup the PC");
2221 finish(1);
2222 }
2223 }
2224 }
2225 mr_free(mds);
2226
2227 if (bkpinfo->backup_media_type == cdstream) {
2228 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2229 bkpinfo->media_size[i] = 650;
2230 }
2231 }
2232 break;
2233 case udev:
2234 if (!ask_me_yes_or_no
2235 ("This option is for advanced users only. Are you sure?")) {
2236 log_to_screen("User has chosen not to backup the PC");
2237 finish(1);
2238 }
2239 case tape:
2240
2241 if ((!bkpinfo->restore_mode) && (find_tape_device_and_size(bkpinfo->media_device, sz_size))) {
2242 log_msg(3, "Ok, using vanilla scsi tape.");
2243 strcpy(bkpinfo->media_device, VANILLA_SCSI_TAPE);
2244 if ((fin = fopen(bkpinfo->media_device, "r"))) {
2245 paranoid_fclose(fin);
2246 } else {
2247 strcpy(bkpinfo->media_device, "/dev/osst0");
2248 }
2249 }
2250 if (bkpinfo->media_device[0]) {
2251 if ((fin = fopen(bkpinfo->media_device, "r"))) {
2252 paranoid_fclose(fin);
2253 } else {
2254 if (does_file_exist("/tmp/mondo-restore.cfg")) {
2255 read_cfg_var("/tmp/mondo-restore.cfg", "media-dev",
2256 bkpinfo->media_device);
2257 }
2258 }
2259 }
2260 if (bkpinfo->media_device[0]) {
2261 mr_asprintf(&tmp, "I think I've found your tape streamer at %s; am I right on the money?", bkpinfo->media_device);
2262 if (!ask_me_yes_or_no(tmp)) {
2263 bkpinfo->media_device[0] = '\0';
2264 }
2265 mr_free(tmp);
2266 }
2267 if (!bkpinfo->media_device[0]) {
2268 if (!popup_and_get_string
2269 ("Device name?",
2270 "What is the /dev entry of your tape streamer?",
2271 bkpinfo->media_device, MAX_STR_LEN / 4)) {
2272 log_to_screen("User has chosen not to backup the PC");
2273 finish(1);
2274 }
2275 }
2276 mr_asprintf(&tmp, "ls -l %s", bkpinfo->media_device);
2277 if (run_program_and_log_output(tmp, FALSE)) {
2278 log_to_screen("User has not specified a valid /dev entry");
2279 finish(1);
2280 }
2281 mr_free(tmp);
2282 log_msg(4, "sz_size = %s", sz_size);
2283 sz_size[0] = '\0';
2284
2285 bkpinfo->use_obdr = ask_me_yes_or_no
2286 ("Do you want to activate OBDR support for your tapes ?");
2287 if (sz_size[0] == '\0') {
2288 bkpinfo->media_size[0] = 0;
2289 } else {
2290 bkpinfo->media_size[0] =
2291 friendly_sizestr_to_sizelong(sz_size) / 2 - 50;
2292 }
2293 log_msg(4, "media_size[0] = %ld", bkpinfo->media_size[0]);
2294 if (bkpinfo->media_size[0] <= 0) {
2295 bkpinfo->media_size[0] = 0;
2296 }
2297 for (i = 1; i <= MAX_NOOF_MEDIA; i++) {
2298 bkpinfo->media_size[i] = bkpinfo->media_size[0];
2299 }
2300 if (archiving_to_media) {
2301 if ((bkpinfo->compression_level =
2302 which_compression_level()) == -1) {
2303 log_to_screen("User has chosen not to backup the PC");
2304 finish(1);
2305 }
2306 }
2307 break;
2308
2309
2310
2311 case netfs:
2312 /* Never try to eject a NETFS device */
2313 bkpinfo->please_dont_eject = TRUE;
2314
2315 /* Initiate bkpinfo netfs_mount path from running environment if not already done */
2316 if (!bkpinfo->netfs_mount[0]) {
2317 strcpy(bkpinfo->netfs_mount,
2318 call_program_and_get_last_line_of_output
2319 ("mount | grep \":\" | cut -d' ' -f1 | head -n1"));
2320 }
2321#ifdef __FreeBSD__
2322 if (TRUE)
2323#else
2324 if (!bkpinfo->disaster_recovery)
2325#endif
2326 {
2327 if (!popup_and_get_string
2328 ("Network shared dir.",
2329 "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.)",
2330 bkpinfo->netfs_mount, MAX_STR_LEN / 4)) {
2331 log_to_screen("User has chosen not to backup the PC");
2332 finish(1);
2333 }
2334 if (!bkpinfo->restore_data) {
2335 if ((bkpinfo->compression_level =
2336 which_compression_level()) == -1) {
2337 log_to_screen("User has chosen not to backup the PC");
2338 finish(1);
2339 }
2340 }
2341 // check whether already mounted - we better remove
2342 // surrounding spaces and trailing '/' for this
2343 strip_spaces(bkpinfo->netfs_mount);
2344 if (bkpinfo->netfs_mount[strlen(bkpinfo->netfs_mount) - 1] == '/')
2345 bkpinfo->netfs_mount[strlen(bkpinfo->netfs_mount) - 1] = '\0';
2346 sprintf(command, "mount | grep \"%s \" | cut -d' ' -f3",
2347 bkpinfo->netfs_mount);
2348 strcpy(bkpinfo->isodir,
2349 call_program_and_get_last_line_of_output(command));
2350
2351 if (!bkpinfo->restore_data) {
2352 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
2353 sprintf(comment,
2354 "How much data (in Megabytes) will each media store?");
2355 if (!popup_and_get_string("Size", comment, sz_size, 5)) {
2356 log_to_screen("User has chosen not to backup the PC");
2357 finish(1);
2358 }
2359 } else {
2360 strcpy(sz_size, "0");
2361 }
2362 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2363 bkpinfo->media_size[i] = atoi(sz_size);
2364 }
2365 if (bkpinfo->media_size[0] < 0) {
2366 log_to_screen("User has chosen not to backup the PC");
2367 finish(1);
2368 }
2369 }
2370 if (bkpinfo->disaster_recovery) {
2371 sprintf(command ,"umount %s/isodir 2> /dev/null", bkpinfo->tmpdir);
2372 (void)system(command);
2373 strcpy(tmp1, bkpinfo->netfs_proto);
2374 if (!popup_and_get_string
2375 ("Network protocol", "Which protocol should I use?",
2376 tmp1, MAX_STR_LEN)) {
2377 log_to_screen("User has chosen not to backup the PC");
2378 finish(1);
2379 }
2380 mr_free(bkpinfo->netfs_proto);
2381 mr_asprintf(&(bkpinfo->netfs_proto), "%s", tmp1);
2382 if (!popup_and_get_string
2383 ("Network share", "Which remote share should I mount?",
2384 bkpinfo->netfs_mount, MAX_STR_LEN)) {
2385 log_to_screen("User has chosen not to backup the PC");
2386 finish(1);
2387 }
2388 }
2389 /* Initiate bkpinfo isodir path from running environment if mount already done */
2390 if (is_this_device_mounted(bkpinfo->netfs_mount)) {
2391 strcpy(bkpinfo->isodir,
2392 call_program_and_get_last_line_of_output
2393 ("mount | grep \":\" | cut -d' ' -f3 | head -n1"));
2394 } else {
2395 sprintf(bkpinfo->isodir, "%s/netfsdir", bkpinfo->tmpdir);
2396 sprintf(command, "mkdir -p %s", bkpinfo->isodir);
2397 run_program_and_log_output(command, 5);
2398 if (bkpinfo->restore_data) {
2399 if (strstr(bkpinfo->netfs_proto, "sshfs")) {
2400 mr_asprintf(&tmp, "sshfs -o ro %s %s", bkpinfo->netfs_mount, bkpinfo->isodir);
2401 } else {
2402 mr_asprintf(&tmp, "mount -t %s -o nolock,ro %s %s", bkpinfo->netfs_proto, bkpinfo->netfs_mount, bkpinfo->isodir);
2403 }
2404 } else {
2405 if (strstr(bkpinfo->netfs_proto, "sshfs")) {
2406 mr_asprintf(&tmp, "sshfs %s %s", bkpinfo->netfs_mount, bkpinfo->isodir);
2407 } else {
2408 mr_asprintf(&tmp, "mount -t %s -o nolock %s %s", bkpinfo->netfs_proto, bkpinfo->netfs_mount, bkpinfo->isodir);
2409 }
2410 }
2411 run_program_and_log_output(tmp, 3);
2412 mr_free(tmp);
2413
2414 malloc_string(g_selfmounted_isodir);
2415 strcpy(g_selfmounted_isodir, bkpinfo->isodir);
2416 }
2417 if (!is_this_device_mounted(bkpinfo->netfs_mount)) {
2418 popup_and_OK
2419 ("Please mount that partition before you try to backup to or restore from it.");
2420 finish(1);
2421 }
2422 strcpy(tmp1, bkpinfo->netfs_remote_dir);
2423 if (!popup_and_get_string
2424 ("Directory", "Which directory within that mountpoint?", tmp1,
2425 MAX_STR_LEN)) {
2426 log_to_screen("User has chosen not to backup the PC");
2427 finish(1);
2428 }
2429 strcpy(bkpinfo->netfs_remote_dir, tmp1);
2430
2431 // check whether writable - we better remove surrounding spaces for this
2432 strip_spaces(bkpinfo->netfs_remote_dir);
2433
2434 if (!popup_and_get_string
2435 ("Prefix.",
2436 "Please enter the prefix that will be prepended to your ISO filename. Example: machine1 to obtain machine1-[1-9]*.iso files",
2437 bkpinfo->prefix, MAX_STR_LEN / 4)) {
2438 log_to_screen("User has chosen not to backup the PC");
2439 finish(1);
2440 }
2441 log_msg(3, "prefix set to %s", bkpinfo->prefix);
2442
2443 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2444 bkpinfo->media_size[i] = 650;
2445 }
2446 log_msg(3, "Just set netfs_remote_dir to %s",
2447 bkpinfo->netfs_remote_dir);
2448 log_msg(3, "isodir is still %s", bkpinfo->isodir);
2449 break;
2450
2451 case iso:
2452 if (!bkpinfo->disaster_recovery) {
2453 if (!popup_and_get_string
2454 ("Storage dir.",
2455 "Please enter the full path name to the directory for your ISO images. Example: /mnt/raid0_0",
2456 bkpinfo->isodir, MAX_STR_LEN / 4)) {
2457 log_to_screen("User has chosen not to backup the PC");
2458 finish(1);
2459 }
2460 if (archiving_to_media) {
2461 if ((bkpinfo->compression_level =
2462 which_compression_level()) == -1) {
2463 log_to_screen("User has chosen not to backup the PC");
2464 finish(1);
2465 }
2466 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
2467 if (!popup_and_get_string
2468 ("ISO size.",
2469 "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 (700) or DVD's (4480) you plan to backup to.",
2470 sz_size, 16)) {
2471 log_to_screen("User has chosen not to backup the PC");
2472 finish(1);
2473 }
2474 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2475 bkpinfo->media_size[i] = atoi(sz_size);
2476 }
2477 } else {
2478 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2479 bkpinfo->media_size[i] = 650;
2480 }
2481 }
2482 }
2483 if (!popup_and_get_string
2484 ("Prefix.",
2485 "Please enter the prefix that will be prepended to your ISO filename. Example: machine1 to obtain machine1-[1-9]*.iso files",
2486 bkpinfo->prefix, MAX_STR_LEN / 4)) {
2487 log_to_screen("User has chosen not to backup the PC");
2488 finish(1);
2489 }
2490 log_msg(3, "prefix set to %s", bkpinfo->prefix);
2491 break;
2492 default:
2493 fatal_error
2494 ("I, Mojo Jojo, shall defeat those pesky Powerpuff Girls!");
2495 }
2496
2497 if (archiving_to_media) {
2498
2499#ifdef __FreeBSD__
2500 strcpy(bkpinfo->boot_device,
2501 call_program_and_get_last_line_of_output
2502 ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/\\([0-9]\\).*/\\1/'"));
2503#else
2504 strcpy(bkpinfo->boot_device,
2505 call_program_and_get_last_line_of_output
2506 ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/[0-9].*//'"));
2507#endif
2508 i = which_boot_loader(bkpinfo->boot_device);
2509 if (i == 'U') // unknown
2510 {
2511
2512#ifdef __FreeBSD__
2513 if (!popup_and_get_string
2514 ("Boot device",
2515 "What is your boot device? (e.g. /dev/ad0)",
2516 bkpinfo->boot_device, MAX_STR_LEN / 4)) {
2517 log_to_screen("User has chosen not to backup the PC");
2518 finish(1);
2519 }
2520 i = which_boot_loader(bkpinfo->boot_device);
2521#else
2522 if (!popup_and_get_string
2523 ("Boot device",
2524 "What is your boot device? (e.g. /dev/hda)",
2525 bkpinfo->boot_device, MAX_STR_LEN / 4)) {
2526 log_to_screen("User has chosen not to backup the PC");
2527 finish(1);
2528 }
2529 if (does_string_exist_in_boot_block
2530 (bkpinfo->boot_device, "LILO")) {
2531 i = 'L';
2532 } else
2533 if (does_string_exist_in_boot_block
2534 (bkpinfo->boot_device, "ELILO")) {
2535 i = 'E';
2536 } else
2537 if (does_string_exist_in_boot_block
2538 (bkpinfo->boot_device, "GRUB")) {
2539 i = 'G';
2540 } else {
2541 i = 'U';
2542 }
2543#endif
2544 if (i == 'U') {
2545 if (ask_me_yes_or_no
2546 ("Unidentified boot loader. Shall I restore it byte-for-byte at restore time and hope for the best?"))
2547 {
2548 i = 'R'; // raw
2549 } else {
2550 log_to_screen
2551 ("I cannot find your boot loader. Please run mondoarchive with parameters.");
2552 finish(1);
2553 }
2554 }
2555 }
2556 bkpinfo->boot_loader = i;
2557 strcpy(bkpinfo->include_paths, "/");
2558 if (!popup_and_get_string
2559 ("Backup paths",
2560 "Please enter paths which you want me to backup. The default is '/' (i.e. everything).",
2561 bkpinfo->include_paths, MAX_STR_LEN)) {
2562 log_to_screen("User has chosen not to backup the PC");
2563 finish(1);
2564 }
2565 mr_asprintf(&tmp, "%s", list_of_NETFS_mounts_only());
2566 if (strlen(tmp) > 2) {
2567 if (bkpinfo->exclude_paths[0]) {
2568 strcat(bkpinfo->exclude_paths, " ");
2569 }
2570 strncpy(bkpinfo->exclude_paths, tmp, MAX_STR_LEN);
2571 }
2572 mr_free(tmp);
2573// NTFS
2574 strcpy(tmp1, call_program_and_get_last_line_of_output("parted2fdisk -l | grep -i ntfs | awk '{ print $1};' | tr -s '\\n' ' ' | awk '{ print $0};'"));
2575 if (strlen(tmp1) > 2) {
2576 if (!popup_and_get_string
2577 ("NTFS partitions",
2578 "Please enter/confirm the NTFS partitions you wish to backup as well.",
2579 tmp1, MAX_STR_LEN / 4)) {
2580 log_to_screen("User has chosen not to backup the PC");
2581 finish(1);
2582 }
2583 strncpy(bkpinfo->image_devs, tmp1, MAX_STR_LEN / 4);
2584 }
2585
2586
2587 if (!popup_and_get_string
2588 ("Exclude paths",
2589 "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.",
2590 bkpinfo->exclude_paths, (4*MAX_STR_LEN)-1)) {
2591 log_to_screen("User has chosen not to backup the PC");
2592 finish(1);
2593 }
2594 /* Always needs to be finished by a space */
2595 if (bkpinfo->exclude_paths[0]) {
2596 strcat(bkpinfo->exclude_paths, " ");
2597 }
2598 if (!popup_and_get_string
2599 ("Temporary directory",
2600 "Please enter your temporary directory.",
2601 bkpinfo->tmpdir, (4*MAX_STR_LEN)-1)) {
2602 log_to_screen("User has chosen not to backup the PC");
2603 finish(1);
2604 }
2605 if (!popup_and_get_string
2606 ("Scratch directory",
2607 "Please enter your scratch directory.",
2608 bkpinfo->scratchdir, (4*MAX_STR_LEN)-1)) {
2609 log_to_screen("User has chosen not to backup the PC");
2610 finish(1);
2611 }
2612// Interactive mode:
2613#ifdef __IA64__
2614 bkpinfo->make_cd_use_lilo = TRUE;
2615#else
2616 bkpinfo->make_cd_use_lilo = FALSE;
2617#endif
2618 bkpinfo->backup_data = TRUE;
2619 bkpinfo->verify_data =
2620 ask_me_yes_or_no
2621 ("Will you want to verify your backups after Mondo has created them?");
2622
2623#ifndef __FreeBSD__
2624 if (!ask_me_yes_or_no
2625 ("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."))
2626#endif
2627 {
2628 strcpy(bkpinfo->kernel_path, "FAILSAFE");
2629 }
2630
2631 if (!ask_me_yes_or_no
2632 ("Are you sure you want to proceed? Hit 'no' to abort.")) {
2633 log_to_screen("User has chosen not to backup the PC");
2634 finish(1);
2635 }
2636 } else {
2637 bkpinfo->restore_data = TRUE; // probably...
2638 }
2639
2640 if (bkpinfo->backup_media_type == iso
2641 || bkpinfo->backup_media_type == netfs) {
2642 g_ISO_restore_mode = TRUE;
2643 }
2644#ifdef __FreeSD__
2645// skip
2646#else
2647 if (bkpinfo->backup_media_type == netfs) {
2648 log_msg(3, "I think the Remote mount is mounted at %s",
2649 bkpinfo->isodir);
2650 }
2651 log_it("isodir = %s", bkpinfo->isodir);
2652 log_it("netfs_mount = '%s'", bkpinfo->netfs_mount);
2653 log_it("netfs_proto = '%s'", bkpinfo->netfs_proto);
2654 if (bkpinfo->netfs_user) {
2655 log_it("netfs_user = '%s'", bkpinfo->netfs_user);
2656 }
2657#endif
2658
2659 log_it("media device = %s", bkpinfo->media_device);
2660 log_it("media size = %ld", bkpinfo->media_size[1]);
2661 log_it("media type = %s",
2662 bkptype_to_string(bkpinfo->backup_media_type));
2663 log_it("prefix = %s", bkpinfo->prefix);
2664 log_it("compression = %ld", bkpinfo->compression_level);
2665 log_it("exclude_path = %s", bkpinfo->exclude_paths);
2666 log_it("include_path = %s", bkpinfo->include_paths);
2667
2668 /* Handle devices passed in bkpinfo and print result */
2669 /* the mr_make_devlist_from_pathlist function appends
2670 * to the *_paths variables so copy before */
2671 mr_asprintf(&tmp, "%s ", bkpinfo->exclude_paths);
2672 mr_make_devlist_from_pathlist(tmp, 'E');
2673 mr_free(tmp);
2674 mr_asprintf(&tmp, "%s ", bkpinfo->include_paths);
2675 mr_make_devlist_from_pathlist(tmp, 'I');
2676 mr_free(tmp);
2677
2678 log_it("scratchdir = '%s'", bkpinfo->scratchdir);
2679 log_it("tmpdir = '%s'", bkpinfo->tmpdir);
2680 log_it("image_devs = '%s'", bkpinfo->image_devs);
2681 log_it("boot_device = '%s' (loader=%c)", bkpinfo->boot_device,
2682 bkpinfo->boot_loader);
2683 if (bkpinfo->media_size[0] < 0) {
2684 if (archiving_to_media) {
2685 fatal_error("Media size is less than zero.");
2686 } else {
2687 log_msg(2, "Warning - media size is less than zero.");
2688 bkpinfo->media_size[0] = 0;
2689 }
2690 }
2691 paranoid_free(sz_size);
2692 paranoid_free(tmp1);
2693 paranoid_free(command);
2694 paranoid_free(comment);
2695 paranoid_free(prompt);
2696 return (0);
2697}
2698
2699
2700
2701
2702/**
2703 * @addtogroup utilityGroup
2704 * @{
2705 */
2706/**
2707 * Get a space-separated list of NETFS devices and mounts.
2708 * @return The list created.
2709 * @note The return value points to static data that will be overwritten with each call.
2710 */
2711char *list_of_NETFS_devices_and_mounts(void)
2712{
2713 char *exclude_these_devices = NULL;
2714 char *exclude_these_directories = NULL;
2715 static char result_sz[1024];
2716
2717 mr_asprintf(&exclude_these_directories,"%s",list_of_NETFS_mounts_only());
2718 mr_asprintf(&exclude_these_devices,"%s", call_program_and_get_last_line_of_output("tr -s '\t' ' ' < /etc/fstab | grep -E '( (coda|ncpfs|sshfs|nfs|nfs4|smbfs|cifs|afs|gfs|ocfs|ocfs2|mvfs|nsspool|nsvol) )' | cut -d' ' -f1 | tr -s '\n' ' ' | awk '{print $0;}'"));
2719 snprintf(result_sz, 1023, "%s %s", exclude_these_directories, exclude_these_devices);
2720 mr_free(exclude_these_devices);
2721 mr_free(exclude_these_directories);
2722 return (result_sz);
2723}
2724
2725
2726
2727
2728/**
2729 * Get a space-separated list of NETFS mounts.
2730 * @return The list created.
2731 * @note The return value points to static data that will be overwritten with each call.
2732 * @bug Even though we only want the mounts, the devices are still checked.
2733 */
2734char *list_of_NETFS_mounts_only(void)
2735{
2736 char *exclude_these_directories = NULL;
2737 static char result_sz[512];
2738
2739 mr_asprintf(&exclude_these_directories,"%s", call_program_and_get_last_line_of_output("mount -t coda,ncpfs,fuse.sshfs,nfs,nfs4,smbfs,cifs,afs,gfs,ocfs,ocfs2,mvfs,nsspool,nssvol | tr -s '\t' ' ' | cut -d' ' -f3 | tr -s '\n' ' ' | awk '{print $0;}'"));
2740 snprintf(result_sz, 511, "%s", exclude_these_directories);
2741 mr_free(exclude_these_directories);
2742 return (result_sz);
2743}
2744
2745/* @} - end of utilityGroup */
2746
2747
2748
2749
2750
2751/**
2752 * Create a randomly-named FIFO. The format is @p stub "." [random] [random] where
2753 * [random] is a random number between 1 and 32767.
2754 * @param store_name_here Where to store the new filename.
2755 * @param stub A random number will be appended to this to make the FIFO's name.
2756 * @ingroup deviceGroup
2757 */
2758void make_fifo(char *store_name_here, char *stub)
2759{
2760 char *tmp;
2761
2762 malloc_string(tmp);
2763 assert_string_is_neither_NULL_nor_zerolength(stub);
2764
2765 sprintf(store_name_here, "%s%d%d", stub, (int) (random() % 32768),
2766 (int) (random() % 32768));
2767 make_hole_for_file(store_name_here);
2768 mkfifo(store_name_here, S_IRWXU | S_IRWXG);
2769 sprintf(tmp, "chmod 770 %s", store_name_here);
2770 paranoid_system(tmp);
2771 paranoid_free(tmp);
2772}
2773
2774
2775
2776
2777
2778
2779/**
2780 * Set the tmpdir and scratchdir to reside on the partition with the most free space.
2781 * Automatically excludes DOS, NTFS, SMB, and NFS filesystems.
2782 * @param bkpinfo The backup information structure. @c bkpinfo->tmpdir and @c bkpinfo->scratchdir will be set.
2783 * @ingroup utilityGroup
2784 */
2785void sensibly_set_tmpdir_and_scratchdir()
2786{
2787 char *tmp = NULL;
2788 char *command = NULL;
2789 char *sz = NULL;
2790
2791 assert(bkpinfo != NULL);
2792
2793#ifdef __FreeBSD__
2794 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 -nr | awk '{print $NF;}' | while read x ; do test -w $x && echo $x && break ; done"));
2795#else
2796 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output("LANGUAGE=C df -m -P -x nfs -x nfs4 -x fuse.sshfs -x fuse -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 -nr | awk '{print $NF;}' | while read x ; do test -w $x && echo $x && break ; done"));
2797#endif
2798
2799 if (tmp[0] != '/') {
2800 mr_asprintf(&sz, "%s", tmp);
2801 paranoid_free(tmp);
2802 mr_asprintf(&tmp, "/%s", sz);
2803 mr_free(sz);
2804 }
2805 if (!tmp[0]) {
2806 fatal_error("I couldn't figure out the tempdir!");
2807 }
2808 setup_tmpdir(tmp);
2809 log_it("bkpinfo->tmpdir is being set to %s", bkpinfo->tmpdir);
2810
2811 sprintf(bkpinfo->scratchdir, "%s/mondo.scratch.%d", tmp,
2812 (int) (random() % 32768));
2813 log_it("bkpinfo->scratchdir is being set to %s", bkpinfo->scratchdir);
2814
2815 mr_asprintf(&command, "rm -Rf %s/tmp.mondo.* %s/mondo.scratch.*", tmp, tmp);
2816 paranoid_free(tmp);
2817
2818 paranoid_system(command);
2819 mr_free(command);
2820}
2821
2822
2823
2824
2825
2826
2827/**
2828 * @addtogroup deviceGroup
2829 * @{
2830 */
2831/**
2832 * If we can read @p dev, set @p output to it.
2833 * If @p dev cannot be read, set @p output to "".
2834 * @param dev The device to check for.
2835 * @param output Set to @p dev if @p dev exists, "" otherwise.
2836 * @return TRUE if @p dev exists, FALSE if it doesn't.
2837 */
2838bool set_dev_to_this_if_rx_OK(char *output, char *dev)
2839{
2840 char *command;
2841
2842 malloc_string(command);
2843 if (!dev || dev[0] == '\0') {
2844 output[0] = '\0';
2845 return (FALSE);
2846 }
2847// assert_string_is_neither_NULL_nor_zerolength(dev);
2848 log_msg(10, "Injecting %s", dev);
2849 inject_device(dev);
2850 if (!does_file_exist(dev)) {
2851 log_msg(10, "%s doesn't exist. Returning FALSE.", dev);
2852 return (FALSE);
2853 }
2854 sprintf(command, "dd bs=%ld count=1 if=%s of=/dev/null &> /dev/null",
2855 512L, dev);
2856 if (!run_program_and_log_output(command, FALSE)
2857 && !run_program_and_log_output(command, FALSE)) {
2858 strcpy(output, dev);
2859 log_msg(4, "Found it - %s", dev);
2860 return (TRUE);
2861 } else {
2862 output[0] = '\0';
2863 log_msg(4, "It's not %s", dev);
2864 return (FALSE);
2865 }
2866}
2867
2868
2869
2870
2871
2872/**
2873 * Find out what number CD is in the drive.
2874 * @param bkpinfo The backup information structure. The @c bkpinfo->media_device field is the only one used.
2875 * @return The current CD number, or -1 if it could not be found.
2876 * @note If the CD is not mounted, it will be mounted
2877 * (and remain mounted after this function returns).
2878 */
2879int what_number_cd_is_this()
2880{
2881 int cd_number = -1;
2882 char *mountdev = NULL;
2883 char *tmp = NULL;
2884
2885 assert(bkpinfo != NULL);
2886// log_it("Asking what_number_cd_is_this");
2887 if (g_ISO_restore_mode) {
2888 mr_asprintf(&tmp, "mount | grep iso9660 | awk '{print $3;}'");
2889
2890 mr_asprintf(&mountdev, "%s%s", call_program_and_get_last_line_of_output(tmp), "/archives/THIS-CD-NUMBER");
2891 cd_number = atoi(last_line_of_file(mountdev));
2892 paranoid_free(mountdev);
2893 paranoid_free(tmp);
2894
2895 return (cd_number);
2896 }
2897
2898 mr_asprintf(&mountdev, "%s", bkpinfo->media_device);
2899 if (!mountdev[0]) {
2900 log_it
2901 ("(what_number_cd_is_this) Warning - media_device unknown. Finding out...");
2902 find_cdrom_device(bkpinfo->media_device, FALSE);
2903 }
2904 if (!is_this_device_mounted(MNT_CDROM)) {
2905 if (bkpinfo->backup_media_type == usb) {
2906 mount_USB_here(mountdev, MNT_CDROM);
2907 } else {
2908 mount_CDROM_here(mountdev, MNT_CDROM);
2909 }
2910 }
2911 paranoid_free(mountdev);
2912
2913 cd_number = atoi(last_line_of_file(MNT_CDROM "/archives/THIS-CD-NUMBER"));
2914 return (cd_number);
2915}
2916
2917
2918
2919
2920
2921
2922
2923/**
2924 * Find out what device is mounted as root (/).
2925 * @return Root device.
2926 * @note The returned string points to static storage and will be overwritten with every call.
2927 * @bug A bit of a misnomer; it's actually finding out the root device.
2928 * The mountpoint (where it's mounted) will obviously be '/'.
2929 */
2930char *where_is_root_mounted()
2931{
2932 /*@ buffers **************** */
2933 static char tmp[MAX_STR_LEN];
2934
2935
2936#ifdef __FreeBSD__
2937 strcpy(tmp, call_program_and_get_last_line_of_output
2938 ("mount | grep \" on / \" | cut -d' ' -f1"));
2939#else
2940 strcpy(tmp, call_program_and_get_last_line_of_output
2941 ("mount | grep \" on / \" | cut -d' ' -f1 | sed s/[0-9]// | sed s/[0-9]//"));
2942 if (strstr(tmp, "/dev/cciss/")) {
2943 strcpy(tmp, call_program_and_get_last_line_of_output
2944 ("mount | grep \" on / \" | cut -d' ' -f1 | cut -dp -f1"));
2945 }
2946 if (strstr(tmp, "/dev/md")) {
2947 strcpy(tmp,
2948 call_program_and_get_last_line_of_output
2949 ("mount | grep \" on / \" | cut -d' ' -f1"));
2950 }
2951#endif
2952
2953 return (tmp);
2954}
2955
2956
2957/**
2958 * Find out which boot loader is in use.
2959 * @param which_device Device to look for the boot loader on.
2960 * @return 'L' for LILO, 'E'for ELILO, 'G' for GRUB, 'B' or 'D' for FreeBSD boot loaders, or 'U' for Unknown.
2961 * @note Under Linux, all drives are examined, not just @p which_device.
2962 */
2963#ifdef __FreeBSD__
2964char which_boot_loader(char *which_device)
2965{
2966 int count_lilos = 0;
2967 int count_grubs = 0;
2968 int count_boot0s = 0;
2969 int count_dangerouslydedicated = 0;
2970
2971 log_it("looking at drive %s's MBR", which_device);
2972 if (does_string_exist_in_boot_block(which_device, "GRUB")) {
2973 count_grubs++;
2974 }
2975 if (does_string_exist_in_boot_block(which_device, "LILO")) {
2976 count_lilos++;
2977 }
2978 if (does_string_exist_in_boot_block(which_device, "Drive")) {
2979 count_boot0s++;
2980 }
2981 if (does_string_exist_in_first_N_blocks
2982 (which_device, "FreeBSD/i386", 17)) {
2983 count_dangerouslydedicated++;
2984 }
2985 log_it("%d grubs and %d lilos and %d elilos and %d boot0s and %d DD\n",
2986 count_grubs, count_lilos, count_elilos, count_boot0s,
2987 count_dangerouslydedicated);
2988
2989 if (count_grubs && !count_lilos) {
2990 return ('G');
2991 } else if (count_lilos && !count_grubs) {
2992 return ('L');
2993 } else if (count_grubs == 1 && count_lilos == 1) {
2994 log_it("I'll bet you used to use LILO but switched to GRUB...");
2995 return ('G');
2996 } else if (count_boot0s == 1) {
2997 return ('B');
2998 } else if (count_dangerouslydedicated) {
2999 return ('D');
3000 } else {
3001 log_it("Unknown boot loader");
3002 return ('U');
3003 }
3004}
3005
3006#else
3007
3008char which_boot_loader(char *which_device)
3009{
3010 /*@ buffer ***************************************************** */
3011 char *list_drives_cmd = NULL;
3012 char *current_drive;
3013
3014 /*@ pointers *************************************************** */
3015 FILE *pdrives;
3016
3017 /*@ int ******************************************************** */
3018 int count_lilos = 0;
3019 int count_grubs = 0;
3020
3021 /*@ end vars *************************************************** */
3022
3023 malloc_string(current_drive);
3024
3025#ifdef __IA64__
3026 /* No choice for it */
3027 return ('E');
3028#endif
3029 assert(which_device != NULL);
3030
3031 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());
3032 log_it("list_drives_cmd = %s", list_drives_cmd);
3033
3034 if (!(pdrives = popen(list_drives_cmd, "r"))) {
3035 log_OS_error("Unable to open list of drives");
3036 mr_free(list_drives_cmd);
3037 paranoid_free(current_drive);
3038 return ('\0');
3039 }
3040 mr_free(list_drives_cmd);
3041
3042 for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
3043 (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
3044 strip_spaces(current_drive);
3045 log_it("looking at drive %s's MBR", current_drive);
3046 if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
3047 count_grubs++;
3048 strcpy(which_device, current_drive);
3049 break;
3050 }
3051 if (does_string_exist_in_boot_block(current_drive, "LILO")) {
3052 count_lilos++;
3053 strcpy(which_device, current_drive);
3054 break;
3055 }
3056 }
3057 if (pclose(pdrives)) {
3058 log_OS_error("Cannot pclose pdrives");
3059 }
3060 log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
3061 if (count_grubs && !count_lilos) {
3062 paranoid_free(current_drive);
3063 return ('G');
3064 } else if (count_lilos && !count_grubs) {
3065 paranoid_free(current_drive);
3066 return ('L');
3067 } else if (count_grubs == 1 && count_lilos == 1) {
3068 log_it("I'll bet you used to use LILO but switched to GRUB...");
3069 paranoid_free(current_drive);
3070 return ('G');
3071 } else {
3072 // We need to look on each partition then
3073 mr_asprintf(&list_drives_cmd, "parted2fdisk -l 2>/dev/null | grep -E \"^/dev/\" | tr -s ':' ' ' | tr -s ' ' '\n' | grep /dev/");
3074 log_it("list_drives_cmd = %s", list_drives_cmd);
3075
3076 if (!(pdrives = popen(list_drives_cmd, "r"))) {
3077 log_OS_error("Unable to open list of drives");
3078 mr_free(list_drives_cmd);
3079 paranoid_free(current_drive);
3080 return ('\0');
3081 }
3082 mr_free(list_drives_cmd);
3083
3084 for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
3085 (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
3086 strip_spaces(current_drive);
3087 log_it("looking at partition %s's BR", current_drive);
3088 if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
3089 count_grubs++;
3090 strcpy(which_device, current_drive);
3091 break;
3092 }
3093 if (does_string_exist_in_boot_block(current_drive, "LILO")) {
3094 count_lilos++;
3095 strcpy(which_device, current_drive);
3096 break;
3097 }
3098 }
3099 if (pclose(pdrives)) {
3100 log_OS_error("Cannot pclose pdrives");
3101 }
3102 log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
3103 paranoid_free(current_drive);
3104 if (count_grubs && !count_lilos) {
3105 return ('G');
3106 } else if (count_lilos && !count_grubs) {
3107 return ('L');
3108 } else if (count_grubs == 1 && count_lilos == 1) {
3109 log_it("I'll bet you used to use LILO but switched to GRUB...");
3110 return ('G');
3111 } else {
3112 log_it("Unknown boot loader");
3113 return ('U');
3114 }
3115 }
3116}
3117#endif
3118
3119
3120
3121
3122/**
3123 * Write zeroes over the first 16K of @p device.
3124 * @param device The device to zero.
3125 * @return 0 for success, 1 for failure.
3126 */
3127int zero_out_a_device(char *device)
3128{
3129 FILE *fout;
3130 int i;
3131
3132 assert_string_is_neither_NULL_nor_zerolength(device);
3133
3134 log_it("Zeroing drive %s", device);
3135 if (!(fout = fopen(device, "w"))) {
3136 log_OS_error("Unable to open/write to device");
3137 return (1);
3138 }
3139 for (i = 0; i < 16384; i++) {
3140 fputc('\0', fout);
3141 }
3142 paranoid_fclose(fout);
3143 log_it("Device successfully zeroed.");
3144 return (0);
3145}
3146
3147/**
3148 * Return the device pointed to by @p incoming.
3149 * @param incoming The device to resolve symlinks for.
3150 * @return The path to the real device file.
3151 * @note The returned string points to static storage that will be overwritten with each call.
3152 * @bug Won't work with file v4.0; needs to be written in C.
3153 */
3154char *resolve_softlinks_to_get_to_actual_device_file(char *incoming)
3155{
3156 static char output[MAX_STR_LEN];
3157 char *command;
3158 char *curr_fname;
3159 char *scratch = NULL;
3160 char *tmp = NULL;
3161 char *p;
3162
3163 struct stat statbuf;
3164 command = malloc(1000);
3165 malloc_string(curr_fname);
3166 if (!does_file_exist(incoming)) {
3167 log_it
3168 ("resolve_softlinks_to_get_to_actual_device_file --- device not found");
3169 strcpy(output, incoming);
3170 } else {
3171 strcpy(curr_fname, incoming);
3172 lstat(curr_fname, &statbuf);
3173 while (S_ISLNK(statbuf.st_mode)) {
3174 log_msg(1, "curr_fname = %s", curr_fname);
3175 sprintf(command, "file %s", curr_fname);
3176 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
3177 for (p = tmp + strlen(tmp); p != tmp && *p != '`' && *p != ' ';
3178 p--);
3179 p++;
3180 mr_asprintf(&scratch, "%s", p);
3181 for (p = scratch; *p != '\0' && *p != '\''; p++);
3182 *p = '\0';
3183 log_msg(0, "curr_fname %s --> '%s' --> %s", curr_fname, tmp, scratch);
3184 mr_free(tmp);
3185
3186 if (scratch[0] == '/') {
3187 strcpy(curr_fname, scratch); // copy whole thing because it's an absolute softlink
3188 } else { // copy over the basename cos it's a relative softlink
3189 p = curr_fname + strlen(curr_fname);
3190 while (p != curr_fname && *p != '/') {
3191 p--;
3192 }
3193 if (*p == '/') {
3194 p++;
3195 }
3196 strcpy(p, scratch);
3197 }
3198 mr_free(scratch);
3199 lstat(curr_fname, &statbuf);
3200 }
3201 strcpy(output, curr_fname);
3202 log_it("resolved %s to %s", incoming, output);
3203 }
3204 paranoid_free(command);
3205 paranoid_free(curr_fname);
3206 return (output);
3207}
3208
3209/* @} - end of deviceGroup */
3210
3211/**
3212 * Return the type of partition format (GPT or MBR)
3213 */
3214char *which_partition_format(const char *drive)
3215{
3216 static char output[4];
3217 char *tmp = NULL;
3218 char *command;
3219 char *fdisk;
3220#ifdef __IA64__
3221 struct stat buf;
3222#endif
3223 malloc_string(command);
3224 malloc_string(fdisk);
3225 sprintf(fdisk, "/sbin/parted2fdisk");
3226 sprintf(command, "%s -l %s | grep 'EFI GPT'", fdisk, drive);
3227 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
3228 if (strstr(tmp, "GPT") == NULL) {
3229 strcpy(output, "MBR");
3230 } else {
3231 strcpy(output, "GPT");
3232 }
3233 mr_free(tmp);
3234
3235 log_msg(0, "Found %s partition table format type", output);
3236 paranoid_free(command);
3237 paranoid_free(fdisk);
3238 return (output);
3239}
3240/* @} - end of deviceGroup */
Note: See TracBrowser for help on using the repository browser.