** This is part of the CTSim program
** Copyright (C) 1983-2000 Kevin Rosenberg
**
-** $Id: ctsimtext.cpp,v 1.13 2001/01/13 05:06:18 kevin Exp $
+** $Id: ctsimtext.cpp,v 1.17 2001/01/17 04:03:42 kevin Exp $
**
** This program is free software; you can redistribute it and/or modify
** it under the terms of the GNU General Public License (version 2) as
// If linked to ctsimtext, but executed as another name, eg pjrec, then program will use that
// linked name as name of function.
-static const char* const g_szIdStr = "$Id: ctsimtext.cpp,v 1.13 2001/01/13 05:06:18 kevin Exp $";
+static const char* const g_szIdStr = "$Id: ctsimtext.cpp,v 1.17 2001/01/17 04:03:42 kevin Exp $";
static const char* const s_szProgramName = "ctsimtext";
static const char* const s_szProgramName2 = "ctsimtext.exe";
+static const char* const s_szProgramName3 = "ctsimtext-lam";
extern int if1_main (int argc, char* const argv[]);
extern int if2_main (int argc, char* const argv[]);
{
int iReturn = 0;
- if (argc > 1 && (strcmp(s_szProgramName, fileBasename (argv[0])) == 0 || strcmp(s_szProgramName2, fileBasename (argv[0])) == 0)) {
+ if (argc > 1 && (strcmp(s_szProgramName, fileBasename (argv[0])) == 0 || strcmp(s_szProgramName2, fileBasename (argv[0])) == 0 || strcmp(s_szProgramName3, fileBasename (argv[0])) == 0)) {
argv++;
argc--;
iReturn = processCommand (argc, argv);
char* pszInputLine = new char [s_MaxLineLength+1];
std::cout << szPrompt;
std::cin.getline (pszInputLine, s_MaxLineLength);
-
+
#ifdef DEBUG
std::cout << "#" << pszInputLine << "#\n";
#endif
std::cout << "Token " << i << ": " << argv[i] << "\n";
#endif
iReturn = processCommand (argc, argv);
-
+
delete pszInputLine;
}
}
-
return iReturn;
}
{
if (argc < 1)
return 1;
-
+
const char* const pszFunction = fileBasename (argv[0]);
- if (strcasecmp (pszFunction, "if1") == 0)
- return if1_main (argc, argv);
- else if (strcasecmp (pszFunction, "if2") == 0)
- return if2_main (argc, argv);
- else if (strcasecmp (pszFunction, "ifexport") == 0)
- return ifexport_main (argc, argv);
- else if (strcasecmp (pszFunction, "ifinfo") == 0)
- return ifinfo_main (argc, argv);
- else if (strcasecmp (pszFunction, "phm2if") == 0)
- return phm2if_main (argc, argv);
- else if (strcasecmp (pszFunction, "phm2pj") == 0)
- return phm2pj_main (argc, argv);
- else if (strcasecmp (pszFunction, "pj2if") == 0)
- return pj2if_main (argc, argv);
- else if (strcasecmp (pszFunction, "pjinfo") == 0)
- return pjinfo_main (argc, argv);
- else if (strcasecmp (pszFunction, "pjrec") == 0)
- return pjrec_main (argc, argv);
- else {
- std::cout << "Unknown function name: " << pszFunction << "\n";
- if (s_bInteractive)
- interactive_usage();
- else
- ctsimtext_usage (s_szProgramName);
- return 1;
- }
+ try {
+ if (strcasecmp (pszFunction, "if1") == 0)
+ return if1_main (argc, argv);
+ else if (strcasecmp (pszFunction, "if2") == 0)
+ return if2_main (argc, argv);
+ else if (strcasecmp (pszFunction, "ifexport") == 0)
+ return ifexport_main (argc, argv);
+ else if (strcasecmp (pszFunction, "ifinfo") == 0)
+ return ifinfo_main (argc, argv);
+ else if (strcasecmp (pszFunction, "phm2if") == 0)
+ return phm2if_main (argc, argv);
+ else if (strcasecmp (pszFunction, "phm2pj") == 0)
+ return phm2pj_main (argc, argv);
+ else if (strcasecmp (pszFunction, "pj2if") == 0)
+ return pj2if_main (argc, argv);
+ else if (strcasecmp (pszFunction, "pjinfo") == 0)
+ return pjinfo_main (argc, argv);
+ else if (strcasecmp (pszFunction, "pjrec") == 0)
+ return pjrec_main (argc, argv);
+ else {
+ std::cout << "Unknown function name: " << pszFunction << "\n";
+ if (s_bInteractive)
+ interactive_usage();
+ else
+ ctsimtext_usage (s_szProgramName);
+ return 1;
+ }
+ } catch (exception e) {
+ std::cerr << "Exception: " << e.what() << std::endl;
+ } catch (...) {
+ std::cerr << "Unknown exception caught\n";
+ }
+
+ return 1;
}
int
{
int retval = 1;
- try {
- retval = ctsimtext_main(argc, argv);
- } catch (exception e) {
- std::cerr << "Exception: " << e.what() << std::endl;
- } catch (...) {
- std::cerr << "Unknown exception\n";
- }
+ retval = ctsimtext_main(argc, argv);
- return (retval);
+ return retval;
}
-
-// Hack to fix linking problems when not linking with wxWindows and CTSim GUI routines
-#ifdef MSVC
-unsigned long
-wxDialog::OnCtlColor(unsigned long a,unsigned long b,unsigned int c,unsigned int d,unsigned int e,long f)
-{return 0;}
-#endif
-