Context Navigation

source: MondoRescue/branches/stable/mondo/src/common/libmondo-archive.c@ 1135

Visit:

Last change on this file since 1135 was 1135, checked in by Bruno Cornec, 18 years ago
mr_file has to use mr_msg_int merges trunk content of libmondo-archive.c
Property svn:keywords set to `Id`
File size: 112.2 KB

Rev	Line
[1]	1	/* libmondo-archive.c
[99]	2	$Id: libmondo-archive.c 1135 2007-02-11 11:37:42Z bruno $
[1]	3
	4	subroutines to handle the archiving of files
	5	*/
	6
	7	/**
	8	* @file
	9	* Functions to handle backing up data.
	10	* This is the main file (at least the longest one) in libmondo.
	11	*/
[1107]	12	#include <sys/sem.h>
	13	#include <sys/types.h>
	14	#include <sys/ipc.h>
	15	#include <stdarg.h>
	16	#include <unistd.h>
[1]	17
[1067]	18	#include "my-stuff.h"
[1]	19	#include "../common/mondostructures.h"
[1107]	20	#include "mr_conf.h"
	21	#include "mr_mem.h"
[1123]	22	#include "mr_msg.h"
[1107]	23	#include "mr_err.h"
	24	#include "mr_str.h"
	25	#include "mr_file.h"
	26
[1]	27	#include "libmondo-string-EXT.h"
	28	#include "libmondo-stream-EXT.h"
	29	#include "libmondo-devices-EXT.h"
	30	#include "libmondo-tools-EXT.h"
[1118]	31	#include "newt-specific-EXT.h"
[1]	32	#include "libmondo-fork-EXT.h"
	33	#include "libmondo-files-EXT.h"
	34	#include "libmondo-filelist-EXT.h"
	35	#include "libmondo-tools-EXT.h"
	36	#include "libmondo-verify-EXT.h"
	37	#include "libmondo-archive.h"
[1063]	38
[1]	39	#define DVDRWFORMAT 1
	40
	41
	42
	43	/** @def DEFAULT_1722MB_DISK The default 1.722M floppy disk to write images to. */
	44	/** @def BACKUP_1722MB_DISK The 1.722M floppy disk to try if the default fails. */
	45
	46	#ifdef __FreeBSD__
[128]	47	#define DEFAULT_1722MB_DISK "/dev/fd0.1722"
	48	#define BACKUP_1722MB_DISK "/dev/fd0.1722"
[1]	49	#else
[128]	50	#define DEFAULT_1722MB_DISK "/dev/fd0u1722"
	51	#define BACKUP_1722MB_DISK "/dev/fd0H1722"
[1]	52	#ifndef _SEMUN_H
[128]	53	#define _SEMUN_H
[1]	54
	55	/**
	56	* The semaphore union, provided only in case the user's system doesn't.
	57	*/
[128]	58	union semun {
	59	int val;
	60	struct semid_ds *buf;
	61	unsigned short int *array;
	62	struct seminfo *__buf;
	63	};
[1]	64	#endif
[128]	65	#endif /* __FreeBSD__ */
[1]	66
	67	/@unused@/
[99]	68	//static char cvsid[] = "$Id: libmondo-archive.c 1135 2007-02-11 11:37:42Z bruno $";
[1]	69
	70	/* ************************* external global vars ****************/
	71	extern int g_current_media_number;
	72	extern int g_currentY;
	73	extern bool g_text_mode;
	74	extern bool g_exiting;
	75	extern long g_current_progress;
[128]	76	extern FILE *g_tape_stream;
[1]	77	extern long long g_tape_posK;
	78	extern char *g_mondo_home;
	79	extern char *g_tmpfs_mountpt;
	80	extern bool g_cd_recovery;
	81	extern char *g_serial_string;
	82
[948]	83	extern char *g_getfacl;
	84	extern char *g_getfattr;
	85
	86
	87
[1]	88	/**
	89	* @addtogroup globalGroup
	90	* @{
	91	*/
	92	/**
	93	* The current backup media type in use.
	94	*/
[128]	95	t_bkptype g_backup_media_type = none;
[1107]	96	char *g_backup_media_string = NULL;
[1]	97
	98	/**
	99	* Incremented by each archival thread when it starts up. After that,
	100	* this is the number of threads running.
	101	*/
	102	int g_current_thread_no = 0;
	103
	104	/* @} - end of globalGroup */
	105
	106	extern int g_noof_rows;
	107
	108	/* Semaphore-related code */
	109
	110	static int set_semvalue(void);
	111	static void del_semvalue(void);
	112	static int semaphore_p(void);
	113	static int semaphore_v(void);
	114
	115	static int g_sem_id;
	116	static int g_sem_key;
	117
	118
	119
	120
	121	/**
	122	* Initialize the semaphore.
	123	* @see del_semvalue
	124	* @see semaphore_p
	125	* @see semaphore_v
	126	* @return 1 for success, 0 for failure.
	127	*/
[128]	128	static int set_semvalue(void) // initializes semaphore
[1]	129	{
[128]	130	union semun sem_union;
	131	sem_union.val = 1;
	132	if (semctl(g_sem_id, 0, SETVAL, sem_union) == -1) {
	133	return (0);
	134	}
	135	return (1);
[1]	136	}
	137
	138	/**
	139	* Frees (deletes) the semaphore. Failure is indicated by a log
	140	* message.
	141	* @see set_semvalue
	142	*/
[128]	143	static void del_semvalue(void) // deletes semaphore
[1]	144	{
[128]	145	union semun sem_union;
[1]	146
[128]	147	if (semctl(g_sem_id, 0, IPC_RMID, sem_union) == -1) {
[1107]	148	mr_msg(3, "Failed to delete semaphore");
[128]	149	}
[1]	150	}
	151
	152	/**
	153	* Acquire (increment) the semaphore (change status to P).
	154	* @return 1 for success, 0 for failure.
	155	* @see semaphore_v
	156	*/
[128]	157	static int semaphore_p(void) // changes status to 'P' (waiting)
[1]	158	{
[128]	159	struct sembuf sem_b;
[1]	160
[128]	161	sem_b.sem_num = 0;
	162	sem_b.sem_op = -1; // P()
	163	sem_b.sem_flg = SEM_UNDO;
	164	if (semop(g_sem_id, &sem_b, 1) == -1) {
[1107]	165	mr_msg(3, "semaphore_p failed");
[128]	166	return (0);
	167	}
	168	return (1);
[1]	169	}
	170
	171	/**
	172	* Free (decrement) the semaphore (change status to V).
	173	* @return 1 for success, 0 for failure.
	174	*/
[128]	175	static int semaphore_v(void) // changes status to 'V' (free)
[1]	176	{
[128]	177	struct sembuf sem_b;
[1]	178
[128]	179	sem_b.sem_num = 0;
	180	sem_b.sem_op = 1; // V()
	181	sem_b.sem_flg = SEM_UNDO;
	182	if (semop(g_sem_id, &sem_b, 1) == -1) {
[1107]	183	mr_msg(3, "semaphore_v failed");
[128]	184	return (0);
	185	}
	186	return (1);
[1]	187	}
	188
	189
	190	//------------------------------------------------------
	191
	192
	193	/**
	194	* Size in megabytes of the buffer afforded to the executable "buffer".
	195	* This figure is used when we calculate how much data we have probably 'lost'
	196	* when writing off the end of tape N, so that we can then figure out how much
	197	* data we must recreate & write to the start of tape N+1.
	198	*/
	199	extern int g_tape_buffer_size_MB;
	200
	201
	202
	203
	204	int
[128]	205	archive_this_fileset_with_star(struct s_bkpinfo bkpinfo, char filelist,
	206	char *fname, int setno)
[1]	207	{
[128]	208	int retval = 0;
	209	unsigned int res = 0;
	210	int tries = 0;
[1118]	211	char *command = NULL;
	212	char *tmp = NULL;
	213	char *p =NULL;
	214	char *tmp1 = NULL;
[1]	215
[1118]	216	malloc_string(tmp1);
[1]	217
[128]	218	if (!does_file_exist(filelist)) {
[1118]	219	mr_asprintf(&tmp,
	220	"(archive_this_fileset) - filelist %s does not exist",
	221	filelist);
[128]	222	log_to_screen(tmp);
[1118]	223	mr_free(tmp);
[128]	224	return (1);
[1]	225	}
	226
[1118]	227	mr_asprintf(&tmp, "echo hi > %s 2> /dev/null", fname);
[128]	228	if (system(tmp)) {
	229	fatal_error("Unable to write tarball to scratchdir");
	230	}
[1118]	231	mr_free(tmp);
[128]	232
[1118]	233	mr_asprintf(&command, "star H=star list=%s -c " STAR_ACL_SZ " file=%s",
	234	filelist, fname);
[128]	235	if (bkpinfo->use_lzo) {
	236	fatal_error("Can't use lzop");
	237	}
	238	if (bkpinfo->compression_level > 0) {
[1118]	239	mr_asprintf(&tmp, "%s -bz", command);
	240	mr_free(command);
	241	command = tmp;
[128]	242	}
[1118]	243	mr_asprintf(&tmp, "%s 2>> %s", command, MONDO_LOGFILE);
	244	mr_free(command);
	245	command = tmp;
[1107]	246	mr_msg(4, "command = '%s'", command);
[128]	247
	248	for (res = 99, tries = 0; tries < 3 && res != 0; tries++) {
[1107]	249	mr_msg(5, "command='%s'", command);
[128]	250	res = system(command);
[1118]	251	strcpy(tmp1, last_line_of_file(MONDO_LOGFILE));
[1107]	252	mr_msg(1, "res=%d; tmp='%s'", res, tmp);
[128]	253	if (bkpinfo->use_star && (res == 254 \|\| res == 65024)
	254	&& strstr(tmp, "star: Processed all possible files")
	255	&& tries > 0) {
[1107]	256	mr_msg(1, "Star returned nonfatal error");
[128]	257	res = 0;
	258	}
	259	if (res) {
	260	log_OS_error(command);
	261	p = strstr(command, "-acl ");
	262	if (p) {
	263	p[0] = p[1] = p[2] = p[3] = ' ';
[1107]	264	mr_msg(1, "new command = '%s'", command);
[128]	265	} else {
[1107]	266	mr_msg(3,
[128]	267	"Attempt #%d failed. Pausing 3 seconds and retrying...",
	268	tries + 1);
	269	sleep(3);
	270	}
	271	}
	272	}
[1118]	273	mr_free(command);
	274
[128]	275	retval += res;
	276	if (retval) {
[1107]	277	mr_msg(3, "Failed to write set %d", setno);
[128]	278	} else if (tries > 1) {
[1107]	279	mr_msg(3, "Succeeded in writing set %d, on try #%d", setno,
[128]	280	tries);
	281	}
	282
	283	return (retval);
[1]	284	}
	285
	286
	287	/**
	288	* Call @c afio to archive the filelist @c filelist to the file @c fname.
	289	*
	290	* @param bkpinfo The backup information structure. Fields used:
	291	* - @c compression_level
	292	* - @c scratchdir (only verifies existence)
	293	* - @c tmpdir (only verifies existence)
	294	* - @c zip_exe
	295	* - @c zip_suffix
	296	* @param filelist The path to a file containing a list of files to be archived
	297	* in this fileset.
	298	* @param fname The output file to archive to.
	299	* @param setno This fileset number.
	300	* @return The number of errors encountered (0 for success).
	301	* @ingroup LLarchiveGroup
	302	*/
	303	int
[128]	304	archive_this_fileset(struct s_bkpinfo bkpinfo, char filelist,
	305	char *fname, int setno)
[1]	306	{
	307
[1118]	308	/@ int *********************************************************** */
[128]	309	int retval = 0;
	310	int res = 0;
	311	int i = 0;
	312	int tries = 0;
	313	static int free_ramdisk_space = 9999;
[1]	314
[1118]	315	/@ buffers ******************************************************* */
	316	char *command = NULL;
	317	char *zipparams = NULL;
	318	char *tmp = NULL;
	319	char *tmp1 = NULL;
[1]	320
[128]	321	assert(bkpinfo != NULL);
	322	assert_string_is_neither_NULL_nor_zerolength(filelist);
	323	assert_string_is_neither_NULL_nor_zerolength(fname);
[1]	324
[128]	325	if (bkpinfo->compression_level > 0 && bkpinfo->use_star) {
	326	return (archive_this_fileset_with_star
	327	(bkpinfo, filelist, fname, setno));
	328	}
[1]	329
[128]	330	if (!does_file_exist(filelist)) {
[1118]	331	mr_asprintf(&tmp,
	332	"(archive_this_fileset) - filelist %s does not exist",
	333	filelist);
[128]	334	log_to_screen(tmp);
[1118]	335	mr_free(tmp);
[128]	336	return (1);
	337	}
[1118]	338	mr_asprintf(&tmp, "echo hi > %s 2> /dev/null", fname);
[128]	339	if (system(tmp)) {
	340	fatal_error("Unable to write tarball to scratchdir");
	341	}
[1118]	342	mr_free(tmp);
[128]	343
	344
	345	if (bkpinfo->compression_level > 0) {
[1118]	346	mr_asprintf(&tmp, "%s/do-not-compress-these", g_mondo_home);
[128]	347	// -b %ld, TAPE_BLOCK_SIZE
[1118]	348	mr_asprintf(&zipparams, "-Z -P %s -G %d -T 3k", bkpinfo->zip_exe,
	349	bkpinfo->compression_level);
[128]	350	if (does_file_exist(tmp)) {
[1118]	351	mr_asprintf(&tmp1, "%s -E %s", zipparams, tmp);
	352	mr_free(zipparams);
	353	zipparams = tmp1;
[128]	354	} else {
[1107]	355	mr_msg(3, "%s not found. Cannot exclude zipfiles, etc.", tmp);
[128]	356	}
[1118]	357	mr_free(tmp);
[128]	358	} else {
[1118]	359	mr_asprintf(&zipparams, " ");
[128]	360	}
	361
[1]	362	// make_hole_for_file(fname);
	363
[128]	364	if (!does_file_exist(bkpinfo->tmpdir)) {
	365	log_OS_error("tmpdir not found");
	366	fatal_error("tmpdir not found");
	367	}
	368	if (!does_file_exist(bkpinfo->scratchdir)) {
	369	log_OS_error("scratchdir not found");
	370	fatal_error("scratchdir not found");
	371	}
[1118]	372	mr_asprintf(&command, "rm -f %s %s. %s.gz %s.%s", fname, fname, fname,
	373	fname, bkpinfo->zip_suffix);
[128]	374	paranoid_system(command);
[1118]	375	mr_free(command);
[1]	376
[1118]	377	mr_asprintf(&command, "afio -o -b %ld -M 16m %s %s < %s 2>> %s",
	378	TAPE_BLOCK_SIZE, zipparams, fname, filelist, MONDO_LOGFILE);
	379	mr_free(zipparams);
[1]	380
[1118]	381	mr_asprintf(&tmp, "echo hi > %s 2> /dev/null", fname);
[128]	382	if (system(tmp)) {
	383	fatal_error("Unable to write tarball to scratchdir");
	384	}
[1118]	385	mr_free(tmp);
[1]	386
[128]	387	for (res = 99, tries = 0; tries < 3 && res != 0; tries++) {
[1107]	388	mr_msg(5, "command='%s'", command);
[128]	389	res = system(command);
	390	if (res) {
	391	log_OS_error(command);
[1107]	392	mr_msg(3,
[128]	393	"Attempt #%d failed. Pausing 3 seconds and retrying...",
	394	tries + 1);
	395	sleep(3);
	396	}
	397	}
[1118]	398	mr_free(command);
	399
[128]	400	retval += res;
	401	if (retval) {
[1107]	402	mr_msg(3, "Failed to write set %d", setno);
[128]	403	} else if (tries > 1) {
[1107]	404	mr_msg(3, "Succeeded in writing set %d, on try #%d", setno,
[128]	405	tries);
	406	}
[1]	407
[128]	408	if (g_tmpfs_mountpt[0] != '\0') {
	409	i = atoi(call_program_and_get_last_line_of_output
[305]	410	("df -m -P \| grep dev/shm \| grep -v none \| tr -s ' ' '\t' \| cut -f4"));
[128]	411	if (i > 0) {
	412	if (free_ramdisk_space > i) {
	413	free_ramdisk_space = i;
[1107]	414	mr_msg(2, "min(free_ramdisk_space) is now %d",
[128]	415	free_ramdisk_space);
	416	if (free_ramdisk_space < 10) {
	417	fatal_error
	418	("Please increase PPCFG_RAMDISK_SIZE in my-stuff.h to increase size of ramdisk ");
	419	}
	420	}
	421	}
	422	}
	423	return (retval);
[1]	424	}
	425
	426
	427	/**
	428	* Wrapper function for all the backup commands.
	429	* Calls these other functions: @c prepare_filelist(),
	430	* @c call_filelist_chopper(), @c copy_mondo_and_mindi_stuff_to_scratchdir(),
	431	* @c call_mindi_to_supply_boot_disks(), @c do_that_initial_phase(),
	432	* @c make_those_afios_phase(), @c make_those_slices_phase(), and
	433	* @c do_that_final_phase(). If anything fails before @c do_that_initial_phase(),
	434	* @c fatal_error is called with a suitable message.
	435	* @param bkpinfo The backup information structure. Uses most fields.
	436	* @return The number of non-fatal errors encountered (0 for success).
	437	* @ingroup archiveGroup
	438	*/
[541]	439	int backup_data(struct s_bkpinfo *bkpinfo)
[1]	440	{
[128]	441	int retval = 0, res = 0;
[1118]	442	char *tmp = NULL;
[1]	443
[128]	444	assert(bkpinfo != NULL);
	445	set_g_cdrom_and_g_dvd_to_bkpinfo_value(bkpinfo);
[1118]	446
[128]	447	if (bkpinfo->backup_media_type == dvd) {
[1]	448	#ifdef DVDRWFORMAT
[128]	449	if (!find_home_of_exe("dvd+rw-format")) {
	450	fatal_error
	451	("Cannot find dvd+rw-format. Please install it or fix your PATH.");
	452	}
[1]	453	#endif
[128]	454	if (!find_home_of_exe("growisofs")) {
	455	fatal_error
	456	("Cannot find growisofs. Please install it or fix your PATH.");
	457	}
[1]	458	}
	459
[128]	460	if ((res = prepare_filelist(bkpinfo))) { /* generate scratchdir/filelist.full */
	461	fatal_error("Failed to generate filelist catalog");
	462	}
	463	if (call_filelist_chopper(bkpinfo)) {
	464	fatal_error("Failed to run filelist chopper");
	465	}
[1]	466
[1118]	467	mr_asprintf(&tmp, "gzip -9 %s/archives/filelist.full",
	468	bkpinfo->scratchdir);
[128]	469	if (run_program_and_log_output(tmp, 2)) {
	470	fatal_error("Failed to gzip filelist.full");
	471	}
[1118]	472	mr_free(tmp);
	473	mr_asprintf(&tmp, "cp -f %s/archives/list.gz %s", bkpinfo->scratchdir,
	474	bkpinfo->tmpdir);
[128]	475	if (run_program_and_log_output(tmp, 2)) {
	476	fatal_error("Failed to copy to tmpdir");
	477	}
[1118]	478	mr_free(tmp);
[1]	479
[128]	480	copy_mondo_and_mindi_stuff_to_scratchdir(bkpinfo); // payload, too, if it exists
[1]	481	#if __FreeBSD__ == 5
[128]	482	strcpy(bkpinfo->kernel_path, "/boot/kernel/kernel");
[1]	483	#elif __FreeBSD__ == 4
[128]	484	strcpy(bkpinfo->kernel_path, "/kernel");
[1]	485	#elif linux
[128]	486	if (figure_out_kernel_path_interactively_if_necessary
	487	(bkpinfo->kernel_path)) {
	488	fatal_error
	489	("Kernel not found. Please specify manually with the '-k' switch.");
	490	}
[1]	491	#else
	492	#error "I don't know about this system!"
	493	#endif
[128]	494	if ((res = call_mindi_to_supply_boot_disks(bkpinfo))) {
	495	fatal_error("Failed to generate boot+data disks");
	496	}
	497	retval += do_that_initial_phase(bkpinfo); // prepare
[1118]	498	mr_asprintf(&tmp, "rm -f %s/images/*.iso", bkpinfo->scratchdir);
[128]	499	run_program_and_log_output(tmp, 1);
[1118]	500	mr_free(tmp);
[541]	501	retval += make_those_afios_phase(bkpinfo); // backup regular files
[128]	502	retval += make_those_slices_phase(bkpinfo); // backup BIG files
	503	retval += do_that_final_phase(bkpinfo); // clean up
[1107]	504	mr_msg(1, "Creation of archives... complete.");
[128]	505	if (bkpinfo->verify_data) {
	506	sleep(2);
	507	}
	508	return (retval);
[1]	509	}
	510
	511
	512	/**
	513	* Call Mindi to generate boot and data disks.
	514	* @note This binds correctly to the new Perl version of mindi.
	515	* @param bkpinfo The backup information structure. Fields used:
	516	* - @c backup_media_type
	517	* - @c boot_loader
	518	* - @c boot_device
	519	* - @c compression_level
	520	* - @c differential
	521	* - @c exclude_paths
	522	* - @c image_devs
	523	* - @c kernel_path
	524	* - @c make_cd_use_lilo
	525	* - @c media_device
	526	* - @c media_size
	527	* - @c nonbootable_backup
	528	* - @c tmpdir
	529	* - @c use_lzo
	530	*
	531	* @return The number of errors encountered (0 for success)
	532	* @bug The code to automagically determine the boot drive
	533	* is messy and system-dependent. In particular, it breaks
	534	* for Linux RAID and LVM users.
	535	* @ingroup MLarchiveGroup
	536	*/
