oleaut32: Improve TKIND_COCLASS handling while creating typelib.
[wine] / tools / widl / header.h
1 /*
2  * IDL Compiler
3  *
4  * Copyright 2002 Ove Kaaven
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #ifndef __WIDL_HEADER_H
22 #define __WIDL_HEADER_H
23
24 #include "typetree.h"
25
26 extern int is_ptrchain_attr(const var_t *var, enum attr_type t);
27 extern int is_aliaschain_attr(const type_t *var, enum attr_type t);
28 extern int is_attr(const attr_list_t *list, enum attr_type t);
29 extern void *get_attrp(const attr_list_t *list, enum attr_type t);
30 extern unsigned long get_attrv(const attr_list_t *list, enum attr_type t);
31 extern int is_void(const type_t *t);
32 extern int is_conformant_array(const type_t *t);
33 extern int is_declptr(const type_t *t);
34 extern const char* get_name(const var_t *v);
35 extern void write_type_left(FILE *h, type_t *t, int declonly);
36 extern void write_type_right(FILE *h, type_t *t, int is_field);
37 extern void write_type_def_or_decl(FILE *h, type_t *t, int is_field, const char *name);
38 extern void write_type_decl(FILE *f, type_t *t, const char *name);
39 extern void write_type_decl_left(FILE *f, type_t *t);
40 extern int needs_space_after(type_t *t);
41 extern int is_object(const type_t *iface);
42 extern int is_local(const attr_list_t *list);
43 extern int need_stub(const type_t *iface);
44 extern int need_proxy(const type_t *iface);
45 extern int need_stub_files(const statement_list_t *stmts);
46 extern int need_proxy_file(const statement_list_t *stmts);
47 extern const var_t *is_callas(const attr_list_t *list);
48 extern void write_args(FILE *h, const var_list_t *arg, const char *name, int obj, int do_indent);
49 extern void write_array(FILE *h, array_dims_t *v, int field);
50 extern const var_t* get_explicit_handle_var(const var_t *func);
51 extern const type_t* get_explicit_generic_handle_type(const var_t* var);
52 extern const var_t* get_explicit_generic_handle_var(const var_t *func);
53 extern const var_t* get_context_handle_var(const var_t *func);
54 extern int has_out_arg_or_return(const var_t *func);
55 extern void write_guid(FILE *f, const char *guid_prefix, const char *name,
56                        const UUID *uuid);
57 extern int is_const_decl(const var_t *var);
58
59 static inline int last_ptr(const type_t *type)
60 {
61     return is_ptr(type) && !is_declptr(type_pointer_get_ref(type));
62 }
63
64 static inline int last_array(const type_t *type)
65 {
66     return is_array(type) && !is_array(type_array_get_element(type));
67 }
68
69 static inline int is_string_type(const attr_list_t *attrs, const type_t *type)
70 {
71     return ((is_attr(attrs, ATTR_STRING) || is_aliaschain_attr(type, ATTR_STRING))
72             && (last_ptr(type) || last_array(type)));
73 }
74
75 static inline int is_context_handle(const type_t *type)
76 {
77     const type_t *t;
78     for (t = type;
79          is_ptr(t) || type_is_alias(t);
80          t = type_is_alias(t) ? type_alias_get_aliasee(t) : type_pointer_get_ref(t))
81         if (is_attr(t->attrs, ATTR_CONTEXTHANDLE))
82             return 1;
83     return 0;
84 }
85
86 #endif