1 /*
2 * Copyright (c) 2002-2011 by XMLVM.org
3 *
4 * Project Info: http://www.xmlvm.org
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU Lesser General Public License as published by
8 * the Free Software Foundation; either version 2.1 of the License, or
9 * (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
14 * 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 Street, Fifth Floor, Boston, MA 02110-1301,
19 * USA.
20 */
21
22 #include "xmlvm-util.h"
23 #include "java_util_ArrayList.h"
24 #include "java_util_HashSet.h"
25 #include "java_util_HashMap.h"
26 #include "java_util_Map_Entry.h"
27
28
29 /**** ArrayList Utilities ********************************************************************/
XMLVMUtil_NEW_ArrayList()30 JAVA_OBJECT XMLVMUtil_NEW_ArrayList()
31 {
32 JAVA_OBJECT obj = __NEW_java_util_ArrayList();
33 java_util_ArrayList___INIT___(obj);
34 return obj;
35 }
36
XMLVMUtil_ArrayList_size(JAVA_OBJECT me)37 JAVA_INT XMLVMUtil_ArrayList_size(JAVA_OBJECT me)
38 {
39 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_size__
40 return (*(JAVA_INT (*)(JAVA_OBJECT)) ((java_util_ArrayList*) me)->
41 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_size__])(me);
42 #else
43 return java_util_ArrayList_size__(me);
44 #endif
45 }
46
XMLVMUtil_ArrayList_add(JAVA_OBJECT me,JAVA_OBJECT obj)47 JAVA_BOOLEAN XMLVMUtil_ArrayList_add(JAVA_OBJECT me, JAVA_OBJECT obj)
48 {
49 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_add___java_lang_Object
50 return (*(JAVA_BOOLEAN (*)(JAVA_OBJECT, JAVA_OBJECT)) ((java_util_ArrayList*) me)->
51 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_add___java_lang_Object])(me, obj);
52 #else
53 return java_util_ArrayList_add___java_lang_Object(me, obj);
54 #endif
55 }
56
XMLVMUtil_ArrayList_addAt(JAVA_OBJECT me,JAVA_INT index,JAVA_OBJECT obj)57 void XMLVMUtil_ArrayList_addAt(JAVA_OBJECT me, JAVA_INT index, JAVA_OBJECT obj)
58 {
59 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_add___int_java_lang_Object
60 (*(JAVA_BOOLEAN (*)(JAVA_OBJECT, JAVA_INT, JAVA_OBJECT)) ((java_util_ArrayList*) me)->
61 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_add___int_java_lang_Object])(me, index, obj);
62 #else
63 java_util_ArrayList_add___int_java_lang_Object(me, index, obj);
64 #endif
65 }
66
XMLVMUtil_ArrayList_get(JAVA_OBJECT me,JAVA_INT idx)67 JAVA_OBJECT XMLVMUtil_ArrayList_get(JAVA_OBJECT me, JAVA_INT idx)
68 {
69 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_get___int
70 return (*(JAVA_OBJECT (*)(JAVA_OBJECT, JAVA_INT)) ((java_util_ArrayList*) me)->
71 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_get___int])(me, idx);
72 #else
73 return java_util_ArrayList_get___int(me, idx);
74 #endif
75 }
76
XMLVMUtil_ArrayList_remove(JAVA_OBJECT me,JAVA_OBJECT obj)77 JAVA_BOOLEAN XMLVMUtil_ArrayList_remove(JAVA_OBJECT me, JAVA_OBJECT obj)
78 {
79 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_remove___java_lang_Object
80 return (*(JAVA_BOOLEAN (*)(JAVA_OBJECT, JAVA_OBJECT)) ((java_util_ArrayList*) me)->
81 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_remove___java_lang_Object])(me, obj);
82 #else
83 return java_util_ArrayList_remove___java_lang_Object(me, obj);
84 #endif
85 }
86
XMLVMUtil_ArrayList_indexOf(JAVA_OBJECT me,JAVA_OBJECT obj)87 JAVA_INT XMLVMUtil_ArrayList_indexOf(JAVA_OBJECT me, JAVA_OBJECT obj)
88 {
89 #ifdef XMLVM_VTABLE_IDX_java_util_ArrayList_indexOf___java_lang_Object
90 return (*(JAVA_INT (*)(JAVA_OBJECT, JAVA_OBJECT)) ((java_util_ArrayList*) me)->
91 tib->vtable[XMLVM_VTABLE_IDX_java_util_ArrayList_indexOf___java_lang_Object])(me, obj);
92 #else
93 return java_util_ArrayList_indexOf___java_lang_Object(me, obj);
94 #endif
95 }
96
97 /**** HashSet Utilities ********************************************************************/
XMLVMUtil_NEW_HashSet()98 JAVA_OBJECT XMLVMUtil_NEW_HashSet()
99 {
100 JAVA_OBJECT obj = __NEW_java_util_HashSet();
101 java_util_HashSet___INIT___(obj);
102 return obj;
103 }
104
XMLVMUtil_HashSet_add(JAVA_OBJECT me,JAVA_OBJECT obj)105 JAVA_BOOLEAN XMLVMUtil_HashSet_add(JAVA_OBJECT me, JAVA_OBJECT obj)
106 {
107 #ifdef XMLVM_VTABLE_IDX_java_util_HashSet_add___java_lang_Object
108 return (*(JAVA_BOOLEAN (*)(JAVA_OBJECT, JAVA_OBJECT)) ((java_util_HashSet*) me)->
109 tib->vtable[XMLVM_VTABLE_IDX_java_util_HashSet_add___java_lang_Object])(me, obj);
110 #else
111 return java_util_HashSet_add___java_lang_Object(me, obj);
112 #endif
113 }
114
XMLVMUtil_HashSet_iterator(JAVA_OBJECT me)115 JAVA_INT XMLVMUtil_HashSet_iterator(JAVA_OBJECT me)
116 {
117 #ifdef XMLVM_VTABLE_IDX_java_util_HashSet_iterator__
118 return (*(JAVA_INT (*)(JAVA_OBJECT)) ((java_util_HashSet*) me)->
119 tib->vtable[XMLVM_ITABLE_IDX_java_util_Set_iterator__])(me);
120 #else
121 return java_util_HashSet_iterator__(me);
122 #endif
123 }
124
XMLVMUtil_Iterator_hasNext(JAVA_OBJECT me)125 JAVA_INT XMLVMUtil_Iterator_hasNext(JAVA_OBJECT me)
126 {
127 #ifdef XMLVM_VTABLE_IDX_java_util_Iterator_hasNext__
128 return (*(JAVA_INT (*)(JAVA_OBJECT)) ((java_util_Iterator*) me)->
129 tib->vtable[XMLVM_VTABLE_IDX_java_util_Iterator_hasNext__])(me);
130 #endif
131 }
132
XMLVMUtil_Iterator_next(JAVA_OBJECT me)133 JAVA_INT XMLVMUtil_Iterator_next(JAVA_OBJECT me)
134 {
135 #ifdef XMLVM_VTABLE_IDX_java_util_Iterator_next__
136 return (*(JAVA_INT (*)(JAVA_OBJECT)) ((java_util_Iterator*) me)->
137 tib->vtable[XMLVM_VTABLE_IDX_java_util_Iterator_next__])(me);
138 #endif
139 }
140
141 /**** HashMap Utilities ********************************************************************/
XMLVMUtil_NEW_HashMap()142 JAVA_OBJECT XMLVMUtil_NEW_HashMap()
143 {
144 JAVA_OBJECT obj = __NEW_java_util_HashMap();
145 java_util_HashMap___INIT___(obj);
146 return obj;
147 }
148
XMLVMUtil_HashMap_put(JAVA_OBJECT me,JAVA_OBJECT key,JAVA_OBJECT value)149 JAVA_OBJECT XMLVMUtil_HashMap_put(JAVA_OBJECT me, JAVA_OBJECT key, JAVA_OBJECT value)
150 {
151 #ifdef XMLVM_VTABLE_IDX_java_util_HashMap_put___java_lang_Object_java_lang_Object
152 return (*(JAVA_OBJECT (*)(JAVA_OBJECT, JAVA_OBJECT, JAVA_OBJECT)) ((java_util_HashMap*) me)->
153 tib->vtable[XMLVM_VTABLE_IDX_java_util_HashMap_put___java_lang_Object_java_lang_Object])(me, key, value);
154 #else
155 return java_util_HashMap_put___java_lang_Object_java_lang_Object(me, key, value);
156 #endif
157 }
158
XMLVMUtil_HashMap_get(JAVA_OBJECT me,JAVA_OBJECT key)159 JAVA_OBJECT XMLVMUtil_HashMap_get(JAVA_OBJECT me, JAVA_OBJECT key)
160 {
161 #ifdef XMLVM_VTABLE_IDX_java_util_HashMap_get___java_lang_Object
162 return (*(JAVA_OBJECT (*)(JAVA_OBJECT, JAVA_OBJECT)) ((java_util_HashMap*) me)->
163 tib->vtable[XMLVM_VTABLE_IDX_java_util_HashMap_get___java_lang_Object])(me, key);
164 #else
165 return java_util_HashMap_get___java_lang_Object(me, key);
166 #endif
167 }
168
XMLVMUtil_HashMap_entrySet(JAVA_OBJECT me)169 JAVA_OBJECT XMLVMUtil_HashMap_entrySet(JAVA_OBJECT me)
170 {
171 #ifdef XMLVM_VTABLE_IDX_java_util_HashMap_entrySet__
172 return (*(JAVA_OBJECT (*)(JAVA_OBJECT)) ((java_util_HashMap*) me)->
173 tib->vtable[XMLVM_VTABLE_IDX_java_util_HashMap_entrySet__])(me);
174 #else
175 return java_util_HashMap_entrySet__(me);
176 #endif
177 }
178
XMLVMUtil_MapEntry_getKey(JAVA_OBJECT me)179 JAVA_OBJECT XMLVMUtil_MapEntry_getKey(JAVA_OBJECT me)
180 {
181 return (*(JAVA_OBJECT (*)(JAVA_OBJECT)) *(((java_lang_Object*) me)->
182 tib->itableBegin)[XMLVM_ITABLE_IDX_java_util_Map_Entry_getKey__])(me);
183 }
184
XMLVMUtil_MapEntry_getValue(JAVA_OBJECT me)185 JAVA_OBJECT XMLVMUtil_MapEntry_getValue(JAVA_OBJECT me)
186 {
187 return (*(JAVA_OBJECT (*)(JAVA_OBJECT)) *(((java_lang_Object*) me)->
188 tib->itableBegin)[XMLVM_ITABLE_IDX_java_util_Map_Entry_getValue__])(me);
189 }
190
191
192 /**** ConstantStringPool Utilities ************************************************************/
193 static JAVA_OBJECT stringPool = JAVA_NULL;
194
XMLVMUtil_getFromStringPool(JAVA_OBJECT str)195 JAVA_OBJECT XMLVMUtil_getFromStringPool(JAVA_OBJECT str)
196 {
197 if (stringPool == JAVA_NULL) {
198 stringPool = XMLVMUtil_NEW_ArrayList();
199 }
200 JAVA_INT i = XMLVMUtil_ArrayList_indexOf(stringPool, str);
201 if (i == -1) {
202 XMLVMUtil_ArrayList_add(stringPool, str);
203 return str;
204 }
205 return XMLVMUtil_ArrayList_get(stringPool, i);
206 }
207
208
209 /**** Misc Utilities **********************************************************************/
210
XMLVMUtil_convertFromByteArray(JAVA_OBJECT byteArray)211 char* XMLVMUtil_convertFromByteArray(JAVA_OBJECT byteArray) {
212 org_xmlvm_runtime_XMLVMArray* a = byteArray;
213 char* data = (char*) a->fields.org_xmlvm_runtime_XMLVMArray.array_;
214 int length = a->fields.org_xmlvm_runtime_XMLVMArray.length_;
215 char* buf = XMLVM_ATOMIC_MALLOC(length + 1);
216 XMLVM_MEMCPY(buf, data, length);
217 buf[length] = '\0';
218 return buf;
219 }
220
221