// File:	Draw_Main.cxx
// Created:	Thu Dec 30 10:40:46 1999
// Author:	Roman LYGIN
//		<rln@burnax.nnov.matra-dtv.fr>

// *******************************************************************
//    RLN  06 January 2000
// *******************************************************************
// This file is built from former NTMain.pxx duplicated in many executables
// extending DRAW Test Harness.
// Now is implemented only in one instance.

// Differences between CAS.CADE versions:
//  - in C21 Draw_Appli is defined in Draw.cxx (DRAW UL) and calls externally
// defined Draw_InitAppli. Moreover, on WNT Draw_Appli was not declared as 
// Standard_EXPORT and therefore it has to be duplicated explicitly in this
// code as in Draw.cxx.
//  - in C30 Draw_Appli accepts Draw_InitAppli as parameter which is given to
// it in each executable. Draw_Appli is declared as Standard_EXPORT and
// therefore it needs not to be duplicated.
  
// To have only one instance of this file and to call it from all the executables
// thereare defined macros in .hxx that replace main/WinMain functions and which
// calls _main_/_WinMain_ defined in this file with specified Draw_InitAppli.
// To avoid Unresolved symbols on WNT, Draw_InitAppli is explicitly defined in this
// file as simple invoker of the function statically stored in this file and which
// is initialized by main/_WinMain_.  

// WARNING: Although versions C21 and C30 are synchronised as much as they can,
// there are two versions of this file for both configurations. This is explained by:
// - Standard_IMPOR is differently defined,
// - Draw_Appli is differently declared.
  

// *******************************************************************
//    CKY  18 Juilet 1997
// *******************************************************************
//  MAIN a la sauce WNT
//  EXPLICATION : un MAIN sous NT, c est quelque chose ... different de sous UNIX
//  ilya un tas de trucs a initialiser
//  Deux aspects : le main et Draw_Appli
//  le main est specifique : arguments, creation de "console"
//  Draw_Appli aussi, mais comme certains peuvent le redefinir, et que
//  NT ne permet pas cela, eh be il est duplique dans chaque main ...
//  Ceci a l identique. Youpi
//
//  Ce source comprend :
//  - un main repris : WinMain, qui en particlier definit une "console"
//  - un Draw_Appli repris
//  - la plupart des ifdef WNT sont laisses pour memoire
//  MAIS CE CODE N EST COMPILABLE QU EN NT
//
//  MODE D EMPLOI
//  Dans le source de l exec .cxx, Inclure ce gros paquet (NTMain.pxx)
//  a la place des includes courants et du main, en ifdef WNT of course
//
//  On laisse les includes specifiques ainsi que le Draw_InitAppli
//    qui lui aussi est specifique
//  
//  ATTENTION, avant de faire umake, taper cette commande magique (?)
//  setenv (WOK_EXETYPE) W
// *******************************************************************

#include <Draw_Main.hxx>
#include <stdlib.h>
#include <string.h>
#include <Draw_Appli.hxx>
#include <OSD.hxx>

#include <tcl.h>

#ifdef HAVE_CONFIG_H
# include <config.h>
#endif

#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
  
#ifdef WNT
#define strcasecmp stricmp
#include <sys/stat.h>
#include <Draw_Window.hxx>

#include <windows.h>
#include <stdio.h>
#include <io.h>
#include <fcntl.h>

//extern Standard_IMPORT Draw_Viewer dout; // for C21
Standard_IMPORT Draw_Viewer dout; // for C30
//extern Standard_IMPORT Draw_Interpretor theCommands; // for C21
Standard_IMPORT Draw_Interpretor theCommands; //for C30
//extern Standard_IMPORT Standard_Boolean Draw_Batch; // for C21
Standard_IMPORT Standard_Boolean Draw_Batch; //for C30

static char* ColorNames[MAXCOLOR] = {
  "White","Red","Green","Blue","Cyan","Gold","Magenta",
  "Maroon","Orange","Pink","Salmon","Violet","Yellow","Khaki","Coral"
  };

static   Standard_Boolean XLoop;

// extern Standard_IMPORT Standard_Boolean Draw_Interprete(char* command); //for C21
Standard_IMPORT Standard_Boolean Draw_Interprete(char* command); //for C30
// true if complete command

// necessary for WNT in C21 only
static FDraw_InitAppli theDraw_InitAppli; //pointer to the Draw_InitAppli
static void Draw_InitAppli(Draw_Interpretor& theCommands)
{
  theDraw_InitAppli (theCommands);
}
#endif

#ifdef WNT
//=======================================================================
//NOTE: OCC11
//     On Windows NT, both console (UNIX-like) and windowed (classical on 
//     WNT, with three separated windows - input, output and graphic)
//     modes are supported.
//     Depending on compilation mode of executable (CONSOLE or WINDOWS),
//     either _main_ or _WinMain_ becomes entry point;
//     the further different behaviour of DRAW is determined by variable 
//     Draw_IsConsoleSubsystem which is set by _main_ only
//=======================================================================

  
extern Standard_Boolean Draw_IsConsoleSubsystem;

//=======================================================================
//function : _main_
//purpose  : 
//=======================================================================

Standard_Integer _main_ (int argc, char* argv[], char* envp[], const FDraw_InitAppli fDraw_InitAppli)
{
  Draw_IsConsoleSubsystem = Standard_True;
  //return _WinMain_(::GetModuleHandle(NULL), NULL, GetCommandLine(), SW_SHOW, fDraw_InitAppli);
  theDraw_InitAppli = fDraw_InitAppli;
  Standard_Boolean CONSOLE = Standard_True;
  //ParseCommandLine(GetCommandLine());

  // MKV 01.02.05
#if ((TCL_MAJOR_VERSION > 8) || ((TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 4)))
  Tcl_FindExecutable(argv[0]);
#endif

  Draw_Appli(::GetModuleHandle(NULL), NULL, GetCommandLine(), SW_SHOW, fDraw_InitAppli);
  return 0;

}

//=======================================================================
//function : _WinMain_
//purpose  : 
//=======================================================================

Standard_Integer _WinMain_ (HINSTANCE hInstance, HINSTANCE hPrevinstance, LPSTR lpCmdLine, int nCmdShow, const FDraw_InitAppli fDraw_InitAppli)
{
//  theDraw_InitAppli = fDraw_InitAppli;
//  ParseCommandLine (lpCmdLine);
//  Draw_Appli(hInstance, hPrevinstance, lpCmdLine, nCmdShow, Draw_InitAppli); // for C30;
  return 0;
}
#else
//=======================================================================
//function : _main_
//purpose  : 
//=======================================================================

Standard_Integer _main_ (Standard_Integer argc, char* argv[], const FDraw_InitAppli fDraw_InitAppli)
{
  // MKV 01.02.05
#if ((TCL_MAJOR_VERSION > 8) || ((TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 4)))
  Tcl_FindExecutable(argv[0]);
#endif
  Draw_Appli(argc, argv, fDraw_InitAppli);
  return 0;
}
#endif

