Context Navigation

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

Visit:

Last change on this file since 1123 was 1123, checked in by Bruno Cornec, 17 years ago
Again linker fixes (hopefully last time for now)
Property svn:keywords set to `Id`
File size: 112.2 KB

Rev	Line
[1]	1	/* libmondo-archive.c
[99]	2	$Id: libmondo-archive.c 1123 2007-02-09 22:41:03Z 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 1123 2007-02-09 22:41:03Z 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);
	1117	res =
	1118	archive_this_fileset(bkpinfo, archiving_filelist_fname,
	1119	archiving_afioball_fname,
	1120	archiving_set_no);
	1121	retval += res;
[1]	1122
[128]	1123	if (res) {
[1118]	1124	mr_asprintf(&tmp,
	1125	"Errors occurred while archiving set %ld. Please review logs.",
	1126	archiving_set_no);
[128]	1127	log_to_screen(tmp);
[1118]	1128	mr_free(tmp);
[128]	1129	}
	1130	if (!semaphore_p()) {
	1131	fatal_error("Cannot get semaphore P");
	1132	}
	1133
	1134	set_bit_N_of_array(p_list_of_fileset_flags, archiving_set_no, 5);
	1135
	1136	if (*p_last_set_archived < archiving_set_no) {
	1137	*p_last_set_archived = archiving_set_no;
	1138	} // finished archiving this one
	1139
	1140	if (!semaphore_v()) {
	1141	fatal_error("Cannot get semaphore V");
	1142	}
[1107]	1143	mr_msg(4, "%s[%d:%d] - archived %d OK", FORTY_SPACES, getpid(),
[128]	1144	this_thread_no, archiving_set_no);
	1145	archiving_set_no++;
	1146	}
	1147	if (!semaphore_p()) {
	1148	fatal_error("Cannot get semaphore P");
	1149	}
	1150	(*p_archival_threads_running)--;
	1151	if (!semaphore_v()) {
	1152	fatal_error("Cannot get semaphore V");
	1153	}
[1107]	1154	mr_msg(3, "%s[%d:%d] - exiting", FORTY_SPACES, getpid(),
[128]	1155	this_thread_no);
[1080]	1156	mr_free(archiving_filelist_fname);
	1157	mr_free(archiving_afioball_fname);
[128]	1158	pthread_exit(NULL);
[1]	1159	}
	1160
	1161
	1162	/**
	1163	* Finalize the backup.
	1164	* For streaming backups, this writes the closing block
	1165	* to the stream. For CD-based backups, this creates
	1166	* the final ISO image.
	1167	* @param bkpinfo The backup information structure, used only
	1168	* for the @c backup_media_type.
	1169	* @ingroup MLarchiveGroup
	1170	*/
[541]	1171	int do_that_final_phase(struct s_bkpinfo *bkpinfo)
[1]	1172	{
	1173
[128]	1174	/@ int ************************************* */
	1175	int res = 0;
	1176	int retval = 0;
[1]	1177
[128]	1178	/@ buffers ********************************* */
[1]	1179
[128]	1180	assert(bkpinfo != NULL);
	1181	mvaddstr_and_log_it(g_currentY, 0,
	1182	"Writing any remaining data to media ");
[1]	1183
[1107]	1184	mr_msg(1, "Closing tape/CD ... ");
[1118]	1185	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[128]	1186	/* write tape/cdstream */
	1187	closeout_tape(bkpinfo);
[1118]	1188	} else {
[1087]	1189	/* write final ISO/USB */
[541]	1190	res = write_final_iso_if_necessary(bkpinfo);
[128]	1191	retval += res;
	1192	if (res) {
[1107]	1193	mr_msg(1, "write_final_iso_if_necessary returned an error");
[128]	1194	}
[1]	1195	}
[1107]	1196	mr_msg(2, "Fork is exiting ... ");
[1]	1197
[128]	1198	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
[1]	1199
[128]	1200	/* final stuff */
	1201	if (retval) {
	1202	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
	1203	} else {
	1204	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	1205	}
[1]	1206
[128]	1207	return (retval);
[1]	1208	}
	1209
	1210
	1211	/**
	1212	* Initialize the backup.
	1213	* Does the following:
	1214	* - Sets up the serial number.
	1215	* - For streaming backups, opens the tape stream and writes the data disks
	1216	* and backup headers.
	1217	* - For CD-based backups, wipes the ISOs in the target directory.
	1218	*
	1219	* @param bkpinfo The backup information structure. Fields used:
	1220	* - @c backup_media_type
	1221	* - @c cdrw_speed
[20]	1222	* - @c prefix
[1]	1223	* - @c isodir
	1224	* - @c media_device
	1225	* - @c scratchdir
	1226	* - @c tmpdir
	1227	* @return The number of errors encountered (0 for success).
	1228	* @ingroup MLarchiveGroup
	1229	*/
[128]	1230	int do_that_initial_phase(struct s_bkpinfo *bkpinfo)
[1]	1231	{
[128]	1232	/@ int ************************************** */
	1233	int retval = 0;
[1]	1234
[128]	1235	/@ buffers ********************************** */
	1236	char command, tmpfile, *data_disks_file;
[1]	1237
[128]	1238	assert(bkpinfo != NULL);
	1239	malloc_string(command);
	1240
[1118]	1241	mr_asprintf(&data_disks_file, "%s/all.tar.gz", bkpinfo->tmpdir);
	1242
[128]	1243	snprintf(g_serial_string, MAX_STR_LEN - 1,
	1244	call_program_and_get_last_line_of_output("dd \
[1]	1245	if=/dev/urandom bs=16 count=1 2> /dev/null \| \
	1246	hexdump \| tr -s ' ' '0' \| head -n1"));
[128]	1247	strip_spaces(g_serial_string);
	1248	strcat(g_serial_string, "...word.");
[1107]	1249	mr_msg(2, "g_serial_string = '%s'", g_serial_string);
[128]	1250	assert(strlen(g_serial_string) < MAX_STR_LEN);
[1]	1251
[1118]	1252	mr_asprintf(&tmpfile, "%s/archives/SERIAL-STRING", bkpinfo->scratchdir);
[128]	1253	if (write_one_liner_data_file(tmpfile, g_serial_string)) {
[1107]	1254	mr_msg(1, "%ld: Failed to write serial string", __LINE__);
[128]	1255	}
[1118]	1256	mr_free(tmpfile);
[1]	1257
[128]	1258	mvaddstr_and_log_it(g_currentY, 0, "Preparing to archive your data");
	1259	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	1260	if (bkpinfo->backup_media_type == cdstream) {
	1261	openout_cdstream(bkpinfo->media_device, bkpinfo->cdrw_speed);
	1262	} else {
	1263	openout_tape(bkpinfo->media_device, bkpinfo->internal_tape_block_size); /* sets g_tape_stream */
	1264	}
	1265	if (!g_tape_stream) {
	1266	fatal_error("Cannot open backup (streaming) device");
	1267	}
[1107]	1268	mr_msg(1, "Backup (stream) opened OK");
[128]	1269	write_data_disks_to_stream(data_disks_file);
	1270	} else {
[1107]	1271	mr_msg(1, "Backing up to CD's");
[1]	1272	}
[1118]	1273	mr_free(data_disks_file);
[1]	1274
[1118]	1275	mr_asprintf(&command, "rm -f %s/%s/%s-[1-9]*.iso", bkpinfo->isodir,
	1276	bkpinfo->nfs_remote_dir, bkpinfo->prefix);
[128]	1277	paranoid_system(command);
[1118]	1278	mr_free(command);
	1279
[128]	1280	wipe_archives(bkpinfo->scratchdir);
	1281	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	1282	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	1283	write_header_block_to_stream((off_t)0, "start-of-tape",
[128]	1284	BLK_START_OF_TAPE);
[684]	1285	write_header_block_to_stream((off_t)0, "start-of-backup",
[128]	1286	BLK_START_OF_BACKUP);
	1287	}
	1288	return (retval);
[1]	1289	}
	1290
	1291
	1292	/**
	1293	* Calls floppy-formatting @c cmd and tracks its progress if possible.
	1294	*
	1295	* @param cmd The command to run (e.g. @c fdformat @c /dev/fd0).
	1296	* @param title The human-friendly description of the floppy you are writing.
	1297	* This will be used as the title in the progress bar window. Example:
	1298	* "Formatting disk /dev/fd0".
	1299	* @see format_disk
	1300	* @return The exit code of fdformat/superformat.
	1301	*/
[128]	1302	int format_disk_SUB(char cmd, char title)
[1]	1303	{
	1304
[128]	1305	/@ int ************************************************************** */
	1306	int res = 0;
[1]	1307	int percentage = 0;
	1308	int maxtracks = 0;
	1309	int trackno = 0;
	1310	int last_trkno = 0;
	1311
[128]	1312	/@ buffers ********************************************************** */
[1118]	1313	char *command = NULL;
[128]	1314	char *tempfile;
[1]	1315
[128]	1316	/@ pointers ********************************************************* */
	1317	FILE *pin;
[1]	1318
[128]	1319	assert_string_is_neither_NULL_nor_zerolength(cmd);
	1320	assert_string_is_neither_NULL_nor_zerolength(title);
[1]	1321
[128]	1322	malloc_string(tempfile);
[1]	1323	#ifdef __FreeBSD__
	1324	/* Ugh. FreeBSD fdformat prints out this pretty progress indicator that's
	1325	impossible to parse. It looks like
	1326	VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVF-------------------
	1327	where V means verified, E means error, F means formatted, and - means
	1328	not done yet.
	1329	*/
[128]	1330	return (run_program_and_log_to_screen(cmd, title));
[1]	1331	#endif
	1332
	1333	/* if Debian then do bog-standard superformat; don't be pretty */
[128]	1334	if (strstr(cmd, "superformat")) {
	1335	return (run_program_and_log_to_screen(cmd, title));
	1336	}
[1]	1337	/* if not Debian then go ahead & use fdformat */
[128]	1338	strcpy(tempfile,
	1339	call_program_and_get_last_line_of_output
	1340	("mktemp -q /tmp/mondo.XXXXXXXX"));
[1118]	1341	mr_asprintf(&command, "%s >> %s 2>> %s; rm -f %s", cmd, tempfile, tempfile, tempfile);
[1107]	1342	mr_msg(3, command);
[128]	1343	open_evalcall_form(title);
	1344	if (!(pin = popen(command, "r"))) {
	1345	log_OS_error("fmt err");
	1346	return (1);
[1]	1347	}
[128]	1348	if (strstr(command, "1722")) {
	1349	maxtracks = 82;
	1350	} else {
	1351	maxtracks = 80;
[1]	1352	}
[1118]	1353	mr_free(command);
	1354
[128]	1355	for (sleep(1); does_file_exist(tempfile); sleep(1)) {
	1356	trackno = get_trackno_from_logfile(tempfile);
	1357	if (trackno < 0 \|\| trackno > 80) {
[1107]	1358	mr_msg(1, "Weird track#");
[128]	1359	continue;
	1360	}
	1361	percentage = trackno * 100 / maxtracks;
	1362	if (trackno <= 5 && last_trkno > 40) {
	1363	close_evalcall_form();
	1364	strcpy(title, "Verifying format");
	1365	open_evalcall_form(title);
	1366	}
	1367	last_trkno = trackno;
	1368	update_evalcall_form(percentage);
	1369	}
	1370	close_evalcall_form();
	1371	if (pclose(pin)) {
	1372	res++;
	1373	log_OS_error("Unable to pclose");
	1374	}
	1375	unlink(tempfile);
[1080]	1376	mr_free(tempfile);
[128]	1377	return (res);
[1]	1378	}
	1379
[1118]	1380
[1]	1381	/**
	1382	* Wrapper around @c format_disk_SUB().
	1383	* This function calls @c format_disk_SUB() with a @c device of its @c device
	1384	* parameter and a @c title of Formatting disk @c device. If the format
	1385	* fails, the user will be given the option of retrying.
	1386	*
	1387	* @param device The floppy drive to write to.
	1388	* @see format_disk_SUB
	1389	* @return The exit code of fdformat/superformat.
	1390	* @ingroup deviceGroup
	1391	*/
[128]	1392	int format_disk(char *device)
[1]	1393	{
	1394
[128]	1395	/@ int ************************************************************* */
	1396	int res = 0;
[1]	1397
[128]	1398	/@ buffer ********************************************************** */
	1399	char *command;
	1400	char *title;
	1401
[1118]	1402	assert_string_is_neither_NULL_nor_zerolength(device);
[128]	1403
	1404	if (!system("which superformat > /dev/null 2> /dev/null")) {
[1118]	1405	mr_asprintf(&command, "superformat %s", device);
[128]	1406	} else {
[1]	1407	#ifdef __FreeBSD__
[1118]	1408	mr_asprintf(&command, "fdformat -y %s", device);
[1]	1409	#else
[1118]	1410	mr_asprintf(&command, "fdformat %s", device);
[1]	1411	#endif
	1412	}
[1118]	1413	mr_asprintf(&title, "Formatting disk %s", device);
[128]	1414	while ((res = format_disk_SUB(command, title))) {
	1415	if (!ask_me_yes_or_no("Failed to format disk. Retry?")) {
	1416	return (res);
	1417	}
	1418	}
[1080]	1419	mr_free(title);
	1420	mr_free(command);
[128]	1421	return (res);
[1]	1422	}
	1423
[1118]	1424
[1]	1425	/**
	1426	* Get the <tt>N</tt>th bit of @c array.
	1427	* @param array The bit-array (as a @c char pointer).
	1428	* @param N The number of the bit you want.
	1429	* @return TRUE (bit is set) or FALSE (bit is not set).
	1430	* @see set_bit_N_of_array
	1431	* @ingroup utilityGroup
	1432	*/
[128]	1433	bool get_bit_N_of_array(char *array, int N)
[1]	1434	{
[128]	1435	int element_number;
	1436	int bit_number;
	1437	int mask;
	1438
	1439	element_number = N / 8;
	1440	bit_number = N % 8;
	1441	mask = 1 << bit_number;
	1442	if (array[element_number] & mask) {
	1443	return (TRUE);
	1444	} else {
	1445	return (FALSE);
	1446	}
[1]	1447	}
	1448
	1449
	1450	/**
	1451	* @addtogroup LLarchiveGroup
	1452	* @{
	1453	*/
	1454	/**
	1455	* Start up threads to archive your files.
	1456	*
	1457	* This function starts @c ARCH_THREADS threads,
	1458	* each starting execution in @c create_afio_files_in_background().
	1459	* Each thread will archive individual filesets, based on the
	1460	* pointers passed to it and continually updated, until all files
	1461	* have been backed up. This function coordinates the threads
	1462	* and copies their output to the @c scratchdir.
	1463	*
	1464	* @param bkpinfo The backup information structure. Fields used:
	1465	* - @c backup_media_type
	1466	* - @c scratchdir
	1467	* - @c tmpdir
	1468	* - @c zip_suffix
	1469	*
	1470	* @return The number of errors encountered (0 for success)
	1471	*/
