CD Actual 8/CDACTUAL8.iso/install/fips/source/global.cpp

C/C++ Source or Header | 1996-07-11 | 6.7 KB | 228 lines

/*
    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:

    [e-mail]
*/

#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();
}