[128]	537	int call_mindi_to_supply_boot_disks(struct s_bkpinfo *bkpinfo)
[1]	538	{
[128]	539	/@ buffer *********************************************************** */
[1118]	540	char *tmp = NULL;
	541	char *command = NULL;
	542	char *use_lzo_sz = NULL;
	543	char *use_gzip_sz = NULL;
	544	char *use_comp_sz = NULL;
	545	char *use_star_sz = NULL;
	546	char *bootldr_str = NULL;
	547	char *tape_device = NULL;
	548	char *last_filelist_number = NULL;
	549	char *broken_bios_sz = NULL;
	550	char *cd_recovery_sz = NULL;
	551	char *tape_size_sz = NULL;
	552	char *devs_to_exclude = NULL;
	553	char *use_lilo_sz = NULL;
	554	char *bootdev = NULL;
[1]	555
[128]	556	/@ char ************************************************************* */
[1]	557	char ch = '\0';
	558
[128]	559	/@ long ********************************************************* */
	560	long lines_in_filelist = 0;
[1]	561
[1118]	562	/@ int ************************************************************ */
[128]	563	int res = 0;
	564	long estimated_total_noof_slices = 0;
[1]	565
[1087]	566	FILE *fd = NULL;
[1091]	567	FILE *fd1 = NULL;
[1087]	568
[128]	569	assert(bkpinfo != NULL);
	570	malloc_string(bootldr_str);
	571	malloc_string(last_filelist_number);
	572	malloc_string(devs_to_exclude);
	573	malloc_string(bootdev);
[1]	574
[1118]	575	mr_asprintf(&tmp,
[911]	576	"echo '%s' \| tr -s ' ' '\n' \| grep -E '^/dev/.*$' \| tr -s '\n' ' ' \| awk '{print $0\"\\n\";}'",
[128]	577	bkpinfo->exclude_paths);
[1118]	578
[128]	579	strcpy(devs_to_exclude, call_program_and_get_last_line_of_output(tmp));
[1118]	580	mr_free(tmp);
	581
	582	mr_asprintf(&tmp, "devs_to_exclude = '%s'", devs_to_exclude);
[1107]	583	mr_msg(2, tmp);
[1118]	584	mr_free(tmp);
[128]	585	mvaddstr_and_log_it(g_currentY, 0,
	586	"Calling MINDI to create boot+data disks");
[1118]	587	mr_asprintf(&tmp, "%s/filelist.full", bkpinfo->tmpdir);
[128]	588	if (!does_file_exist(tmp)) {
[1118]	589	mr_free(tmp);
	590	mr_asprintf(&tmp, "%s/tmpfs/filelist.full", bkpinfo->tmpdir);
[128]	591	if (!does_file_exist(tmp)) {
	592	fatal_error
	593	("Cannot find filelist.full, so I cannot count its lines");
	594	}
	595	}
	596	lines_in_filelist = count_lines_in_file(tmp);
	597	strcpy(last_filelist_number, last_line_of_file(tmp));
[1118]	598	mr_free(tmp);
[1]	599
[1118]	600	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	601	mr_asprintf(&tape_size_sz, "%ld", bkpinfo->media_size[1]);
	602	mr_asprintf(&tape_device, bkpinfo->media_device);
	603	} else {
	604	mr_asprintf(&tape_size_sz, " ");
	605	mr_asprintf(&tape_device, " ");
	606	}
	607	/* BERLIOS: This parameter is not used after? */
	608	mr_free(tape_size_sz);
	609	if (bkpinfo->use_lzo) {
	610	mr_asprintf(&use_lzo_sz, "yes");
	611	} else {
	612	mr_asprintf(&use_lzo_sz, "no");
	613	}
	614	if (bkpinfo->use_gzip) {
	615	mr_asprintf(&use_gzip_sz, "yes");
	616	} else {
	617	mr_asprintf(&use_gzip_sz, "no");
	618	}
	619	if (bkpinfo->use_star) {
	620	mr_asprintf(&use_star_sz, "yes");
	621	} else {
	622	mr_asprintf(&use_star_sz, "no");
	623	}
	624
	625	if (bkpinfo->compression_level > 0) {
	626	mr_asprintf(&use_comp_sz, "yes");
	627	} else {
	628	mr_asprintf(&use_comp_sz, "no");
	629	}
	630
	631	mr_asprintf(&broken_bios_sz, "yes"); /* assume so */
	632	if (g_cd_recovery) {
	633	mr_asprintf(&cd_recovery_sz, "yes");
	634	} else {
	635	mr_asprintf(&cd_recovery_sz, "no");
	636	}
	637	/* Field shared between LILO/ELILO */
	638	if (bkpinfo->make_cd_use_lilo) {
	639	mr_asprintf(&use_lilo_sz, "yes");
	640	} else {
	641	mr_asprintf(&use_lilo_sz, "no");
	642	}
	643
[128]	644	if (!bkpinfo->nonbootable_backup
	645	&& (bkpinfo->boot_loader == '\0'
	646	\|\| bkpinfo->boot_device[0] == '\0')) {
	647
[1]	648	#ifdef __FreeBSD__
[128]	649	strcpy(bootdev, call_program_and_get_last_line_of_output
	650	("mount \| grep ' /boot ' \| head -1 \| cut -d' ' -f1 \| sed 's/\\([0-9]\\).*/\\1/'"));
	651	if (!bootdev[0]) {
	652	strcpy(bootdev, call_program_and_get_last_line_of_output
	653	("mount \| grep ' / ' \| head -1 \| cut -d' ' -f1 \| sed 's/\\([0-9]\\).*/\\1/'"));
	654	}
[1]	655	#else
[128]	656	strcpy(bootdev, call_program_and_get_last_line_of_output
	657	("mount \| grep ' /boot ' \| head -1 \| cut -d' ' -f1 \| sed 's/[0-9].*//'"));
	658	if (strstr(bootdev, "/dev/cciss/")) {
	659	strcpy(bootdev, call_program_and_get_last_line_of_output
	660	("mount \| grep ' /boot ' \| head -1 \| cut -d' ' -f1 \| cut -dp -f1"));
	661	}
	662	if (!bootdev[0]) {
	663	strcpy(bootdev, call_program_and_get_last_line_of_output
	664	("mount \| grep ' / ' \| head -1 \| cut -d' ' -f1 \| sed 's/[0-9].*//'"));
	665	if (strstr(bootdev, "/dev/cciss/")) {
	666	strcpy(bootdev, call_program_and_get_last_line_of_output
	667	("mount \| grep ' / ' \| head -1 \| cut -d' ' -f1 \| cut -dp -f1"));
	668	}
	669	}
[1]	670	#endif
[128]	671	if (bootdev[0])
	672	ch = which_boot_loader(bootdev);
	673	else
	674	ch = 'U';
[1118]	675
[128]	676	if (bkpinfo->boot_loader != '\0') {
[1118]	677	mr_asprintf(&tmp, "User specified boot loader. It is '%c'.",
[128]	678	bkpinfo->boot_loader);
[1107]	679	mr_msg(2, tmp);
[1118]	680	mr_free(tmp);
[128]	681	} else {
	682	bkpinfo->boot_loader = ch;
	683	}
	684	if (bkpinfo->boot_device[0] != '\0') {
[1118]	685	mr_asprintf(&tmp, "User specified boot device. It is '%s'.",
[128]	686	bkpinfo->boot_device);
[1107]	687	mr_msg(2, tmp);
[1118]	688	mr_free(tmp);
[128]	689	} else {
	690	strcpy(bkpinfo->boot_device, bootdev);
	691	}
	692	}
[1]	693
[128]	694	if (
[1]	695	#ifdef __FreeBSD__
[128]	696	bkpinfo->boot_loader != 'B' && bkpinfo->boot_loader != 'D' &&
[1]	697	#endif
	698	#ifdef __IA64__
[128]	699	bkpinfo->boot_loader != 'E' &&
[1]	700	#endif
[128]	701	bkpinfo->boot_loader != 'L' && bkpinfo->boot_loader != 'G'
[1118]	702	&& bkpinfo->boot_loader != 'R' && !bkpinfo->nonbootable_backup)
	703	{
[128]	704	fatal_error
[1118]	705	("Please specify your boot loader and device, e.g. -l GRUB -f /dev/hda.\nType 'man mondoarchive' to read the manual.");
[1]	706	}
[128]	707	if (bkpinfo->boot_loader == 'L') {
	708	strcpy(bootldr_str, "LILO");
	709	if (!does_file_exist("/etc/lilo.conf")) {
	710	fatal_error
[1118]	711	("The de facto standard location for your boot loader's config file is /etc/lilo.conf.\nBut I cannot find it there. What is wrong with your Linux distribution?");
[128]	712	}
	713	} else if (bkpinfo->boot_loader == 'G') {
	714	strcpy(bootldr_str, "GRUB");
	715	if (!does_file_exist("/etc/grub.conf")
	716	&& does_file_exist("/boot/grub/grub.conf")) {
	717	run_program_and_log_output
	718	("ln -sf /boot/grub/grub.conf /etc/grub.conf", 5);
	719	}
	720	/* Detect Debian's grub config file */
	721	else if (!does_file_exist("/etc/grub.conf")
	722	&& does_file_exist("/boot/grub/menu.lst")) {
	723	run_program_and_log_output
	724	("ln -s /boot/grub/menu.lst /etc/grub.conf", 5);
	725	}
	726	if (!does_file_exist("/etc/grub.conf")) {
	727	fatal_error
[1118]	728	("The de facto standard location for your boot loader's config file is /etc/grub.conf.\nBut I cannot find it there. What is wrong with your Linux distribution?\nTry 'ln -s /boot/grub/menu.lst /etc/grub.conf'...");
[128]	729	}
	730	} else if (bkpinfo->boot_loader == 'E') {
	731	strcpy(bootldr_str, "ELILO");
[1118]	732	/* BERLIOS: fix it for SuSE, Debian, Mandrake, ... */
[128]	733	if (!does_file_exist("/etc/elilo.conf")
	734	&& does_file_exist("/boot/efi/efi/redhat/elilo.conf")) {
	735	run_program_and_log_output
	736	("ln -sf /boot/efi/efi/redhat/elilo.conf /etc/elilo.conf",
	737	5);
	738	}
	739	if (!does_file_exist("/etc/elilo.conf")) {
	740	fatal_error
[1118]	741	("The de facto mondo standard location for your boot loader's config file is /etc/elilo.conf\nBut I cannot find it there. What is wrong with your Linux distribution?\nTry finding it under /boot/efi and do 'ln -s /boot/efi/..../elilo.conf /etc/elilo.conf'");
[128]	742	}
	743	} else if (bkpinfo->boot_loader == 'R') {
	744	strcpy(bootldr_str, "RAW");
[1]	745	}
	746	#ifdef __FreeBSD__
[128]	747	else if (bkpinfo->boot_loader == 'D') {
	748	strcpy(bootldr_str, "DD");
	749	}
[1]	750
[128]	751	else if (bkpinfo->boot_loader == 'B') {
	752	strcpy(bootldr_str, "BOOT0");
	753	}
[1]	754	#endif
[128]	755	else {
	756	strcpy(bootldr_str, "unknown");
	757	}
[1118]	758	mr_asprintf(&tmp, "Your boot loader is %s and it boots from %s",
[128]	759	bootldr_str, bkpinfo->boot_device);
	760	log_to_screen(tmp);
[1118]	761	mr_free(tmp);
	762	mr_asprintf(&tmp, "%s/BOOTLOADER.DEVICE", bkpinfo->tmpdir);
	763	if (write_one_liner_data_file(tmp, bkpinfo->boot_device)) {
	764	mr_msg(1, "Unable to write one-liner boot device");
[1087]	765
[1118]	766	}
	767
[1087]	768	estimated_total_noof_slices =
	769	size_of_all_biggiefiles_K(bkpinfo) / bkpinfo->optimal_set_size + 1;
[1118]	770	mr_asprintf(&command, "mkdir -p %s/images", bkpinfo->scratchdir);
[1087]	771	if (system(command)) {
	772	res++;
	773	log_OS_error("Unable to make images directory");
[128]	774	}
[1118]	775	mr_free(command);
	776
	777	mr_asprintf(&command, "mkdir -p %s%s", bkpinfo->scratchdir, MNT_FLOPPY);
[1087]	778	if (system(command)) {
	779	res++;
	780	log_OS_error("Unable to make mnt floppy directory");
	781	}
[1118]	782	mr_free(command);
[1087]	783
	784	/* Prepare interface with mindi through a configuration file
	785	* under /var/cache/mondo by default
	786	* and the mondorestore configuration file at the same time that
	787	* will be included by mindi on the initrd */
	788
	789	fd = mr_fopen(MONDO_CACHE"/mindi.conf", "w");
	790	fd1 = mr_fopen(MONDORESTORECFG, "a");
	791
	792	mr_fprintf(fd, "mindi_kernel=%s\n", bkpinfo->kernel_path);
	793	mr_fprintf(fd, "mindi_use_own_kernel=yes\n");
	794
	795	mr_fprintf(fd1, "files-in-filelist %ld\n", lines_in_filelist);
	796	mr_fprintf(fd1, "internal-tape-block-size %ld\n", bkpinfo->internal_tape_block_size);
	797	mr_fprintf(fd1, "total-slices %ld\n", estimated_total_noof_slices);
	798	mr_fprintf(fd1, "excluded-devs %s\n", devs_to_exclude);
	799	mr_fprintf(fd1, "image-devs %s\n", bkpinfo->image_devs);
	800	mr_fprintf(fd1, "last-filelist-number %s\n", last_filelist_number);
	801	mr_fprintf(fd1, "bootloader.name %s\n", bootldr_str);
	802	mr_fprintf(fd1, "bootloader.device %s\n", bkpinfo->boot_device);
	803
[128]	804	switch (bkpinfo->backup_media_type) {
	805	case cdr:
[1087]	806	mr_fprintf(fd1, "backup-media-type cdr\n");
[128]	807	break;
	808	case cdrw:
[1087]	809	mr_fprintf(fd1, "backup-media-type cdrw\n");
[128]	810	break;
	811	case cdstream:
[1087]	812	mr_fprintf(fd1, "backup-media-type cdstream\n");
[128]	813	break;
	814	case tape:
[1087]	815	mr_fprintf(fd1, "backup-media-type tape\n");
[128]	816	break;
	817	case udev:
[1087]	818	mr_fprintf(fd1, "backup-media-type udev\n");
[128]	819	break;
	820	case iso:
[1087]	821	mr_fprintf(fd1, "backup-media-type iso\n");
[128]	822	break;
	823	case nfs:
[1087]	824	mr_fprintf(fd1, "backup-media-type nfs\n");
[128]	825	break;
	826	case dvd:
[1087]	827	mr_fprintf(fd1, "backup-media-type dvd\n");
[128]	828	break;
[1063]	829	case usb:
[1087]	830	mr_fprintf(fd1, "backup-media-type usb\n");
[1063]	831	break;
[128]	832	default:
	833	fatal_error("Unknown backup_media_type");
	834	}
[1087]	835
	836	if (bkpinfo->backup_media_type == usb) {
	837	mr_fprintf(fd, "mindi_write_usb=yes\n");
	838	mr_fprintf(fd, "mindi_usb_device=%s\n", bkpinfo->media_device);
[128]	839	}
[1087]	840	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	841	mr_fprintf(fd, "mindi_write_tape=yes\n");
	842	mr_fprintf(fd, "mindi_tape_device=%s\n", bkpinfo->media_device);
	843	mr_fprintf(fd1, "media-dev %s\n", bkpinfo->media_device);
	844	mr_fprintf(fd1, "media-size %ld\n", bkpinfo->media_size[1]);
[128]	845	}
[1087]	846	if (bkpinfo->compression_level > 0) {
	847	mr_fprintf(fd1, "use-comp yes\n");
[128]	848	} else {
[1087]	849	mr_fprintf(fd1, "use-comp no\n");
[128]	850	}
[1087]	851	if (bkpinfo->use_gzip) {
	852	mr_fprintf(fd1, "use-gzip yes\n");
	853	} else {
	854	mr_fprintf(fd1, "use-gzip no\n");
	855	}
	856	if (bkpinfo->use_lzo) {
	857	mr_fprintf(fd1, "use-lzo yes\n");
	858	} else {
	859	mr_fprintf(fd1, "use-lzo no\n");
	860	}
	861	if (bkpinfo->use_star) {
	862	mr_fprintf(fd1, "use-star yes\n");
	863	} else {
	864	mr_fprintf(fd1, "use-star no\n");
	865	}
[949]	866	if (g_getfattr) {
[1087]	867	mr_fprintf(fd1, "xattr yes\n");
	868	} else {
	869	mr_fprintf(fd1, "xattr no\n");
[949]	870	}
	871	if (g_getfacl) {
[1087]	872	mr_fprintf(fd1, "acl yes\n");
	873	} else {
	874	mr_fprintf(fd1, "acl no\n");
[949]	875	}
	876
[1087]	877	if (g_cd_recovery) {
	878	mr_fprintf(fd1, "use-cdrecovery yes\n");
	879	} else {
	880	mr_fprintf(fd1, "use-cdrecovery no\n");
[128]	881	}
[1118]	882
[1087]	883	if (bkpinfo->make_cd_use_lilo) {
	884	mr_fprintf(fd1, "use-lilo yes\n");
	885	} else {
	886	mr_fprintf(fd1, "use-lilo no\n");
[128]	887	}
[1087]	888	if (bkpinfo->nonbootable_backup) {
	889	mr_fprintf(fd1, "non-bootable yes\n");
[1063]	890	} else {
[1087]	891	mr_fprintf(fd1, "non-bootable no\n");
[1063]	892	}
[1087]	893	if (bkpinfo->differential) {
	894	mr_fprintf(fd1, "differential 1\n");
	895	} else {
	896	mr_fprintf(fd1, "differential 0\n");
	897	}
[1063]	898
[1087]	899	mr_fclose(fd);
	900	mr_fprintf(fd1, "datestamp %s\n", mr_date());
	901	mr_fclose(fd1);
	902
[1118]	903	mr_asprintf(&command, "mindi --custom '%s' '%s/images'",
[1093]	904	bkpinfo->tmpdir, bkpinfo->scratchdir);
	905	//bkpinfo->tmpdir, // parameter #2
	906	//bkpinfo->scratchdir, // parameter #3
[1087]	907	//bkpinfo->kernel_path, // parameter #4
	908	//tape_device, // parameter #5
	909	//tape_size_sz, // parameter #6
	910	//lines_in_filelist, // parameter #7 (INT)
	911	//use_lzo_sz, // parameter #8
	912	//cd_recovery_sz, // parameter #9
	913	//bkpinfo->image_devs, // parameter #10
	914	//broken_bios_sz, // parameter #11 always yes
	915	//last_filelist_number, // parameter #12 (STRING)
	916	//estimated_total_noof_slices, // parameter #13 (INT)
	917	//devs_to_exclude, // parameter #14
	918	//use_comp_sz, // parameter #15
	919	//use_lilo_sz, // parameter #16
	920	//use_star_sz, // parameter #17
	921	//bkpinfo->internal_tape_block_size, // parameter #18 (LONG)
	922	//bkpinfo->differential, // parameter #19 (INT)
	923	//use_gzip_sz); // parameter #20 (STRING)
[1]	924
[1107]	925	mr_msg(2, command);
[1]	926
[1087]	927	res = run_program_and_log_to_screen(command, "Generating boot+data disks");
[1118]	928	mr_free(command);
[128]	929	if (bkpinfo->nonbootable_backup) {
	930	res = 0;
	931	} // hack
	932	if (!res) {
	933	log_to_screen("Boot+data disks were created OK");
[1118]	934	mr_asprintf(&command, "mkdir -p /var/cache/mindi/");
[1107]	935	mr_msg(2, command);
[128]	936	run_program_and_log_output(command, FALSE);
[1118]	937	mr_free(command);
	938
	939	mr_asprintf(&command,
[1044]	940	"cp -f %s/images/mindi.iso /var/cache/mindi/mondorescue.iso",
[128]	941	bkpinfo->scratchdir);
[1107]	942	mr_msg(2, command);
[128]	943	run_program_and_log_output(command, FALSE);
[1118]	944	mr_free(command);
	945
[128]	946	if (bkpinfo->nonbootable_backup) {
[1118]	947	mr_asprintf(&command, "cp -f %s/all.tar.gz %s/images",
[128]	948	bkpinfo->tmpdir, bkpinfo->scratchdir);
	949	if (system(command)) {
	950	fatal_error("Unable to create temporary duff tarball");
	951	}
[1118]	952	mr_free(command);
	953
[128]	954	}
[1118]	955	/* BERLIOS: Not executed ?
[128]	956	sprintf(command, "cp -f %s/mindi-oot.img %s/images",
	957	bkpinfo->tmpdir, bkpinfo->scratchdir);
[1118]	958	*/
	959	mr_asprintf(&tmp, "cp -f %s/images/all.tar.gz %s",
	960	bkpinfo->scratchdir, bkpinfo->tmpdir);
[128]	961	if (system(tmp)) {
	962	fatal_error("Cannot find all.tar.gz in tmpdir");
	963	}
[1118]	964	mr_free(tmp);
	965
[128]	966	if (res) {
	967	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
	968	} else {
	969	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	970	}
	971	} else {
	972	log_to_screen("Mindi failed to create your boot+data disks.");
[1118]	973	mr_asprintf(&command, "grep 'Fatal error' /var/log/mindi.log");
	974	malloc_string(tmp);
	975	strcpy(tmp,call_program_and_get_last_line_of_output(command));
	976	mr_free(command);
[128]	977	if (strlen(tmp) > 1) {
[155]	978	popup_and_OK(tmp);
[128]	979	}
[1118]	980	mr_free(tmp);
[128]	981	}
[1080]	982	mr_free(bootldr_str);
	983	mr_free(last_filelist_number);
	984	mr_free(devs_to_exclude);
	985	mr_free(bootdev);
