1 /*
2 * Copyright (c) 1997, 2018, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "precompiled.hpp"
26 #include "jvm.h"
27 #include "jimage.hpp"
28 #include "classfile/classFileStream.hpp"
29 #include "classfile/classLoader.inline.hpp"
30 #include "classfile/classLoaderData.inline.hpp"
31 #include "classfile/classLoaderExt.hpp"
32 #include "classfile/javaClasses.hpp"
33 #include "classfile/moduleEntry.hpp"
34 #include "classfile/modules.hpp"
35 #include "classfile/packageEntry.hpp"
36 #include "classfile/klassFactory.hpp"
37 #include "classfile/systemDictionary.hpp"
38 #include "classfile/vmSymbols.hpp"
39 #include "compiler/compileBroker.hpp"
40 #include "interpreter/bytecodeStream.hpp"
41 #include "interpreter/oopMapCache.hpp"
42 #include "logging/log.hpp"
43 #include "logging/logStream.hpp"
44 #include "logging/logTag.hpp"
45 #include "memory/allocation.inline.hpp"
46 #include "memory/filemap.hpp"
47 #include "memory/oopFactory.hpp"
48 #include "memory/resourceArea.hpp"
49 #include "memory/universe.hpp"
50 #include "oops/instanceKlass.hpp"
51 #include "oops/instanceRefKlass.hpp"
52 #include "oops/method.inline.hpp"
53 #include "oops/objArrayOop.inline.hpp"
54 #include "oops/oop.inline.hpp"
55 #include "oops/symbol.hpp"
56 #include "prims/jvm_misc.hpp"
57 #include "runtime/arguments.hpp"
58 #include "runtime/compilationPolicy.hpp"
59 #include "runtime/handles.hpp"
60 #include "runtime/handles.inline.hpp"
61 #include "runtime/init.hpp"
62 #include "runtime/interfaceSupport.inline.hpp"
63 #include "runtime/java.hpp"
64 #include "runtime/javaCalls.hpp"
65 #include "runtime/os.inline.hpp"
66 #include "runtime/threadCritical.hpp"
67 #include "runtime/timer.hpp"
68 #include "runtime/vm_version.hpp"
69 #include "services/management.hpp"
70 #include "services/threadService.hpp"
71 #include "utilities/events.hpp"
72 #include "utilities/hashtable.inline.hpp"
73 #include "utilities/macros.hpp"
74 #if INCLUDE_CDS
75 #include "classfile/sharedPathsMiscInfo.hpp"
76 #endif
77
78 // Entry points in zip.dll for loading zip/jar file entries
79
80 typedef void * * (*ZipOpen_t)(const char *name, char **pmsg);
81 typedef void (*ZipClose_t)(jzfile *zip);
82 typedef jzentry* (*FindEntry_t)(jzfile *zip, const char *name, jint *sizeP, jint *nameLen);
83 typedef jboolean (*ReadEntry_t)(jzfile *zip, jzentry *entry, unsigned char *buf, char *namebuf);
84 typedef jzentry* (*GetNextEntry_t)(jzfile *zip, jint n);
85 typedef jboolean (*ZipInflateFully_t)(void *inBuf, jlong inLen, void *outBuf, jlong outLen, char **pmsg);
86 typedef jint (*Crc32_t)(jint crc, const jbyte *buf, jint len);
87
88 static ZipOpen_t ZipOpen = NULL;
89 static ZipClose_t ZipClose = NULL;
90 static FindEntry_t FindEntry = NULL;
91 static ReadEntry_t ReadEntry = NULL;
92 static GetNextEntry_t GetNextEntry = NULL;
93 static canonicalize_fn_t CanonicalizeEntry = NULL;
94 static ZipInflateFully_t ZipInflateFully = NULL;
95 static Crc32_t Crc32 = NULL;
96
97 // Entry points for jimage.dll for loading jimage file entries
98
99 static JImageOpen_t JImageOpen = NULL;
100 static JImageClose_t JImageClose = NULL;
101 static JImagePackageToModule_t JImagePackageToModule = NULL;
102 static JImageFindResource_t JImageFindResource = NULL;
103 static JImageGetResource_t JImageGetResource = NULL;
104 static JImageResourceIterator_t JImageResourceIterator = NULL;
105 static JImage_ResourcePath_t JImageResourcePath = NULL;
106
107 // Globals
108
109 PerfCounter* ClassLoader::_perf_accumulated_time = NULL;
110 PerfCounter* ClassLoader::_perf_classes_inited = NULL;
111 PerfCounter* ClassLoader::_perf_class_init_time = NULL;
112 PerfCounter* ClassLoader::_perf_class_init_selftime = NULL;
113 PerfCounter* ClassLoader::_perf_classes_verified = NULL;
114 PerfCounter* ClassLoader::_perf_class_verify_time = NULL;
115 PerfCounter* ClassLoader::_perf_class_verify_selftime = NULL;
116 PerfCounter* ClassLoader::_perf_classes_linked = NULL;
117 PerfCounter* ClassLoader::_perf_class_link_time = NULL;
118 PerfCounter* ClassLoader::_perf_class_link_selftime = NULL;
119 PerfCounter* ClassLoader::_perf_class_parse_time = NULL;
120 PerfCounter* ClassLoader::_perf_class_parse_selftime = NULL;
121 PerfCounter* ClassLoader::_perf_sys_class_lookup_time = NULL;
122 PerfCounter* ClassLoader::_perf_shared_classload_time = NULL;
123 PerfCounter* ClassLoader::_perf_sys_classload_time = NULL;
124 PerfCounter* ClassLoader::_perf_app_classload_time = NULL;
125 PerfCounter* ClassLoader::_perf_app_classload_selftime = NULL;
126 PerfCounter* ClassLoader::_perf_app_classload_count = NULL;
127 PerfCounter* ClassLoader::_perf_define_appclasses = NULL;
128 PerfCounter* ClassLoader::_perf_define_appclass_time = NULL;
129 PerfCounter* ClassLoader::_perf_define_appclass_selftime = NULL;
130 PerfCounter* ClassLoader::_perf_app_classfile_bytes_read = NULL;
131 PerfCounter* ClassLoader::_perf_sys_classfile_bytes_read = NULL;
132 PerfCounter* ClassLoader::_sync_systemLoaderLockContentionRate = NULL;
133 PerfCounter* ClassLoader::_sync_nonSystemLoaderLockContentionRate = NULL;
134 PerfCounter* ClassLoader::_sync_JVMFindLoadedClassLockFreeCounter = NULL;
135 PerfCounter* ClassLoader::_sync_JVMDefineClassLockFreeCounter = NULL;
136 PerfCounter* ClassLoader::_sync_JNIDefineClassLockFreeCounter = NULL;
137 PerfCounter* ClassLoader::_unsafe_defineClassCallCounter = NULL;
138
139 GrowableArray<ModuleClassPathList*>* ClassLoader::_patch_mod_entries = NULL;
140 GrowableArray<ModuleClassPathList*>* ClassLoader::_exploded_entries = NULL;
141 ClassPathEntry* ClassLoader::_jrt_entry = NULL;
142 ClassPathEntry* ClassLoader::_first_append_entry = NULL;
143 ClassPathEntry* ClassLoader::_last_append_entry = NULL;
144 #if INCLUDE_CDS
145 ClassPathEntry* ClassLoader::_app_classpath_entries = NULL;
146 ClassPathEntry* ClassLoader::_last_app_classpath_entry = NULL;
147 ClassPathEntry* ClassLoader::_module_path_entries = NULL;
148 ClassPathEntry* ClassLoader::_last_module_path_entry = NULL;
149 SharedPathsMiscInfo* ClassLoader::_shared_paths_misc_info = NULL;
150 #endif
151
152 // helper routines
153 bool string_starts_with(const char* str, const char* str_to_find) {
154 size_t str_len = strlen(str);
155 size_t str_to_find_len = strlen(str_to_find);
156 if (str_to_find_len > str_len) {
157 return false;
158 }
159 return (strncmp(str, str_to_find, str_to_find_len) == 0);
160 }
161
162 static const char* get_jimage_version_string() {
163 static char version_string[10] = "";
164 if (version_string[0] == '\0') {
165 jio_snprintf(version_string, sizeof(version_string), "%d.%d",
166 VM_Version::vm_major_version(), VM_Version::vm_minor_version());
167 }
168 return (const char*)version_string;
169 }
170
171 bool ClassLoader::string_ends_with(const char* str, const char* str_to_find) {
172 size_t str_len = strlen(str);
173 size_t str_to_find_len = strlen(str_to_find);
174 if (str_to_find_len > str_len) {
175 return false;
176 }
177 return (strncmp(str + (str_len - str_to_find_len), str_to_find, str_to_find_len) == 0);
178 }
179
180 // Used to obtain the package name from a fully qualified class name.
181 // It is the responsibility of the caller to establish a ResourceMark.
182 const char* ClassLoader::package_from_name(const char* const class_name, bool* bad_class_name) {
183 if (class_name == NULL) {
184 if (bad_class_name != NULL) {
185 *bad_class_name = true;
186 }
187 return NULL;
188 }
189
190 if (bad_class_name != NULL) {
191 *bad_class_name = false;
192 }
193
194 const char* const last_slash = strrchr(class_name, '/');
195 if (last_slash == NULL) {
196 // No package name
197 return NULL;
198 }
199
200 char* class_name_ptr = (char*) class_name;
201 // Skip over '['s
202 if (*class_name_ptr == '[') {
203 do {
204 class_name_ptr++;
205 } while (*class_name_ptr == '[');
206
207 // Fully qualified class names should not contain a 'L'.
208 // Set bad_class_name to true to indicate that the package name
209 // could not be obtained due to an error condition.
210 // In this situation, is_same_class_package returns false.
211 if (*class_name_ptr == 'L') {
212 if (bad_class_name != NULL) {
213 *bad_class_name = true;
214 }
215 return NULL;
216 }
217 }
218
219 int length = last_slash - class_name_ptr;
220
221 // A class name could have just the slash character in the name.
222 if (length <= 0) {
223 // No package name
224 if (bad_class_name != NULL) {
225 *bad_class_name = true;
226 }
227 return NULL;
228 }
229
230 // drop name after last slash (including slash)
231 // Ex., "java/lang/String.class" => "java/lang"
232 char* pkg_name = NEW_RESOURCE_ARRAY(char, length + 1);
233 strncpy(pkg_name, class_name_ptr, length);
234 *(pkg_name+length) = '\0';
235
236 return (const char *)pkg_name;
237 }
238
239 // Given a fully qualified class name, find its defining package in the class loader's
240 // package entry table.
241 PackageEntry* ClassLoader::get_package_entry(const char* class_name, ClassLoaderData* loader_data, TRAPS) {
242 ResourceMark rm(THREAD);
243 const char *pkg_name = ClassLoader::package_from_name(class_name);
244 if (pkg_name == NULL) {
245 return NULL;
246 }
247 PackageEntryTable* pkgEntryTable = loader_data->packages();
248 TempNewSymbol pkg_symbol = SymbolTable::new_symbol(pkg_name, CHECK_NULL);
249 return pkgEntryTable->lookup_only(pkg_symbol);
250 }
251
252 ClassPathDirEntry::ClassPathDirEntry(const char* dir) : ClassPathEntry() {
253 char* copy = NEW_C_HEAP_ARRAY(char, strlen(dir)+1, mtClass);
254 strcpy(copy, dir);
255 _dir = copy;
256 }
257
258
259 ClassFileStream* ClassPathDirEntry::open_stream(const char* name, TRAPS) {
260 // construct full path name
261 assert((_dir != NULL) && (name != NULL), "sanity");
262 size_t path_len = strlen(_dir) + strlen(name) + strlen(os::file_separator()) + 1;
263 char* path = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, path_len);
264 int len = jio_snprintf(path, path_len, "%s%s%s", _dir, os::file_separator(), name);
265 assert(len == (int)(path_len - 1), "sanity");
266 // check if file exists
267 struct stat st;
268 if (os::stat(path, &st) == 0) {
269 // found file, open it
270 int file_handle = os::open(path, 0, 0);
271 if (file_handle != -1) {
272 // read contents into resource array
273 u1* buffer = NEW_RESOURCE_ARRAY(u1, st.st_size);
274 size_t num_read = os::read(file_handle, (char*) buffer, st.st_size);
275 // close file
276 os::close(file_handle);
277 // construct ClassFileStream
278 if (num_read == (size_t)st.st_size) {
279 if (UsePerfData) {
280 ClassLoader::perf_sys_classfile_bytes_read()->inc(num_read);
281 }
282 FREE_RESOURCE_ARRAY(char, path, path_len);
283 // Resource allocated
284 return new ClassFileStream(buffer,
285 st.st_size,
286 _dir,
287 ClassFileStream::verify);
288 }
289 }
290 }
291 FREE_RESOURCE_ARRAY(char, path, path_len);
292 return NULL;
293 }
294
295 ClassPathZipEntry::ClassPathZipEntry(jzfile* zip, const char* zip_name, bool is_boot_append) : ClassPathEntry() {
296 _zip = zip;
297 char *copy = NEW_C_HEAP_ARRAY(char, strlen(zip_name)+1, mtClass);
298 strcpy(copy, zip_name);
299 _zip_name = copy;
300 }
301
302 ClassPathZipEntry::~ClassPathZipEntry() {
303 if (ZipClose != NULL) {
304 (*ZipClose)(_zip);
305 }
306 FREE_C_HEAP_ARRAY(char, _zip_name);
307 }
308
309 u1* ClassPathZipEntry::open_entry(const char* name, jint* filesize, bool nul_terminate, TRAPS) {
310 // enable call to C land
311 JavaThread* thread = JavaThread::current();
312 ThreadToNativeFromVM ttn(thread);
313 // check whether zip archive contains name
314 jint name_len;
315 jzentry* entry = (*FindEntry)(_zip, name, filesize, &name_len);
316 if (entry == NULL) return NULL;
317 u1* buffer;
318 char name_buf[128];
319 char* filename;
320 if (name_len < 128) {
321 filename = name_buf;
322 } else {
323 filename = NEW_RESOURCE_ARRAY(char, name_len + 1);
324 }
325
326 // read contents into resource array
327 int size = (*filesize) + ((nul_terminate) ? 1 : 0);
328 buffer = NEW_RESOURCE_ARRAY(u1, size);
329 if (!(*ReadEntry)(_zip, entry, buffer, filename)) return NULL;
330
331 // return result
332 if (nul_terminate) {
333 buffer[*filesize] = 0;
334 }
335 return buffer;
336 }
337
338 ClassFileStream* ClassPathZipEntry::open_stream(const char* name, TRAPS) {
339 jint filesize;
340 u1* buffer = open_entry(name, &filesize, false, CHECK_NULL);
341 if (buffer == NULL) {
342 return NULL;
343 }
344 if (UsePerfData) {
345 ClassLoader::perf_sys_classfile_bytes_read()->inc(filesize);
346 }
347 // Resource allocated
348 return new ClassFileStream(buffer,
349 filesize,
350 _zip_name,
351 ClassFileStream::verify);
352 }
353
354 // invoke function for each entry in the zip file
355 void ClassPathZipEntry::contents_do(void f(const char* name, void* context), void* context) {
356 JavaThread* thread = JavaThread::current();
357 HandleMark handle_mark(thread);
358 ThreadToNativeFromVM ttn(thread);
359 for (int n = 0; ; n++) {
360 jzentry * ze = ((*GetNextEntry)(_zip, n));
361 if (ze == NULL) break;
362 (*f)(ze->name, context);
363 }
364 }
365
366 ClassPathImageEntry::ClassPathImageEntry(JImageFile* jimage, const char* name) :
367 ClassPathEntry(),
368 _jimage(jimage) {
369 guarantee(jimage != NULL, "jimage file is null");
370 guarantee(name != NULL, "jimage file name is null");
371 size_t len = strlen(name) + 1;
372 _name = NEW_C_HEAP_ARRAY(const char, len, mtClass);
373 strncpy((char *)_name, name, len);
374 }
375
376 ClassPathImageEntry::~ClassPathImageEntry() {
377 if (_name != NULL) {
378 FREE_C_HEAP_ARRAY(const char, _name);
379 _name = NULL;
380 }
381 if (_jimage != NULL) {
382 (*JImageClose)(_jimage);
383 _jimage = NULL;
384 }
385 }
386
387 // For a class in a named module, look it up in the jimage file using this syntax:
388 // /<module-name>/<package-name>/<base-class>
389 //
390 // Assumptions:
391 // 1. There are no unnamed modules in the jimage file.
392 // 2. A package is in at most one module in the jimage file.
393 //
394 ClassFileStream* ClassPathImageEntry::open_stream(const char* name, TRAPS) {
395 jlong size;
396 JImageLocationRef location = (*JImageFindResource)(_jimage, "", get_jimage_version_string(), name, &size);
397
398 if (location == 0) {
399 ResourceMark rm;
400 const char* pkg_name = ClassLoader::package_from_name(name);
401
402 if (pkg_name != NULL) {
403 if (!Universe::is_module_initialized()) {
404 location = (*JImageFindResource)(_jimage, JAVA_BASE_NAME, get_jimage_version_string(), name, &size);
405 #if INCLUDE_CDS
406 // CDS uses the boot class loader to load classes whose packages are in
407 // modules defined for other class loaders. So, for now, get their module
408 // names from the "modules" jimage file.
409 if (DumpSharedSpaces && location == 0) {
410 const char* module_name = (*JImagePackageToModule)(_jimage, pkg_name);
411 if (module_name != NULL) {
412 location = (*JImageFindResource)(_jimage, module_name, get_jimage_version_string(), name, &size);
413 }
414 }
415 #endif
416
417 } else {
418 PackageEntry* package_entry = ClassLoader::get_package_entry(name, ClassLoaderData::the_null_class_loader_data(), CHECK_NULL);
419 if (package_entry != NULL) {
420 ResourceMark rm;
421 // Get the module name
422 ModuleEntry* module = package_entry->module();
423 assert(module != NULL, "Boot classLoader package missing module");
424 assert(module->is_named(), "Boot classLoader package is in unnamed module");
425 const char* module_name = module->name()->as_C_string();
426 if (module_name != NULL) {
427 location = (*JImageFindResource)(_jimage, module_name, get_jimage_version_string(), name, &size);
428 }
429 }
430 }
431 }
432 }
433 if (location != 0) {
434 if (UsePerfData) {
435 ClassLoader::perf_sys_classfile_bytes_read()->inc(size);
436 }
437 char* data = NEW_RESOURCE_ARRAY(char, size);
438 (*JImageGetResource)(_jimage, location, data, size);
439 // Resource allocated
440 return new ClassFileStream((u1*)data,
441 (int)size,
442 _name,
443 ClassFileStream::verify);
444 }
445
446 return NULL;
447 }
448
449 JImageLocationRef ClassLoader::jimage_find_resource(JImageFile* jf,
450 const char* module_name,
451 const char* file_name,
452 jlong &size) {
453 return ((*JImageFindResource)(jf, module_name, get_jimage_version_string(), file_name, &size));
454 }
455
456 #ifndef PRODUCT
457 bool ctw_visitor(JImageFile* jimage,
458 const char* module_name, const char* version, const char* package,
459 const char* name, const char* extension, void* arg) {
460 if (strcmp(extension, "class") == 0) {
461 Thread* THREAD = Thread::current();
462 ResourceMark rm(THREAD);
463 char* path = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, JIMAGE_MAX_PATH);
464 jio_snprintf(path, JIMAGE_MAX_PATH - 1, "%s/%s.class", package, name);
465 ClassLoader::compile_the_world_in(path, *(Handle*)arg, THREAD);
466 return !HAS_PENDING_EXCEPTION;
467 }
468 return true;
469 }
470
471 void ClassPathImageEntry::compile_the_world(Handle loader, TRAPS) {
472 tty->print_cr("CompileTheWorld : Compiling all classes in %s", name());
473 tty->cr();
474 (*JImageResourceIterator)(_jimage, (JImageResourceVisitor_t)ctw_visitor, (void *)&loader);
475 if (HAS_PENDING_EXCEPTION) {
476 if (PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())) {
477 CLEAR_PENDING_EXCEPTION;
478 tty->print_cr("\nCompileTheWorld : Ran out of memory\n");
479 tty->print_cr("Increase class metadata storage if a limit was set");
480 } else {
481 tty->print_cr("\nCompileTheWorld : Unexpected exception occurred\n");
482 }
483 }
484 }
485 #endif
486
487 bool ClassPathImageEntry::is_modules_image() const {
488 return ClassLoader::is_modules_image(name());
489 }
490
491 #if INCLUDE_CDS
492 void ClassLoader::exit_with_path_failure(const char* error, const char* message) {
493 assert(DumpSharedSpaces, "only called at dump time");
494 tty->print_cr("Hint: enable -Xlog:class+path=info to diagnose the failure");
495 vm_exit_during_initialization(error, message);
496 }
497 #endif
498
499 ModuleClassPathList::ModuleClassPathList(Symbol* module_name) {
500 _module_name = module_name;
501 _module_first_entry = NULL;
502 _module_last_entry = NULL;
503 }
504
505 ModuleClassPathList::~ModuleClassPathList() {
506 // Clean out each ClassPathEntry on list
507 ClassPathEntry* e = _module_first_entry;
508 while (e != NULL) {
509 ClassPathEntry* next_entry = e->next();
510 delete e;
511 e = next_entry;
512 }
513 }
514
515 void ModuleClassPathList::add_to_list(ClassPathEntry* new_entry) {
516 if (new_entry != NULL) {
517 if (_module_last_entry == NULL) {
518 _module_first_entry = _module_last_entry = new_entry;
519 } else {
520 _module_last_entry->set_next(new_entry);
521 _module_last_entry = new_entry;
522 }
523 }
524 }
525
526 void ClassLoader::trace_class_path(const char* msg, const char* name) {
527 LogTarget(Info, class, path) lt;
528 if (lt.is_enabled()) {
529 LogStream ls(lt);
530 if (msg) {
531 ls.print("%s", msg);
532 }
533 if (name) {
534 if (strlen(name) < 256) {
535 ls.print("%s", name);
536 } else {
537 // For very long paths, we need to print each character separately,
538 // as print_cr() has a length limit
539 while (name[0] != '\0') {
540 ls.print("%c", name[0]);
541 name++;
542 }
543 }
544 }
545 ls.cr();
546 }
547 }
548
549 void ClassLoader::setup_bootstrap_search_path() {
550 const char* sys_class_path = Arguments::get_sysclasspath();
551 assert(sys_class_path != NULL, "System boot class path must not be NULL");
552 if (PrintSharedArchiveAndExit) {
553 // Don't print sys_class_path - this is the bootcp of this current VM process, not necessarily
554 // the same as the bootcp of the shared archive.
555 } else {
556 trace_class_path("bootstrap loader class path=", sys_class_path);
557 }
558 #if INCLUDE_CDS
559 if (DumpSharedSpaces) {
560 _shared_paths_misc_info->add_boot_classpath(sys_class_path);
561 }
562 #endif
563 setup_boot_search_path(sys_class_path);
564 }
565
566 #if INCLUDE_CDS
567 int ClassLoader::get_shared_paths_misc_info_size() {
568 return _shared_paths_misc_info->get_used_bytes();
569 }
570
571 void* ClassLoader::get_shared_paths_misc_info() {
572 return _shared_paths_misc_info->buffer();
573 }
574
575 bool ClassLoader::check_shared_paths_misc_info(void *buf, int size) {
576 SharedPathsMiscInfo* checker = new SharedPathsMiscInfo((char*)buf, size);
577 bool result = checker->check();
578 delete checker;
579 return result;
580 }
581
582 void ClassLoader::setup_app_search_path(const char *class_path) {
583
584 assert(DumpSharedSpaces, "Sanity");
585
586 Thread* THREAD = Thread::current();
587 int len = (int)strlen(class_path);
588 int end = 0;
589
590 // Iterate over class path entries
591 for (int start = 0; start < len; start = end) {
592 while (class_path[end] && class_path[end] != os::path_separator()[0]) {
593 end++;
594 }
595 EXCEPTION_MARK;
596 ResourceMark rm(THREAD);
597 char* path = NEW_RESOURCE_ARRAY(char, end - start + 1);
598 strncpy(path, &class_path[start], end - start);
599 path[end - start] = '\0';
600
601 update_class_path_entry_list(path, false, false);
602
603 while (class_path[end] == os::path_separator()[0]) {
604 end++;
605 }
606 }
607 }
608
609 void ClassLoader::add_to_module_path_entries(const char* path,
610 ClassPathEntry* entry) {
611 assert(entry != NULL, "ClassPathEntry should not be NULL");
612 assert(DumpSharedSpaces, "dump time only");
613
614 // The entry does not exist, add to the list
615 if (_module_path_entries == NULL) {
616 assert(_last_module_path_entry == NULL, "Sanity");
617 _module_path_entries = _last_module_path_entry = entry;
618 } else {
619 _last_module_path_entry->set_next(entry);
620 _last_module_path_entry = entry;
621 }
622 }
623
624 // Add a module path to the _module_path_entries list.
625 void ClassLoader::update_module_path_entry_list(const char *path, TRAPS) {
626 assert(DumpSharedSpaces, "dump time only");
627 struct stat st;
628 if (os::stat(path, &st) != 0) {
629 tty->print_cr("os::stat error %d (%s). CDS dump aborted (path was \"%s\").",
630 errno, os::errno_name(errno), path);
631 vm_exit_during_initialization();
632 }
633 // File or directory found
634 ClassPathEntry* new_entry = NULL;
635 new_entry = create_class_path_entry(path, &st, true /* throw_exception */,
636 false /*is_boot_append */, CHECK);
637 if (new_entry == NULL) {
638 return;
639 }
640
641 add_to_module_path_entries(path, new_entry);
642 return;
643 }
644
645 void ClassLoader::setup_module_search_path(const char* path, TRAPS) {
646 update_module_path_entry_list(path, THREAD);
647 }
648 #endif // INCLUDE_CDS
649
650 // Construct the array of module/path pairs as specified to --patch-module
651 // for the boot loader to search ahead of the jimage, if the class being
652 // loaded is defined to a module that has been specified to --patch-module.
653 void ClassLoader::setup_patch_mod_entries() {
654 Thread* THREAD = Thread::current();
655 GrowableArray<ModulePatchPath*>* patch_mod_args = Arguments::get_patch_mod_prefix();
656 int num_of_entries = patch_mod_args->length();
657
658
659 // Set up the boot loader's _patch_mod_entries list
660 _patch_mod_entries = new (ResourceObj::C_HEAP, mtModule) GrowableArray<ModuleClassPathList*>(num_of_entries, true);
661
662 for (int i = 0; i < num_of_entries; i++) {
663 const char* module_name = (patch_mod_args->at(i))->module_name();
664 Symbol* const module_sym = SymbolTable::lookup(module_name, (int)strlen(module_name), CHECK);
665 assert(module_sym != NULL, "Failed to obtain Symbol for module name");
666 ModuleClassPathList* module_cpl = new ModuleClassPathList(module_sym);
667
668 char* class_path = (patch_mod_args->at(i))->path_string();
669 int len = (int)strlen(class_path);
670 int end = 0;
671 // Iterate over the module's class path entries
672 for (int start = 0; start < len; start = end) {
673 while (class_path[end] && class_path[end] != os::path_separator()[0]) {
674 end++;
675 }
676 EXCEPTION_MARK;
677 ResourceMark rm(THREAD);
678 char* path = NEW_RESOURCE_ARRAY(char, end - start + 1);
679 strncpy(path, &class_path[start], end - start);
680 path[end - start] = '\0';
681
682 struct stat st;
683 if (os::stat(path, &st) == 0) {
684 // File or directory found
685 ClassPathEntry* new_entry = create_class_path_entry(path, &st, false, false, CHECK);
686 // If the path specification is valid, enter it into this module's list
687 if (new_entry != NULL) {
688 module_cpl->add_to_list(new_entry);
689 }
690 }
691
692 while (class_path[end] == os::path_separator()[0]) {
693 end++;
694 }
695 }
696
697 // Record the module into the list of --patch-module entries only if
698 // valid ClassPathEntrys have been created
699 if (module_cpl->module_first_entry() != NULL) {
700 _patch_mod_entries->push(module_cpl);
701 }
702 }
703 }
704
705 // Determine whether the module has been patched via the command-line
706 // option --patch-module
707 bool ClassLoader::is_in_patch_mod_entries(Symbol* module_name) {
708 if (_patch_mod_entries != NULL && _patch_mod_entries->is_nonempty()) {
709 int table_len = _patch_mod_entries->length();
710 for (int i = 0; i < table_len; i++) {
711 ModuleClassPathList* patch_mod = _patch_mod_entries->at(i);
712 if (module_name->fast_compare(patch_mod->module_name()) == 0) {
713 return true;
714 }
715 }
716 }
717 return false;
718 }
719
720 // Set up the _jrt_entry if present and boot append path
721 void ClassLoader::setup_boot_search_path(const char *class_path) {
722 int len = (int)strlen(class_path);
723 int end = 0;
724 bool set_base_piece = true;
725
726 #if INCLUDE_CDS
727 if (DumpSharedSpaces) {
728 if (!Arguments::has_jimage()) {
729 vm_exit_during_initialization("CDS is not supported in exploded JDK build", NULL);
730 }
731 }
732 #endif
733
734 // Iterate over class path entries
735 for (int start = 0; start < len; start = end) {
736 while (class_path[end] && class_path[end] != os::path_separator()[0]) {
737 end++;
738 }
739 EXCEPTION_MARK;
740 ResourceMark rm(THREAD);
741 char* path = NEW_RESOURCE_ARRAY(char, end - start + 1);
742 strncpy(path, &class_path[start], end - start);
743 path[end - start] = '\0';
744
745 if (set_base_piece) {
746 // The first time through the bootstrap_search setup, it must be determined
747 // what the base or core piece of the boot loader search is. Either a java runtime
748 // image is present or this is an exploded module build situation.
749 assert(string_ends_with(path, MODULES_IMAGE_NAME) || string_ends_with(path, JAVA_BASE_NAME),
750 "Incorrect boot loader search path, no java runtime image or " JAVA_BASE_NAME " exploded build");
751 struct stat st;
752 if (os::stat(path, &st) == 0) {
753 // Directory found
754 ClassPathEntry* new_entry = create_class_path_entry(path, &st, false, false, CHECK);
755
756 // Check for a jimage
757 if (Arguments::has_jimage()) {
758 assert(_jrt_entry == NULL, "should not setup bootstrap class search path twice");
759 assert(new_entry != NULL && new_entry->is_modules_image(), "No java runtime image present");
760 _jrt_entry = new_entry;
761 assert(_jrt_entry->jimage() != NULL, "No java runtime image");
762 }
763 } else {
764 // If path does not exist, exit
765 vm_exit_during_initialization("Unable to establish the boot loader search path", path);
766 }
767 set_base_piece = false;
768 } else {
769 // Every entry on the system boot class path after the initial base piece,
770 // which is set by os::set_boot_path(), is considered an appended entry.
771 update_class_path_entry_list(path, false, true);
772 }
773
774 while (class_path[end] == os::path_separator()[0]) {
775 end++;
776 }
777 }
778 }
779
780 // During an exploded modules build, each module defined to the boot loader
781 // will be added to the ClassLoader::_exploded_entries array.
782 void ClassLoader::add_to_exploded_build_list(Symbol* module_sym, TRAPS) {
783 assert(!ClassLoader::has_jrt_entry(), "Exploded build not applicable");
784 assert(_exploded_entries != NULL, "_exploded_entries was not initialized");
785
786 // Find the module's symbol
787 ResourceMark rm(THREAD);
788 const char *module_name = module_sym->as_C_string();
789 const char *home = Arguments::get_java_home();
790 const char file_sep = os::file_separator()[0];
791 // 10 represents the length of "modules" + 2 file separators + \0
792 size_t len = strlen(home) + strlen(module_name) + 10;
793 char *path = NEW_RESOURCE_ARRAY(char, len);
794 jio_snprintf(path, len, "%s%cmodules%c%s", home, file_sep, file_sep, module_name);
795
796 struct stat st;
797 if (os::stat(path, &st) == 0) {
798 // Directory found
799 ClassPathEntry* new_entry = create_class_path_entry(path, &st, false, false, CHECK);
800
801 // If the path specification is valid, enter it into this module's list.
802 // There is no need to check for duplicate modules in the exploded entry list,
803 // since no two modules with the same name can be defined to the boot loader.
804 // This is checked at module definition time in Modules::define_module.
805 if (new_entry != NULL) {
806 ModuleClassPathList* module_cpl = new ModuleClassPathList(module_sym);
807 module_cpl->add_to_list(new_entry);
808 {
809 MutexLocker ml(Module_lock, THREAD);
810 _exploded_entries->push(module_cpl);
811 }
812 log_info(class, load)("path: %s", path);
813 }
814 }
815 }
816
817 ClassPathEntry* ClassLoader::create_class_path_entry(const char *path, const struct stat* st,
818 bool throw_exception,
819 bool is_boot_append, TRAPS) {
820 JavaThread* thread = JavaThread::current();
821 ClassPathEntry* new_entry = NULL;
822 if ((st->st_mode & S_IFMT) == S_IFREG) {
823 ResourceMark rm(thread);
824 // Regular file, should be a zip or jimage file
825 // Canonicalized filename
826 char* canonical_path = NEW_RESOURCE_ARRAY_IN_THREAD(thread, char, JVM_MAXPATHLEN);
827 if (!get_canonical_path(path, canonical_path, JVM_MAXPATHLEN)) {
828 // This matches the classic VM
829 if (throw_exception) {
830 THROW_MSG_(vmSymbols::java_io_IOException(), "Bad pathname", NULL);
831 } else {
832 return NULL;
833 }
834 }
835 jint error;
836 JImageFile* jimage =(*JImageOpen)(canonical_path, &error);
837 if (jimage != NULL) {
838 new_entry = new ClassPathImageEntry(jimage, canonical_path);
839 } else {
840 char* error_msg = NULL;
841 jzfile* zip;
842 {
843 // enable call to C land
844 ThreadToNativeFromVM ttn(thread);
845 HandleMark hm(thread);
846 zip = (*ZipOpen)(canonical_path, &error_msg);
847 }
848 if (zip != NULL && error_msg == NULL) {
849 new_entry = new ClassPathZipEntry(zip, path, is_boot_append);
850 } else {
851 char *msg;
852 if (error_msg == NULL) {
853 msg = NEW_RESOURCE_ARRAY_IN_THREAD(thread, char, strlen(path) + 128); ;
854 jio_snprintf(msg, strlen(path) + 127, "error in opening JAR file %s", path);
855 } else {
856 int len = (int)(strlen(path) + strlen(error_msg) + 128);
857 msg = NEW_RESOURCE_ARRAY_IN_THREAD(thread, char, len); ;
858 jio_snprintf(msg, len - 1, "error in opening JAR file <%s> %s", error_msg, path);
859 }
860 // Don't complain about bad jar files added via -Xbootclasspath/a:.
861 if (throw_exception && is_init_completed()) {
862 THROW_MSG_(vmSymbols::java_lang_ClassNotFoundException(), msg, NULL);
863 } else {
864 return NULL;
865 }
866 }
867 }
868 log_info(class, path)("opened: %s", path);
869 log_info(class, load)("opened: %s", path);
870 } else {
871 // Directory
872 new_entry = new ClassPathDirEntry(path);
873 log_info(class, load)("path: %s", path);
874 }
875 return new_entry;
876 }
877
878
879 // Create a class path zip entry for a given path (return NULL if not found
880 // or zip/JAR file cannot be opened)
881 ClassPathZipEntry* ClassLoader::create_class_path_zip_entry(const char *path, bool is_boot_append) {
882 // check for a regular file
883 struct stat st;
884 if (os::stat(path, &st) == 0) {
885 if ((st.st_mode & S_IFMT) == S_IFREG) {
886 char canonical_path[JVM_MAXPATHLEN];
887 if (get_canonical_path(path, canonical_path, JVM_MAXPATHLEN)) {
888 char* error_msg = NULL;
889 jzfile* zip;
890 {
891 // enable call to C land
892 JavaThread* thread = JavaThread::current();
893 ThreadToNativeFromVM ttn(thread);
894 HandleMark hm(thread);
895 zip = (*ZipOpen)(canonical_path, &error_msg);
896 }
897 if (zip != NULL && error_msg == NULL) {
898 // create using canonical path
899 return new ClassPathZipEntry(zip, canonical_path, is_boot_append);
900 }
901 }
902 }
903 }
904 return NULL;
905 }
906
907 // returns true if entry already on class path
908 bool ClassLoader::contains_append_entry(const char* name) {
909 ClassPathEntry* e = _first_append_entry;
910 while (e != NULL) {
911 // assume zip entries have been canonicalized
912 if (strcmp(name, e->name()) == 0) {
913 return true;
914 }
915 e = e->next();
916 }
917 return false;
918 }
919
920 void ClassLoader::add_to_boot_append_entries(ClassPathEntry *new_entry) {
921 if (new_entry != NULL) {
922 if (_last_append_entry == NULL) {
923 assert(_first_append_entry == NULL, "boot loader's append class path entry list not empty");
924 _first_append_entry = _last_append_entry = new_entry;
925 } else {
926 _last_append_entry->set_next(new_entry);
927 _last_append_entry = new_entry;
928 }
929 }
930 }
931
932 // Record the path entries specified in -cp during dump time. The recorded
933 // information will be used at runtime for loading the archived app classes.
934 //
935 // Note that at dump time, ClassLoader::_app_classpath_entries are NOT used for
936 // loading app classes. Instead, the app class are loaded by the
937 // jdk/internal/loader/ClassLoaders$AppClassLoader instance.
938 void ClassLoader::add_to_app_classpath_entries(const char* path,
939 ClassPathEntry* entry,
940 bool check_for_duplicates) {
941 #if INCLUDE_CDS
942 assert(entry != NULL, "ClassPathEntry should not be NULL");
943 ClassPathEntry* e = _app_classpath_entries;
944 if (check_for_duplicates) {
945 while (e != NULL) {
946 if (strcmp(e->name(), entry->name()) == 0) {
947 // entry already exists
948 return;
949 }
950 e = e->next();
951 }
952 }
953
954 // The entry does not exist, add to the list
955 if (_app_classpath_entries == NULL) {
956 assert(_last_app_classpath_entry == NULL, "Sanity");
957 _app_classpath_entries = _last_app_classpath_entry = entry;
958 } else {
959 _last_app_classpath_entry->set_next(entry);
960 _last_app_classpath_entry = entry;
961 }
962
963 if (entry->is_jar_file()) {
964 ClassLoaderExt::process_jar_manifest(entry, check_for_duplicates);
965 }
966 #endif
967 }
968
969 // Returns true IFF the file/dir exists and the entry was successfully created.
970 bool ClassLoader::update_class_path_entry_list(const char *path,
971 bool check_for_duplicates,
972 bool is_boot_append,
973 bool throw_exception) {
974 struct stat st;
975 if (os::stat(path, &st) == 0) {
976 // File or directory found
977 ClassPathEntry* new_entry = NULL;
978 Thread* THREAD = Thread::current();
979 new_entry = create_class_path_entry(path, &st, throw_exception, is_boot_append, CHECK_(false));
980 if (new_entry == NULL) {
981 return false;
982 }
983
984 // Do not reorder the bootclasspath which would break get_system_package().
985 // Add new entry to linked list
986 if (is_boot_append) {
987 add_to_boot_append_entries(new_entry);
988 } else {
989 add_to_app_classpath_entries(path, new_entry, check_for_duplicates);
990 }
991 return true;
992 } else {
993 #if INCLUDE_CDS
994 if (DumpSharedSpaces) {
995 _shared_paths_misc_info->add_nonexist_path(path);
996 }
997 #endif
998 return false;
999 }
1000 }
1001
1002 static void print_module_entry_table(const GrowableArray<ModuleClassPathList*>* const module_list) {
1003 ResourceMark rm;
1004 int num_of_entries = module_list->length();
1005 for (int i = 0; i < num_of_entries; i++) {
1006 ClassPathEntry* e;
1007 ModuleClassPathList* mpl = module_list->at(i);
1008 tty->print("%s=", mpl->module_name()->as_C_string());
1009 e = mpl->module_first_entry();
1010 while (e != NULL) {
1011 tty->print("%s", e->name());
1012 e = e->next();
1013 if (e != NULL) {
1014 tty->print("%s", os::path_separator());
1015 }
1016 }
1017 tty->print(" ;");
1018 }
1019 }
1020
1021 void ClassLoader::print_bootclasspath() {
1022 ClassPathEntry* e;
1023 tty->print("[bootclasspath= ");
1024
1025 // Print --patch-module module/path specifications first
1026 if (_patch_mod_entries != NULL) {
1027 print_module_entry_table(_patch_mod_entries);
1028 }
1029
1030 // [jimage | exploded modules build]
1031 if (has_jrt_entry()) {
1032 // Print the location of the java runtime image
1033 tty->print("%s ;", _jrt_entry->name());
1034 } else {
1035 // Print exploded module build path specifications
1036 if (_exploded_entries != NULL) {
1037 print_module_entry_table(_exploded_entries);
1038 }
1039 }
1040
1041 // appended entries
1042 e = _first_append_entry;
1043 while (e != NULL) {
1044 tty->print("%s ;", e->name());
1045 e = e->next();
1046 }
1047 tty->print_cr("]");
1048 }
1049
1050 void ClassLoader::load_zip_library() {
1051 assert(ZipOpen == NULL, "should not load zip library twice");
1052 // First make sure native library is loaded
1053 os::native_java_library();
1054 // Load zip library
1055 char path[JVM_MAXPATHLEN];
1056 char ebuf[1024];
1057 void* handle = NULL;
1058 if (os::dll_locate_lib(path, sizeof(path), Arguments::get_dll_dir(), "zip")) {
1059 handle = os::dll_load(path, ebuf, sizeof ebuf);
1060 }
1061 if (handle == NULL) {
1062 vm_exit_during_initialization("Unable to load ZIP library", path);
1063 }
1064 // Lookup zip entry points
1065 ZipOpen = CAST_TO_FN_PTR(ZipOpen_t, os::dll_lookup(handle, "ZIP_Open"));
1066 ZipClose = CAST_TO_FN_PTR(ZipClose_t, os::dll_lookup(handle, "ZIP_Close"));
1067 FindEntry = CAST_TO_FN_PTR(FindEntry_t, os::dll_lookup(handle, "ZIP_FindEntry"));
1068 ReadEntry = CAST_TO_FN_PTR(ReadEntry_t, os::dll_lookup(handle, "ZIP_ReadEntry"));
1069 GetNextEntry = CAST_TO_FN_PTR(GetNextEntry_t, os::dll_lookup(handle, "ZIP_GetNextEntry"));
1070 ZipInflateFully = CAST_TO_FN_PTR(ZipInflateFully_t, os::dll_lookup(handle, "ZIP_InflateFully"));
1071 Crc32 = CAST_TO_FN_PTR(Crc32_t, os::dll_lookup(handle, "ZIP_CRC32"));
1072
1073 // ZIP_Close is not exported on Windows in JDK5.0 so don't abort if ZIP_Close is NULL
1074 if (ZipOpen == NULL || FindEntry == NULL || ReadEntry == NULL ||
1075 GetNextEntry == NULL || Crc32 == NULL) {
1076 vm_exit_during_initialization("Corrupted ZIP library", path);
1077 }
1078
1079 if (ZipInflateFully == NULL) {
1080 vm_exit_during_initialization("Corrupted ZIP library ZIP_InflateFully missing", path);
1081 }
1082
1083 // Lookup canonicalize entry in libjava.dll
1084 void *javalib_handle = os::native_java_library();
1085 CanonicalizeEntry = CAST_TO_FN_PTR(canonicalize_fn_t, os::dll_lookup(javalib_handle, "Canonicalize"));
1086 // This lookup only works on 1.3. Do not check for non-null here
1087 }
1088
1089 void ClassLoader::load_jimage_library() {
1090 // First make sure native library is loaded
1091 os::native_java_library();
1092 // Load jimage library
1093 char path[JVM_MAXPATHLEN];
1094 char ebuf[1024];
1095 void* handle = NULL;
1096 if (os::dll_locate_lib(path, sizeof(path), Arguments::get_dll_dir(), "jimage")) {
1097 handle = os::dll_load(path, ebuf, sizeof ebuf);
1098 }
1099 if (handle == NULL) {
1100 vm_exit_during_initialization("Unable to load jimage library", path);
1101 }
1102
1103 // Lookup jimage entry points
1104 JImageOpen = CAST_TO_FN_PTR(JImageOpen_t, os::dll_lookup(handle, "JIMAGE_Open"));
1105 guarantee(JImageOpen != NULL, "function JIMAGE_Open not found");
1106 JImageClose = CAST_TO_FN_PTR(JImageClose_t, os::dll_lookup(handle, "JIMAGE_Close"));
1107 guarantee(JImageClose != NULL, "function JIMAGE_Close not found");
1108 JImagePackageToModule = CAST_TO_FN_PTR(JImagePackageToModule_t, os::dll_lookup(handle, "JIMAGE_PackageToModule"));
1109 guarantee(JImagePackageToModule != NULL, "function JIMAGE_PackageToModule not found");
1110 JImageFindResource = CAST_TO_FN_PTR(JImageFindResource_t, os::dll_lookup(handle, "JIMAGE_FindResource"));
1111 guarantee(JImageFindResource != NULL, "function JIMAGE_FindResource not found");
1112 JImageGetResource = CAST_TO_FN_PTR(JImageGetResource_t, os::dll_lookup(handle, "JIMAGE_GetResource"));
1113 guarantee(JImageGetResource != NULL, "function JIMAGE_GetResource not found");
1114 JImageResourceIterator = CAST_TO_FN_PTR(JImageResourceIterator_t, os::dll_lookup(handle, "JIMAGE_ResourceIterator"));
1115 guarantee(JImageResourceIterator != NULL, "function JIMAGE_ResourceIterator not found");
1116 JImageResourcePath = CAST_TO_FN_PTR(JImage_ResourcePath_t, os::dll_lookup(handle, "JIMAGE_ResourcePath"));
1117 guarantee(JImageResourcePath != NULL, "function JIMAGE_ResourcePath not found");
1118 }
1119
1120 jboolean ClassLoader::decompress(void *in, u8 inSize, void *out, u8 outSize, char **pmsg) {
1121 return (*ZipInflateFully)(in, inSize, out, outSize, pmsg);
1122 }
1123
1124 int ClassLoader::crc32(int crc, const char* buf, int len) {
1125 assert(Crc32 != NULL, "ZIP_CRC32 is not found");
1126 return (*Crc32)(crc, (const jbyte*)buf, len);
1127 }
1128
1129 // Function add_package extracts the package from the fully qualified class name
1130 // and checks if the package is in the boot loader's package entry table. If so,
1131 // then it sets the classpath_index in the package entry record.
1132 //
1133 // The classpath_index field is used to find the entry on the boot loader class
1134 // path for packages with classes loaded by the boot loader from -Xbootclasspath/a
1135 // in an unnamed module. It is also used to indicate (for all packages whose
1136 // classes are loaded by the boot loader) that at least one of the package's
1137 // classes has been loaded.
1138 bool ClassLoader::add_package(const char *fullq_class_name, s2 classpath_index, TRAPS) {
1139 assert(fullq_class_name != NULL, "just checking");
1140
1141 // Get package name from fully qualified class name.
1142 ResourceMark rm;
1143 const char *cp = package_from_name(fullq_class_name);
1144 if (cp != NULL) {
1145 PackageEntryTable* pkg_entry_tbl = ClassLoaderData::the_null_class_loader_data()->packages();
1146 TempNewSymbol pkg_symbol = SymbolTable::new_symbol(cp, CHECK_false);
1147 PackageEntry* pkg_entry = pkg_entry_tbl->lookup_only(pkg_symbol);
1148 if (pkg_entry != NULL) {
1149 assert(classpath_index != -1, "Unexpected classpath_index");
1150 pkg_entry->set_classpath_index(classpath_index);
1151 } else {
1152 return false;
1153 }
1154 }
1155 return true;
1156 }
1157
1158 oop ClassLoader::get_system_package(const char* name, TRAPS) {
1159 // Look up the name in the boot loader's package entry table.
1160 if (name != NULL) {
1161 TempNewSymbol package_sym = SymbolTable::new_symbol(name, (int)strlen(name), CHECK_NULL);
1162 // Look for the package entry in the boot loader's package entry table.
1163 PackageEntry* package =
1164 ClassLoaderData::the_null_class_loader_data()->packages()->lookup_only(package_sym);
1165
1166 // Return NULL if package does not exist or if no classes in that package
1167 // have been loaded.
1168 if (package != NULL && package->has_loaded_class()) {
1169 ModuleEntry* module = package->module();
1170 if (module->location() != NULL) {
1171 ResourceMark rm(THREAD);
1172 Handle ml = java_lang_String::create_from_str(
1173 module->location()->as_C_string(), THREAD);
1174 return ml();
1175 }
1176 // Return entry on boot loader class path.
1177 Handle cph = java_lang_String::create_from_str(
1178 ClassLoader::classpath_entry(package->classpath_index())->name(), THREAD);
1179 return cph();
1180 }
1181 }
1182 return NULL;
1183 }
1184
1185 objArrayOop ClassLoader::get_system_packages(TRAPS) {
1186 ResourceMark rm(THREAD);
1187 // List of pointers to PackageEntrys that have loaded classes.
1188 GrowableArray<PackageEntry*>* loaded_class_pkgs = new GrowableArray<PackageEntry*>(50);
1189 {
1190 MutexLocker ml(Module_lock, THREAD);
1191
1192 PackageEntryTable* pe_table =
1193 ClassLoaderData::the_null_class_loader_data()->packages();
1194
1195 // Collect the packages that have at least one loaded class.
1196 for (int x = 0; x < pe_table->table_size(); x++) {
1197 for (PackageEntry* package_entry = pe_table->bucket(x);
1198 package_entry != NULL;
1199 package_entry = package_entry->next()) {
1200 if (package_entry->has_loaded_class()) {
1201 loaded_class_pkgs->append(package_entry);
1202 }
1203 }
1204 }
1205 }
1206
1207
1208 // Allocate objArray and fill with java.lang.String
1209 objArrayOop r = oopFactory::new_objArray(SystemDictionary::String_klass(),
1210 loaded_class_pkgs->length(), CHECK_NULL);
1211 objArrayHandle result(THREAD, r);
1212 for (int x = 0; x < loaded_class_pkgs->length(); x++) {
1213 PackageEntry* package_entry = loaded_class_pkgs->at(x);
1214 Handle str = java_lang_String::create_from_symbol(package_entry->name(), CHECK_NULL);
1215 result->obj_at_put(x, str());
1216 }
1217 return result();
1218 }
1219
1220 // caller needs ResourceMark
1221 const char* ClassLoader::file_name_for_class_name(const char* class_name,
1222 int class_name_len) {
1223 assert(class_name != NULL, "invariant");
1224 assert((int)strlen(class_name) == class_name_len, "invariant");
1225
1226 static const char class_suffix[] = ".class";
1227
1228 char* const file_name = NEW_RESOURCE_ARRAY(char,
1229 class_name_len +
1230 sizeof(class_suffix)); // includes term NULL
1231
1232 strncpy(file_name, class_name, class_name_len);
1233 strncpy(&file_name[class_name_len], class_suffix, sizeof(class_suffix));
1234
1235 return file_name;
1236 }
1237
1238 ClassPathEntry* find_first_module_cpe(ModuleEntry* mod_entry,
1239 const GrowableArray<ModuleClassPathList*>* const module_list) {
1240 int num_of_entries = module_list->length();
1241 const Symbol* class_module_name = mod_entry->name();
1242
1243 // Loop through all the modules in either the patch-module or exploded entries looking for module
1244 for (int i = 0; i < num_of_entries; i++) {
1245 ModuleClassPathList* module_cpl = module_list->at(i);
1246 Symbol* module_cpl_name = module_cpl->module_name();
1247
1248 if (module_cpl_name->fast_compare(class_module_name) == 0) {
1249 // Class' module has been located.
1250 return module_cpl->module_first_entry();
1251 }
1252 }
1253 return NULL;
1254 }
1255
1256
1257 // Search either the patch-module or exploded build entries for class.
1258 ClassFileStream* ClassLoader::search_module_entries(const GrowableArray<ModuleClassPathList*>* const module_list,
1259 const char* const class_name,
1260 const char* const file_name,
1261 TRAPS) {
1262 ClassFileStream* stream = NULL;
1263
1264 // Find the class' defining module in the boot loader's module entry table
1265 PackageEntry* pkg_entry = get_package_entry(class_name, ClassLoaderData::the_null_class_loader_data(), CHECK_NULL);
1266 ModuleEntry* mod_entry = (pkg_entry != NULL) ? pkg_entry->module() : NULL;
1267
1268 // If the module system has not defined java.base yet, then
1269 // classes loaded are assumed to be defined to java.base.
1270 // When java.base is eventually defined by the module system,
1271 // all packages of classes that have been previously loaded
1272 // are verified in ModuleEntryTable::verify_javabase_packages().
1273 if (!Universe::is_module_initialized() &&
1274 !ModuleEntryTable::javabase_defined() &&
1275 mod_entry == NULL) {
1276 mod_entry = ModuleEntryTable::javabase_moduleEntry();
1277 }
1278
1279 // The module must be a named module
1280 ClassPathEntry* e = NULL;
1281 if (mod_entry != NULL && mod_entry->is_named()) {
1282 if (module_list == _exploded_entries) {
1283 // The exploded build entries can be added to at any time so a lock is
1284 // needed when searching them.
1285 assert(!ClassLoader::has_jrt_entry(), "Must be exploded build");
1286 MutexLocker ml(Module_lock, THREAD);
1287 e = find_first_module_cpe(mod_entry, module_list);
1288 } else {
1289 e = find_first_module_cpe(mod_entry, module_list);
1290 }
1291 }
1292
1293 // Try to load the class from the module's ClassPathEntry list.
1294 while (e != NULL) {
1295 stream = e->open_stream(file_name, CHECK_NULL);
1296 // No context.check is required since CDS is not supported
1297 // for an exploded modules build or if --patch-module is specified.
1298 if (NULL != stream) {
1299 return stream;
1300 }
1301 e = e->next();
1302 }
1303 // If the module was located, break out even if the class was not
1304 // located successfully from that module's ClassPathEntry list.
1305 // There will not be another valid entry for that module.
1306 return NULL;
1307 }
1308
1309 // Called by the boot classloader to load classes
1310 InstanceKlass* ClassLoader::load_class(Symbol* name, bool search_append_only, TRAPS) {
1311 assert(name != NULL, "invariant");
1312 assert(THREAD->is_Java_thread(), "must be a JavaThread");
1313
1314 ResourceMark rm(THREAD);
1315 HandleMark hm(THREAD);
1316
1317 const char* const class_name = name->as_C_string();
1318
1319 EventMark m("loading class %s", class_name);
1320
1321 const char* const file_name = file_name_for_class_name(class_name,
1322 name->utf8_length());
1323 assert(file_name != NULL, "invariant");
1324
1325 // Lookup stream for parsing .class file
1326 ClassFileStream* stream = NULL;
1327 s2 classpath_index = 0;
1328 ClassPathEntry* e = NULL;
1329
1330 // If search_append_only is true, boot loader visibility boundaries are
1331 // set to be _first_append_entry to the end. This includes:
1332 // [-Xbootclasspath/a]; [jvmti appended entries]
1333 //
1334 // If search_append_only is false, boot loader visibility boundaries are
1335 // set to be the --patch-module entries plus the base piece. This includes:
1336 // [--patch-module=<module>=<file>(<pathsep><file>)*]; [jimage | exploded module build]
1337 //
1338
1339 // Load Attempt #1: --patch-module
1340 // Determine the class' defining module. If it appears in the _patch_mod_entries,
1341 // attempt to load the class from those locations specific to the module.
1342 // Specifications to --patch-module can contain a partial number of classes
1343 // that are part of the overall module definition. So if a particular class is not
1344 // found within its module specification, the search should continue to Load Attempt #2.
1345 // Note: The --patch-module entries are never searched if the boot loader's
1346 // visibility boundary is limited to only searching the append entries.
1347 if (_patch_mod_entries != NULL && !search_append_only) {
1348 // At CDS dump time, the --patch-module entries are ignored. That means a
1349 // class is still loaded from the runtime image even if it might
1350 // appear in the _patch_mod_entries. The runtime shared class visibility
1351 // check will determine if a shared class is visible based on the runtime
1352 // environemnt, including the runtime --patch-module setting.
1353 if (!DumpSharedSpaces) {
1354 stream = search_module_entries(_patch_mod_entries, class_name, file_name, CHECK_NULL);
1355 }
1356 }
1357
1358 // Load Attempt #2: [jimage | exploded build]
1359 if (!search_append_only && (NULL == stream)) {
1360 if (has_jrt_entry()) {
1361 e = _jrt_entry;
1362 stream = _jrt_entry->open_stream(file_name, CHECK_NULL);
1363 } else {
1364 // Exploded build - attempt to locate class in its defining module's location.
1365 assert(_exploded_entries != NULL, "No exploded build entries present");
1366 stream = search_module_entries(_exploded_entries, class_name, file_name, CHECK_NULL);
1367 }
1368 }
1369
1370 // Load Attempt #3: [-Xbootclasspath/a]; [jvmti appended entries]
1371 if (search_append_only && (NULL == stream)) {
1372 // For the boot loader append path search, the starting classpath_index
1373 // for the appended piece is always 1 to account for either the
1374 // _jrt_entry or the _exploded_entries.
1375 assert(classpath_index == 0, "The classpath_index has been incremented incorrectly");
1376 classpath_index = 1;
1377
1378 e = _first_append_entry;
1379 while (e != NULL) {
1380 stream = e->open_stream(file_name, CHECK_NULL);
1381 if (NULL != stream) {
1382 break;
1383 }
1384 e = e->next();
1385 ++classpath_index;
1386 }
1387 }
1388
1389 if (NULL == stream) {
1390 return NULL;
1391 }
1392
1393 stream->set_verify(ClassLoaderExt::should_verify(classpath_index));
1394
1395 ClassLoaderData* loader_data = ClassLoaderData::the_null_class_loader_data();
1396 Handle protection_domain;
1397
1398 InstanceKlass* result = KlassFactory::create_from_stream(stream,
1399 name,
1400 loader_data,
1401 protection_domain,
1402 NULL, // unsafe_anonymous_host
1403 NULL, // cp_patches
1404 THREAD);
1405 if (HAS_PENDING_EXCEPTION) {
1406 if (DumpSharedSpaces) {
1407 tty->print_cr("Preload Error: Failed to load %s", class_name);
1408 }
1409 return NULL;
1410 }
1411
1412 if (!add_package(file_name, classpath_index, THREAD)) {
1413 return NULL;
1414 }
1415
1416 return result;
1417 }
1418
1419 #if INCLUDE_CDS
1420 char* ClassLoader::skip_uri_protocol(char* source) {
1421 if (strncmp(source, "file:", 5) == 0) {
1422 // file: protocol path could start with file:/ or file:///
1423 // locate the char after all the forward slashes
1424 int offset = 5;
1425 while (*(source + offset) == '/') {
1426 offset++;
1427 }
1428 source += offset;
1429 // for non-windows platforms, move back one char as the path begins with a '/'
1430 #ifndef _WINDOWS
1431 source -= 1;
1432 #endif
1433 } else if (strncmp(source, "jrt:/", 5) == 0) {
1434 source += 5;
1435 }
1436 return source;
1437 }
1438
1439 // Record the shared classpath index and loader type for classes loaded
1440 // by the builtin loaders at dump time.
1441 void ClassLoader::record_result(InstanceKlass* ik, const ClassFileStream* stream, TRAPS) {
1442 assert(DumpSharedSpaces, "sanity");
1443 assert(stream != NULL, "sanity");
1444
1445 if (ik->is_unsafe_anonymous()) {
1446 // We do not archive unsafe anonymous classes.
1447 return;
1448 }
1449
1450 oop loader = ik->class_loader();
1451 char* src = (char*)stream->source();
1452 if (src == NULL) {
1453 if (loader == NULL) {
1454 // JFR classes
1455 ik->set_shared_classpath_index(0);
1456 ik->set_class_loader_type(ClassLoader::BOOT_LOADER);
1457 }
1458 return;
1459 }
1460
1461 assert(has_jrt_entry(), "CDS dumping does not support exploded JDK build");
1462
1463 ResourceMark rm(THREAD);
1464 int classpath_index = -1;
1465 PackageEntry* pkg_entry = ik->package();
1466
1467 if (FileMapInfo::get_number_of_shared_paths() > 0) {
1468 char* canonical_path_table_entry = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, JVM_MAXPATHLEN);
1469
1470 // save the path from the file: protocol or the module name from the jrt: protocol
1471 // if no protocol prefix is found, path is the same as stream->source()
1472 char* path = skip_uri_protocol(src);
1473 char* canonical_class_src_path = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, JVM_MAXPATHLEN);
1474 if (!get_canonical_path(path, canonical_class_src_path, JVM_MAXPATHLEN)) {
1475 tty->print_cr("Bad pathname %s. CDS dump aborted.", path);
1476 vm_exit(1);
1477 }
1478 for (int i = 0; i < FileMapInfo::get_number_of_shared_paths(); i++) {
1479 SharedClassPathEntry* ent = FileMapInfo::shared_path(i);
1480 if (!get_canonical_path(ent->name(), canonical_path_table_entry, JVM_MAXPATHLEN)) {
1481 tty->print_cr("Bad pathname %s. CDS dump aborted.", ent->name());
1482 vm_exit(1);
1483 }
1484 // If the path (from the class stream source) is the same as the shared
1485 // class or module path, then we have a match.
1486 if (strcmp(canonical_path_table_entry, canonical_class_src_path) == 0) {
1487 // NULL pkg_entry and pkg_entry in an unnamed module implies the class
1488 // is from the -cp or boot loader append path which consists of -Xbootclasspath/a
1489 // and jvmti appended entries.
1490 if ((pkg_entry == NULL) || (pkg_entry->in_unnamed_module())) {
1491 // Ensure the index is within the -cp range before assigning
1492 // to the classpath_index.
1493 if (SystemDictionary::is_system_class_loader(loader) &&
1494 (i >= ClassLoaderExt::app_class_paths_start_index()) &&
1495 (i < ClassLoaderExt::app_module_paths_start_index())) {
1496 classpath_index = i;
1497 break;
1498 } else {
1499 if ((i >= 1) &&
1500 (i < ClassLoaderExt::app_class_paths_start_index())) {
1501 // The class must be from boot loader append path which consists of
1502 // -Xbootclasspath/a and jvmti appended entries.
1503 assert(loader == NULL, "sanity");
1504 classpath_index = i;
1505 break;
1506 }
1507 }
1508 } else {
1509 // A class from a named module from the --module-path. Ensure the index is
1510 // within the --module-path range before assigning to the classpath_index.
1511 if ((pkg_entry != NULL) && !(pkg_entry->in_unnamed_module()) && (i > 0)) {
1512 if (i >= ClassLoaderExt::app_module_paths_start_index() &&
1513 i < FileMapInfo::get_number_of_shared_paths()) {
1514 classpath_index = i;
1515 break;
1516 }
1517 }
1518 }
1519 }
1520 // for index 0 and the stream->source() is the modules image or has the jrt: protocol.
1521 // The class must be from the runtime modules image.
1522 if (i == 0 && (is_modules_image(src) || string_starts_with(src, "jrt:"))) {
1523 classpath_index = i;
1524 break;
1525 }
1526 }
1527
1528 // No path entry found for this class. Must be a shared class loaded by the
1529 // user defined classloader.
1530 if (classpath_index < 0) {
1531 assert(ik->shared_classpath_index() < 0, "Sanity");
1532 return;
1533 }
1534 } else {
1535 // The shared path table is set up after module system initialization.
1536 // The path table contains no entry before that. Any classes loaded prior
1537 // to the setup of the shared path table must be from the modules image.
1538 assert(is_modules_image(src), "stream must be from modules image");
1539 assert(FileMapInfo::get_number_of_shared_paths() == 0, "shared path table must not have been setup");
1540 classpath_index = 0;
1541 }
1542
1543 const char* const class_name = ik->name()->as_C_string();
1544 const char* const file_name = file_name_for_class_name(class_name,
1545 ik->name()->utf8_length());
1546 assert(file_name != NULL, "invariant");
1547
1548 ClassLoaderExt::record_result(classpath_index, ik, THREAD);
1549 }
1550 #endif // INCLUDE_CDS
1551
1552 // Initialize the class loader's access to methods in libzip. Parse and
1553 // process the boot classpath into a list ClassPathEntry objects. Once
1554 // this list has been created, it must not change order (see class PackageInfo)
1555 // it can be appended to and is by jvmti and the kernel vm.
1556
1557 void ClassLoader::initialize() {
1558 EXCEPTION_MARK;
1559
1560 if (UsePerfData) {
1561 // jvmstat performance counters
1562 NEWPERFTICKCOUNTER(_perf_accumulated_time, SUN_CLS, "time");
1563 NEWPERFTICKCOUNTER(_perf_class_init_time, SUN_CLS, "classInitTime");
1564 NEWPERFTICKCOUNTER(_perf_class_init_selftime, SUN_CLS, "classInitTime.self");
1565 NEWPERFTICKCOUNTER(_perf_class_verify_time, SUN_CLS, "classVerifyTime");
1566 NEWPERFTICKCOUNTER(_perf_class_verify_selftime, SUN_CLS, "classVerifyTime.self");
1567 NEWPERFTICKCOUNTER(_perf_class_link_time, SUN_CLS, "classLinkedTime");
1568 NEWPERFTICKCOUNTER(_perf_class_link_selftime, SUN_CLS, "classLinkedTime.self");
1569 NEWPERFEVENTCOUNTER(_perf_classes_inited, SUN_CLS, "initializedClasses");
1570 NEWPERFEVENTCOUNTER(_perf_classes_linked, SUN_CLS, "linkedClasses");
1571 NEWPERFEVENTCOUNTER(_perf_classes_verified, SUN_CLS, "verifiedClasses");
1572
1573 NEWPERFTICKCOUNTER(_perf_class_parse_time, SUN_CLS, "parseClassTime");
1574 NEWPERFTICKCOUNTER(_perf_class_parse_selftime, SUN_CLS, "parseClassTime.self");
1575 NEWPERFTICKCOUNTER(_perf_sys_class_lookup_time, SUN_CLS, "lookupSysClassTime");
1576 NEWPERFTICKCOUNTER(_perf_shared_classload_time, SUN_CLS, "sharedClassLoadTime");
1577 NEWPERFTICKCOUNTER(_perf_sys_classload_time, SUN_CLS, "sysClassLoadTime");
1578 NEWPERFTICKCOUNTER(_perf_app_classload_time, SUN_CLS, "appClassLoadTime");
1579 NEWPERFTICKCOUNTER(_perf_app_classload_selftime, SUN_CLS, "appClassLoadTime.self");
1580 NEWPERFEVENTCOUNTER(_perf_app_classload_count, SUN_CLS, "appClassLoadCount");
1581 NEWPERFTICKCOUNTER(_perf_define_appclasses, SUN_CLS, "defineAppClasses");
1582 NEWPERFTICKCOUNTER(_perf_define_appclass_time, SUN_CLS, "defineAppClassTime");
1583 NEWPERFTICKCOUNTER(_perf_define_appclass_selftime, SUN_CLS, "defineAppClassTime.self");
1584 NEWPERFBYTECOUNTER(_perf_app_classfile_bytes_read, SUN_CLS, "appClassBytes");
1585 NEWPERFBYTECOUNTER(_perf_sys_classfile_bytes_read, SUN_CLS, "sysClassBytes");
1586
1587
1588 // The following performance counters are added for measuring the impact
1589 // of the bug fix of 6365597. They are mainly focused on finding out
1590 // the behavior of system & user-defined classloader lock, whether
1591 // ClassLoader.loadClass/findClass is being called synchronized or not.
1592 NEWPERFEVENTCOUNTER(_sync_systemLoaderLockContentionRate, SUN_CLS,
1593 "systemLoaderLockContentionRate");
1594 NEWPERFEVENTCOUNTER(_sync_nonSystemLoaderLockContentionRate, SUN_CLS,
1595 "nonSystemLoaderLockContentionRate");
1596 NEWPERFEVENTCOUNTER(_sync_JVMFindLoadedClassLockFreeCounter, SUN_CLS,
1597 "jvmFindLoadedClassNoLockCalls");
1598 NEWPERFEVENTCOUNTER(_sync_JVMDefineClassLockFreeCounter, SUN_CLS,
1599 "jvmDefineClassNoLockCalls");
1600
1601 NEWPERFEVENTCOUNTER(_sync_JNIDefineClassLockFreeCounter, SUN_CLS,
1602 "jniDefineClassNoLockCalls");
1603
1604 NEWPERFEVENTCOUNTER(_unsafe_defineClassCallCounter, SUN_CLS,
1605 "unsafeDefineClassCalls");
1606 }
1607
1608 // lookup zip library entry points
1609 load_zip_library();
1610 // lookup jimage library entry points
1611 load_jimage_library();
1612 #if INCLUDE_CDS
1613 // initialize search path
1614 if (DumpSharedSpaces) {
1615 _shared_paths_misc_info = new SharedPathsMiscInfo();
1616 }
1617 #endif
1618 setup_bootstrap_search_path();
1619 }
1620
1621 #if INCLUDE_CDS
1622 void ClassLoader::initialize_shared_path() {
1623 if (DumpSharedSpaces) {
1624 ClassLoaderExt::setup_search_paths();
1625 _shared_paths_misc_info->write_jint(0); // see comments in SharedPathsMiscInfo::check()
1626 }
1627 }
1628
1629 void ClassLoader::initialize_module_path(TRAPS) {
1630 if (DumpSharedSpaces) {
1631 ClassLoaderExt::setup_module_paths(THREAD);
1632 FileMapInfo::allocate_shared_path_table();
1633 }
1634 }
1635 #endif
1636
1637 jlong ClassLoader::classloader_time_ms() {
1638 return UsePerfData ?
1639 Management::ticks_to_ms(_perf_accumulated_time->get_value()) : -1;
1640 }
1641
1642 jlong ClassLoader::class_init_count() {
1643 return UsePerfData ? _perf_classes_inited->get_value() : -1;
1644 }
1645
1646 jlong ClassLoader::class_init_time_ms() {
1647 return UsePerfData ?
1648 Management::ticks_to_ms(_perf_class_init_time->get_value()) : -1;
1649 }
1650
1651 jlong ClassLoader::class_verify_time_ms() {
1652 return UsePerfData ?
1653 Management::ticks_to_ms(_perf_class_verify_time->get_value()) : -1;
1654 }
1655
1656 jlong ClassLoader::class_link_count() {
1657 return UsePerfData ? _perf_classes_linked->get_value() : -1;
1658 }
1659
1660 jlong ClassLoader::class_link_time_ms() {
1661 return UsePerfData ?
1662 Management::ticks_to_ms(_perf_class_link_time->get_value()) : -1;
1663 }
1664
1665 int ClassLoader::compute_Object_vtable() {
1666 // hardwired for JDK1.2 -- would need to duplicate class file parsing
1667 // code to determine actual value from file
1668 // Would be value '11' if finals were in vtable
1669 int JDK_1_2_Object_vtable_size = 5;
1670 return JDK_1_2_Object_vtable_size * vtableEntry::size();
1671 }
1672
1673
1674 void classLoader_init1() {
1675 ClassLoader::initialize();
1676 }
1677
1678 // Complete the ClassPathEntry setup for the boot loader
1679 void ClassLoader::classLoader_init2(TRAPS) {
1680 // Setup the list of module/path pairs for --patch-module processing
1681 // This must be done after the SymbolTable is created in order
1682 // to use fast_compare on module names instead of a string compare.
1683 if (Arguments::get_patch_mod_prefix() != NULL) {
1684 setup_patch_mod_entries();
1685 }
1686
1687 // Create the ModuleEntry for java.base (must occur after setup_patch_mod_entries
1688 // to successfully determine if java.base has been patched)
1689 create_javabase();
1690
1691 // Setup the initial java.base/path pair for the exploded build entries.
1692 // As more modules are defined during module system initialization, more
1693 // entries will be added to the exploded build array.
1694 if (!has_jrt_entry()) {
1695 assert(!DumpSharedSpaces, "DumpSharedSpaces not supported with exploded module builds");
1696 assert(!UseSharedSpaces, "UsedSharedSpaces not supported with exploded module builds");
1697 // Set up the boot loader's _exploded_entries list. Note that this gets
1698 // done before loading any classes, by the same thread that will
1699 // subsequently do the first class load. So, no lock is needed for this.
1700 assert(_exploded_entries == NULL, "Should only get initialized once");
1701 _exploded_entries = new (ResourceObj::C_HEAP, mtModule)
1702 GrowableArray<ModuleClassPathList*>(EXPLODED_ENTRY_SIZE, true);
1703 add_to_exploded_build_list(vmSymbols::java_base(), CHECK);
1704 }
1705 }
1706
1707
1708 bool ClassLoader::get_canonical_path(const char* orig, char* out, int len) {
1709 assert(orig != NULL && out != NULL && len > 0, "bad arguments");
1710 if (CanonicalizeEntry != NULL) {
1711 JavaThread* THREAD = JavaThread::current();
1712 JNIEnv* env = THREAD->jni_environment();
1713 ResourceMark rm(THREAD);
1714
1715 // os::native_path writes into orig_copy
1716 char* orig_copy = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, strlen(orig)+1);
1717 strcpy(orig_copy, orig);
1718 if ((CanonicalizeEntry)(env, os::native_path(orig_copy), out, len) < 0) {
1719 return false;
1720 }
1721 } else {
1722 // On JDK 1.2.2 the Canonicalize does not exist, so just do nothing
1723 strncpy(out, orig, len);
1724 out[len - 1] = '\0';
1725 }
1726 return true;
1727 }
1728
1729 void ClassLoader::create_javabase() {
1730 Thread* THREAD = Thread::current();
1731
1732 // Create java.base's module entry for the boot
1733 // class loader prior to loading j.l.Ojbect.
1734 ClassLoaderData* null_cld = ClassLoaderData::the_null_class_loader_data();
1735
1736 // Get module entry table
1737 ModuleEntryTable* null_cld_modules = null_cld->modules();
1738 if (null_cld_modules == NULL) {
1739 vm_exit_during_initialization("No ModuleEntryTable for the boot class loader");
1740 }
1741
1742 {
1743 MutexLocker ml(Module_lock, THREAD);
1744 ModuleEntry* jb_module = null_cld_modules->locked_create_entry_or_null(Handle(),
1745 false, vmSymbols::java_base(), NULL, NULL, null_cld);
1746 if (jb_module == NULL) {
1747 vm_exit_during_initialization("Unable to create ModuleEntry for " JAVA_BASE_NAME);
1748 }
1749 ModuleEntryTable::set_javabase_moduleEntry(jb_module);
1750 }
1751 }
1752
1753 #ifndef PRODUCT
1754
1755 // CompileTheWorld
1756 //
1757 // Iterates over all class path entries and forces compilation of all methods
1758 // in all classes found. Currently, only zip/jar archives are searched.
1759 //
1760 // The classes are loaded by the Java level bootstrap class loader, and the
1761 // initializer is called. If DelayCompilationDuringStartup is true (default),
1762 // the interpreter will run the initialization code. Note that forcing
1763 // initialization in this way could potentially lead to initialization order
1764 // problems, in which case we could just force the initialization bit to be set.
1765
1766
1767 // We need to iterate over the contents of a zip/jar file, so we replicate the
1768 // jzcell and jzfile definitions from zip_util.h but rename jzfile to real_jzfile,
1769 // since jzfile already has a void* definition.
1770 //
1771 // Note that this is only used in debug mode.
1772 //
1773 // HotSpot integration note:
1774 // Matches zip_util.h 1.14 99/06/01 from jdk1.3 beta H build
1775
1776
1777 // JDK 1.3 version
1778 typedef struct real_jzentry { /* Zip file entry */
1779 char *name; /* entry name */
1780 jint time; /* modification time */
1781 jint size; /* size of uncompressed data */
1782 jint csize; /* size of compressed data (zero if uncompressed) */
1783 jint crc; /* crc of uncompressed data */
1784 char *comment; /* optional zip file comment */
1785 jbyte *extra; /* optional extra data */
1786 jint pos; /* position of LOC header (if negative) or data */
1787 } real_jzentry;
1788
1789 typedef struct real_jzfile { /* Zip file */
1790 char *name; /* zip file name */
1791 jint refs; /* number of active references */
1792 jint fd; /* open file descriptor */
1793 void *lock; /* read lock */
1794 char *comment; /* zip file comment */
1795 char *msg; /* zip error message */
1796 void *entries; /* array of hash cells */
1797 jint total; /* total number of entries */
1798 unsigned short *table; /* Hash chain heads: indexes into entries */
1799 jint tablelen; /* number of hash eads */
1800 real_jzfile *next; /* next zip file in search list */
1801 jzentry *cache; /* we cache the most recently freed jzentry */
1802 /* Information on metadata names in META-INF directory */
1803 char **metanames; /* array of meta names (may have null names) */
1804 jint metacount; /* number of slots in metanames array */
1805 /* If there are any per-entry comments, they are in the comments array */
1806 char **comments;
1807 } real_jzfile;
1808
1809 void ClassPathDirEntry::compile_the_world(Handle loader, TRAPS) {
1810 // For now we only compile all methods in all classes in zip/jar files
1811 tty->print_cr("CompileTheWorld : Skipped classes in %s", _dir);
1812 tty->cr();
1813 }
1814
1815 void ClassPathZipEntry::compile_the_world(Handle loader, TRAPS) {
1816 real_jzfile* zip = (real_jzfile*) _zip;
1817 tty->print_cr("CompileTheWorld : Compiling all classes in %s", zip->name);
1818 tty->cr();
1819 // Iterate over all entries in zip file
1820 for (int n = 0; ; n++) {
1821 real_jzentry * ze = (real_jzentry *)((*GetNextEntry)(_zip, n));
1822 if (ze == NULL) break;
1823 ClassLoader::compile_the_world_in(ze->name, loader, CHECK);
1824 }
1825 if (HAS_PENDING_EXCEPTION) {
1826 if (PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())) {
1827 CLEAR_PENDING_EXCEPTION;
1828 tty->print_cr("\nCompileTheWorld : Ran out of memory\n");
1829 tty->print_cr("Increase class metadata storage if a limit was set");
1830 } else {
1831 tty->print_cr("\nCompileTheWorld : Unexpected exception occurred\n");
1832 }
1833 }
1834 }
1835
1836 void ClassLoader::compile_the_world() {
1837 EXCEPTION_MARK;
1838 HandleMark hm(THREAD);
1839 ResourceMark rm(THREAD);
1840
1841 assert(has_jrt_entry(), "Compile The World not supported with exploded module build");
1842
1843 // Find bootstrap loader
1844 Handle system_class_loader (THREAD, SystemDictionary::java_system_loader());
1845 jlong start = os::javaTimeMillis();
1846
1847 // Compile the world for the modular java runtime image
1848 _jrt_entry->compile_the_world(system_class_loader, CATCH);
1849
1850 // Iterate over all bootstrap class path appended entries
1851 ClassPathEntry* e = _first_append_entry;
1852 while (e != NULL) {
1853 assert(!e->is_modules_image(), "A modular java runtime image is present on the list of appended entries");
1854 e->compile_the_world(system_class_loader, CATCH);
1855 e = e->next();
1856 }
1857 jlong end = os::javaTimeMillis();
1858 tty->print_cr("CompileTheWorld : Done (%d classes, %d methods, " JLONG_FORMAT " ms)",
1859 _compile_the_world_class_counter, _compile_the_world_method_counter, (end - start));
1860 {
1861 // Print statistics as if before normal exit:
1862 extern void print_statistics();
1863 print_statistics();
1864 }
1865 vm_exit(0);
1866 }
1867
1868 int ClassLoader::_compile_the_world_class_counter = 0;
1869 int ClassLoader::_compile_the_world_method_counter = 0;
1870 static int _codecache_sweep_counter = 0;
1871
1872 // Filter out all exceptions except OOMs
1873 static void clear_pending_exception_if_not_oom(TRAPS) {
1874 if (HAS_PENDING_EXCEPTION &&
1875 !PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())) {
1876 CLEAR_PENDING_EXCEPTION;
1877 }
1878 // The CHECK at the caller will propagate the exception out
1879 }
1880
1881 /**
1882 * Returns if the given method should be compiled when doing compile-the-world.
1883 *
1884 * TODO: This should be a private method in a CompileTheWorld class.
1885 */
1886 static bool can_be_compiled(const methodHandle& m, int comp_level) {
1887 assert(CompileTheWorld, "must be");
1888
1889 // It's not valid to compile a native wrapper for MethodHandle methods
1890 // that take a MemberName appendix since the bytecode signature is not
1891 // correct.
1892 vmIntrinsics::ID iid = m->intrinsic_id();
1893 if (MethodHandles::is_signature_polymorphic(iid) && MethodHandles::has_member_arg(iid)) {
1894 return false;
1895 }
1896
1897 return CompilationPolicy::can_be_compiled(m, comp_level);
1898 }
1899
1900 void ClassLoader::compile_the_world_in(char* name, Handle loader, TRAPS) {
1901 if (string_ends_with(name, ".class")) {
1902 // We have a .class file
1903 int len = (int)strlen(name);
1904 char buffer[2048];
1905 strncpy(buffer, name, len - 6);
1906 buffer[len-6] = 0;
1907 // If the file has a period after removing .class, it's not really a
1908 // valid class file. The class loader will check everything else.
1909 if (strchr(buffer, '.') == NULL) {
1910 _compile_the_world_class_counter++;
1911 if (_compile_the_world_class_counter > CompileTheWorldStopAt) return;
1912
1913 // Construct name without extension
1914 TempNewSymbol sym = SymbolTable::new_symbol(buffer, CHECK);
1915 // Use loader to load and initialize class
1916 Klass* k = SystemDictionary::resolve_or_null(sym, loader, Handle(), THREAD);
1917 if (k != NULL && !HAS_PENDING_EXCEPTION) {
1918 k->initialize(THREAD);
1919 }
1920 bool exception_occurred = HAS_PENDING_EXCEPTION;
1921 clear_pending_exception_if_not_oom(CHECK);
1922 if (CompileTheWorldPreloadClasses && k != NULL) {
1923 InstanceKlass* ik = InstanceKlass::cast(k);
1924 ConstantPool::preload_and_initialize_all_classes(ik->constants(), THREAD);
1925 if (HAS_PENDING_EXCEPTION) {
1926 // If something went wrong in preloading we just ignore it
1927 clear_pending_exception_if_not_oom(CHECK);
1928 tty->print_cr("Preloading failed for (%d) %s", _compile_the_world_class_counter, buffer);
1929 }
1930 }
1931
1932 if (_compile_the_world_class_counter >= CompileTheWorldStartAt) {
1933 if (k == NULL || exception_occurred) {
1934 // If something went wrong (e.g. ExceptionInInitializerError) we skip this class
1935 tty->print_cr("CompileTheWorld (%d) : Skipping %s", _compile_the_world_class_counter, buffer);
1936 } else {
1937 tty->print_cr("CompileTheWorld (%d) : %s", _compile_the_world_class_counter, buffer);
1938 // Preload all classes to get around uncommon traps
1939 // Iterate over all methods in class
1940 int comp_level = CompilationPolicy::policy()->initial_compile_level();
1941 InstanceKlass* ik = InstanceKlass::cast(k);
1942 for (int n = 0; n < ik->methods()->length(); n++) {
1943 methodHandle m (THREAD, ik->methods()->at(n));
1944 if (can_be_compiled(m, comp_level)) {
1945 if (++_codecache_sweep_counter == CompileTheWorldSafepointInterval) {
1946 // Give sweeper a chance to keep up with CTW
1947 VM_CTWThreshold op;
1948 VMThread::execute(&op);
1949 _codecache_sweep_counter = 0;
1950 }
1951 // Force compilation
1952 CompileBroker::compile_method(m, InvocationEntryBci, comp_level,
1953 methodHandle(), 0, CompileTask::Reason_CTW, THREAD);
1954 if (HAS_PENDING_EXCEPTION) {
1955 clear_pending_exception_if_not_oom(CHECK);
1956 tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1957 } else {
1958 _compile_the_world_method_counter++;
1959 }
1960 if (TieredCompilation && TieredStopAtLevel >= CompLevel_full_optimization) {
1961 // Clobber the first compile and force second tier compilation
1962 CompiledMethod* nm = m->code();
1963 if (nm != NULL && !m->is_method_handle_intrinsic()) {
1964 // Throw out the code so that the code cache doesn't fill up
1965 nm->make_not_entrant();
1966 }
1967 CompileBroker::compile_method(m, InvocationEntryBci, CompLevel_full_optimization,
1968 methodHandle(), 0, CompileTask::Reason_CTW, THREAD);
1969 if (HAS_PENDING_EXCEPTION) {
1970 clear_pending_exception_if_not_oom(CHECK);
1971 tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1972 } else {
1973 _compile_the_world_method_counter++;
1974 }
1975 }
1976 } else {
1977 tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1978 }
1979
1980 CompiledMethod* nm = m->code();
1981 if (nm != NULL && !m->is_method_handle_intrinsic()) {
1982 // Throw out the code so that the code cache doesn't fill up
1983 nm->make_not_entrant();
1984 }
1985 }
1986 }
1987 }
1988 }
1989 }
1990 }
1991
1992 #endif //PRODUCT
1993
1994 // Please keep following two functions at end of this file. With them placed at top or in middle of the file,
1995 // they could get inlined by agressive compiler, an unknown trick, see bug 6966589.
1996 void PerfClassTraceTime::initialize() {
1997 if (!UsePerfData) return;
1998
1999 if (_eventp != NULL) {
2000 // increment the event counter
2001 _eventp->inc();
2002 }
2003
2004 // stop the current active thread-local timer to measure inclusive time
2005 _prev_active_event = -1;
2006 for (int i=0; i < EVENT_TYPE_COUNT; i++) {
2007 if (_timers[i].is_active()) {
2008 assert(_prev_active_event == -1, "should have only one active timer");
2009 _prev_active_event = i;
2010 _timers[i].stop();
2011 }
2012 }
2013
2014 if (_recursion_counters == NULL || (_recursion_counters[_event_type])++ == 0) {
2015 // start the inclusive timer if not recursively called
2016 _t.start();
2017 }
2018
2019 // start thread-local timer of the given event type
2020 if (!_timers[_event_type].is_active()) {
2021 _timers[_event_type].start();
2022 }
2023 }
2024
2025 PerfClassTraceTime::~PerfClassTraceTime() {
2026 if (!UsePerfData) return;
2027
2028 // stop the thread-local timer as the event completes
2029 // and resume the thread-local timer of the event next on the stack
2030 _timers[_event_type].stop();
2031 jlong selftime = _timers[_event_type].ticks();
2032
2033 if (_prev_active_event >= 0) {
2034 _timers[_prev_active_event].start();
2035 }
2036
2037 if (_recursion_counters != NULL && --(_recursion_counters[_event_type]) > 0) return;
2038
2039 // increment the counters only on the leaf call
2040 _t.stop();
2041 _timep->inc(_t.ticks());
2042 if (_selftimep != NULL) {
2043 _selftimep->inc(selftime);
2044 }
2045 // add all class loading related event selftime to the accumulated time counter
2046 ClassLoader::perf_accumulated_time()->inc(selftime);
2047
2048 // reset the timer
2049 _timers[_event_type].reset();
2050 }