#include <stdlib.h>
#include <stdio.h>
#include <process.h>
#include <errno.h>
#include <windows.h>

#include "toolpaths.h"

int 
main(int argc, char **argv)
{
  int     iRetVal;
  int startOfArgvs;
  int i = 0;
  int j = 0;
  int link = 0;

  char* args[1000];
  char  outputFileArg[1000];

  args[i++] = "clarm.exe";
  args[i++] = "/I\"" WCE_INC "\""; 
  args[i++] = "/I\"" SHUNT_INC "\""; 

  args[i++] = "/FI\"mozce_shunt.h\"";

  args[i++] = "/DARM";
  args[i++] = "/DWINCE";
  args[i++] = "/D_ARM_";
  args[i++] = "/DDEPRECATE_SUPPORTED";
  args[i++] = "/DSTDC_HEADERS";

  args[i++] = "/F5000000";

  startOfArgvs = i;
  
  i += argpath_conv(&argv[1], &args[i]);

  // if /Fe is passed, then link
  //
  // if -o is passed, then blank out this argument, and place a "/Fo"
  // before the next argument
  while(argv[j])
  {
    if (strncmp(argv[j], "-o", 2) == 0)
    {
	    if ( strstr(args[startOfArgvs+j], ".obj") )
	    {
		    // If we are outputting a .OBJ file, then we are
		    // NOT linking, and we need to do some fancy
		    // footwork to output "/FoFILENAME" as an argument
		    args[startOfArgvs+j-1] = "";
		    strcpy(outputFileArg, "/Fo");
		    strcat(outputFileArg, args[startOfArgvs+j]);
		    args[startOfArgvs+j] = outputFileArg;
	    } else
	    {
		    // Otherwise, we are linking as usual
		    link = 1;
	    }
    }
//    if (strncmp(argv[j], "-o", 2) == 0)
//    {
//      link = 1;
//    }
    j++;
  }

  if (link)
  {
    args[i++] = "/link";
    args[i++] = "-STACK:0x5000000,1000000";
    args[i++] = "-ENTRY:mainACRTStartup";
    args[i++] = "-SUBSYSTEM:WINDOWSCE";
    args[i++] = "-MACHINE:ARM";
    args[i++] = "\\\"-LIBPATH:\"" WCE_LIB "\\\"";
    args[i++] = "\\\"-LIBPATH:\"" SHUNT_LIB "\\\"";
    args[i++] = "shunt.lib";
    args[i++] = "winsock.lib"; 
    args[i++] = "corelibc.lib";
    args[i++] = "coredll.lib";
  }
  args[i] = NULL;

  dumpargs(args);

  iRetVal = _spawnv( _P_WAIT, CL_PATH, args );
  if (iRetVal == -1)
  {
    printf("-----------------> %d <----------------------\n\n\n\n", errno);
  }
  return iRetVal;
}