initopts.c

/*
 *  dis [-p predefineds] file
 *
 *  The -p option may be repeated.
 */

#include <stdlib.h>

#include "dis.h"

char *predef[NPREDEF];
int  npredef = 0;
char *global_file;
char *progname = "dis";
int  bopt = UNKNOWN;
int global_base_address = 0;
int global_vector_address = 0x10000;
int asmout = 0;

static void usage(void)
{
    fprintf(
        stderr,
        "Usage: %s <format> <options> <object-file>\n"
        "  format:   -r <address>   raw binary file\n"
        "            -b             Atari boot format\n"
        "            -l             Atari load format\n"
        "            -c             Commodore 64\n"
        "  options:  -a             assembly output\n"
        "            -p <file>      predefines\n"
        "            -v <address>   alternate vector address\n"
        "            -7             mask character data to 7-bit\n"
                "  output:   -O             Original format (default)\n"
                "            -L             Lancaster format (similar to ADE)\n"
                "            -B             BeebAsm format\n",
        progname
    );
    exit(EXIT_FAILURE);
}

void initopts(int argc, char *argv[])
{
    int ai;
    char *ca;
    char *p;
    int fileset = 0;

    progname = argv[0];
    pf_selected = &pf_orig;

    while (--argc) {
        if ((*++argv)[0] == '-') {
            ca = *argv;
            for(ai = 1; ca[ai] != '\0'; ai++) {
                switch (ca[ai]) {
                    case 'a':
                        asmout = 1;
                        break;
                    case 'p':
                        predef[npredef] = *++argv;
                        npredef++;
                        argc--;
                        break;
                    case 'r':
                        global_base_address = strtoul(*++argv, &p, 0);
                        if (*p)
                            crash("Base address must be specified");
                        bopt = RAW_BINARY;
                        argc--;
                        break;
                    case 'v':
                        global_vector_address = strtoul(*++argv, &p, 0);
                        if (*p)
                            crash("Vector address required");
                        argc--;
                        break;
                    case 'l':
                        bopt = ATARI_LOAD;
                        break;
                    case 'c':
                        bopt = C64_LOAD;
                        break;
                    case 'b':
                        bopt = ATARI_BOOT;
                        break;
                    case '7':
                        sevenbit = 1;
                        break;
                    case 'A':
                        pf_selected = &pf_as;
                        break;
                    case 'B':
                        pf_selected = &pf_beebasm;
                        break;
                    case 'C':
                        pf_selected = &pf_ca65;
                        break;
                    case 'L':
                        pf_selected = &pf_lanc;
                        break;
                    case 'O':
                        pf_selected = &pf_orig;
                        break;
                    default:
                        crash("Invalid option letter");
                }
            }
        }
        else if (!fileset) {
            global_file = *argv;
            fileset++;
        }
        else
            usage();
    }

    if (!fileset) {
        usage();
    }
}