[128]	986	return (res);
[1]	987	}
	988
	989
	990	/**
	991	* Maximum number of filesets allowed in this function.
	992	*/
	993	#define MAX_NOOF_SETS_HERE 32767
	994
	995	/**
	996	* Offset of the bkpinfo pointer (in bytes) from the
	997	* buffer passed to create_afio_files_in_background.
	998	*/
	999	#define BKPINFO_LOC_OFFSET (16+MAX_NOOF_SETS_HERE/8+16)
	1000
	1001	/**
	1002	* Main function for each @c afio thread.
	1003	* @param inbuf A transfer block containing:
	1004	* - @c p_last_set_archived: [offset 0] pointer to an @c int
	1005	* containing the last set archived.
	1006	* - @c p_archival_threads_running: [offset 4] pointer to an @c int
	1007	* containing the number of archival threads currently running.
	1008	* - @c p_next_set_to_archive: [offset 8] pointer to an @c int containing
	1009	* the next set that should be archived.
	1010	* - @c p_list_of_fileset_flags: [offset 12] @c char pointer pointing to a
	1011	* bit array, where each bit corresponds to a filelist (1=needs
	1012	* to be archived, 0=archived).
	1013	* - @c bkpinfo: [offset BKPINFO_LOC_OFFSET] pointer to backup information
	1014	* structure. Fields used:
	1015	* - @c tmpdir
	1016	* - @c zip_suffix
	1017	*
	1018	* Any of the above may be modified by the caller at any time.
	1019	*
	1020	* @bug Assumes @c int pointers are 4 bytes.
	1021	* @see archive_this_fileset
	1022	* @see make_afioballs_and_images
	1023	* @return NULL, always.
	1024	* @ingroup LLarchiveGroup
	1025	*/
[128]	1026	void create_afio_files_in_background(void inbuf)
[1]	1027	{
[128]	1028	long int archiving_set_no;
	1029	char *archiving_filelist_fname;
	1030	char *archiving_afioball_fname;
[948]	1031	char *curr_xattr_list_fname = NULL;
[128]	1032	char *curr_acl_list_fname;
[1]	1033
[128]	1034	struct s_bkpinfo *bkpinfo;
[1118]	1035	char *tmp = NULL;
[128]	1036	int res = 0, retval = 0;
	1037	int *p_archival_threads_running;
	1038	int *p_last_set_archived;
	1039	int *p_next_set_to_archive;
	1040	char *p_list_of_fileset_flags;
	1041	int this_thread_no = g_current_thread_no++;
[1]	1042
[128]	1043	malloc_string(archiving_filelist_fname);
	1044	malloc_string(archiving_afioball_fname);
	1045	p_last_set_archived = (int *) inbuf;
	1046	p_archival_threads_running = (int *) (inbuf + 4);
	1047	p_next_set_to_archive = (int *) (inbuf + 8);
	1048	p_list_of_fileset_flags = (char *) (inbuf + 12);
	1049	bkpinfo = (struct s_bkpinfo *) (inbuf + BKPINFO_LOC_OFFSET);
[1]	1050
[128]	1051	sprintf(archiving_filelist_fname, FILELIST_FNAME_RAW_SZ,
	1052	bkpinfo->tmpdir, 0L);
	1053	for (archiving_set_no = 0; does_file_exist(archiving_filelist_fname);
	1054	sprintf(archiving_filelist_fname, FILELIST_FNAME_RAW_SZ,
	1055	bkpinfo->tmpdir, archiving_set_no)) {
	1056	if (g_exiting) {
	1057	fatal_error("Execution run aborted (pthread)");
	1058	}
	1059	if (archiving_set_no >= MAX_NOOF_SETS_HERE) {
	1060	fatal_error
	1061	("Maximum number of filesets exceeded. Adjust MAX_NOOF_SETS_HERE, please.");
	1062	}
	1063	if (!semaphore_p()) {
[1107]	1064	mr_msg(3, "P sem failed (pid=%d)", (int) getpid());
[128]	1065	fatal_error("Cannot get semaphore P");
	1066	}
	1067	if (archiving_set_no < *p_next_set_to_archive) {
	1068	archiving_set_no = *p_next_set_to_archive;
	1069	}
	1070	p_next_set_to_archive = p_next_set_to_archive + 1;
	1071	if (!semaphore_v()) {
	1072	fatal_error("Cannot get semaphore V");
	1073	}
[1]	1074
[128]	1075	/* backup this set of files */
	1076	sprintf(archiving_afioball_fname, AFIOBALL_FNAME_RAW_SZ,
	1077	bkpinfo->tmpdir, archiving_set_no, bkpinfo->zip_suffix);
	1078	sprintf(archiving_filelist_fname, FILELIST_FNAME_RAW_SZ,
	1079	bkpinfo->tmpdir, archiving_set_no);
	1080	if (!does_file_exist(archiving_filelist_fname)) {
[1107]	1081	mr_msg(3,
[128]	1082	"%s[%d:%d] - well, I would archive %d, except that it doesn't exist. I'll stop now.",
	1083	FORTY_SPACES, getpid(), this_thread_no,
	1084	archiving_set_no);
	1085	break;
	1086	}
[1]	1087
[1118]	1088	mr_asprintf(&tmp, AFIOBALL_FNAME_RAW_SZ, bkpinfo->tmpdir,
	1089	archiving_set_no - ARCH_BUFFER_NUM, bkpinfo->zip_suffix);
[128]	1090	if (does_file_exist(tmp)) {
[1118]	1091	mr_msg(4, "%s[%d:%d] - waiting for storer",
	1092	FORTY_SPACES, getpid(), this_thread_no);
[128]	1093	while (does_file_exist(tmp)) {
	1094	sleep(1);
	1095	}
[1107]	1096	mr_msg(4, "[%d] - continuing", getpid());
[128]	1097	}
[1118]	1098	mr_free(tmp);
[1]	1099
[1107]	1100	mr_msg(4, "%s[%d:%d] - EXATing %d...", FORTY_SPACES, getpid(),
[128]	1101	this_thread_no, archiving_set_no);
[948]	1102	if (g_getfattr) {
[1118]	1103	mr_asprintf(&curr_xattr_list_fname, XATTR_LIST_FNAME_RAW_SZ,
[128]	1104	bkpinfo->tmpdir, archiving_set_no);
[948]	1105	get_fattr_list(archiving_filelist_fname, curr_xattr_list_fname);
[1118]	1106	mr_free(curr_xattr_list_fname);
[948]	1107	}
	1108	if (g_getfacl) {
[1118]	1109	mr_asprintf(&curr_acl_list_fname, ACL_LIST_FNAME_RAW_SZ,
[128]	1110	bkpinfo->tmpdir, archiving_set_no);
[948]	1111	get_acl_list(archiving_filelist_fname, curr_acl_list_fname);
[1118]	1112	mr_free(curr_acl_list_fname);
[948]	1113	}
[1]	1114
[1107]	1115	mr_msg(4, "%s[%d:%d] - archiving %d...", FORTY_SPACES, getpid(),
[128]	1116	this_thread_no, archiving_set_no);
[1135]	1117	res = archive_this_fileset(bkpinfo, archiving_filelist_fname,
[128]	1118	archiving_afioball_fname,
	1119	archiving_set_no);
	1120	retval += res;
[1]	1121
[128]	1122	if (res) {
[1118]	1123	mr_asprintf(&tmp,
	1124	"Errors occurred while archiving set %ld. Please review logs.",
	1125	archiving_set_no);
[128]	1126	log_to_screen(tmp);
[1118]	1127	mr_free(tmp);
[128]	1128	}
	1129	if (!semaphore_p()) {
	1130	fatal_error("Cannot get semaphore P");
	1131	}
	1132
	1133	set_bit_N_of_array(p_list_of_fileset_flags, archiving_set_no, 5);
	1134
	1135	if (*p_last_set_archived < archiving_set_no) {
	1136	*p_last_set_archived = archiving_set_no;
	1137	} // finished archiving this one
	1138
	1139	if (!semaphore_v()) {
	1140	fatal_error("Cannot get semaphore V");
	1141	}
[1107]	1142	mr_msg(4, "%s[%d:%d] - archived %d OK", FORTY_SPACES, getpid(),
[128]	1143	this_thread_no, archiving_set_no);
	1144	archiving_set_no++;
	1145	}
	1146	if (!semaphore_p()) {
	1147	fatal_error("Cannot get semaphore P");
	1148	}
	1149	(*p_archival_threads_running)--;
	1150	if (!semaphore_v()) {
	1151	fatal_error("Cannot get semaphore V");
	1152	}
[1107]	1153	mr_msg(3, "%s[%d:%d] - exiting", FORTY_SPACES, getpid(),
[128]	1154	this_thread_no);
[1080]	1155	mr_free(archiving_filelist_fname);
	1156	mr_free(archiving_afioball_fname);
[128]	1157	pthread_exit(NULL);
[1]	1158	}
	1159
	1160
	1161	/**
	1162	* Finalize the backup.
	1163	* For streaming backups, this writes the closing block
	1164	* to the stream. For CD-based backups, this creates
	1165	* the final ISO image.
	1166	* @param bkpinfo The backup information structure, used only
	1167	* for the @c backup_media_type.
	1168	* @ingroup MLarchiveGroup
	1169	*/
[541]	1170	int do_that_final_phase(struct s_bkpinfo *bkpinfo)
[1]	1171	{
	1172
[128]	1173	/@ int ************************************* */
	1174	int res = 0;
	1175	int retval = 0;
[1]	1176
[128]	1177	/@ buffers ********************************* */
[1]	1178
[128]	1179	assert(bkpinfo != NULL);
	1180	mvaddstr_and_log_it(g_currentY, 0,
	1181	"Writing any remaining data to media ");
[1]	1182
[1107]	1183	mr_msg(1, "Closing tape/CD ... ");
[1118]	1184	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[128]	1185	/* write tape/cdstream */
	1186	closeout_tape(bkpinfo);
[1118]	1187	} else {
[1087]	1188	/* write final ISO/USB */
[541]	1189	res = write_final_iso_if_necessary(bkpinfo);
[128]	1190	retval += res;
	1191	if (res) {
[1107]	1192	mr_msg(1, "write_final_iso_if_necessary returned an error");
[128]	1193	}
[1]	1194	}
[1107]	1195	mr_msg(2, "Fork is exiting ... ");
[1]	1196
[128]	1197	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
[1]	1198
[128]	1199	/* final stuff */
	1200	if (retval) {
	1201	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
	1202	} else {
	1203	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	1204	}
[1]	1205
[128]	1206	return (retval);
[1]	1207	}
	1208
	1209
	1210	/**
	1211	* Initialize the backup.
	1212	* Does the following:
	1213	* - Sets up the serial number.
	1214	* - For streaming backups, opens the tape stream and writes the data disks
	1215	* and backup headers.
	1216	* - For CD-based backups, wipes the ISOs in the target directory.
	1217	*
	1218	* @param bkpinfo The backup information structure. Fields used:
	1219	* - @c backup_media_type
	1220	* - @c cdrw_speed
[20]	1221	* - @c prefix
[1]	1222	* - @c isodir
	1223	* - @c media_device
	1224	* - @c scratchdir
	1225	* - @c tmpdir
	1226	* @return The number of errors encountered (0 for success).
	1227	* @ingroup MLarchiveGroup
	1228	*/
[128]	1229	int do_that_initial_phase(struct s_bkpinfo *bkpinfo)
[1]	1230	{
[128]	1231	/@ int ************************************** */
	1232	int retval = 0;
[1]	1233
[128]	1234	/@ buffers ********************************** */
	1235	char command, tmpfile, *data_disks_file;
[1]	1236
[128]	1237	assert(bkpinfo != NULL);
	1238	malloc_string(command);
	1239
[1118]	1240	mr_asprintf(&data_disks_file, "%s/all.tar.gz", bkpinfo->tmpdir);
	1241
[128]	1242	snprintf(g_serial_string, MAX_STR_LEN - 1,
	1243	call_program_and_get_last_line_of_output("dd \
[1]	1244	if=/dev/urandom bs=16 count=1 2> /dev/null \| \
	1245	hexdump \| tr -s ' ' '0' \| head -n1"));
[128]	1246	strip_spaces(g_serial_string);
	1247	strcat(g_serial_string, "...word.");
[1107]	1248	mr_msg(2, "g_serial_string = '%s'", g_serial_string);
[128]	1249	assert(strlen(g_serial_string) < MAX_STR_LEN);
[1]	1250
[1118]	1251	mr_asprintf(&tmpfile, "%s/archives/SERIAL-STRING", bkpinfo->scratchdir);
[128]	1252	if (write_one_liner_data_file(tmpfile, g_serial_string)) {
[1107]	1253	mr_msg(1, "%ld: Failed to write serial string", __LINE__);
[128]	1254	}
[1118]	1255	mr_free(tmpfile);
[1]	1256
[128]	1257	mvaddstr_and_log_it(g_currentY, 0, "Preparing to archive your data");
	1258	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	1259	if (bkpinfo->backup_media_type == cdstream) {
	1260	openout_cdstream(bkpinfo->media_device, bkpinfo->cdrw_speed);
	1261	} else {
	1262	openout_tape(bkpinfo->media_device, bkpinfo->internal_tape_block_size); /* sets g_tape_stream */
	1263	}
	1264	if (!g_tape_stream) {
	1265	fatal_error("Cannot open backup (streaming) device");
	1266	}
[1107]	1267	mr_msg(1, "Backup (stream) opened OK");
[128]	1268	write_data_disks_to_stream(data_disks_file);
	1269	} else {
[1107]	1270	mr_msg(1, "Backing up to CD's");
[1]	1271	}
[1118]	1272	mr_free(data_disks_file);
[1]	1273
[1118]	1274	mr_asprintf(&command, "rm -f %s/%s/%s-[1-9]*.iso", bkpinfo->isodir,
	1275	bkpinfo->nfs_remote_dir, bkpinfo->prefix);
[128]	1276	paranoid_system(command);
[1118]	1277	mr_free(command);
	1278
[128]	1279	wipe_archives(bkpinfo->scratchdir);
	1280	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	1281	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	1282	write_header_block_to_stream((off_t)0, "start-of-tape",
[128]	1283	BLK_START_OF_TAPE);
[684]	1284	write_header_block_to_stream((off_t)0, "start-of-backup",
[128]	1285	BLK_START_OF_BACKUP);
	1286	}
	1287	return (retval);
[1]	1288	}
	1289
	1290
	1291	/**
	1292	* Calls floppy-formatting @c cmd and tracks its progress if possible.
	1293	*
	1294	* @param cmd The command to run (e.g. @c fdformat @c /dev/fd0).
	1295	* @param title The human-friendly description of the floppy you are writing.
	1296	* This will be used as the title in the progress bar window. Example:
	1297	* "Formatting disk /dev/fd0".
	1298	* @see format_disk
	1299	* @return The exit code of fdformat/superformat.
	1300	*/
[128]	1301	int format_disk_SUB(char cmd, char title)
[1]	1302	{
	1303
[128]	1304	/@ int ************************************************************** */
	1305	int res = 0;
[1]	1306	int percentage = 0;
	1307	int maxtracks = 0;
	1308	int trackno = 0;
	1309	int last_trkno = 0;
	1310
[128]	1311	/@ buffers ********************************************************** */
[1118]	1312	char *command = NULL;
[128]	1313	char *tempfile;
[1]	1314
[128]	1315	/@ pointers ********************************************************* */
	1316	FILE *pin;
[1]	1317
[128]	1318	assert_string_is_neither_NULL_nor_zerolength(cmd);
	1319	assert_string_is_neither_NULL_nor_zerolength(title);
[1]	1320
[128]	1321	malloc_string(tempfile);
[1]	1322	#ifdef __FreeBSD__
	1323	/* Ugh. FreeBSD fdformat prints out this pretty progress indicator that's
	1324	impossible to parse. It looks like
	1325	VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVF-------------------
	1326	where V means verified, E means error, F means formatted, and - means
	1327	not done yet.
	1328	*/
[128]	1329	return (run_program_and_log_to_screen(cmd, title));
[1]	1330	#endif
	1331
	1332	/* if Debian then do bog-standard superformat; don't be pretty */
[128]	1333	if (strstr(cmd, "superformat")) {
	1334	return (run_program_and_log_to_screen(cmd, title));
	1335	}
[1]	1336	/* if not Debian then go ahead & use fdformat */
[128]	1337	strcpy(tempfile,
	1338	call_program_and_get_last_line_of_output
	1339	("mktemp -q /tmp/mondo.XXXXXXXX"));
[1118]	1340	mr_asprintf(&command, "%s >> %s 2>> %s; rm -f %s", cmd, tempfile, tempfile, tempfile);
[1107]	1341	mr_msg(3, command);
[128]	1342	open_evalcall_form(title);
	1343	if (!(pin = popen(command, "r"))) {
	1344	log_OS_error("fmt err");
	1345	return (1);
[1]	1346	}
[128]	1347	if (strstr(command, "1722")) {
	1348	maxtracks = 82;
	1349	} else {
	1350	maxtracks = 80;
[1]	1351	}
[1118]	1352	mr_free(command);
	1353
[128]	1354	for (sleep(1); does_file_exist(tempfile); sleep(1)) {
	1355	trackno = get_trackno_from_logfile(tempfile);
	1356	if (trackno < 0 \|\| trackno > 80) {
[1107]	1357	mr_msg(1, "Weird track#");
[128]	1358	continue;
	1359	}
	1360	percentage = trackno * 100 / maxtracks;
	1361	if (trackno <= 5 && last_trkno > 40) {
	1362	close_evalcall_form();
	1363	strcpy(title, "Verifying format");
	1364	open_evalcall_form(title);
	1365	}
	1366	last_trkno = trackno;
	1367	update_evalcall_form(percentage);
	1368	}
	1369	close_evalcall_form();
	1370	if (pclose(pin)) {
	1371	res++;
	1372	log_OS_error("Unable to pclose");
	1373	}
	1374	unlink(tempfile);
[1080]	1375	mr_free(tempfile);
[128]	1376	return (res);
[1]	1377	}
	1378
[1118]	1379
[1]	1380	/**
	1381	* Wrapper around @c format_disk_SUB().
	1382	* This function calls @c format_disk_SUB() with a @c device of its @c device
	1383	* parameter and a @c title of Formatting disk @c device. If the format
	1384	* fails, the user will be given the option of retrying.
	1385	*
	1386	* @param device The floppy drive to write to.
	1387	* @see format_disk_SUB
	1388	* @return The exit code of fdformat/superformat.
	1389	* @ingroup deviceGroup
	1390	*/
[128]	1391	int format_disk(char *device)
[1]	1392	{
	1393
[128]	1394	/@ int ************************************************************* */
	1395	int res = 0;
[1]	1396
[128]	1397	/@ buffer ********************************************************** */
	1398	char *command;
	1399	char *title;
	1400
[1118]	1401	assert_string_is_neither_NULL_nor_zerolength(device);
[128]	1402
	1403	if (!system("which superformat > /dev/null 2> /dev/null")) {
[1118]	1404	mr_asprintf(&command, "superformat %s", device);
[128]	1405	} else {
[1]	1406	#ifdef __FreeBSD__
[1118]	1407	mr_asprintf(&command, "fdformat -y %s", device);
[1]	1408	#else
[1118]	1409	mr_asprintf(&command, "fdformat %s", device);
[1]	1410	#endif
	1411	}
[1118]	1412	mr_asprintf(&title, "Formatting disk %s", device);
[128]	1413	while ((res = format_disk_SUB(command, title))) {
	1414	if (!ask_me_yes_or_no("Failed to format disk. Retry?")) {
	1415	return (res);
	1416	}
	1417	}
[1080]	1418	mr_free(title);
	1419	mr_free(command);
[128]	1420	return (res);
[1]	1421	}
	1422
[1118]	1423
[1]	1424	/**
	1425	* Get the <tt>N</tt>th bit of @c array.
	1426	* @param array The bit-array (as a @c char pointer).
	1427	* @param N The number of the bit you want.
	1428	* @return TRUE (bit is set) or FALSE (bit is not set).
	1429	* @see set_bit_N_of_array
	1430	* @ingroup utilityGroup
	1431	*/
[128]	1432	bool get_bit_N_of_array(char *array, int N)
[1]	1433	{
[128]	1434	int element_number;
	1435	int bit_number;
	1436	int mask;
	1437
	1438	element_number = N / 8;
	1439	bit_number = N % 8;
	1440	mask = 1 << bit_number;
	1441	if (array[element_number] & mask) {
	1442	return (TRUE);
	1443	} else {
	1444	return (FALSE);
	1445	}
[1]	1446	}
	1447
	1448
	1449	/**
	1450	* @addtogroup LLarchiveGroup
	1451	* @{
	1452	*/
	1453	/**
	1454	* Start up threads to archive your files.
	1455	*
	1456	* This function starts @c ARCH_THREADS threads,
	1457	* each starting execution in @c create_afio_files_in_background().
	1458	* Each thread will archive individual filesets, based on the
	1459	* pointers passed to it and continually updated, until all files
	1460	* have been backed up. This function coordinates the threads
	1461	* and copies their output to the @c scratchdir.
	1462	*
	1463	* @param bkpinfo The backup information structure. Fields used:
	1464	* - @c backup_media_type
	1465	* - @c scratchdir
	1466	* - @c tmpdir
	1467	* - @c zip_suffix
	1468	*
	1469	* @return The number of errors encountered (0 for success)
	1470	*/
