RISC DISC 2/RISC_DISC_2.iso/pd_share/utilities/cli/nspark/main_c

Text File | 1994-12-12 | 4.4 KB | 207 lines

/*
 * main function
 *
 * $Header: main.c 1.10 93/08/20 $
 * $Log:    main.c,v $
 * Revision 1.10  93/08/20  12:39:28  arb
 * Added support for ArcFS archive detection
 *
 * Revision 1.9  93/08/20  10:30:50  arb
 * Added -C option for "convert filenames to lowercase"
 *
 * Revision 1.8  93/03/05  15:40:32  arb
 * Added <stdlib.h> for RISCOS, needed for exit()
 *
 * Revision 1.7  92/12/09  09:43:03  duplain
 * Changed "-a" option to "-T".
 *
 * Revision 1.6  92/12/08  10:19:30  duplain
 * Added -a option for "append filetype".
 *
 * Revision 1.5  92/12/07  17:18:42  duplain
 * reformatted source.
 *
 * Revision 1.4  92/10/19  09:33:09  duplain
 * Added -x as an alternative to -u.
 *
 * Revision 1.3  92/10/01  11:21:39  duplain
 * Added -R option.
 *
 * Revision 1.2  92/09/30  10:27:29  duplain
 * Added logfile option and processing.
 *
 * Revision 1.1  92/09/29  18:02:20  duplain
 * Initial revision
 *
 */

#include <stdio.h>
#include <ctype.h>
#include "spark.h"
#include "io.h"
#include "error.h"
#include "misc.h"
#include "arc.h"
#include "unarc.h"
#ifdef RISCOS
#include <stdlib.h>
#endif

#ifdef UNIX
static char rcsid[] = "$Header: main.c 1.10 93/08/20 $";
#endif /* UNIX */

char *ourname;            /* program name */
char *archive;            /* name of archive file */
char *logfile = "settypes";    /* default name for log file */
char **files;            /* optional file arguments */

unsigned char unarc = 0;    /* -u or -x */
unsigned char quiet = 0;    /* -q */
unsigned char verbose = 0;    /* -v */
unsigned char testing = 0;    /* -t */
unsigned char listing = 0;    /* -l */
unsigned char force = 0;    /* -f */
unsigned char stamp = 1;    /* -s */
unsigned char retry = 0;    /* -R */
unsigned char apptype = 0;    /* -T */
unsigned char singlecase = 0;   /* -C */
#ifdef DEBUGGING
unsigned char debugging = 0;    /* -D */
#endif /* DEBUGGING */

void usage P__((void));
int do_unarc P__((void));
int do_arc P__((void));

int
main(argc, argv)
    int argc;
    char **argv;
{
    register i;

#ifdef DEBUGGING
    /*
     * check types are defined correctly for this machine (or compiler ???)
     */
    if (sizeof(Word) != 4) {
    puts("Word size != 4");
    exit(1);
    }
    if (sizeof(Halfword) != 2) {
    puts("Halfword size != 2");
    exit(1);
    }
    if (sizeof(Byte) != 1) {
    puts("Byte size != 1");
    exit(1);
    }
#endif /* DEBUGGING */

    ourname = basename(*argv++);
    argc--;

    /*
     * parse args (can't use getopt() 'cos not all C libraries have it)
     */
    while(argc) {
    int donext = 0;
    char *arg = *argv;
    if (*arg == '-') {
        char c;
        while (!donext && !isspace(c = *++arg) && c) {
        switch(c) {
        case 'u':
        case 'x':
            unarc = 1;
            break;
        case 't':
            testing++;
            unarc = 1;    /* implied */
            break;
        case 'l':
            listing++;
            unarc = 1;    /* implied */
            break;
        case 'q':
            quiet = 1;
            break;
        case 'v':
            verbose = 1;
            break;
        case 'f':
            force = 1;
            break;
        case 's':
            stamp = 0;
            break;
        case 'R':
            retry = 1;
            break;
        case 'V':
            printf("%s v%s - maintained by %s - PUBLIC DOMAIN\n", ourname, VERSION, MAINTAINER);
            break;
        case 'T':
            apptype = 1;
            break;
        case 'C':
            singlecase = 1;
            break;
        case 'L':
            if (*++arg)
            logfile = arg;
            else
            if (--argc)
                logfile = *++argv;
            else
                usage();
            donext++;
            break;
#ifdef DEBUGGING
        case 'D':
            debugging = 1;
            break;
#endif /* DEBUGGING */
        default:
            error("unknown option '%c'", c);
            exit(1);
        }
        }
        argv++;
        argc--;
    } else
        break;
    }

    if (!argc)
    usage();

    archive = *argv++;
    files = argv;

    if (unarc)
    i = do_unarc();
    else
    i = do_arc();
    exit(i);
}


/*
 * display program usage and exit
 */
void
usage()
{
    fprintf(stderr, "usage: %s [options] archive [file ... file]\n", ourname);
    fprintf(stderr, "       where options are:\n");
    fprintf(stderr, "       -u or -x unarchive           -t test archive integrity\n");
    fprintf(stderr, "       -l list archive contents     -q quiet\n");
    fprintf(stderr, "       -f force file overwrite      -s no filestamp\n");
    fprintf(stderr, "       -v verbose                   -V display version number\n");
    fprintf(stderr, "       -R retry if archive corrupt  -L<name> set logfile name\n");
    fprintf(stderr, "       -T append filetype to name   -C create lowercase filenames\n");
    exit(1);
}