main.c

/****************************************************************************
 * Copyright (C) 2020 by Ted Kotz                                           *
 *                                                                          *
 * This file is part of TernCpuEmu.                                         *
 *                                                                          *
 *   TernCpuEmu is free software: you can redistribute it and/or modify it  *
 *   under the terms of the GNU Lesser General Public License as published  *
 *   by the Free Software Foundation, either version 2 of the License, or   *
 *   (at your option) any later version.                                    *
 *                                                                          *
 *   TernCpuEmu 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 Lesser General Public License for more details.                    *
 *                                                                          *
 *   You should have received a copy of the GNU Lesser General Public       *
 *   License along with TernCpuEmu. If not, see                             *
 *   <http://www.gnu.org/licenses/>.                                        *
 ****************************************************************************/

/**
 * @file    main.c
 * @author  Ted Kotz <ted@kotz.us>
 * @version 0.1
 *
 * The main program for the Ternary Computer Emulator. This file plumbs
 * together all the parts of the system and kicks it off.
 *
 */


/* Includes ******************************************************************/
#include "cpu.h"
#include "mem.h"
#include <stdio.h>
#include <ctype.h>
/* Defines *******************************************************************/
/* Types *********************************************************************/
/* Interfaces ****************************************************************/
/* Data **********************************************************************/
/* Functions *****************************************************************/
static int fileToMem( const char* fname , int verbose)
{
    FILE* filein=NULL;
    int returnVal=-3;
    filein = fopen(fname,"r");
    if(filein == NULL)
    {
        printf("Error in opening file \"%s\".", fname);
    }
    else
    {
        returnVal=readFileIntoMem(filein, fname, verbose);
        fclose(filein);
    }
    return returnVal;
}

/**
 * Main Program entry point.
 *
 * @param argc number of command line arguments
 * @param argv array of pointers to command line arguments
 * @return 0 if successful, otherwise error code
 */
int main( int argc, char** argv )
{
    char name[80];
    char c='\r';
    int i;
    TriCpu cpu;
    TriWord addr;
    TriWord val;
    TriCpu disposable;
    resetMem();
    if( argc > 1 )
    {
        i=fileToMem(argv[1], 1);
        if(i)
        {
            return i;
        }
    }
    resetCPU(&disposable);
    resetCPU(&cpu);
    printCpuState(&cpu);
    printf("\n\nh for help, <Enter> for step: \n");
    c=getchar();
    while ('q' != c)
    {
        switch(c)
        {
            case 'r':
                printf("ADDR: ");
                ternaryScan( &addr );
                printf("\nVAL: ");
                val = ReadAddr(addr);
                ternaryPrint( val, TRITS_PER_TRYTE );
                printf("(%"PRIi64")\n", ternary2int(val));
                break;
            case 'w':
                printf("ADDR: ");
                ternaryScan( &addr );
                printf("\nVAL: ");
                ternaryScan( &val );
                WriteAddr(addr, val);
                printf("done.\n");
                break;
            case 's':
                getchar();
                printCpuState(&cpu);
                break;
            case 'c':
                getchar();
                resetCPU(&cpu);
                printCpuState(&cpu);
                break;
            case 'm':
                getchar();
                resetMem();
                printCpuState(&cpu);
                break;
            case 'f':
                printf("filename: ");
                do
                {
                    c=getchar();
                }
                while( isspace(c) );
                i=0;
                while( !isspace(c) )
                {
                    if(i<sizeof(name)-1)
                    {
                        name[i++]=c;
                    }
                    c=getchar();
                }
                name[i]='\0';
                if(0==fileToMem( name , 1))
                {
                    printf("Done. Press c to Reset CPU or s to Print CPU State.\n");
                }
                break;
            case 'h':
            case '?':
                getchar();
                printf("Help for Ternary Computer Emulator \n");
                printf("NOTE: Addresses and values are entered in balanced ternary(10-). \n");
                printf(" q : Quit\n");
                printf(" s : Print CPU State\n");
                printf(" r <ADDR> : Peek value of Tryte at Address\n");
                printf(" w <ADDR> <VAL> : Poke Value to Tryte at Address\n");
                printf(" c : Reset CPU\n");
                printf(" m : Reset Memory\n");
                printf(" f : Read file into memory\n");
                printf(" ? : help\n");
                break;
            default:
                runCPU(&cpu, 1);
                printCpuState(&cpu);
        }
        printf("\n\nh for help, <Enter> for step: \n");
        c=getchar();
    }
    return 0;
}