[541]	1471	int make_afioballs_and_images(struct s_bkpinfo *bkpinfo)
[1]	1472	{
	1473
[128]	1474	/@ int ************************************************* */
	1475	int retval = 0;
	1476	long int storing_set_no = 0;
	1477	int res = 0;
	1478	bool done_storing = FALSE;
	1479	char *result_str;
	1480	char *transfer_block;
	1481	void *vp;
	1482	void **pvp;
[1]	1483
[128]	1484	/@ buffers ********************************************* */
	1485	char *storing_filelist_fname;
	1486	char *storing_afioball_fname;
[1135]	1487	char *tmp = NULL;
[128]	1488	char *media_usage_comment;
	1489	pthread_t archival_thread[ARCH_THREADS];
	1490	char *p_list_of_fileset_flags;
	1491	int *p_archival_threads_running;
	1492	int *p_last_set_archived;
	1493	int *p_next_set_to_archive;
	1494	int noof_threads;
	1495	int i;
[948]	1496	char *curr_xattr_list_fname = NULL;
[128]	1497	char *curr_acl_list_fname;
	1498	int misc_counter_that_is_not_important = 0;
[1]	1499
[1107]	1500	mr_msg(8, "here");
[128]	1501	assert(bkpinfo != NULL);
[1135]	1502	/* BERLIOS: To be removed */
[128]	1503	malloc_string(result_str);
	1504	malloc_string(curr_xattr_list_fname);
	1505	malloc_string(curr_acl_list_fname);
	1506	malloc_string(storing_filelist_fname);
	1507	malloc_string(media_usage_comment);
	1508	malloc_string(storing_afioball_fname);
	1509	transfer_block =
[1080]	1510	mr_malloc(sizeof(struct s_bkpinfo) + BKPINFO_LOC_OFFSET + 64);
[128]	1511	memset((void *) transfer_block, 0,
	1512	sizeof(struct s_bkpinfo) + BKPINFO_LOC_OFFSET + 64);
	1513	p_last_set_archived = (int *) transfer_block;
	1514	p_archival_threads_running = (int *) (transfer_block + 4);
	1515	p_next_set_to_archive = (int *) (transfer_block + 8);
	1516	p_list_of_fileset_flags = (char *) (transfer_block + 12);
	1517	memcpy((void *) (transfer_block + BKPINFO_LOC_OFFSET),
	1518	(void *) bkpinfo, sizeof(struct s_bkpinfo));
	1519	pvp = &vp;
	1520	vp = (void *) result_str;
	1521	*p_archival_threads_running = 0;
	1522	*p_last_set_archived = -1;
	1523	*p_next_set_to_archive = 0;
	1524	log_to_screen("Archiving regular files");
[1107]	1525	mr_msg(5, "Go, Shorty. It's your birthday.");
[1118]	1526	open_progress_form(_("Backing up filesystem"),
	1527	_("I am backing up your live filesystem now."),
	1528	_("Please wait. This may take a couple of hours."),
	1529	_("Working..."),
[128]	1530	get_last_filelist_number(bkpinfo) + 1);
[1]	1531
[1107]	1532	mr_msg(5, "We're gonna party like it's your birthday.");
[1]	1533
[128]	1534	srand((unsigned int) getpid());
	1535	g_sem_key = 1234 + random() % 30000;
	1536	if ((g_sem_id =
	1537	semget((key_t) g_sem_key, 1,
	1538	IPC_CREAT \| S_IREAD \| S_IWRITE)) == -1) {
	1539	fatal_error("MABAI - unable to semget");
[1]	1540	}
[128]	1541	if (!set_semvalue()) {
	1542	fatal_error("Unable to init semaphore");
	1543	} // initialize semaphore
	1544	for (noof_threads = 0; noof_threads < ARCH_THREADS; noof_threads++) {
[1107]	1545	mr_msg(8, "Creating thread #%d", noof_threads);
[128]	1546	(*p_archival_threads_running)++;
	1547	if ((res =
	1548	pthread_create(&archival_thread[noof_threads], NULL,
	1549	create_afio_files_in_background,
	1550	(void *) transfer_block))) {
	1551	fatal_error("Unable to create an archival thread");
	1552	}
[1]	1553	}
	1554
[1107]	1555	mr_msg(8, "About to enter while() loop");
[128]	1556	while (!done_storing) {
	1557	if (g_exiting) {
	1558	fatal_error("Execution run aborted (main loop)");
	1559	}
	1560	if (*p_archival_threads_running == 0
	1561	&& *p_last_set_archived == storing_set_no - 1) {
[1107]	1562	mr_msg(2,
[128]	1563	"No archival threads are running. The last stored set was %d and I'm looking for %d. Take off your make-up; the party's over... :-)",
	1564	*p_last_set_archived, storing_set_no);
	1565	done_storing = TRUE;
	1566	} else
	1567	if (!get_bit_N_of_array
	1568	(p_list_of_fileset_flags, storing_set_no)) {
	1569	misc_counter_that_is_not_important =
	1570	(misc_counter_that_is_not_important + 1) % 5;
	1571	if (!misc_counter_that_is_not_important) {
	1572	update_progress_form(media_usage_comment);
	1573	}
	1574	sleep(1);
[1118]	1575	} else {
[128]	1576	// store set N
	1577	sprintf(storing_filelist_fname, FILELIST_FNAME_RAW_SZ,
	1578	bkpinfo->tmpdir, storing_set_no);
	1579	sprintf(storing_afioball_fname, AFIOBALL_FNAME_RAW_SZ,
	1580	bkpinfo->tmpdir, storing_set_no, bkpinfo->zip_suffix);
[948]	1581	if (g_getfattr) {
	1582	sprintf(curr_xattr_list_fname, XATTR_LIST_FNAME_RAW_SZ,
[128]	1583	bkpinfo->tmpdir, storing_set_no);
[948]	1584	}
	1585	if (g_getfacl) {
	1586	sprintf(curr_acl_list_fname, ACL_LIST_FNAME_RAW_SZ,
[128]	1587	bkpinfo->tmpdir, storing_set_no);
[948]	1588	}
[128]	1589
[1107]	1590	mr_msg(2, "Storing set %d", storing_set_no);
[128]	1591	while (!does_file_exist(storing_filelist_fname)
	1592	\|\| !does_file_exist(storing_afioball_fname)) {
[1107]	1593	mr_msg(2,
[128]	1594	"Warning - either %s or %s doesn't exist yet. I'll pause 5 secs.",
	1595	storing_filelist_fname, storing_afioball_fname);
	1596	sleep(5);
	1597	}
	1598	strcpy(media_usage_comment,
	1599	percent_media_full_comment(bkpinfo));
	1600	/* copy to CD (scratchdir) ... and an actual CD-R if necessary */
	1601	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	1602	register_in_tape_catalog(fileset, storing_set_no, -1,
	1603	storing_afioball_fname);
	1604	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	1605	storing_afioball_fname);
	1606	iamhere("Writing EXAT files");
[1118]	1607	res += write_EXAT_files_to_tape(bkpinfo,
	1608	curr_xattr_list_fname,
	1609	curr_acl_list_fname);
	1610	// archives themselves
[128]	1611	res +=
	1612	move_files_to_stream(bkpinfo, storing_afioball_fname,
	1613	NULL);
	1614	} else {
[948]	1615	if (g_getfacl) {
	1616	if (g_getfattr) {
	1617	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
[128]	1618	curr_xattr_list_fname,
	1619	curr_acl_list_fname,
	1620	storing_afioball_fname, NULL);
[948]	1621	} else {
	1622	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1623	curr_acl_list_fname,
	1624	storing_afioball_fname, NULL);
	1625	}
	1626	} else {
	1627	if (g_getfattr) {
	1628	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1629	curr_xattr_list_fname,
	1630	storing_afioball_fname, NULL);
	1631	} else {
	1632	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1633	storing_afioball_fname, NULL);
	1634	}
	1635	}
[128]	1636	}
	1637	retval += res;
	1638	g_current_progress++;
	1639	update_progress_form(media_usage_comment);
	1640	if (res) {
[1135]	1641	mr_asprintf(&tmp,
	1642	"Failed to add archive %ld's files to CD dir\n",
	1643	storing_set_no);
[128]	1644	log_to_screen(tmp);
[1135]	1645	mr_free(tmp);
[128]	1646	fatal_error
	1647	("Is your hard disk full? If not, please send the author the logfile.");
	1648	}
	1649	storing_set_no++;
	1650	// sleep(2);
[1]	1651	}
	1652	}
[128]	1653	close_progress_form();
[1]	1654
[1107]	1655	mr_msg(2, "Joining background threads to foreground thread");
[128]	1656	for (i = 0; i < noof_threads; i++) {
	1657	pthread_join(archival_thread[i], pvp);
[1107]	1658	mr_msg(3, "Thread %d of %d: closed OK", i + 1, noof_threads);
[128]	1659	}
	1660	del_semvalue();
[1107]	1661	mr_msg(2, "Done.");
[128]	1662	if (retval) {
[1135]	1663	mr_asprintf(&tmp,
	1664	"Your regular files have been archived (with errors).");
[128]	1665	} else {
[1135]	1666	mr_asprintf(&tmp,
	1667	"Your regular files have been archived successfully");
[128]	1668	}
	1669	log_to_screen(tmp);
[1135]	1670	mr_free(tmp);
[1080]	1671	mr_free(transfer_block);
	1672	mr_free(result_str);
	1673	mr_free(storing_filelist_fname);
	1674	mr_free(media_usage_comment);
	1675	mr_free(storing_afioball_fname);
	1676	mr_free(curr_xattr_list_fname);
	1677	mr_free(curr_acl_list_fname);
[128]	1678	return (retval);
[1]	1679	}
	1680
	1681
[128]	1682	void pause_for_N_seconds(int how_long, char *msg)
[1]	1683	{
[128]	1684	int i;
	1685	open_evalcall_form(msg);
	1686	for (i = 0; i < how_long; i++) {
	1687	update_evalcall_form((int) ((100.0 / (float) (how_long) * i)));
	1688	sleep(1);
	1689	}
	1690	close_evalcall_form();
[1]	1691	}
	1692
	1693
	1694
	1695
	1696	/**
	1697	* Create an ISO image in @c destfile, from files in @c bkpinfo->scratchdir.
	1698	*
	1699	* @param bkpinfo The backup information structure. Fields used:
	1700	* - @c backup_media_type
	1701	* - @c call_after_iso
	1702	* - @c call_before_iso
	1703	* - @c call_burn_iso
	1704	* - @c call_make_iso
	1705	* - @c make_cd_use_lilo
	1706	* - @c manual_cd_tray
	1707	* - @c nonbootable_backup
	1708	* - @c scratchdir
	1709	*
	1710	* @param destfile Where to put the generated ISO image.
	1711	* @return The number of errors encountered (0 for success)
	1712	*/
[541]	1713	int make_iso_fs(struct s_bkpinfo bkpinfo, char destfile)
[1]	1714	{
[128]	1715	/@ int ********************************************* */
	1716	int retval = 0;
	1717	int res;
[1]	1718
[128]	1719	/@ buffers ***************************************** */
	1720	char *tmp;
	1721	char *old_pwd;
	1722	char *result_sz;
	1723	char *message_to_screen;
	1724	char *sz_blank_disk;
	1725	char *fnam;
	1726	char *tmp2;
	1727	char *tmp3;
	1728	bool cd_is_mountable;
[1]	1729
[128]	1730	malloc_string(old_pwd);
	1731	malloc_string(result_sz);
	1732	malloc_string(message_to_screen);
	1733	malloc_string(sz_blank_disk);
	1734	malloc_string(fnam);
[1080]	1735	tmp = mr_malloc(1200);
	1736	tmp2 = mr_malloc(1200);
	1737	tmp3 = mr_malloc(1200);
[128]	1738	assert(bkpinfo != NULL);
	1739	assert_string_is_neither_NULL_nor_zerolength(destfile);
[1]	1740
[128]	1741	sprintf(tmp, "%s/isolinux.bin", bkpinfo->scratchdir);
	1742	sprintf(tmp2, "%s/isolinux.bin", bkpinfo->tmpdir);
	1743	if (does_file_exist(tmp)) {
	1744	sprintf(tmp3, "cp -f %s %s", tmp, tmp2);
	1745	paranoid_system(tmp3);
[1]	1746	}
[128]	1747	if (!does_file_exist(tmp) && does_file_exist(tmp2)) {
	1748	sprintf(tmp3, "cp -f %s %s", tmp2, tmp);
	1749	paranoid_system(tmp3);
[1]	1750	}
[128]	1751	/*
	1752	if (!does_file_exist(tmp))
	1753	{
[1107]	1754	mr_msg (2, "Silly bug in Mindi.pl; workaround in progress...");
[128]	1755	strcpy(fnam, call_program_and_get_last_line_of_output("locate isolinux.bin \| tail -n1"));
	1756	if (strlen(fnam)>0 && does_file_exist(fnam))
	1757	{
	1758	sprintf(tmp, "cp -f %s %s", fnam, bkpinfo->scratchdir);
	1759	res = run_program_and_log_output(tmp, FALSE);
	1760	}
	1761	else
	1762	{
	1763	res = 1;
	1764	}
	1765	if (res)
	1766	{
[1107]	1767	mr_msg (2, "Could not work around silly bug in Mindi.pl - sorry! Isolinux.bin missing");
[128]	1768	}
	1769	}
	1770	*/
[1080]	1771	mr_free(tmp2);
	1772	mr_free(tmp3);
[128]	1773	if (bkpinfo->backup_media_type == iso && bkpinfo->manual_cd_tray) {
[541]	1774	popup_and_OK("Please insert new media and press Enter.");
[128]	1775	}
[1]	1776
[1107]	1777	mr_msg(2, "make_iso_fs --- scratchdir=%s --- destfile=%s",
[128]	1778	bkpinfo->scratchdir, destfile);
	1779	(void) getcwd(old_pwd, MAX_STR_LEN - 1);
	1780	sprintf(tmp, "chmod 744 %s", bkpinfo->scratchdir);
	1781	run_program_and_log_output(tmp, FALSE);
	1782	chdir(bkpinfo->scratchdir);
[1]	1783
[128]	1784	if (bkpinfo->call_before_iso[0] != '\0') {
	1785	sprintf(message_to_screen, "Running pre-ISO call for CD#%d",
	1786	g_current_media_number);
	1787	res =
	1788	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_before_iso,
	1789	destfile, g_current_media_number,
	1790	MONDO_LOGFILE, message_to_screen);
	1791	if (res) {
	1792	strcat(message_to_screen, "...failed");
	1793	} else {
	1794	strcat(message_to_screen, "...OK");
	1795	}
	1796	log_to_screen(message_to_screen);
	1797	retval += res;
[1]	1798	}
	1799
[128]	1800	if (bkpinfo->call_make_iso[0] != '\0') {
[1107]	1801	mr_msg(2, "bkpinfo->call_make_iso = %s", bkpinfo->call_make_iso);
[128]	1802	sprintf(tmp, "%s/archives/NOT-THE-LAST", bkpinfo->scratchdir);
	1803	sprintf(message_to_screen, "Making an ISO (%s #%d)",
	1804	media_descriptor_string(bkpinfo->backup_media_type),
	1805	g_current_media_number);
[1]	1806
[128]	1807	pause_and_ask_for_cdr(2, &cd_is_mountable); /* if g_current_media_number >= 2 then pause & ask */
	1808	if (retval) {
	1809	log_to_screen
	1810	("Serious error(s) occurred already. I shan't try to write to media.");
	1811	} else {
	1812	res =
	1813	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_make_iso,
	1814	bkpinfo->scratchdir,
	1815	g_current_media_number,
	1816	MONDO_LOGFILE, message_to_screen);
	1817	if (res) {
	1818	log_to_screen("%s...failed to write", message_to_screen);
	1819	} else {
	1820	log_to_screen("%s...OK", message_to_screen);
	1821	if (!run_program_and_log_output
[681]	1822	("tail -n10 /var/log/mondo-archive.log \| grep -F ':-('",
[128]	1823	1)) {
	1824	log_to_screen
	1825	("Despite nonfatal errors, growisofs confirms the write was successful.");
	1826	}
	1827	}
	1828	retval += res;
[1]	1829	#ifdef DVDRWFORMAT
[128]	1830	sprintf(tmp,
	1831	"tail -n8 %s \| grep 'blank=full.dvd-compat.DAO'",
	1832	MONDO_LOGFILE);
	1833	if (g_backup_media_type == dvd
	1834	&& (res \|\| !run_program_and_log_output(tmp, 1))) {
	1835	log_to_screen
	1836	("Failed to write to disk. I shall blank it and then try again.");
	1837	sleep(5);
	1838	system("sync");
	1839	pause_for_N_seconds(5, "Letting DVD drive settle");
[1]	1840
	1841	// dvd+rw-format --- OPTION 2
[128]	1842	if (!bkpinfo->please_dont_eject) {
	1843	log_to_screen("Ejecting media to clear drive status.");
	1844	eject_device(bkpinfo->media_device);
	1845	inject_device(bkpinfo->media_device);
	1846	}
	1847	pause_for_N_seconds(5, "Letting DVD drive settle");
[908]	1848	sprintf(sz_blank_disk, "dvd+rw-format -force %s",
[128]	1849	bkpinfo->media_device);
[1107]	1850	mr_msg(3, "sz_blank_disk = '%s'", sz_blank_disk);
[128]	1851	res =
	1852	run_external_binary_with_percentage_indicator_NEW
	1853	("Blanking DVD disk", sz_blank_disk);
	1854	if (res) {
	1855	log_to_screen
	1856	("Warning - format failed. (Was it a DVD-R?) Sleeping for 5 seconds to take a breath...");
	1857	pause_for_N_seconds(5,
	1858	"Letting DVD drive settle... and trying again.");
	1859	res =
	1860	run_external_binary_with_percentage_indicator_NEW
	1861	("Blanking DVD disk", sz_blank_disk);
	1862	if (res) {
	1863	log_to_screen("Format failed a second time.");
	1864	}
	1865	} else {
	1866	log_to_screen
	1867	("Format succeeded. Sleeping for 5 seconds to take a breath...");
	1868	}
	1869	pause_for_N_seconds(5, "Letting DVD drive settle");
	1870	if (!bkpinfo->please_dont_eject) {
	1871	log_to_screen("Ejecting media to clear drive status.");
	1872	eject_device(bkpinfo->media_device);
	1873	inject_device(bkpinfo->media_device);
	1874	}
	1875	pause_for_N_seconds(5, "Letting DVD drive settle");
	1876	res =
	1877	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_make_iso,
	1878	bkpinfo->scratchdir,
	1879	g_current_media_number,
	1880	MONDO_LOGFILE,
	1881	message_to_screen);
	1882	retval += res;
	1883	if (!bkpinfo->please_dont_eject) {
	1884	log_to_screen("Ejecting media.");
	1885	eject_device(bkpinfo->media_device);
	1886	}
	1887	if (res) {
	1888	log_to_screen("Dagnabbit. It still failed.");
	1889	} else {
	1890	log_to_screen
	1891	("OK, this time I successfully backed up to DVD.");
	1892	}
	1893	}
	1894	#endif
	1895	if (g_backup_media_type == dvd && !bkpinfo->please_dont_eject) {
	1896	eject_device(bkpinfo->media_device);
	1897	}
[1]	1898	}
[128]	1899	} else {
	1900	sprintf(message_to_screen, "Running mkisofs to make %s #%d",
	1901	media_descriptor_string(bkpinfo->backup_media_type),
	1902	g_current_media_number);
[1107]	1903	mr_msg(1, message_to_screen);
[128]	1904	sprintf(result_sz, "Call to mkisofs to make ISO (%s #%d) ",
	1905	media_descriptor_string(bkpinfo->backup_media_type),
	1906	g_current_media_number);
	1907	if (bkpinfo->nonbootable_backup) {
[1107]	1908	mr_msg(1, "Making nonbootable backup");
[128]	1909	res =
	1910	eval_call_to_make_ISO(bkpinfo,
[906]	1911	"mkisofs -o '_ISO_' -r -p MondoRescue -publisher www.mondorescue.org -A MondoRescue_GPL -V _CD#_ .",
[128]	1912	destfile, g_current_media_number,
	1913	MONDO_LOGFILE, message_to_screen);
	1914	} else {
[1107]	1915	mr_msg(1, "Making bootable backup");
[1]	1916
	1917	#ifdef __FreeBSD__
[128]	1918	bkpinfo->make_cd_use_lilo = TRUE;
[1]	1919	#endif
	1920
	1921
[1107]	1922	mr_msg(1, "make_cd_use_lilo is actually %d",
[128]	1923	bkpinfo->make_cd_use_lilo);
	1924	if (bkpinfo->make_cd_use_lilo) {
[1107]	1925	mr_msg(1, "make_cd_use_lilo = TRUE");
[1]	1926	// FIXME --- change mkisofs string to MONDO_MKISOFS_REGULAR_SYSLINUX/LILO depending on bkpinfo->make_cd_usE_lilo
	1927	// and add ' .' at end
	1928	#ifdef __IA64__
[1107]	1929	mr_msg(1, "IA64 --> elilo");
[128]	1930	res = eval_call_to_make_ISO(bkpinfo,
	1931	//-b images/mindi-boot.2880.img
[541]	1932	"mkisofs -no-emul-boot -b images/mindi-bootroot."
	1933	IA64_BOOT_SIZE
[906]	1934	".img -c boot.cat -o '_ISO_' -J -r -p MondoRescue -publisher www.mondorescue.org -A Mondo_Rescue_GPL -V _CD#_ .",
[128]	1935	destfile,
	1936	g_current_media_number,
	1937	MONDO_LOGFILE,
	1938	message_to_screen);
[1]	1939	#else
	1940	// FIXME --- change mkisofs string to MONDO_MKISOFS_REGULAR_SYSLINUX/LILO depending on bkpinfo->make_cd_usE_lilo
	1941	// and add ' .' at end
[1107]	1942	mr_msg(1, "Non-ia64 --> lilo");
[128]	1943	res =
	1944	eval_call_to_make_ISO(bkpinfo,
[906]	1945	"mkisofs -b images/mindi-bootroot.2880.img -c boot.cat -o '_ISO_' -J -r -p MondoRescue -publisher www.mondorescue.org -A Mondo_Rescue_GPL -V _CD#_ .",
[128]	1946	destfile, g_current_media_number,
	1947	MONDO_LOGFILE,
	1948	message_to_screen);
[1]	1949	#endif
[128]	1950	} else {
[1107]	1951	mr_msg(1, "make_cd_use_lilo = FALSE");
	1952	mr_msg(1, "Isolinux");
[128]	1953	res =
	1954	eval_call_to_make_ISO(bkpinfo,
[906]	1955	"mkisofs -no-emul-boot -b isolinux.bin -boot-load-size 4 -boot-info-table -c boot.cat -o '_ISO_' -J -r -p MondoRescue -publisher www.mondorescue.org -A Mondo_Rescue_GPL -V _CD#_ .",
[128]	1956	destfile, g_current_media_number,
	1957	MONDO_LOGFILE,
	1958	message_to_screen);
	1959	}
	1960	}
	1961	if (res) {
	1962	strcat(result_sz, "...failed");
	1963	} else {
	1964	strcat(result_sz, "...OK");
	1965	}
	1966	log_to_screen(result_sz);
	1967	retval += res;
[1]	1968	}
[128]	1969
	1970	if (bkpinfo->backup_media_type == cdr
	1971	\|\| bkpinfo->backup_media_type == cdrw) {
	1972	if (is_this_device_mounted(bkpinfo->media_device)) {
[1107]	1973	mr_msg(2,
[128]	1974	"Warning - %s mounted. I'm unmounting it before I burn to it.",
	1975	bkpinfo->media_device);
	1976	sprintf(tmp, "umount %s", bkpinfo->media_device);
	1977	run_program_and_log_output(tmp, FALSE);
	1978	}
[1]	1979	}
	1980
