ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Output raw ICOM-less C/C++ interface definitions by default. Added new 

-b and -B command-line options for compatibility with ICOM macros.
This commit is contained in:
Ove Kaaven 2002-12-15 03:01:20 +00:00 committed by Alexandre Julliard
parent c327246af3
commit 998236b7cf
4 changed files with 164 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
include/Makefile.in
View File

@ -244,7 +244,7 @@ EXTRASUBDIRS = bitmaps msvcrt msvcrt/sys wine
.SUFFIXES: .idl .h .SUFFIXES: .idl .h
.idl.h: .idl.h:
$(LDPATH) $(WIDL) $(DEFS) -h -H $@ $< $(LDPATH) $(WIDL) $(DEFS) -b -h -H $@ $<
install:: install::
$(MKINSTALLDIRS) $(includedir) $(includedir)/windows $(includedir)/msvcrt $(includedir)/msvcrt/sys $(MKINSTALLDIRS) $(includedir) $(includedir)/windows $(includedir)/msvcrt $(includedir)/msvcrt/sys

162
tools/widl/header.c
View File

@ -72,7 +72,7 @@ char* get_name(var_t *v)
return v->name; return v->name;
} }
static void write_array(FILE *h, expr_t *v) static void write_array(FILE *h, expr_t *v, int field)
{ {
if (!v) return; if (!v) return;
while (NEXT_LINK(v)) v = NEXT_LINK(v); while (NEXT_LINK(v)) v = NEXT_LINK(v);
@ -81,7 +81,7 @@ static void write_array(FILE *h, expr_t *v)
if (v->is_const) if (v->is_const)
fprintf(h, "%ld", v->cval); /* statically sized array */ fprintf(h, "%ld", v->cval); /* statically sized array */
else else
fprintf(h, "1"); /* dynamically sized array */ if (field) fprintf(h, "1"); /* dynamically sized array */
if (PREV_LINK(v)) if (PREV_LINK(v))
fprintf(h, ", "); fprintf(h, ", ");
v = PREV_LINK(v); v = PREV_LINK(v);
@ -114,7 +114,7 @@ static void write_field(FILE *h, var_t *v)
break; break;
} }
} }
write_array(h, v->array); write_array(h, v->array, 1);
fprintf(h, ";\n"); fprintf(h, ";\n");
} }
} }
@ -404,11 +404,10 @@ var_t *is_callas(attr_t *a)
return get_attrp(a, ATTR_CALLAS); return get_attrp(a, ATTR_CALLAS);
} }
static void write_method_def(type_t *iface) static void write_icom_method_def(type_t *iface)
{ {
func_t *cur = iface->funcs; func_t *cur = iface->funcs;
while (NEXT_LINK(cur)) cur = NEXT_LINK(cur); while (NEXT_LINK(cur)) cur = NEXT_LINK(cur);
fprintf(header, "#define %s_METHODS", iface->name);
while (cur) { while (cur) {
var_t *def = cur->def; var_t *def = cur->def;
if (!is_callas(def->attrs)) { if (!is_callas(def->attrs)) {
@ -438,6 +437,9 @@ static void write_method_def(type_t *iface)
while (arg) { while (arg) {
fprintf(header, ","); fprintf(header, ",");
write_type(header, arg->type, arg, arg->tname); write_type(header, arg->type, arg, arg->tname);
/* since the ICOM macros can't express arrays,
* we have to pretend they're pointers instead */
if (arg->array) fprintf(header, "*");
fprintf(header, ","); fprintf(header, ",");
write_name(header,arg); write_name(header,arg);
arg = PREV_LINK(arg); arg = PREV_LINK(arg);
@ -476,12 +478,19 @@ static int write_method_macro(type_t *iface, char *name)
fprintf(header, ",%c", c+'a'); fprintf(header, ",%c", c+'a');
fprintf(header, ") "); fprintf(header, ") ");
if (argc) if (use_icom) {
fprintf(header, "ICOM_CALL%d(", argc); if (argc)
else fprintf(header, "ICOM_CALL%d(", argc);
fprintf(header, "ICOM_CALL("); else
write_name(header,def); fprintf(header, "ICOM_CALL(");
fprintf(header, ",p"); write_name(header, def);
fprintf(header, ",p");
}
else {
fprintf(header, "(p)->lpVtbl->");
write_name(header, def);
fprintf(header, "(p");
}
for (c=0; c<argc; c++) for (c=0; c<argc; c++)
fprintf(header, ",%c", c+'a'); fprintf(header, ",%c", c+'a');
fprintf(header, ")\n"); fprintf(header, ")\n");
@ -501,19 +510,74 @@ void write_args(FILE *h, var_t *arg, char *name, int method)
while (NEXT_LINK(arg)) while (NEXT_LINK(arg))
arg = NEXT_LINK(arg); arg = NEXT_LINK(arg);
} }
if (method) { if (h == header) {
fprintf(h, " %s* This", name); indentation++;
indent(0);
} else fprintf(h, " ");
if (method == 1) {
fprintf(h, "%s* This", name);
count++; count++;
} }
else fprintf(h, " ");
while (arg) { while (arg) {
if (count) fprintf(h, ",\n "); if (count) {
fprintf(h, ",\n");
if (h == header) indent(0);
else fprintf(h, " ");
}
write_type(h, arg->type, arg, arg->tname); write_type(h, arg->type, arg, arg->tname);
if (method && use_icom && arg->array) fprintf(header, "*"); /* as write_icom_method_def */
fprintf(h, " "); fprintf(h, " ");
write_name(h,arg); write_name(h, arg);
if (!(method && use_icom)) write_array(header, arg->array, 0);
arg = PREV_LINK(arg); arg = PREV_LINK(arg);
count++; count++;
} }
if (h == header) indentation--;
}
static void write_cpp_method_def(type_t *iface)
{
func_t *cur = iface->funcs;
while (NEXT_LINK(cur)) cur = NEXT_LINK(cur);
while (cur) {
var_t *def = cur->def;
if (!is_callas(def->attrs)) {
indent(0);
fprintf(header, "virtual ");
write_type(header, def->type, def, def->tname);
fprintf(header, " CALLBACK ");
write_name(header, def);
fprintf(header, "(\n");
write_args(header, cur->args, iface->name, 2);
fprintf(header, ") = 0;\n");
fprintf(header, "\n");
}
cur = PREV_LINK(cur);
}
}
static void write_c_method_def(type_t *iface)
{
func_t *cur = iface->funcs;
while (NEXT_LINK(cur)) cur = NEXT_LINK(cur);
if (iface->ref) write_c_method_def(iface->ref);
indent(0);
fprintf(header, "/*** %s methods ***/\n", iface->name);
while (cur) {
var_t *def = cur->def;
if (!is_callas(def->attrs)) {
indent(0);
write_type(header, def->type, def, def->tname);
fprintf(header, " (CALLBACK *");
write_name(header, def);
fprintf(header, ")(\n");
write_args(header, cur->args, iface->name, 1);
fprintf(header, ");\n");
fprintf(header, "\n");
}
cur = PREV_LINK(cur);
}
} }
static void write_method_proto(type_t *iface) static void write_method_proto(type_t *iface)
@ -622,19 +686,59 @@ void write_com_interface(type_t *iface)
fprintf(header, " */\n"); fprintf(header, " */\n");
write_guid(iface); write_guid(iface);
write_forward(iface); write_forward(iface);
fprintf(header, "#define ICOM_INTERFACE %s\n", iface->name); if (use_icom) {
write_method_def(iface); fprintf(header, "#define ICOM_INTERFACE %s\n", iface->name);
fprintf(header, "#define %s_IMETHODS \\\n", iface->name); fprintf(header, "#define %s_METHODS", iface->name);
if (iface->ref) write_icom_method_def(iface);
fprintf(header, " %s_IMETHODS \\\n", iface->ref->name); fprintf(header, "#define %s_IMETHODS \\\n", iface->name);
fprintf(header, " %s_METHODS\n", iface->name); if (iface->ref)
if (iface->ref) fprintf(header, " %s_IMETHODS \\\n", iface->ref->name);
fprintf(header, "ICOM_DEFINE(%s,%s)\n", iface->name, iface->ref->name); fprintf(header, " %s_METHODS\n", iface->name);
else if (iface->ref)
fprintf(header, "ICOM_DEFINE1(%s)\n", iface->name); fprintf(header, "ICOM_DEFINE(%s,%s)\n", iface->name, iface->ref->name);
fprintf(header, "#undef ICOM_INTERFACE\n"); else
fprintf(header, "\n"); fprintf(header, "ICOM_DEFINE1(%s)\n", iface->name);
write_method_macro(iface, iface->name); fprintf(header, "#undef ICOM_INTERFACE\n");
fprintf(header, "\n");
write_method_macro(iface, iface->name);
}
else {
/* C++ interface */
fprintf(header, "#if defined(__cplusplus) && !defined(CINTERFACE)\n");
fprintf(header, "struct %s", iface->name);
if (iface->ref)
fprintf(header, ": %s", iface->ref->name);
fprintf(header, " {\n");
indentation++;
fprintf(header, "\n");
write_cpp_method_def(iface);
indentation--;
fprintf(header, "} ICOM_COM_INTERFACE_ATTRIBUTE;\n");
fprintf(header, "#else\n");
/* C interface */
fprintf(header, "typedef struct %sVtbl %sVtbl;\n", iface->name, iface->name);
fprintf(header, "struct %s {\n", iface->name);
fprintf(header, " const %sVtbl* lpVtbl;\n", iface->name);
fprintf(header, "};\n");
fprintf(header, "struct %sVtbl {\n", iface->name);
indentation++;
fprintf(header, " ICOM_MSVTABLE_COMPAT_FIELDS\n");
fprintf(header, "\n");
write_c_method_def(iface);
indentation--;
fprintf(header, "};\n");
fprintf(header, "\n");
if (compat_icom) {
fprintf(header, "#define %s_IMETHODS", iface->name);
if (iface->ref)
fprintf(header, " \\\n %s_IMETHODS", iface->ref->name);
write_icom_method_def(iface);
fprintf(header, "\n");
}
write_method_macro(iface, iface->name);
fprintf(header, "\n");
fprintf(header, "#endif\n");
}
fprintf(header, "\n"); fprintf(header, "\n");
write_method_proto(iface); write_method_proto(iface);
fprintf(header, "\n"); fprintf(header, "\n");

29
tools/widl/widl.c
View File

@ -39,8 +39,27 @@
#include "proxy.h" #include "proxy.h"
#include "../wpp/wpp.h" #include "../wpp/wpp.h"
/* future options to reserve characters for: */
/* a = alignment of structures */
/* A = ACF input filename */
/* c = client stub only? */
/* C = client stub filename */
/* J = do not search standard include path */
/* O = generate interpreted stubs */
/* p = proxy only? */
/* P = proxy filename */
/* s = server stub only? */
/* S = server stub filename */
/* t = typelib only? */
/* T = typelib filename */
/* u = UUID file only? */
/* U = UUID filename */
/* w = select win16/win32 output (?) */
static char usage[] = static char usage[] =
"Usage: widl [options...] infile.idl\n" "Usage: widl [options...] infile.idl\n"
" -b Make headers compatible with ICOM macros\n"
" -B Make headers use ICOM macros\n"
" -d n Set debug level to 'n'\n" " -d n Set debug level to 'n'\n"
" -D id[=val] Define preprocessor identifier id=val\n" " -D id[=val] Define preprocessor identifier id=val\n"
" -E Preprocess only\n" " -E Preprocess only\n"
@ -69,6 +88,8 @@ int pedantic = 0;
int preprocess_only = 0; int preprocess_only = 0;
int header_only = 0; int header_only = 0;
int no_preprocess = 0; int no_preprocess = 0;
int compat_icom = 0;
int use_icom = 0;
char *input_name; char *input_name;
char *header_name; char *header_name;
@ -117,8 +138,14 @@ int main(int argc,char *argv[])
now = time(NULL); now = time(NULL);
while((optc = getopt(argc, argv, "d:D:EhH:I:NVW")) != EOF) { while((optc = getopt(argc, argv, "bBd:D:EhH:I:NVW")) != EOF) {
switch(optc) { switch(optc) {
case 'b':
compat_icom = 1;
break;
case 'B':
use_icom = 1;
break;
case 'd': case 'd':
debuglevel = strtol(optarg, NULL, 0); debuglevel = strtol(optarg, NULL, 0);
break; break;

2
tools/widl/widl.h
View File

@ -39,6 +39,8 @@ extern int debuglevel;
extern int win32; extern int win32;
extern int pedantic; extern int pedantic;
extern int header_only; extern int header_only;
extern int compat_icom;
extern int use_icom;
extern char *input_name; extern char *input_name;
extern char *header_name; extern char *header_name;