[541]	1472	int make_afioballs_and_images(struct s_bkpinfo *bkpinfo)
[1]	1473	{
	1474
[128]	1475	/@ int ************************************************* */
	1476	int retval = 0;
	1477	long int storing_set_no = 0;
	1478	int res = 0;
	1479	bool done_storing = FALSE;
	1480	char *result_str;
	1481	char *transfer_block;
	1482	void *vp;
	1483	void **pvp;
[1]	1484
[128]	1485	/@ buffers ********************************************* */
	1486	char *storing_filelist_fname;
	1487	char *storing_afioball_fname;
	1488	char *tmp;
	1489	char *media_usage_comment;
	1490	pthread_t archival_thread[ARCH_THREADS];
	1491	char *p_list_of_fileset_flags;
	1492	int *p_archival_threads_running;
	1493	int *p_last_set_archived;
	1494	int *p_next_set_to_archive;
	1495	int noof_threads;
	1496	int i;
[948]	1497	char *curr_xattr_list_fname = NULL;
[128]	1498	char *curr_acl_list_fname;
	1499	int misc_counter_that_is_not_important = 0;
[1]	1500
[1107]	1501	mr_msg(8, "here");
[128]	1502	assert(bkpinfo != NULL);
[1080]	1503	tmp = mr_malloc(MAX_STR_LEN * 2);
[128]	1504	malloc_string(result_str);
	1505	malloc_string(curr_xattr_list_fname);
	1506	malloc_string(curr_acl_list_fname);
	1507	malloc_string(storing_filelist_fname);
	1508	malloc_string(media_usage_comment);
	1509	malloc_string(storing_afioball_fname);
	1510	transfer_block =
[1080]	1511	mr_malloc(sizeof(struct s_bkpinfo) + BKPINFO_LOC_OFFSET + 64);
[128]	1512	memset((void *) transfer_block, 0,
	1513	sizeof(struct s_bkpinfo) + BKPINFO_LOC_OFFSET + 64);
	1514	p_last_set_archived = (int *) transfer_block;
	1515	p_archival_threads_running = (int *) (transfer_block + 4);
	1516	p_next_set_to_archive = (int *) (transfer_block + 8);
	1517	p_list_of_fileset_flags = (char *) (transfer_block + 12);
	1518	memcpy((void *) (transfer_block + BKPINFO_LOC_OFFSET),
	1519	(void *) bkpinfo, sizeof(struct s_bkpinfo));
	1520	pvp = &vp;
	1521	vp = (void *) result_str;
	1522	*p_archival_threads_running = 0;
	1523	*p_last_set_archived = -1;
	1524	*p_next_set_to_archive = 0;
	1525	sprintf(tmp, "%s/archives/filelist.full", bkpinfo->scratchdir);
	1526	log_to_screen("Archiving regular files");
[1107]	1527	mr_msg(5, "Go, Shorty. It's your birthday.");
[1118]	1528	open_progress_form(_("Backing up filesystem"),
	1529	_("I am backing up your live filesystem now."),
	1530	_("Please wait. This may take a couple of hours."),
	1531	_("Working..."),
[128]	1532	get_last_filelist_number(bkpinfo) + 1);
[1]	1533
[1107]	1534	mr_msg(5, "We're gonna party like it's your birthday.");
[1]	1535
[128]	1536	srand((unsigned int) getpid());
	1537	g_sem_key = 1234 + random() % 30000;
	1538	if ((g_sem_id =
	1539	semget((key_t) g_sem_key, 1,
	1540	IPC_CREAT \| S_IREAD \| S_IWRITE)) == -1) {
	1541	fatal_error("MABAI - unable to semget");
[1]	1542	}
[128]	1543	if (!set_semvalue()) {
	1544	fatal_error("Unable to init semaphore");
	1545	} // initialize semaphore
	1546	for (noof_threads = 0; noof_threads < ARCH_THREADS; noof_threads++) {
[1107]	1547	mr_msg(8, "Creating thread #%d", noof_threads);
[128]	1548	(*p_archival_threads_running)++;
	1549	if ((res =
	1550	pthread_create(&archival_thread[noof_threads], NULL,
	1551	create_afio_files_in_background,
	1552	(void *) transfer_block))) {
	1553	fatal_error("Unable to create an archival thread");
	1554	}
[1]	1555	}
	1556
[1107]	1557	mr_msg(8, "About to enter while() loop");
[128]	1558	while (!done_storing) {
	1559	if (g_exiting) {
	1560	fatal_error("Execution run aborted (main loop)");
	1561	}
	1562	if (*p_archival_threads_running == 0
	1563	&& *p_last_set_archived == storing_set_no - 1) {
[1107]	1564	mr_msg(2,
[128]	1565	"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... :-)",
	1566	*p_last_set_archived, storing_set_no);
	1567	done_storing = TRUE;
	1568	} else
	1569	if (!get_bit_N_of_array
	1570	(p_list_of_fileset_flags, storing_set_no)) {
	1571	misc_counter_that_is_not_important =
	1572	(misc_counter_that_is_not_important + 1) % 5;
	1573	if (!misc_counter_that_is_not_important) {
	1574	update_progress_form(media_usage_comment);
	1575	}
	1576	sleep(1);
[1118]	1577	} else {
[128]	1578	// store set N
	1579	sprintf(storing_filelist_fname, FILELIST_FNAME_RAW_SZ,
	1580	bkpinfo->tmpdir, storing_set_no);
	1581	sprintf(storing_afioball_fname, AFIOBALL_FNAME_RAW_SZ,
	1582	bkpinfo->tmpdir, storing_set_no, bkpinfo->zip_suffix);
[948]	1583	if (g_getfattr) {
	1584	sprintf(curr_xattr_list_fname, XATTR_LIST_FNAME_RAW_SZ,
[128]	1585	bkpinfo->tmpdir, storing_set_no);
[948]	1586	}
	1587	if (g_getfacl) {
	1588	sprintf(curr_acl_list_fname, ACL_LIST_FNAME_RAW_SZ,
[128]	1589	bkpinfo->tmpdir, storing_set_no);
[948]	1590	}
[128]	1591
[1107]	1592	mr_msg(2, "Storing set %d", storing_set_no);
[128]	1593	while (!does_file_exist(storing_filelist_fname)
	1594	\|\| !does_file_exist(storing_afioball_fname)) {
[1107]	1595	mr_msg(2,
[128]	1596	"Warning - either %s or %s doesn't exist yet. I'll pause 5 secs.",
	1597	storing_filelist_fname, storing_afioball_fname);
	1598	sleep(5);
	1599	}
	1600	strcpy(media_usage_comment,
	1601	percent_media_full_comment(bkpinfo));
	1602	/* copy to CD (scratchdir) ... and an actual CD-R if necessary */
	1603	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	1604	register_in_tape_catalog(fileset, storing_set_no, -1,
	1605	storing_afioball_fname);
	1606	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	1607	storing_afioball_fname);
	1608	iamhere("Writing EXAT files");
[1118]	1609	res += write_EXAT_files_to_tape(bkpinfo,
	1610	curr_xattr_list_fname,
	1611	curr_acl_list_fname);
	1612	// archives themselves
[128]	1613	res +=
	1614	move_files_to_stream(bkpinfo, storing_afioball_fname,
	1615	NULL);
	1616	} else {
[948]	1617	if (g_getfacl) {
	1618	if (g_getfattr) {
	1619	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
[128]	1620	curr_xattr_list_fname,
	1621	curr_acl_list_fname,
	1622	storing_afioball_fname, NULL);
[948]	1623	} else {
	1624	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1625	curr_acl_list_fname,
	1626	storing_afioball_fname, NULL);
	1627	}
	1628	} else {
	1629	if (g_getfattr) {
	1630	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1631	curr_xattr_list_fname,
	1632	storing_afioball_fname, NULL);
	1633	} else {
	1634	res = move_files_to_cd(bkpinfo, storing_filelist_fname,
	1635	storing_afioball_fname, NULL);
	1636	}
	1637	}
[128]	1638	}
	1639	retval += res;
	1640	g_current_progress++;
	1641	update_progress_form(media_usage_comment);
	1642	if (res) {
	1643	sprintf(tmp,
	1644	"Failed to add archive %ld's files to CD dir\n",
	1645	storing_set_no);
	1646	log_to_screen(tmp);
	1647	fatal_error
	1648	("Is your hard disk full? If not, please send the author the logfile.");
	1649	}
	1650	storing_set_no++;
	1651	// sleep(2);
[1]	1652	}
	1653	}
[128]	1654	close_progress_form();
[1]	1655
[128]	1656	sprintf(tmp, "Your regular files have been archived ");
[1107]	1657	mr_msg(2, "Joining background threads to foreground thread");
[128]	1658	for (i = 0; i < noof_threads; i++) {
	1659	pthread_join(archival_thread[i], pvp);
[1107]	1660	mr_msg(3, "Thread %d of %d: closed OK", i + 1, noof_threads);
[128]	1661	}
	1662	del_semvalue();
[1107]	1663	mr_msg(2, "Done.");
[128]	1664	if (retval) {
	1665	strcat(tmp, "(with errors).");
	1666	} else {
	1667	strcat(tmp, "successfully.");
	1668	}
	1669	log_to_screen(tmp);
[1080]	1670	mr_free(transfer_block);
	1671	mr_free(result_str);
	1672	mr_free(storing_filelist_fname);
	1673	mr_free(media_usage_comment);
	1674	mr_free(storing_afioball_fname);
	1675	mr_free(curr_xattr_list_fname);
	1676	mr_free(curr_acl_list_fname);
[128]	1677	return (retval);
[1]	1678	}
	1679
	1680
[128]	1681	void pause_for_N_seconds(int how_long, char *msg)
[1]	1682	{
[128]	1683	int i;
	1684	open_evalcall_form(msg);
	1685	for (i = 0; i < how_long; i++) {
	1686	update_evalcall_form((int) ((100.0 / (float) (how_long) * i)));
	1687	sleep(1);
	1688	}
	1689	close_evalcall_form();
[1]	1690	}
	1691
	1692
	1693
	1694
	1695	/**
	1696	* Create an ISO image in @c destfile, from files in @c bkpinfo->scratchdir.
	1697	*
	1698	* @param bkpinfo The backup information structure. Fields used:
	1699	* - @c backup_media_type
	1700	* - @c call_after_iso
	1701	* - @c call_before_iso
	1702	* - @c call_burn_iso
	1703	* - @c call_make_iso
	1704	* - @c make_cd_use_lilo
	1705	* - @c manual_cd_tray
	1706	* - @c nonbootable_backup
	1707	* - @c scratchdir
	1708	*
	1709	* @param destfile Where to put the generated ISO image.
	1710	* @return The number of errors encountered (0 for success)
	1711	*/
[541]	1712	int make_iso_fs(struct s_bkpinfo bkpinfo, char destfile)
[1]	1713	{
[128]	1714	/@ int ********************************************* */
	1715	int retval = 0;
	1716	int res;
[1]	1717
[128]	1718	/@ buffers ***************************************** */
	1719	char *tmp;
	1720	char *old_pwd;
	1721	char *result_sz;
	1722	char *message_to_screen;
	1723	char *sz_blank_disk;
	1724	char *fnam;
	1725	char *tmp2;
	1726	char *tmp3;
	1727	bool cd_is_mountable;
[1]	1728
[128]	1729	malloc_string(old_pwd);
	1730	malloc_string(result_sz);
	1731	malloc_string(message_to_screen);
	1732	malloc_string(sz_blank_disk);
	1733	malloc_string(fnam);
[1080]	1734	tmp = mr_malloc(1200);
	1735	tmp2 = mr_malloc(1200);
	1736	tmp3 = mr_malloc(1200);
[128]	1737	assert(bkpinfo != NULL);
	1738	assert_string_is_neither_NULL_nor_zerolength(destfile);
[1]	1739
[128]	1740	sprintf(tmp, "%s/isolinux.bin", bkpinfo->scratchdir);
	1741	sprintf(tmp2, "%s/isolinux.bin", bkpinfo->tmpdir);
	1742	if (does_file_exist(tmp)) {
	1743	sprintf(tmp3, "cp -f %s %s", tmp, tmp2);
	1744	paranoid_system(tmp3);
[1]	1745	}
[128]	1746	if (!does_file_exist(tmp) && does_file_exist(tmp2)) {
	1747	sprintf(tmp3, "cp -f %s %s", tmp2, tmp);
	1748	paranoid_system(tmp3);
[1]	1749	}
[128]	1750	/*
	1751	if (!does_file_exist(tmp))
	1752	{
[1107]	1753	mr_msg (2, "Silly bug in Mindi.pl; workaround in progress...");
[128]	1754	strcpy(fnam, call_program_and_get_last_line_of_output("locate isolinux.bin \| tail -n1"));
	1755	if (strlen(fnam)>0 && does_file_exist(fnam))
	1756	{
	1757	sprintf(tmp, "cp -f %s %s", fnam, bkpinfo->scratchdir);
	1758	res = run_program_and_log_output(tmp, FALSE);
	1759	}
	1760	else
	1761	{
	1762	res = 1;
	1763	}
	1764	if (res)
	1765	{
[1107]	1766	mr_msg (2, "Could not work around silly bug in Mindi.pl - sorry! Isolinux.bin missing");
[128]	1767	}
	1768	}
	1769	*/
[1080]	1770	mr_free(tmp2);
	1771	mr_free(tmp3);
[128]	1772	if (bkpinfo->backup_media_type == iso && bkpinfo->manual_cd_tray) {
[541]	1773	popup_and_OK("Please insert new media and press Enter.");
[128]	1774	}
[1]	1775
[1107]	1776	mr_msg(2, "make_iso_fs --- scratchdir=%s --- destfile=%s",
[128]	1777	bkpinfo->scratchdir, destfile);
	1778	(void) getcwd(old_pwd, MAX_STR_LEN - 1);
	1779	sprintf(tmp, "chmod 744 %s", bkpinfo->scratchdir);
	1780	run_program_and_log_output(tmp, FALSE);
	1781	chdir(bkpinfo->scratchdir);
[1]	1782
[128]	1783	if (bkpinfo->call_before_iso[0] != '\0') {
	1784	sprintf(message_to_screen, "Running pre-ISO call for CD#%d",
	1785	g_current_media_number);
	1786	res =
	1787	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_before_iso,
	1788	destfile, g_current_media_number,
	1789	MONDO_LOGFILE, message_to_screen);
	1790	if (res) {
	1791	strcat(message_to_screen, "...failed");
	1792	} else {
	1793	strcat(message_to_screen, "...OK");
	1794	}
	1795	log_to_screen(message_to_screen);
	1796	retval += res;
[1]	1797	}
	1798