[128]	1981	if (bkpinfo->call_burn_iso[0] != '\0') {
[1107]	1982	mr_msg(2, "bkpinfo->call_burn_iso = %s", bkpinfo->call_burn_iso);
[128]	1983	sprintf(message_to_screen, "Burning %s #%d",
	1984	media_descriptor_string(bkpinfo->backup_media_type),
	1985	g_current_media_number);
	1986	pause_and_ask_for_cdr(2, &cd_is_mountable);
	1987	res =
	1988	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_burn_iso,
	1989	destfile, g_current_media_number,
	1990	MONDO_LOGFILE, message_to_screen);
	1991	if (res) {
	1992	strcat(message_to_screen, "...failed");
	1993	} else {
	1994	strcat(message_to_screen, "...OK");
	1995	}
	1996	log_to_screen(message_to_screen);
	1997	retval += res;
	1998	}
[1]	1999
[128]	2000	if (bkpinfo->call_after_iso[0] != '\0') {
	2001	sprintf(message_to_screen, "Running post-ISO call (%s #%d)",
	2002	media_descriptor_string(bkpinfo->backup_media_type),
	2003	g_current_media_number);
	2004	res =
	2005	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_after_iso,
	2006	destfile, g_current_media_number,
	2007	MONDO_LOGFILE, message_to_screen);
	2008	if (res) {
	2009	strcat(message_to_screen, "...failed");
	2010	} else {
	2011	strcat(message_to_screen, "...OK");
	2012	}
	2013	log_to_screen(message_to_screen);
	2014	retval += res;
[1]	2015	}
	2016
[128]	2017	chdir(old_pwd);
	2018	if (retval) {
[1107]	2019	mr_msg(1, "WARNING - make_iso_fs returned an error");
[1]	2020	}
[1080]	2021	mr_free(old_pwd);
	2022	mr_free(result_sz);
	2023	mr_free(message_to_screen);
	2024	mr_free(sz_blank_disk);
	2025	mr_free(fnam);
	2026	mr_free(tmp);
[128]	2027	return (retval);
[1]	2028	}
	2029
	2030
	2031
	2032
	2033
	2034
	2035
	2036
	2037
	2038	bool is_dev_an_NTFS_dev(char *bigfile_fname)
	2039	{
[128]	2040	char *tmp;
	2041	char *command;
	2042	malloc_string(tmp);
	2043	malloc_string(command);
	2044	sprintf(command,
	2045	"dd if=%s bs=512 count=1 2> /dev/null \| strings \| head -n1",
	2046	bigfile_fname);
[1107]	2047	mr_msg(1, "command = '%s'", command);
[128]	2048	strcpy(tmp, call_program_and_get_last_line_of_output(command));
[1107]	2049	mr_msg(1, "--> tmp = '%s'", tmp);
[128]	2050	if (strstr(tmp, "NTFS")) {
	2051	iamhere("TRUE");
	2052	return (TRUE);
	2053	} else {
	2054	iamhere("FALSE");
	2055	return (FALSE);
	2056	}
[1]	2057	}
	2058
	2059
	2060	/**
	2061	* Back up big files by chopping them up.
	2062	* This function backs up all "big" files (where "big" depends
	2063	* on your backup media) in "chunks" (whose size again depends
	2064	* on your media).
	2065	*
	2066	* @param bkpinfo The backup information structure. Fields used:
	2067	* - @c backup_media_type
	2068	* - @c optimal_set_size
	2069	* @param biggielist_fname The path to a file containing a list of
	2070	* all "big" files.
	2071	* @return The number of errors encountered (0 for success)
	2072	* @see slice_up_file_etc
	2073	*/
	2074	int
[541]	2075	make_slices_and_images(struct s_bkpinfo bkpinfo, char biggielist_fname)
[1]	2076	{
	2077
[128]	2078	/@ pointers ****************************************** */
	2079	FILE *fin;
	2080	char *p;
[1]	2081
[128]	2082	/@ buffers ******************************************* */
	2083	char *tmp;
	2084	char *bigfile_fname;
	2085	char *sz_devfile;
[296]	2086	char *ntfsprog_fifo = NULL;
[128]	2087	/@ long ********************************************** */
	2088	long biggie_file_number = 0;
	2089	long noof_biggie_files = 0;
	2090	long estimated_total_noof_slices = 0;
[1]	2091
[128]	2092	/@ int *********************************************** */
	2093	int retval = 0;
	2094	int res = 0;
	2095	pid_t pid;
	2096	FILE *ftmp = NULL;
	2097	bool delete_when_done;
[296]	2098	bool use_ntfsprog;
[684]	2099	off_t biggie_fsize;
[1]	2100
[128]	2101	assert(bkpinfo != NULL);
	2102	assert_string_is_neither_NULL_nor_zerolength(biggielist_fname);
[1]	2103
[128]	2104	malloc_string(tmp);
	2105	malloc_string(bigfile_fname);
	2106	malloc_string(sz_devfile);
	2107	estimated_total_noof_slices =
	2108	size_of_all_biggiefiles_K(bkpinfo) / bkpinfo->optimal_set_size + 1;
[1]	2109
[1107]	2110	mr_msg(1, "size of all biggiefiles = %ld",
[128]	2111	size_of_all_biggiefiles_K(bkpinfo));
[1107]	2112	mr_msg(1, "estimated_total_noof_slices = %ld KB / %ld KB = %ld",
[128]	2113	size_of_all_biggiefiles_K(bkpinfo), bkpinfo->optimal_set_size,
	2114	estimated_total_noof_slices);
[1]	2115
[128]	2116	if (length_of_file(biggielist_fname) < 6) {
[1107]	2117	mr_msg(1, "No biggiefiles; fair enough...");
[128]	2118	return (0);
[1]	2119	}
[128]	2120	sprintf(tmp, "I am now backing up all large files.");
	2121	log_to_screen(tmp);
	2122	noof_biggie_files = count_lines_in_file(biggielist_fname);
	2123	open_progress_form("Backing up big files", tmp,
	2124	"Please wait. This may take some time.", "",
	2125	estimated_total_noof_slices);
	2126	if (!(fin = fopen(biggielist_fname, "r"))) {
	2127	log_OS_error("Unable to openin biggielist");
	2128	return (1);
[1]	2129	}
[128]	2130	for (fgets(bigfile_fname, MAX_STR_LEN, fin); !feof(fin);
	2131	fgets(bigfile_fname, MAX_STR_LEN, fin), biggie_file_number++) {
[296]	2132	use_ntfsprog = FALSE;
[128]	2133	if (bigfile_fname[strlen(bigfile_fname) - 1] < 32) {
	2134	bigfile_fname[strlen(bigfile_fname) - 1] = '\0';
	2135	}
	2136	biggie_fsize = length_of_file(bigfile_fname);
	2137	delete_when_done = FALSE;
	2138
	2139	if (!does_file_exist(bigfile_fname)) {
	2140	ftmp = fopen(bigfile_fname, "w");
	2141	paranoid_fclose(ftmp);
	2142	sprintf(tmp, "bigfile %s was deleted - creating a dummy",
	2143	bigfile_fname);
	2144	delete_when_done = TRUE;
	2145	} else {
[812]	2146	// Call ntfsclone (formerly partimagehack) if it's a /dev entry
	2147	// (i.e. a partition to be imaged)
[1107]	2148	mr_msg(2, "bigfile_fname = %s", bigfile_fname);
[296]	2149	use_ntfsprog = FALSE;
[128]	2150	if (!strncmp(bigfile_fname, "/dev/", 5)
	2151	&& is_dev_an_NTFS_dev(bigfile_fname)) {
[296]	2152	use_ntfsprog = TRUE;
[1107]	2153	mr_msg(2,
[296]	2154	"Calling ntfsclone in background because %s is an NTFS partition",
[128]	2155	bigfile_fname);
[812]	2156	sprintf(sz_devfile, "%s/%d.%d.000",
	2157	bkpinfo->tmpdir,
[128]	2158	(int) (random() % 32768),
	2159	(int) (random() % 32768));
	2160	mkfifo(sz_devfile, 0x770);
[296]	2161	ntfsprog_fifo = sz_devfile;
[128]	2162	switch (pid = fork()) {
	2163	case -1:
	2164	fatal_error("Fork failure");
	2165	case 0:
[1107]	2166	mr_msg(2,
[296]	2167	"CHILD - fip - calling feed_into_ntfsprog(%s, %s)",
[128]	2168	bigfile_fname, sz_devfile);
[296]	2169	res = feed_into_ntfsprog(bigfile_fname, sz_devfile);
[128]	2170	exit(res);
	2171	break;
	2172	default:
[1107]	2173	mr_msg(2,
[296]	2174	"feed_into_ntfsprog() called in background --- pid=%ld",
[128]	2175	(long int) (pid));
	2176	}
	2177	}
[1]	2178	// Otherwise, use good old 'dd' and 'bzip2'
[128]	2179	else {
	2180	sz_devfile[0] = '\0';
[296]	2181	ntfsprog_fifo = NULL;
[128]	2182	}
[1]	2183
	2184	// Whether partition or biggiefile, just do your thang :-)
[128]	2185	sprintf(tmp, "Bigfile #%ld is '%s' (%ld KB)",
	2186	biggie_file_number + 1, bigfile_fname,
	2187	(long) biggie_fsize >> 10);
	2188	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2189	write_header_block_to_stream(biggie_fsize, bigfile_fname,
[296]	2190	use_ntfsprog ?
[128]	2191	BLK_START_A_PIHBIGGIE :
	2192	BLK_START_A_NORMBIGGIE);
	2193	}
	2194	res =
[541]	2195	slice_up_file_etc(bkpinfo, bigfile_fname,
[296]	2196	ntfsprog_fifo, biggie_file_number,
	2197	noof_biggie_files, use_ntfsprog);
[128]	2198	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2199	write_header_block_to_stream((off_t)0,
[128]	2200	calc_checksum_of_file
	2201	(bigfile_fname),
	2202	BLK_STOP_A_BIGGIE);
	2203	}
	2204	retval += res;
	2205	p = strrchr(bigfile_fname, '/');
	2206	if (p) {
	2207	p++;
	2208	} else {
	2209	p = bigfile_fname;
	2210	}
	2211	sprintf(tmp, "Archiving %s ... ", bigfile_fname);
	2212	if (res) {
	2213	strcat(tmp, "Failed!");
	2214	} else {
	2215	strcat(tmp, "OK");
	2216	}
	2217	if (delete_when_done) {
	2218	unlink(bigfile_fname);
	2219	delete_when_done = FALSE;
	2220	}
	2221	}
[1]	2222	#ifndef _XWIN
[128]	2223	if (!g_text_mode) {
	2224	newtDrawRootText(0, g_noof_rows - 2, tmp);
	2225	newtRefresh();
	2226	}
[1]	2227	#endif
[128]	2228	}
[1107]	2229	mr_msg(1, "Finished backing up bigfiles");
	2230	mr_msg(1, "estimated slices = %ld; actual slices = %ld",
[128]	2231	estimated_total_noof_slices, g_current_progress);
	2232	close_progress_form();
	2233	paranoid_fclose(fin);
[1080]	2234	mr_free(tmp);
	2235	mr_free(bigfile_fname);
	2236	mr_free(sz_devfile);
[128]	2237	return (retval);
[1]	2238	}
	2239
	2240
	2241
	2242
	2243	/**
	2244	* Single-threaded version of @c make_afioballs_and_images().
	2245	* @see make_afioballs_and_images
	2246	*/
[541]	2247	int make_afioballs_and_images_OLD(struct s_bkpinfo *bkpinfo)
[1]	2248	{
	2249
[128]	2250	/@ int ************************************************* */
	2251	int retval = 0;
	2252	long int curr_set_no = 0;
	2253	int res = 0;
[1]	2254
[128]	2255	/@ buffers ********************************************* */
	2256	char *curr_filelist_fname;
	2257	char *curr_afioball_fname;
	2258	char *curr_xattr_list_fname;
	2259	char *curr_acl_list_fname;
	2260	char *tmp;
	2261	char *media_usage_comment;
[1]	2262
[128]	2263	malloc_string(curr_afioball_fname);
	2264	malloc_string(media_usage_comment);
	2265	malloc_string(curr_filelist_fname);
	2266	malloc_string(curr_xattr_list_fname);
	2267	malloc_string(curr_acl_list_fname);
[1]	2268
[1080]	2269	tmp = mr_malloc(MAX_STR_LEN * 2);
[1]	2270
[128]	2271	sprintf(tmp, "%s/archives/filelist.full", bkpinfo->scratchdir);
[1]	2272
[128]	2273	log_to_screen("Archiving regular files");
[1]	2274
[541]	2275	open_progress_form("Backing up filesystem",
	2276	"I am backing up your live filesystem now.",
	2277	"Please wait. This may take a couple of hours.",
	2278	"Working...",
[128]	2279	get_last_filelist_number(bkpinfo) + 1);
	2280
	2281	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ, bkpinfo->tmpdir,
	2282	0L);
	2283
	2284	for (curr_set_no = 0; does_file_exist(curr_filelist_fname);
	2285	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ,
	2286	bkpinfo->tmpdir, ++curr_set_no)) {
	2287	/* backup this set of files */
	2288	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ,
	2289	bkpinfo->tmpdir, curr_set_no);
	2290	sprintf(curr_afioball_fname, AFIOBALL_FNAME_RAW_SZ,
	2291	bkpinfo->tmpdir, curr_set_no, bkpinfo->zip_suffix);
	2292
[1107]	2293	mr_msg(1, "EXAT'g set %ld", curr_set_no);
[948]	2294	if (g_getfattr) {
	2295	sprintf(curr_xattr_list_fname, XATTR_LIST_FNAME_RAW_SZ,
[128]	2296	bkpinfo->tmpdir, curr_set_no);
[948]	2297	get_fattr_list(curr_filelist_fname, curr_xattr_list_fname);
	2298	}
	2299	if (g_getfacl) {
	2300	sprintf(curr_acl_list_fname, ACL_LIST_FNAME_RAW_SZ,
[128]	2301	bkpinfo->tmpdir, curr_set_no);
[948]	2302	get_acl_list(curr_filelist_fname, curr_acl_list_fname);
	2303	}
[128]	2304
[1107]	2305	mr_msg(1, "Archiving set %ld", curr_set_no);
[128]	2306	res =
	2307	archive_this_fileset(bkpinfo, curr_filelist_fname,
	2308	curr_afioball_fname, curr_set_no);
	2309	retval += res;
	2310	if (res) {
	2311	sprintf(tmp,
	2312	"Errors occurred while archiving set %ld. Perhaps your live filesystem changed?",
	2313	curr_set_no);
	2314	log_to_screen(tmp);
	2315	}
	2316
	2317	strcpy(media_usage_comment, percent_media_full_comment(bkpinfo));
	2318
	2319	/* copy to CD (scratchdir) ... and an actual CD-R if necessary */
	2320	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2321	register_in_tape_catalog(fileset, curr_set_no, -1,
	2322	curr_afioball_fname);
	2323	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	2324	curr_afioball_fname);
	2325	iamhere("Writing EXAT files");
	2326	res +=
	2327	write_EXAT_files_to_tape(bkpinfo, curr_xattr_list_fname,
	2328	curr_acl_list_fname);
[1]	2329	// archives themselves
[128]	2330	res = move_files_to_stream(bkpinfo, curr_afioball_fname, NULL);
	2331	} else {
[948]	2332	if (g_getfacl) {
	2333	if (g_getfattr) {
	2334	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2335	curr_xattr_list_fname,
	2336	curr_acl_list_fname,
	2337	curr_afioball_fname, NULL);
	2338	} else {
	2339	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2340	curr_acl_list_fname,
	2341	curr_afioball_fname, NULL);
	2342	}
	2343	} else {
	2344	if (g_getfattr) {
	2345	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2346	curr_xattr_list_fname,
	2347	curr_afioball_fname, NULL);
	2348	} else {
	2349	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2350	curr_afioball_fname, NULL);
	2351	}
	2352	}
[128]	2353	}
	2354	retval += res;
	2355	g_current_progress++;
	2356	update_progress_form(media_usage_comment);
[1]	2357
[128]	2358	if (res) {
	2359	sprintf(tmp, "Failed to add archive %ld's files to CD dir\n",
	2360	curr_set_no);
	2361	log_to_screen(tmp);
	2362	fatal_error
	2363	("Is your hard disk is full? If not, please send the author the logfile.");
	2364	}
[1]	2365	}
[128]	2366	close_progress_form();
	2367	sprintf(tmp, "Your regular files have been archived ");
	2368	if (retval) {
	2369	strcat(tmp, "(with errors).");
	2370	} else {
	2371	strcat(tmp, "successfully.");
	2372	}
	2373	log_to_screen(tmp);
[1080]	2374	mr_free(tmp);
	2375	mr_free(curr_filelist_fname);
	2376	mr_free(curr_afioball_fname);
	2377	mr_free(media_usage_comment);
	2378	mr_free(curr_xattr_list_fname);
	2379	mr_free(curr_acl_list_fname);
[128]	2380	return (retval);
[1]	2381	}
	2382
[128]	2383	/* @} - end of LLarchiveGroup */
	2384
	2385
[1]	2386	/**
	2387	* Wrapper around @c make_afioballs_and_images().
	2388	* @param bkpinfo the backup information structure. Only the
	2389	* @c backup_media_type field is used within this function.
	2390	* @return return code of make_afioballs_and_images
	2391	* @see make_afioballs_and_images
	2392	* @ingroup MLarchiveGroup
	2393	*/
[541]	2394	int make_those_afios_phase(struct s_bkpinfo *bkpinfo)
[1]	2395	{
[128]	2396	/@ int ****************************************** */
	2397	int res = 0;
	2398	int retval = 0;
[1]	2399
[128]	2400	assert(bkpinfo != NULL);
[1]	2401
[128]	2402	mvaddstr_and_log_it(g_currentY, 0,
	2403	"Archiving regular files to media ");
[1]	2404
[128]	2405	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2406	write_header_block_to_stream((off_t)0, "start-of-afioballs",
[128]	2407	BLK_START_AFIOBALLS);
[1]	2408	#if __FreeBSD__ == 5
[1107]	2409	mr_msg(1,
[128]	2410	"Using single-threaded make_afioballs_and_images() to suit b0rken FreeBSD 5.0");
[541]	2411	res = make_afioballs_and_images_OLD(bkpinfo);
[1]	2412	#else
[541]	2413	res = make_afioballs_and_images_OLD(bkpinfo);
[1]	2414	#endif
[684]	2415	write_header_block_to_stream((off_t)0, "stop-afioballs",
[128]	2416	BLK_STOP_AFIOBALLS);
	2417	} else {
[541]	2418	res = make_afioballs_and_images(bkpinfo);
[128]	2419	}
[1]	2420
[128]	2421	retval += res;
	2422	if (res) {
	2423	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
[1107]	2424	mr_msg(1, "make_afioballs_and_images returned an error");
[128]	2425	} else {
	2426	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2427	}
	2428	return (retval);
[1]	2429	}
	2430
	2431	/**
	2432	* Wrapper around @c make_slices_and_images().
	2433	* @param bkpinfo The backup information structure. Fields used:
	2434	* - @c backup_media_type
	2435	* - @c scratchdir
	2436	* - @c tmpdir
	2437	* @return The number of errors encountered (0 for success)
	2438	* @ingroup MLarchiveGroup
	2439	*/
