types refactoring
[m6w6/ext-psi] / src / types.h
1 #ifndef _PSI_TYPES_H
2 #define _PSI_TYPES_H
3
4 #include "token.h"
5
6 #include "types/impl_val.h"
7 #include "types/decl_type.h"
8 #include "types/decl_var.h"
9 #include "types/decl_struct_layout.h"
10 #include "types/decl_arg.h"
11 #include "types/decl_typedefs.h"
12 #include "types/decl_vars.h"
13 #include "types/decl_args.h"
14 #include "types/decl_abi.h"
15 #include "types/decl_callinfo.h"
16 #include "types/decl.h"
17 #include "types/decls.h"
18 #include "types/decl_struct.h"
19 #include "types/decl_structs.h"
20 #include "types/decl_union.h"
21 #include "types/decl_unions.h"
22 #include "types/impl_type.h"
23 #include "types/impl_var.h"
24 #include "types/impl_def_val.h"
25 #include "types/const_type.h"
26 #include "types/constant.h"
27 #include "types/constants.h"
28 #include "types/impl_arg.h"
29 #include "types/impl_args.h"
30 #include "types/impl_func.h"
31 #include "types/num_exp.h"
32 #include "types/decl_enum_item.h"
33 #include "types/decl_enum_items.h"
34 #include "types/decl_enum.h"
35 #include "types/decl_enums.h"
36 #include "types/let_calloc.h"
37 #include "types/let_callback.h"
38 #include "types/let_func.h"
39 #include "types/let_val.h"
40 #include "types/let_vals.h"
41 #include "types/let_stmt.h"
42 #include "types/set_func.h"
43 #include "types/set_value.h"
44 #include "types/set_values.h"
45 #include "types/set_stmt.h"
46 #include "types/return_stmt.h"
47 #include "types/free_call.h"
48 #include "types/free_calls.h"
49 #include "types/free_stmt.h"
50 #include "types/impl_stmt.h"
51 #include "types/impl_stmts.h"
52 #include "types/impl.h"
53 #include "types/impls.h"
54 #include "types/decl_file.h"
55 #include "types/decl_libs.h"
56
57 static inline impl_val *deref_impl_val(impl_val *ret_val, decl_var *var) {
58 unsigned i;
59
60 ZEND_ASSERT(var->arg->var != var);
61 #if 0
62 fprintf(stderr, "deref: %s pl=%u:%u as=%u:%u %p\n",
63 var->name, var->pointer_level, var->arg->var->pointer_level,
64 var->array_size, var->arg->var->array_size, ret_val);
65 #endif
66 for (i = 0; i < var->pointer_level; ++i) {
67 #if 0
68 fprintf(stderr, "-- %p %p %p\n", ret_val, *(void**)ret_val, ret_val->ptr);
69 #endif
70 ret_val = *(void **) ret_val;
71 }
72 return ret_val;
73 }
74
75 static inline impl_val *enref_impl_val(void *ptr, decl_var *var) {
76 impl_val *val, *val_ptr;
77 unsigned i;
78
79 ZEND_ASSERT(var->arg->var == var);
80 #if 0
81 fprintf(stderr, "enref: %s pl=%u:%u as=%u:%u\n",
82 var->name, var->pointer_level, var->arg->var->pointer_level,
83 var->array_size, var->arg->var->array_size);
84 #endif
85 if (!var->pointer_level ){//&& real_decl_type(var->arg->type)->type != PSI_T_STRUCT) {
86 return ptr;
87 }
88
89 val = val_ptr = calloc(var->pointer_level + 1, sizeof(void *));
90 for (i = !var->arg->var->array_size; i < var->pointer_level; ++i) {
91 #if 0
92 fprintf(stderr, "++\n");
93 #endif
94 val_ptr->ptr = (void **) val_ptr + 1;
95 val_ptr = val_ptr->ptr;
96 }
97 val_ptr->ptr = ptr;
98 return val;
99 }
100
101 static inline impl_val *struct_member_ref(decl_arg *set_arg, impl_val *struct_ptr, impl_val **to_free) {
102 void *ptr = (char *) struct_ptr + set_arg->layout->pos;
103 #if 0
104 fprintf(stderr, "struct member %s: %p\n", set_arg->var->name, ptr);
105 #endif
106 return ptr;
107 }
108
109 #endif