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

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

Fix #375 mondo will segfault if the partition in sensibly_set_tmpdir_and_scratchdir() is read-only (cylau)

  • Property svn:keywords set to Id
File size: 92.5 KB
RevLine 
[1]1/* libmondo-devices.c Subroutines for handling devices
[85]2 $Id: libmondo-devices.c 2501 2009-12-16 23:35:08Z bruno $
[1]3*/
4
5/**
6 * @file
7 * Functions to handle interactions with backup devices.
8 */
9
10#include "my-stuff.h"
[2211]11#include "mr_mem.h"
[2434]12#include "mr_str.h"
[1]13#include "mondostructures.h"
14#include "libmondo-files-EXT.h"
15#include "libmondo-devices.h"
[541]16#include "lib-common-externs.h"
[1]17#include "libmondo-string-EXT.h"
18#include "libmondo-tools-EXT.h"
[541]19#include "libmondo-gui-EXT.h"
[1]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
[128]31#include <linux/fs.h> /* for BLKGETSIZE64 */
[1]32#include <linux/hdreg.h>
33#endif
34
35/*@unused@*/
[85]36//static char cvsid[] = "$Id: libmondo-devices.c 2501 2009-12-16 23:35:08Z bruno $";
[1]37
38extern int g_current_media_number;
39extern double g_kernel_version;
40
41extern bool g_ISO_restore_mode;
[99]42extern char *g_selfmounted_isodir;
[1316]43extern char *MONDO_LOGFILE;
[1]44
[1656]45extern void setup_tmpdir(char *path);
46
[128]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] = "";
[1]50
51
52/**
53 * ????? @bug ?????
54 * @ingroup globalGroup
55 */
[128]56bool g_restoring_live_from_cd = FALSE;
[2380]57bool g_restoring_live_from_netfs = FALSE;
[1]58
[128]59extern t_bkptype g_backup_media_type; // set by main()
[1]60
[1645]61/* Reference to global bkpinfo */
62extern struct s_bkpinfo *bkpinfo;
[1]63
[2424]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;
[1]71
[2424]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 */
[1]74
[1645]75
76void set_g_cdrom_and_g_dvd_to_bkpinfo_value()
[1]77{
[128]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
[1]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__);
[128]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 }
[1]100// log_it("rctada: killing autorun");
101// run_program_and_log_output("killall autorun", TRUE);
[128]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);
[1]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 */
[128]117bool am_I_in_disaster_recovery_mode(void)
[1]118{
[2214]119 char *tmp = NULL;
120 char *comment;
[128]121 bool is_this_a_ramdisk = FALSE;
[1]122
[128]123 malloc_string(comment);
[2214]124 mr_asprintf(&tmp, "%s", where_is_root_mounted());
[128]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);
[1]130
131#ifdef __FreeBSD__
[128]132 if (strstr(tmp, "/dev/md")) {
133 is_this_a_ramdisk = TRUE;
134 }
[1]135#else
[128]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 }
[1]144#endif
[2214]145 mr_free(tmp);
[1]146
[128]147 if (is_this_a_ramdisk) {
[1983]148 if (!does_file_exist("/THIS-IS-A-RAMDISK")) {
[128]149 log_to_screen
[541]150 ("Using /dev/root is stupid of you but I'll forgive you.");
[128]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);
[1]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{
[128]174 static char output[MAX_STR_LEN / 4];
175 switch (bt) {
176 case none:
[541]177 strcpy(output, "none");
[1]178 break;
[128]179 case iso:
[541]180 strcpy(output, "iso");
[1]181 break;
[128]182 case cdr:
[541]183 strcpy(output, "cdr");
[1]184 break;
[128]185 case cdrw:
[541]186 strcpy(output, "cdrw");
[1]187 break;
[128]188 case cdstream:
[541]189 strcpy(output, "cdstream");
[1]190 break;
[2380]191 case netfs:
192 strcpy(output, "netfs");
[1]193 break;
[128]194 case tape:
[541]195 strcpy(output, "tape");
[1]196 break;
[128]197 case udev:
[541]198 strcpy(output, "udev");
[1]199 break;
[1687]200 case usb:
201 strcpy(output, "usb");
202 break;
[128]203 default:
[541]204 strcpy(output, "default");
[128]205 }
206 return (output);
[1]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 */
[128]220int eject_device(char *dev)
[1]221{
[128]222 char *command;
223 int res1 = 0, res2 = 0;
[1]224
[128]225 malloc_string(command);
[1]226
[128]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 }
[1]234
235#ifdef __FreeBSD__
[128]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 }
[1]242#else
[128]243 sprintf(command, "eject %s", dev);
[1]244#endif
245
[128]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 }
[1]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 */
[128]261int inject_device(char *dev)
[1]262{
[128]263 char *command;
264 int i;
[1]265
[128]266 malloc_string(command);
[1]267
268
269#ifdef __FreeBSD__
[128]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 }
[1]276#else
[128]277 sprintf(command, "eject -t %s", dev);
[1]278#endif
[128]279 i = run_program_and_log_output(command, FALSE);
280 paranoid_free(command);
281 return (i);
[1]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 */
[128]290bool does_device_exist(char *device)
[1]291{
292
[128]293 /*@ buffers *********************************************************** */
294 char *tmp;
295 bool ret;
[1]296
[128]297 malloc_string(tmp);
298 assert_string_is_neither_NULL_nor_zerolength(device);
[1]299
[128]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);
[1]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 */
[128]316bool does_nonMS_partition_exist(void)
[1]317{
318#if __FreeBSD__
[128]319 return
320 !system
321 ("for drive in /dev/ad? /dev/da?; do fdisk $drive | grep -q FreeBSD && exit 0; done; false");
[1]322#else
[128]323 return
324 !system
[681]325 ("parted2fdisk -l 2>/dev/null | grep '^/dev/' | grep -Eqv '(MS|DOS|FAT|NTFS)'");
[1]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 */
[128]335int does_partition_exist(const char *drive, int partno)
[1]336{
[128]337 /*@ buffers **************************************************** */
338 char *program;
339 char *incoming;
[2211]340 char *searchstr = NULL;
[128]341 char *tmp;
[1]342
[128]343 /*@ ints ******************************************************* */
344 int res = 0;
[1]345
[128]346 /*@ pointers *************************************************** */
347 FILE *fin;
[1]348
349
[128]350 /*@ end vars *************************************************** */
351 assert_string_is_neither_NULL_nor_zerolength(drive);
352 assert(partno >= 0 && partno < 999);
[1]353
[128]354 malloc_string(program);
355 malloc_string(incoming);
356 malloc_string(searchstr);
357 malloc_string(tmp);
[1]358
359#ifdef __FreeBSD__
[128]360 // We assume here that this is running from mondorestore. (It is.)
[1303]361 sprintf(program, "ls %s %s >/dev/null 2>&1", drive,
[128]362 build_partition_name(tmp, drive, partno));
363 return system(program);
[1]364#else
[128]365 tmp[0] = '\0';
[1]366#endif
367
[128]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);
[1]374 }
[128]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);
[1]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 */
[128]402bool does_string_exist_in_boot_block(char *dev, char *str)
[1]403{
[128]404 /*@ buffers **************************************************** */
405 char *command;
[1]406
[128]407 /*@ end vars *************************************************** */
408 int i;
[1]409
[128]410 assert_string_is_neither_NULL_nor_zerolength(dev);
411 assert_string_is_neither_NULL_nor_zerolength(str);
[1]412
[128]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 }
[1]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 */
[128]433bool does_string_exist_in_first_N_blocks(char *dev, char *str, int n)
[1]434{
[128]435 /*@ buffers **************************************************** */
436 char *command;
437 /*@ end vars *************************************************** */
438 int i;
[1]439
[128]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 }
[1]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 */
[1645]463int find_and_mount_actual_cd(char *mountpoint)
[1]464{
[128]465 /*@ buffers ***************************************************** */
[1]466
[128]467 /*@ int's ****************************************************** */
468 int res;
469 char *dev;
[1]470
[128]471 /*@ end vars **************************************************** */
[1]472
[128]473 malloc_string(dev);
474 assert(bkpinfo != NULL);
475 assert_string_is_neither_NULL_nor_zerolength(mountpoint);
[1]476
[128]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 }
[1]488
[128]489 if (bkpinfo->backup_media_type != iso) {
490 retract_CD_tray_and_defeat_autorun();
491 }
[1]492
[128]493 if (!dev[0] || (res = mount_CDROM_here(dev, mountpoint))) {
494 if (!popup_and_get_string
[541]495 ("CD-ROM device", "Please enter your CD-ROM's /dev device",
[128]496 dev, MAX_STR_LEN / 4)) {
497 res = 1;
498 } else {
499 res = mount_CDROM_here(dev, mountpoint);
500 }
501 }
502 if (res) {
[541]503 log_msg(1, "mount failed");
[128]504 } else {
[541]505 log_msg(1, "mount succeeded with %s", dev);
[128]506 }
507 paranoid_free(dev);
508 return (res);
[1]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 */
[128]521int find_cdrw_device(char *cdrw_device)
[1]522{
[128]523 /*@ buffers ************************ */
524 char *comment;
[2214]525 char *tmp = NULL;
526 char *cdr_exe = NULL;
[128]527 char *command;
[1]528
[128]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")) {
[2214]547 mr_asprintf(&cdr_exe, "cdrecord");
[128]548 } else {
[2214]549 mr_asprintf(&cdr_exe, "dvdrecord");
[128]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);
[2214]555 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
[128]556 }
[2214]557 if ((tmp == NULL) || (strlen(tmp) < 2)) {
[128]558 paranoid_free(comment);
[2214]559 mr_free(tmp);
560 mr_free(cdr_exe);
[128]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);
[2214]569 mr_free(tmp);
570 mr_free(cdr_exe);
[128]571 paranoid_free(command);
572 return (0);
573 }
[1]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 */
[128]588int find_cdrom_device(char *output, bool try_to_mount)
[1]589{
[128]590 /*@ pointers **************************************************** */
591 FILE *fin;
592 char *p;
593 char *q;
594 char *r;
595 int retval = 0;
[1]596
[128]597 /*@ bool's ****************************************************** */
598 bool found_it = FALSE;
[1]599
[128]600 /*@ buffers ***************************************************** */
601 char *tmp;
[2214]602 char *tmp1 = NULL;
603 char *cdr_exe = NULL;
[128]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] = "";
[1]610
[128]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);
[1]618
[128]619 output[0] = '\0';
620 phrase_one[0] = '\0';
621 phrase_two[0] = '\0';
622 dvd_last_resort[0] = '\0';
[1]623
[128]624 /*@ end vars **************************************************** */
[1]625
[128]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 }
[1]640
[1644]641 sprintf(mountpoint, "%s/cd.mnt", bkpinfo->tmpdir);
[128]642 make_hole_for_dir(mountpoint);
[1]643
[128]644 if (find_home_of_exe("cdrecord")) {
[2214]645 mr_asprintf(&cdr_exe, "cdrecord");
[128]646 } else {
[2214]647 mr_asprintf(&cdr_exe, "dvdrecord");
[128]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");
[2214]668 mr_free(cdr_exe);
[128]669 return (1);
670 }
[2202]671 for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
672 (void)fgets(tmp, MAX_STR_LEN, fin)) {
[128]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 }
[1]691 }
692 }
693 }
[128]694 paranoid_pclose(fin);
[1]695
696#ifndef __FreeBSD__
[128]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 {
[2202]705 for ((void)fgets(tmp, MAX_STR_LEN, fin); !feof(fin);
706 (void)fgets(tmp, MAX_STR_LEN, fin)) {
[128]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 }
[1]727
728#endif
729#ifdef __FreeBSD__
[128]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 }
[1]765#else
[128]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;
[1]771 }
[128]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 }
[1]783
[128]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 }
[1]791
[128]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 }
[1]832#endif
833
[128]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);
[1]851
[128]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 }
[1]863
[128]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);
[2214]868 mr_asprintf(&tmp1, "%s", call_program_and_get_last_line_of_output(command));
869 if (strlen(tmp1) > 0) {
870 strcpy(output, tmp1);
[128]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 }
[2214]877 mr_free(tmp1);
878
[128]879 end_of_find_cdrom_device:
880 paranoid_free(tmp);
[2214]881 mr_free(cdr_exe);
[128]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);
[1]888}
889
890
891
892
893
[128]894int find_dvd_device(char *output, bool try_to_mount)
[1]895{
[128]896 char *command;
897 char *tmp;
898 int retval = 0, devno = -1;
[1]899
[128]900 malloc_string(command);
901 malloc_string(tmp);
[1]902
[128]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 }
[1]908
[2190]909 sprintf(tmp, "%s", call_program_and_get_last_line_of_output
[128]910 ("dvdrecord -scanbus 2> /dev/null | grep \") '\" | grep -n \"\" | grep DVD | cut -d':' -f1")
[1]911 );
[128]912 log_msg(5, "tmp = '%s'", tmp);
913 if (!tmp[0])
[2190]914 sprintf(tmp, "%s", call_program_and_get_last_line_of_output
[128]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 }
[1]929
[128]930 if (try_to_mount) {
931 log_msg(1, "Ignoring the fact that try_to_mount==TRUE");
932 }
933 return (retval);
[1]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 */
[128]948long get_phys_size_of_drive(char *drive)
[1]949{
[128]950 int fd;
[1]951#if linux
[128]952 unsigned long long s = 0;
953 int fileid, cylinders = 0, cylindersleft = 0;
954 int cylindersize = 0;
[1]955 int gotgeo = 0;
956
[128]957
958 struct hd_geometry hdgeo;
[1]959#elif __FreeBSD__
[128]960 off_t s;
[1]961#endif
962
[128]963 long outvalA = -1;
964 long outvalB = -1;
965 long outvalC = -1;
[1]966
[128]967 if ((fd = open(drive, O_RDONLY)) != -1) {
968 if (ioctl(fd,
[1]969#if linux
[128]970#ifdef BLKGETSIZE64
971 BLKGETSIZE64,
972#else
973 BLKGETSIZE,
974#endif
[1]975#elif __FreeBSD__
[128]976 DIOCGMEDIASIZE,
[1]977#endif
[128]978 &s) != -1) {
979 close(fd);
980 // s>>11 works for older disks but not for newer ones
981 outvalB =
[1]982#if linux
[128]983#ifdef BLKGETSIZE64
984 s >> 20
[1]985#else
[128]986 s >> 11
[1]987#endif
[128]988#else
989 s >> 20
990#endif
991 ;
992 }
[1]993 }
994
[128]995 if (outvalB <= 0) {
996 log_msg(1, "Error getting size of %s: %s", drive, strerror(errno));
[1]997#if linux
[161]998 fileid = open(drive, O_RDONLY);
[2205]999 if (fileid != -1) {
[161]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 }
[1]1011 } else {
[161]1012 log_msg(1,
1013 "Error in ioctl() getting new hard disk geometry (%s), resizing in unsafe mode",
1014 strerror(errno));
[1]1015 }
[161]1016 close(fileid);
[1]1017 } else {
[161]1018 log_msg(1, "Failed to open %s for reading: %s", drive,
[128]1019 strerror(errno));
[1]1020 }
[161]1021 if (!gotgeo) {
1022 log_msg(1, "Failed to get harddisk geometry, using old mode");
1023 }
[1]1024#endif
[161]1025 }
[1]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
[128]1029 outvalC = (outvalA > outvalB) ? outvalA : outvalB;
1030
[1]1031// log_msg (5, "drive = %s, error = %s", drive, strerror (errno));
1032// fatal_error ("GPSOD: Unable to get size of drive");
[128]1033 log_msg(1, "%s --> %ld or %ld --> %ld", drive, outvalA, outvalB,
1034 outvalC);
1035
1036 return (outvalC);
[1]1037}
[128]1038
[1]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 */
[128]1045bool is_this_a_valid_disk_format(char *format)
[1]1046{
[2211]1047 char *good_formats = NULL;
[1]1048 char *command;
1049 char *format_sz;
1050
[128]1051 FILE *pin;
1052 int retval;
1053 malloc_string(good_formats);
1054 malloc_string(command);
1055 malloc_string(format_sz);
[1]1056
[128]1057 assert_string_is_neither_NULL_nor_zerolength(format);
[1]1058
[128]1059 sprintf(format_sz, "%s ", format);
[1]1060
1061#ifdef __FreeBSD__
[128]1062 sprintf(command,
1063 "lsvfs | tr -s '\t' ' ' | grep -v Filesys | grep -v -- -- | cut -d' ' -f1 | tr -s '\n' ' '");
[1]1064#else
[128]1065 sprintf(command,
[273]1066 "grep -v nodev /proc/filesystems | tr -s '\t' ' ' | cut -d' ' -f2 | tr -s '\n' ' '");
[1]1067#endif
1068
[128]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, " ");
[2177]1075 (void) fgets(good_formats + 1, MAX_STR_LEN - 1, pin);
[128]1076 if (pclose(pin)) {
1077 log_OS_error("Cannot pclose good formats");
1078 }
1079 strip_spaces(good_formats);
[2104]1080 strcat(good_formats, " swap lvm raid ntfs-3g ntfs 7 "); // " ntfs 7 " -- um, cheating much? :)
[128]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);
[1]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 */
[128]1101bool is_this_device_mounted(char *device_raw)
[1]1102{
1103
[128]1104 /*@ pointers **************************************************** */
1105 FILE *fin;
[1]1106
[128]1107 /*@ buffers ***************************************************** */
1108 char *incoming;
[2214]1109 char *device_with_tab = NULL;
1110 char *device_with_space = NULL;
1111 char *tmp = NULL;
1112 bool retval = FALSE;
[128]1113
[1]1114#ifdef __FreeBSD__
[128]1115#define SWAPLIST_COMMAND "swapinfo"
[1]1116#else
[128]1117#define SWAPLIST_COMMAND "cat /proc/swaps"
[1]1118#endif
1119
[128]1120 /*@ end vars **************************************************** */
[1]1121
[128]1122 malloc_string(incoming);
1123 assert(device_raw != NULL);
[1]1124// assert_string_is_neither_NULL_nor_zerolength(device_raw);
[128]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);
[2214]1128 mr_asprintf(&tmp, "/%s", device_raw);
[128]1129 } else {
[2214]1130 mr_asprintf(&tmp, "%s", device_raw);
[128]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.");
[2214]1136 mr_free(tmp);
1137 return(FALSE);
[128]1138 }
[2214]1139 mr_asprintf(&device_with_tab, "%s\t", tmp);
1140 mr_asprintf(&device_with_space, "%s ", tmp);
1141 mr_free(tmp);
[1]1142
[128]1143 if (!(fin = popen("mount", "r"))) {
1144 log_OS_error("Cannot popen 'mount'");
[2214]1145 return(FALSE);
[1]1146 }
[2202]1147 for ((void)fgets(incoming, MAX_STR_LEN - 1, fin); !feof(fin);
1148 (void)fgets(incoming, MAX_STR_LEN - 1, fin)) {
[128]1149 if (strstr(incoming, device_with_space) //> incoming
1150 || strstr(incoming, device_with_tab)) // > incoming)
1151 {
1152 paranoid_pclose(fin);
[2214]1153 paranoid_free(incoming);
1154 return(TRUE);
[128]1155 }
1156 }
[2214]1157 mr_free(device_with_tab);
[128]1158 paranoid_pclose(fin);
[2290]1159 mr_asprintf(&tmp, "%s | grep -E \"^%s\" > /dev/null 2> /dev/null", SWAPLIST_COMMAND, device_with_space);
[2423]1160 mr_free(device_with_space);
[128]1161 log_msg(4, "tmp (command) = '%s'", tmp);
1162 if (!system(tmp)) {
[2214]1163 retval = TRUE;
[128]1164 }
[2214]1165 mr_free(tmp);
[128]1166 paranoid_free(incoming);
[2214]1167 return(retval);
[1]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 */
[128]1177char *make_vn(char *fname)
[1]1178{
[128]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;
[1]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 */
[128]1215int kick_vn(char *dname)
[1]1216{
[128]1217 char command[MAX_STR_LEN];
[1]1218
[128]1219 if (strncmp(dname, "/dev/", 5) == 0) {
1220 dname += 5;
1221 }
[1]1222
[128]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;
[1]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 */
[1741]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
[1745]1265 sprintf(command, "mount %s -t vfat %s 2>> %s",
[1743]1266 device, mountpoint, MONDO_LOGFILE);
[1741]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 */
[128]1283int mount_CDROM_here(char *device, char *mountpoint)
[1]1284{
[128]1285 /*@ buffer ****************************************************** */
[2211]1286 char *command = NULL;
[128]1287 int retval;
[2257]1288#ifdef __FreeBSD__
1289 char *dev = NULL;
1290#else
1291 char *options = NULL;
1292#endif
[1]1293
[128]1294 assert_string_is_neither_NULL_nor_zerolength(device);
1295 assert_string_is_neither_NULL_nor_zerolength(mountpoint);
[1]1296
[128]1297 make_hole_for_dir(mountpoint);
[2211]1298
[2257]1299 if (isdigit(device[0])) {
1300 find_cdrom_device(device, FALSE);
1301 }
1302#ifndef __FreeBSD__
[2211]1303 mr_asprintf(&options, "ro");
1304#endif
1305
[128]1306 if (g_ISO_restore_mode) {
[1]1307
1308#ifdef __FreeBSD__
[2290]1309 mr_asprintf(&dev, "%s", make_vn(device));
[128]1310 if (!dev) {
[2211]1311 mr_asprintf(&command, "Unable to mount ISO (make_vn(%s) failed)", device);
[128]1312 fatal_error(command);
1313 }
1314 strcpy(device, dev);
[2211]1315 paranoid_free(dev);
[1]1316#else
[2211]1317 mr_strcat(options, ",loop");
[1]1318#endif
1319
[128]1320 }
1321 log_msg(4, "(mount_CDROM_here --- device=%s, mountpoint=%s", device,
1322 mountpoint);
1323 /*@ end vars *************************************************** */
[1]1324
1325#ifdef __FreeBSD__
[2290]1326 mr_asprintf(&command, "mount_cd9660 -r %s %s 2>> %s", device, mountpoint, MONDO_LOGFILE);
[1]1327
1328#else
[2290]1329 mr_asprintf(&command, "mount %s -o %s -t iso9660 %s 2>> %s", device, options, mountpoint, MONDO_LOGFILE);
[2211]1330 paranoid_free(options);
[1]1331#endif
1332
[128]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);
[2211]1339 paranoid_free(command);
[1]1340
[128]1341 return (retval);
[1]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
[20]1354 * - @c bkpinfo->prefix
[1]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
[1645]1361insist_on_this_cd_number(int cd_number_i_want)
[1]1362{
1363
[128]1364 /*@ int ************************************************************* */
1365 int res = 0;
[1]1366
1367
[128]1368 /*@ buffers ********************************************************* */
1369 char *tmp;
[2242]1370 char *mds = NULL;
[128]1371 char *request;
[1]1372
[128]1373 assert(bkpinfo != NULL);
1374 assert(cd_number_i_want > 0);
[1]1375
1376// log_msg(3, "Insisting on CD number %d", cd_number_i_want);
1377
[128]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
[2380]1388 || bkpinfo->backup_media_type == netfs) {
[128]1389 log_msg(3, "Remounting CD");
1390 g_ISO_restore_mode = TRUE;
[1]1391// FIXME --- I'm tempted to do something about this...
1392// Why unmount and remount again and again?
[128]1393 if (is_this_device_mounted(MNT_CDROM)) {
1394 run_program_and_log_output("umount " MNT_CDROM, 5);
1395 }
[1644]1396 sprintf(tmp, "mkdir -p %s/isodir &> /dev/null", bkpinfo->tmpdir);
[2202]1397 (void)system(tmp);
[128]1398 sprintf(tmp, "%s/%s/%s-%d.iso", bkpinfo->isodir,
[2380]1399 bkpinfo->netfs_remote_dir, bkpinfo->prefix,
[128]1400 cd_number_i_want);
1401 if (!does_file_exist(tmp)) {
[1644]1402 sprintf(tmp, "%s/isodir/%s/%s-%d.iso", bkpinfo->tmpdir,
[2380]1403 bkpinfo->netfs_remote_dir, bkpinfo->prefix,
[128]1404 cd_number_i_want);
1405 if (does_file_exist(tmp)) {
1406 log_msg(1,
[1644]1407 "FIXME - hacking bkpinfo->isodir from '%s' to %s/isodir",
1408 bkpinfo->isodir, bkpinfo->tmpdir);
1409 sprintf(bkpinfo->isodir, "%s/isodir", bkpinfo->tmpdir);
[128]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;
[1]1418 }
[1645]1419 if ((res = what_number_cd_is_this()) != cd_number_i_want) {
[128]1420 log_msg(3, "Currently, we hold %d but we want %d", res,
1421 cd_number_i_want);
[2242]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);
[128]1426 log_msg(3, tmp);
[1645]1427 while (what_number_cd_is_this() != cd_number_i_want) {
[128]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) {
[541]1436 log_to_screen("WARNING - failed to unmount CD-ROM drive");
[128]1437 }
1438 if (!bkpinfo->please_dont_eject) {
1439 res = eject_device(bkpinfo->media_device);
1440 } else {
1441 res = 0;
1442 }
1443 if (res) {
[541]1444 log_to_screen("WARNING - failed to eject CD-ROM disk");
[128]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);
[1]1457}
1458
1459/* @} - end of deviceGroup */
1460
1461
1462
[2434]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}
[1]1480
[2434]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;
[1]1491
[2434]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}
[1]1501
1502/**
[2434]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;
[2436]1552 int lastpos = 0;
[2434]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);
[2436]1583 if ((token = mr_strtok(mounted_file_system, token_chars, &lastpos)) == NULL) {
[2434]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);
[2436]1600 if ((token = mr_strtok(mounted_file_system, token_chars, &lastpos)) == NULL) {
[2434]1601 log_msg (5, "Ran out of entries on the mounted file systems list");
[2436]1602 mr_free(mounted_file_system);
[2434]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);
[2436]1609 token = mr_strtok(mounted_file_system, token_chars, &lastpos);
[2434]1610 }
[2436]1611 mr_free(mounted_file_system);
[2434]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;
[2436]1647 char *ndsf = NULL;
[2434]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 (5, "%s does not start with /dev/ and (probably) is not a device special file", dsf);
1660 return (-1);
1661 }
1662 log_msg(5, " %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(5, " %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(4, "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 */
[2436]1697 log_msg(4, "No partitions on device special file %s", dsf);
[2453]1698 log_msg(4, "I guess it's a partition itself");
[2436]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 (5, "Found partition: %s", token);
1707 strcpy(partitions[i++], token);
1708 mr_free(token);
1709 }
[2450]1710 mr_asprintf(&ndsf, "%s", dsf);
[2434]1711 }
[2436]1712 mr_free(partition_list);
[2434]1713
[2436]1714 /* For the rest ndsf is the new dsf to deal with */
[2434]1715 /********
1716 * At this point, we have a list of all of the partitions on the dsf. Now try to
1717 * see which partitions have a file system on them.
1718 *
1719 * Loop through each partition on the disk and:
1720 *
1721 * - If the partition is swap, it ignores it.
1722 *
1723 * - If the partition is mounted (e.g. /dev/sda1 is mounted on /boot), it adds an entry
1724 * to the linked list, copies to it the device name and mount point, and sets check == 1.
1725 *
1726 * - If the partition is part of a Volume Group that has Logical Volumes mounted, it adds
1727 * an entry to the linked list for each mounted Logical Volume in that Volume Group, copying
1728 * to it the device name and mount point, and sets check == 1. Note that if the Volume Group
1729 * contains more than one disk, it will still add the entry even if the Logical Volume's
1730 * extents are not on the dsf that was passed in to the function. For example, Volume Group
1731 * VolGroup00 contains the disks /dev/sda1 and /dev/sdb1, and the Logical Volumes LogVol01,
1732 * which is mounted on /var and has all of its extents on /dev/sda1, and LogVol02, which is
1733 * mounted as /usr and has all of its extents on /dev/sdb1. If you pass /dev/sda into the
1734 * function, both /var and /usr will be archived even though /usr is actually on/dev/sdb.
1735 *
1736 * - If the partition is part of a Volume Group that has Logical Volumes used in a mounted
1737 * software raid device, it adds an entry to the linked list, copies to it the software raid
1738 * device name and mount point, and sets check == 1.
1739 *
1740 * - If the partition is part of a mounted software raid device, it adds an entry to the linked
1741 * list, copies to it the software raid device name and mount point, and sets check == 1.
1742 *
1743 ********/
1744 for (i=0; strlen(partitions[i]); i++) {
1745 log_msg(4, "Processing partition: %s", partitions[i]);
1746 /* See if it's swap. If it is, ignore it. */
1747 mr_asprintf(&command, "parted2fdisk -l %s 2>/dev/null | awk '{if(($1==\"%s\")&&(toupper($0) ~ \"SWAP\")){print $1;exit}}'",
[2436]1748 ndsf, partitions[i]);
[2434]1749 log_msg(4, " Running: %s", command);
1750 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1751 paranoid_free(command);
1752 log_msg(4, " Return value: %s", tmp);
1753 c = strlen(tmp);
1754 paranoid_free(tmp);
1755 if (c) {
1756 log_msg(4, "It's swap. Ignoring partition %s", partitions[i]);
1757 continue;
1758 }
1759 /* It's not swap. See if we can find the mount point from the mount command. */
1760 mr_asprintf(&command, "mount 2>/dev/null | awk '{if((NF>0)&&($1==\"%s\")){print $3}}'", partitions[i]);
1761 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1762 paranoid_free(command);
1763 if (strlen(tmp)) {
1764 log_msg(4, " %s is mounted: %s", partitions[i], tmp);
1765 if ((DSFptr = find_mount_point_in_list(tmp)) == NULL) {
1766 log_msg (4, "Can't find mount point %s in mounted file systems list", tmp);
1767 paranoid_free(tmp);
1768 return (1);
1769 }
1770 DSFptr->check = 1;
1771 paranoid_free(tmp);
1772 continue;
1773 }
1774 paranoid_free(tmp);
1775 /* It's not swap and it's not mounted. See if it's LVM */
1776 log_msg(4, " It's not mounted. Checking to see if it's LVM...");
1777 /* Get the partition ID; 8e for LVM */
[2436]1778 mr_asprintf(&command, "parted2fdisk -l %s |awk '{if($1 ~ \"^%s\"){print $5}}'", ndsf, partitions[i]);
[2434]1779 log_msg(4, " Running: %s", command);
1780 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1781 paranoid_free(command);
1782 if (strlen(tmp)) {
1783 log_msg(4, " Partition ID: %s", tmp);
1784 if (!strcasecmp(tmp, "8e")) {
1785 /* It's LVM: Find the VG it's in */
1786 log_msg(4, " It's LVM: Find the VG it's in...");
1787 mr_asprintf(&command, "pvdisplay -v %s 2>/dev/null|grep \"VG Name\"|awk '{print $NF}'", partitions[i]);
1788 log_msg(4, " Running: %s", command);
1789 strcpy(VG, call_program_and_get_last_line_of_output(command));
1790 paranoid_free(command);
1791 log_msg(4, " Volume Group: %s", VG);
1792 if (strlen(VG)) {
1793 /* Found the Volume Group. Now find all of the VG's mount points */
1794 log_msg(4, " Found the Volume Group. Now find all of the VG's mount points");
1795 mr_asprintf(&command, "mount 2>/dev/null|grep -E \"/dev/mapper/%s-|/dev/%s/\"|awk '{printf(\"%%s \",$3)}END{print \"\"}'", VG, VG);
1796 log_msg(4, " Running: %s", command);
1797 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1798 paranoid_free(command);
1799 log_msg(4, " VG %s mount_list: %s", VG, mount_list);
1800 lastpos = 0;
1801 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1802 log_msg (5, "mount point token: %s", token);
1803 if ((DSFptr = find_mount_point_in_list(token)) == NULL) {
1804 log_msg (4, "Can't find mount point %s in mounted file systems list", token);
1805 paranoid_free(tmp);
1806 mr_free(token);
1807 return (1);
1808 }
1809 DSFptr->check = 1;
1810 mr_free(token);
1811 }
1812 /********
1813 * Now we want to see if there are any software raid devices using
1814 * any of the Logical Volumes on the Volume Group.
1815 *******/
1816 paranoid_free(mount_list);
[2436]1817
[2434]1818 mr_asprintf(&command, "%s", "cat /proc/mdstat|grep -iv Personal|awk '{if($0~\"^.*[ ]+:\"){printf(\"/dev/%s \", $1)}}END{print \"\"}'");
1819 log_msg (5, "Running: %s", command);
1820 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1821 paranoid_free(command);
1822 log_msg(4, " Software raid device list: %s", mount_list);
1823 lastpos = 0;
1824 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1825 mr_asprintf(&command, "mdadm --detail %s 2>/dev/null | grep -c %s", token, VG);
1826 log_msg (5, "Running: %s", command);
1827 paranoid_free(tmp);
1828 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1829 paranoid_free(command);
1830 log_msg(4, "Number of Software raid device: %s", tmp);
1831 if (atoi(tmp)) {
1832 /* This device is on our disk */
1833 if ((DSFptr = find_device_in_list(token)) == NULL) {
1834 log_msg (4, "Can't find device %s in mounted file systems list", token);
1835 paranoid_free(tmp);
1836 mr_free(token);
1837 return (1);
1838 }
1839 DSFptr->check = 1;
1840 }
1841 }
1842 mr_free(token);
1843 paranoid_free(mount_list);
1844 } else {
1845 log_msg (4, "Error finding Volume Group for partition %s", partitions[i]);
1846 paranoid_free(tmp);
1847 return (1);
1848 }
1849 paranoid_free(tmp);
1850 continue;
1851 }
1852 } else {
1853 log_msg (4, "Error finding partition type for the partition %s", partitions[i]);
1854 }
1855 paranoid_free(tmp);
1856 /********
1857 * It's not swap, mounted, or LVM. See if it's used in a software raid device.
1858 ********/
1859 log_msg (5, "It's not swap, mounted, or LVM. See if it's used in a software raid device.");
1860 mr_asprintf(&command, "mdadm --examine %s 2>/dev/null | awk '{if($1 == \"UUID\"){print $3}}'", partitions[i]);
1861 log_msg(4, " Running: %s", command);
1862 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1863 paranoid_free(command);
1864 if (!strlen(tmp)) {
1865 log_msg(4, " Partition %s is not used in a non-LVM software raid device", partitions[i]);
1866 paranoid_free(tmp);
1867 continue;
1868 }
1869 log_msg (5, " UUID: %s", tmp);
1870 /* Get the Software raid device list */
1871 mr_asprintf(&command, "%s", "cat /proc/mdstat|grep -iv Personal|awk '{if($0~\"^.*[ ]+:\"){printf(\"/dev/%s \", $1)}}END{print \"\"}'");
1872 log_msg (5, " Running: %s", command);
1873 mr_asprintf(&mount_list, "%s", call_program_and_get_last_line_of_output(command));
1874 paranoid_free(command);
1875 log_msg(4, " Software raid device list: %s", mount_list);
1876 /* Loop through the software raid device list to see if we can find the partition */
1877 lastpos = 0;
1878 while ((token = mr_strtok(mount_list, token_chars, &lastpos)) != NULL) {
1879 mr_asprintf(&command, "mdadm --detail %s 2>/dev/null | grep -c %s", token, tmp);
1880 log_msg(4, " Running: %s", command);
1881 paranoid_free(tmp);
1882 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
1883 paranoid_free(command);
1884 if (!atoi(tmp)) {
1885 log_msg (4," Didn't find partition %s in software raid device %s", partitions[i], token);
1886 } else {
1887 if ((DSFptr = find_device_in_list(token)) == NULL) {
1888 log_msg (4, "Can't find device %s in mounted file systems list", token);
1889 paranoid_free(tmp);
1890 mr_free(token);
1891 return (1);
1892 }
1893 DSFptr->check = 1;
1894 break;
1895 }
1896 mr_free(token);
1897 }
1898 paranoid_free(tmp);
[2436]1899 paranoid_free(mount_list);
[2434]1900 }
1901
1902 /* Determine how much memory to allocate for included_dsf_list and excluded_dsf_list */
1903 i = 0;
1904 DSFptr= DSF_Head;
1905 while (DSFptr != NULL) {
1906 i += strlen(DSFptr->mount_point) + 1;
1907 DSFptr = DSFptr->next;
1908 }
1909 log_msg (5, "i: %d", i);
1910 if ((*included_dsf_list = (char *) calloc(i+100, sizeof(char))) == NULL) {
1911 fatal_error ("Cannot allocate memory");
1912 }
1913 if ((*excluded_dsf_list = (char *) calloc(i+100, sizeof(char))) == NULL) {
1914 fatal_error ("Cannot allocate memory");
1915 }
1916 DSFptr= DSF_Head;
1917 while (DSFptr != NULL) {
1918 if (DSFptr->check) {
[2436]1919 log_msg (5, "%s is mounted on %s and is on disk %s\n", DSFptr->device, DSFptr->mount_point, ndsf);
[2434]1920 strcat(*included_dsf_list, DSFptr->mount_point);
1921 strcat(*included_dsf_list, " ");
1922 } else {
[2436]1923 log_msg (4, "%s is mounted on %s and is NOT on disk %s\n", DSFptr->device, DSFptr->mount_point, ndsf);
[2434]1924 strcat(*excluded_dsf_list, DSFptr->mount_point);
1925 strcat(*excluded_dsf_list, " ");
1926 }
1927 DSFptr = DSFptr->next;
1928 }
[2436]1929 mr_free(ndsf);
1930
[2434]1931 log_msg (5, "included_dsf_list: %s", *included_dsf_list);
1932 log_msg (5, "excluded_dsf_list: %s", *excluded_dsf_list);
1933 return (0);
1934}
1935
1936
1937
1938
1939
1940/* Update the bkpinfo structure for exclude & include paths
1941 * in order to handle correctly paths corresponding to devices */
1942void mr_make_devlist_from_pathlist(char *pathlist, char mode) {
1943
1944char *token = NULL;
1945int lastpos = 0;
1946char *mounted_on_dsf = NULL;
1947char *not_mounted_on_dsf = NULL;
[2473]1948char token_chars[] =" \t\r\f\a\0\n";
[2434]1949
1950while ((token = mr_strtok(pathlist, token_chars, &lastpos)) != NULL) {
1951 switch (get_dsf_mount_list(token, &mounted_on_dsf, &not_mounted_on_dsf)) {
1952 case 1:
1953 if (mode == 'E') {
1954 log_msg(1, "WARNING ! %s doesn't exist in -E option", token);
1955 } else {
[2453]1956 log_msg(1, "ERROR ! %s doesn't exist in -I option", token);
[2434]1957 fatal_error("Error processing -I option");
1958 }
1959 break;
1960 /* Everything is OK; proceed to archive data */
1961 case 0:
1962 if (mode == 'E') {
1963 if (strlen(mounted_on_dsf)) {
1964 log_to_screen("Excluding the following file systems on %s:\n", token);
1965 log_to_screen(" %s\n", mounted_on_dsf);
1966 log_msg (5, "Adding to bkpinfo->exclude_paths due to -E option: %s", mounted_on_dsf);
[2473]1967 strcat(bkpinfo->exclude_paths, " ");
[2434]1968 strcat(bkpinfo->exclude_paths, mounted_on_dsf);
1969 strcat(bkpinfo->exclude_paths, " ");
1970 mr_strcat(bkpinfo->exclude_devs, " %s ", token);
1971 }
[2453]1972 } else {
1973 log_to_screen("Archiving only the following file systems on %s:\n", token);
1974 log_to_screen(" %s\n", mounted_on_dsf);
1975 strcpy(bkpinfo->include_paths, "/");
1976 if (strlen(not_mounted_on_dsf)) {
1977 log_msg (5, "Adding to bkpinfo->exclude_paths due to -I option: %s", not_mounted_on_dsf);
1978 log_to_screen("Not archiving the following file systems:\n");
1979 log_to_screen(" %s\n", not_mounted_on_dsf);
[2473]1980 strcat(bkpinfo->exclude_paths, " ");
[2453]1981 strcat(bkpinfo->exclude_paths, not_mounted_on_dsf);
1982 strcat(bkpinfo->exclude_paths, "");
1983 }
[2434]1984 }
1985 break;
1986 /* It's a dsf but not a whole disk dsf */
1987 case -2:
1988 log_to_screen("Could %s be a partition instead of a whole disk device special file?\nIgnored.", token);
1989 break;
1990 /* A device special file was not passed in. Process it as a path. */
1991 case -1:
1992 if (mode == 'E') {
[2473]1993 /* Add the token if not already in the list */
1994 if (strstr(bkpinfo->exclude_paths,token) == NULL) {
1995 strcat(bkpinfo->exclude_paths, " ");
1996 strcat(bkpinfo->exclude_paths, token);
1997 strcat(bkpinfo->exclude_paths, " ");
1998 }
[2434]1999 } else {
[2473]2000 /* Add the token if not already in the list */
2001 if (strstr(bkpinfo->include_paths,token) == NULL) {
2002 strcat(bkpinfo->include_paths, " ");
2003 strcat(bkpinfo->include_paths, token);
2004 strcat(bkpinfo->include_paths, " ");
2005 }
[2434]2006 }
2007 break;
2008 }
2009 mr_free(token);
2010
2011 if (bkpinfo->include_paths != NULL) {
2012 log_msg(1, "include_paths is now '%s'", bkpinfo->include_paths);
2013 }
2014 if (bkpinfo->exclude_paths != NULL) {
2015 log_msg(1, "exclude_paths is now '%s'", bkpinfo->exclude_paths);
2016 }
2017 if (bkpinfo->exclude_devs != NULL) {
2018 log_msg(1, "exclude_devs is now '%s'", bkpinfo->exclude_devs);
2019 }
2020}
2021}
2022
2023
2024
2025
2026/**
[1]2027 * Ask user for details of backup/restore information.
2028 * Called when @c mondoarchive doesn't get any parameters.
2029 * @param bkpinfo The backup information structure to fill out with the user's data.
2030 * @param archiving_to_media TRUE if archiving, FALSE if restoring.
2031 * @return 0, always.
2032 * @bug No point of `int' return value.
2033 * @ingroup archiveGroup
2034 */
[1645]2035int interactively_obtain_media_parameters_from_user(bool archiving_to_media)
[1]2036// archiving_to_media is TRUE if I'm being called by mondoarchive
2037// archiving_to_media is FALSE if I'm being called by mondorestore
2038{
[2214]2039 char *tmp = NULL;
[2304]2040 char *tmp1 = NULL;
[2242]2041 char *mds = NULL;
[128]2042 char *sz_size;
2043 char *command;
2044 char *comment;
2045 char *prompt;
2046 int i;
2047 FILE *fin;
[1]2048
[128]2049 malloc_string(sz_size);
2050 malloc_string(command);
2051 malloc_string(comment);
2052 malloc_string(prompt);
[2304]2053 malloc_string(tmp1);
[128]2054 assert(bkpinfo != NULL);
2055 sz_size[0] = '\0';
2056 bkpinfo->nonbootable_backup = FALSE;
[1]2057
[2380]2058 // Tape, CD, NETFS, ...?
[128]2059 srandom(getpid());
2060 bkpinfo->backup_media_type =
2061 (g_restoring_live_from_cd) ? cdr :
2062 which_backup_media_type(bkpinfo->restore_data);
2063 if (bkpinfo->backup_media_type == none) {
[541]2064 log_to_screen("User has chosen not to backup the PC");
[128]2065 finish(1);
2066 }
[1934]2067 /* Why asking to remove the media with tape ?
[128]2068 if (bkpinfo->backup_media_type == tape && bkpinfo->restore_data) {
[1885]2069 popup_and_OK("Please remove media from drive(s)");
[128]2070 }
[1934]2071 */
[128]2072 log_msg(3, "media type = %s",
2073 bkptype_to_string(bkpinfo->backup_media_type));
2074 if (archiving_to_media) {
[1645]2075 sensibly_set_tmpdir_and_scratchdir();
[128]2076 }
2077 bkpinfo->cdrw_speed = (bkpinfo->backup_media_type == cdstream) ? 2 : 4;
2078 bkpinfo->compression_level =
2079 (bkpinfo->backup_media_type == cdstream) ? 1 : 5;
2080 bkpinfo->use_lzo =
2081 (bkpinfo->backup_media_type == cdstream) ? TRUE : FALSE;
2082 mvaddstr_and_log_it(2, 0, " ");
[1]2083
[1934]2084 // Find device's /dev (or SCSI) entry
[128]2085 switch (bkpinfo->backup_media_type) {
2086 case cdr:
2087 case cdrw:
2088 case dvd:
[1687]2089 case usb:
[1745]2090 /* Never try to eject a USB device */
2091 if (bkpinfo->backup_media_type == usb) {
[1746]2092 bkpinfo->please_dont_eject = TRUE;
[1745]2093 }
[128]2094 if (archiving_to_media) {
[1687]2095 if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
[685]2096 if (ask_me_yes_or_no
2097 ("Is your computer a laptop, or does the CD writer incorporate BurnProof technology?"))
2098 {
2099 bkpinfo->manual_cd_tray = TRUE;
2100 }
[128]2101 }
2102 if ((bkpinfo->compression_level =
2103 which_compression_level()) == -1) {
[541]2104 log_to_screen("User has chosen not to backup the PC");
[128]2105 finish(1);
2106 }
[2242]2107 mds = media_descriptor_string(bkpinfo->backup_media_type);
2108 sprintf(comment, "What speed is your %s (re)writer?", mds);
[128]2109 if (bkpinfo->backup_media_type == dvd) {
2110 find_dvd_device(bkpinfo->media_device, FALSE);
[2304]2111 strcpy(tmp1, "1");
[1522]2112 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
[128]2113 log_msg(1, "Setting to DVD defaults");
2114 } else {
2115 strcpy(bkpinfo->media_device, VANILLA_SCSI_CDROM);
[2304]2116 strcpy(tmp1, "4");
[128]2117 strcpy(sz_size, "650");
2118 log_msg(1, "Setting to CD defaults");
2119 }
[1687]2120 if ((bkpinfo->backup_media_type != dvd) && (bkpinfo->backup_media_type != usb)) {
[2304]2121 if (!popup_and_get_string("Speed", comment, tmp1, 4)) {
[541]2122 log_to_screen("User has chosen not to backup the PC");
[128]2123 finish(1);
2124 }
2125 }
[2304]2126 bkpinfo->cdrw_speed = atoi(tmp1); // if DVD then this shouldn't ever be used anyway :)
[2214]2127
[128]2128 sprintf(comment,
[2242]2129 "How much data (in Megabytes) will each %s store?", mds);
2130 mr_free(mds);
[128]2131 if (!popup_and_get_string("Size", comment, sz_size, 5)) {
[541]2132 log_to_screen("User has chosen not to backup the PC");
[128]2133 finish(1);
2134 }
2135 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2136 bkpinfo->media_size[i] = atoi(sz_size);
2137 }
2138 if (bkpinfo->media_size[0] <= 0) {
[541]2139 log_to_screen("User has chosen not to backup the PC");
[128]2140 finish(1);
2141 }
2142 }
[1737]2143 /* No break because we continue even for usb */
[128]2144 case cdstream:
[2242]2145 mds = media_descriptor_string(bkpinfo->backup_media_type);
2146
[1737]2147 if ((bkpinfo->disaster_recovery) && (bkpinfo->backup_media_type != usb)) {
[128]2148 strcpy(bkpinfo->media_device, "/dev/cdrom");
2149 log_msg(2, "CD-ROM device assumed to be at %s",
2150 bkpinfo->media_device);
[1737]2151 } else if ((bkpinfo->restore_data && (bkpinfo->backup_media_type != usb))
[128]2152 || bkpinfo->backup_media_type == dvd) {
2153 if (!bkpinfo->media_device[0]) {
2154 strcpy(bkpinfo->media_device, "/dev/cdrom");
2155 } // just for the heck of it :)
2156 log_msg(1, "bkpinfo->media_device = %s",
2157 bkpinfo->media_device);
2158 if (bkpinfo->backup_media_type == dvd
2159 || find_cdrom_device(bkpinfo->media_device, FALSE)) {
2160 log_msg(1, "bkpinfo->media_device = %s",
2161 bkpinfo->media_device);
2162 sprintf(comment,
[2242]2163 "Please specify your %s drive's /dev entry", mds);
[128]2164 if (!popup_and_get_string
[541]2165 ("Device?", comment, bkpinfo->media_device,
[128]2166 MAX_STR_LEN / 4)) {
[541]2167 log_to_screen("User has chosen not to backup the PC");
[128]2168 finish(1);
2169 }
2170 }
[2242]2171 log_msg(2, "%s device found at %s", mds, bkpinfo->media_device);
[128]2172 } else {
[1737]2173 if ((find_cdrw_device(bkpinfo->media_device)) && (bkpinfo->backup_media_type != usb)) {
[128]2174 bkpinfo->media_device[0] = '\0';
2175 }
2176 if (bkpinfo->media_device[0]) {
[1738]2177 if (bkpinfo->backup_media_type == usb) {
[2290]2178 mr_asprintf(&tmp, "I think your %s media corresponds to %s. Is this correct?", mds, bkpinfo->media_device);
[1738]2179 } else {
[2290]2180 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);
[1739]2181 }
[128]2182 if (!ask_me_yes_or_no(tmp)) {
2183 bkpinfo->media_device[0] = '\0';
2184 }
[2214]2185 mr_free(tmp);
[128]2186 }
2187 if (!bkpinfo->media_device[0]) {
[1737]2188 if (bkpinfo->backup_media_type == usb) {
2189 i = popup_and_get_string("/dev entry?",
2190 "What is the /dev entry of your USB Disk/Key, please?",
2191 bkpinfo->media_device,
2192 MAX_STR_LEN / 4);
2193 } else {
2194 if (g_kernel_version < 2.6) {
2195 i = popup_and_get_string("Device node?",
[541]2196 "What is the SCSI node of your CD (re)writer, please?",
[128]2197 bkpinfo->media_device,
2198 MAX_STR_LEN / 4);
[1709]2199 } else {
2200 i = popup_and_get_string("/dev entry?",
[541]2201 "What is the /dev entry of your CD (re)writer, please?",
[128]2202 bkpinfo->media_device,
2203 MAX_STR_LEN / 4);
[1709]2204 }
[128]2205 }
2206 if (!i) {
[541]2207 log_to_screen("User has chosen not to backup the PC");
[128]2208 finish(1);
2209 }
2210 }
2211 }
[2242]2212 mr_free(mds);
2213
[128]2214 if (bkpinfo->backup_media_type == cdstream) {
2215 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2216 bkpinfo->media_size[i] = 650;
2217 }
2218 }
2219 break;
2220 case udev:
2221 if (!ask_me_yes_or_no
[541]2222 ("This option is for advanced users only. Are you sure?")) {
2223 log_to_screen("User has chosen not to backup the PC");
[128]2224 finish(1);
2225 }
2226 case tape:
[1]2227
[1969]2228 if ((!bkpinfo->restore_mode) && (find_tape_device_and_size(bkpinfo->media_device, sz_size))) {
[541]2229 log_msg(3, "Ok, using vanilla scsi tape.");
[128]2230 strcpy(bkpinfo->media_device, VANILLA_SCSI_TAPE);
2231 if ((fin = fopen(bkpinfo->media_device, "r"))) {
2232 paranoid_fclose(fin);
2233 } else {
2234 strcpy(bkpinfo->media_device, "/dev/osst0");
2235 }
2236 }
2237 if (bkpinfo->media_device[0]) {
2238 if ((fin = fopen(bkpinfo->media_device, "r"))) {
2239 paranoid_fclose(fin);
2240 } else {
2241 if (does_file_exist("/tmp/mondo-restore.cfg")) {
2242 read_cfg_var("/tmp/mondo-restore.cfg", "media-dev",
2243 bkpinfo->media_device);
2244 }
2245 }
2246 }
2247 if (bkpinfo->media_device[0]) {
[2290]2248 mr_asprintf(&tmp, "I think I've found your tape streamer at %s; am I right on the money?", bkpinfo->media_device);
[128]2249 if (!ask_me_yes_or_no(tmp)) {
2250 bkpinfo->media_device[0] = '\0';
2251 }
[2214]2252 mr_free(tmp);
[128]2253 }
2254 if (!bkpinfo->media_device[0]) {
2255 if (!popup_and_get_string
[541]2256 ("Device name?",
2257 "What is the /dev entry of your tape streamer?",
[128]2258 bkpinfo->media_device, MAX_STR_LEN / 4)) {
[541]2259 log_to_screen("User has chosen not to backup the PC");
[128]2260 finish(1);
2261 }
2262 }
[2214]2263 mr_asprintf(&tmp, "ls -l %s", bkpinfo->media_device);
[128]2264 if (run_program_and_log_output(tmp, FALSE)) {
[541]2265 log_to_screen("User has not specified a valid /dev entry");
[128]2266 finish(1);
2267 }
[2214]2268 mr_free(tmp);
[128]2269 log_msg(4, "sz_size = %s", sz_size);
2270 sz_size[0] = '\0';
[2214]2271
[1970]2272 bkpinfo->use_obdr = ask_me_yes_or_no
2273 ("Do you want to activate OBDR support for your tapes ?");
[128]2274 if (sz_size[0] == '\0') {
2275 bkpinfo->media_size[0] = 0;
2276 } else {
2277 bkpinfo->media_size[0] =
2278 friendly_sizestr_to_sizelong(sz_size) / 2 - 50;
2279 }
2280 log_msg(4, "media_size[0] = %ld", bkpinfo->media_size[0]);
2281 if (bkpinfo->media_size[0] <= 0) {
2282 bkpinfo->media_size[0] = 0;
2283 }
2284 for (i = 1; i <= MAX_NOOF_MEDIA; i++) {
2285 bkpinfo->media_size[i] = bkpinfo->media_size[0];
2286 }
2287 if (archiving_to_media) {
2288 if ((bkpinfo->compression_level =
2289 which_compression_level()) == -1) {
[541]2290 log_to_screen("User has chosen not to backup the PC");
[128]2291 finish(1);
2292 }
2293 }
2294 break;
[1]2295
2296
2297
[2380]2298 case netfs:
2299 /* Never try to eject a NETFS device */
[1848]2300 bkpinfo->please_dont_eject = TRUE;
2301
[2380]2302 /* Initiate bkpinfo netfs_mount path from running environment if not already done */
2303 if (!bkpinfo->netfs_mount[0]) {
2304 strcpy(bkpinfo->netfs_mount,
[128]2305 call_program_and_get_last_line_of_output
2306 ("mount | grep \":\" | cut -d' ' -f1 | head -n1"));
2307 }
[1]2308#ifdef __FreeBSD__
[128]2309 if (TRUE)
[1]2310#else
[128]2311 if (!bkpinfo->disaster_recovery)
[1]2312#endif
[128]2313 {
2314 if (!popup_and_get_string
[2380]2315 ("Network shared dir.",
[541]2316 "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.)",
[2380]2317 bkpinfo->netfs_mount, MAX_STR_LEN / 4)) {
[541]2318 log_to_screen("User has chosen not to backup the PC");
[128]2319 finish(1);
2320 }
2321 if (!bkpinfo->restore_data) {
2322 if ((bkpinfo->compression_level =
2323 which_compression_level()) == -1) {
[541]2324 log_to_screen("User has chosen not to backup the PC");
[128]2325 finish(1);
2326 }
2327 }
2328 // check whether already mounted - we better remove
2329 // surrounding spaces and trailing '/' for this
[2380]2330 strip_spaces(bkpinfo->netfs_mount);
2331 if (bkpinfo->netfs_mount[strlen(bkpinfo->netfs_mount) - 1] == '/')
2332 bkpinfo->netfs_mount[strlen(bkpinfo->netfs_mount) - 1] = '\0';
[128]2333 sprintf(command, "mount | grep \"%s \" | cut -d' ' -f3",
[2380]2334 bkpinfo->netfs_mount);
[128]2335 strcpy(bkpinfo->isodir,
2336 call_program_and_get_last_line_of_output(command));
[256]2337
[1847]2338 if (!bkpinfo->restore_data) {
[2472]2339 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
[1847]2340 sprintf(comment,
[541]2341 "How much data (in Megabytes) will each media store?");
[1847]2342 if (!popup_and_get_string("Size", comment, sz_size, 5)) {
2343 log_to_screen("User has chosen not to backup the PC");
2344 finish(1);
2345 }
2346 } else {
[1917]2347 strcpy(sz_size, "0");
[256]2348 }
2349 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2350 bkpinfo->media_size[i] = atoi(sz_size);
2351 }
[1917]2352 if (bkpinfo->media_size[0] < 0) {
[541]2353 log_to_screen("User has chosen not to backup the PC");
[256]2354 finish(1);
2355 }
[128]2356 }
2357 if (bkpinfo->disaster_recovery) {
[1644]2358 sprintf(command ,"umount %s/isodir 2> /dev/null", bkpinfo->tmpdir);
[2202]2359 (void)system(command);
[2401]2360 strcpy(tmp1, bkpinfo->netfs_proto);
[128]2361 if (!popup_and_get_string
[2399]2362 ("Network protocol", "Which protocol should I use?",
2363 tmp1, MAX_STR_LEN)) {
2364 log_to_screen("User has chosen not to backup the PC");
2365 finish(1);
2366 }
[2401]2367 mr_free(bkpinfo->netfs_proto);
2368 mr_asprintf(&(bkpinfo->netfs_proto), "%s", tmp1);
[2399]2369 if (!popup_and_get_string
[2380]2370 ("Network share", "Which remote share should I mount?",
2371 bkpinfo->netfs_mount, MAX_STR_LEN)) {
[541]2372 log_to_screen("User has chosen not to backup the PC");
[128]2373 finish(1);
2374 }
2375 }
[1858]2376 /* Initiate bkpinfo isodir path from running environment if mount already done */
[2380]2377 if (is_this_device_mounted(bkpinfo->netfs_mount)) {
[1858]2378 strcpy(bkpinfo->isodir,
2379 call_program_and_get_last_line_of_output
2380 ("mount | grep \":\" | cut -d' ' -f3 | head -n1"));
2381 } else {
[2380]2382 sprintf(bkpinfo->isodir, "%s/netfsdir", bkpinfo->tmpdir);
[128]2383 sprintf(command, "mkdir -p %s", bkpinfo->isodir);
2384 run_program_and_log_output(command, 5);
[2361]2385 if (bkpinfo->restore_data) {
[2380]2386 if (strstr(bkpinfo->netfs_proto, "sshfs")) {
2387 mr_asprintf(&tmp, "sshfs -o ro %s %s", bkpinfo->netfs_mount, bkpinfo->isodir);
2388 } else {
2389 mr_asprintf(&tmp, "mount -t %s -o nolock,ro %s %s", bkpinfo->netfs_proto, bkpinfo->netfs_mount, bkpinfo->isodir);
2390 }
[2368]2391 } else {
[2380]2392 if (strstr(bkpinfo->netfs_proto, "sshfs")) {
2393 mr_asprintf(&tmp, "sshfs %s %s", bkpinfo->netfs_mount, bkpinfo->isodir);
2394 } else {
2395 mr_asprintf(&tmp, "mount -t %s -o nolock %s %s", bkpinfo->netfs_proto, bkpinfo->netfs_mount, bkpinfo->isodir);
2396 }
[2361]2397 }
[1819]2398 run_program_and_log_output(tmp, 3);
[2214]2399 mr_free(tmp);
2400
[128]2401 malloc_string(g_selfmounted_isodir);
2402 strcpy(g_selfmounted_isodir, bkpinfo->isodir);
2403 }
[2380]2404 if (!is_this_device_mounted(bkpinfo->netfs_mount)) {
[128]2405 popup_and_OK
[541]2406 ("Please mount that partition before you try to backup to or restore from it.");
[128]2407 finish(1);
2408 }
[2380]2409 strcpy(tmp1, bkpinfo->netfs_remote_dir);
[128]2410 if (!popup_and_get_string
[2304]2411 ("Directory", "Which directory within that mountpoint?", tmp1,
[128]2412 MAX_STR_LEN)) {
[541]2413 log_to_screen("User has chosen not to backup the PC");
[128]2414 finish(1);
2415 }
[2380]2416 strcpy(bkpinfo->netfs_remote_dir, tmp1);
[2214]2417
[128]2418 // check whether writable - we better remove surrounding spaces for this
[2380]2419 strip_spaces(bkpinfo->netfs_remote_dir);
[1767]2420
[251]2421 if (!popup_and_get_string
[541]2422 ("Prefix.",
2423 "Please enter the prefix that will be prepended to your ISO filename. Example: machine1 to obtain machine1-[1-9]*.iso files",
[251]2424 bkpinfo->prefix, MAX_STR_LEN / 4)) {
[541]2425 log_to_screen("User has chosen not to backup the PC");
[251]2426 finish(1);
2427 }
2428 log_msg(3, "prefix set to %s", bkpinfo->prefix);
[99]2429
[128]2430 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2431 bkpinfo->media_size[i] = 650;
2432 }
[2380]2433 log_msg(3, "Just set netfs_remote_dir to %s",
2434 bkpinfo->netfs_remote_dir);
[128]2435 log_msg(3, "isodir is still %s", bkpinfo->isodir);
2436 break;
[1]2437
[128]2438 case iso:
2439 if (!bkpinfo->disaster_recovery) {
2440 if (!popup_and_get_string
[541]2441 ("Storage dir.",
[1503]2442 "Please enter the full path name to the directory for your ISO images. Example: /mnt/raid0_0",
[128]2443 bkpinfo->isodir, MAX_STR_LEN / 4)) {
[541]2444 log_to_screen("User has chosen not to backup the PC");
[128]2445 finish(1);
2446 }
2447 if (archiving_to_media) {
2448 if ((bkpinfo->compression_level =
2449 which_compression_level()) == -1) {
[541]2450 log_to_screen("User has chosen not to backup the PC");
[128]2451 finish(1);
2452 }
[2472]2453 sprintf(sz_size, "%d", DEFAULT_DVD_DISK_SIZE); // 4.7 salesman's GB = 4.482 real GB = 4482 MB
[128]2454 if (!popup_and_get_string
[541]2455 ("ISO size.",
[2472]2456 "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.",
[128]2457 sz_size, 16)) {
[541]2458 log_to_screen("User has chosen not to backup the PC");
[128]2459 finish(1);
2460 }
2461 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2462 bkpinfo->media_size[i] = atoi(sz_size);
2463 }
2464 } else {
2465 for (i = 0; i <= MAX_NOOF_MEDIA; i++) {
2466 bkpinfo->media_size[i] = 650;
2467 }
2468 }
2469 }
[804]2470 if (!popup_and_get_string
2471 ("Prefix.",
2472 "Please enter the prefix that will be prepended to your ISO filename. Example: machine1 to obtain machine1-[1-9]*.iso files",
2473 bkpinfo->prefix, MAX_STR_LEN / 4)) {
2474 log_to_screen("User has chosen not to backup the PC");
2475 finish(1);
2476 }
2477 log_msg(3, "prefix set to %s", bkpinfo->prefix);
[128]2478 break;
2479 default:
2480 fatal_error
2481 ("I, Mojo Jojo, shall defeat those pesky Powerpuff Girls!");
2482 }
[1]2483
[128]2484 if (archiving_to_media) {
[1]2485
2486#ifdef __FreeBSD__
[128]2487 strcpy(bkpinfo->boot_device,
2488 call_program_and_get_last_line_of_output
2489 ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/\\([0-9]\\).*/\\1/'"));
[1]2490#else
[128]2491 strcpy(bkpinfo->boot_device,
2492 call_program_and_get_last_line_of_output
2493 ("mount | grep ' / ' | head -1 | cut -d' ' -f1 | sed 's/[0-9].*//'"));
[1]2494#endif
[128]2495 i = which_boot_loader(bkpinfo->boot_device);
2496 if (i == 'U') // unknown
2497 {
[1]2498
2499#ifdef __FreeBSD__
[128]2500 if (!popup_and_get_string
[541]2501 ("Boot device",
2502 "What is your boot device? (e.g. /dev/ad0)",
[128]2503 bkpinfo->boot_device, MAX_STR_LEN / 4)) {
[541]2504 log_to_screen("User has chosen not to backup the PC");
[128]2505 finish(1);
2506 }
2507 i = which_boot_loader(bkpinfo->boot_device);
[1]2508#else
[128]2509 if (!popup_and_get_string
[541]2510 ("Boot device",
2511 "What is your boot device? (e.g. /dev/hda)",
[128]2512 bkpinfo->boot_device, MAX_STR_LEN / 4)) {
[541]2513 log_to_screen("User has chosen not to backup the PC");
[128]2514 finish(1);
2515 }
2516 if (does_string_exist_in_boot_block
2517 (bkpinfo->boot_device, "LILO")) {
2518 i = 'L';
2519 } else
2520 if (does_string_exist_in_boot_block
2521 (bkpinfo->boot_device, "ELILO")) {
2522 i = 'E';
2523 } else
2524 if (does_string_exist_in_boot_block
2525 (bkpinfo->boot_device, "GRUB")) {
2526 i = 'G';
2527 } else {
2528 i = 'U';
2529 }
[1]2530#endif
[128]2531 if (i == 'U') {
2532 if (ask_me_yes_or_no
[541]2533 ("Unidentified boot loader. Shall I restore it byte-for-byte at restore time and hope for the best?"))
[128]2534 {
2535 i = 'R'; // raw
2536 } else {
2537 log_to_screen
[541]2538 ("I cannot find your boot loader. Please run mondoarchive with parameters.");
[128]2539 finish(1);
2540 }
2541 }
[1]2542 }
[128]2543 bkpinfo->boot_loader = i;
2544 strcpy(bkpinfo->include_paths, "/");
2545 if (!popup_and_get_string
[541]2546 ("Backup paths",
2547 "Please enter paths which you want me to backup. The default is '/' (i.e. everything).",
[128]2548 bkpinfo->include_paths, MAX_STR_LEN)) {
[541]2549 log_to_screen("User has chosen not to backup the PC");
[128]2550 finish(1);
[1]2551 }
[2380]2552 mr_asprintf(&tmp, "%s", list_of_NETFS_mounts_only());
[128]2553 if (strlen(tmp) > 2) {
2554 if (bkpinfo->exclude_paths[0]) {
2555 strcat(bkpinfo->exclude_paths, " ");
2556 }
2557 strncpy(bkpinfo->exclude_paths, tmp, MAX_STR_LEN);
2558 }
[2214]2559 mr_free(tmp);
[1]2560// NTFS
[2304]2561 strcpy(tmp1, call_program_and_get_last_line_of_output("parted2fdisk -l | grep -i ntfs | awk '{ print $1};' | tr -s '\\n' ' ' | awk '{ print $0};'"));
2562 if (strlen(tmp1) > 2) {
[128]2563 if (!popup_and_get_string
[541]2564 ("NTFS partitions",
2565 "Please enter/confirm the NTFS partitions you wish to backup as well.",
[2304]2566 tmp1, MAX_STR_LEN / 4)) {
[541]2567 log_to_screen("User has chosen not to backup the PC");
[128]2568 finish(1);
2569 }
[2304]2570 strncpy(bkpinfo->image_devs, tmp1, MAX_STR_LEN / 4);
[128]2571 }
[1]2572
2573
[128]2574 if (!popup_and_get_string
[541]2575 ("Exclude paths",
2576 "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.",
[1540]2577 bkpinfo->exclude_paths, (4*MAX_STR_LEN)-1)) {
[541]2578 log_to_screen("User has chosen not to backup the PC");
[128]2579 finish(1);
2580 }
[2485]2581 /* Always needs to be finished by a space */
2582 if (bkpinfo->exclude_paths[0]) {
2583 strcat(bkpinfo->exclude_paths, " ");
2584 }
[2220]2585 if (!popup_and_get_string
2586 ("Temporary directory",
2587 "Please enter your temporary directory.",
2588 bkpinfo->tmpdir, (4*MAX_STR_LEN)-1)) {
2589 log_to_screen("User has chosen not to backup the PC");
2590 finish(1);
2591 }
2592 if (!popup_and_get_string
2593 ("Scratch directory",
2594 "Please enter your scratch directory.",
2595 bkpinfo->scratchdir, (4*MAX_STR_LEN)-1)) {
2596 log_to_screen("User has chosen not to backup the PC");
2597 finish(1);
2598 }
[1575]2599// Interactive mode:
2600#ifdef __IA64__
2601 bkpinfo->make_cd_use_lilo = TRUE;
2602#else
[128]2603 bkpinfo->make_cd_use_lilo = FALSE;
[1575]2604#endif
[128]2605 bkpinfo->backup_data = TRUE;
2606 bkpinfo->verify_data =
2607 ask_me_yes_or_no
[541]2608 ("Will you want to verify your backups after Mondo has created them?");
[1]2609
2610#ifndef __FreeBSD__
[128]2611 if (!ask_me_yes_or_no
[541]2612 ("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."))
[1]2613#endif
[128]2614 {
2615 strcpy(bkpinfo->kernel_path, "FAILSAFE");
2616 }
[1]2617
[128]2618 if (!ask_me_yes_or_no
[541]2619 ("Are you sure you want to proceed? Hit 'no' to abort.")) {
2620 log_to_screen("User has chosen not to backup the PC");
[128]2621 finish(1);
2622 }
2623 } else {
2624 bkpinfo->restore_data = TRUE; // probably...
2625 }
[1]2626
[128]2627 if (bkpinfo->backup_media_type == iso
[2380]2628 || bkpinfo->backup_media_type == netfs) {
[128]2629 g_ISO_restore_mode = TRUE;
2630 }
[1]2631#ifdef __FreeSD__
2632// skip
2633#else
[2380]2634 if (bkpinfo->backup_media_type == netfs) {
2635 log_msg(3, "I think the Remote mount is mounted at %s",
[128]2636 bkpinfo->isodir);
2637 }
2638 log_it("isodir = %s", bkpinfo->isodir);
[2380]2639 log_it("netfs_mount = '%s'", bkpinfo->netfs_mount);
2640 log_it("netfs_proto = '%s'", bkpinfo->netfs_proto);
2641 if (bkpinfo->netfs_user) {
2642 log_it("netfs_user = '%s'", bkpinfo->netfs_user);
[2224]2643 }
[1]2644#endif
2645
[128]2646 log_it("media device = %s", bkpinfo->media_device);
2647 log_it("media size = %ld", bkpinfo->media_size[1]);
2648 log_it("media type = %s",
2649 bkptype_to_string(bkpinfo->backup_media_type));
[251]2650 log_it("prefix = %s", bkpinfo->prefix);
[128]2651 log_it("compression = %ld", bkpinfo->compression_level);
[2473]2652 log_it("exclude_path = %s", bkpinfo->exclude_paths);
2653 log_it("include_path = %s", bkpinfo->include_paths);
[2424]2654
2655 /* Handle devices passed in bkpinfo and print result */
[2473]2656 /* the mr_make_devlist_from_pathlist function appends
2657 * to the *_paths variables so copy before */
2658 mr_asprintf(&tmp, "%s ", bkpinfo->exclude_paths);
2659 mr_make_devlist_from_pathlist(tmp, 'E');
2660 mr_free(tmp);
2661 mr_asprintf(&tmp, "%s ", bkpinfo->include_paths);
2662 mr_make_devlist_from_pathlist(tmp, 'I');
2663 mr_free(tmp);
[2424]2664
[128]2665 log_it("scratchdir = '%s'", bkpinfo->scratchdir);
2666 log_it("tmpdir = '%s'", bkpinfo->tmpdir);
[1404]2667 log_it("image_devs = '%s'", bkpinfo->image_devs);
[128]2668 log_it("boot_device = '%s' (loader=%c)", bkpinfo->boot_device,
2669 bkpinfo->boot_loader);
2670 if (bkpinfo->media_size[0] < 0) {
2671 if (archiving_to_media) {
2672 fatal_error("Media size is less than zero.");
2673 } else {
2674 log_msg(2, "Warning - media size is less than zero.");
2675 bkpinfo->media_size[0] = 0;
2676 }
[1]2677 }
[128]2678 paranoid_free(sz_size);
[2305]2679 paranoid_free(tmp1);
[128]2680 paranoid_free(command);
2681 paranoid_free(comment);
2682 paranoid_free(prompt);
2683 return (0);
[1]2684}
2685
2686
2687
2688
2689/**
2690 * @addtogroup utilityGroup
2691 * @{
2692 */
2693/**
[2380]2694 * Get a space-separated list of NETFS devices and mounts.
[1]2695 * @return The list created.
2696 * @note The return value points to static data that will be overwritten with each call.
2697 */
[2380]2698char *list_of_NETFS_devices_and_mounts(void)
[1]2699{
[2214]2700 char *exclude_these_devices = NULL;
2701 char *exclude_these_directories = NULL;
[2187]2702 static char result_sz[1024];
[1]2703
[2380]2704 mr_asprintf(&exclude_these_directories,"%s",list_of_NETFS_mounts_only());
2705 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;}'"));
[2224]2706 snprintf(result_sz, 1023, "%s %s", exclude_these_directories, exclude_these_devices);
[2214]2707 mr_free(exclude_these_devices);
2708 mr_free(exclude_these_directories);
[128]2709 return (result_sz);
[1]2710}
2711
2712
2713
2714
2715/**
[2380]2716 * Get a space-separated list of NETFS mounts.
[1]2717 * @return The list created.
2718 * @note The return value points to static data that will be overwritten with each call.
2719 * @bug Even though we only want the mounts, the devices are still checked.
2720 */
[2380]2721char *list_of_NETFS_mounts_only(void)
[1]2722{
[2214]2723 char *exclude_these_directories = NULL;
[128]2724 static char result_sz[512];
[1]2725
[2380]2726 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;}'"));
[2224]2727 snprintf(result_sz, 511, "%s", exclude_these_directories);
[2214]2728 mr_free(exclude_these_directories);
[128]2729 return (result_sz);
[1]2730}
2731
2732/* @} - end of utilityGroup */
2733
2734
2735
2736
2737
2738/**
2739 * Create a randomly-named FIFO. The format is @p stub "." [random] [random] where
2740 * [random] is a random number between 1 and 32767.
2741 * @param store_name_here Where to store the new filename.
2742 * @param stub A random number will be appended to this to make the FIFO's name.
2743 * @ingroup deviceGroup
2744 */
[128]2745void make_fifo(char *store_name_here, char *stub)
[1]2746{
[128]2747 char *tmp;
[1]2748
[128]2749 malloc_string(tmp);
2750 assert_string_is_neither_NULL_nor_zerolength(stub);
[1]2751
[128]2752 sprintf(store_name_here, "%s%d%d", stub, (int) (random() % 32768),
2753 (int) (random() % 32768));
2754 make_hole_for_file(store_name_here);
2755 mkfifo(store_name_here, S_IRWXU | S_IRWXG);
2756 sprintf(tmp, "chmod 770 %s", store_name_here);
2757 paranoid_system(tmp);
2758 paranoid_free(tmp);
[1]2759}
2760
2761
2762
2763
2764
2765
2766/**
2767 * Set the tmpdir and scratchdir to reside on the partition with the most free space.
2768 * Automatically excludes DOS, NTFS, SMB, and NFS filesystems.
2769 * @param bkpinfo The backup information structure. @c bkpinfo->tmpdir and @c bkpinfo->scratchdir will be set.
2770 * @ingroup utilityGroup
2771 */
[1645]2772void sensibly_set_tmpdir_and_scratchdir()
[1]2773{
[2211]2774 char *tmp = NULL;
[2214]2775 char *command = NULL;
2776 char *sz = NULL;
[1]2777
[128]2778 assert(bkpinfo != NULL);
[1]2779
2780#ifdef __FreeBSD__
[2501]2781 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"));
[1]2782#else
[2501]2783 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"));
[1]2784#endif
2785
[128]2786 if (tmp[0] != '/') {
[2290]2787 mr_asprintf(&sz, "%s", tmp);
[2211]2788 paranoid_free(tmp);
2789 mr_asprintf(&tmp, "/%s", sz);
[2214]2790 mr_free(sz);
[128]2791 }
2792 if (!tmp[0]) {
2793 fatal_error("I couldn't figure out the tempdir!");
2794 }
[1655]2795 setup_tmpdir(tmp);
[128]2796 log_it("bkpinfo->tmpdir is being set to %s", bkpinfo->tmpdir);
[1]2797
[128]2798 sprintf(bkpinfo->scratchdir, "%s/mondo.scratch.%d", tmp,
2799 (int) (random() % 32768));
2800 log_it("bkpinfo->scratchdir is being set to %s", bkpinfo->scratchdir);
[1]2801
[2214]2802 mr_asprintf(&command, "rm -Rf %s/tmp.mondo.* %s/mondo.scratch.*", tmp, tmp);
[2211]2803 paranoid_free(tmp);
2804
[128]2805 paranoid_system(command);
[2214]2806 mr_free(command);
[1]2807}
2808
2809
2810
2811
2812
2813
2814/**
2815 * @addtogroup deviceGroup
2816 * @{
2817 */
2818/**
2819 * If we can read @p dev, set @p output to it.
2820 * If @p dev cannot be read, set @p output to "".
2821 * @param dev The device to check for.
2822 * @param output Set to @p dev if @p dev exists, "" otherwise.
2823 * @return TRUE if @p dev exists, FALSE if it doesn't.
2824 */
[128]2825bool set_dev_to_this_if_rx_OK(char *output, char *dev)
[1]2826{
[128]2827 char *command;
[1]2828
[128]2829 malloc_string(command);
2830 if (!dev || dev[0] == '\0') {
2831 output[0] = '\0';
2832 return (FALSE);
2833 }
[1]2834// assert_string_is_neither_NULL_nor_zerolength(dev);
[128]2835 log_msg(10, "Injecting %s", dev);
2836 inject_device(dev);
2837 if (!does_file_exist(dev)) {
2838 log_msg(10, "%s doesn't exist. Returning FALSE.", dev);
2839 return (FALSE);
2840 }
2841 sprintf(command, "dd bs=%ld count=1 if=%s of=/dev/null &> /dev/null",
2842 512L, dev);
2843 if (!run_program_and_log_output(command, FALSE)
2844 && !run_program_and_log_output(command, FALSE)) {
2845 strcpy(output, dev);
2846 log_msg(4, "Found it - %s", dev);
2847 return (TRUE);
2848 } else {
2849 output[0] = '\0';
2850 log_msg(4, "It's not %s", dev);
2851 return (FALSE);
2852 }
[1]2853}
2854
2855
2856
2857
2858
2859/**
2860 * Find out what number CD is in the drive.
2861 * @param bkpinfo The backup information structure. The @c bkpinfo->media_device field is the only one used.
2862 * @return The current CD number, or -1 if it could not be found.
2863 * @note If the CD is not mounted, it will be mounted
2864 * (and remain mounted after this function returns).
2865 */
[1645]2866int what_number_cd_is_this()
[1]2867{
[128]2868 int cd_number = -1;
[2211]2869 char *mountdev = NULL;
2870 char *tmp = NULL;
[1]2871
[128]2872 assert(bkpinfo != NULL);
[1]2873// log_it("Asking what_number_cd_is_this");
[128]2874 if (g_ISO_restore_mode) {
[2211]2875 mr_asprintf(&tmp, "mount | grep iso9660 | awk '{print $3;}'");
[1]2876
[2211]2877 mr_asprintf(&mountdev, "%s%s", call_program_and_get_last_line_of_output(tmp), "/archives/THIS-CD-NUMBER");
[128]2878 cd_number = atoi(last_line_of_file(mountdev));
2879 paranoid_free(mountdev);
2880 paranoid_free(tmp);
[2211]2881
[128]2882 return (cd_number);
2883 }
[1]2884
[2290]2885 mr_asprintf(&mountdev, "%s", bkpinfo->media_device);
[128]2886 if (!mountdev[0]) {
2887 log_it
2888 ("(what_number_cd_is_this) Warning - media_device unknown. Finding out...");
2889 find_cdrom_device(bkpinfo->media_device, FALSE);
2890 }
2891 if (!is_this_device_mounted(MNT_CDROM)) {
[1741]2892 if (bkpinfo->backup_media_type == usb) {
2893 mount_USB_here(mountdev, MNT_CDROM);
2894 } else {
2895 mount_CDROM_here(mountdev, MNT_CDROM);
2896 }
[128]2897 }
2898 paranoid_free(mountdev);
[2211]2899
2900 cd_number = atoi(last_line_of_file(MNT_CDROM "/archives/THIS-CD-NUMBER"));
[128]2901 return (cd_number);
[1]2902}
2903
2904
2905
2906
2907
2908
2909
2910/**
2911 * Find out what device is mounted as root (/).
2912 * @return Root device.
2913 * @note The returned string points to static storage and will be overwritten with every call.
2914 * @bug A bit of a misnomer; it's actually finding out the root device.
2915 * The mountpoint (where it's mounted) will obviously be '/'.
2916 */
[128]2917char *where_is_root_mounted()
[1]2918{
[128]2919 /*@ buffers **************** */
2920 static char tmp[MAX_STR_LEN];
[1]2921
2922
2923#ifdef __FreeBSD__
[128]2924 strcpy(tmp, call_program_and_get_last_line_of_output
2925 ("mount | grep \" on / \" | cut -d' ' -f1"));
[1]2926#else
[128]2927 strcpy(tmp, call_program_and_get_last_line_of_output
2928 ("mount | grep \" on / \" | cut -d' ' -f1 | sed s/[0-9]// | sed s/[0-9]//"));
2929 if (strstr(tmp, "/dev/cciss/")) {
2930 strcpy(tmp, call_program_and_get_last_line_of_output
2931 ("mount | grep \" on / \" | cut -d' ' -f1 | cut -dp -f1"));
2932 }
2933 if (strstr(tmp, "/dev/md")) {
2934 strcpy(tmp,
2935 call_program_and_get_last_line_of_output
2936 ("mount | grep \" on / \" | cut -d' ' -f1"));
2937 }
[1]2938#endif
2939
[128]2940 return (tmp);
[1]2941}
2942
2943
2944/**
2945 * Find out which boot loader is in use.
2946 * @param which_device Device to look for the boot loader on.
2947 * @return 'L' for LILO, 'E'for ELILO, 'G' for GRUB, 'B' or 'D' for FreeBSD boot loaders, or 'U' for Unknown.
2948 * @note Under Linux, all drives are examined, not just @p which_device.
2949 */
2950#ifdef __FreeBSD__
[128]2951char which_boot_loader(char *which_device)
[1]2952{
[128]2953 int count_lilos = 0;
2954 int count_grubs = 0;
2955 int count_boot0s = 0;
2956 int count_dangerouslydedicated = 0;
[1]2957
[128]2958 log_it("looking at drive %s's MBR", which_device);
2959 if (does_string_exist_in_boot_block(which_device, "GRUB")) {
2960 count_grubs++;
2961 }
2962 if (does_string_exist_in_boot_block(which_device, "LILO")) {
2963 count_lilos++;
2964 }
2965 if (does_string_exist_in_boot_block(which_device, "Drive")) {
2966 count_boot0s++;
2967 }
2968 if (does_string_exist_in_first_N_blocks
2969 (which_device, "FreeBSD/i386", 17)) {
2970 count_dangerouslydedicated++;
2971 }
2972 log_it("%d grubs and %d lilos and %d elilos and %d boot0s and %d DD\n",
2973 count_grubs, count_lilos, count_elilos, count_boot0s,
2974 count_dangerouslydedicated);
[1]2975
[128]2976 if (count_grubs && !count_lilos) {
2977 return ('G');
2978 } else if (count_lilos && !count_grubs) {
2979 return ('L');
2980 } else if (count_grubs == 1 && count_lilos == 1) {
2981 log_it("I'll bet you used to use LILO but switched to GRUB...");
2982 return ('G');
2983 } else if (count_boot0s == 1) {
2984 return ('B');
2985 } else if (count_dangerouslydedicated) {
2986 return ('D');
2987 } else {
2988 log_it("Unknown boot loader");
2989 return ('U');
2990 }
[1]2991}
2992
2993#else
2994
[128]2995char which_boot_loader(char *which_device)
[1]2996{
[128]2997 /*@ buffer ***************************************************** */
[2241]2998 char *list_drives_cmd = NULL;
[128]2999 char *current_drive;
[1]3000
[128]3001 /*@ pointers *************************************************** */
3002 FILE *pdrives;
[1]3003
[128]3004 /*@ int ******************************************************** */
3005 int count_lilos = 0;
3006 int count_grubs = 0;
[1]3007
[128]3008 /*@ end vars *************************************************** */
[1]3009
[128]3010 malloc_string(current_drive);
[1]3011
3012#ifdef __IA64__
[128]3013 /* No choice for it */
3014 return ('E');
[1]3015#endif
[128]3016 assert(which_device != NULL);
[1]3017
[2290]3018 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());
[128]3019 log_it("list_drives_cmd = %s", list_drives_cmd);
[1]3020
[128]3021 if (!(pdrives = popen(list_drives_cmd, "r"))) {
3022 log_OS_error("Unable to open list of drives");
[2241]3023 mr_free(list_drives_cmd);
[128]3024 paranoid_free(current_drive);
3025 return ('\0');
[1]3026 }
[2241]3027 mr_free(list_drives_cmd);
3028
[2202]3029 for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
3030 (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
[128]3031 strip_spaces(current_drive);
3032 log_it("looking at drive %s's MBR", current_drive);
3033 if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
3034 count_grubs++;
3035 strcpy(which_device, current_drive);
3036 break;
3037 }
3038 if (does_string_exist_in_boot_block(current_drive, "LILO")) {
3039 count_lilos++;
3040 strcpy(which_device, current_drive);
3041 break;
3042 }
[1]3043 }
[128]3044 if (pclose(pdrives)) {
3045 log_OS_error("Cannot pclose pdrives");
3046 }
3047 log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
3048 if (count_grubs && !count_lilos) {
[2241]3049 paranoid_free(current_drive);
[128]3050 return ('G');
3051 } else if (count_lilos && !count_grubs) {
[2241]3052 paranoid_free(current_drive);
[128]3053 return ('L');
3054 } else if (count_grubs == 1 && count_lilos == 1) {
3055 log_it("I'll bet you used to use LILO but switched to GRUB...");
[2241]3056 paranoid_free(current_drive);
[128]3057 return ('G');
3058 } else {
[1451]3059 // We need to look on each partition then
[2290]3060 mr_asprintf(&list_drives_cmd, "parted2fdisk -l 2>/dev/null | grep -E \"^/dev/\" | tr -s ':' ' ' | tr -s ' ' '\n' | grep /dev/");
[1451]3061 log_it("list_drives_cmd = %s", list_drives_cmd);
3062
3063 if (!(pdrives = popen(list_drives_cmd, "r"))) {
3064 log_OS_error("Unable to open list of drives");
[2241]3065 mr_free(list_drives_cmd);
[1451]3066 paranoid_free(current_drive);
3067 return ('\0');
3068 }
[2241]3069 mr_free(list_drives_cmd);
3070
[2202]3071 for ((void)fgets(current_drive, MAX_STR_LEN, pdrives); !feof(pdrives);
3072 (void)fgets(current_drive, MAX_STR_LEN, pdrives)) {
[1451]3073 strip_spaces(current_drive);
3074 log_it("looking at partition %s's BR", current_drive);
3075 if (does_string_exist_in_boot_block(current_drive, "GRUB")) {
3076 count_grubs++;
3077 strcpy(which_device, current_drive);
3078 break;
3079 }
3080 if (does_string_exist_in_boot_block(current_drive, "LILO")) {
3081 count_lilos++;
3082 strcpy(which_device, current_drive);
3083 break;
3084 }
3085 }
3086 if (pclose(pdrives)) {
3087 log_OS_error("Cannot pclose pdrives");
3088 }
3089 log_it("%d grubs and %d lilos\n", count_grubs, count_lilos);
3090 paranoid_free(current_drive);
3091 if (count_grubs && !count_lilos) {
3092 return ('G');
3093 } else if (count_lilos && !count_grubs) {
3094 return ('L');
3095 } else if (count_grubs == 1 && count_lilos == 1) {
3096 log_it("I'll bet you used to use LILO but switched to GRUB...");
3097 return ('G');
3098 } else {
3099 log_it("Unknown boot loader");
3100 return ('U');
3101 }
[128]3102 }
[1]3103}
3104#endif
3105
3106
3107
3108
3109/**
3110 * Write zeroes over the first 16K of @p device.
3111 * @param device The device to zero.
3112 * @return 0 for success, 1 for failure.
3113 */
[128]3114int zero_out_a_device(char *device)
[1]3115{
[128]3116 FILE *fout;
3117 int i;
[1]3118
[128]3119 assert_string_is_neither_NULL_nor_zerolength(device);
[1]3120
[128]3121 log_it("Zeroing drive %s", device);
3122 if (!(fout = fopen(device, "w"))) {
3123 log_OS_error("Unable to open/write to device");
3124 return (1);
3125 }
3126 for (i = 0; i < 16384; i++) {
3127 fputc('\0', fout);
3128 }
3129 paranoid_fclose(fout);
3130 log_it("Device successfully zeroed.");
3131 return (0);
[1]3132}
3133
3134/**
3135 * Return the device pointed to by @p incoming.
3136 * @param incoming The device to resolve symlinks for.
3137 * @return The path to the real device file.
3138 * @note The returned string points to static storage that will be overwritten with each call.
3139 * @bug Won't work with file v4.0; needs to be written in C.
3140 */
[128]3141char *resolve_softlinks_to_get_to_actual_device_file(char *incoming)
[1]3142{
[128]3143 static char output[MAX_STR_LEN];
3144 char *command;
3145 char *curr_fname;
[2214]3146 char *scratch = NULL;
3147 char *tmp = NULL;
[128]3148 char *p;
3149
3150 struct stat statbuf;
3151 command = malloc(1000);
3152 malloc_string(curr_fname);
3153 if (!does_file_exist(incoming)) {
3154 log_it
3155 ("resolve_softlinks_to_get_to_actual_device_file --- device not found");
3156 strcpy(output, incoming);
3157 } else {
3158 strcpy(curr_fname, incoming);
3159 lstat(curr_fname, &statbuf);
3160 while (S_ISLNK(statbuf.st_mode)) {
3161 log_msg(1, "curr_fname = %s", curr_fname);
3162 sprintf(command, "file %s", curr_fname);
[2290]3163 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
[128]3164 for (p = tmp + strlen(tmp); p != tmp && *p != '`' && *p != ' ';
3165 p--);
3166 p++;
[2290]3167 mr_asprintf(&scratch, "%s", p);
[128]3168 for (p = scratch; *p != '\0' && *p != '\''; p++);
3169 *p = '\0';
[2214]3170 log_msg(0, "curr_fname %s --> '%s' --> %s", curr_fname, tmp, scratch);
3171 mr_free(tmp);
3172
[128]3173 if (scratch[0] == '/') {
3174 strcpy(curr_fname, scratch); // copy whole thing because it's an absolute softlink
3175 } else { // copy over the basename cos it's a relative softlink
3176 p = curr_fname + strlen(curr_fname);
3177 while (p != curr_fname && *p != '/') {
3178 p--;
3179 }
3180 if (*p == '/') {
3181 p++;
3182 }
3183 strcpy(p, scratch);
3184 }
[2214]3185 mr_free(scratch);
[128]3186 lstat(curr_fname, &statbuf);
3187 }
3188 strcpy(output, curr_fname);
3189 log_it("resolved %s to %s", incoming, output);
[1]3190 }
[128]3191 paranoid_free(command);
3192 paranoid_free(curr_fname);
3193 return (output);
[1]3194}
3195
3196/* @} - end of deviceGroup */
3197
3198/**
3199 * Return the type of partition format (GPT or MBR)
3200 */
3201char *which_partition_format(const char *drive)
3202{
[128]3203 static char output[4];
[2214]3204 char *tmp = NULL;
[128]3205 char *command;
3206 char *fdisk;
[152]3207#ifdef __IA64__
[128]3208 struct stat buf;
[152]3209#endif
[128]3210 malloc_string(command);
3211 malloc_string(fdisk);
[196]3212 sprintf(fdisk, "/sbin/parted2fdisk");
[128]3213 sprintf(command, "%s -l %s | grep 'EFI GPT'", fdisk, drive);
[2290]3214 mr_asprintf(&tmp, "%s", call_program_and_get_last_line_of_output(command));
[128]3215 if (strstr(tmp, "GPT") == NULL) {
3216 strcpy(output, "MBR");
3217 } else {
3218 strcpy(output, "GPT");
3219 }
[2214]3220 mr_free(tmp);
3221
[128]3222 log_msg(0, "Found %s partition table format type", output);
3223 paranoid_free(command);
3224 paranoid_free(fdisk);
3225 return (output);
[1]3226}
3227/* @} - end of deviceGroup */
Note: See TracBrowser for help on using the repository browser.