[128]	2440	int make_those_slices_phase(struct s_bkpinfo *bkpinfo)
[1]	2441	{
	2442
[128]	2443	/@ int **************************************************** */
	2444	int res = 0;
	2445	int retval = 0;
[1]	2446
[128]	2447	/@ buffers ************************************************* */
	2448	char *biggielist;
	2449	char *command;
	2450	char *blah;
	2451	char *xattr_fname;
	2452	char *acl_fname;
[1]	2453
[128]	2454	assert(bkpinfo != NULL);
	2455	/* slice big files */
	2456	malloc_string(blah);
	2457	malloc_string(biggielist);
	2458	malloc_string(xattr_fname);
	2459	malloc_string(acl_fname);
[1080]	2460	command = mr_malloc(1200);
[128]	2461	mvaddstr_and_log_it(g_currentY, 0,
	2462	"Archiving large files to media ");
	2463	sprintf(biggielist, "%s/archives/biggielist.txt", bkpinfo->scratchdir);
[948]	2464	if (g_getfattr) {
	2465	sprintf(xattr_fname, XATTR_BIGGLST_FNAME_RAW_SZ, bkpinfo->tmpdir);
	2466	}
	2467	if (g_getfacl) {
	2468	sprintf(acl_fname, ACL_BIGGLST_FNAME_RAW_SZ, bkpinfo->tmpdir);
	2469	}
[1]	2470
[128]	2471	sprintf(command, "cp %s/biggielist.txt %s", bkpinfo->tmpdir,
	2472	biggielist);
	2473	paranoid_system(command);
	2474	sprintf(blah, "biggielist = %s", biggielist);
[1107]	2475	mr_msg(2, blah);
[128]	2476
	2477	if (!does_file_exist(biggielist)) {
[1107]	2478	mr_msg(1, "BTW, the biggielist does not exist");
[128]	2479	}
	2480
[948]	2481	if (g_getfattr) {
	2482	get_fattr_list(biggielist, xattr_fname);
	2483	sprintf(command, "cp %s %s/archives/", xattr_fname,
[128]	2484	bkpinfo->scratchdir);
[948]	2485	paranoid_system(command);
	2486	}
	2487	if (g_getfacl) {
	2488	get_acl_list(biggielist, acl_fname);
	2489	sprintf(command, "cp %s %s/archives/", acl_fname, bkpinfo->scratchdir);
	2490	paranoid_system(command);
	2491	}
[128]	2492
	2493	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2494	res += write_EXAT_files_to_tape(bkpinfo, xattr_fname, acl_fname);
	2495	sprintf(blah, "%ld", count_lines_in_file(biggielist));
[684]	2496	write_header_block_to_stream((off_t)0, blah, BLK_START_BIGGIEFILES);
[128]	2497	}
	2498	res = make_slices_and_images(bkpinfo, biggielist);
	2499	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2500	write_header_block_to_stream((off_t)0, "end-of-biggiefiles",
[128]	2501	BLK_STOP_BIGGIEFILES);
	2502	}
	2503	retval += res;
	2504	if (res) {
[1107]	2505	mr_msg(1, "make_slices_and_images returned an error");
[128]	2506	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
	2507	} else {
	2508	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2509	}
[1080]	2510	mr_free(blah);
	2511	mr_free(biggielist);
	2512	mr_free(command);
	2513	mr_free(xattr_fname);
	2514	mr_free(acl_fname);
[128]	2515	return (retval);
[1]	2516	}
	2517
	2518
	2519
	2520	/**
	2521	* @addtogroup LLarchiveGroup
	2522	* @{
	2523	*/
	2524	/**
	2525	* Function pointer to an appropriate @c move_files_to_cd routine.
	2526	* You can set this to your own function (for example, one to
	2527	* transfer files over the network) or leave it as is.
	2528	*/
[541]	2529	int (move_files_to_cd) (struct s_bkpinfo , char *, ...) =
[128]	2530	_move_files_to_cd;
[1]	2531
	2532	/**
	2533	* Move some files to the ISO scratch directory.
	2534	* This function moves files specified as parameters, into the directory
	2535	* @c bkpinfo->scratchdir, where the files that will be stored on the next
	2536	* CD are waiting.
	2537	*
	2538	* @param bkpinfo The backup information structure. Fields used:
	2539	* - @c media_size
	2540	* - @c scratchdir
	2541	* @param files_to_add The files to add to the scratchdir.
	2542	* @warning The list of @c files_to_add must be terminated with @c NULL.
	2543	* @note If and when the space occupied by the scratchdir would exceed
	2544	* the capacity of the current CD,
	2545	* <tt>write_iso_and_go_on(bkpinfo, FALSE)</tt> is called and the
	2546	* scratchdir is emptied.
	2547	*
	2548	* @return The number of errors encountered (0 for success)
	2549	*/
[541]	2550	int _move_files_to_cd(struct s_bkpinfo bkpinfo, char files_to_add, ...)
[1]	2551	{
	2552
[128]	2553	/@ int *********************************************************** */
	2554	int retval = 0;
[1]	2555	int res = 0;
	2556
[128]	2557	/@ buffers ******************************************************* */
	2558	char tmp, curr_file, *cf;
[1]	2559
[128]	2560	/@ long *********************************************************** */
	2561	va_list ap;
	2562	long long would_occupy;
[1]	2563
[128]	2564	assert(bkpinfo != NULL);
	2565	malloc_string(curr_file);
[1080]	2566	tmp = mr_malloc(1200);
[128]	2567	would_occupy = space_occupied_by_cd(bkpinfo->scratchdir);
	2568	va_start(ap, files_to_add); // initialize the variable arguments
	2569	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2570	if (!cf) {
	2571	continue;
	2572	}
	2573	strcpy(curr_file, cf);
	2574	if (!does_file_exist(curr_file)) {
[1107]	2575	mr_msg(1,
[128]	2576	"Warning - you're trying to add a non-existent file - '%s' to the CD",
	2577	curr_file);
	2578	} else {
[1107]	2579	mr_msg(8, "Trying to add file %s to CD", curr_file);
[128]	2580	would_occupy += length_of_file(curr_file) / 1024;
	2581	}
[1]	2582	}
[128]	2583	va_end(ap);
[1]	2584
[128]	2585	if (bkpinfo->media_size[g_current_media_number] <= 0) {
	2586	fatal_error("move_files_to_cd() - unknown media size");
[1]	2587	}
[128]	2588	if (would_occupy / 1024 > bkpinfo->media_size[g_current_media_number]) {
[541]	2589	res = write_iso_and_go_on(bkpinfo, FALSE); /* FALSE because this is not the last CD we'll write */
[128]	2590	retval += res;
	2591	if (res) {
[1107]	2592	mr_msg(1, "WARNING - write_iso_and_go_on returned an error");
[128]	2593	}
	2594	}
[1]	2595
[128]	2596	va_start(ap, files_to_add); // initialize the variable arguments
	2597	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2598	if (!cf) {
	2599	continue;
	2600	}
	2601	strcpy(curr_file, cf);
[1]	2602
[128]	2603	sprintf(tmp, "mv -f %s %s/archives/", curr_file,
	2604	bkpinfo->scratchdir);
	2605	res = run_program_and_log_output(tmp, 5);
	2606	retval += res;
	2607	if (res) {
[1107]	2608	mr_msg(1, "(move_files_to_cd) '%s' failed", tmp);
[128]	2609	} else {
[1107]	2610	mr_msg(8, "Moved %s to CD OK", tmp);
[128]	2611	}
	2612	// unlink (curr_file);
[1]	2613	}
[128]	2614	va_end(ap);
	2615
	2616	if (retval) {
[1107]	2617	mr_msg(1,
[128]	2618	"Warning - errors occurred while I was adding files to CD dir");
[1]	2619	}
[1080]	2620	mr_free(tmp);
	2621	mr_free(curr_file);
[128]	2622	return (retval);
[1]	2623	}
	2624
	2625	/* @} - end of LLarchiveGroup */
	2626
	2627
	2628
	2629
	2630
	2631
	2632
	2633
	2634	/**
	2635	* Offer to write boot and data disk images to 3.5" floppy disks.
	2636	* @param bkpinfo The backup information structure. Only the
	2637	* @c backup_media_type field is used in this function.
	2638	* @param imagesdir The directory containing the floppy images (usually
[1044]	2639	* /var/cache/mindi).
[1]	2640	*
	2641	* @return The number of errors encountered (0 for success)
	2642	* @see write_image_to_floppy
	2643	* @see format_disk
	2644	* @ingroup MLarchiveGroup
	2645	*/
[128]	2646	int offer_to_write_floppies(struct s_bkpinfo bkpinfo, char imagesdir)
[1]	2647	{
[128]	2648	/@ buffer *********************************************************** */
	2649	char *tmp;
[1]	2650	char *comment;
	2651	char *bootdisk_dev;
	2652	char *datadisk_dev;
	2653	char *bootdisk_file;
	2654	char *rootdisk_file;
	2655
[128]	2656	/@ int ************************************************************** */
	2657	int i = 0;
[1]	2658	int res = 0;
	2659
[128]	2660	/@ bool ************************************************************* */
	2661	bool format_first;
	2662	bool root_disk_exists = FALSE;
[1]	2663
[128]	2664	malloc_string(tmp);
	2665	malloc_string(comment);
	2666	malloc_string(bootdisk_dev);
	2667	malloc_string(datadisk_dev);
	2668	malloc_string(rootdisk_file);
	2669	malloc_string(bootdisk_file);
	2670	assert(bkpinfo != NULL);
	2671	assert_string_is_neither_NULL_nor_zerolength(imagesdir);
[1]	2672
	2673
[128]	2674	if (!ask_me_yes_or_no
	2675	("Write boot and data disk images to 3.5\" floppy disks?")) {
	2676	return (0);
	2677	}
	2678	if (does_device_exist(DEFAULT_1722MB_DISK)) {
[1]	2679	#ifdef __FreeBSD__
[128]	2680	// tell the system that this is a 1.72m floppy
	2681	system("/usr/sbin/fdcontrol -F 1722 /dev/fd0.1722");
[1]	2682	#endif
[128]	2683	strcpy(bootdisk_dev, DEFAULT_1722MB_DISK);
	2684	} else if (does_device_exist(BACKUP_1722MB_DISK)) {
	2685	sprintf(bootdisk_dev, "/dev/fd0H1722");
	2686	} else {
[1107]	2687	mr_msg(1, "Warning - can't find a 1.72MB floppy device sigh");
[128]	2688	strcpy(bootdisk_dev, DEFAULT_1722MB_DISK);
[1]	2689	// return (1);
[128]	2690	}
	2691	strcpy(datadisk_dev, "/dev/fd0");
	2692	if (!does_device_exist(datadisk_dev)) {
[1107]	2693	mr_msg(1, "Warning - can't find a 1.44MB floppy device sigh");
[128]	2694	strcpy(datadisk_dev, "/dev/fd0");
[1]	2695	// return (1);
[128]	2696	}
	2697	format_first =
	2698	ask_me_yes_or_no
	2699	("Do you want me to format the disks before I write to them?");
[1]	2700
	2701	/* boot disk */
[128]	2702	if (ask_me_OK_or_cancel("About to write boot disk")) {
	2703	log_to_screen("Writing boot floppy");
[1]	2704	#ifdef __FreeBSD__
[128]	2705	sprintf(tmp, "%s/mindi-kern.1722.img", imagesdir);
	2706	if (format_first) {
	2707	format_disk(bootdisk_dev);
	2708	}
	2709	res += write_image_to_floppy(bootdisk_dev, tmp);
	2710	if (ask_me_OK_or_cancel("About to write 1.44MB mfsroot disk")) {
	2711	log_to_screen("Writing mfsroot floppy");
	2712	if (format_first) {
	2713	format_disk(datadisk_dev);
	2714	}
	2715	sprintf(tmp, "%s/mindi-mfsroot.1440.img", imagesdir);
	2716	write_image_to_floppy(datadisk_dev, tmp);
	2717	}
[1]	2718	#else
[128]	2719	sprintf(bootdisk_file, "%s/mindi-bootroot.1722.img", imagesdir);
	2720	if (does_file_exist(bootdisk_file)) {
	2721	if (format_first) {
	2722	format_disk(bootdisk_dev);
	2723	}
	2724	res += write_image_to_floppy(bootdisk_dev, bootdisk_file);
	2725	} else {
	2726	sprintf(bootdisk_file, "%s/mindi-boot.1440.img", imagesdir);
	2727	sprintf(rootdisk_file, "%s/mindi-root.1440.img", imagesdir);
	2728	root_disk_exists = TRUE;
	2729	if (!does_file_exist(rootdisk_file)
	2730	\|\| !does_file_exist(bootdisk_file)) {
	2731	popup_and_OK
	2732	("Cannot write boot/root floppies. Files not found.");
	2733	log_to_screen
	2734	("Failed to find boot/root floppy images. Oh dear.");
	2735	return (1);
	2736	}
	2737	if (format_first) {
	2738	format_disk(datadisk_dev);
	2739	}
	2740	/*
	2741	sprintf(tmp, "cat %s > %s", bootdisk_file, datadisk_dev);
	2742	res += run_external_binary_with_percentage_indicator_NEW("Writing boot floppy", tmp);
	2743	*/
	2744	res += write_image_to_floppy(datadisk_dev, bootdisk_file);
	2745	if (ask_me_OK_or_cancel("About to write root disk")) {
	2746	log_to_screen("Writing root floppy");
	2747	if (format_first) {
	2748	format_disk(datadisk_dev);
	2749	}
	2750	sprintf(tmp, "cat %s > %s", rootdisk_file, datadisk_dev);
[1107]	2751	mr_msg(1, "tmp = '%s'", tmp);
[128]	2752	res +=
	2753	run_external_binary_with_percentage_indicator_NEW
	2754	("Writing root floppy", tmp);
[1]	2755	// res += write_image_to_floppy (datadisk_dev, rootdisk_file);
[128]	2756	}
	2757	}
[1]	2758	#endif
	2759	}
[128]	2760	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2761	log_to_screen
	2762	("FYI, the data disks are stored on tape/CD for your convenience.");
	2763	return (0);
[1]	2764	}
[128]	2765	for (i = 1; i < 99; i++) {
	2766	sprintf(tmp, "%s/mindi-data-%d.img", imagesdir, i);
[1107]	2767	mr_msg(3, tmp);
[128]	2768	if (!does_file_exist(tmp)) {
[1107]	2769	mr_msg(3, "...not found");
[128]	2770	break;
	2771	}
	2772	sprintf(comment, "About to write data disk #%d", i);
	2773	if (ask_me_OK_or_cancel(comment)) {
	2774	sprintf(comment, "Writing data disk #%3d", i);
	2775	log_to_screen(comment);
	2776	if (format_first) {
	2777	res += format_disk(datadisk_dev);
	2778	}
	2779	res += write_image_to_floppy(datadisk_dev, tmp);
	2780	}
	2781	}
[1080]	2782	mr_free(tmp);
	2783	mr_free(comment);
	2784	mr_free(bootdisk_dev);
	2785	mr_free(datadisk_dev);
[128]	2786	return (res);
[1]	2787	}
	2788
	2789
	2790
	2791
	2792
	2793
	2794
	2795
	2796	/**
	2797	* Wrapper around @c offer_to_write_floppies().
	2798	* @param bkpinfo The backup information structure. Used only
	2799	* in the call to @c offer_to_write_floppies().
	2800	* @return 0 if the boot floppies were found (not necessarily written OK),
	2801	* 1 otherwise.
	2802	* @see offer_to_write_floppies
	2803	* @ingroup MLarchiveGroup
	2804	*/
	2805
[128]	2806	int offer_to_write_boot_floppies_to_physical_disks(struct s_bkpinfo
	2807	*bkpinfo)
[1]	2808	{
[128]	2809	int res = 0;
[1]	2810
[128]	2811	assert(bkpinfo != NULL);
[1]	2812
[128]	2813	mvaddstr_and_log_it(g_currentY, 0,
	2814	"Writing boot+data floppy images to disk");
[1]	2815
[128]	2816	if (!bkpinfo->nonbootable_backup) {
[1]	2817	#ifdef __FreeBSD__
[1044]	2818	if (!does_file_exist("/var/cache/mindi/mindi-kern.1722.img"))
[1]	2819	#else
[1044]	2820	if (!does_file_exist("/var/cache/mindi/mindi-bootroot.1722.img")
	2821	&& !does_file_exist("/var/cache/mindi/mindi-boot.1440.img"))
[1]	2822	#endif
[128]	2823	{
	2824	mvaddstr_and_log_it(g_currentY++, 74, "No Imgs");
[1044]	2825	if (does_file_exist("/var/cache/mindi/mondorescue.iso")) {
[128]	2826	popup_and_OK
[1044]	2827	("Boot+data floppy creation failed. However, FYI, you may burn /var/cache/mindi/mondorescue.iso to a CD and boot from that instead if you wish.");
[128]	2828	res++;
	2829	}
	2830	} else {
[1044]	2831	offer_to_write_floppies(bkpinfo, "/var/cache/mindi");
[128]	2832	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2833	}
	2834	} else {
	2835	popup_and_OK
	2836	("Since you opted for a nonbootable backup, no boot floppies were created.");
	2837	}
	2838
	2839	return (res);
[1]	2840	}
	2841
	2842
	2843
	2844
	2845	/**
	2846	* @addtogroup LLarchiveGroup
	2847	* @{
	2848	*/
	2849	/**
	2850	* Function pointer to an appropriate @c move_files_to_stream routine.
	2851	* You can set this to your own function (for example, one to
	2852	* transfer files over the network) or leave it as is.
	2853	*/
[128]	2854	int (move_files_to_stream) (struct s_bkpinfo , char *, ...) =
	2855	_move_files_to_stream;
[1]	2856
	2857	/**
	2858	* Copy some files to tape.
	2859	* This function copies the files specified as parameters into the tape stream.
	2860	*
	2861	* @param bkpinfo The backup information structure. Used only in the call to
	2862	* @c write_file_to_stream_from_file().
	2863	*
	2864	* @param files_to_add The files to copy to the tape stream.
	2865	* @warning The list of @c files_to_add must be terminated with @c NULL.
	2866	* @note Files may be split across multiple tapes if necessary.
	2867	*
	2868	* @return The number of errors encountered (0 for success)
	2869	*/
	2870	int
[128]	2871	_move_files_to_stream(struct s_bkpinfo bkpinfo, char files_to_add, ...)
[1]	2872	{
	2873
[128]	2874	/@ int *********************************************************** */
	2875	int retval = 0;
[1]	2876	int res = 0;
[128]	2877	/@ buffers ******************************************************* */
[1]	2878
[128]	2879	/@ char ********************************************************** */
[1]	2880	char start_chr;
	2881	char stop_chr;
[128]	2882	char curr_file, cf;
	2883	/@ long long ***************************************************** */
[684]	2884	off_t length_of_incoming_file = (off_t)0;
[128]	2885	t_archtype type;
	2886	va_list ap;
[1]	2887
[128]	2888	assert(bkpinfo != NULL);
	2889	malloc_string(curr_file);
	2890	va_start(ap, files_to_add);
	2891	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2892	if (!cf) {
	2893	continue;
	2894	}
	2895	strcpy(curr_file, cf);
	2896	if (!does_file_exist(curr_file)) {
[1107]	2897	mr_msg(1,
[128]	2898	"Warning - you're trying to add a non-existent file - '%s' to the tape",
	2899	curr_file);
	2900	}
[1]	2901	/* create header chars */
[128]	2902	start_chr = BLK_START_AN_AFIO_OR_SLICE;
	2903	stop_chr = BLK_STOP_AN_AFIO_OR_SLICE;
[1]	2904	/* ask for new tape if necessary */
[128]	2905	length_of_incoming_file = length_of_file(curr_file);
	2906	write_header_block_to_stream(length_of_incoming_file, curr_file,
	2907	start_chr);
	2908	if (strstr(curr_file, ".afio.") \|\| strstr(curr_file, ".star.")) {
	2909	type = fileset;
	2910	} else if (strstr(curr_file, "slice")) {
	2911	type = biggieslice;
	2912	} else {
	2913	type = other;
	2914	}
	2915	res = write_file_to_stream_from_file(bkpinfo, curr_file);
	2916	retval += res;
	2917	unlink(curr_file);
[1]	2918	/* write closing header */
[684]	2919	write_header_block_to_stream((off_t)0, "finished-writing-file", stop_chr);
[128]	2920	}
	2921	va_end(ap);
[1]	2922
[128]	2923	if (retval) {
[1107]	2924	mr_msg(1,
[128]	2925	"Warning - errors occurred while I was adding file to tape");
	2926	}
[1080]	2927	mr_free(curr_file);
[128]	2928	return (retval);
[1]	2929	}
	2930
	2931	/* @} - end of LLarchiveGroup */
	2932
	2933
	2934
	2935	/**
	2936	* @addtogroup utilityGroup
	2937	* @{
	2938	*/
	2939	/**
	2940	* Make sure the user has a valid CD-R(W) in the CD drive.
	2941	* @param cdrw_dev Set to the CD-R(W) device checked.
	2942	* @param keep_looping If TRUE, keep pestering user until they insist
	2943	* or insert a correct CD; if FALSE, only check once.
	2944	* @return 0 (there was an OK CD in the drive) or 1 (there wasn't).
	2945	*/
[128]	2946	int interrogate_disk_currently_in_cdrw_drive(char *cdrw_dev,
	2947	bool keep_looping)
[1]	2948	{
[128]	2949	char *tmp;
	2950	int res = 0;
	2951	char *bkp;
	2952	char *cdrecord;
[1]	2953
[128]	2954	malloc_string(tmp);
	2955	malloc_string(bkp);
	2956	malloc_string(cdrecord);
	2957	strcpy(bkp, cdrw_dev);
	2958	if (find_cdrw_device(cdrw_dev)) {
	2959	strcpy(cdrw_dev, bkp);
	2960	} else {
	2961	if (!system("which cdrecord > /dev/null 2> /dev/null")) {
	2962	sprintf(cdrecord, "cdrecord dev=%s -atip", cdrw_dev);
	2963	} else if (!system("which dvdrecord > /dev/null 2> /dev/null")) {
	2964	sprintf(cdrecord, "cdrecord dev=%s -atip", cdrw_dev);
	2965	} else {
	2966	cdrecord[0] = '\0';
[1107]	2967	mr_msg(2, "Oh well. I guess I'll just pray then.");
[128]	2968	}
	2969	if (cdrecord[0]) {
	2970	if (!keep_looping) {
	2971	retract_CD_tray_and_defeat_autorun();
	2972	res = run_program_and_log_output(cdrecord, 5);
	2973	} else {
	2974	while ((res = run_program_and_log_output(cdrecord, 5))) {
	2975	retract_CD_tray_and_defeat_autorun();
	2976	if (ask_me_yes_or_no
	2977	("Unable to examine CD. Are you sure this is a valid CD-R(W) CD?"))
	2978	{
[1107]	2979	mr_msg(1, "Well, he insisted...");
[128]	2980	break;
	2981	}
	2982	}
	2983	}
	2984	}
	2985	}
[1]	2986	// retract_CD_tray_and_defeat_autorun();
[1080]	2987	mr_free(tmp);
	2988	mr_free(cdrecord);
	2989	mr_free(bkp);
[128]	2990	return (res);
[1]	2991	}
	2992
	2993
	2994
	2995
	2996
	2997
	2998
	2999
	3000
	3001	/**
	3002	* Asks the user to put a CD-R(W) in the drive.
	3003	* @param ask_for_one_if_more_than_this (unused)
	3004	* @param pmountable If non-NULL, pointed-to value is set to TRUE if the CD is mountable, FALSE otherwise.
	3005	*/
	3006	void
