1 /*
   2  * Copyright (c) 1997, 2015, 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/javaClasses.hpp"
  27 #include "classfile/symbolTable.hpp"
  28 #include "classfile/systemDictionary.hpp"
  29 #include "classfile/vmSymbols.hpp"
  30 #include "gc/shared/collectedHeap.inline.hpp"
  31 #include "memory/oopFactory.hpp"
  32 #include "memory/resourceArea.hpp"
  33 #include "memory/universe.inline.hpp"
  34 #include "oops/instanceKlass.hpp"
  35 #include "oops/instanceOop.hpp"
  36 #include "oops/objArrayOop.hpp"
  37 #include "oops/oop.inline.hpp"
  38 
  39 
  40 typeArrayOop oopFactory::new_charArray(const char* utf8_str, TRAPS) {
  41   int length = utf8_str == NULL ? 0 : UTF8::unicode_length(utf8_str);
  42   typeArrayOop result = new_charArray(length, CHECK_NULL);
  43   if (length > 0) {
  44     result = typeArrayOop(oopDesc::bs()->write_barrier(result));
  45     UTF8::convert_to_unicode(utf8_str, result->char_at_addr(0), length);
  46   }
  47   return result;
  48 }
  49 
  50 typeArrayOop oopFactory::new_tenured_charArray(int length, TRAPS) {
  51   return TypeArrayKlass::cast(Universe::charArrayKlassObj())->allocate(length, THREAD);
  52 }
  53 
  54 typeArrayOop oopFactory::new_typeArray(BasicType type, int length, TRAPS) {
  55   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  56   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  57   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
  58   return result;
  59 }
  60 
  61 // Create a Java array that points to metadata.
  62 // As far as Java code is concerned, a metaData array is either an array of
  63 // int or long depending on pointer size.  Only a few things use this, like
  64 // stack trace elements in Throwable.  They cast Method* into this type.
  65 // Note:can't point to symbols because there's no way to unreference count
  66 // them when this object goes away.
  67 typeArrayOop oopFactory::new_metaDataArray(int length, TRAPS) {
  68   BasicType type = LP64_ONLY(T_LONG) NOT_LP64(T_INT);
  69   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  70   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  71   typeArrayOop result = type_asArrayKlass->allocate_common(length, true, THREAD);
  72   return result;
  73 }
  74 
  75 typeArrayOop oopFactory::new_typeArray_nozero(BasicType type, int length, TRAPS) {
  76   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  77   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  78   typeArrayOop result = type_asArrayKlass->allocate_common(length, false, THREAD);
  79   return result;
  80 }
  81 
  82 
  83 objArrayOop oopFactory::new_objArray(Klass* klass, int length, TRAPS) {
  84   assert(klass->is_klass(), "must be instance class");
  85   if (klass->oop_is_array()) {
  86     return ((ArrayKlass*)klass)->allocate_arrayArray(1, length, THREAD);
  87   } else {
  88     assert (klass->oop_is_instance(), "new object array with klass not an InstanceKlass");
  89     return ((InstanceKlass*)klass)->allocate_objArray(1, length, THREAD);
  90   }
  91 }