1 /*
   2  * Copyright (c) 1997, 2009, 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 "incls/_precompiled.incl"
  26 # include "incls/_oopFactory.cpp.incl"
  27 
  28 
  29 typeArrayOop oopFactory::new_charArray(const char* utf8_str, TRAPS) {
  30   int length = utf8_str == NULL ? 0 : UTF8::unicode_length(utf8_str);
  31   typeArrayOop result = new_charArray(length, CHECK_NULL);
  32   if (length > 0) {
  33     UTF8::convert_to_unicode(utf8_str, result->char_at_addr(0), length);
  34   }
  35   return result;
  36 }
  37 
  38 typeArrayOop oopFactory::new_permanent_charArray(int length, TRAPS) {
  39   return typeArrayKlass::cast(Universe::charArrayKlassObj())->allocate_permanent(length, THREAD);
  40 }
  41 
  42 typeArrayOop oopFactory::new_permanent_byteArray(int length, TRAPS) {
  43   return typeArrayKlass::cast(Universe::byteArrayKlassObj())->allocate_permanent(length, THREAD);
  44 }
  45 
  46 
  47 typeArrayOop oopFactory::new_permanent_shortArray(int length, TRAPS) {
  48   return typeArrayKlass::cast(Universe::shortArrayKlassObj())->allocate_permanent(length, THREAD);
  49 }
  50 
  51 
  52 typeArrayOop oopFactory::new_permanent_intArray(int length, TRAPS) {
  53   return typeArrayKlass::cast(Universe::intArrayKlassObj())->allocate_permanent(length, THREAD);
  54 }
  55 
  56 
  57 typeArrayOop oopFactory::new_typeArray(BasicType type, int length, TRAPS) {
  58   klassOop type_asKlassOop = Universe::typeArrayKlassObj(type);
  59   typeArrayKlass* type_asArrayKlass = typeArrayKlass::cast(type_asKlassOop);
  60   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
  61   return result;
  62 }
  63 
  64 
  65 objArrayOop oopFactory::new_objArray(klassOop klass, int length, TRAPS) {
  66   assert(klass->is_klass(), "must be instance class");
  67   if (klass->klass_part()->oop_is_array()) {
  68     return ((arrayKlass*)klass->klass_part())->allocate_arrayArray(1, length, THREAD);
  69   } else {
  70     assert (klass->klass_part()->oop_is_instance(), "new object array with klass not an instanceKlass");
  71     return ((instanceKlass*)klass->klass_part())->allocate_objArray(1, length, THREAD);
  72   }
  73 }
  74 
  75 objArrayOop oopFactory::new_system_objArray(int length, TRAPS) {
  76   int size = objArrayOopDesc::object_size(length);
  77   KlassHandle klass (THREAD, Universe::systemObjArrayKlassObj());
  78   objArrayOop o = (objArrayOop)
  79     Universe::heap()->permanent_array_allocate(klass, size, length, CHECK_NULL);
  80   // initialization not needed, allocated cleared
  81   return o;
  82 }
  83 
  84 
  85 constantPoolOop oopFactory::new_constantPool(int length,
  86                                              bool is_conc_safe,
  87                                              TRAPS) {
  88   constantPoolKlass* ck = constantPoolKlass::cast(Universe::constantPoolKlassObj());
  89   return ck->allocate(length, is_conc_safe, CHECK_NULL);
  90 }
  91 
  92 
  93 constantPoolCacheOop oopFactory::new_constantPoolCache(int length,
  94                                                        bool is_conc_safe,
  95                                                        TRAPS) {
  96   constantPoolCacheKlass* ck = constantPoolCacheKlass::cast(Universe::constantPoolCacheKlassObj());
  97   return ck->allocate(length, is_conc_safe, CHECK_NULL);
  98 }
  99 
 100 
 101 klassOop oopFactory::new_instanceKlass(int vtable_len, int itable_len,
 102                                        int static_field_size,
 103                                        unsigned int nonstatic_oop_map_count,
 104                                        ReferenceType rt, TRAPS) {
 105   instanceKlassKlass* ikk = instanceKlassKlass::cast(Universe::instanceKlassKlassObj());
 106   return ikk->allocate_instance_klass(vtable_len, itable_len, static_field_size, nonstatic_oop_map_count, rt, CHECK_NULL);
 107 }
 108 
 109 
 110 constMethodOop oopFactory::new_constMethod(int byte_code_size,
 111                                            int compressed_line_number_size,
 112                                            int localvariable_table_length,
 113                                            int checked_exceptions_length,
 114                                            bool is_conc_safe,
 115                                            TRAPS) {
 116   klassOop cmkObj = Universe::constMethodKlassObj();
 117   constMethodKlass* cmk = constMethodKlass::cast(cmkObj);
 118   return cmk->allocate(byte_code_size, compressed_line_number_size,
 119                        localvariable_table_length, checked_exceptions_length,
 120                        is_conc_safe,
 121                        CHECK_NULL);
 122 }
 123 
 124 
 125 methodOop oopFactory::new_method(int byte_code_size, AccessFlags access_flags,
 126                                  int compressed_line_number_size,
 127                                  int localvariable_table_length,
 128                                  int checked_exceptions_length,
 129                                  bool is_conc_safe,
 130                                  TRAPS) {
 131   methodKlass* mk = methodKlass::cast(Universe::methodKlassObj());
 132   assert(!access_flags.is_native() || byte_code_size == 0,
 133          "native methods should not contain byte codes");
 134   constMethodOop cm = new_constMethod(byte_code_size,
 135                                       compressed_line_number_size,
 136                                       localvariable_table_length,
 137                                       checked_exceptions_length,
 138                                       is_conc_safe, CHECK_NULL);
 139   constMethodHandle rw(THREAD, cm);
 140   return mk->allocate(rw, access_flags, CHECK_NULL);
 141 }
 142 
 143 
 144 methodDataOop oopFactory::new_methodData(methodHandle method, TRAPS) {
 145   methodDataKlass* mdk = methodDataKlass::cast(Universe::methodDataKlassObj());
 146   return mdk->allocate(method, CHECK_NULL);
 147 }
 148 
 149 
 150 compiledICHolderOop oopFactory::new_compiledICHolder(methodHandle method, KlassHandle klass, TRAPS) {
 151   compiledICHolderKlass* ck = (compiledICHolderKlass*) Universe::compiledICHolderKlassObj()->klass_part();
 152   compiledICHolderOop c = ck->allocate(CHECK_NULL);
 153   c->set_holder_method(method());
 154   c->set_holder_klass(klass());
 155   return c;
 156 }