//----------------------------------------------------------------------------
//
// Copyright (c) 1998, 2001 Epson Research and Development, Inc.
// All rights reserved.
//
//----------------------------------------------------------------------------

/* entry.c - initialization for 13506 test and diagnostics routines */

#include <stdio.h>
#include <mpc821.h>

#define SE_NODEFMAIN
#include "hal.h"
#include "ads-io.h"

#define	CMDBUFSIZE 80

int seMain(int argc, char *argv[]);
void seExit(int status);
int read(int handle, void *buffer, unsigned int count);

static void SetupCS (void)
{
	PDA *immr = (PDA *) (GetIMMR () & 0xffff0000L);

	immr->memc_br4 = 0x400801L;	/* base addr $400000, 16 bit port, GPCM */
#ifdef	SED_GENERIC_BUS
	immr->memc_or4 = 0xffc00708L;   /* normal negation, 1/2 clock delay on CS, assert BI */
#else
	immr->memc_or4 = 0xffc00608L;   /* don't assert BI */
#endif
}

int main()
{
   int argc,j, len;
   char *argv[6];
   char cmdbuf[CMDBUFSIZE+1];
   extern void SMC2Init (void);

/* turn off i/o buffering */
   setvbuf (stdin, 0, _IONBF, 0);
   setvbuf (stdout, 0, _IONBF, 0);
   setvbuf (stderr, 0, _IONBF, 0);

/* set up chip selects to 13506 */
   SetupCS ();

   SMC2Init();

/* get command line parameters */
#ifdef BUSTED_UART
   Write (1,"\nArguments:",sizeof("\nArguments:"));
  	len = Read (0, cmdbuf, CMDBUFSIZE)-1;
#else
   printf ("\nArguments:");
  	len = read (0, cmdbuf, CMDBUFSIZE)-1;
#endif

   /* parse command line into argv [] */
   
   argv[0] = "argv0";

   for (j = 0,argc = 1; (argc < sizeof(argv)/sizeof(argv[0])) && (j < len);)
      {
      /* skip leading blanks */

      for (; (j < len) && (cmdbuf[j] == ' '); j++);

      argv[argc] = &cmdbuf[j];

      if (j < len)
         {
         argc++;

         /* skip the non-blank characters */

         for (; (j < len) && (cmdbuf[j] != ' '); j++);

         /* terminate the argument */

         cmdbuf[j++] = 0;
         }
      }

/* execute main program and return result */
//   return seMain(argc,argv);
   seExit(seMain(argc,argv));
   return 0;
}