[128]	1799	if (bkpinfo->call_make_iso[0] != '\0') {
[1107]	1800	mr_msg(2, "bkpinfo->call_make_iso = %s", bkpinfo->call_make_iso);
[128]	1801	sprintf(tmp, "%s/archives/NOT-THE-LAST", bkpinfo->scratchdir);
	1802	sprintf(message_to_screen, "Making an ISO (%s #%d)",
	1803	media_descriptor_string(bkpinfo->backup_media_type),
	1804	g_current_media_number);
[1]	1805
[128]	1806	pause_and_ask_for_cdr(2, &cd_is_mountable); /* if g_current_media_number >= 2 then pause & ask */
	1807	if (retval) {
	1808	log_to_screen
	1809	("Serious error(s) occurred already. I shan't try to write to media.");
	1810	} else {
	1811	res =
	1812	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_make_iso,
	1813	bkpinfo->scratchdir,
	1814	g_current_media_number,
	1815	MONDO_LOGFILE, message_to_screen);
	1816	if (res) {
	1817	log_to_screen("%s...failed to write", message_to_screen);
	1818	} else {
	1819	log_to_screen("%s...OK", message_to_screen);
	1820	if (!run_program_and_log_output
[681]	1821	("tail -n10 /var/log/mondo-archive.log \| grep -F ':-('",
[128]	1822	1)) {
	1823	log_to_screen
	1824	("Despite nonfatal errors, growisofs confirms the write was successful.");
	1825	}
	1826	}
	1827	retval += res;
[1]	1828	#ifdef DVDRWFORMAT
[128]	1829	sprintf(tmp,
	1830	"tail -n8 %s \| grep 'blank=full.dvd-compat.DAO'",
	1831	MONDO_LOGFILE);
	1832	if (g_backup_media_type == dvd
	1833	&& (res \|\| !run_program_and_log_output(tmp, 1))) {
	1834	log_to_screen
	1835	("Failed to write to disk. I shall blank it and then try again.");
	1836	sleep(5);
	1837	system("sync");
	1838	pause_for_N_seconds(5, "Letting DVD drive settle");
[1]	1839
	1840	// dvd+rw-format --- OPTION 2
[128]	1841	if (!bkpinfo->please_dont_eject) {
	1842	log_to_screen("Ejecting media to clear drive status.");
	1843	eject_device(bkpinfo->media_device);
	1844	inject_device(bkpinfo->media_device);
	1845	}
	1846	pause_for_N_seconds(5, "Letting DVD drive settle");
[908]	1847	sprintf(sz_blank_disk, "dvd+rw-format -force %s",
[128]	1848	bkpinfo->media_device);
[1107]	1849	mr_msg(3, "sz_blank_disk = '%s'", sz_blank_disk);
[128]	1850	res =
	1851	run_external_binary_with_percentage_indicator_NEW
	1852	("Blanking DVD disk", sz_blank_disk);
	1853	if (res) {
	1854	log_to_screen
	1855	("Warning - format failed. (Was it a DVD-R?) Sleeping for 5 seconds to take a breath...");
	1856	pause_for_N_seconds(5,
	1857	"Letting DVD drive settle... and trying again.");
	1858	res =
	1859	run_external_binary_with_percentage_indicator_NEW
	1860	("Blanking DVD disk", sz_blank_disk);
	1861	if (res) {
	1862	log_to_screen("Format failed a second time.");
	1863	}
	1864	} else {
	1865	log_to_screen
	1866	("Format succeeded. Sleeping for 5 seconds to take a breath...");
	1867	}
	1868	pause_for_N_seconds(5, "Letting DVD drive settle");
	1869	if (!bkpinfo->please_dont_eject) {
	1870	log_to_screen("Ejecting media to clear drive status.");
	1871	eject_device(bkpinfo->media_device);
	1872	inject_device(bkpinfo->media_device);
	1873	}
	1874	pause_for_N_seconds(5, "Letting DVD drive settle");
	1875	res =
	1876	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_make_iso,
	1877	bkpinfo->scratchdir,
	1878	g_current_media_number,
	1879	MONDO_LOGFILE,
	1880	message_to_screen);
	1881	retval += res;
	1882	if (!bkpinfo->please_dont_eject) {
	1883	log_to_screen("Ejecting media.");
	1884	eject_device(bkpinfo->media_device);
	1885	}
	1886	if (res) {
	1887	log_to_screen("Dagnabbit. It still failed.");
	1888	} else {
	1889	log_to_screen
	1890	("OK, this time I successfully backed up to DVD.");
	1891	}
	1892	}
	1893	#endif
	1894	if (g_backup_media_type == dvd && !bkpinfo->please_dont_eject) {
	1895	eject_device(bkpinfo->media_device);
	1896	}
[1]	1897	}
[128]	1898	} else {
	1899	sprintf(message_to_screen, "Running mkisofs to make %s #%d",
	1900	media_descriptor_string(bkpinfo->backup_media_type),
	1901	g_current_media_number);
[1107]	1902	mr_msg(1, message_to_screen);
[128]	1903	sprintf(result_sz, "Call to mkisofs to make ISO (%s #%d) ",
	1904	media_descriptor_string(bkpinfo->backup_media_type),
	1905	g_current_media_number);
	1906	if (bkpinfo->nonbootable_backup) {
[1107]	1907	mr_msg(1, "Making nonbootable backup");
[128]	1908	res =
	1909	eval_call_to_make_ISO(bkpinfo,
[906]	1910	"mkisofs -o '_ISO_' -r -p MondoRescue -publisher www.mondorescue.org -A MondoRescue_GPL -V _CD#_ .",
[128]	1911	destfile, g_current_media_number,
	1912	MONDO_LOGFILE, message_to_screen);
	1913	} else {
[1107]	1914	mr_msg(1, "Making bootable backup");
[1]	1915
	1916	#ifdef __FreeBSD__
[128]	1917	bkpinfo->make_cd_use_lilo = TRUE;
[1]	1918	#endif
	1919
	1920
[1107]	1921	mr_msg(1, "make_cd_use_lilo is actually %d",
[128]	1922	bkpinfo->make_cd_use_lilo);
	1923	if (bkpinfo->make_cd_use_lilo) {
[1107]	1924	mr_msg(1, "make_cd_use_lilo = TRUE");
[1]	1925	// FIXME --- change mkisofs string to MONDO_MKISOFS_REGULAR_SYSLINUX/LILO depending on bkpinfo->make_cd_usE_lilo
	1926	// and add ' .' at end
	1927	#ifdef __IA64__
[1107]	1928	mr_msg(1, "IA64 --> elilo");
[128]	1929	res = eval_call_to_make_ISO(bkpinfo,
	1930	//-b images/mindi-boot.2880.img
[541]	1931	"mkisofs -no-emul-boot -b images/mindi-bootroot."
	1932	IA64_BOOT_SIZE
[906]	1933	".img -c boot.cat -o '_ISO_' -J -r -p MondoRescue -publisher www.mondorescue.org -A Mondo_Rescue_GPL -V _CD#_ .",
[128]	1934	destfile,
	1935	g_current_media_number,
	1936	MONDO_LOGFILE,
	1937	message_to_screen);
[1]	1938	#else
	1939	// FIXME --- change mkisofs string to MONDO_MKISOFS_REGULAR_SYSLINUX/LILO depending on bkpinfo->make_cd_usE_lilo
	1940	// and add ' .' at end
[1107]	1941	mr_msg(1, "Non-ia64 --> lilo");
[128]	1942	res =
	1943	eval_call_to_make_ISO(bkpinfo,
[906]	1944	"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]	1945	destfile, g_current_media_number,
	1946	MONDO_LOGFILE,
	1947	message_to_screen);
[1]	1948	#endif
[128]	1949	} else {
[1107]	1950	mr_msg(1, "make_cd_use_lilo = FALSE");
	1951	mr_msg(1, "Isolinux");
[128]	1952	res =
	1953	eval_call_to_make_ISO(bkpinfo,
[906]	1954	"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]	1955	destfile, g_current_media_number,
	1956	MONDO_LOGFILE,
	1957	message_to_screen);
	1958	}
	1959	}
	1960	if (res) {
	1961	strcat(result_sz, "...failed");
	1962	} else {
	1963	strcat(result_sz, "...OK");
	1964	}
	1965	log_to_screen(result_sz);
	1966	retval += res;
[1]	1967	}
[128]	1968
	1969	if (bkpinfo->backup_media_type == cdr
	1970	\|\| bkpinfo->backup_media_type == cdrw) {
	1971	if (is_this_device_mounted(bkpinfo->media_device)) {
[1107]	1972	mr_msg(2,
[128]	1973	"Warning - %s mounted. I'm unmounting it before I burn to it.",
	1974	bkpinfo->media_device);
	1975	sprintf(tmp, "umount %s", bkpinfo->media_device);
	1976	run_program_and_log_output(tmp, FALSE);
	1977	}
[1]	1978	}
	1979
[128]	1980	if (bkpinfo->call_burn_iso[0] != '\0') {
[1107]	1981	mr_msg(2, "bkpinfo->call_burn_iso = %s", bkpinfo->call_burn_iso);
[128]	1982	sprintf(message_to_screen, "Burning %s #%d",
	1983	media_descriptor_string(bkpinfo->backup_media_type),
	1984	g_current_media_number);
	1985	pause_and_ask_for_cdr(2, &cd_is_mountable);
	1986	res =
	1987	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_burn_iso,
	1988	destfile, g_current_media_number,
	1989	MONDO_LOGFILE, message_to_screen);
	1990	if (res) {
	1991	strcat(message_to_screen, "...failed");
	1992	} else {
	1993	strcat(message_to_screen, "...OK");
	1994	}
	1995	log_to_screen(message_to_screen);
	1996	retval += res;
	1997	}
[1]	1998
[128]	1999	if (bkpinfo->call_after_iso[0] != '\0') {
	2000	sprintf(message_to_screen, "Running post-ISO call (%s #%d)",
	2001	media_descriptor_string(bkpinfo->backup_media_type),
	2002	g_current_media_number);
	2003	res =
	2004	eval_call_to_make_ISO(bkpinfo, bkpinfo->call_after_iso,
	2005	destfile, g_current_media_number,
	2006	MONDO_LOGFILE, message_to_screen);
	2007	if (res) {
	2008	strcat(message_to_screen, "...failed");
	2009	} else {
	2010	strcat(message_to_screen, "...OK");
	2011	}
	2012	log_to_screen(message_to_screen);
	2013	retval += res;
[1]	2014	}
	2015
[128]	2016	chdir(old_pwd);
	2017	if (retval) {
[1107]	2018	mr_msg(1, "WARNING - make_iso_fs returned an error");
[1]	2019	}
[1080]	2020	mr_free(old_pwd);
	2021	mr_free(result_sz);
	2022	mr_free(message_to_screen);
	2023	mr_free(sz_blank_disk);
	2024	mr_free(fnam);
	2025	mr_free(tmp);
[128]	2026	return (retval);
[1]	2027	}
	2028
	2029
	2030
	2031
	2032
	2033
	2034
	2035
	2036
	2037	bool is_dev_an_NTFS_dev(char *bigfile_fname)
	2038	{
[128]	2039	char *tmp;
	2040	char *command;
	2041	malloc_string(tmp);
	2042	malloc_string(command);
	2043	sprintf(command,
	2044	"dd if=%s bs=512 count=1 2> /dev/null \| strings \| head -n1",
	2045	bigfile_fname);
[1107]	2046	mr_msg(1, "command = '%s'", command);
[128]	2047	strcpy(tmp, call_program_and_get_last_line_of_output(command));
[1107]	2048	mr_msg(1, "--> tmp = '%s'", tmp);
[128]	2049	if (strstr(tmp, "NTFS")) {
	2050	iamhere("TRUE");
	2051	return (TRUE);
	2052	} else {
	2053	iamhere("FALSE");
	2054	return (FALSE);
	2055	}
[1]	2056	}
	2057
	2058
	2059	/**
	2060	* Back up big files by chopping them up.
	2061	* This function backs up all "big" files (where "big" depends
	2062	* on your backup media) in "chunks" (whose size again depends
	2063	* on your media).
	2064	*
	2065	* @param bkpinfo The backup information structure. Fields used:
	2066	* - @c backup_media_type
	2067	* - @c optimal_set_size
	2068	* @param biggielist_fname The path to a file containing a list of
	2069	* all "big" files.
	2070	* @return The number of errors encountered (0 for success)
	2071	* @see slice_up_file_etc
	2072	*/
	2073	int
[541]	2074	make_slices_and_images(struct s_bkpinfo bkpinfo, char biggielist_fname)
[1]	2075	{
	2076
[128]	2077	/@ pointers ****************************************** */
	2078	FILE *fin;
	2079	char *p;
[1]	2080
[128]	2081	/@ buffers ******************************************* */
	2082	char *tmp;
	2083	char *bigfile_fname;
	2084	char *sz_devfile;
[296]	2085	char *ntfsprog_fifo = NULL;
[128]	2086	/@ long ********************************************** */
	2087	long biggie_file_number = 0;
	2088	long noof_biggie_files = 0;
	2089	long estimated_total_noof_slices = 0;
[1]	2090
[128]	2091	/@ int *********************************************** */
	2092	int retval = 0;
	2093	int res = 0;
	2094	pid_t pid;
	2095	FILE *ftmp = NULL;
	2096	bool delete_when_done;
[296]	2097	bool use_ntfsprog;
[684]	2098	off_t biggie_fsize;
[1]	2099
[128]	2100	assert(bkpinfo != NULL);
	2101	assert_string_is_neither_NULL_nor_zerolength(biggielist_fname);
[1]	2102
[128]	2103	malloc_string(tmp);
	2104	malloc_string(bigfile_fname);
	2105	malloc_string(sz_devfile);
	2106	estimated_total_noof_slices =
	2107	size_of_all_biggiefiles_K(bkpinfo) / bkpinfo->optimal_set_size + 1;
[1]	2108
[1107]	2109	mr_msg(1, "size of all biggiefiles = %ld",
[128]	2110	size_of_all_biggiefiles_K(bkpinfo));
[1107]	2111	mr_msg(1, "estimated_total_noof_slices = %ld KB / %ld KB = %ld",
[128]	2112	size_of_all_biggiefiles_K(bkpinfo), bkpinfo->optimal_set_size,
	2113	estimated_total_noof_slices);
[1]	2114
[128]	2115	if (length_of_file(biggielist_fname) < 6) {
[1107]	2116	mr_msg(1, "No biggiefiles; fair enough...");
[128]	2117	return (0);
[1]	2118	}
[128]	2119	sprintf(tmp, "I am now backing up all large files.");
	2120	log_to_screen(tmp);
	2121	noof_biggie_files = count_lines_in_file(biggielist_fname);
	2122	open_progress_form("Backing up big files", tmp,
	2123	"Please wait. This may take some time.", "",
	2124	estimated_total_noof_slices);
	2125	if (!(fin = fopen(biggielist_fname, "r"))) {
	2126	log_OS_error("Unable to openin biggielist");
	2127	return (1);
[1]	2128	}
[128]	2129	for (fgets(bigfile_fname, MAX_STR_LEN, fin); !feof(fin);
	2130	fgets(bigfile_fname, MAX_STR_LEN, fin), biggie_file_number++) {
[296]	2131	use_ntfsprog = FALSE;
[128]	2132	if (bigfile_fname[strlen(bigfile_fname) - 1] < 32) {
	2133	bigfile_fname[strlen(bigfile_fname) - 1] = '\0';
	2134	}
	2135	biggie_fsize = length_of_file(bigfile_fname);
	2136	delete_when_done = FALSE;
	2137
	2138	if (!does_file_exist(bigfile_fname)) {
	2139	ftmp = fopen(bigfile_fname, "w");
	2140	paranoid_fclose(ftmp);
	2141	sprintf(tmp, "bigfile %s was deleted - creating a dummy",
	2142	bigfile_fname);
	2143	delete_when_done = TRUE;
	2144	} else {
[812]	2145	// Call ntfsclone (formerly partimagehack) if it's a /dev entry
	2146	// (i.e. a partition to be imaged)
[1107]	2147	mr_msg(2, "bigfile_fname = %s", bigfile_fname);
[296]	2148	use_ntfsprog = FALSE;
[128]	2149	if (!strncmp(bigfile_fname, "/dev/", 5)
	2150	&& is_dev_an_NTFS_dev(bigfile_fname)) {
[296]	2151	use_ntfsprog = TRUE;
[1107]	2152	mr_msg(2,
[296]	2153	"Calling ntfsclone in background because %s is an NTFS partition",
[128]	2154	bigfile_fname);
[812]	2155	sprintf(sz_devfile, "%s/%d.%d.000",
	2156	bkpinfo->tmpdir,
[128]	2157	(int) (random() % 32768),
	2158	(int) (random() % 32768));
	2159	mkfifo(sz_devfile, 0x770);
[296]	2160	ntfsprog_fifo = sz_devfile;
[128]	2161	switch (pid = fork()) {
	2162	case -1:
	2163	fatal_error("Fork failure");
	2164	case 0:
[1107]	2165	mr_msg(2,
[296]	2166	"CHILD - fip - calling feed_into_ntfsprog(%s, %s)",
[128]	2167	bigfile_fname, sz_devfile);
[296]	2168	res = feed_into_ntfsprog(bigfile_fname, sz_devfile);
[128]	2169	exit(res);
	2170	break;
	2171	default:
[1107]	2172	mr_msg(2,
[296]	2173	"feed_into_ntfsprog() called in background --- pid=%ld",
[128]	2174	(long int) (pid));
	2175	}
	2176	}
[1]	2177	// Otherwise, use good old 'dd' and 'bzip2'
[128]	2178	else {
	2179	sz_devfile[0] = '\0';
[296]	2180	ntfsprog_fifo = NULL;
[128]	2181	}
[1]	2182
	2183	// Whether partition or biggiefile, just do your thang :-)
[128]	2184	sprintf(tmp, "Bigfile #%ld is '%s' (%ld KB)",
	2185	biggie_file_number + 1, bigfile_fname,
	2186	(long) biggie_fsize >> 10);
	2187	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2188	write_header_block_to_stream(biggie_fsize, bigfile_fname,
[296]	2189	use_ntfsprog ?
[128]	2190	BLK_START_A_PIHBIGGIE :
	2191	BLK_START_A_NORMBIGGIE);
	2192	}
	2193	res =
[541]	2194	slice_up_file_etc(bkpinfo, bigfile_fname,
[296]	2195	ntfsprog_fifo, biggie_file_number,
	2196	noof_biggie_files, use_ntfsprog);
[128]	2197	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2198	write_header_block_to_stream((off_t)0,
[128]	2199	calc_checksum_of_file
	2200	(bigfile_fname),
	2201	BLK_STOP_A_BIGGIE);
	2202	}
	2203	retval += res;
	2204	p = strrchr(bigfile_fname, '/');
	2205	if (p) {
	2206	p++;
	2207	} else {
	2208	p = bigfile_fname;
	2209	}
	2210	sprintf(tmp, "Archiving %s ... ", bigfile_fname);
	2211	if (res) {
	2212	strcat(tmp, "Failed!");
	2213	} else {
	2214	strcat(tmp, "OK");
	2215	}
	2216	if (delete_when_done) {
	2217	unlink(bigfile_fname);
	2218	delete_when_done = FALSE;
	2219	}
	2220	}
