1 files changed, 132 insertions, 0 deletions

diff --git a/private/ntos/dlc/sm2c/fsmmain.c b/private/ntos/dlc/sm2c/fsmmain.c
new file mode 100644
index 000000000..8295fc3a4
--- /dev/null
+++ b/private/ntos/dlc/sm2c/fsmmain.c
@@ -0,0 +1,132 @@
+/*++
+
+Copyright (c) 1991  Microsoft Corporation
+Copyright (c) 1991  Nokia Data Systems AB
+
+Module Name:
+
+    fsmmain.c
+
+Abstract:
+
+    Main module of FSM2C (Finite State Machine to C) compiler.
+
+Author:
+
+    Antti Saarenheimo   [o-anttis]          07-MAY-1991
+
+Revision History:
+--*/
+
+#include  <fsm.h>
+
+//  fsmfront.c      -- front end, reads the file
+//  fsmopt.c        -- optimizer
+//  fsmcsntx.c      -- checks the syntax of the 
+//  fsmback.c       -- back end
+//
+
+// Hash tables for the different types
+PVOID   hDefines;
+PVOID   hVariables;
+PVOID   hSynonymes;
+PVOID   hStates;
+PVOID   hInputs;
+PVOID   hConditions;
+
+USHORT  cStates = 0;
+USHORT  cInputs = 0;
+PVOID FAR * FAR * pppStateInputs = NULL;
+PUSHORT FAR * ppusStateInputs = NULL;
+PUSHORT pusCondJumpTbl = NULL;
+USHORT  cCondJumpTbl = 0;
+PFSM_PRIMITIVE pActionTreeBase = NULL;
+PFSM_TOKEN FAR * ppInputDefs;
+PFSM_TOKEN FAR * ppStateDefs;
+PSZ pszFsmName = "DefaultName";
+
+//
+//  fsmxc <file1>.def <file2>.c <file3>.h
+//
+int main(int argc, char *argv[])
+{
+    UINT        i, boolErrorFound;
+    FILE        *fd;
+    PLINK_FILE   pFileData;
+    PFSM_TRANSIT pBase = 0;     // linked fsm state transitions
+    
+    // check first the help switches
+    if (argc == 1 || argv[1][0] == '?' || argv[1][1] == '?')
+    {
+        PrintHelpMsg();
+	return 0;
+    }
+puts("Reading Finite state machine definition file ...");
+    FsmInitTables();
+
+    // process first the fsm files
+    for (i = 1; i < argc; i++)
+    {
+        if (!StriCmpFileExt( argv[i], ".fsm" ))
+        {
+            if ((fd = fopen(argv[i], "r")) != NULL)
+            {
+                if ((pBase = FsmFront( fd, pBase )) == NULL)
+                {
+                    PrintErrMsg( 0, FSM_ERROR_IN_FILE, argv[i] );
+		    return 2;
+                }
+                fclose( fd );
+            }
+            else
+            {
+                PrintErrMsg( 0, FSM_ERROR_FILE_NOT_FOUND, argv[i] );
+		return 2;
+            }
+        }
+    }
+puts("Building the internal data structures...");
+    if ((pBase = FsmBuild( pBase )) == NULL)
+        return 2;
+
+if (_heapchk() != _HEAPOK)
+     boolErrorFound = TRUE;
+
+    // patch the fsm code, data and definitions to the c- source files
+    for (i = 1; i < argc; i++)
+    {
+        if (!StriCmpFileExt( argv[i], ".c" ) ||
+            !StriCmpFileExt( argv[i], ".h" ))
+        {
+            if ((fd = fopen(argv[i], "r")) != NULL)
+            {
+printf("Reading file %s\n", argv[i] );
+if (_heapchk() != _HEAPOK)
+     boolErrorFound = TRUE;
+                pFileData = FsmReadCFile( fd );
+                fclose( fd );
+                if ((fd = fopen(argv[i], "w")) == NULL)
+                {
+                    PrintErrMsg( 0, FSM_ERROR_CANNOT_WRITE, argv[i] );
+                    return 2;
+                }
+puts("Generating FSM C code...");
+                FsmCodeGeneration( fd, pFileData, pBase, pszFsmName );
+                fclose( fd );
+            }
+            else
+            {
+                PrintErrMsg( 0, FSM_ERROR_FILE_NOT_FOUND, argv[i] );
+                return 2;
+            }
+        }
+        else
+        {
+            if (StriCmpFileExt( argv[i], ".fsm" ))
+            {
+                PrintErrMsg( 0, FSM_ERROR_INVALID_EXTENSION, argv[i] );
+                return 2;
+            }
+        }
+    }
+}