|
0
|
1
|
|
|
2 #include <stdio.h>
|
|
|
3 #include <string.h>
|
|
|
4 #include <stdlib.h>
|
|
|
5
|
|
|
6 #include "structs.h"
|
|
|
7 #include "visuality.h"
|
|
|
8 #include "interp.h"
|
|
|
9 #include <time.h>
|
|
|
10 #include "parser.h"
|
|
|
11 #include "saveload.h"
|
|
|
12
|
|
|
13 #ifdef WIN32
|
|
|
14 #ifdef GUI_LIB
|
|
|
15 #define WIN32_GUI
|
|
|
16 #endif
|
|
|
17 #endif
|
|
|
18
|
|
|
19 extern BOOL execute_active;
|
|
|
20
|
|
|
21 extern int num_workers;
|
|
|
22 extern int num_wires;
|
|
|
23 #ifdef WIN32_GUI
|
|
|
24 #include "ms_window.h"
|
|
|
25 HINSTANCE glob_instance;
|
|
|
26 int glob_cmd_show;
|
|
|
27 char prog_name[] = "visuality_cmd";
|
|
|
28 int WINAPI WinMain (HINSTANCE instance_handle, HINSTANCE prev_instance, LPSTR cmd_str, int cmd_show)
|
|
|
29 {
|
|
|
30 int argc = 1;
|
|
|
31 char * argv[10];
|
|
|
32 #else
|
|
|
33 int main(int argc, char ** argv)
|
|
|
34 {
|
|
|
35 #endif //WIN32_GUI
|
|
|
36 int i;
|
|
|
37 char newfile[512];
|
|
|
38 time_t start_time;
|
|
|
39 char * offset;
|
|
|
40 int min_args = 2;
|
|
|
41 int num_threads = -1;
|
|
|
42 BOOL save_flag = FALSE;
|
|
|
43 program * prog;
|
|
|
44 #ifdef WIN32_GUI
|
|
|
45 argv[0] = prog_name;
|
|
|
46 argv[1] = cmd_str;
|
|
|
47
|
|
|
48 for(i = 1; cmd_str[i-1] != '\0' && argc < 10; ++i)
|
|
|
49 {
|
|
|
50 if(cmd_str[i] == ' ' || cmd_str[i] == '\0')
|
|
|
51 {
|
|
|
52 cmd_str[i] = '\0';
|
|
|
53 ++argc;
|
|
|
54 if(argc < 10)
|
|
|
55 argv[argc] = cmd_str + i+1;
|
|
|
56 }
|
|
|
57 }
|
|
|
58 glob_instance = instance_handle;
|
|
|
59 glob_cmd_show = cmd_show;
|
|
|
60 #endif
|
|
|
61 if(argc >= 2)
|
|
|
62 if(strcmp(argv[1],"-t") == 0)
|
|
|
63 min_args += 2;
|
|
|
64 else if(strcmp(argv[1], "-v") == 0)
|
|
|
65 {
|
|
|
66 #ifdef TEXT_FILE_DEBUG
|
|
|
67 debugfile = fopen("interp_debug.txt", "w");
|
|
|
68 #endif
|
|
|
69 start_time = time(NULL);
|
|
|
70 test_virtual();
|
|
|
71 printf("Execution took %d seconds.\n", (time(NULL)-start_time));
|
|
|
72 return 0;
|
|
|
73 }
|
|
|
74 if(argc >= min_args && !strcmp(argv[min_args-1],"-c"))
|
|
|
75 {
|
|
|
76 min_args+=2;
|
|
|
77 save_flag = TRUE;
|
|
|
78 }
|
|
|
79
|
|
|
80 #ifdef TEXT_FILE_DEBUG
|
|
|
81 debugfile = fopen("interp_debug.txt", "w");
|
|
|
82 #endif
|
|
|
83 if(argc < min_args)
|
|
|
84 {
|
|
|
85 min_args = argc;
|
|
|
86 prog = load_program("parser.vistxt");
|
|
|
87 }
|
|
|
88 else
|
|
|
89 {
|
|
|
90 if(min_args > 2)
|
|
|
91 num_threads = atoi(argv[2]);
|
|
|
92 //printf("Loading %s\n", argv[min_args-1]);
|
|
|
93 DEBUGPUTS("load_program\n");
|
|
|
94 if(!strcmp(strrchr(argv[min_args-1],'.')+1, "rhope"))
|
|
|
95 {
|
|
|
96 --min_args;
|
|
|
97 prog = load_program("parser.vistxt");
|
|
|
98 }
|
|
|
99 else
|
|
|
100 prog = load_program(argv[min_args-1]);
|
|
|
101 }
|
|
|
102 start_time = time(NULL);
|
|
|
103 if(save_flag)
|
|
|
104 {
|
|
|
105 save_program(prog, argv[min_args-2]);
|
|
|
106 }
|
|
|
107 /*#ifdef WIN32
|
|
|
108 interp_start(num_threads,FALSE, argc-(min_args-1), argv + (min_args-1), prog);
|
|
|
109 message_loop();
|
|
|
110 #else*/
|
|
|
111 interp_start(num_threads,TRUE, argc-(min_args-1), argv + (min_args-1), prog);
|
|
|
112 //#endif
|
|
|
113 printf("Execution took %d seconds.\n", (time(NULL)-start_time));
|
|
|
114 return 0;
|
|
|
115 }
|
|
|
116
|
