Mercurial > repos > rhope
comparison visuality_cmd.c @ 0:76568becd6d6
Rhope Alpha 2a source import
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Tue, 28 Apr 2009 23:06:07 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:76568becd6d6 |
---|---|
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 |