classLoader.cpp revision 6982:9cfb26e195ac 
1/*
2 * Copyright (c) 1997, 2014, 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 "classfile/classFileParser.hpp"
27#include "classfile/classFileStream.hpp"
28#include "classfile/classLoader.hpp"
29#include "classfile/classLoaderExt.hpp"
30#include "classfile/classLoaderData.inline.hpp"
31#include "classfile/javaClasses.hpp"
32#if INCLUDE_CDS
33#include "classfile/sharedPathsMiscInfo.hpp"
34#include "classfile/sharedClassUtil.hpp"
35#endif
36#include "classfile/systemDictionary.hpp"
37#include "classfile/vmSymbols.hpp"
38#include "compiler/compileBroker.hpp"
39#include "gc_interface/collectedHeap.inline.hpp"
40#include "interpreter/bytecodeStream.hpp"
41#include "interpreter/oopMapCache.hpp"
42#include "memory/allocation.inline.hpp"
43#include "memory/filemap.hpp"
44#include "memory/generation.hpp"
45#include "memory/oopFactory.hpp"
46#include "memory/universe.inline.hpp"
47#include "oops/instanceKlass.hpp"
48#include "oops/instanceRefKlass.hpp"
49#include "oops/oop.inline.hpp"
50#include "oops/symbol.hpp"
51#include "prims/jvm_misc.hpp"
52#include "runtime/arguments.hpp"
53#include "runtime/compilationPolicy.hpp"
54#include "runtime/fprofiler.hpp"
55#include "runtime/handles.hpp"
56#include "runtime/handles.inline.hpp"
57#include "runtime/init.hpp"
58#include "runtime/interfaceSupport.hpp"
59#include "runtime/java.hpp"
60#include "runtime/javaCalls.hpp"
61#include "runtime/os.hpp"
62#include "runtime/threadCritical.hpp"
63#include "runtime/timer.hpp"
64#include "services/management.hpp"
65#include "services/threadService.hpp"
66#include "utilities/events.hpp"
67#include "utilities/hashtable.hpp"
68#include "utilities/hashtable.inline.hpp"
69
70// Entry points in zip.dll for loading zip/jar file entries
71
72typedef void * * (JNICALL *ZipOpen_t)(const char *name, char **pmsg);
73typedef void (JNICALL *ZipClose_t)(jzfile *zip);
74typedef jzentry* (JNICALL *FindEntry_t)(jzfile *zip, const char *name, jint *sizeP, jint *nameLen);
75typedef jboolean (JNICALL *ReadEntry_t)(jzfile *zip, jzentry *entry, unsigned char *buf, char *namebuf);
76typedef jboolean (JNICALL *ReadMappedEntry_t)(jzfile *zip, jzentry *entry, unsigned char **buf, char *namebuf);
77typedef jzentry* (JNICALL *GetNextEntry_t)(jzfile *zip, jint n);
78
79static ZipOpen_t         ZipOpen            = NULL;
80static ZipClose_t        ZipClose           = NULL;
81static FindEntry_t       FindEntry          = NULL;
82static ReadEntry_t       ReadEntry          = NULL;
83static ReadMappedEntry_t ReadMappedEntry    = NULL;
84static GetNextEntry_t    GetNextEntry       = NULL;
85static canonicalize_fn_t CanonicalizeEntry  = NULL;
86
87// Globals
88
89PerfCounter*    ClassLoader::_perf_accumulated_time = NULL;
90PerfCounter*    ClassLoader::_perf_classes_inited = NULL;
91PerfCounter*    ClassLoader::_perf_class_init_time = NULL;
92PerfCounter*    ClassLoader::_perf_class_init_selftime = NULL;
93PerfCounter*    ClassLoader::_perf_classes_verified = NULL;
94PerfCounter*    ClassLoader::_perf_class_verify_time = NULL;
95PerfCounter*    ClassLoader::_perf_class_verify_selftime = NULL;
96PerfCounter*    ClassLoader::_perf_classes_linked = NULL;
97PerfCounter*    ClassLoader::_perf_class_link_time = NULL;
98PerfCounter*    ClassLoader::_perf_class_link_selftime = NULL;
99PerfCounter*    ClassLoader::_perf_class_parse_time = NULL;
100PerfCounter*    ClassLoader::_perf_class_parse_selftime = NULL;
101PerfCounter*    ClassLoader::_perf_sys_class_lookup_time = NULL;
102PerfCounter*    ClassLoader::_perf_shared_classload_time = NULL;
103PerfCounter*    ClassLoader::_perf_sys_classload_time = NULL;
104PerfCounter*    ClassLoader::_perf_app_classload_time = NULL;
105PerfCounter*    ClassLoader::_perf_app_classload_selftime = NULL;
106PerfCounter*    ClassLoader::_perf_app_classload_count = NULL;
107PerfCounter*    ClassLoader::_perf_define_appclasses = NULL;
108PerfCounter*    ClassLoader::_perf_define_appclass_time = NULL;
109PerfCounter*    ClassLoader::_perf_define_appclass_selftime = NULL;
110PerfCounter*    ClassLoader::_perf_app_classfile_bytes_read = NULL;
111PerfCounter*    ClassLoader::_perf_sys_classfile_bytes_read = NULL;
112PerfCounter*    ClassLoader::_sync_systemLoaderLockContentionRate = NULL;
113PerfCounter*    ClassLoader::_sync_nonSystemLoaderLockContentionRate = NULL;
114PerfCounter*    ClassLoader::_sync_JVMFindLoadedClassLockFreeCounter = NULL;
115PerfCounter*    ClassLoader::_sync_JVMDefineClassLockFreeCounter = NULL;
116PerfCounter*    ClassLoader::_sync_JNIDefineClassLockFreeCounter = NULL;
117PerfCounter*    ClassLoader::_unsafe_defineClassCallCounter = NULL;
118PerfCounter*    ClassLoader::_isUnsyncloadClass = NULL;
119PerfCounter*    ClassLoader::_load_instance_class_failCounter = NULL;
120
121ClassPathEntry* ClassLoader::_first_entry         = NULL;
122ClassPathEntry* ClassLoader::_last_entry          = NULL;
123int             ClassLoader::_num_entries         = 0;
124PackageHashtable* ClassLoader::_package_hash_table = NULL;
125
126#if INCLUDE_CDS
127SharedPathsMiscInfo* ClassLoader::_shared_paths_misc_info = NULL;
128#endif
129// helper routines
130bool string_starts_with(const char* str, const char* str_to_find) {
131  size_t str_len = strlen(str);
132  size_t str_to_find_len = strlen(str_to_find);
133  if (str_to_find_len > str_len) {
134    return false;
135  }
136  return (strncmp(str, str_to_find, str_to_find_len) == 0);
137}
138
139bool string_ends_with(const char* str, const char* str_to_find) {
140  size_t str_len = strlen(str);
141  size_t str_to_find_len = strlen(str_to_find);
142  if (str_to_find_len > str_len) {
143    return false;
144  }
145  return (strncmp(str + (str_len - str_to_find_len), str_to_find, str_to_find_len) == 0);
146}
147
148
149MetaIndex::MetaIndex(char** meta_package_names, int num_meta_package_names) {
150  if (num_meta_package_names == 0) {
151    _meta_package_names = NULL;
152    _num_meta_package_names = 0;
153  } else {
154    _meta_package_names = NEW_C_HEAP_ARRAY(char*, num_meta_package_names, mtClass);
155    _num_meta_package_names = num_meta_package_names;
156    memcpy(_meta_package_names, meta_package_names, num_meta_package_names * sizeof(char*));
157  }
158}
159
160
161MetaIndex::~MetaIndex() {
162  FREE_C_HEAP_ARRAY(char*, _meta_package_names, mtClass);
163}
164
165
166bool MetaIndex::may_contain(const char* class_name) {
167  if ( _num_meta_package_names == 0) {
168    return false;
169  }
170  size_t class_name_len = strlen(class_name);
171  for (int i = 0; i < _num_meta_package_names; i++) {
172    char* pkg = _meta_package_names[i];
173    size_t pkg_len = strlen(pkg);
174    size_t min_len = MIN2(class_name_len, pkg_len);
175    if (!strncmp(class_name, pkg, min_len)) {
176      return true;
177    }
178  }
179  return false;
180}
181
182
183ClassPathEntry::ClassPathEntry() {
184  set_next(NULL);
185}
186
187
188bool ClassPathEntry::is_lazy() {
189  return false;
190}
191
192ClassPathDirEntry::ClassPathDirEntry(const char* dir) : ClassPathEntry() {
193  char* copy = NEW_C_HEAP_ARRAY(char, strlen(dir)+1, mtClass);
194  strcpy(copy, dir);
195  _dir = copy;
196}
197
198
199ClassFileStream* ClassPathDirEntry::open_stream(const char* name, TRAPS) {
200  // construct full path name
201  char path[JVM_MAXPATHLEN];
202  if (jio_snprintf(path, sizeof(path), "%s%s%s", _dir, os::file_separator(), name) == -1) {
203    return NULL;
204  }
205  // check if file exists
206  struct stat st;
207  if (os::stat(path, &st) == 0) {
208#if INCLUDE_CDS
209    if (DumpSharedSpaces) {
210      // We have already check in ClassLoader::check_shared_classpath() that the directory is empty, so
211      // we should never find a file underneath it -- unless user has added a new file while we are running
212      // the dump, in which case let's quit!
213      ShouldNotReachHere();
214    }
215#endif
216    // found file, open it
217    int file_handle = os::open(path, 0, 0);
218    if (file_handle != -1) {
219      // read contents into resource array
220      u1* buffer = NEW_RESOURCE_ARRAY(u1, st.st_size);
221      size_t num_read = os::read(file_handle, (char*) buffer, st.st_size);
222      // close file
223      os::close(file_handle);
224      // construct ClassFileStream
225      if (num_read == (size_t)st.st_size) {
226        if (UsePerfData) {
227          ClassLoader::perf_sys_classfile_bytes_read()->inc(num_read);
228        }
229        return new ClassFileStream(buffer, st.st_size, _dir);    // Resource allocated
230      }
231    }
232  }
233  return NULL;
234}
235
236
237ClassPathZipEntry::ClassPathZipEntry(jzfile* zip, const char* zip_name) : ClassPathEntry() {
238  _zip = zip;
239  char *copy = NEW_C_HEAP_ARRAY(char, strlen(zip_name)+1, mtClass);
240  strcpy(copy, zip_name);
241  _zip_name = copy;
242}
243
244ClassPathZipEntry::~ClassPathZipEntry() {
245  if (ZipClose != NULL) {
246    (*ZipClose)(_zip);
247  }
248  FREE_C_HEAP_ARRAY(char, _zip_name, mtClass);
249}
250
251u1* ClassPathZipEntry::open_entry(const char* name, jint* filesize, bool nul_terminate, TRAPS) {
252    // enable call to C land
253  JavaThread* thread = JavaThread::current();
254  ThreadToNativeFromVM ttn(thread);
255  // check whether zip archive contains name
256  jint name_len;
257  jzentry* entry = (*FindEntry)(_zip, name, filesize, &name_len);
258  if (entry == NULL) return NULL;
259  u1* buffer;
260  char name_buf[128];
261  char* filename;
262  if (name_len < 128) {
263    filename = name_buf;
264  } else {
265    filename = NEW_RESOURCE_ARRAY(char, name_len + 1);
266  }
267
268  // file found, get pointer to the entry in mmapped jar file.
269  if (ReadMappedEntry == NULL ||
270      !(*ReadMappedEntry)(_zip, entry, &buffer, filename)) {
271      // mmapped access not available, perhaps due to compression,
272      // read contents into resource array
273      int size = (*filesize) + ((nul_terminate) ? 1 : 0);
274      buffer = NEW_RESOURCE_ARRAY(u1, size);
275      if (!(*ReadEntry)(_zip, entry, buffer, filename)) return NULL;
276  }
277
278  // return result
279  if (nul_terminate) {
280    buffer[*filesize] = 0;
281  }
282  return buffer;
283}
284
285ClassFileStream* ClassPathZipEntry::open_stream(const char* name, TRAPS) {
286  jint filesize;
287  u1* buffer = open_entry(name, &filesize, false, CHECK_NULL);
288  if (buffer == NULL) {
289    return NULL;
290  }
291  if (UsePerfData) {
292    ClassLoader::perf_sys_classfile_bytes_read()->inc(filesize);
293  }
294  return new ClassFileStream(buffer, filesize, _zip_name); // Resource allocated
295}
296
297// invoke function for each entry in the zip file
298void ClassPathZipEntry::contents_do(void f(const char* name, void* context), void* context) {
299  JavaThread* thread = JavaThread::current();
300  HandleMark  handle_mark(thread);
301  ThreadToNativeFromVM ttn(thread);
302  for (int n = 0; ; n++) {
303    jzentry * ze = ((*GetNextEntry)(_zip, n));
304    if (ze == NULL) break;
305    (*f)(ze->name, context);
306  }
307}
308
309LazyClassPathEntry::LazyClassPathEntry(const char* path, const struct stat* st, bool throw_exception) : ClassPathEntry() {
310  _path = os::strdup_check_oom(path);
311  _st = *st;
312  _meta_index = NULL;
313  _resolved_entry = NULL;
314  _has_error = false;
315  _throw_exception = throw_exception;
316}
317
318LazyClassPathEntry::~LazyClassPathEntry() {
319  os::free((void*)_path);
320}
321
322bool LazyClassPathEntry::is_jar_file() {
323  return ((_st.st_mode & S_IFREG) == S_IFREG);
324}
325
326ClassPathEntry* LazyClassPathEntry::resolve_entry(TRAPS) {
327  if (_resolved_entry != NULL) {
328    return (ClassPathEntry*) _resolved_entry;
329  }
330  ClassPathEntry* new_entry = NULL;
331  new_entry = ClassLoader::create_class_path_entry(_path, &_st, false, _throw_exception, CHECK_NULL);
332  if (!_throw_exception && new_entry == NULL) {
333    assert(!HAS_PENDING_EXCEPTION, "must be");
334    return NULL;
335  }
336  {
337    ThreadCritical tc;
338    if (_resolved_entry == NULL) {
339      _resolved_entry = new_entry;
340      return new_entry;
341    }
342  }
343  assert(_resolved_entry != NULL, "bug in MT-safe resolution logic");
344  delete new_entry;
345  return (ClassPathEntry*) _resolved_entry;
346}
347
348ClassFileStream* LazyClassPathEntry::open_stream(const char* name, TRAPS) {
349  if (_meta_index != NULL &&
350      !_meta_index->may_contain(name)) {
351    return NULL;
352  }
353  if (_has_error) {
354    return NULL;
355  }
356  ClassPathEntry* cpe = resolve_entry(THREAD);
357  if (cpe == NULL) {
358    _has_error = true;
359    return NULL;
360  } else {
361    return cpe->open_stream(name, THREAD);
362  }
363}
364
365bool LazyClassPathEntry::is_lazy() {
366  return true;
367}
368
369u1* LazyClassPathEntry::open_entry(const char* name, jint* filesize, bool nul_terminate, TRAPS) {
370  if (_has_error) {
371    return NULL;
372  }
373  ClassPathEntry* cpe = resolve_entry(THREAD);
374  if (cpe == NULL) {
375    _has_error = true;
376    return NULL;
377  } else if (cpe->is_jar_file()) {
378    return ((ClassPathZipEntry*)cpe)->open_entry(name, filesize, nul_terminate,THREAD);
379  } else {
380    ShouldNotReachHere();
381    *filesize = 0;
382    return NULL;
383  }
384}
385
386static void print_meta_index(LazyClassPathEntry* entry,
387                             GrowableArray<char*>& meta_packages) {
388  tty->print("[Meta index for %s=", entry->name());
389  for (int i = 0; i < meta_packages.length(); i++) {
390    if (i > 0) tty->print(" ");
391    tty->print("%s", meta_packages.at(i));
392  }
393  tty->print_cr("]");
394}
395
396#if INCLUDE_CDS
397void ClassLoader::exit_with_path_failure(const char* error, const char* message) {
398  assert(DumpSharedSpaces, "only called at dump time");
399  tty->print_cr("Hint: enable -XX:+TraceClassPaths to diagnose the failure");
400  vm_exit_during_initialization(error, message);
401}
402#endif
403
404void ClassLoader::trace_class_path(const char* msg, const char* name) {
405  if (!TraceClassPaths) {
406    return;
407  }
408
409  if (msg) {
410    tty->print("%s", msg);
411  }
412  if (name) {
413    if (strlen(name) < 256) {
414      tty->print("%s", name);
415    } else {
416      // For very long paths, we need to print each character separately,
417      // as print_cr() has a length limit
418      while (name[0] != '\0') {
419        tty->print("%c", name[0]);
420        name++;
421      }
422    }
423  }
424  if (msg && msg[0] == '[') {
425    tty->print_cr("]");
426  } else {
427    tty->cr();
428  }
429}
430
431void ClassLoader::setup_bootstrap_meta_index() {
432  // Set up meta index which allows us to open boot jars lazily if
433  // class data sharing is enabled
434  const char* meta_index_path = Arguments::get_meta_index_path();
435  const char* meta_index_dir  = Arguments::get_meta_index_dir();
436  setup_meta_index(meta_index_path, meta_index_dir, 0);
437}
438
439void ClassLoader::setup_meta_index(const char* meta_index_path, const char* meta_index_dir, int start_index) {
440  const char* known_version = "% VERSION 2";
441  FILE* file = fopen(meta_index_path, "r");
442  int line_no = 0;
443#if INCLUDE_CDS
444  if (DumpSharedSpaces) {
445    if (file != NULL) {
446      _shared_paths_misc_info->add_required_file(meta_index_path);
447    } else {
448      _shared_paths_misc_info->add_nonexist_path(meta_index_path);
449    }
450  }
451#endif
452  if (file != NULL) {
453    ResourceMark rm;
454    LazyClassPathEntry* cur_entry = NULL;
455    GrowableArray<char*> boot_class_path_packages(10);
456    char package_name[256];
457    bool skipCurrentJar = false;
458    while (fgets(package_name, sizeof(package_name), file) != NULL) {
459      ++line_no;
460      // Remove trailing newline
461      package_name[strlen(package_name) - 1] = '\0';
462      switch(package_name[0]) {
463        case '%':
464        {
465          if ((line_no == 1) && (strcmp(package_name, known_version) != 0)) {
466            if (TraceClassLoading && Verbose) {
467              tty->print("[Unsupported meta index version]");
468            }
469            fclose(file);
470            return;
471          }
472        }
473
474        // These directives indicate jar files which contain only
475        // classes, only non-classfile resources, or a combination of
476        // the two. See src/share/classes/sun/misc/MetaIndex.java and
477        // make/tools/MetaIndex/BuildMetaIndex.java in the J2SE
478        // workspace.
479        case '#':
480        case '!':
481        case '@':
482        {
483          // Hand off current packages to current lazy entry (if any)
484          if ((cur_entry != NULL) &&
485              (boot_class_path_packages.length() > 0)) {
486            if ((TraceClassLoading || TraceClassPaths) && Verbose) {
487              print_meta_index(cur_entry, boot_class_path_packages);
488            }
489            MetaIndex* index = new MetaIndex(boot_class_path_packages.adr_at(0),
490                                             boot_class_path_packages.length());
491            cur_entry->set_meta_index(index);
492          }
493          cur_entry = NULL;
494          boot_class_path_packages.clear();
495
496          // Find lazy entry corresponding to this jar file
497          int count = 0;
498          for (ClassPathEntry* entry = _first_entry; entry != NULL; entry = entry->next(), count++) {
499            if (count >= start_index &&
500                entry->is_lazy() &&
501                string_starts_with(entry->name(), meta_index_dir) &&
502                string_ends_with(entry->name(), &package_name[2])) {
503              cur_entry = (LazyClassPathEntry*) entry;
504              break;
505            }
506          }
507
508          // If the first character is '@', it indicates the following jar
509          // file is a resource only jar file in which case, we should skip
510          // reading the subsequent entries since the resource loading is
511          // totally handled by J2SE side.
512          if (package_name[0] == '@') {
513            if (cur_entry != NULL) {
514              cur_entry->set_meta_index(new MetaIndex(NULL, 0));
515            }
516            cur_entry = NULL;
517            skipCurrentJar = true;
518          } else {
519            skipCurrentJar = false;
520          }
521
522          break;
523        }
524
525        default:
526        {
527          if (!skipCurrentJar && cur_entry != NULL) {
528            char* new_name = os::strdup_check_oom(package_name);
529            boot_class_path_packages.append(new_name);
530          }
531        }
532      }
533    }
534    // Hand off current packages to current lazy entry (if any)
535    if ((cur_entry != NULL) &&
536        (boot_class_path_packages.length() > 0)) {
537      if ((TraceClassLoading || TraceClassPaths) && Verbose) {
538        print_meta_index(cur_entry, boot_class_path_packages);
539      }
540      MetaIndex* index = new MetaIndex(boot_class_path_packages.adr_at(0),
541                                       boot_class_path_packages.length());
542      cur_entry->set_meta_index(index);
543    }
544    fclose(file);
545  }
546}
547
548#if INCLUDE_CDS
549void ClassLoader::check_shared_classpath(const char *path) {
550  if (strcmp(path, "") == 0) {
551    exit_with_path_failure("Cannot have empty path in archived classpaths", NULL);
552  }
553
554  struct stat st;
555  if (os::stat(path, &st) == 0) {
556    if ((st.st_mode & S_IFREG) != S_IFREG) { // is directory
557      if (!os::dir_is_empty(path)) {
558        tty->print_cr("Error: non-empty directory '%s'", path);
559        exit_with_path_failure("CDS allows only empty directories in archived classpaths", NULL);
560      }
561    }
562  }
563}
564#endif
565
566void ClassLoader::setup_bootstrap_search_path() {
567  assert(_first_entry == NULL, "should not setup bootstrap class search path twice");
568  const char* sys_class_path = Arguments::get_sysclasspath();
569  if (PrintSharedArchiveAndExit) {
570    // Don't print sys_class_path - this is the bootcp of this current VM process, not necessarily
571    // the same as the bootcp of the shared archive.
572  } else {
573    trace_class_path("[Bootstrap loader class path=", sys_class_path);
574  }
575#if INCLUDE_CDS
576  if (DumpSharedSpaces) {
577    _shared_paths_misc_info->add_boot_classpath(sys_class_path);
578  }
579#endif
580  setup_search_path(sys_class_path);
581}
582
583#if INCLUDE_CDS
584int ClassLoader::get_shared_paths_misc_info_size() {
585  return _shared_paths_misc_info->get_used_bytes();
586}
587
588void* ClassLoader::get_shared_paths_misc_info() {
589  return _shared_paths_misc_info->buffer();
590}
591
592bool ClassLoader::check_shared_paths_misc_info(void *buf, int size) {
593  SharedPathsMiscInfo* checker = SharedClassUtil::allocate_shared_paths_misc_info((char*)buf, size);
594  bool result = checker->check();
595  delete checker;
596  return result;
597}
598#endif
599
600void ClassLoader::setup_search_path(const char *class_path) {
601  int offset = 0;
602  int len = (int)strlen(class_path);
603  int end = 0;
604
605  // Iterate over class path entries
606  for (int start = 0; start < len; start = end) {
607    while (class_path[end] && class_path[end] != os::path_separator()[0]) {
608      end++;
609    }
610    EXCEPTION_MARK;
611    ResourceMark rm(THREAD);
612    char* path = NEW_RESOURCE_ARRAY(char, end - start + 1);
613    strncpy(path, &class_path[start], end - start);
614    path[end - start] = '\0';
615    update_class_path_entry_list(path, false);
616#if INCLUDE_CDS
617    if (DumpSharedSpaces) {
618      check_shared_classpath(path);
619    }
620#endif
621    while (class_path[end] == os::path_separator()[0]) {
622      end++;
623    }
624  }
625}
626
627ClassPathEntry* ClassLoader::create_class_path_entry(const char *path, const struct stat* st,
628                                                     bool lazy, bool throw_exception, TRAPS) {
629  JavaThread* thread = JavaThread::current();
630  if (lazy) {
631    return new LazyClassPathEntry(path, st, throw_exception);
632  }
633  ClassPathEntry* new_entry = NULL;
634  if ((st->st_mode & S_IFREG) == S_IFREG) {
635    // Regular file, should be a zip file
636    // Canonicalized filename
637    char canonical_path[JVM_MAXPATHLEN];
638    if (!get_canonical_path(path, canonical_path, JVM_MAXPATHLEN)) {
639      // This matches the classic VM
640      if (throw_exception) {
641        THROW_MSG_(vmSymbols::java_io_IOException(), "Bad pathname", NULL);
642      } else {
643        return NULL;
644      }
645    }
646    char* error_msg = NULL;
647    jzfile* zip;
648    {
649      // enable call to C land
650      ThreadToNativeFromVM ttn(thread);
651      HandleMark hm(thread);
652      zip = (*ZipOpen)(canonical_path, &error_msg);
653    }
654    if (zip != NULL && error_msg == NULL) {
655      new_entry = new ClassPathZipEntry(zip, path);
656      if (TraceClassLoading || TraceClassPaths) {
657        tty->print_cr("[Opened %s]", path);
658      }
659    } else {
660      ResourceMark rm(thread);
661      char *msg;
662      if (error_msg == NULL) {
663        msg = NEW_RESOURCE_ARRAY(char, strlen(path) + 128); ;
664        jio_snprintf(msg, strlen(path) + 127, "error in opening JAR file %s", path);
665      } else {
666        int len = (int)(strlen(path) + strlen(error_msg) + 128);
667        msg = NEW_RESOURCE_ARRAY(char, len); ;
668        jio_snprintf(msg, len - 1, "error in opening JAR file <%s> %s", error_msg, path);
669      }
670      if (throw_exception) {
671        THROW_MSG_(vmSymbols::java_lang_ClassNotFoundException(), msg, NULL);
672      } else {
673        return NULL;
674      }
675    }
676  } else {
677    // Directory
678    new_entry = new ClassPathDirEntry(path);
679    if (TraceClassLoading || TraceClassPaths) {
680      tty->print_cr("[Path %s]", path);
681    }
682  }
683  return new_entry;
684}
685
686
687// Create a class path zip entry for a given path (return NULL if not found
688// or zip/JAR file cannot be opened)
689ClassPathZipEntry* ClassLoader::create_class_path_zip_entry(const char *path) {
690  // check for a regular file
691  struct stat st;
692  if (os::stat(path, &st) == 0) {
693    if ((st.st_mode & S_IFREG) == S_IFREG) {
694      char canonical_path[JVM_MAXPATHLEN];
695      if (get_canonical_path(path, canonical_path, JVM_MAXPATHLEN)) {
696        char* error_msg = NULL;
697        jzfile* zip;
698        {
699          // enable call to C land
700          JavaThread* thread = JavaThread::current();
701          ThreadToNativeFromVM ttn(thread);
702          HandleMark hm(thread);
703          zip = (*ZipOpen)(canonical_path, &error_msg);
704        }
705        if (zip != NULL && error_msg == NULL) {
706          // create using canonical path
707          return new ClassPathZipEntry(zip, canonical_path);
708        }
709      }
710    }
711  }
712  return NULL;
713}
714
715// returns true if entry already on class path
716bool ClassLoader::contains_entry(ClassPathEntry *entry) {
717  ClassPathEntry* e = _first_entry;
718  while (e != NULL) {
719    // assume zip entries have been canonicalized
720    if (strcmp(entry->name(), e->name()) == 0) {
721      return true;
722    }
723    e = e->next();
724  }
725  return false;
726}
727
728void ClassLoader::add_to_list(ClassPathEntry *new_entry) {
729  if (new_entry != NULL) {
730    if (_last_entry == NULL) {
731      _first_entry = _last_entry = new_entry;
732    } else {
733      _last_entry->set_next(new_entry);
734      _last_entry = new_entry;
735    }
736  }
737  _num_entries ++;
738}
739
740// Returns true IFF the file/dir exists and the entry was successfully created.
741bool ClassLoader::update_class_path_entry_list(const char *path,
742                                               bool check_for_duplicates,
743                                               bool throw_exception) {
744  struct stat st;
745  if (os::stat(path, &st) == 0) {
746    // File or directory found
747    ClassPathEntry* new_entry = NULL;
748    Thread* THREAD = Thread::current();
749    new_entry = create_class_path_entry(path, &st, LazyBootClassLoader, throw_exception, CHECK_(false));
750    if (new_entry == NULL) {
751      return false;
752    }
753    // The kernel VM adds dynamically to the end of the classloader path and
754    // doesn't reorder the bootclasspath which would break java.lang.Package
755    // (see PackageInfo).
756    // Add new entry to linked list
757    if (!check_for_duplicates || !contains_entry(new_entry)) {
758      ClassLoaderExt::add_class_path_entry(path, check_for_duplicates, new_entry);
759    }
760    return true;
761  } else {
762#if INCLUDE_CDS
763    if (DumpSharedSpaces) {
764      _shared_paths_misc_info->add_nonexist_path(path);
765    }
766#endif
767    return false;
768  }
769}
770
771void ClassLoader::print_bootclasspath() {
772  ClassPathEntry* e = _first_entry;
773  tty->print("[bootclasspath= ");
774  while (e != NULL) {
775    tty->print("%s ;", e->name());
776    e = e->next();
777  }
778  tty->print_cr("]");
779}
780
781void ClassLoader::load_zip_library() {
782  assert(ZipOpen == NULL, "should not load zip library twice");
783  // First make sure native library is loaded
784  os::native_java_library();
785  // Load zip library
786  char path[JVM_MAXPATHLEN];
787  char ebuf[1024];
788  void* handle = NULL;
789  if (os::dll_build_name(path, sizeof(path), Arguments::get_dll_dir(), "zip")) {
790    handle = os::dll_load(path, ebuf, sizeof ebuf);
791  }
792  if (handle == NULL) {
793    vm_exit_during_initialization("Unable to load ZIP library", path);
794  }
795  // Lookup zip entry points
796  ZipOpen      = CAST_TO_FN_PTR(ZipOpen_t, os::dll_lookup(handle, "ZIP_Open"));
797  ZipClose     = CAST_TO_FN_PTR(ZipClose_t, os::dll_lookup(handle, "ZIP_Close"));
798  FindEntry    = CAST_TO_FN_PTR(FindEntry_t, os::dll_lookup(handle, "ZIP_FindEntry"));
799  ReadEntry    = CAST_TO_FN_PTR(ReadEntry_t, os::dll_lookup(handle, "ZIP_ReadEntry"));
800  ReadMappedEntry = CAST_TO_FN_PTR(ReadMappedEntry_t, os::dll_lookup(handle, "ZIP_ReadMappedEntry"));
801  GetNextEntry = CAST_TO_FN_PTR(GetNextEntry_t, os::dll_lookup(handle, "ZIP_GetNextEntry"));
802
803  // ZIP_Close is not exported on Windows in JDK5.0 so don't abort if ZIP_Close is NULL
804  if (ZipOpen == NULL || FindEntry == NULL || ReadEntry == NULL || GetNextEntry == NULL) {
805    vm_exit_during_initialization("Corrupted ZIP library", path);
806  }
807
808  // Lookup canonicalize entry in libjava.dll
809  void *javalib_handle = os::native_java_library();
810  CanonicalizeEntry = CAST_TO_FN_PTR(canonicalize_fn_t, os::dll_lookup(javalib_handle, "Canonicalize"));
811  // This lookup only works on 1.3. Do not check for non-null here
812}
813
814// PackageInfo data exists in order to support the java.lang.Package
815// class.  A Package object provides information about a java package
816// (version, vendor, etc.) which originates in the manifest of the jar
817// file supplying the package.  For application classes, the ClassLoader
818// object takes care of this.
819
820// For system (boot) classes, the Java code in the Package class needs
821// to be able to identify which source jar file contained the boot
822// class, so that it can extract the manifest from it.  This table
823// identifies java packages with jar files in the boot classpath.
824
825// Because the boot classpath cannot change, the classpath index is
826// sufficient to identify the source jar file or directory.  (Since
827// directories have no manifests, the directory name is not required,
828// but is available.)
829
830// When using sharing -- the pathnames of entries in the boot classpath
831// may not be the same at runtime as they were when the archive was
832// created (NFS, Samba, etc.).  The actual files and directories named
833// in the classpath must be the same files, in the same order, even
834// though the exact name is not the same.
835
836class PackageInfo: public BasicHashtableEntry<mtClass> {
837public:
838  const char* _pkgname;       // Package name
839  int _classpath_index;       // Index of directory or JAR file loaded from
840
841  PackageInfo* next() {
842    return (PackageInfo*)BasicHashtableEntry<mtClass>::next();
843  }
844
845  const char* pkgname()           { return _pkgname; }
846  void set_pkgname(char* pkgname) { _pkgname = pkgname; }
847
848  const char* filename() {
849    return ClassLoader::classpath_entry(_classpath_index)->name();
850  }
851
852  void set_index(int index) {
853    _classpath_index = index;
854  }
855};
856
857
858class PackageHashtable : public BasicHashtable<mtClass> {
859private:
860  inline unsigned int compute_hash(const char *s, int n) {
861    unsigned int val = 0;
862    while (--n >= 0) {
863      val = *s++ + 31 * val;
864    }
865    return val;
866  }
867
868  PackageInfo* bucket(int index) {
869    return (PackageInfo*)BasicHashtable<mtClass>::bucket(index);
870  }
871
872  PackageInfo* get_entry(int index, unsigned int hash,
873                         const char* pkgname, size_t n) {
874    for (PackageInfo* pp = bucket(index); pp != NULL; pp = pp->next()) {
875      if (pp->hash() == hash &&
876          strncmp(pkgname, pp->pkgname(), n) == 0 &&
877          pp->pkgname()[n] == '\0') {
878        return pp;
879      }
880    }
881    return NULL;
882  }
883
884public:
885  PackageHashtable(int table_size)
886    : BasicHashtable<mtClass>(table_size, sizeof(PackageInfo)) {}
887
888  PackageHashtable(int table_size, HashtableBucket<mtClass>* t, int number_of_entries)
889    : BasicHashtable<mtClass>(table_size, sizeof(PackageInfo), t, number_of_entries) {}
890
891  PackageInfo* get_entry(const char* pkgname, int n) {
892    unsigned int hash = compute_hash(pkgname, n);
893    return get_entry(hash_to_index(hash), hash, pkgname, n);
894  }
895
896  PackageInfo* new_entry(char* pkgname, int n) {
897    unsigned int hash = compute_hash(pkgname, n);
898    PackageInfo* pp;
899    pp = (PackageInfo*)BasicHashtable<mtClass>::new_entry(hash);
900    pp->set_pkgname(pkgname);
901    return pp;
902  }
903
904  void add_entry(PackageInfo* pp) {
905    int index = hash_to_index(pp->hash());
906    BasicHashtable<mtClass>::add_entry(index, pp);
907  }
908
909  void copy_pkgnames(const char** packages) {
910    int n = 0;
911    for (int i = 0; i < table_size(); ++i) {
912      for (PackageInfo* pp = bucket(i); pp != NULL; pp = pp->next()) {
913        packages[n++] = pp->pkgname();
914      }
915    }
916    assert(n == number_of_entries(), "just checking");
917  }
918
919  CDS_ONLY(void copy_table(char** top, char* end, PackageHashtable* table);)
920};
921
922#if INCLUDE_CDS
923void PackageHashtable::copy_table(char** top, char* end,
924                                  PackageHashtable* table) {
925  // Copy (relocate) the table to the shared space.
926  BasicHashtable<mtClass>::copy_table(top, end);
927
928  // Calculate the space needed for the package name strings.
929  int i;
930  intptr_t* tableSize = (intptr_t*)(*top);
931  *top += sizeof(intptr_t);  // For table size
932  char* tableStart = *top;
933
934  for (i = 0; i < table_size(); ++i) {
935    for (PackageInfo* pp = table->bucket(i);
936                      pp != NULL;
937                      pp = pp->next()) {
938      int n1 = (int)(strlen(pp->pkgname()) + 1);
939      if (*top + n1 >= end) {
940        report_out_of_shared_space(SharedMiscData);
941      }
942      pp->set_pkgname((char*)memcpy(*top, pp->pkgname(), n1));
943      *top += n1;
944    }
945  }
946  *top = (char*)align_size_up((intptr_t)*top, sizeof(HeapWord));
947  if (*top >= end) {
948    report_out_of_shared_space(SharedMiscData);
949  }
950
951  // Write table size
952  intptr_t len = *top - (char*)tableStart;
953  *tableSize = len;
954}
955
956
957void ClassLoader::copy_package_info_buckets(char** top, char* end) {
958  _package_hash_table->copy_buckets(top, end);
959}
960
961void ClassLoader::copy_package_info_table(char** top, char* end) {
962  _package_hash_table->copy_table(top, end, _package_hash_table);
963}
964#endif
965
966PackageInfo* ClassLoader::lookup_package(const char *pkgname) {
967  const char *cp = strrchr(pkgname, '/');
968  if (cp != NULL) {
969    // Package prefix found
970    int n = cp - pkgname + 1;
971    return _package_hash_table->get_entry(pkgname, n);
972  }
973  return NULL;
974}
975
976
977bool ClassLoader::add_package(const char *pkgname, int classpath_index, TRAPS) {
978  assert(pkgname != NULL, "just checking");
979  // Bootstrap loader no longer holds system loader lock obj serializing
980  // load_instance_class and thereby add_package
981  {
982    MutexLocker ml(PackageTable_lock, THREAD);
983    // First check for previously loaded entry
984    PackageInfo* pp = lookup_package(pkgname);
985    if (pp != NULL) {
986      // Existing entry found, check source of package
987      pp->set_index(classpath_index);
988      return true;
989    }
990
991    const char *cp = strrchr(pkgname, '/');
992    if (cp != NULL) {
993      // Package prefix found
994      int n = cp - pkgname + 1;
995
996      char* new_pkgname = NEW_C_HEAP_ARRAY(char, n + 1, mtClass);
997      if (new_pkgname == NULL) {
998        return false;
999      }
1000
1001      memcpy(new_pkgname, pkgname, n);
1002      new_pkgname[n] = '\0';
1003      pp = _package_hash_table->new_entry(new_pkgname, n);
1004      pp->set_index(classpath_index);
1005
1006      // Insert into hash table
1007      _package_hash_table->add_entry(pp);
1008    }
1009    return true;
1010  }
1011}
1012
1013
1014oop ClassLoader::get_system_package(const char* name, TRAPS) {
1015  PackageInfo* pp;
1016  {
1017    MutexLocker ml(PackageTable_lock, THREAD);
1018    pp = lookup_package(name);
1019  }
1020  if (pp == NULL) {
1021    return NULL;
1022  } else {
1023    Handle p = java_lang_String::create_from_str(pp->filename(), THREAD);
1024    return p();
1025  }
1026}
1027
1028
1029objArrayOop ClassLoader::get_system_packages(TRAPS) {
1030  ResourceMark rm(THREAD);
1031  int nof_entries;
1032  const char** packages;
1033  {
1034    MutexLocker ml(PackageTable_lock, THREAD);
1035    // Allocate resource char* array containing package names
1036    nof_entries = _package_hash_table->number_of_entries();
1037    if ((packages = NEW_RESOURCE_ARRAY(const char*, nof_entries)) == NULL) {
1038      return NULL;
1039    }
1040    _package_hash_table->copy_pkgnames(packages);
1041  }
1042  // Allocate objArray and fill with java.lang.String
1043  objArrayOop r = oopFactory::new_objArray(SystemDictionary::String_klass(),
1044                                           nof_entries, CHECK_0);
1045  objArrayHandle result(THREAD, r);
1046  for (int i = 0; i < nof_entries; i++) {
1047    Handle str = java_lang_String::create_from_str(packages[i], CHECK_0);
1048    result->obj_at_put(i, str());
1049  }
1050
1051  return result();
1052}
1053
1054
1055instanceKlassHandle ClassLoader::load_classfile(Symbol* h_name, TRAPS) {
1056  ResourceMark rm(THREAD);
1057  const char* class_name = h_name->as_C_string();
1058  EventMark m("loading class %s", class_name);
1059  ThreadProfilerMark tpm(ThreadProfilerMark::classLoaderRegion);
1060
1061  stringStream st;
1062  // st.print() uses too much stack space while handling a StackOverflowError
1063  // st.print("%s.class", h_name->as_utf8());
1064  st.print_raw(h_name->as_utf8());
1065  st.print_raw(".class");
1066  const char* file_name = st.as_string();
1067  ClassLoaderExt::Context context(class_name, file_name, THREAD);
1068
1069  // Lookup stream for parsing .class file
1070  ClassFileStream* stream = NULL;
1071  int classpath_index = 0;
1072  ClassPathEntry* e = NULL;
1073  instanceKlassHandle h;
1074  {
1075    PerfClassTraceTime vmtimer(perf_sys_class_lookup_time(),
1076                               ((JavaThread*) THREAD)->get_thread_stat()->perf_timers_addr(),
1077                               PerfClassTraceTime::CLASS_LOAD);
1078    e = _first_entry;
1079    while (e != NULL) {
1080      stream = e->open_stream(file_name, CHECK_NULL);
1081      if (!context.check(stream, classpath_index)) {
1082        return h; // NULL
1083      }
1084      if (stream != NULL) {
1085        break;
1086      }
1087      e = e->next();
1088      ++classpath_index;
1089    }
1090  }
1091
1092  if (stream != NULL) {
1093    // class file found, parse it
1094    ClassFileParser parser(stream);
1095    ClassLoaderData* loader_data = ClassLoaderData::the_null_class_loader_data();
1096    Handle protection_domain;
1097    TempNewSymbol parsed_name = NULL;
1098    instanceKlassHandle result = parser.parseClassFile(h_name,
1099                                                       loader_data,
1100                                                       protection_domain,
1101                                                       parsed_name,
1102                                                       context.should_verify(classpath_index),
1103                                                       THREAD);
1104    if (HAS_PENDING_EXCEPTION) {
1105      ResourceMark rm;
1106      if (DumpSharedSpaces) {
1107        tty->print_cr("Preload Error: Failed to load %s", class_name);
1108      }
1109      return h;
1110    }
1111    h = context.record_result(classpath_index, e, result, THREAD);
1112  } else {
1113    if (DumpSharedSpaces) {
1114      tty->print_cr("Preload Error: Cannot find %s", class_name);
1115    }
1116  }
1117
1118  return h;
1119}
1120
1121
1122void ClassLoader::create_package_info_table(HashtableBucket<mtClass> *t, int length,
1123                                            int number_of_entries) {
1124  assert(_package_hash_table == NULL, "One package info table allowed.");
1125  assert(length == package_hash_table_size * sizeof(HashtableBucket<mtClass>),
1126         "bad shared package info size.");
1127  _package_hash_table = new PackageHashtable(package_hash_table_size, t,
1128                                             number_of_entries);
1129}
1130
1131
1132void ClassLoader::create_package_info_table() {
1133    assert(_package_hash_table == NULL, "shouldn't have one yet");
1134    _package_hash_table = new PackageHashtable(package_hash_table_size);
1135}
1136
1137
1138// Initialize the class loader's access to methods in libzip.  Parse and
1139// process the boot classpath into a list ClassPathEntry objects.  Once
1140// this list has been created, it must not change order (see class PackageInfo)
1141// it can be appended to and is by jvmti and the kernel vm.
1142
1143void ClassLoader::initialize() {
1144  assert(_package_hash_table == NULL, "should have been initialized by now.");
1145  EXCEPTION_MARK;
1146
1147  if (UsePerfData) {
1148    // jvmstat performance counters
1149    NEWPERFTICKCOUNTER(_perf_accumulated_time, SUN_CLS, "time");
1150    NEWPERFTICKCOUNTER(_perf_class_init_time, SUN_CLS, "classInitTime");
1151    NEWPERFTICKCOUNTER(_perf_class_init_selftime, SUN_CLS, "classInitTime.self");
1152    NEWPERFTICKCOUNTER(_perf_class_verify_time, SUN_CLS, "classVerifyTime");
1153    NEWPERFTICKCOUNTER(_perf_class_verify_selftime, SUN_CLS, "classVerifyTime.self");
1154    NEWPERFTICKCOUNTER(_perf_class_link_time, SUN_CLS, "classLinkedTime");
1155    NEWPERFTICKCOUNTER(_perf_class_link_selftime, SUN_CLS, "classLinkedTime.self");
1156    NEWPERFEVENTCOUNTER(_perf_classes_inited, SUN_CLS, "initializedClasses");
1157    NEWPERFEVENTCOUNTER(_perf_classes_linked, SUN_CLS, "linkedClasses");
1158    NEWPERFEVENTCOUNTER(_perf_classes_verified, SUN_CLS, "verifiedClasses");
1159
1160    NEWPERFTICKCOUNTER(_perf_class_parse_time, SUN_CLS, "parseClassTime");
1161    NEWPERFTICKCOUNTER(_perf_class_parse_selftime, SUN_CLS, "parseClassTime.self");
1162    NEWPERFTICKCOUNTER(_perf_sys_class_lookup_time, SUN_CLS, "lookupSysClassTime");
1163    NEWPERFTICKCOUNTER(_perf_shared_classload_time, SUN_CLS, "sharedClassLoadTime");
1164    NEWPERFTICKCOUNTER(_perf_sys_classload_time, SUN_CLS, "sysClassLoadTime");
1165    NEWPERFTICKCOUNTER(_perf_app_classload_time, SUN_CLS, "appClassLoadTime");
1166    NEWPERFTICKCOUNTER(_perf_app_classload_selftime, SUN_CLS, "appClassLoadTime.self");
1167    NEWPERFEVENTCOUNTER(_perf_app_classload_count, SUN_CLS, "appClassLoadCount");
1168    NEWPERFTICKCOUNTER(_perf_define_appclasses, SUN_CLS, "defineAppClasses");
1169    NEWPERFTICKCOUNTER(_perf_define_appclass_time, SUN_CLS, "defineAppClassTime");
1170    NEWPERFTICKCOUNTER(_perf_define_appclass_selftime, SUN_CLS, "defineAppClassTime.self");
1171    NEWPERFBYTECOUNTER(_perf_app_classfile_bytes_read, SUN_CLS, "appClassBytes");
1172    NEWPERFBYTECOUNTER(_perf_sys_classfile_bytes_read, SUN_CLS, "sysClassBytes");
1173
1174
1175    // The following performance counters are added for measuring the impact
1176    // of the bug fix of 6365597. They are mainly focused on finding out
1177    // the behavior of system & user-defined classloader lock, whether
1178    // ClassLoader.loadClass/findClass is being called synchronized or not.
1179    // Also two additional counters are created to see whether 'UnsyncloadClass'
1180    // flag is being set or not and how many times load_instance_class call
1181    // fails with linkageError etc.
1182    NEWPERFEVENTCOUNTER(_sync_systemLoaderLockContentionRate, SUN_CLS,
1183                        "systemLoaderLockContentionRate");
1184    NEWPERFEVENTCOUNTER(_sync_nonSystemLoaderLockContentionRate, SUN_CLS,
1185                        "nonSystemLoaderLockContentionRate");
1186    NEWPERFEVENTCOUNTER(_sync_JVMFindLoadedClassLockFreeCounter, SUN_CLS,
1187                        "jvmFindLoadedClassNoLockCalls");
1188    NEWPERFEVENTCOUNTER(_sync_JVMDefineClassLockFreeCounter, SUN_CLS,
1189                        "jvmDefineClassNoLockCalls");
1190
1191    NEWPERFEVENTCOUNTER(_sync_JNIDefineClassLockFreeCounter, SUN_CLS,
1192                        "jniDefineClassNoLockCalls");
1193
1194    NEWPERFEVENTCOUNTER(_unsafe_defineClassCallCounter, SUN_CLS,
1195                        "unsafeDefineClassCalls");
1196
1197    NEWPERFEVENTCOUNTER(_isUnsyncloadClass, SUN_CLS, "isUnsyncloadClassSet");
1198    NEWPERFEVENTCOUNTER(_load_instance_class_failCounter, SUN_CLS,
1199                        "loadInstanceClassFailRate");
1200
1201    // increment the isUnsyncloadClass counter if UnsyncloadClass is set.
1202    if (UnsyncloadClass) {
1203      _isUnsyncloadClass->inc();
1204    }
1205  }
1206
1207  // lookup zip library entry points
1208  load_zip_library();
1209#if INCLUDE_CDS
1210  // initialize search path
1211  if (DumpSharedSpaces) {
1212    _shared_paths_misc_info = SharedClassUtil::allocate_shared_paths_misc_info();
1213  }
1214#endif
1215  setup_bootstrap_search_path();
1216  if (LazyBootClassLoader) {
1217    // set up meta index which makes boot classpath initialization lazier
1218    setup_bootstrap_meta_index();
1219  }
1220}
1221
1222#if INCLUDE_CDS
1223void ClassLoader::initialize_shared_path() {
1224  if (DumpSharedSpaces) {
1225    ClassLoaderExt::setup_search_paths();
1226    _shared_paths_misc_info->write_jint(0); // see comments in SharedPathsMiscInfo::check()
1227  }
1228}
1229#endif
1230
1231jlong ClassLoader::classloader_time_ms() {
1232  return UsePerfData ?
1233    Management::ticks_to_ms(_perf_accumulated_time->get_value()) : -1;
1234}
1235
1236jlong ClassLoader::class_init_count() {
1237  return UsePerfData ? _perf_classes_inited->get_value() : -1;
1238}
1239
1240jlong ClassLoader::class_init_time_ms() {
1241  return UsePerfData ?
1242    Management::ticks_to_ms(_perf_class_init_time->get_value()) : -1;
1243}
1244
1245jlong ClassLoader::class_verify_time_ms() {
1246  return UsePerfData ?
1247    Management::ticks_to_ms(_perf_class_verify_time->get_value()) : -1;
1248}
1249
1250jlong ClassLoader::class_link_count() {
1251  return UsePerfData ? _perf_classes_linked->get_value() : -1;
1252}
1253
1254jlong ClassLoader::class_link_time_ms() {
1255  return UsePerfData ?
1256    Management::ticks_to_ms(_perf_class_link_time->get_value()) : -1;
1257}
1258
1259int ClassLoader::compute_Object_vtable() {
1260  // hardwired for JDK1.2 -- would need to duplicate class file parsing
1261  // code to determine actual value from file
1262  // Would be value '11' if finals were in vtable
1263  int JDK_1_2_Object_vtable_size = 5;
1264  return JDK_1_2_Object_vtable_size * vtableEntry::size();
1265}
1266
1267
1268void classLoader_init() {
1269  ClassLoader::initialize();
1270}
1271
1272
1273bool ClassLoader::get_canonical_path(const char* orig, char* out, int len) {
1274  assert(orig != NULL && out != NULL && len > 0, "bad arguments");
1275  if (CanonicalizeEntry != NULL) {
1276    JavaThread* THREAD = JavaThread::current();
1277    JNIEnv* env = THREAD->jni_environment();
1278    ResourceMark rm(THREAD);
1279
1280    // os::native_path writes into orig_copy
1281    char* orig_copy = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, strlen(orig)+1);
1282    strcpy(orig_copy, orig);
1283    if ((CanonicalizeEntry)(env, os::native_path(orig_copy), out, len) < 0) {
1284      return false;
1285    }
1286  } else {
1287    // On JDK 1.2.2 the Canonicalize does not exist, so just do nothing
1288    strncpy(out, orig, len);
1289    out[len - 1] = '\0';
1290  }
1291  return true;
1292}
1293
1294#ifndef PRODUCT
1295
1296void ClassLoader::verify() {
1297  _package_hash_table->verify();
1298}
1299
1300
1301// CompileTheWorld
1302//
1303// Iterates over all class path entries and forces compilation of all methods
1304// in all classes found. Currently, only zip/jar archives are searched.
1305//
1306// The classes are loaded by the Java level bootstrap class loader, and the
1307// initializer is called. If DelayCompilationDuringStartup is true (default),
1308// the interpreter will run the initialization code. Note that forcing
1309// initialization in this way could potentially lead to initialization order
1310// problems, in which case we could just force the initialization bit to be set.
1311
1312
1313// We need to iterate over the contents of a zip/jar file, so we replicate the
1314// jzcell and jzfile definitions from zip_util.h but rename jzfile to real_jzfile,
1315// since jzfile already has a void* definition.
1316//
1317// Note that this is only used in debug mode.
1318//
1319// HotSpot integration note:
1320// Matches zip_util.h 1.14 99/06/01 from jdk1.3 beta H build
1321
1322
1323// JDK 1.3 version
1324typedef struct real_jzentry {         /* Zip file entry */
1325    char *name;                 /* entry name */
1326    jint time;                  /* modification time */
1327    jint size;                  /* size of uncompressed data */
1328    jint csize;                 /* size of compressed data (zero if uncompressed) */
1329    jint crc;                   /* crc of uncompressed data */
1330    char *comment;              /* optional zip file comment */
1331    jbyte *extra;               /* optional extra data */
1332    jint pos;                   /* position of LOC header (if negative) or data */
1333} real_jzentry;
1334
1335typedef struct real_jzfile {  /* Zip file */
1336    char *name;                 /* zip file name */
1337    jint refs;                  /* number of active references */
1338    jint fd;                    /* open file descriptor */
1339    void *lock;                 /* read lock */
1340    char *comment;              /* zip file comment */
1341    char *msg;                  /* zip error message */
1342    void *entries;              /* array of hash cells */
1343    jint total;                 /* total number of entries */
1344    unsigned short *table;      /* Hash chain heads: indexes into entries */
1345    jint tablelen;              /* number of hash eads */
1346    real_jzfile *next;        /* next zip file in search list */
1347    jzentry *cache;             /* we cache the most recently freed jzentry */
1348    /* Information on metadata names in META-INF directory */
1349    char **metanames;           /* array of meta names (may have null names) */
1350    jint metacount;             /* number of slots in metanames array */
1351    /* If there are any per-entry comments, they are in the comments array */
1352    char **comments;
1353} real_jzfile;
1354
1355void ClassPathDirEntry::compile_the_world(Handle loader, TRAPS) {
1356  // For now we only compile all methods in all classes in zip/jar files
1357  tty->print_cr("CompileTheWorld : Skipped classes in %s", _dir);
1358  tty->cr();
1359}
1360
1361
1362bool ClassPathDirEntry::is_rt_jar() {
1363  return false;
1364}
1365
1366void ClassPathZipEntry::compile_the_world(Handle loader, TRAPS) {
1367  real_jzfile* zip = (real_jzfile*) _zip;
1368  tty->print_cr("CompileTheWorld : Compiling all classes in %s", zip->name);
1369  tty->cr();
1370  // Iterate over all entries in zip file
1371  for (int n = 0; ; n++) {
1372    real_jzentry * ze = (real_jzentry *)((*GetNextEntry)(_zip, n));
1373    if (ze == NULL) break;
1374    ClassLoader::compile_the_world_in(ze->name, loader, CHECK);
1375  }
1376  if (HAS_PENDING_EXCEPTION) {
1377    if (PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())) {
1378      CLEAR_PENDING_EXCEPTION;
1379      tty->print_cr("\nCompileTheWorld : Ran out of memory\n");
1380      tty->print_cr("Increase class metadata storage if a limit was set");
1381    } else {
1382      tty->print_cr("\nCompileTheWorld : Unexpected exception occurred\n");
1383    }
1384  }
1385}
1386
1387bool ClassPathZipEntry::is_rt_jar() {
1388  real_jzfile* zip = (real_jzfile*) _zip;
1389  int len = (int)strlen(zip->name);
1390  // Check whether zip name ends in "rt.jar"
1391  // This will match other archives named rt.jar as well, but this is
1392  // only used for debugging.
1393  return (len >= 6) && (strcasecmp(zip->name + len - 6, "rt.jar") == 0);
1394}
1395
1396void LazyClassPathEntry::compile_the_world(Handle loader, TRAPS) {
1397  ClassPathEntry* cpe = resolve_entry(THREAD);
1398  if (cpe != NULL) {
1399    cpe->compile_the_world(loader, CHECK);
1400  }
1401}
1402
1403bool LazyClassPathEntry::is_rt_jar() {
1404  Thread* THREAD = Thread::current();
1405  ClassPathEntry* cpe = resolve_entry(THREAD);
1406  return (cpe != NULL) ? cpe->is_jar_file() : false;
1407}
1408
1409void ClassLoader::compile_the_world() {
1410  EXCEPTION_MARK;
1411  HandleMark hm(THREAD);
1412  ResourceMark rm(THREAD);
1413  // Make sure we don't run with background compilation
1414  BackgroundCompilation = false;
1415  // Find bootstrap loader
1416  Handle system_class_loader (THREAD, SystemDictionary::java_system_loader());
1417  // Iterate over all bootstrap class path entries
1418  ClassPathEntry* e = _first_entry;
1419  jlong start = os::javaTimeMillis();
1420  while (e != NULL) {
1421    // We stop at rt.jar, unless it is the first bootstrap path entry
1422    if (e->is_rt_jar() && e != _first_entry) break;
1423    e->compile_the_world(system_class_loader, CATCH);
1424    e = e->next();
1425  }
1426  jlong end = os::javaTimeMillis();
1427  tty->print_cr("CompileTheWorld : Done (%d classes, %d methods, " JLONG_FORMAT " ms)",
1428                _compile_the_world_class_counter, _compile_the_world_method_counter, (end - start));
1429  {
1430    // Print statistics as if before normal exit:
1431    extern void print_statistics();
1432    print_statistics();
1433  }
1434  vm_exit(0);
1435}
1436
1437int ClassLoader::_compile_the_world_class_counter = 0;
1438int ClassLoader::_compile_the_world_method_counter = 0;
1439static int _codecache_sweep_counter = 0;
1440
1441// Filter out all exceptions except OOMs
1442static void clear_pending_exception_if_not_oom(TRAPS) {
1443  if (HAS_PENDING_EXCEPTION &&
1444      !PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())) {
1445    CLEAR_PENDING_EXCEPTION;
1446  }
1447  // The CHECK at the caller will propagate the exception out
1448}
1449
1450/**
1451 * Returns if the given method should be compiled when doing compile-the-world.
1452 *
1453 * TODO:  This should be a private method in a CompileTheWorld class.
1454 */
1455static bool can_be_compiled(methodHandle m, int comp_level) {
1456  assert(CompileTheWorld, "must be");
1457
1458  // It's not valid to compile a native wrapper for MethodHandle methods
1459  // that take a MemberName appendix since the bytecode signature is not
1460  // correct.
1461  vmIntrinsics::ID iid = m->intrinsic_id();
1462  if (MethodHandles::is_signature_polymorphic(iid) && MethodHandles::has_member_arg(iid)) {
1463    return false;
1464  }
1465
1466  return CompilationPolicy::can_be_compiled(m, comp_level);
1467}
1468
1469void ClassLoader::compile_the_world_in(char* name, Handle loader, TRAPS) {
1470  int len = (int)strlen(name);
1471  if (len > 6 && strcmp(".class", name + len - 6) == 0) {
1472    // We have a .class file
1473    char buffer[2048];
1474    strncpy(buffer, name, len - 6);
1475    buffer[len-6] = 0;
1476    // If the file has a period after removing .class, it's not really a
1477    // valid class file.  The class loader will check everything else.
1478    if (strchr(buffer, '.') == NULL) {
1479      _compile_the_world_class_counter++;
1480      if (_compile_the_world_class_counter > CompileTheWorldStopAt) return;
1481
1482      // Construct name without extension
1483      TempNewSymbol sym = SymbolTable::new_symbol(buffer, CHECK);
1484      // Use loader to load and initialize class
1485      Klass* ik = SystemDictionary::resolve_or_null(sym, loader, Handle(), THREAD);
1486      instanceKlassHandle k (THREAD, ik);
1487      if (k.not_null() && !HAS_PENDING_EXCEPTION) {
1488        k->initialize(THREAD);
1489      }
1490      bool exception_occurred = HAS_PENDING_EXCEPTION;
1491      clear_pending_exception_if_not_oom(CHECK);
1492      if (CompileTheWorldPreloadClasses && k.not_null()) {
1493        ConstantPool::preload_and_initialize_all_classes(k->constants(), THREAD);
1494        if (HAS_PENDING_EXCEPTION) {
1495          // If something went wrong in preloading we just ignore it
1496          clear_pending_exception_if_not_oom(CHECK);
1497          tty->print_cr("Preloading failed for (%d) %s", _compile_the_world_class_counter, buffer);
1498        }
1499      }
1500
1501      if (_compile_the_world_class_counter >= CompileTheWorldStartAt) {
1502        if (k.is_null() || exception_occurred) {
1503          // If something went wrong (e.g. ExceptionInInitializerError) we skip this class
1504          tty->print_cr("CompileTheWorld (%d) : Skipping %s", _compile_the_world_class_counter, buffer);
1505        } else {
1506          tty->print_cr("CompileTheWorld (%d) : %s", _compile_the_world_class_counter, buffer);
1507          // Preload all classes to get around uncommon traps
1508          // Iterate over all methods in class
1509          int comp_level = CompilationPolicy::policy()->initial_compile_level();
1510          for (int n = 0; n < k->methods()->length(); n++) {
1511            methodHandle m (THREAD, k->methods()->at(n));
1512            if (can_be_compiled(m, comp_level)) {
1513              if (++_codecache_sweep_counter == CompileTheWorldSafepointInterval) {
1514                // Give sweeper a chance to keep up with CTW
1515                VM_ForceSafepoint op;
1516                VMThread::execute(&op);
1517                _codecache_sweep_counter = 0;
1518              }
1519              // Force compilation
1520              CompileBroker::compile_method(m, InvocationEntryBci, comp_level,
1521                                            methodHandle(), 0, "CTW", THREAD);
1522              if (HAS_PENDING_EXCEPTION) {
1523                clear_pending_exception_if_not_oom(CHECK);
1524                tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1525              } else {
1526                _compile_the_world_method_counter++;
1527              }
1528              if (TieredCompilation && TieredStopAtLevel >= CompLevel_full_optimization) {
1529                // Clobber the first compile and force second tier compilation
1530                nmethod* nm = m->code();
1531                if (nm != NULL) {
1532                  // Throw out the code so that the code cache doesn't fill up
1533                  nm->make_not_entrant();
1534                  m->clear_code();
1535                }
1536                CompileBroker::compile_method(m, InvocationEntryBci, CompLevel_full_optimization,
1537                                              methodHandle(), 0, "CTW", THREAD);
1538                if (HAS_PENDING_EXCEPTION) {
1539                  clear_pending_exception_if_not_oom(CHECK);
1540                  tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1541                } else {
1542                  _compile_the_world_method_counter++;
1543                }
1544              }
1545            } else {
1546              tty->print_cr("CompileTheWorld (%d) : Skipping method: %s", _compile_the_world_class_counter, m->name_and_sig_as_C_string());
1547            }
1548
1549            nmethod* nm = m->code();
1550            if (nm != NULL) {
1551              // Throw out the code so that the code cache doesn't fill up
1552              nm->make_not_entrant();
1553              m->clear_code();
1554            }
1555          }
1556        }
1557      }
1558    }
1559  }
1560}
1561
1562#endif //PRODUCT
1563
1564// Please keep following two functions at end of this file. With them placed at top or in middle of the file,
1565// they could get inlined by agressive compiler, an unknown trick, see bug 6966589.
1566void PerfClassTraceTime::initialize() {
1567  if (!UsePerfData) return;
1568
1569  if (_eventp != NULL) {
1570    // increment the event counter
1571    _eventp->inc();
1572  }
1573
1574  // stop the current active thread-local timer to measure inclusive time
1575  _prev_active_event = -1;
1576  for (int i=0; i < EVENT_TYPE_COUNT; i++) {
1577     if (_timers[i].is_active()) {
1578       assert(_prev_active_event == -1, "should have only one active timer");
1579       _prev_active_event = i;
1580       _timers[i].stop();
1581     }
1582  }
1583
1584  if (_recursion_counters == NULL || (_recursion_counters[_event_type])++ == 0) {
1585    // start the inclusive timer if not recursively called
1586    _t.start();
1587  }
1588
1589  // start thread-local timer of the given event type
1590   if (!_timers[_event_type].is_active()) {
1591    _timers[_event_type].start();
1592  }
1593}
1594
1595PerfClassTraceTime::~PerfClassTraceTime() {
1596  if (!UsePerfData) return;
1597
1598  // stop the thread-local timer as the event completes
1599  // and resume the thread-local timer of the event next on the stack
1600  _timers[_event_type].stop();
1601  jlong selftime = _timers[_event_type].ticks();
1602
1603  if (_prev_active_event >= 0) {
1604    _timers[_prev_active_event].start();
1605  }
1606
1607  if (_recursion_counters != NULL && --(_recursion_counters[_event_type]) > 0) return;
1608
1609  // increment the counters only on the leaf call
1610  _t.stop();
1611  _timep->inc(_t.ticks());
1612  if (_selftimep != NULL) {
1613    _selftimep->inc(selftime);
1614  }
1615  // add all class loading related event selftime to the accumulated time counter
1616  ClassLoader::perf_accumulated_time()->inc(selftime);
1617
1618  // reset the timer
1619  _timers[_event_type].reset();
1620}
1621