* src/vmcore/class.c (class_define): New function.
[cacao.git] / src / native / vm / java_lang_ClassLoader.c
1 /* src/native/vm/java_lang_ClassLoader.c - java/lang/ClassLoader
2
3    Copyright (C) 2007 R. Grafl, A. Krall, C. Kruegel,
4    C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5    E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6    J. Wenninger, Institut f. Computersprachen - TU Wien
7
8    This file is part of CACAO.
9
10    This program is free software; you can redistribute it and/or
11    modify it under the terms of the GNU General Public License as
12    published by the Free Software Foundation; either version 2, or (at
13    your option) any later version.
14
15    This program is distributed in the hope that it will be useful, but
16    WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18    General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program; if not, write to the Free Software
22    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23    02110-1301, USA.
24
25    $Id: java_lang_VMClass.c 6131 2006-12-06 22:15:57Z twisti $
26
27 */
28
29
30 #include "config.h"
31
32 #include <assert.h>
33 #include <string.h>
34
35 #include "vm/types.h"
36
37 #include "mm/memory.h"
38
39 #include "vm/global.h"                          /* required by native headers */
40
41 #include "native/jni.h"
42
43 #include "native/include/java_lang_Object.h"
44
45 #if defined(ENABLE_JAVASE)
46 # include "native/include/java_lang_String.h"/* required by java_lang_Class.h */
47 # include "native/include/java_lang_Class.h"
48 # include "native/include/java_lang_ClassLoader.h"
49 # include "native/include/java_security_ProtectionDomain.h"
50 #endif
51
52 #include "vm/exceptions.h"
53 #include "vm/stringlocal.h"
54
55 #include "vmcore/class.h"
56 #include "vmcore/classcache.h"
57 #include "vmcore/options.h"
58
59 #if defined(ENABLE_STATISTICS)
60 # include "vmcore/statistics.h"
61 #endif
62
63
64 /*
65  * Class:     java/lang/ClassLoader
66  * Method:    defineClass
67  * Signature: (Ljava/lang/ClassLoader;Ljava/lang/String;[BIILjava/security/ProtectionDomain;)Ljava/lang/Class;
68  */
69 java_lang_Class *_Jv_java_lang_ClassLoader_defineClass(java_lang_ClassLoader *cl, java_lang_String *name, java_bytearray *data, s4 offset, s4 len, java_security_ProtectionDomain *pd)
70 {
71         java_objectheader *loader;
72         utf               *utfname;
73         classinfo         *c;
74         java_lang_Class   *o;
75 #if defined(ENABLE_JVMTI)
76         jint new_class_data_len = 0;
77         unsigned char* new_class_data = NULL;
78 #endif
79
80         loader = (java_objectheader *) cl;
81
82         /* check if data was passed */
83
84         if (data == NULL) {
85                 exceptions_throw_nullpointerexception();
86                 return NULL;
87         }
88
89         /* check the indexes passed */
90
91         if ((offset < 0) || (len < 0) || ((offset + len) > data->header.size)) {
92                 exceptions_throw_arrayindexoutofboundsexception();
93                 return NULL;
94         }
95
96         if (name != NULL) {
97                 /* convert '.' to '/' in java string */
98
99                 utfname = javastring_toutf((java_objectheader *) name, true);
100         } 
101         else {
102                 utfname = NULL;
103         }
104
105 #if defined(ENABLE_JVMTI)
106         /* fire Class File Load Hook JVMTI event */
107
108         if (jvmti)
109                 jvmti_ClassFileLoadHook(utfname, len, (unsigned char *) data->data, 
110                                                                 loader, (java_objectheader *) pd, 
111                                                                 &new_class_data_len, &new_class_data);
112 #endif
113
114         /* define the class */
115
116 #if defined(ENABLE_JVMTI)
117         /* check if the JVMTI wants to modify the class */
118
119         if (new_class_data == NULL)
120                 c = class_define(utfname, loader, new_class_data_len, new_class_data); 
121         else
122 #endif
123                 c = class_define(utfname, loader, len, (u1 *) &data->data[offset]); 
124
125         if (c == NULL)
126                 return NULL;
127
128         /* set ProtectionDomain */
129
130         o = (java_lang_Class *) c;
131
132         o->pd = pd;
133
134         return o;
135 }
136
137
138 /*
139  * These are local overrides for various environment variables in Emacs.
140  * Please do not remove this and leave it at the end of the file, where
141  * Emacs will automagically detect them.
142  * ---------------------------------------------------------------------
143  * Local variables:
144  * mode: c
145  * indent-tabs-mode: t
146  * c-basic-offset: 4
147  * tab-width: 4
148  * End:
149  * vim:noexpandtab:sw=4:ts=4:
150  */