[128]	3007	pause_and_ask_for_cdr(int ask_for_one_if_more_than_this, bool * pmountable)
[1]	3008	{
	3009
[128]	3010	/@ buffers ******************************************** */
	3011	char *tmp;
	3012	char *szmsg;
	3013	char *cdrom_dev;
	3014	char *cdrw_dev;
	3015	char *our_serial_str;
	3016	bool ok_go_ahead_burn_it;
	3017	int cd_number = -1;
	3018	int attempt_to_mount_returned_this = 999;
	3019	char *mtpt;
	3020	char *szcdno;
	3021	char *szserfname;
	3022	char *szunmount;
[1]	3023
[128]	3024	malloc_string(tmp);
	3025	malloc_string(szmsg);
	3026	malloc_string(cdrom_dev);
	3027	malloc_string(cdrw_dev);
	3028	malloc_string(mtpt);
	3029	malloc_string(szcdno);
	3030	malloc_string(szserfname);
	3031	malloc_string(our_serial_str);
	3032	malloc_string(szunmount);
[1]	3033
[128]	3034	sprintf(szmsg, "I am about to burn %s #%d",
	3035	media_descriptor_string(g_backup_media_type),
	3036	g_current_media_number);
	3037	log_to_screen(szmsg);
	3038	if (g_current_media_number < ask_for_one_if_more_than_this) {
	3039	return;
	3040	}
	3041	log_to_screen("Scanning CD-ROM drive...");
	3042	sprintf(mtpt, "/tmp/cd.mtpt.%ld.%ld", (long int) random(),
	3043	(long int) random());
	3044	make_hole_for_dir(mtpt);
[1]	3045
[128]	3046	gotos_make_me_puke:
	3047	ok_go_ahead_burn_it = TRUE;
	3048	if (!find_cdrom_device(cdrom_dev, FALSE)) {
[1]	3049	/* When enabled, it made CD eject-and-retract when wrong CD inserted.. Weird
[1107]	3050	mr_msg(2, "paafcd: Retracting CD-ROM drive if possible" );
[1]	3051	retract_CD_tray_and_defeat_autorun();
	3052	*/
[128]	3053	sprintf(tmp, "umount %s", cdrom_dev);
	3054	run_program_and_log_output(tmp, 1);
	3055	sprintf(szcdno, "%s/archives/THIS-CD-NUMBER", mtpt);
	3056	sprintf(szserfname, "%s/archives/SERIAL-STRING", mtpt);
	3057	sprintf(szunmount, "umount %s", mtpt);
	3058	cd_number = -1;
	3059	our_serial_str[0] = '\0';
	3060	sprintf(tmp, "mount %s %s", cdrom_dev, mtpt);
	3061	if ((attempt_to_mount_returned_this =
	3062	run_program_and_log_output(tmp, 1))) {
[1107]	3063	mr_msg(4, "Failed to mount %s at %s", cdrom_dev, mtpt);
[128]	3064	log_to_screen("If there's a CD/DVD in the drive, it's blank.");
	3065	/*
	3066	if (interrogate_disk_currently_in_cdrw_drive(cdrw_dev, FALSE))
	3067	{
	3068	ok_go_ahead_burn_it = FALSE;
	3069	log_to_screen("There isn't a writable CD/DVD in the drive.");
	3070	}
	3071	else
	3072	{
	3073	log_to_screen("Confirmed. There is a blank CD/DVD in the drive.");
	3074	}
	3075	*/
	3076	} else if (!does_file_exist(szcdno)
	3077	\|\| !does_file_exist(szserfname)) {
	3078	log_to_screen
	3079	("%s has data on it but it's probably not a Mondo CD.",
	3080	media_descriptor_string(g_backup_media_type));
	3081	} else {
	3082	log_to_screen("%s found in drive. It's a Mondo disk.",
	3083	media_descriptor_string(g_backup_media_type));
	3084	cd_number = atoi(last_line_of_file(szcdno));
	3085	sprintf(tmp, "cat %s 2> /dev/null", szserfname);
	3086	strcpy(our_serial_str,
	3087	call_program_and_get_last_line_of_output(tmp));
	3088	// FIXME - should be able to use last_line_of_file(), surely?
	3089	}
	3090	run_program_and_log_output(szunmount, 1);
[1107]	3091	mr_msg(2, "paafcd: cd_number = %d", cd_number);
	3092	mr_msg(2, "our serial str = %s; g_serial_string = %s",
[128]	3093	our_serial_str, g_serial_string);
	3094	if (cd_number > 0 && !strcmp(our_serial_str, g_serial_string)) {
[1107]	3095	mr_msg(2, "This %s is part of this backup set!",
[128]	3096	media_descriptor_string(g_backup_media_type));
	3097	ok_go_ahead_burn_it = FALSE;
	3098	if (cd_number == g_current_media_number - 1) {
	3099	log_to_screen
	3100	("I think you've left the previous %s in the drive.",
	3101	media_descriptor_string(g_backup_media_type));
	3102	} else {
	3103	log_to_screen
	3104	("Please remove this %s. It is part of the backup set you're making now.",
	3105	media_descriptor_string(g_backup_media_type));
	3106	}
	3107	} else {
	3108	log_to_screen("...but not part of _our_ backup set.");
	3109	}
	3110	} else {
[1107]	3111	mr_msg(2,
[128]	3112	"paafcd: Can't find CD-ROM drive. Perhaps it has a blank %s in it?",
	3113	media_descriptor_string(g_backup_media_type));
	3114	if (interrogate_disk_currently_in_cdrw_drive(cdrw_dev, FALSE)) {
	3115	ok_go_ahead_burn_it = FALSE;
	3116	log_to_screen("There isn't a writable %s in the drive.",
	3117	media_descriptor_string(g_backup_media_type));
	3118	}
[1]	3119	}
	3120
	3121	/*
	3122	if (g_current_media_number > ask_for_one_if_more_than_this)
	3123	{
	3124	ok_go_ahead_burn_it = FALSE;
	3125	log_it("paafcd: %d > %d, so I'll definitely pause.", g_current_media_number > ask_for_one_if_more_than_this);
	3126	}
	3127	*/
	3128
[128]	3129	if (!ok_go_ahead_burn_it) {
	3130	eject_device(cdrom_dev);
	3131	sprintf(tmp,
	3132	"I am about to burn %s #%d of the backup set. Please insert %s and press Enter.",
	3133	media_descriptor_string(g_backup_media_type),
	3134	g_current_media_number,
	3135	media_descriptor_string(g_backup_media_type));
	3136	popup_and_OK(tmp);
	3137	goto gotos_make_me_puke;
	3138	} else {
[1107]	3139	mr_msg(2, "paafcd: OK, going ahead and burning it.");
[128]	3140	}
[1]	3141
[1107]	3142	mr_msg(2,
[128]	3143	"paafcd: OK, I assume I have a blank/reusable %s in the drive...",
	3144	media_descriptor_string(g_backup_media_type));
[1]	3145
[128]	3146	// if (ask_for_one_if_more_than_this>1) { popup_and_OK(szmsg); }
[1]	3147
[128]	3148	log_to_screen("Proceeding w/ %s in drive.",
	3149	media_descriptor_string(g_backup_media_type));
[1080]	3150	mr_free(tmp);
	3151	mr_free(szmsg);
	3152	mr_free(cdrom_dev);
	3153	mr_free(cdrw_dev);
	3154	mr_free(mtpt);
	3155	mr_free(szcdno);
	3156	mr_free(szserfname);
	3157	mr_free(our_serial_str);
	3158	mr_free(szunmount);
[128]	3159	if (pmountable) {
	3160	if (attempt_to_mount_returned_this) {
	3161	*pmountable = FALSE;
	3162	} else {
	3163	*pmountable = TRUE;
	3164	}
	3165	}
[1]	3166
	3167	}
	3168
	3169
	3170
	3171
	3172
	3173
	3174
	3175
	3176	/**
	3177	* Set the <tt>N</tt>th bit of @c array to @c true_or_false.
	3178	* @param array The bit array (as a @c char pointer).
	3179	* @param N The bit number to set or reset.
	3180	* @param true_or_false If TRUE then set bit @c N, if FALSE then reset bit @c N.
	3181	* @see get_bit_N_of_array
	3182	*/
[128]	3183	void set_bit_N_of_array(char *array, int N, bool true_or_false)
[1]	3184	{
[128]	3185	int bit_number;
	3186	int mask, orig_val, to_add;
	3187	int element_number;
[1]	3188
[128]	3189	assert(array != NULL);
[1]	3190
[128]	3191	element_number = N / 8;
	3192	bit_number = N % 8;
	3193	to_add = (1 << bit_number);
	3194	mask = 255 - to_add;
	3195	orig_val = array[element_number] & mask;
	3196	// log_it("array[%d]=%02x; %02x&%02x = %02x", element_number, array[element_number], mask, orig_val);
	3197	if (true_or_false) {
	3198	array[element_number] = orig_val \| to_add;
	3199	}
[1]	3200	}
	3201
	3202	/* @} - end of utilityGroup */
	3203
	3204
	3205
	3206
	3207
	3208
	3209
	3210
	3211	/**
	3212	* Chop up @c filename.
	3213	* @param bkpinfo The backup information structure. Fields used:
	3214	* - @c backup_media_type
	3215	* - @c compression_level
	3216	* - @c optimal_set_size
	3217	* - @c tmpdir
	3218	* - @c use_lzo
	3219	* - @c zip_exe
	3220	* - @c zip_suffix
	3221	*
	3222	* @param biggie_filename The file to chop up.
[296]	3223	* @param ntfsprog_fifo The FIFO to ntfsclone if this is an imagedev, NULL otherwise.
[1]	3224	* @param biggie_file_number The sequence number of this biggie file (starting from 0).
	3225	* @param noof_biggie_files The number of biggie files there are total.
	3226	* @return The number of errors encountered (0 for success)
	3227	* @see make_slices_and_images
	3228	* @ingroup LLarchiveGroup
	3229	*/
	3230	int
[541]	3231	slice_up_file_etc(struct s_bkpinfo bkpinfo, char biggie_filename,
[296]	3232	char *ntfsprog_fifo, long biggie_file_number,
	3233	long noof_biggie_files, bool use_ntfsprog)
[1]	3234	{
	3235
[128]	3236	/@ buffers ************************************************* */
	3237	char tmp, checksum_line, *command;
	3238	char *tempblock;
	3239	char *curr_slice_fname_uncompressed;
	3240	char *curr_slice_fname_compressed;
	3241	char *file_to_archive;
	3242	char *file_to_openin;
	3243	/@ pointers ************************************************* */
	3244	char *pB;
	3245	FILE fin, fout;
[1]	3246
[128]	3247	/@ bool ***************************************************** */
	3248	bool finished = FALSE;
[1]	3249
[128]	3250	/@ long ***************************************************** */
	3251	size_t blksize = 0;
	3252	long slice_num = 0;
	3253	long i;
	3254	long optimal_set_size;
	3255	bool should_I_compress_slices;
	3256	char *suffix; // for compressed slices
[1]	3257
[128]	3258	/@ long long ************************************************* */
[684]	3259	off_t totalread = (off_t)0;
	3260	off_t totallength = (off_t)0;
	3261	off_t length;
[1]	3262
[128]	3263	/@ int ******************************************************* */
	3264	int retval = 0;
	3265	int res = 0;
[1]	3266
[128]	3267	/@ structures ************************************************* */
	3268	struct s_filename_and_lstat_info biggiestruct;
[1]	3269	// struct stat statbuf;
	3270
[128]	3271	assert(bkpinfo != NULL);
	3272	assert_string_is_neither_NULL_nor_zerolength(biggie_filename);
	3273	malloc_string(tmp);
	3274	malloc_string(checksum_line);
	3275	malloc_string(curr_slice_fname_uncompressed);
	3276	malloc_string(curr_slice_fname_compressed);
	3277	malloc_string(file_to_archive);
	3278	malloc_string(suffix);
[1080]	3279	command = mr_malloc(MAX_STR_LEN * 8);
[1]	3280
[128]	3281	biggiestruct.for_backward_compatibility = '\n';
[296]	3282	biggiestruct.use_ntfsprog = use_ntfsprog;
[1080]	3283	tempblock = (char ) mr_malloc(256 1024);
[128]	3284	optimal_set_size = bkpinfo->optimal_set_size;
	3285	if (is_this_file_compressed(biggie_filename)
	3286	\|\| bkpinfo->compression_level == 0) {
	3287	suffix[0] = '\0';
	3288	// log_it("%s is indeed compressed :-)", filename);
	3289	should_I_compress_slices = FALSE;
	3290	} else {
	3291	strcpy(suffix, bkpinfo->zip_suffix);
	3292	should_I_compress_slices = TRUE;
	3293	}
[1]	3294
[128]	3295	if (optimal_set_size < 999) {
	3296	fatal_error("bkpinfo->optimal_set_size is insanely small");
	3297	}
[296]	3298	if (ntfsprog_fifo) {
	3299	file_to_openin = ntfsprog_fifo;
[128]	3300	strcpy(checksum_line, "IGNORE");
[1107]	3301	mr_msg(2,
[128]	3302	"Not calculating checksum for %s: it would take too long",
	3303	biggie_filename);
[296]	3304	if ( !find_home_of_exe("ntfsresize")) {
	3305	fatal_error("ntfsresize not found");
	3306	}
	3307	sprintf(command, "ntfsresize --force --info %s\|grep '^You might resize at '\|cut -d' ' -f5", biggie_filename);
	3308	log_it("command = %s", command);
	3309	strcpy (tmp, call_program_and_get_last_line_of_output(command));
	3310	log_it("res of it = %s", tmp);
[684]	3311	totallength = (off_t)atoll(tmp);
[128]	3312	} else {
	3313	file_to_openin = biggie_filename;
[693]	3314	if (strchr(biggie_filename,'\'') != NULL) {
	3315	sprintf(command, "md5sum \"%s\"", biggie_filename);
	3316	} else {
	3317	sprintf(command, "md5sum '%s'", biggie_filename);
	3318	}
[128]	3319	if (!(fin = popen(command, "r"))) {
	3320	log_OS_error("Unable to popen-in command");
	3321	return (1);
	3322	}
	3323	(void) fgets(checksum_line, MAX_STR_LEN, fin);
	3324	pclose(fin);
[167]	3325	totallength = length_of_file (biggie_filename);
[128]	3326	}
	3327	lstat(biggie_filename, &biggiestruct.properties);
	3328	strcpy(biggiestruct.filename, biggie_filename);
	3329	pB = strchr(checksum_line, ' ');
	3330	if (!pB) {
	3331	pB = strchr(checksum_line, '\t');
	3332	}
	3333	if (pB) {
	3334	*pB = '\0';
	3335	}
	3336	strcpy(biggiestruct.checksum, checksum_line);
[1]	3337
[128]	3338	strcpy(tmp, slice_fname(biggie_file_number, 0, bkpinfo->tmpdir, ""));
	3339	fout = fopen(tmp, "w");
	3340	(void) fwrite((void *) &biggiestruct, 1, sizeof(biggiestruct), fout);
	3341	paranoid_fclose(fout);
	3342	length = totallength / optimal_set_size / 1024;
[1107]	3343	mr_msg(1, "Opening in %s; slicing it and writing to CD/tape",
[128]	3344	file_to_openin);
	3345	if (!(fin = fopen(file_to_openin, "r"))) {
	3346	log_OS_error("Unable to openin biggie_filename");
	3347	sprintf(tmp, "Cannot archive bigfile '%s': not found",
	3348	biggie_filename);
	3349	log_to_screen(tmp);
[1080]	3350	mr_free(tempblock);
	3351	mr_free(tmp);
	3352	mr_free(checksum_line);
	3353	mr_free(command);
[128]	3354	return (1);
	3355	}
	3356	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3357	res =
	3358	move_files_to_stream(bkpinfo,
	3359	slice_fname(biggie_file_number, 0,
	3360	bkpinfo->tmpdir, ""), NULL);
	3361	} else {
	3362	res =
[541]	3363	move_files_to_cd(bkpinfo,
[128]	3364	slice_fname(biggie_file_number, 0,
	3365	bkpinfo->tmpdir, ""), NULL);
	3366	}
	3367	i = bkpinfo->optimal_set_size / 256;
	3368	for (slice_num = 1; !finished; slice_num++) {
	3369	strcpy(curr_slice_fname_uncompressed,
	3370	slice_fname(biggie_file_number, slice_num, bkpinfo->tmpdir,
	3371	""));
	3372	strcpy(curr_slice_fname_compressed,
	3373	slice_fname(biggie_file_number, slice_num, bkpinfo->tmpdir,
	3374	suffix));
[1]	3375
[128]	3376	strcpy(tmp, percent_media_full_comment(bkpinfo));
	3377	update_progress_form(tmp);
	3378	if (!(fout = fopen(curr_slice_fname_uncompressed, "w"))) {
	3379	log_OS_error(curr_slice_fname_uncompressed);
	3380	return (1);
[1]	3381	}
[128]	3382	if ((i == bkpinfo->optimal_set_size / 256)
	3383	&& (totalread < 1.1 * totallength)) {
	3384	for (i = 0; i < bkpinfo->optimal_set_size / 256; i++) {
	3385	blksize = fread(tempblock, 1, 256 * 1024, fin);
	3386	if (blksize > 0) {
	3387	totalread = totalread + blksize;
	3388	(void) fwrite(tempblock, 1, blksize, fout);
	3389	} else {
	3390	break;
	3391	}
	3392	}
	3393	} else {
	3394	i = 0;
	3395	}
	3396	paranoid_fclose(fout);
	3397	if (i > 0) // length_of_file (curr_slice_fname_uncompressed)
[1]	3398	{
[128]	3399	if (!does_file_exist(curr_slice_fname_uncompressed)) {
[1107]	3400	mr_msg(2,
[128]	3401	"Warning - '%s' doesn't exist. How can I compress slice?",
	3402	curr_slice_fname_uncompressed);
	3403	}
	3404	if (should_I_compress_slices && bkpinfo->compression_level > 0) {
	3405	sprintf(command, "%s -%d %s", bkpinfo->zip_exe,
	3406	bkpinfo->compression_level,
	3407	curr_slice_fname_uncompressed);
[1107]	3408	mr_msg(2, command);
[128]	3409	if ((res = system(command))) {
	3410	log_OS_error(command);
	3411	}
	3412	// did_I_compress_slice = TRUE;
	3413	} else {
	3414	sprintf(command, "mv %s %s 2>> %s",
	3415	curr_slice_fname_uncompressed,
	3416	curr_slice_fname_compressed, MONDO_LOGFILE);
	3417	res = 0; // don't do it :)
	3418	// did_I_compress_slice = FALSE;
	3419	}
	3420	retval += res;
	3421	if (res) {
[1107]	3422	mr_msg(2, "Failed to compress the slice");
[128]	3423	}
	3424	if (bkpinfo->use_lzo
	3425	&& strcmp(curr_slice_fname_compressed,
	3426	curr_slice_fname_uncompressed)) {
	3427	unlink(curr_slice_fname_uncompressed);
	3428	}
	3429	if (res) {
	3430	sprintf(tmp, "Problem with slice # %ld", slice_num);
	3431	} else {
	3432	sprintf(tmp,
	3433	"%s - Bigfile #%ld, slice #%ld compressed OK ",
	3434	biggie_filename, biggie_file_number + 1,
	3435	slice_num);
	3436	}
[1]	3437	#ifndef _XWIN
[128]	3438	if (!g_text_mode) {
	3439	newtDrawRootText(0, g_noof_rows - 2, tmp);
	3440	newtRefresh();
	3441	} else {
[1107]	3442	mr_msg(2, tmp);
[128]	3443	}
[1]	3444	#else
[1107]	3445	mr_msg(2, tmp);
[1]	3446	#endif
[128]	3447	strcpy(file_to_archive, curr_slice_fname_compressed);
	3448	g_current_progress++;
	3449	} else { /* if i==0 then ... */
[1]	3450
[128]	3451	finished = TRUE;
	3452	strcpy(file_to_archive, curr_slice_fname_uncompressed);
	3453	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3454	break;
	3455	}
	3456	}
	3457
	3458	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3459	register_in_tape_catalog(biggieslice, biggie_file_number,
	3460	slice_num, file_to_archive);
	3461	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	3462	file_to_archive);
	3463	res = move_files_to_stream(bkpinfo, file_to_archive, NULL);
	3464	} else {
[541]	3465	res = move_files_to_cd(bkpinfo, file_to_archive, NULL);
[128]	3466	}
	3467	retval += res;
	3468	if (res) {
	3469	sprintf(tmp,
	3470	"Failed to add slice %ld of bigfile %ld to scratchdir",
	3471	slice_num, biggie_file_number + 1);
	3472	log_to_screen(tmp);
	3473	fatal_error
	3474	("Hard disk full. You should have bought a bigger one.");
	3475	}