[1]	2221	#ifndef _XWIN
[128]	2222	if (!g_text_mode) {
	2223	newtDrawRootText(0, g_noof_rows - 2, tmp);
	2224	newtRefresh();
	2225	}
[1]	2226	#endif
[128]	2227	}
[1107]	2228	mr_msg(1, "Finished backing up bigfiles");
	2229	mr_msg(1, "estimated slices = %ld; actual slices = %ld",
[128]	2230	estimated_total_noof_slices, g_current_progress);
	2231	close_progress_form();
	2232	paranoid_fclose(fin);
[1080]	2233	mr_free(tmp);
	2234	mr_free(bigfile_fname);
	2235	mr_free(sz_devfile);
[128]	2236	return (retval);
[1]	2237	}
	2238
	2239
	2240
	2241
	2242	/**
	2243	* Single-threaded version of @c make_afioballs_and_images().
	2244	* @see make_afioballs_and_images
	2245	*/
[541]	2246	int make_afioballs_and_images_OLD(struct s_bkpinfo *bkpinfo)
[1]	2247	{
	2248
[128]	2249	/@ int ************************************************* */
	2250	int retval = 0;
	2251	long int curr_set_no = 0;
	2252	int res = 0;
[1]	2253
[128]	2254	/@ buffers ********************************************* */
	2255	char *curr_filelist_fname;
	2256	char *curr_afioball_fname;
	2257	char *curr_xattr_list_fname;
	2258	char *curr_acl_list_fname;
	2259	char *tmp;
	2260	char *media_usage_comment;
[1]	2261
[128]	2262	malloc_string(curr_afioball_fname);
	2263	malloc_string(media_usage_comment);
	2264	malloc_string(curr_filelist_fname);
	2265	malloc_string(curr_xattr_list_fname);
	2266	malloc_string(curr_acl_list_fname);
[1]	2267
[1080]	2268	tmp = mr_malloc(MAX_STR_LEN * 2);
[1]	2269
[128]	2270	sprintf(tmp, "%s/archives/filelist.full", bkpinfo->scratchdir);
[1]	2271
[128]	2272	log_to_screen("Archiving regular files");
[1]	2273
[541]	2274	open_progress_form("Backing up filesystem",
	2275	"I am backing up your live filesystem now.",
	2276	"Please wait. This may take a couple of hours.",
	2277	"Working...",
[128]	2278	get_last_filelist_number(bkpinfo) + 1);
	2279
	2280	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ, bkpinfo->tmpdir,
	2281	0L);
	2282
	2283	for (curr_set_no = 0; does_file_exist(curr_filelist_fname);
	2284	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ,
	2285	bkpinfo->tmpdir, ++curr_set_no)) {
	2286	/* backup this set of files */
	2287	sprintf(curr_filelist_fname, FILELIST_FNAME_RAW_SZ,
	2288	bkpinfo->tmpdir, curr_set_no);
	2289	sprintf(curr_afioball_fname, AFIOBALL_FNAME_RAW_SZ,
	2290	bkpinfo->tmpdir, curr_set_no, bkpinfo->zip_suffix);
	2291
[1107]	2292	mr_msg(1, "EXAT'g set %ld", curr_set_no);
[948]	2293	if (g_getfattr) {
	2294	sprintf(curr_xattr_list_fname, XATTR_LIST_FNAME_RAW_SZ,
[128]	2295	bkpinfo->tmpdir, curr_set_no);
[948]	2296	get_fattr_list(curr_filelist_fname, curr_xattr_list_fname);
	2297	}
	2298	if (g_getfacl) {
	2299	sprintf(curr_acl_list_fname, ACL_LIST_FNAME_RAW_SZ,
[128]	2300	bkpinfo->tmpdir, curr_set_no);
[948]	2301	get_acl_list(curr_filelist_fname, curr_acl_list_fname);
	2302	}
[128]	2303
[1107]	2304	mr_msg(1, "Archiving set %ld", curr_set_no);
[128]	2305	res =
	2306	archive_this_fileset(bkpinfo, curr_filelist_fname,
	2307	curr_afioball_fname, curr_set_no);
	2308	retval += res;
	2309	if (res) {
	2310	sprintf(tmp,
	2311	"Errors occurred while archiving set %ld. Perhaps your live filesystem changed?",
	2312	curr_set_no);
	2313	log_to_screen(tmp);
	2314	}
	2315
	2316	strcpy(media_usage_comment, percent_media_full_comment(bkpinfo));
	2317
	2318	/* copy to CD (scratchdir) ... and an actual CD-R if necessary */
	2319	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2320	register_in_tape_catalog(fileset, curr_set_no, -1,
	2321	curr_afioball_fname);
	2322	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	2323	curr_afioball_fname);
	2324	iamhere("Writing EXAT files");
	2325	res +=
	2326	write_EXAT_files_to_tape(bkpinfo, curr_xattr_list_fname,
	2327	curr_acl_list_fname);
[1]	2328	// archives themselves
[128]	2329	res = move_files_to_stream(bkpinfo, curr_afioball_fname, NULL);
	2330	} else {
[948]	2331	if (g_getfacl) {
	2332	if (g_getfattr) {
	2333	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2334	curr_xattr_list_fname,
	2335	curr_acl_list_fname,
	2336	curr_afioball_fname, NULL);
	2337	} else {
	2338	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2339	curr_acl_list_fname,
	2340	curr_afioball_fname, NULL);
	2341	}
	2342	} else {
	2343	if (g_getfattr) {
	2344	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2345	curr_xattr_list_fname,
	2346	curr_afioball_fname, NULL);
	2347	} else {
	2348	res = move_files_to_cd(bkpinfo, curr_filelist_fname,
	2349	curr_afioball_fname, NULL);
	2350	}
	2351	}
[128]	2352	}
	2353	retval += res;
	2354	g_current_progress++;
	2355	update_progress_form(media_usage_comment);
[1]	2356
[128]	2357	if (res) {
	2358	sprintf(tmp, "Failed to add archive %ld's files to CD dir\n",
	2359	curr_set_no);
	2360	log_to_screen(tmp);
	2361	fatal_error
	2362	("Is your hard disk is full? If not, please send the author the logfile.");
	2363	}
[1]	2364	}
[128]	2365	close_progress_form();
	2366	sprintf(tmp, "Your regular files have been archived ");
	2367	if (retval) {
	2368	strcat(tmp, "(with errors).");
	2369	} else {
	2370	strcat(tmp, "successfully.");
	2371	}
	2372	log_to_screen(tmp);
[1080]	2373	mr_free(tmp);
	2374	mr_free(curr_filelist_fname);
	2375	mr_free(curr_afioball_fname);
	2376	mr_free(media_usage_comment);
	2377	mr_free(curr_xattr_list_fname);
	2378	mr_free(curr_acl_list_fname);
[128]	2379	return (retval);
[1]	2380	}
	2381
[128]	2382	/* @} - end of LLarchiveGroup */
	2383
	2384
[1]	2385	/**
	2386	* Wrapper around @c make_afioballs_and_images().
	2387	* @param bkpinfo the backup information structure. Only the
	2388	* @c backup_media_type field is used within this function.
	2389	* @return return code of make_afioballs_and_images
	2390	* @see make_afioballs_and_images
	2391	* @ingroup MLarchiveGroup
	2392	*/
[541]	2393	int make_those_afios_phase(struct s_bkpinfo *bkpinfo)
[1]	2394	{
[128]	2395	/@ int ****************************************** */
	2396	int res = 0;
	2397	int retval = 0;
[1]	2398
[128]	2399	assert(bkpinfo != NULL);
[1]	2400
[128]	2401	mvaddstr_and_log_it(g_currentY, 0,
	2402	"Archiving regular files to media ");
[1]	2403
[128]	2404	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2405	write_header_block_to_stream((off_t)0, "start-of-afioballs",
[128]	2406	BLK_START_AFIOBALLS);
[1]	2407	#if __FreeBSD__ == 5
[1107]	2408	mr_msg(1,
[128]	2409	"Using single-threaded make_afioballs_and_images() to suit b0rken FreeBSD 5.0");
[541]	2410	res = make_afioballs_and_images_OLD(bkpinfo);
[1]	2411	#else
[541]	2412	res = make_afioballs_and_images_OLD(bkpinfo);
[1]	2413	#endif
[684]	2414	write_header_block_to_stream((off_t)0, "stop-afioballs",
[128]	2415	BLK_STOP_AFIOBALLS);
	2416	} else {
[541]	2417	res = make_afioballs_and_images(bkpinfo);
[128]	2418	}
[1]	2419
[128]	2420	retval += res;
	2421	if (res) {
	2422	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
[1107]	2423	mr_msg(1, "make_afioballs_and_images returned an error");
[128]	2424	} else {
	2425	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2426	}
	2427	return (retval);
[1]	2428	}
	2429
	2430	/**
	2431	* Wrapper around @c make_slices_and_images().
	2432	* @param bkpinfo The backup information structure. Fields used:
	2433	* - @c backup_media_type
	2434	* - @c scratchdir
	2435	* - @c tmpdir
	2436	* @return The number of errors encountered (0 for success)
	2437	* @ingroup MLarchiveGroup
	2438	*/
[128]	2439	int make_those_slices_phase(struct s_bkpinfo *bkpinfo)
[1]	2440	{
	2441
[128]	2442	/@ int **************************************************** */
	2443	int res = 0;
	2444	int retval = 0;
[1]	2445
[128]	2446	/@ buffers ************************************************* */
	2447	char *biggielist;
	2448	char *command;
	2449	char *blah;
	2450	char *xattr_fname;
	2451	char *acl_fname;
[1]	2452
[128]	2453	assert(bkpinfo != NULL);
	2454	/* slice big files */
	2455	malloc_string(blah);
	2456	malloc_string(biggielist);
	2457	malloc_string(xattr_fname);
	2458	malloc_string(acl_fname);
[1080]	2459	command = mr_malloc(1200);
[128]	2460	mvaddstr_and_log_it(g_currentY, 0,
	2461	"Archiving large files to media ");
	2462	sprintf(biggielist, "%s/archives/biggielist.txt", bkpinfo->scratchdir);
[948]	2463	if (g_getfattr) {
	2464	sprintf(xattr_fname, XATTR_BIGGLST_FNAME_RAW_SZ, bkpinfo->tmpdir);
	2465	}
	2466	if (g_getfacl) {
	2467	sprintf(acl_fname, ACL_BIGGLST_FNAME_RAW_SZ, bkpinfo->tmpdir);
	2468	}
[1]	2469
[128]	2470	sprintf(command, "cp %s/biggielist.txt %s", bkpinfo->tmpdir,
	2471	biggielist);
	2472	paranoid_system(command);
	2473	sprintf(blah, "biggielist = %s", biggielist);
[1107]	2474	mr_msg(2, blah);
[128]	2475
	2476	if (!does_file_exist(biggielist)) {
[1107]	2477	mr_msg(1, "BTW, the biggielist does not exist");
[128]	2478	}
	2479
[948]	2480	if (g_getfattr) {
	2481	get_fattr_list(biggielist, xattr_fname);
	2482	sprintf(command, "cp %s %s/archives/", xattr_fname,
[128]	2483	bkpinfo->scratchdir);
[948]	2484	paranoid_system(command);
	2485	}
	2486	if (g_getfacl) {
	2487	get_acl_list(biggielist, acl_fname);
	2488	sprintf(command, "cp %s %s/archives/", acl_fname, bkpinfo->scratchdir);
	2489	paranoid_system(command);
	2490	}
[128]	2491
	2492	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2493	res += write_EXAT_files_to_tape(bkpinfo, xattr_fname, acl_fname);
	2494	sprintf(blah, "%ld", count_lines_in_file(biggielist));
[684]	2495	write_header_block_to_stream((off_t)0, blah, BLK_START_BIGGIEFILES);
[128]	2496	}
	2497	res = make_slices_and_images(bkpinfo, biggielist);
	2498	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
[684]	2499	write_header_block_to_stream((off_t)0, "end-of-biggiefiles",
[128]	2500	BLK_STOP_BIGGIEFILES);
	2501	}
	2502	retval += res;
	2503	if (res) {
[1107]	2504	mr_msg(1, "make_slices_and_images returned an error");
[128]	2505	mvaddstr_and_log_it(g_currentY++, 74, "Errors.");
	2506	} else {
	2507	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2508	}
[1080]	2509	mr_free(blah);
	2510	mr_free(biggielist);
	2511	mr_free(command);
	2512	mr_free(xattr_fname);
	2513	mr_free(acl_fname);
[128]	2514	return (retval);
[1]	2515	}
	2516
	2517
	2518
	2519	/**
	2520	* @addtogroup LLarchiveGroup
	2521	* @{
	2522	*/
	2523	/**
	2524	* Function pointer to an appropriate @c move_files_to_cd routine.
	2525	* You can set this to your own function (for example, one to
	2526	* transfer files over the network) or leave it as is.
	2527	*/
[541]	2528	int (move_files_to_cd) (struct s_bkpinfo , char *, ...) =
[128]	2529	_move_files_to_cd;
[1]	2530
	2531	/**
	2532	* Move some files to the ISO scratch directory.
	2533	* This function moves files specified as parameters, into the directory
	2534	* @c bkpinfo->scratchdir, where the files that will be stored on the next
	2535	* CD are waiting.
	2536	*
	2537	* @param bkpinfo The backup information structure. Fields used:
	2538	* - @c media_size
	2539	* - @c scratchdir
	2540	* @param files_to_add The files to add to the scratchdir.
	2541	* @warning The list of @c files_to_add must be terminated with @c NULL.
	2542	* @note If and when the space occupied by the scratchdir would exceed
	2543	* the capacity of the current CD,
	2544	* <tt>write_iso_and_go_on(bkpinfo, FALSE)</tt> is called and the
	2545	* scratchdir is emptied.
	2546	*
	2547	* @return The number of errors encountered (0 for success)
	2548	*/
[541]	2549	int _move_files_to_cd(struct s_bkpinfo bkpinfo, char files_to_add, ...)
[1]	2550	{
	2551
[128]	2552	/@ int *********************************************************** */
	2553	int retval = 0;
[1]	2554	int res = 0;
	2555
[128]	2556	/@ buffers ******************************************************* */
	2557	char tmp, curr_file, *cf;
[1]	2558
[128]	2559	/@ long *********************************************************** */
	2560	va_list ap;
	2561	long long would_occupy;
[1]	2562
[128]	2563	assert(bkpinfo != NULL);
	2564	malloc_string(curr_file);
[1080]	2565	tmp = mr_malloc(1200);
[128]	2566	would_occupy = space_occupied_by_cd(bkpinfo->scratchdir);
	2567	va_start(ap, files_to_add); // initialize the variable arguments
	2568	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2569	if (!cf) {
	2570	continue;
	2571	}
	2572	strcpy(curr_file, cf);
	2573	if (!does_file_exist(curr_file)) {
[1107]	2574	mr_msg(1,
[128]	2575	"Warning - you're trying to add a non-existent file - '%s' to the CD",
	2576	curr_file);
	2577	} else {
[1107]	2578	mr_msg(8, "Trying to add file %s to CD", curr_file);
[128]	2579	would_occupy += length_of_file(curr_file) / 1024;
	2580	}
[1]	2581	}
[128]	2582	va_end(ap);
[1]	2583
[128]	2584	if (bkpinfo->media_size[g_current_media_number] <= 0) {
	2585	fatal_error("move_files_to_cd() - unknown media size");
[1]	2586	}
[128]	2587	if (would_occupy / 1024 > bkpinfo->media_size[g_current_media_number]) {
[541]	2588	res = write_iso_and_go_on(bkpinfo, FALSE); /* FALSE because this is not the last CD we'll write */
[128]	2589	retval += res;
	2590	if (res) {
[1107]	2591	mr_msg(1, "WARNING - write_iso_and_go_on returned an error");
[128]	2592	}
	2593	}
[1]	2594
[128]	2595	va_start(ap, files_to_add); // initialize the variable arguments
	2596	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2597	if (!cf) {
	2598	continue;
	2599	}
	2600	strcpy(curr_file, cf);
[1]	2601
[128]	2602	sprintf(tmp, "mv -f %s %s/archives/", curr_file,
	2603	bkpinfo->scratchdir);
	2604	res = run_program_and_log_output(tmp, 5);
	2605	retval += res;
	2606	if (res) {
[1107]	2607	mr_msg(1, "(move_files_to_cd) '%s' failed", tmp);
[128]	2608	} else {
[1107]	2609	mr_msg(8, "Moved %s to CD OK", tmp);
[128]	2610	}
	2611	// unlink (curr_file);
[1]	2612	}
[128]	2613	va_end(ap);
	2614
	2615	if (retval) {
[1107]	2616	mr_msg(1,
[128]	2617	"Warning - errors occurred while I was adding files to CD dir");
[1]	2618	}
[1080]	2619	mr_free(tmp);
	2620	mr_free(curr_file);
[128]	2621	return (retval);
[1]	2622	}
	2623
	2624	/* @} - end of LLarchiveGroup */
	2625
	2626
	2627
	2628
	2629
	2630
	2631
	2632
	2633	/**
	2634	* Offer to write boot and data disk images to 3.5" floppy disks.
	2635	* @param bkpinfo The backup information structure. Only the
	2636	* @c backup_media_type field is used in this function.
	2637	* @param imagesdir The directory containing the floppy images (usually
[1044]	2638	* /var/cache/mindi).
[1]	2639	*
	2640	* @return The number of errors encountered (0 for success)
	2641	* @see write_image_to_floppy
	2642	* @see format_disk
	2643	* @ingroup MLarchiveGroup
	2644	*/
[128]	2645	int offer_to_write_floppies(struct s_bkpinfo bkpinfo, char imagesdir)
[1]	2646	{
[128]	2647	/@ buffer *********************************************************** */
	2648	char *tmp;
[1]	2649	char *comment;
	2650	char *bootdisk_dev;
	2651	char *datadisk_dev;
	2652	char *bootdisk_file;
	2653	char *rootdisk_file;
	2654
[128]	2655	/@ int ************************************************************** */
	2656	int i = 0;
[1]	2657	int res = 0;
	2658
[128]	2659	/@ bool ************************************************************* */
	2660	bool format_first;
	2661	bool root_disk_exists = FALSE;
[1]	2662
[128]	2663	malloc_string(tmp);
	2664	malloc_string(comment);
	2665	malloc_string(bootdisk_dev);
	2666	malloc_string(datadisk_dev);
	2667	malloc_string(rootdisk_file);
	2668	malloc_string(bootdisk_file);
	2669	assert(bkpinfo != NULL);
	2670	assert_string_is_neither_NULL_nor_zerolength(imagesdir);
[1]	2671
	2672
[128]	2673	if (!ask_me_yes_or_no
	2674	("Write boot and data disk images to 3.5\" floppy disks?")) {
	2675	return (0);
	2676	}
	2677	if (does_device_exist(DEFAULT_1722MB_DISK)) {
[1]	2678	#ifdef __FreeBSD__
[128]	2679	// tell the system that this is a 1.72m floppy
	2680	system("/usr/sbin/fdcontrol -F 1722 /dev/fd0.1722");
[1]	2681	#endif
[128]	2682	strcpy(bootdisk_dev, DEFAULT_1722MB_DISK);
	2683	} else if (does_device_exist(BACKUP_1722MB_DISK)) {
	2684	sprintf(bootdisk_dev, "/dev/fd0H1722");
	2685	} else {
[1107]	2686	mr_msg(1, "Warning - can't find a 1.72MB floppy device sigh");
[128]	2687	strcpy(bootdisk_dev, DEFAULT_1722MB_DISK);
[1]	2688	// return (1);
[128]	2689	}
	2690	strcpy(datadisk_dev, "/dev/fd0");
	2691	if (!does_device_exist(datadisk_dev)) {
[1107]	2692	mr_msg(1, "Warning - can't find a 1.44MB floppy device sigh");
[128]	2693	strcpy(datadisk_dev, "/dev/fd0");
[1]	2694	// return (1);
[128]	2695	}
	2696	format_first =
	2697	ask_me_yes_or_no
	2698	("Do you want me to format the disks before I write to them?");
[1]	2699
	2700	/* boot disk */
[128]	2701	if (ask_me_OK_or_cancel("About to write boot disk")) {
	2702	log_to_screen("Writing boot floppy");
[1]	2703	#ifdef __FreeBSD__
[128]	2704	sprintf(tmp, "%s/mindi-kern.1722.img", imagesdir);
	2705	if (format_first) {
	2706	format_disk(bootdisk_dev);
	2707	}
	2708	res += write_image_to_floppy(bootdisk_dev, tmp);
	2709	if (ask_me_OK_or_cancel("About to write 1.44MB mfsroot disk")) {
	2710	log_to_screen("Writing mfsroot floppy");
	2711	if (format_first) {
	2712	format_disk(datadisk_dev);
	2713	}
	2714	sprintf(tmp, "%s/mindi-mfsroot.1440.img", imagesdir);
	2715	write_image_to_floppy(datadisk_dev, tmp);
	2716	}
[1]	2717	#else
[128]	2718	sprintf(bootdisk_file, "%s/mindi-bootroot.1722.img", imagesdir);
	2719	if (does_file_exist(bootdisk_file)) {
	2720	if (format_first) {
	2721	format_disk(bootdisk_dev);
	2722	}
	2723	res += write_image_to_floppy(bootdisk_dev, bootdisk_file);
	2724	} else {
	2725	sprintf(bootdisk_file, "%s/mindi-boot.1440.img", imagesdir);
	2726	sprintf(rootdisk_file, "%s/mindi-root.1440.img", imagesdir);
	2727	root_disk_exists = TRUE;
	2728	if (!does_file_exist(rootdisk_file)
	2729	\|\| !does_file_exist(bootdisk_file)) {
	2730	popup_and_OK
	2731	("Cannot write boot/root floppies. Files not found.");
	2732	log_to_screen
	2733	("Failed to find boot/root floppy images. Oh dear.");
	2734	return (1);
	2735	}
	2736	if (format_first) {
	2737	format_disk(datadisk_dev);
	2738	}
	2739	/*
	2740	sprintf(tmp, "cat %s > %s", bootdisk_file, datadisk_dev);
	2741	res += run_external_binary_with_percentage_indicator_NEW("Writing boot floppy", tmp);
	2742	*/
	2743	res += write_image_to_floppy(datadisk_dev, bootdisk_file);
	2744	if (ask_me_OK_or_cancel("About to write root disk")) {
	2745	log_to_screen("Writing root floppy");
	2746	if (format_first) {
	2747	format_disk(datadisk_dev);
	2748	}
	2749	sprintf(tmp, "cat %s > %s", rootdisk_file, datadisk_dev);
[1107]	2750	mr_msg(1, "tmp = '%s'", tmp);
[128]	2751	res +=
	2752	run_external_binary_with_percentage_indicator_NEW
	2753	("Writing root floppy", tmp);
[1]	2754	// res += write_image_to_floppy (datadisk_dev, rootdisk_file);
[128]	2755	}
	2756	}
[1]	2757	#endif
	2758	}
[128]	2759	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	2760	log_to_screen
	2761	("FYI, the data disks are stored on tape/CD for your convenience.");
	2762	return (0);
[1]	2763	}
[128]	2764	for (i = 1; i < 99; i++) {
	2765	sprintf(tmp, "%s/mindi-data-%d.img", imagesdir, i);
[1107]	2766	mr_msg(3, tmp);
[128]	2767	if (!does_file_exist(tmp)) {
[1107]	2768	mr_msg(3, "...not found");
[128]	2769	break;
	2770	}
	2771	sprintf(comment, "About to write data disk #%d", i);
	2772	if (ask_me_OK_or_cancel(comment)) {
	2773	sprintf(comment, "Writing data disk #%3d", i);
	2774	log_to_screen(comment);
	2775	if (format_first) {
	2776	res += format_disk(datadisk_dev);
	2777	}
	2778	res += write_image_to_floppy(datadisk_dev, tmp);
	2779	}
	2780	}
[1080]	2781	mr_free(tmp);
	2782	mr_free(comment);
	2783	mr_free(bootdisk_dev);
	2784	mr_free(datadisk_dev);
[128]	2785	return (res);
[1]	2786	}
	2787
	2788
	2789
	2790
	2791
	2792
	2793
	2794
	2795	/**
	2796	* Wrapper around @c offer_to_write_floppies().
	2797	* @param bkpinfo The backup information structure. Used only
	2798	* in the call to @c offer_to_write_floppies().
	2799	* @return 0 if the boot floppies were found (not necessarily written OK),
	2800	* 1 otherwise.
	2801	* @see offer_to_write_floppies
	2802	* @ingroup MLarchiveGroup
	2803	*/
	2804
[128]	2805	int offer_to_write_boot_floppies_to_physical_disks(struct s_bkpinfo
	2806	*bkpinfo)
[1]	2807	{
[128]	2808	int res = 0;
[1]	2809
[128]	2810	assert(bkpinfo != NULL);
[1]	2811
[128]	2812	mvaddstr_and_log_it(g_currentY, 0,
	2813	"Writing boot+data floppy images to disk");
[1]	2814
[128]	2815	if (!bkpinfo->nonbootable_backup) {
[1]	2816	#ifdef __FreeBSD__
[1044]	2817	if (!does_file_exist("/var/cache/mindi/mindi-kern.1722.img"))
[1]	2818	#else
[1044]	2819	if (!does_file_exist("/var/cache/mindi/mindi-bootroot.1722.img")
	2820	&& !does_file_exist("/var/cache/mindi/mindi-boot.1440.img"))
[1]	2821	#endif
[128]	2822	{
	2823	mvaddstr_and_log_it(g_currentY++, 74, "No Imgs");
[1044]	2824	if (does_file_exist("/var/cache/mindi/mondorescue.iso")) {
[128]	2825	popup_and_OK
[1044]	2826	("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]	2827	res++;
	2828	}
	2829	} else {
[1044]	2830	offer_to_write_floppies(bkpinfo, "/var/cache/mindi");
[128]	2831	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	2832	}
	2833	} else {
	2834	popup_and_OK
	2835	("Since you opted for a nonbootable backup, no boot floppies were created.");
	2836	}
	2837
	2838	return (res);
[1]	2839	}
	2840
	2841
	2842
	2843
	2844	/**
	2845	* @addtogroup LLarchiveGroup
	2846	* @{
	2847	*/
	2848	/**
	2849	* Function pointer to an appropriate @c move_files_to_stream routine.
	2850	* You can set this to your own function (for example, one to
	2851	* transfer files over the network) or leave it as is.
	2852	*/
[128]	2853	int (move_files_to_stream) (struct s_bkpinfo , char *, ...) =
	2854	_move_files_to_stream;
[1]	2855
	2856	/**
	2857	* Copy some files to tape.
	2858	* This function copies the files specified as parameters into the tape stream.
	2859	*
	2860	* @param bkpinfo The backup information structure. Used only in the call to
	2861	* @c write_file_to_stream_from_file().
	2862	*
	2863	* @param files_to_add The files to copy to the tape stream.
	2864	* @warning The list of @c files_to_add must be terminated with @c NULL.
	2865	* @note Files may be split across multiple tapes if necessary.
	2866	*
	2867	* @return The number of errors encountered (0 for success)
	2868	*/
	2869	int
[128]	2870	_move_files_to_stream(struct s_bkpinfo bkpinfo, char files_to_add, ...)
[1]	2871	{
	2872
[128]	2873	/@ int *********************************************************** */
	2874	int retval = 0;
[1]	2875	int res = 0;
[128]	2876	/@ buffers ******************************************************* */
[1]	2877
[128]	2878	/@ char ********************************************************** */
[1]	2879	char start_chr;
	2880	char stop_chr;
[128]	2881	char curr_file, cf;
	2882	/@ long long ***************************************************** */
[684]	2883	off_t length_of_incoming_file = (off_t)0;
[128]	2884	t_archtype type;
	2885	va_list ap;
[1]	2886
[128]	2887	assert(bkpinfo != NULL);
	2888	malloc_string(curr_file);
	2889	va_start(ap, files_to_add);
	2890	for (cf = files_to_add; cf != NULL; cf = va_arg(ap, char *)) {
	2891	if (!cf) {
	2892	continue;
	2893	}
	2894	strcpy(curr_file, cf);
	2895	if (!does_file_exist(curr_file)) {
[1107]	2896	mr_msg(1,
[128]	2897	"Warning - you're trying to add a non-existent file - '%s' to the tape",
	2898	curr_file);
	2899	}
[1]	2900	/* create header chars */
[128]	2901	start_chr = BLK_START_AN_AFIO_OR_SLICE;
	2902	stop_chr = BLK_STOP_AN_AFIO_OR_SLICE;
[1]	2903	/* ask for new tape if necessary */
[128]	2904	length_of_incoming_file = length_of_file(curr_file);
	2905	write_header_block_to_stream(length_of_incoming_file, curr_file,
	2906	start_chr);
	2907	if (strstr(curr_file, ".afio.") \|\| strstr(curr_file, ".star.")) {
	2908	type = fileset;
	2909	} else if (strstr(curr_file, "slice")) {
	2910	type = biggieslice;
	2911	} else {
	2912	type = other;
	2913	}
	2914	res = write_file_to_stream_from_file(bkpinfo, curr_file);
	2915	retval += res;
	2916	unlink(curr_file);
[1]	2917	/* write closing header */
[684]	2918	write_header_block_to_stream((off_t)0, "finished-writing-file", stop_chr);
[128]	2919	}
	2920	va_end(ap);
[1]	2921
[128]	2922	if (retval) {
[1107]	2923	mr_msg(1,
[128]	2924	"Warning - errors occurred while I was adding file to tape");
	2925	}
[1080]	2926	mr_free(curr_file);
[128]	2927	return (retval);
[1]	2928	}
	2929
	2930	/* @} - end of LLarchiveGroup */
	2931
	2932
	2933
	2934	/**
	2935	* @addtogroup utilityGroup
	2936	* @{
	2937	*/
	2938	/**
	2939	* Make sure the user has a valid CD-R(W) in the CD drive.
	2940	* @param cdrw_dev Set to the CD-R(W) device checked.
	2941	* @param keep_looping If TRUE, keep pestering user until they insist
	2942	* or insert a correct CD; if FALSE, only check once.
	2943	* @return 0 (there was an OK CD in the drive) or 1 (there wasn't).
	2944	*/
[128]	2945	int interrogate_disk_currently_in_cdrw_drive(char *cdrw_dev,
	2946	bool keep_looping)
[1]	2947	{
[128]	2948	char *tmp;
	2949	int res = 0;
	2950	char *bkp;
	2951	char *cdrecord;
[1]	2952
[128]	2953	malloc_string(tmp);
	2954	malloc_string(bkp);
	2955	malloc_string(cdrecord);
	2956	strcpy(bkp, cdrw_dev);
	2957	if (find_cdrw_device(cdrw_dev)) {
	2958	strcpy(cdrw_dev, bkp);
	2959	} else {
	2960	if (!system("which cdrecord > /dev/null 2> /dev/null")) {
	2961	sprintf(cdrecord, "cdrecord dev=%s -atip", cdrw_dev);
	2962	} else if (!system("which dvdrecord > /dev/null 2> /dev/null")) {
	2963	sprintf(cdrecord, "cdrecord dev=%s -atip", cdrw_dev);
	2964	} else {
	2965	cdrecord[0] = '\0';
[1107]	2966	mr_msg(2, "Oh well. I guess I'll just pray then.");
[128]	2967	}
	2968	if (cdrecord[0]) {
	2969	if (!keep_looping) {
	2970	retract_CD_tray_and_defeat_autorun();
	2971	res = run_program_and_log_output(cdrecord, 5);
	2972	} else {
	2973	while ((res = run_program_and_log_output(cdrecord, 5))) {
	2974	retract_CD_tray_and_defeat_autorun();
	2975	if (ask_me_yes_or_no
	2976	("Unable to examine CD. Are you sure this is a valid CD-R(W) CD?"))
	2977	{
[1107]	2978	mr_msg(1, "Well, he insisted...");
[128]	2979	break;
	2980	}
	2981	}
	2982	}
	2983	}
	2984	}
[1]	2985	// retract_CD_tray_and_defeat_autorun();
[1080]	2986	mr_free(tmp);
	2987	mr_free(cdrecord);
	2988	mr_free(bkp);
[128]	2989	return (res);
[1]	2990	}
	2991
	2992
	2993
	2994
	2995
	2996
	2997
	2998
	2999
	3000	/**
	3001	* Asks the user to put a CD-R(W) in the drive.
	3002	* @param ask_for_one_if_more_than_this (unused)
	3003	* @param pmountable If non-NULL, pointed-to value is set to TRUE if the CD is mountable, FALSE otherwise.
	3004	*/
	3005	void
[128]	3006	pause_and_ask_for_cdr(int ask_for_one_if_more_than_this, bool * pmountable)
[1]	3007	{
	3008
[128]	3009	/@ buffers ******************************************** */
	3010	char *tmp;
	3011	char *szmsg;
	3012	char *cdrom_dev;
	3013	char *cdrw_dev;
	3014	char *our_serial_str;
	3015	bool ok_go_ahead_burn_it;
	3016	int cd_number = -1;
	3017	int attempt_to_mount_returned_this = 999;
	3018	char *mtpt;
	3019	char *szcdno;
	3020	char *szserfname;
	3021	char *szunmount;
[1]	3022
[128]	3023	malloc_string(tmp);
	3024	malloc_string(szmsg);
	3025	malloc_string(cdrom_dev);
	3026	malloc_string(cdrw_dev);
	3027	malloc_string(mtpt);
	3028	malloc_string(szcdno);
	3029	malloc_string(szserfname);
	3030	malloc_string(our_serial_str);
	3031	malloc_string(szunmount);
[1]	3032
[128]	3033	sprintf(szmsg, "I am about to burn %s #%d",
	3034	media_descriptor_string(g_backup_media_type),
	3035	g_current_media_number);
	3036	log_to_screen(szmsg);
	3037	if (g_current_media_number < ask_for_one_if_more_than_this) {
	3038	return;
	3039	}
	3040	log_to_screen("Scanning CD-ROM drive...");
	3041	sprintf(mtpt, "/tmp/cd.mtpt.%ld.%ld", (long int) random(),
	3042	(long int) random());
	3043	make_hole_for_dir(mtpt);
[1]	3044
[128]	3045	gotos_make_me_puke:
	3046	ok_go_ahead_burn_it = TRUE;
	3047	if (!find_cdrom_device(cdrom_dev, FALSE)) {
[1]	3048	/* When enabled, it made CD eject-and-retract when wrong CD inserted.. Weird
[1107]	3049	mr_msg(2, "paafcd: Retracting CD-ROM drive if possible" );
[1]	3050	retract_CD_tray_and_defeat_autorun();
	3051	*/
[128]	3052	sprintf(tmp, "umount %s", cdrom_dev);
	3053	run_program_and_log_output(tmp, 1);
	3054	sprintf(szcdno, "%s/archives/THIS-CD-NUMBER", mtpt);
	3055	sprintf(szserfname, "%s/archives/SERIAL-STRING", mtpt);
	3056	sprintf(szunmount, "umount %s", mtpt);
	3057	cd_number = -1;
	3058	our_serial_str[0] = '\0';
	3059	sprintf(tmp, "mount %s %s", cdrom_dev, mtpt);
	3060	if ((attempt_to_mount_returned_this =
	3061	run_program_and_log_output(tmp, 1))) {
[1107]	3062	mr_msg(4, "Failed to mount %s at %s", cdrom_dev, mtpt);
[128]	3063	log_to_screen("If there's a CD/DVD in the drive, it's blank.");
	3064	/*
	3065	if (interrogate_disk_currently_in_cdrw_drive(cdrw_dev, FALSE))
	3066	{
	3067	ok_go_ahead_burn_it = FALSE;
	3068	log_to_screen("There isn't a writable CD/DVD in the drive.");
	3069	}
	3070	else
	3071	{
	3072	log_to_screen("Confirmed. There is a blank CD/DVD in the drive.");
	3073	}
	3074	*/
	3075	} else if (!does_file_exist(szcdno)
	3076	\|\| !does_file_exist(szserfname)) {
	3077	log_to_screen
	3078	("%s has data on it but it's probably not a Mondo CD.",
	3079	media_descriptor_string(g_backup_media_type));
	3080	} else {
	3081	log_to_screen("%s found in drive. It's a Mondo disk.",
	3082	media_descriptor_string(g_backup_media_type));
	3083	cd_number = atoi(last_line_of_file(szcdno));
	3084	sprintf(tmp, "cat %s 2> /dev/null", szserfname);
	3085	strcpy(our_serial_str,
	3086	call_program_and_get_last_line_of_output(tmp));
	3087	// FIXME - should be able to use last_line_of_file(), surely?
	3088	}
	3089	run_program_and_log_output(szunmount, 1);
[1107]	3090	mr_msg(2, "paafcd: cd_number = %d", cd_number);
	3091	mr_msg(2, "our serial str = %s; g_serial_string = %s",
[128]	3092	our_serial_str, g_serial_string);
	3093	if (cd_number > 0 && !strcmp(our_serial_str, g_serial_string)) {
[1107]	3094	mr_msg(2, "This %s is part of this backup set!",
[128]	3095	media_descriptor_string(g_backup_media_type));
	3096	ok_go_ahead_burn_it = FALSE;
	3097	if (cd_number == g_current_media_number - 1) {
	3098	log_to_screen
	3099	("I think you've left the previous %s in the drive.",
	3100	media_descriptor_string(g_backup_media_type));
	3101	} else {
	3102	log_to_screen
	3103	("Please remove this %s. It is part of the backup set you're making now.",
	3104	media_descriptor_string(g_backup_media_type));
	3105	}
	3106	} else {
	3107	log_to_screen("...but not part of _our_ backup set.");
	3108	}
	3109	} else {
[1107]	3110	mr_msg(2,
[128]	3111	"paafcd: Can't find CD-ROM drive. Perhaps it has a blank %s in it?",
	3112	media_descriptor_string(g_backup_media_type));
	3113	if (interrogate_disk_currently_in_cdrw_drive(cdrw_dev, FALSE)) {
	3114	ok_go_ahead_burn_it = FALSE;
	3115	log_to_screen("There isn't a writable %s in the drive.",
	3116	media_descriptor_string(g_backup_media_type));
	3117	}
[1]	3118	}
	3119
	3120	/*
	3121	if (g_current_media_number > ask_for_one_if_more_than_this)
	3122	{
	3123	ok_go_ahead_burn_it = FALSE;
	3124	log_it("paafcd: %d > %d, so I'll definitely pause.", g_current_media_number > ask_for_one_if_more_than_this);
	3125	}
	3126	*/
	3127
[128]	3128	if (!ok_go_ahead_burn_it) {
	3129	eject_device(cdrom_dev);
	3130	sprintf(tmp,
	3131	"I am about to burn %s #%d of the backup set. Please insert %s and press Enter.",
	3132	media_descriptor_string(g_backup_media_type),
	3133	g_current_media_number,
	3134	media_descriptor_string(g_backup_media_type));
	3135	popup_and_OK(tmp);
	3136	goto gotos_make_me_puke;
	3137	} else {
[1107]	3138	mr_msg(2, "paafcd: OK, going ahead and burning it.");
[128]	3139	}
[1]	3140
[1107]	3141	mr_msg(2,
[128]	3142	"paafcd: OK, I assume I have a blank/reusable %s in the drive...",
	3143	media_descriptor_string(g_backup_media_type));
[1]	3144
[128]	3145	// if (ask_for_one_if_more_than_this>1) { popup_and_OK(szmsg); }
[1]	3146
[128]	3147	log_to_screen("Proceeding w/ %s in drive.",
	3148	media_descriptor_string(g_backup_media_type));
[1080]	3149	mr_free(tmp);
	3150	mr_free(szmsg);
	3151	mr_free(cdrom_dev);
	3152	mr_free(cdrw_dev);
	3153	mr_free(mtpt);
	3154	mr_free(szcdno);
	3155	mr_free(szserfname);
	3156	mr_free(our_serial_str);
	3157	mr_free(szunmount);
[128]	3158	if (pmountable) {
	3159	if (attempt_to_mount_returned_this) {
	3160	*pmountable = FALSE;
	3161	} else {
	3162	*pmountable = TRUE;
	3163	}
	3164	}
[1]	3165
	3166	}
	3167
	3168
	3169
	3170
	3171
	3172
	3173
	3174
	3175	/**
	3176	* Set the <tt>N</tt>th bit of @c array to @c true_or_false.
	3177	* @param array The bit array (as a @c char pointer).
	3178	* @param N The bit number to set or reset.
	3179	* @param true_or_false If TRUE then set bit @c N, if FALSE then reset bit @c N.
	3180	* @see get_bit_N_of_array
	3181	*/
[128]	3182	void set_bit_N_of_array(char *array, int N, bool true_or_false)
[1]	3183	{
[128]	3184	int bit_number;
	3185	int mask, orig_val, to_add;
	3186	int element_number;
[1]	3187
[128]	3188	assert(array != NULL);
[1]	3189
[128]	3190	element_number = N / 8;
	3191	bit_number = N % 8;
	3192	to_add = (1 << bit_number);
	3193	mask = 255 - to_add;
	3194	orig_val = array[element_number] & mask;
	3195	// log_it("array[%d]=%02x; %02x&%02x = %02x", element_number, array[element_number], mask, orig_val);
	3196	if (true_or_false) {
	3197	array[element_number] = orig_val \| to_add;
	3198	}
[1]	3199	}
	3200
	3201	/* @} - end of utilityGroup */
	3202
	3203
	3204
	3205
	3206
	3207
	3208
	3209
	3210	/**
	3211	* Chop up @c filename.
	3212	* @param bkpinfo The backup information structure. Fields used:
	3213	* - @c backup_media_type
	3214	* - @c compression_level
	3215	* - @c optimal_set_size
	3216	* - @c tmpdir
	3217	* - @c use_lzo
	3218	* - @c zip_exe
	3219	* - @c zip_suffix
	3220	*
	3221	* @param biggie_filename The file to chop up.
[296]	3222	* @param ntfsprog_fifo The FIFO to ntfsclone if this is an imagedev, NULL otherwise.
[1]	3223	* @param biggie_file_number The sequence number of this biggie file (starting from 0).
	3224	* @param noof_biggie_files The number of biggie files there are total.
	3225	* @return The number of errors encountered (0 for success)
	3226	* @see make_slices_and_images
	3227	* @ingroup LLarchiveGroup
	3228	*/
	3229	int
[541]	3230	slice_up_file_etc(struct s_bkpinfo bkpinfo, char biggie_filename,
[296]	3231	char *ntfsprog_fifo, long biggie_file_number,
	3232	long noof_biggie_files, bool use_ntfsprog)
[1]	3233	{
	3234
[128]	3235	/@ buffers ************************************************* */
	3236	char tmp, checksum_line, *command;
	3237	char *tempblock;
	3238	char *curr_slice_fname_uncompressed;
	3239	char *curr_slice_fname_compressed;
	3240	char *file_to_archive;
	3241	char *file_to_openin;
	3242	/@ pointers ************************************************* */
	3243	char *pB;
	3244	FILE fin, fout;
[1]	3245
[128]	3246	/@ bool ***************************************************** */
	3247	bool finished = FALSE;
[1]	3248
[128]	3249	/@ long ***************************************************** */
	3250	size_t blksize = 0;
	3251	long slice_num = 0;
	3252	long i;
	3253	long optimal_set_size;
	3254	bool should_I_compress_slices;
	3255	char *suffix; // for compressed slices
[1]	3256
[128]	3257	/@ long long ************************************************* */
[684]	3258	off_t totalread = (off_t)0;
	3259	off_t totallength = (off_t)0;
	3260	off_t length;
[1]	3261
[128]	3262	/@ int ******************************************************* */
	3263	int retval = 0;
	3264	int res = 0;
[1]	3265
[128]	3266	/@ structures ************************************************* */
	3267	struct s_filename_and_lstat_info biggiestruct;
[1]	3268	// struct stat statbuf;
	3269
[128]	3270	assert(bkpinfo != NULL);
	3271	assert_string_is_neither_NULL_nor_zerolength(biggie_filename);
	3272	malloc_string(tmp);
	3273	malloc_string(checksum_line);
	3274	malloc_string(curr_slice_fname_uncompressed);
	3275	malloc_string(curr_slice_fname_compressed);
	3276	malloc_string(file_to_archive);
	3277	malloc_string(suffix);
[1080]	3278	command = mr_malloc(MAX_STR_LEN * 8);
[1]	3279
[128]	3280	biggiestruct.for_backward_compatibility = '\n';
[296]	3281	biggiestruct.use_ntfsprog = use_ntfsprog;
[1080]	3282	tempblock = (char ) mr_malloc(256 1024);
[128]	3283	optimal_set_size = bkpinfo->optimal_set_size;
	3284	if (is_this_file_compressed(biggie_filename)
	3285	\|\| bkpinfo->compression_level == 0) {
	3286	suffix[0] = '\0';
	3287	// log_it("%s is indeed compressed :-)", filename);
	3288	should_I_compress_slices = FALSE;
	3289	} else {
	3290	strcpy(suffix, bkpinfo->zip_suffix);
	3291	should_I_compress_slices = TRUE;
	3292	}
[1]	3293
[128]	3294	if (optimal_set_size < 999) {
	3295	fatal_error("bkpinfo->optimal_set_size is insanely small");
	3296	}
[296]	3297	if (ntfsprog_fifo) {
	3298	file_to_openin = ntfsprog_fifo;
[128]	3299	strcpy(checksum_line, "IGNORE");
[1107]	3300	mr_msg(2,
[128]	3301	"Not calculating checksum for %s: it would take too long",
	3302	biggie_filename);
[296]	3303	if ( !find_home_of_exe("ntfsresize")) {
	3304	fatal_error("ntfsresize not found");
	3305	}
	3306	sprintf(command, "ntfsresize --force --info %s\|grep '^You might resize at '\|cut -d' ' -f5", biggie_filename);
	3307	log_it("command = %s", command);
	3308	strcpy (tmp, call_program_and_get_last_line_of_output(command));
	3309	log_it("res of it = %s", tmp);
[684]	3310	totallength = (off_t)atoll(tmp);
[128]	3311	} else {
	3312	file_to_openin = biggie_filename;
[693]	3313	if (strchr(biggie_filename,'\'') != NULL) {
	3314	sprintf(command, "md5sum \"%s\"", biggie_filename);
	3315	} else {
	3316	sprintf(command, "md5sum '%s'", biggie_filename);
	3317	}
[128]	3318	if (!(fin = popen(command, "r"))) {
	3319	log_OS_error("Unable to popen-in command");
	3320	return (1);
	3321	}
	3322	(void) fgets(checksum_line, MAX_STR_LEN, fin);
	3323	pclose(fin);
[167]	3324	totallength = length_of_file (biggie_filename);
[128]	3325	}
	3326	lstat(biggie_filename, &biggiestruct.properties);
	3327	strcpy(biggiestruct.filename, biggie_filename);
	3328	pB = strchr(checksum_line, ' ');
	3329	if (!pB) {
	3330	pB = strchr(checksum_line, '\t');
	3331	}
	3332	if (pB) {
	3333	*pB = '\0';
	3334	}
	3335	strcpy(biggiestruct.checksum, checksum_line);
[1]	3336
[128]	3337	strcpy(tmp, slice_fname(biggie_file_number, 0, bkpinfo->tmpdir, ""));
	3338	fout = fopen(tmp, "w");
	3339	(void) fwrite((void *) &biggiestruct, 1, sizeof(biggiestruct), fout);
	3340	paranoid_fclose(fout);
	3341	length = totallength / optimal_set_size / 1024;
[1107]	3342	mr_msg(1, "Opening in %s; slicing it and writing to CD/tape",
[128]	3343	file_to_openin);
	3344	if (!(fin = fopen(file_to_openin, "r"))) {
	3345	log_OS_error("Unable to openin biggie_filename");
	3346	sprintf(tmp, "Cannot archive bigfile '%s': not found",
	3347	biggie_filename);
	3348	log_to_screen(tmp);
[1080]	3349	mr_free(tempblock);
	3350	mr_free(tmp);
	3351	mr_free(checksum_line);
	3352	mr_free(command);
[128]	3353	return (1);
	3354	}
	3355	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3356	res =
	3357	move_files_to_stream(bkpinfo,
	3358	slice_fname(biggie_file_number, 0,
	3359	bkpinfo->tmpdir, ""), NULL);
	3360	} else {
	3361	res =
[541]	3362	move_files_to_cd(bkpinfo,
[128]	3363	slice_fname(biggie_file_number, 0,
	3364	bkpinfo->tmpdir, ""), NULL);
	3365	}
	3366	i = bkpinfo->optimal_set_size / 256;
	3367	for (slice_num = 1; !finished; slice_num++) {
	3368	strcpy(curr_slice_fname_uncompressed,
	3369	slice_fname(biggie_file_number, slice_num, bkpinfo->tmpdir,
	3370	""));
	3371	strcpy(curr_slice_fname_compressed,
	3372	slice_fname(biggie_file_number, slice_num, bkpinfo->tmpdir,
	3373	suffix));
[1]	3374
[128]	3375	strcpy(tmp, percent_media_full_comment(bkpinfo));
	3376	update_progress_form(tmp);
	3377	if (!(fout = fopen(curr_slice_fname_uncompressed, "w"))) {
	3378	log_OS_error(curr_slice_fname_uncompressed);
	3379	return (1);
[1]	3380	}
[128]	3381	if ((i == bkpinfo->optimal_set_size / 256)
	3382	&& (totalread < 1.1 * totallength)) {
	3383	for (i = 0; i < bkpinfo->optimal_set_size / 256; i++) {
	3384	blksize = fread(tempblock, 1, 256 * 1024, fin);
	3385	if (blksize > 0) {
	3386	totalread = totalread + blksize;
	3387	(void) fwrite(tempblock, 1, blksize, fout);
	3388	} else {
	3389	break;
	3390	}
	3391	}
	3392	} else {
	3393	i = 0;
	3394	}
	3395	paranoid_fclose(fout);
	3396	if (i > 0) // length_of_file (curr_slice_fname_uncompressed)
[1]	3397	{
[128]	3398	if (!does_file_exist(curr_slice_fname_uncompressed)) {
[1107]	3399	mr_msg(2,
[128]	3400	"Warning - '%s' doesn't exist. How can I compress slice?",
	3401	curr_slice_fname_uncompressed);
	3402	}
	3403	if (should_I_compress_slices && bkpinfo->compression_level > 0) {
	3404	sprintf(command, "%s -%d %s", bkpinfo->zip_exe,
	3405	bkpinfo->compression_level,
	3406	curr_slice_fname_uncompressed);
[1107]	3407	mr_msg(2, command);
[128]	3408	if ((res = system(command))) {
	3409	log_OS_error(command);
	3410	}
	3411	// did_I_compress_slice = TRUE;
	3412	} else {
	3413	sprintf(command, "mv %s %s 2>> %s",
	3414	curr_slice_fname_uncompressed,
	3415	curr_slice_fname_compressed, MONDO_LOGFILE);
	3416	res = 0; // don't do it :)
	3417	// did_I_compress_slice = FALSE;
	3418	}
	3419	retval += res;
	3420	if (res) {
[1107]	3421	mr_msg(2, "Failed to compress the slice");
[128]	3422	}
	3423	if (bkpinfo->use_lzo
	3424	&& strcmp(curr_slice_fname_compressed,
	3425	curr_slice_fname_uncompressed)) {
	3426	unlink(curr_slice_fname_uncompressed);
	3427	}
	3428	if (res) {
	3429	sprintf(tmp, "Problem with slice # %ld", slice_num);
	3430	} else {
	3431	sprintf(tmp,
	3432	"%s - Bigfile #%ld, slice #%ld compressed OK ",
	3433	biggie_filename, biggie_file_number + 1,
	3434	slice_num);
	3435	}
[1]	3436	#ifndef _XWIN
[128]	3437	if (!g_text_mode) {
	3438	newtDrawRootText(0, g_noof_rows - 2, tmp);
	3439	newtRefresh();
	3440	} else {
[1107]	3441	mr_msg(2, tmp);
[128]	3442	}
[1]	3443	#else
[1107]	3444	mr_msg(2, tmp);
[1]	3445	#endif
[128]	3446	strcpy(file_to_archive, curr_slice_fname_compressed);
	3447	g_current_progress++;
	3448	} else { /* if i==0 then ... */
[1]	3449
[128]	3450	finished = TRUE;
	3451	strcpy(file_to_archive, curr_slice_fname_uncompressed);
	3452	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3453	break;
	3454	}
	3455	}
	3456
	3457	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3458	register_in_tape_catalog(biggieslice, biggie_file_number,
	3459	slice_num, file_to_archive);
	3460	maintain_collection_of_recent_archives(bkpinfo->tmpdir,
	3461	file_to_archive);
	3462	res = move_files_to_stream(bkpinfo, file_to_archive, NULL);
	3463	} else {
[541]	3464	res = move_files_to_cd(bkpinfo, file_to_archive, NULL);
[128]	3465	}
	3466	retval += res;
	3467	if (res) {
	3468	sprintf(tmp,
	3469	"Failed to add slice %ld of bigfile %ld to scratchdir",
	3470	slice_num, biggie_file_number + 1);
	3471	log_to_screen(tmp);
	3472	fatal_error
	3473	("Hard disk full. You should have bought a bigger one.");
	3474	}
[1]	3475	}
[128]	3476	paranoid_fclose(fin);
	3477	sprintf(tmp, "Sliced bigfile #%ld", biggie_file_number + 1);
	3478	if (retval) {
	3479	strcat(tmp, "...FAILED");
	3480	} else {
	3481	strcat(tmp, "...OK!");
[1]	3482	}
[1107]	3483	mr_msg(1, tmp);
[1080]	3484	mr_free(tempblock);
	3485	mr_free(tmp);
	3486	mr_free(checksum_line);
	3487	mr_free(command);
	3488	mr_free(curr_slice_fname_uncompressed);
	3489	mr_free(curr_slice_fname_compressed);
	3490	mr_free(file_to_archive);
	3491	mr_free(suffix);
[128]	3492	return (retval);
[1]	3493	}
	3494
	3495
	3496
	3497
	3498
	3499
	3500	/**
	3501	* Remove the archives in @c d.
	3502	* This could possibly include any of:
	3503	* - all afioballs (compressed and not)
	3504	* - all filelists
	3505	* - all slices
	3506	* - all checksums
	3507	* - a zero filler file
	3508	*
	3509	* @param d The directory to wipe the archives from.
	3510	* @ingroup utilityGroup
	3511	*/
[128]	3512	void wipe_archives(char *d)
[1]	3513	{
[128]	3514	/@ buffers ******************************************** */
	3515	char *tmp;
	3516	char *dir;
[1]	3517
[128]	3518	malloc_string(tmp);
	3519	malloc_string(dir);
	3520	assert_string_is_neither_NULL_nor_zerolength(d);
[1]	3521
[128]	3522	sprintf(dir, "%s/archives", d);
	3523	sprintf(tmp, "find %s -name '.afio' -exec rm -f '{}' \\;", dir);
	3524	run_program_and_log_output(tmp, FALSE);
	3525	sprintf(tmp, "find %s -name 'list.[0-9]' -exec rm -f '{}' \\;", dir);
	3526	run_program_and_log_output(tmp, FALSE);
	3527	sprintf(tmp, "find %s -name 'slice*' -exec rm -f '{}' \\;", dir);
	3528	run_program_and_log_output(tmp, FALSE);
	3529	sprintf(tmp, "rm -f %s/cklist*", dir);
	3530	run_program_and_log_output(tmp, FALSE);
	3531	sprintf(tmp, "rm -f %s/zero", dir);
	3532	run_program_and_log_output(tmp, FALSE);
[1107]	3533	mr_msg(1, "Wiped %s's archives", dir);
[128]	3534	sprintf(tmp, "ls -l %s", dir);
	3535	run_program_and_log_output(tmp, FALSE);
[1080]	3536	mr_free(tmp);
	3537	mr_free(dir);
[1]	3538	}
	3539
	3540
	3541
	3542	/**
	3543	* @addtogroup LLarchiveGroup
	3544	* @{
	3545	*/
	3546	/**
	3547	* Write the final ISO image.
	3548	* @param bkpinfo The backup information structure. Used only
	3549	* in the call to @c write_iso_and_go_on().
	3550	* @return The number of errors encountered (0 for success)
	3551	* @see write_iso_and_go_on
	3552	* @see make_iso_fs
	3553	* @bug The final ISO is written even if there are no files on it. In practice,
	3554	* however, this occurs rarely.
	3555	*/
[541]	3556	int write_final_iso_if_necessary(struct s_bkpinfo *bkpinfo)
[1]	3557	{
[128]	3558	/@ int **************************************************** */
	3559	int res;
[1]	3560
[128]	3561	/@ buffers ************************************************* */
	3562	char *tmp;
[1]	3563
[128]	3564	malloc_string(tmp);
	3565	assert(bkpinfo != NULL);
[1]	3566
	3567	// 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
	3568
[128]	3569	sprintf(tmp, "Writing the final ISO");
[1107]	3570	mr_msg(2, tmp);
[128]	3571	center_string(tmp, 80);
[1]	3572	#ifndef _XWIN
[128]	3573	if (!g_text_mode) {
	3574	newtPushHelpLine(tmp);
	3575	}
[1]	3576	#endif
[541]	3577	res = write_iso_and_go_on(bkpinfo, TRUE);
[1]	3578	#ifndef _XWIN
[128]	3579	if (!g_text_mode) {
	3580	newtPopHelpLine();
	3581	}
[1]	3582	#endif
[1107]	3583	mr_msg(2, "Returning from writing final ISO (res=%d)", res);
[1080]	3584	mr_free(tmp);
[128]	3585	return (res);
[1]	3586	}
	3587
	3588
	3589	/**
[20]	3590	* Write an ISO image to <tt>[bkpinfo->isodir]/bkpinfo->prefix-[g_current_media_number].iso</tt>.
[1]	3591	* @param bkpinfo The backup information structure. Fields used:
	3592	* - @c backup_media_type
[20]	3593	* - @c prefix
[1]	3594	* - @c isodir
	3595	* - @c manual_cd_tray
	3596	* - @c media_size
	3597	* - @c nfs_mount
	3598	* - @c nfs_remote_dir
	3599	* - @c scratchdir
	3600	* - @c verify_data
	3601	*
	3602	* @param last_cd If TRUE, this is the last CD to write; if FALSE, it's not.
	3603	* @return The number of errors encountered (0 for success)
	3604	* @see make_iso_fs
	3605	*/
[541]	3606	int write_iso_and_go_on(struct s_bkpinfo *bkpinfo, bool last_cd)
[1]	3607	{
[128]	3608	/@ pointers *************************************************** */
	3609	FILE *fout;
[1]	3610
[128]	3611	/@ buffers **************************************************** */
	3612	char *tmp;
	3613	char *cdno_fname;
	3614	char *lastcd_fname;
	3615	char *isofile;
[1]	3616
[128]	3617	/@ bool ******************************************************* */
	3618	bool that_one_was_ok;
	3619	bool using_nfs;
	3620	bool orig_vfy_flag_val;
[1]	3621
[128]	3622	/@ int ********************************************************** */
	3623	int res = 0;
[1]	3624
[128]	3625	malloc_string(tmp);
	3626	malloc_string(cdno_fname);
	3627	malloc_string(lastcd_fname);
	3628	malloc_string(isofile);
[1]	3629
[128]	3630	assert(bkpinfo != NULL);
	3631	orig_vfy_flag_val = bkpinfo->verify_data;
	3632	if (bkpinfo->media_size[g_current_media_number] <= 0) {
	3633	fatal_error("write_iso_and_go_on() - unknown media size");
	3634	}
[1]	3635
[128]	3636	if (strlen(bkpinfo->nfs_mount) > 1) {
	3637	using_nfs = TRUE;
	3638	} else {
	3639	using_nfs = FALSE;
	3640	}
[1107]	3641	mr_msg(1, "OK, time to make %s #%d",
[128]	3642	media_descriptor_string(bkpinfo->backup_media_type),
	3643	g_current_media_number);
[1]	3644
[128]	3645	/* label the ISO with its number */
[1]	3646
[128]	3647	sprintf(cdno_fname, "%s/archives/THIS-CD-NUMBER", bkpinfo->scratchdir);
	3648	fout = fopen(cdno_fname, "w");
	3649	fprintf(fout, "%d", g_current_media_number);
	3650	paranoid_fclose(fout);
[1]	3651
[128]	3652	sprintf(tmp, "cp -f %s/autorun %s/", g_mondo_home,
	3653	bkpinfo->scratchdir);
	3654	if (run_program_and_log_output(tmp, FALSE)) {
[1107]	3655	mr_msg(2, "Warning - unable to copy autorun to scratchdir");
[1]	3656	}
[128]	3657
	3658	/* last CD or not? Label accordingly */
	3659	sprintf(lastcd_fname, "%s/archives/NOT-THE-LAST", bkpinfo->scratchdir);
	3660	if (last_cd) {
	3661	unlink(lastcd_fname);
[1107]	3662	mr_msg(2,
[128]	3663	"OK, you're telling me this is the last CD. Fair enough.");
	3664	} else {
	3665	fout = fopen(lastcd_fname, "w");
	3666	fprintf(fout,
	3667	"You're listening to 90.3 WPLN, Nashville Public Radio.\n");
	3668	paranoid_fclose(fout);
[1]	3669	}
[128]	3670	if (space_occupied_by_cd(bkpinfo->scratchdir) / 1024 >
	3671	bkpinfo->media_size[g_current_media_number]) {
	3672	sprintf(tmp,
[1087]	3673	"Warning! %s is too big. It occupies %ld KB, which is more than the %ld KB allowed.",
	3674	media_descriptor_string(bkpinfo->backup_media_type),
[128]	3675	(long) space_occupied_by_cd(bkpinfo->scratchdir),
	3676	(long) bkpinfo->media_size[g_current_media_number]);
	3677	log_to_screen(tmp);
	3678	}
[1087]	3679	if (bkpinfo->backup_media_type != usb) {
	3680	sprintf(isofile, "%s/%s/%s-%d.iso", bkpinfo->isodir,
[128]	3681	bkpinfo->nfs_remote_dir, bkpinfo->prefix,
	3682	g_current_media_number);
[1087]	3683	} else {
	3684	}
[128]	3685	for (that_one_was_ok = FALSE; !that_one_was_ok;) {
[1087]	3686	if (bkpinfo->backup_media_type != usb) {
	3687	res = make_iso_fs(bkpinfo, isofile);
	3688	} else {
	3689	}
[128]	3690	if (g_current_media_number == 1 && !res
	3691	&& (bkpinfo->backup_media_type == cdr
	3692	\|\| bkpinfo->backup_media_type == cdrw)) {
	3693	if (find_cdrom_device(tmp, FALSE)) // make sure find_cdrom_device() finds, records CD-R's loc
	3694	{
[1107]	3695	mr_msg(3, "Sigh Mike, I hate your computer.");
[128]	3696	bkpinfo->manual_cd_tray = TRUE;
	3697	} // if it can't be found then force pausing
	3698	else {
[1107]	3699	mr_msg(3, "Great. Found Mike's CD-ROM drive.");
[128]	3700	}
[1]	3701	}
[128]	3702	if (bkpinfo->verify_data && !res) {
	3703	log_to_screen
	3704	("Please reboot from the 1st %s in Compare Mode, as a precaution.",
	3705	media_descriptor_string(g_backup_media_type));
	3706	chdir("/");
	3707	iamhere("Before calling verify_cd_image()");
	3708	res += verify_cd_image(bkpinfo);
	3709	iamhere("After calling verify_cd_image()");
[1]	3710	}
[128]	3711	if (!res) {
	3712	that_one_was_ok = TRUE;
	3713	} else {
	3714	sprintf(tmp, "Failed to burn %s #%d. Retry?",
	3715	media_descriptor_string(bkpinfo->backup_media_type),
	3716	g_current_media_number);
	3717	res = ask_me_yes_or_no(tmp);
	3718	if (!res) {
	3719	if (ask_me_yes_or_no("Abort the backup?")) {
	3720	fatal_error("FAILED TO BACKUP");
	3721	} else {
	3722	break;
	3723	}
	3724	} else {
[1107]	3725	mr_msg(2, "Retrying, at user's request...");
[128]	3726	res = 0;
	3727	}
	3728	}
[1]	3729	}
	3730	/*
	3731	if (using_nfs)
	3732	{
	3733	sprintf(tmp,"mv -f %s %s/%s/", isofile, bkpinfo->isodir, bkpinfo->nfs_remote_dir);
	3734	if (run_program_and_log_output(tmp, FALSE))
	3735	{ log_to_screen("Unable to move ISO to NFS dir"); }
	3736	}
	3737	*/
[128]	3738	g_current_media_number++;
	3739	if (g_current_media_number > MAX_NOOF_MEDIA) {
	3740	fatal_error("Too many CD-R(W)'s. Use tape or net.");
	3741	}
	3742	wipe_archives(bkpinfo->scratchdir);
	3743	sprintf(tmp, "rm -Rf %s/images/gz %s/images/data*img",
	3744	bkpinfo->scratchdir, bkpinfo->scratchdir);
	3745	if (system(tmp)) {
[1107]	3746	mr_msg
[128]	3747	(2,
	3748	"Error occurred when I tried to delete the redundant IMGs and GZs");
	3749	}
[1]	3750
[128]	3751	if (last_cd) {
[1107]	3752	mr_msg(2, "This was your last CD.");
[128]	3753	} else {
[1107]	3754	mr_msg(2, "Continuing to backup your data...");
[128]	3755	}
[1]	3756
[128]	3757	bkpinfo->verify_data = orig_vfy_flag_val;
[1080]	3758	mr_free(tmp);
	3759	mr_free(cdno_fname);
	3760	mr_free(lastcd_fname);
	3761	mr_free(isofile);
[128]	3762	return (0);
[1]	3763	}
	3764
	3765	/* @} - end of LLarchiveGroup */
	3766
	3767
	3768
	3769
	3770	/**
	3771	* Verify the user's data.
	3772	* @param bkpinfo The backup information structure. Fields used:
	3773	* - @c backup_data
	3774	* - @c backup_media_type
	3775	* - @c media_device
	3776	* - @c verify_data
	3777	*
	3778	* @return The number of errors encountered (0 for success)
	3779	* @ingroup verifyGroup
	3780	*/
	3781	int verify_data(struct s_bkpinfo *bkpinfo)
	3782	{
[128]	3783	int res = 0, retval = 0, cdno = 0;
	3784	char *tmp;
	3785	long diffs = 0;
[1]	3786
[128]	3787	malloc_string(tmp);
	3788	assert(bkpinfo != NULL);
	3789	if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
	3790	chdir("/");
	3791	mvaddstr_and_log_it(g_currentY, 0,
	3792	"Verifying archives against live filesystem");
	3793	if (bkpinfo->backup_media_type == cdstream) {
	3794	strcpy(bkpinfo->media_device, "/dev/cdrom");
	3795	}
	3796	verify_tape_backups(bkpinfo);
	3797	mvaddstr_and_log_it(g_currentY++, 74, "Done.");
	3798	} else if (bkpinfo->backup_data)
	3799	//bkpinfo->backup_media_type == cdrw \|\| bkpinfo->backup_media_type == cdr))
[1]	3800	{
[1107]	3801	mr_msg(2,
[128]	3802	"Not verifying again. Per-CD/ISO verification already carried out.");
	3803	paranoid_system
	3804	("cat /tmp/changed.files.* > /tmp/changed.files 2> /dev/null");
	3805	} else {
	3806	g_current_media_number = cdno;
	3807	if (bkpinfo->backup_media_type != iso) {
	3808	find_cdrom_device(bkpinfo->media_device, FALSE); // replace 0,0,0 with /dev/cdrom
[1]	3809	}
[128]	3810	chdir("/");
	3811	for (cdno = 1; cdno < 99 && bkpinfo->verify_data; cdno++) {
	3812	if (cdno != g_current_media_number) {
[1107]	3813	mr_msg(2,
[128]	3814	"Warning - had to change g_current_media_number from %d to %d",
	3815	g_current_media_number, cdno);
	3816	g_current_media_number = cdno;
	3817	}
	3818	if (bkpinfo->backup_media_type != iso) {
	3819	insist_on_this_cd_number(bkpinfo, cdno);
	3820	}
	3821	res = verify_cd_image(bkpinfo); // sets verify_data to FALSE if it's time to stop verifying
	3822	retval += res;
	3823	if (res) {
	3824	sprintf(tmp,
	3825	"Warnings/errors were reported while checking %s #%d",
	3826	media_descriptor_string(bkpinfo->
	3827	backup_media_type),
	3828	g_current_media_number);
	3829	log_to_screen(tmp);
[1]	3830
[128]	3831	}
[1]	3832	}
	3833	/*
	3834	sprintf (tmp,
	3835	"cat %s \| grep \"afio: \" \| cut -d'\"' -f2 \| sort -u \| awk '{print \"/\"$0;};' \| tr -s '/' '/' \| grep -vx \"/afio:.*\" > /tmp/changed.files",
	3836	MONDO_LOGFILE);
	3837	system (tmp);
	3838	*/
[128]	3839	sprintf(tmp,
[911]	3840	"grep 'afio: ' %s \| sed 's/afio: //' \| grep -vE '^/dev/.*$' >> /tmp/changed.files",
[128]	3841	MONDO_LOGFILE);
	3842	system(tmp);
	3843
	3844	sprintf(tmp,
[911]	3845	"grep 'star: ' %s \| sed 's/star: //' \| grep -vE '^/dev/.*$' >> /tmp/changed.files",
[128]	3846	MONDO_LOGFILE);
	3847	system(tmp);
	3848	run_program_and_log_output("umount " MNT_CDROM, FALSE);
	3849	// if (bkpinfo->backup_media_type != iso && !bkpinfo->please_dont_eject_when_restoring)
[1]	3850	//{
[128]	3851	eject_device(bkpinfo->media_device);
[1]	3852	//}
	3853	}
[128]	3854	diffs = count_lines_in_file("/tmp/changed.files");
[1]	3855
[128]	3856	if (diffs > 0) {
	3857	if (retval == 0) {
	3858	retval = (int) (-diffs);
	3859	}
[1]	3860	}
[1080]	3861	mr_free(tmp);
[128]	3862	return (retval);
[1]	3863	}
	3864
	3865
	3866
	3867
	3868
	3869	/**
	3870	* @addtogroup utilityGroup
	3871	* @{
	3872	*/
	3873	/**
	3874	* Write an image to a real 3.5" floppy disk.
	3875	* @param device The device to write to (e.g. @c /dev/fd0)
	3876	* @param datafile The image to write to @p device.
	3877	* @return The number of errors encountered (0 for success)
	3878	* @see write_image_to_floppy
	3879	*/
[128]	3880	int write_image_to_floppy_SUB(char device, char datafile)
[1]	3881	{
[128]	3882	/@ int ************************************************************** */
	3883	int res = 0;
[1]	3884	int percentage = 0;
	3885	int blockno = 0;
[128]	3886	int maxblocks = 0;
[1]	3887
[128]	3888	/@ buffers*********************************************************** */
	3889	char *tmp;
[1]	3890	char blk[1024];
	3891	char *title;
	3892
[128]	3893	/@ pointers ********************************************************* */
[1]	3894	char *p;
[128]	3895	FILE fout, fin;
[1]	3896
	3897
[128]	3898	malloc_string(tmp);
	3899	malloc_string(title);
	3900	/* pretty stuff */
	3901	if (!(p = strrchr(datafile, '/'))) {
	3902	p = datafile;
	3903	} else {
	3904	p++;
[1]	3905	}
[128]	3906	sprintf(title, "Writing %s to floppy", p);
	3907	open_evalcall_form(title);
	3908	/* functional stuff */
	3909	for (p = device + strlen(device); p != device && isdigit(*(p - 1));
	3910	p--);
	3911	maxblocks = atoi(p);
	3912	if (!maxblocks) {
	3913	maxblocks = 1440;
[1]	3914	}
[128]	3915	sprintf(tmp, "maxblocks = %d; p=%s", maxblocks, p);
[1107]	3916	mr_msg(2, tmp);
[128]	3917	/* copy data from image to floppy */
	3918	if (!(fin = fopen(datafile, "r"))) {
	3919	log_OS_error("Cannot open img");
	3920	return (1);
[1]	3921	}
[128]	3922	if (!(fout = fopen(device, "w"))) {
	3923	log_OS_error("Cannot open fdd");
	3924	return (1);
	3925	}
	3926	for (blockno = 0; blockno < maxblocks; blockno++) {
	3927	percentage = blockno * 100 / maxblocks;
	3928	if (fread(blk, 1, 1024, fin) != 1024) {
	3929	if (feof(fin)) {
[1107]	3930	mr_msg(1,
[128]	3931	"img read err - img ended prematurely - non-fatal error");
	3932	sleep(3);
	3933	return (res);
	3934	}
	3935	res++;
	3936	log_to_screen("img read err");
	3937	}
	3938	if (fwrite(blk, 1, 1024, fout) != 1024) {
	3939	res++;
	3940	log_to_screen("fdd write err");
	3941	}
	3942	if (((blockno + 1) % 128) == 0) {
	3943	paranoid_system("sync"); /* fflush doesn't work; dunno why */
	3944	update_evalcall_form(percentage);
	3945	}
	3946	}
	3947	paranoid_fclose(fin);
	3948	paranoid_fclose(fout);
[1080]	3949	mr_free(tmp);
	3950	mr_free(title);
[128]	3951	close_evalcall_form();
	3952	return (res);
[1]	3953	}
	3954
	3955
	3956
	3957
	3958
	3959
	3960
	3961
	3962
	3963	/**
	3964	* Wrapper around @c write_image_to_floppy_SUB().
	3965	* This function, unlike @c write_image_to_floppy_SUB(),
	3966	* gives the user the opportunity to retry if the write fails.
	3967	* @see write_image_to_floppy_SUB
	3968	*/
[128]	3969	int write_image_to_floppy(char device, char datafile)
[1]	3970	{
[128]	3971	/@ int ************************************************************* */
	3972	int res = 0;
[1]	3973
[128]	3974	assert_string_is_neither_NULL_nor_zerolength(device);
	3975	assert_string_is_neither_NULL_nor_zerolength(datafile);
[1]	3976
[128]	3977	while ((res = write_image_to_floppy_SUB(device, datafile))) {
	3978	if (!ask_me_yes_or_no("Failed to write image to floppy. Retry?")) {
	3979	return (res);
	3980	}
[1]	3981	}
[128]	3982	return (res);
[1]	3983	}
	3984
	3985	/* @} - end of utilityGroup */
[259]	3986
[424]	3987	void setenv_mondo_share(void) {
[259]	3988
[424]	3989	setenv("MONDO_SHARE", MONDO_SHARE, 1);
[1087]	3990	setenv("MONDORESTORECFG", MONDORESTORECFG, 1);
	3991	setenv("MONDO_CACHE", MONDO_CACHE, 1);
[259]	3992	}

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

Download in other formats: