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 "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.hpp"
  34 #include "oops/instanceKlass.hpp"
  35 #include "oops/instanceOop.hpp"
  36 #include "oops/objArrayOop.inline.hpp"
  37 #include "oops/objArrayOop.hpp"
  38 #include "oops/oop.inline.hpp"
  39 #include "oops/typeArrayOop.inline.hpp"
  40 #include "oops/valueKlass.hpp"
  41 #include "oops/valueArrayKlass.hpp"
  42 #include "runtime/handles.inline.hpp"
  43 
  44 
  45 typeArrayOop oopFactory::new_charArray(const char* utf8_str, TRAPS) {
  46   int length = utf8_str == NULL ? 0 : UTF8::unicode_length(utf8_str);
  47   typeArrayOop result = new_charArray(length, CHECK_NULL);
  48   if (length > 0) {
  49     UTF8::convert_to_unicode(utf8_str, result->char_at_addr(0), length);
  50   }
  51   return result;
  52 }
  53 
  54 typeArrayOop oopFactory::new_tenured_charArray(int length, TRAPS) {
  55   return TypeArrayKlass::cast(Universe::charArrayKlassObj())->allocate(length, THREAD);
  56 }
  57 
  58 typeArrayOop oopFactory::new_typeArray(BasicType type, int length, TRAPS) {
  59   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  60   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  61   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
  62   return result;
  63 }
  64 
  65 // Create a Java array that points to Symbol.
  66 // As far as Java code is concerned, a Symbol array is either an array of
  67 // int or long depending on pointer size.  Only stack trace elements in Throwable use
  68 // this.  They cast Symbol* into this type.
  69 typeArrayOop oopFactory::new_symbolArray(int length, TRAPS) {
  70   BasicType type = LP64_ONLY(T_LONG) NOT_LP64(T_INT);
  71   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  72   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  73   typeArrayOop result = type_asArrayKlass->allocate(length, THREAD);
  74   return result;
  75 }
  76 
  77 typeArrayOop oopFactory::new_typeArray_nozero(BasicType type, int length, TRAPS) {
  78   Klass* type_asKlassOop = Universe::typeArrayKlassObj(type);
  79   TypeArrayKlass* type_asArrayKlass = TypeArrayKlass::cast(type_asKlassOop);
  80   typeArrayOop result = type_asArrayKlass->allocate_common(length, false, THREAD);
  81   return result;
  82 }
  83 
  84 
  85 objArrayOop oopFactory::new_objArray(Klass* klass, int length, TRAPS) {
  86   assert(klass->is_klass(), "must be instance class");
  87   assert(!klass->is_value() || (!ValueKlass::cast(klass)->flatten_array()),
  88            "Did not expect flatten array of value klass");
  89   if (klass->is_array_klass()) {
  90     return ArrayKlass::cast(klass)->allocate_arrayArray(1, length, THREAD);
  91   } else {
  92     return InstanceKlass::cast(klass)->allocate_objArray(1, length, THREAD);
  93   }
  94 }
  95 
  96 arrayOop oopFactory::new_valueArray(Klass* klass, int length, TRAPS) {
  97   assert(klass->is_value(), "Klass must be value type");
  98   Klass* array_klass = klass->array_klass(CHECK_NULL); // Flat value array or object array ?
  99   assert(array_klass->is_valueArray_klass() || array_klass->is_objArray_klass(),
 100          "Expect an array class here");
 101 
 102   if (array_klass->is_valueArray_klass()) {
 103     return (arrayOop) ValueArrayKlass::cast(array_klass)->allocate(length, THREAD);
 104   }
 105 
 106   ValueKlass* vklass = ValueKlass::cast(klass);
 107   objArrayOop array = oopFactory::new_objArray(klass, length, CHECK_NULL);
 108   if (length == 0) {
 109     return array;
 110   }
 111 
 112   // Populate default values...
 113   objArrayHandle array_h(THREAD, array);
 114   instanceOop value = (instanceOop)vklass->default_value();
 115   for (int i = 0; i < length; i++) {
 116     array_h->obj_at_put(i, value);
 117   }
 118   return array_h();
 119 }
 120 
 121 arrayOop oopFactory::new_array(Klass* klass, int length, TRAPS) {
 122   return (klass->is_value()) ? new_valueArray(klass, length, THREAD) :
 123       (arrayOop)new_objArray(klass, length, THREAD);
 124 }
 125 
 126 objArrayHandle oopFactory::new_objArray_handle(Klass* klass, int length, TRAPS) {
 127   objArrayOop obj = new_objArray(klass, length, CHECK_(objArrayHandle()));
 128   return objArrayHandle(THREAD, obj);
 129 }
 130 
 131 typeArrayHandle oopFactory::new_byteArray_handle(int length, TRAPS) {
 132   typeArrayOop obj = new_byteArray(length, CHECK_(typeArrayHandle()));
 133   return typeArrayHandle(THREAD, obj);
 134 }