[1]	3476	}
[128]	3477	paranoid_fclose(fin);
	3478	sprintf(tmp, "Sliced bigfile #%ld", biggie_file_number + 1);
	3479	if (retval) {
	3480	strcat(tmp, "...FAILED");
	3481	} else {
	3482	strcat(tmp, "...OK!");
[1]	3483	}
[1107]	3484	mr_msg(1, tmp);
[1080]	3485	mr_free(tempblock);
	3486	mr_free(tmp);
	3487	mr_free(checksum_line);
	3488	mr_free(command);
	3489	mr_free(curr_slice_fname_uncompressed);
	3490	mr_free(curr_slice_fname_compressed);
	3491	mr_free(file_to_archive);
	3492	mr_free(suffix);
[128]	3493	return (retval);
[1]	3494	}
	3495
	3496
	3497
	3498
	3499
	3500
	3501	/**
	3502	* Remove the archives in @c d.
	3503	* This could possibly include any of:
	3504	* - all afioballs (compressed and not)
	3505	* - all filelists
	3506	* - all slices
	3507	* - all checksums
	3508	* - a zero filler file
	3509	*
	3510	* @param d The directory to wipe the archives from.
	3511	* @ingroup utilityGroup
	3512	*/
[128]	3513	void wipe_archives(char *d)
[1]	3514	{
[128]	3515	/@ buffers ******************************************** */
	3516	char *tmp;
	3517	char *dir;
[1]	3518
[128]	3519	malloc_string(tmp);
	3520	malloc_string(dir);
	3521	assert_string_is_neither_NULL_nor_zerolength(d);
[1]	3522
[128]	3523	sprintf(dir, "%s/archives", d);
	3524	sprintf(tmp, "find %s -name '.afio' -exec rm -f '{}' \\;", dir);
	3525	run_program_and_log_output(tmp, FALSE);
	3526	sprintf(tmp, "find %s -name 'list.[0-9]' -exec rm -f '{}' \\;", dir);
	3527	run_program_and_log_output(tmp, FALSE);
	3528	sprintf(tmp, "find %s -name 'slice*' -exec rm -f '{}' \\;", dir);
	3529	run_program_and_log_output(tmp, FALSE);
	3530	sprintf(tmp, "rm -f %s/cklist*", dir);
	3531	run_program_and_log_output(tmp, FALSE);
	3532	sprintf(tmp, "rm -f %s/zero", dir);
	3533	run_program_and_log_output(tmp, FALSE);
[1107]	3534	mr_msg(1, "Wiped %s's archives", dir);
[128]	3535	sprintf(tmp, "ls -l %s", dir);
	3536	run_program_and_log_output(tmp, FALSE);
[1080]	3537	mr_free(tmp);
	3538	mr_free(dir);
[1]	3539	}
	3540
	3541
	3542
	3543	/**
	3544	* @addtogroup LLarchiveGroup
	3545	* @{
	3546	*/
	3547	/**
	3548	* Write the final ISO image.
	3549	* @param bkpinfo The backup information structure. Used only
	3550	* in the call to @c write_iso_and_go_on().
	3551	* @return The number of errors encountered (0 for success)
	3552	* @see write_iso_and_go_on
	3553	* @see make_iso_fs
	3554	* @bug The final ISO is written even if there are no files on it. In practice,
	3555	* however, this occurs rarely.
	3556	*/
[541]	3557	int write_final_iso_if_necessary(struct s_bkpinfo *bkpinfo)
[1]	3558	{
[128]	3559	/@ int **************************************************** */
	3560	int res;
[1]	3561
[128]	3562	/@ buffers ************************************************* */
	3563	char *tmp;
[1]	3564
[128]	3565	malloc_string(tmp);
	3566	assert(bkpinfo != NULL);
[1]	3567
	3568	// I should really check if there are any slices or tarballs to be copied to CD-R(W)'s; the odds are approx. 1 in a million that there are no files here, so I'll just go ahead & make one more CD anyway
	3569
[128]	3570	sprintf(tmp, "Writing the final ISO");
[1107]	3571	mr_msg(2, tmp);
[128]	3572	center_string(tmp, 80);
[1]	3573	#ifndef _XWIN
[128]	3574	if (!g_text_mode) {
	3575	newtPushHelpLine(tmp);
	3576	}
[1]	3577	#endif
[541]	3578	res = write_iso_and_go_on(bkpinfo, TRUE);
[1]	3579	#ifndef _XWIN
[128]	3580	if (!g_text_mode) {
	3581	newtPopHelpLine();
	3582	}
[1]	3583	#endif
[1107]	3584	mr_msg(2, "Returning from writing final ISO (res=%d)", res);
[1080]	3585	mr_free(tmp);
[128]	3586	return (res);
[1]	3587	}
	3588
	3589
	3590	/**
[20]	3591	* Write an ISO image to <tt>[bkpinfo->isodir]/bkpinfo->prefix-[g_current_media_number].iso</tt>.
[1]	3592	* @param bkpinfo The backup information structure. Fields used:
	3593	* - @c backup_media_type
[20]	3594	* - @c prefix
[1]	3595	* - @c isodir
	3596	* - @c manual_cd_tray
	3597	* - @c media_size
	3598	* - @c nfs_mount
	3599	* - @c nfs_remote_dir
	3600	* - @c scratchdir
	3601	* - @c verify_data
	3602	*
	3603	* @param last_cd If TRUE, this is the last CD to write; if FALSE, it's not.
	3604	* @return The number of errors encountered (0 for success)
	3605	* @see make_iso_fs
	3606	*/
[541]	3607	int write_iso_and_go_on(struct s_bkpinfo *bkpinfo, bool last_cd)
[1]	3608	{
[128]	3609	/@ pointers *************************************************** */
	3610	FILE *fout;
[1]	3611
[128]	3612	/@ buffers **************************************************** */
	3613	char *tmp;
	3614	char *cdno_fname;
	3615	char *lastcd_fname;
	3616	char *isofile;
[1]	3617
[128]	3618	/@ bool ******************************************************* */
	3619	bool that_one_was_ok;
	3620	bool using_nfs;
	3621	bool orig_vfy_flag_val;
[1]	3622
[128]	3623	/@ int ********************************************************** */
	3624	int res = 0;
[1]	3625
[128]	3626	malloc_string(tmp);
	3627	malloc_string(cdno_fname);
	3628	malloc_string(lastcd_fname);
	3629	malloc_string(isofile);
[1]	3630
[128]	3631	assert(bkpinfo != NULL);
	3632	orig_vfy_flag_val = bkpinfo->verify_data;
	3633	if (bkpinfo->media_size[g_current_media_number] <= 0) {
	3634	fatal_error("write_iso_and_go_on() - unknown media size");
	3635	}
[1]	3636
[128]	3637	if (strlen(bkpinfo->nfs_mount) > 1) {
	3638	using_nfs = TRUE;
	3639	} else {
	3640	using_nfs = FALSE;
	3641	}
[1107]	3642	mr_msg(1, "OK, time to make %s #%d",
[128]	3643	media_descriptor_string(bkpinfo->backup_media_type),
	3644	g_current_media_number);
[1]	3645
[128]	3646	/* label the ISO with its number */
[1]	3647
[128]	3648	sprintf(cdno_fname, "%s/archives/THIS-CD-NUMBER", bkpinfo->scratchdir);
	3649	fout = fopen(cdno_fname, "w");
	3650	fprintf(fout, "%d", g_current_media_number);
	3651	paranoid_fclose(fout);
[1]	3652
[128]	3653	sprintf(tmp, "cp -f %s/autorun %s/", g_mondo_home,
	3654	bkpinfo->scratchdir);
	3655	if (run_program_and_log_output(tmp, FALSE)) {
[1107]	3656	mr_msg(2, "Warning - unable to copy autorun to scratchdir");
[1]	3657	}
[128]	3658
	3659	/* last CD or not? Label accordingly */
	3660	sprintf(lastcd_fname, "%s/archives/NOT-THE-LAST", bkpinfo->scratchdir);
	3661	if (last_cd) {
	3662	unlink(lastcd_fname);
[1107]	3663	mr_msg(2,
[128]	3664	"OK, you're telling me this is the last CD. Fair enough.");
	3665	} else {
	3666	fout = fopen(lastcd_fname, "w");
	3667	fprintf(fout,
	3668	"You're listening to 90.3 WPLN, Nashville Public Radio.\n");
	3669	paranoid_fclose(fout);
[1]	3670	}
[128]	3671	if (space_occupied_by_cd(bkpinfo->scratchdir) / 1024 >
	3672	bkpinfo->media_size[g_current_media_number]) {
	3673	sprintf(tmp,
[1087]	3674	"Warning! %s is too big. It occupies %ld KB, which is more than the %ld KB allowed.",
	3675	media_descriptor_string(bkpinfo->backup_media_type),
[128]	3676	(long) space_occupied_by_cd(bkpinfo->scratchdir),
	3677	(long) bkpinfo->media_size[g_current_media_number]);
	3678	log_to_screen(tmp);
	3679	}
[1087]	3680	if (bkpinfo->backup_media_type != usb) {
	3681	sprintf(isofile, "%s/%s/%s-%d.iso", bkpinfo->isodir,
[128]	3682	bkpinfo->nfs_remote_dir, bkpinfo->prefix,
	3683	g_current_media_number);
[1087]	3684	} else {
	3685	}
[128]	3686	for (that_one_was_ok = FALSE; !that_one_was_ok;) {
[1087]	3687	if (bkpinfo->backup_media_type != usb) {
	3688	res = make_iso_fs(bkpinfo, isofile);
	3689	} else {
	3690	}
[128]	3691	if (g_current_media_number == 1 && !res
	3692	&& (bkpinfo->backup_media_type == cdr
	3693	\|\| bkpinfo->backup_media_type == cdrw)) {
	3694	if (find_cdrom_device(tmp, FALSE)) // make sure find_cdrom_device() finds, records CD-R's loc
	3695	{
[1107]	3696	mr_msg(3, "Sigh Mike, I hate your computer.");
[128]	3697	bkpinfo->manual_cd_tray = TRUE;
	3698	} // if it can't be found then force pausing
	3699	else {
[1107]	3700	mr_msg(3, "Great. Found Mike's CD-ROM drive.");
[128]	3701	}
[1]	3702	}
[128]	3703	if (bkpinfo->verify_data && !res) {
	3704	log_to_screen
	3705	("Please reboot from the 1st %s in Compare Mode, as a precaution.",
	3706	media_descriptor_string(g_backup_media_type));
	3707	chdir("/");
	3708	iamhere("Before calling verify_cd_image()");
	3709	res += verify_cd_image(bkpinfo);
	3710	iamhere("After calling verify_cd_image()");
[1]	3711	}
[128]	3712	if (!res) {
	3713	that_one_was_ok = TRUE;
	3714	} else {
	3715	sprintf(tmp, "Failed to burn %s #%d. Retry?",
	3716	media_descriptor_string(bkpinfo->backup_media_type),
	3717	g_current_media_number);
	3718	res = ask_me_yes_or_no(tmp);
	3719	if (!res) {
	3720	if (ask_me_yes_or_no("Abort the backup?")) {
	3721	fatal_error("FAILED TO BACKUP");
	3722	} else {
	3723	break;
	3724	}
	3725	} else {
[1107]	3726	mr_msg(2, "Retrying, at user's request...");
[128]	3727	res = 0;
	3728	}
	3729	}
[1]	3730	}
	3731	/*
	3732	if (using_nfs)
	3733	{
	3734	sprintf(tmp,"mv -f %s %s/%s/", isofile, bkpinfo->isodir, bkpinfo->nfs_remote_dir);
	3735	if (run_program_and_log_output(tmp, FALSE))
	3736	{ log_to_screen("Unable to move ISO to NFS dir"); }
	3737	}
	3738	*/
[128]	3739	g_current_media_number++;
	3740	if (g_current_media_number > MAX_NOOF_MEDIA) {
	3741	fatal_error("Too many CD-R(W)'s. Use tape or net.");
	3742	}
	3743	wipe_archives(bkpinfo->scratchdir);
	3744	sprintf(tmp, "rm -Rf %s/images/gz %s/images/data*img",
	3745	bkpinfo->scratchdir, bkpinfo->scratchdir);
	3746	if (system(tmp)) {
[1107]	3747	mr_msg
[128]	3748	(2,
	3749	"Error occurred when I tried to delete the redundant IMGs and GZs");
	3750	}
[1]	3751
[128]	3752	if (last_cd) {
[1107]	3753	mr_msg(2, "This was your last CD.");
[128]	3754	} else {
[1107]	3755	mr_msg(2, "Continuing to backup your data...");
[128]	3756	}
[1]	3757
[128]	3758	bkpinfo->verify_data = orig_vfy_flag_val;
[1080]	3759	mr_free(tmp);
	3760	mr_free(cdno_fname);
	3761	mr_free(lastcd_fname);
	3762	mr_free(isofile);
[128]	3763	return (0);
[1]	3764	}
	3765
	3766	/* @} - end of LLarchiveGroup */
	3767
	3768
	3769
	3770
	3771	/**
	3772	* Verify the user's data.
	3773	* @param bkpinfo The backup information structure. Fields used:
	3774	* - @c backup_data
	3775	* - @c backup_media_type
	3776	* - @c media_device
	3777	* - @c verify_data
	3778	*
	3779	* @return The number of errors encountered (0 for success)
	3780	* @ingroup verifyGroup
	3781	*/
	3782	int verify_data(struct s_bkpinfo *bkpinfo)
	3783	{
[128]	3784	int res = 0, retval = 0, cdno = 0;
	3785	char *tmp;
	3786	long diffs = 0;
[1]	3787
[128]	3788	malloc_string(tmp);
	3789	assert(bkpinfo != NULL);
	3790	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3791	chdir("/");
	3792	mvaddstr_and_log_it(g_currentY, 0,
	3793	"Verifying archives against live filesystem");
	3794	if (bkpinfo->backup_media_type == cdstream) {
	3795	strcpy(bkpinfo->media_device, "/dev/cdrom");
	3796	}
	3797	verify_tape_backups(bkpinfo);
	3798	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	3799	} else if (bkpinfo->backup_data)
	3800	//bkpinfo->backup_media_type == cdrw \|\| bkpinfo->backup_media_type == cdr))
[1]	3801	{
[1107]	3802	mr_msg(2,
[128]	3803	"Not verifying again. Per-CD/ISO verification already carried out.");
	3804	paranoid_system
	3805	("cat /tmp/changed.files.* > /tmp/changed.files 2> /dev/null");
	3806	} else {
	3807	g_current_media_number = cdno;
	3808	if (bkpinfo->backup_media_type != iso) {
	3809	find_cdrom_device(bkpinfo->media_device, FALSE); // replace 0,0,0 with /dev/cdrom
[1]	3810	}
[128]	3811	chdir("/");
	3812	for (cdno = 1; cdno < 99 && bkpinfo->verify_data; cdno++) {
	3813	if (cdno != g_current_media_number) {
[1107]	3814	mr_msg(2,
[128]	3815	"Warning - had to change g_current_media_number from %d to %d",
	3816	g_current_media_number, cdno);
	3817	g_current_media_number = cdno;
	3818	}
	3819	if (bkpinfo->backup_media_type != iso) {
	3820	insist_on_this_cd_number(bkpinfo, cdno);
	3821	}
	3822	res = verify_cd_image(bkpinfo); // sets verify_data to FALSE if it's time to stop verifying
	3823	retval += res;
	3824	if (res) {
	3825	sprintf(tmp,
	3826	"Warnings/errors were reported while checking %s #%d",
	3827	media_descriptor_string(bkpinfo->
	3828	backup_media_type),
	3829	g_current_media_number);
	3830	log_to_screen(tmp);
[1]	3831
[128]	3832	}
[1]	3833	}
	3834	/*
	3835	sprintf (tmp,
	3836	"cat %s \| grep \"afio: \" \| cut -d'\"' -f2 \| sort -u \| awk '{print \"/\"$0;};' \| tr -s '/' '/' \| grep -vx \"/afio:.*\" > /tmp/changed.files",
	3837	MONDO_LOGFILE);
	3838	system (tmp);
	3839	*/
[128]	3840	sprintf(tmp,
[911]	3841	"grep 'afio: ' %s \| sed 's/afio: //' \| grep -vE '^/dev/.*$' >> /tmp/changed.files",
[128]	3842	MONDO_LOGFILE);
	3843	system(tmp);
	3844
	3845	sprintf(tmp,
[911]	3846	"grep 'star: ' %s \| sed 's/star: //' \| grep -vE '^/dev/.*$' >> /tmp/changed.files",
[128]	3847	MONDO_LOGFILE);
	3848	system(tmp);
	3849	run_program_and_log_output("umount " MNT_CDROM, FALSE);
	3850	// if (bkpinfo->backup_media_type != iso && !bkpinfo->please_dont_eject_when_restoring)
[1]	3851	//{
[128]	3852	eject_device(bkpinfo->media_device);
[1]	3853	//}
	3854	}
[128]	3855	diffs = count_lines_in_file("/tmp/changed.files");
[1]	3856
[128]	3857	if (diffs > 0) {
	3858	if (retval == 0) {
	3859	retval = (int) (-diffs);
	3860	}
[1]	3861	}
[1080]	3862	mr_free(tmp);
[128]	3863	return (retval);
[1]	3864	}
	3865
	3866
	3867
	3868
	3869
	3870	/**
	3871	* @addtogroup utilityGroup
	3872	* @{
	3873	*/
	3874	/**
	3875	* Write an image to a real 3.5" floppy disk.
	3876	* @param device The device to write to (e.g. @c /dev/fd0)
	3877	* @param datafile The image to write to @p device.
	3878	* @return The number of errors encountered (0 for success)
	3879	* @see write_image_to_floppy
	3880	*/
[128]	3881	int write_image_to_floppy_SUB(char device, char datafile)
[1]	3882	{
[128]	3883	/@ int ************************************************************** */
	3884	int res = 0;
[1]	3885	int percentage = 0;
	3886	int blockno = 0;
[128]	3887	int maxblocks = 0;
[1]	3888
[128]	3889	/@ buffers*********************************************************** */
	3890	char *tmp;
[1]	3891	char blk[1024];
	3892	char *title;
	3893
[128]	3894	/@ pointers ********************************************************* */
[1]	3895	char *p;
[128]	3896	FILE fout, fin;
[1]	3897
	3898
[128]	3899	malloc_string(tmp);
	3900	malloc_string(title);
	3901	/* pretty stuff */
	3902	if (!(p = strrchr(datafile, '/'))) {
	3903	p = datafile;
	3904	} else {
	3905	p++;
[1]	3906	}
[128]	3907	sprintf(title, "Writing %s to floppy", p);
	3908	open_evalcall_form(title);
	3909	/* functional stuff */
	3910	for (p = device + strlen(device); p != device && isdigit(*(p - 1));
	3911	p--);
	3912	maxblocks = atoi(p);
	3913	if (!maxblocks) {
	3914	maxblocks = 1440;
[1]	3915	}
[128]	3916	sprintf(tmp, "maxblocks = %d; p=%s", maxblocks, p);
[1107]	3917	mr_msg(2, tmp);
[128]	3918	/* copy data from image to floppy */
	3919	if (!(fin = fopen(datafile, "r"))) {
	3920	log_OS_error("Cannot open img");
	3921	return (1);
[1]	3922	}
[128]	3923	if (!(fout = fopen(device, "w"))) {
	3924	log_OS_error("Cannot open fdd");
	3925	return (1);
	3926	}
	3927	for (blockno = 0; blockno < maxblocks; blockno++) {
	3928	percentage = blockno * 100 / maxblocks;
	3929	if (fread(blk, 1, 1024, fin) != 1024) {
	3930	if (feof(fin)) {
[1107]	3931	mr_msg(1,
[128]	3932	"img read err - img ended prematurely - non-fatal error");
	3933	sleep(3);
	3934	return (res);
	3935	}
	3936	res++;
	3937	log_to_screen("img read err");
	3938	}
	3939	if (fwrite(blk, 1, 1024, fout) != 1024) {
	3940	res++;
	3941	log_to_screen("fdd write err");
	3942	}
	3943	if (((blockno + 1) % 128) == 0) {
	3944	paranoid_system("sync"); /* fflush doesn't work; dunno why */
	3945	update_evalcall_form(percentage);
	3946	}
	3947	}
	3948	paranoid_fclose(fin);
	3949	paranoid_fclose(fout);
[1080]	3950	mr_free(tmp);
	3951	mr_free(title);
[128]	3952	close_evalcall_form();
	3953	return (res);
[1]	3954	}
	3955
	3956
	3957
	3958
	3959
	3960
	3961
	3962
	3963
	3964	/**
	3965	* Wrapper around @c write_image_to_floppy_SUB().
	3966	* This function, unlike @c write_image_to_floppy_SUB(),
	3967	* gives the user the opportunity to retry if the write fails.
	3968	* @see write_image_to_floppy_SUB
	3969	*/
[128]	3970	int write_image_to_floppy(char device, char datafile)
[1]	3971	{
[128]	3972	/@ int ************************************************************* */
	3973	int res = 0;
[1]	3974
[128]	3975	assert_string_is_neither_NULL_nor_zerolength(device);
	3976	assert_string_is_neither_NULL_nor_zerolength(datafile);
[1]	3977
[128]	3978	while ((res = write_image_to_floppy_SUB(device, datafile))) {
	3979	if (!ask_me_yes_or_no("Failed to write image to floppy. Retry?")) {
	3980	return (res);
	3981	}
[1]	3982	}
[128]	3983	return (res);
[1]	3984	}
	3985
	3986	/* @} - end of utilityGroup */
[259]	3987
[424]	3988	void setenv_mondo_share(void) {
[259]	3989
[424]	3990	setenv("MONDO_SHARE", MONDO_SHARE, 1);
[1087]	3991	setenv("MONDORESTORECFG", MONDORESTORECFG, 1);
	3992	setenv("MONDO_CACHE", MONDO_CACHE, 1);
[259]	3993	}

Note: See TracBrowser for help on using the repository browser.

Download in other formats: