/* 
	FIPS - the First nondestructive Interactive Partition Splitting program 
 
	Module global.cpp 
 
	RCS - Header: 
	$Header: c:/daten/fips/source/main/RCS/global.cpp 1.1 1994/05/25 22:19:49 schaefer Exp schaefer $ 
 
	Copyright (C) 1993 Arno Schaefer 
 
	This program is free software; you can redistribute it and/or modify 
	it under the terms of the GNU General Public License as published by 
	the Free Software Foundation; either version 2 of the License, or 
	(at your option) any later version. 
 
	This program is distributed in the hope that it will be useful, 
	but WITHOUT ANY WARRANTY; without even the implied warranty of 
	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the 
	GNU General Public License for more details. 
 
	You should have received a copy of the GNU General Public License 
	along with this program; if not, write to the Free Software 
	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 
 
 
	Report problems and direct all questions to: 
 
	schaefer@rbg.informatik.th-darmstadt.de 
*/ 
 
#include <stdarg.h> 
#include <conio.h> 
#include <stdlib.h> 
#include <string.h> 
#include "global.h" 
 
#define CTRL_C 3 
 
global_vars global; 
 
/* ----------------------------------------------------------------------- */ 
/* Initialization of global variables                                      */ 
/* ----------------------------------------------------------------------- */ 
 
global_vars::global_vars (void) 
{ 
	test_mode = false; 
	verbose_mode = true; 
	debug_mode = false; 
 
	override_multiple_boot = false; 
	override_bootable_flag = false; 
	override_rootdir_entries = false; 
	override_large_fat = false; 
	override_small_fat = false; 
	override_media_descriptor = false; 
 
	drive_number_cmdline = 0; 
	partition_number_cmdline = 0; 
	new_start_cylinder_cmdline = 0; 
} 
 
global_vars::~global_vars (void) 
{ 
	if (debug_mode) fclose (debugfile); 
} 
 
void exit_function (void) 
{ 
	printx ("\nBye!\n"); 
} 
 
void global_vars::open_debugfile (int argc,char *argv[]) 
{ 
	if ((debugfile = fopen ("fipsinfo.dbg","wt")) == NULL) 
	{ 
		global.debug_mode = false; 
		warning ("Can't open debugfile"); 
	} 
	else 
	{ 
		fprintf (debugfile,"FIPS Debug File\n\n"); 
		fprintf (debugfile,"The command was: "); 
		while (argc--) fprintf (debugfile,argc ? "%s " : "%s", *argv++); 
		fprintf (debugfile,"\n\nTranscript of session:\n"); 
	} 
} 
 
/* ----------------------------------------------------------------------- */ 
/* Replacement for printf - prints to screen and debugfile                 */ 
/* ----------------------------------------------------------------------- */ 
 
void printx (char *fmt,...) 
{ 
	va_list ap; 
	va_start (ap,fmt); 
	vprintf (fmt,ap); 
	if (global.debug_mode) vfprintf (global.debugfile,fmt,ap); 
	va_end (ap); 
} 
 
/* ----------------------------------------------------------------------- */ 
/* Replacement for getch - exit when CTRL-C is pressed                     */ 
/* ----------------------------------------------------------------------- */ 
 
int getx (void) 
{ 
	int character = getch(); 
	if (character == CTRL_C) 
	{ 
		printx ("\n"); 
		exit (0); 
	} 
	return (character); 
} 
 
/* ----------------------------------------------------------------------- */ 
/* Copyright notice and version number                                     */ 
/* ----------------------------------------------------------------------- */ 
 
void notice (void) 
{ 
	printx ("\nFIPS version 1.1, Copyright (C) 1993/94 Arno Schaefer\n\n"); 
	printx ("DO NOT use FIPS in a multitasking environment like Windows, OS/2, Desqview,\n"); 
	printx ("Novell Task manager or the Linux DOS emulator: boot from a DOS boot disk first.\n\n"); 
	printx ("If you use OS/2 or a disk compressor, read the relevant sections in FIPS.DOC.\n\n"); 
	printx ("FIPS comes with ABSOLUTELY NO WARRANTY, see file COPYING for details\n"); 
	printx ("This is free software, and you are welcome to redistribute it\n"); 
	printx ("under certain conditions; again see file COPYING for details.\n"); 
 
	printx ("\nPress any Key\n"); 
	getx(); 
} 
 
/* ----------------------------------------------------------------------- */ 
/* Hexdump binary data into a file                                         */ 
/* ----------------------------------------------------------------------- */ 
 
void hexwrite (byte *buffer,int number,FILE *file) 
{ 
	for (int i=0;i<number;i++) 
	{ 
		fprintf (file,"%02X ",*(buffer+i)); 
		if ((i+1)%16 == 0) fprintf (file,"\n"); 
		else if ((i+1)%8 == 0) fprintf (file,"- "); 
	} 
	fprintf (file,"\n"); 
} 
 
/* ----------------------------------------------------------------------- */ 
/* Error Handling                                                          */ 
/* ----------------------------------------------------------------------- */ 
 
static void print_verbose_message (char *message) 
{ 
	char line[256]; 
	int length = 0; 
	FILE *error_msg_file; 
 
	fprintf (stderr,"\n"); 
	if (global.debug_mode) fprintf (global.debugfile,"\n"); 
 
	if ((error_msg_file = fopen ("errors.txt","rt")) == NULL) 
	{ 
		fprintf (stderr,"File ERRORS.TXT not found - no verbose messages available\n"); 
		if (global.debug_mode) fprintf (global.debugfile,"File ERRORS.TXT not found - no verbose messages available\n"); 
		global.verbose_mode = false; 
		return; 
	} 
 
	while (message[length] != 0 && message[length] != ':') length++; 
 
	fgets (line,255,error_msg_file); 
	while (strncmp(message,line,length)) if (fgets (line,255,error_msg_file) == NULL) return; 
	fgets (line,255,error_msg_file); 
	while (!strncmp("  ",line,2)) 
	{ 
		fprintf (stderr,"%s",line+2); 
		if (global.debug_mode) fprintf (global.debugfile,"%s",line+2); 
		if (fgets (line,255,error_msg_file) == NULL) return; 
	} 
	fclose (error_msg_file); 
} 
 
void error (char *message,...) 
{ 
	va_list ap; 
 
	fprintf (stderr,"\nError: "); 
	if (global.debug_mode) fprintf (global.debugfile,"\nError: "); 
 
	va_start (ap,message); 
	vfprintf (stderr,message,ap); 
	if (global.debug_mode) vfprintf (global.debugfile,message,ap); 
	va_end (ap); 
 
	fprintf (stderr,"\n"); 
	if (global.debug_mode) fprintf (global.debugfile,"\n"); 
 
	if (global.verbose_mode) print_verbose_message (message); 
 
	exit (-1); 
} 
 
void warning (char *message,...) 
{ 
	va_list ap; 
 
	fprintf (stderr,"\nWarning: "); 
	if (global.debug_mode) fprintf (global.debugfile,"\nWarning: "); 
 
	va_start (ap,message); 
	vfprintf (stderr,message,ap); 
	if (global.debug_mode) vfprintf (global.debugfile,message,ap); 
	va_end (ap); 
 
	fprintf (stderr,"\n"); 
	if (global.debug_mode) fprintf (global.debugfile,"\n"); 
 
	if (global.verbose_mode) print_verbose_message (message); 
 
	fprintf (stderr,"\nPress any key\n"); 
	if (global.debug_mode) fprintf (global.debugfile,"\nPress any key\n"); 
 
	getx(); 
}