4 * Copyright 2002 Ove Kaaven
5 * based on WRC code by Bertho Stultiens
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
37 #define WIDL_FULLVERSION "0.1"
44 /* future options to reserve characters for: */
45 /* a = alignment of structures */
46 /* A = ACF input filename */
47 /* J = do not search standard include path */
48 /* O = generate interpreted stubs */
49 /* u = UUID file only? */
50 /* U = UUID filename */
51 /* w = select win16/win32 output (?) */
54 "Usage: widl [options...] infile.idl\n"
55 " -c Generate client stub\n"
56 " -C file Name of client stub file (default is infile_c.c)\n"
57 " -d n Set debug level to 'n'\n"
58 " -D id[=val] Define preprocessor identifier id=val\n"
59 " -E Preprocess only\n"
60 " -h Generate headers\n"
61 " -H file Name of header file (default is infile.h)\n"
62 " -I path Set include search dir to path (multiple -I allowed)\n"
63 " -N Do not preprocess input\n"
64 " --oldnames Use old naming conventions\n"
65 " -p Generate proxy\n"
66 " -P file Name of proxy file (default is infile_p.c)\n"
67 " -s Generate server stub\n"
68 " -S file Name of server stub file (default is infile_s.c)\n"
69 " -t Generate typelib\n"
70 " -T file Name of typelib file (default is infile.tlb)\n"
71 " -V Print version and exit\n"
72 " -W Enable pedantic warnings\n"
73 "Debug level 'n' is a bitmask with following meaning:\n"
74 " * 0x01 Tell which resource is parsed (verbose mode)\n"
75 " * 0x02 Dump internal structures\n"
76 " * 0x04 Create a parser trace (yydebug=1)\n"
77 " * 0x08 Preprocessor messages\n"
78 " * 0x10 Preprocessor lex messages\n"
79 " * 0x20 Preprocessor yacc trace\n"
82 static const char version_string
[] = "Wine IDL Compiler Version " WIDL_FULLVERSION
"\n"
83 "Copyright 2002 Ove Kaaven\n";
86 int debuglevel
= DEBUGLEVEL_NONE
;
89 static int do_everything
= 1;
90 int preprocess_only
= 0;
96 int no_preprocess
= 0;
118 int getopt (int argc
, char *const *argv
, const char *optstring
);
119 static void rm_tempfile(void);
120 static void segvhandler(int sig
);
122 static const char* short_options
=
123 "cC:d:D:EhH:I:NpP:sS:tT:VW";
125 static struct option long_options
[] = {
126 {"oldnames", 0, 0, 1},
131 static char *make_token(const char *name
)
137 slash
= strrchr(name
, '/');
138 if (slash
) name
= slash
+ 1;
140 token
= xstrdup(name
);
141 for (i
=0; token
[i
]; i
++) {
142 if (!isalnum(token
[i
])) token
[i
] = '_';
143 else token
[i
] = toupper(token
[i
]);
148 int main(int argc
,char *argv
[])
156 signal(SIGSEGV
, segvhandler
);
160 while((optc
= getopt_long(argc
, argv
, short_options
, long_options
, &opti
)) != EOF
) {
170 client_name
= strdup(optarg
);
173 debuglevel
= strtol(optarg
, NULL
, 0);
176 wpp_add_cmdline_define(optarg
);
187 header_name
= strdup(optarg
);
190 wpp_add_include_path(optarg
);
200 proxy_name
= strdup(optarg
);
207 server_name
= strdup(optarg
);
214 typelib_name
= strdup(optarg
);
217 printf(version_string
);
223 fprintf(stderr
, usage
);
229 do_header
= do_typelib
= do_proxies
= do_client
= do_server
= 1;
232 input_name
= xstrdup(argv
[optind
]);
235 fprintf(stderr
, usage
);
245 yydebug
= debuglevel
& DEBUGLEVEL_TRACE
? 1 : 0;
246 yy_flex_debug
= debuglevel
& DEBUGLEVEL_TRACE
? 1 : 0;
248 wpp_set_debug( (debuglevel
& DEBUGLEVEL_PPLEX
) != 0,
249 (debuglevel
& DEBUGLEVEL_PPTRACE
) != 0,
250 (debuglevel
& DEBUGLEVEL_PPMSG
) != 0 );
253 header_name
= dup_basename(input_name
, ".idl");
254 strcat(header_name
, ".h");
257 if (!typelib_name
&& do_typelib
) {
258 typelib_name
= dup_basename(input_name
, ".idl");
259 strcat(typelib_name
, ".tlb");
262 if (!proxy_name
&& do_proxies
) {
263 proxy_name
= dup_basename(input_name
, ".idl");
264 proxy_token
= xstrdup(proxy_name
);
265 strcat(proxy_name
, "_p.c");
268 if (!client_name
&& do_client
) {
269 client_name
= dup_basename(input_name
, ".idl");
270 client_token
= xstrdup(client_name
);
271 strcat(client_name
, "_c.c");
274 if (!server_name
&& do_server
) {
275 server_name
= dup_basename(input_name
, ".idl");
276 server_token
= xstrdup(server_name
);
277 strcat(server_name
, "_s.c");
280 wpp_add_cmdline_define("__WIDL__");
285 chat("Starting preprocess\n");
287 if (!preprocess_only
)
289 ret
= wpp_parse_temp( input_name
, header_name
, &temp_name
);
293 ret
= wpp_parse( input_name
, stdout
);
297 if(preprocess_only
) exit(0);
298 if(!(yyin
= fopen(temp_name
, "r"))) {
299 fprintf(stderr
, "Could not open %s for input\n", temp_name
);
304 if(!(yyin
= fopen(input_name
, "r"))) {
305 fprintf(stderr
, "Could not open %s for input\n", input_name
);
311 header_token
= make_token(header_name
);
313 if(!(header
= fopen(header_name
, "w"))) {
314 fprintf(stderr
, "Could not open %s for output\n", header_name
);
317 fprintf(header
, "/*** Autogenerated by WIDL %s from %s - Do not edit ***/\n", WIDL_FULLVERSION
, input_name
);
318 fprintf(header
, "#include <rpc.h>\n" );
319 fprintf(header
, "#include <rpcndr.h>\n\n" );
320 fprintf(header
, "#ifndef __WIDL_%s\n", header_token
);
321 fprintf(header
, "#define __WIDL_%s\n", header_token
);
322 fprintf(header
, "#ifdef __cplusplus\n");
323 fprintf(header
, "extern \"C\" {\n");
324 fprintf(header
, "#endif\n");
330 fprintf(header
, "#ifdef __cplusplus\n");
331 fprintf(header
, "}\n");
332 fprintf(header
, "#endif\n");
333 fprintf(header
, "#endif /* __WIDL_%s */\n", header_token
);
348 static void rm_tempfile(void)
361 static void segvhandler(int sig
)
363 fprintf(stderr
, "\n%s:%d: Oops, segment violation\n", input_name
, line_number
);