Fixes PR102 and PR119.
[cacao.git] / src / vm / primitive.hpp
1 /* src/vm/primitive.hpp - primitive types
2
3    Copyright (C) 2007, 2008
4    CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
5
6    This file is part of CACAO.
7
8    This program is free software; you can redistribute it and/or
9    modify it under the terms of the GNU General Public License as
10    published by the Free Software Foundation; either version 2, or (at
11    your option) any later version.
12
13    This program is distributed in the hope that it will be useful, but
14    WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16    General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21    02110-1301, USA.
22
23 */
24
25
26 #ifndef _PRIMITIVE_HPP
27 #define _PRIMITIVE_HPP
28
29 #include "config.h"
30
31 #include <stdint.h>
32
33 #include "vm/class.hpp"
34 #include "vm/global.h"
35 #include "vm/linker.hpp"
36 #include "vm/utf8.h"
37
38
39 #ifdef __cplusplus
40
41 class Primitive {
42 public:
43         static void initialize_table();
44         static void post_initialize_table();
45
46         static classinfo*     get_class_by_name(utf *name);
47         static classinfo*     get_class_by_type(int type);
48         static classinfo*     get_class_by_char(char ch);
49         static classinfo*     get_arrayclass_by_name(utf* name);
50         static classinfo*     get_arrayclass_by_type(int type);
51
52         static int            get_type_by_wrapperclass(classinfo *c);
53
54         static java_handle_t* box(int type, imm_union value);
55
56         static java_handle_t* box(uint8_t value);
57         static java_handle_t* box(int8_t value);
58         static java_handle_t* box(uint16_t value);
59         static java_handle_t* box(int16_t value);
60         static java_handle_t* box(int32_t value);
61         static java_handle_t* box(int64_t value);
62         static java_handle_t* box(float value);
63         static java_handle_t* box(double value);
64
65         static imm_union      unbox(java_handle_t *o);
66         static bool           unbox_typed(java_handle_t *o, int type, imm_union* value);
67
68         static uint8_t        unbox_boolean(java_handle_t* o);
69         static int8_t         unbox_byte(java_handle_t* o);
70         static uint16_t       unbox_char(java_handle_t* o);
71         static int16_t        unbox_short(java_handle_t* o);
72         static int32_t        unbox_int(java_handle_t* o);
73         static int64_t        unbox_long(java_handle_t* o);
74         static float          unbox_float(java_handle_t* o);
75         static double         unbox_double(java_handle_t* o);
76 };
77
78 #endif
79
80 /* primitive data types *******************************************************/
81
82 /* These values are used in parsed descriptors and in some other
83    places were the different types handled internally as TYPE_INT have
84    to be distinguished. */
85
86 #define PRIMITIVETYPE_COUNT  11  /* number of primitive types (+ dummies)     */
87
88 /* CAUTION: Don't change the numerical values! These constants are
89    used as indices into the primitive type table. */
90
91 #define PRIMITIVETYPE_INT     TYPE_INT
92 #define PRIMITIVETYPE_LONG    TYPE_LNG
93 #define PRIMITIVETYPE_FLOAT   TYPE_FLT
94 #define PRIMITIVETYPE_DOUBLE  TYPE_DBL
95 #define PRIMITIVETYPE_DUMMY1  TYPE_ADR     /* not used! */
96 #define PRIMITIVETYPE_BYTE    5
97 #define PRIMITIVETYPE_CHAR    6
98 #define PRIMITIVETYPE_SHORT   7
99 #define PRIMITIVETYPE_BOOLEAN 8
100 #define PRIMITIVETYPE_DUMMY2  9            /* not used! */
101 #define PRIMITIVETYPE_VOID    TYPE_VOID
102
103
104 /* primitivetypeinfo **********************************************************/
105
106 struct primitivetypeinfo {
107         const char* cname;                   /* char name of primitive class      */
108         utf*        name;                    /* name of primitive class           */
109         classinfo*  class_wrap;              /* class for wrapping primitive type */
110         classinfo*  class_primitive;         /* primitive class                   */
111         const char* wrapname;                /* name of class for wrapping        */
112         const char  typesig;                 /* one character type signature      */
113         const char* arrayname;               /* name of primitive array class     */
114         classinfo*  arrayclass;              /* primitive array class             */
115 };
116
117
118 /* global variables ***********************************************************/
119
120 /* This array can be indexed by the PRIMITIVETYPE_ and ARRAYTYPE_
121    constants (except ARRAYTYPE_OBJECT). */
122
123 extern primitivetypeinfo primitivetype_table[PRIMITIVETYPE_COUNT];
124
125 /* this function is in src/vm/primitivecore.c */
126 void       primitive_init(void);
127 void       primitive_postinit(void);
128
129 #ifndef __cplusplus
130 // Legacy C interface.
131 classinfo *Primitive_get_class_by_name(utf *name);
132 classinfo *Primitive_get_class_by_type(int type);
133 classinfo *Primitive_get_arrayclass_by_type(int type);
134 #endif
135
136 #endif // _PRIMITIVE_HPP
137
138
139 /*
140  * These are local overrides for various environment variables in Emacs.
141  * Please do not remove this and leave it at the end of the file, where
142  * Emacs will automagically detect them.
143  * ---------------------------------------------------------------------
144  * Local variables:
145  * mode: c++
146  * indent-tabs-mode: t
147  * c-basic-offset: 4
148  * tab-width: 4
149  * End:
150  * vim:noexpandtab:sw=4:ts=4:
151  */