Rev 2 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 2 | Rev 11 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | /* |
1 | /* |
| 2 | * $Header: c:\\cygwin\\cvsroot/Vert03/acf_src/acf_main.c,v 1.1.1.1 2003/11/04 23:34:58 mjames |
2 | * $Header: c:\\cygwin\\cvsroot/Vert03/acf_src/acf_main.c,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $ |
| 3 | Exp $ |
- | |
| 4 | * |
3 | * |
| 5 | * $Log: acf_main.c,v $ |
4 | * $Log: acf_main.c,v $ |
| 6 | * Revision 1.1.1.1 2003/11/04 23:34:58 mjames |
5 | * Revision 1.1.1.1 2003/11/04 23:34:58 mjames |
| 7 | * Imported into local repositrory |
6 | * Imported into local repositrory |
| 8 | * |
7 | * |
| Line 78... | Line 77... | ||
| 78 | * Revision 1.1.1.1 2000/10/19 21:58:34 mjames |
77 | * Revision 1.1.1.1 2000/10/19 21:58:34 mjames |
| 79 | * Mike put it here |
78 | * Mike put it here |
| 80 | 79 | ||
| 81 | */ |
80 | */ |
| 82 | #include <stdio.h> |
81 | #include <stdio.h> |
| 83 | #include <stdlib.h> |
- | |
| 84 | #include <string.h> |
82 | #include <string.h> |
| - | 83 | #include <stdlib.h> |
|
| 85 | 84 | ||
| 86 | #if defined HAS_TCL |
85 | #if defined HAS_TCL |
| 87 | #include "tcl_l.h" |
86 | #include "tcl_l.h" |
| 88 | #endif |
87 | #endif |
| 89 | #include "cmdlog.h" |
- | |
| 90 | #include "cmdparse.h" |
- | |
| 91 | #include "cmdutil.h" |
- | |
| 92 | #include "database.h" |
88 | #include "vertcl_main.h" |
| 93 | #include "expression.h" |
89 | #include "expression.h" |
| 94 | #include "generic.h" |
90 | #include "generic.h" |
| 95 | #include "lx_support.h" |
91 | #include "database.h" |
| 96 | #include "printout.h" |
92 | #include "printout.h" |
| 97 | #include "routing.h" |
93 | #include "routing.h" |
| - | 94 | #include "cmdparse.h" |
|
| 98 | #include "vertcl_main.h" |
95 | #include "cmdutil.h" |
| - | 96 | #include "cmdlog.h" |
|
| - | 97 | #include "lx_support.h" |
|
| 99 | #if defined YYDEBUG |
98 | #if defined YYDEBUG |
| 100 | extern int yydebug; |
99 | extern int yydebug; |
| 101 | #else |
100 | #else |
| 102 | int yydebug = 0; |
101 | int yydebug = 0; |
| 103 | #endif |
102 | #endif |
| 104 | 103 | ||
| 105 | #ident \ |
- | |
| 106 | "@(#)$Header: c:\\cygwin\\cvsroot/Vert03/acf_src/acf_main.c,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $" |
104 | #ident "@(#)$Header: c:\\cygwin\\cvsroot/Vert03/acf_src/acf_main.c,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $" |
| 107 | 105 | ||
| 108 | extern int include_stack_ptr; |
106 | extern int include_stack_ptr; |
| 109 | 107 | ||
| - | 108 | ||
| 110 | int main (int argc, char *argv[]) |
109 | int main(int argc , char * argv[]){ |
| 111 | { |
- | |
| 112 | FILE *TopFile; |
110 | FILE * TopFile; |
| 113 | int Status; |
111 | int Status; |
| 114 | 112 | ||
| 115 | include_stack_ptr = 0; |
113 | include_stack_ptr = 0; |
| - | 114 | ||
| 116 | 115 | ||
| 117 | /* setup intial path */ |
116 | /* setup intial path */ |
| 118 | InitialiseData (); |
117 | InitialiseData(); |
| 119 | 118 | ||
| 120 | InitErrorLog (); |
119 | InitErrorLog(); |
| - | 120 | ||
| - | 121 | ||
| 121 | 122 | ||
| 122 | LogSilent (); |
123 | LogSilent(); |
| 123 | ExecuteString ( |
- | |
| 124 | "echo running \\$(VERTICAL_INIT) file name = $(VERTICAL_INIT) ", argc, argv); |
124 | ExecuteString("echo running \\$(VERTICAL_INIT) file name = $(VERTICAL_INIT) ", argc, argv); |
| 125 | /* this may change search path before argv[1] is opened */ |
125 | /* this may change search path before argv[1] is opened */ |
| 126 | ExecuteString ("do $(VERTICAL_INIT) ", argc, argv); |
126 | ExecuteString("do $(VERTICAL_INIT) ", argc, argv); |
| 127 | 127 | ||
| 128 | LogVerbose (); |
128 | LogVerbose(); |
| 129 | 129 | ||
| - | 130 | ||
| 130 | if (argc > 1) |
131 | if (argc>1) |
| 131 | TopFile = trap_fopen (argv[1], "r"); |
132 | TopFile = trap_fopen(argv[1],"r"); |
| 132 | else |
133 | else |
| 133 | TopFile = stdin; |
134 | TopFile = stdin; |
| - | 135 | ||
| 134 | 136 | ||
| 135 | if (argc < 2) |
137 | if (argc <2) |
| 136 | argc = 0; |
- | |
| 137 | else |
138 | argc = 0; |
| 138 | { |
139 | else { |
| 139 | argc -= 2; |
140 | argc -=2; |
| 140 | argv += 2; |
141 | argv+=2; |
| 141 | } |
142 | } |
| 142 | yy_nArgs = argc; |
143 | yy_nArgs = argc; |
| 143 | yy_Args = argv; |
144 | yy_Args = argv; |
| - | 145 | ||
| - | 146 | ||
| - | 147 | ||
| 144 | 148 | ||
| 145 | /* sort out potential argument lists */ |
149 | /* sort out potential argument lists */ |
| 146 | if (!TopFile) |
150 | if(!TopFile) |
| 147 | Log (LOG_ERROR, "ERROR : cannot open input file (%s)\n", argv[1]); |
151 | Log(LOG_ERROR,"ERROR : cannot open input file (%s)\n",argv[1]); |
| 148 | else |
- | |
| 149 | { |
152 | else { |
| 150 | Log ( |
153 | Log(LOG_GENERAL, |
| 151 | LOG_GENERAL, "# ---------------------------------------------------- \n"); |
154 | "# ---------------------------------------------------- \n"); |
| 152 | Log ( |
155 | Log(LOG_GENERAL, |
| 153 | LOG_GENERAL, "# | # |\n"); |
156 | "# | # |\n"); |
| 154 | Log ( |
157 | Log(LOG_GENERAL, |
| 155 | LOG_GENERAL, "# | # # |\n"); |
158 | "# | # # |\n"); |
| 156 | Log ( |
159 | Log(LOG_GENERAL, |
| 157 | LOG_GENERAL, "# | Mikes # |\n"); |
160 | "# | Mikes # |\n"); |
| 158 | Log ( |
161 | Log(LOG_GENERAL, |
| 159 | LOG_GENERAL, "# | EDA METAL # |\n"); |
162 | "# | EDA METAL # |\n"); |
| 160 | Log ( |
163 | Log(LOG_GENERAL, |
| 161 | LOG_GENERAL, "# | Tools # |\n"); |
164 | "# | Tools # |\n"); |
| 162 | Log ( |
165 | Log(LOG_GENERAL, |
| 163 | LOG_GENERAL, "# | And # |\n"); |
166 | "# | And # |\n"); |
| 164 | Log ( |
167 | Log(LOG_GENERAL, |
| 165 | LOG_GENERAL, "# | Libraries ### |\n"); |
168 | "# | Libraries ### |\n"); |
| 166 | Log ( |
169 | Log(LOG_GENERAL, |
| 167 | LOG_GENERAL, "# |----------------------------------------------------|\n"); |
170 | "# |----------------------------------------------------|\n"); |
| 168 | #if defined PC |
171 | #if defined PC |
| - | 172 | Log(LOG_GENERAL, |
|
| 169 | Log (LOG_GENERAL, "# | Version: %30s (PC-CygWin)|\n", Vertical_Version); |
173 | "# | Version: %30s (PC-CygWin)|\n",Vertical_Version); |
| 170 | #else |
174 | #else |
| - | 175 | Log(LOG_GENERAL, |
|
| 171 | Log (LOG_GENERAL, "# | Version: %30s (HPUX) |\n", Vertical_Version); |
176 | "# | Version: %30s (HPUX) |\n",Vertical_Version); |
| 172 | #endif |
177 | #endif |
| - | 178 | Log(LOG_GENERAL, |
|
| 173 | Log (LOG_GENERAL, "# | Compiled: %30s |\n", Vertical_Time); |
179 | "# | Compiled: %30s |\n",Vertical_Time); |
| 174 | Log ( |
180 | Log(LOG_GENERAL, |
| 175 | LOG_GENERAL, "# | |\n"); |
181 | "# | |\n"); |
| 176 | Log ( |
182 | Log(LOG_GENERAL, |
| 177 | LOG_GENERAL, "# | (C) Mike James 1995-2019 mike@hamble.online |\n"); |
183 | "# | (C) Mike James 1995-2021 mike@hamble.online |\n"); |
| 178 | Log ( |
184 | Log(LOG_GENERAL, |
| 179 | LOG_GENERAL, "# ---------------------------------------------------- \n"); |
185 | "# ---------------------------------------------------- \n"); |
| 180 | 186 | ||
| 181 | do |
- | |
| - | 187 | ||
| - | 188 | ||
| - | 189 | ||
| - | 190 | ||
| 182 | { |
191 | do { |
| 183 | if (TopFile == stdin) |
192 | if(TopFile == stdin) |
| 184 | printf ("Vertical : "); |
193 | printf("Vertical : "); |
| 185 | Status = |
- | |
| 186 | ExecuteCommand (TopFile, argc, argv); /* execute the command from |
194 | Status = ExecuteCommand(TopFile, argc, argv); /* execute the command from the stdin input stream */ |
| 187 | the stdin input stream */ |
- | |
| - | 195 | } |
|
| 188 | } while (Status != QUITCMD); |
196 | while (Status != QUITCMD); |
| 189 | } |
197 | } |
| 190 | EndErrorLog (); |
198 | EndErrorLog(); |
| 191 | return (0); |
199 | return(0); |
| - | 200 | } |
|
| 192 | } |
201 | |