1 /*
2 * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
3 * Copyright (c) 2016, 2023 SAP SE. All rights reserved.
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
6 * This code is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 only, as
8 * published by the Free Software Foundation.
9 *
10 * This code is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * version 2 for more details (a copy is included in the LICENSE file that
14 * accompanied this code).
15 *
16 * You should have received a copy of the GNU General Public License version
17 * 2 along with this work; if not, write to the Free Software Foundation,
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 *
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 * or visit www.oracle.com if you need additional information or have any
22 * questions.
23 *
24 */
25
26 #ifndef CPU_S390_C1_MACROASSEMBLER_S390_HPP
27 #define CPU_S390_C1_MACROASSEMBLER_S390_HPP
28
29 void pd_init() { /* nothing to do */ }
30
31 public:
32 void try_allocate(
33 Register obj, // result: Pointer to object after successful allocation.
34 Register var_size_in_bytes, // Object size in bytes if unknown at compile time; invalid otherwise.
35 int con_size_in_bytes, // Object size in bytes if known at compile time.
36 Register t1, // temp register
37 Label& slow_case // Continuation point if fast allocation fails.
38 );
39
40 void initialize_header(Register obj, Register klass, Register len, Register Rzero, Register t1);
41 void initialize_body(Register objectFields, Register len_in_bytes, Register Rzero);
42
43 // locking
44 // Rmark : Used to hold locked markWord to be CASed into obj, contents destroyed.
45 // Roop : Must point to the object to lock, contents preserved.
46 // Rbox : Must point to the displaced header location, contents preserved.
47 // Z_R1_scratch : Used as temp and will be killed
48 void lock_object(Register Rmark, Register Roop, Register Rbox, Label& slow_case);
49
50 // unlocking
51 // Rmark : Used to hold original markWord to be CASed back into obj, contents destroyed.
52 // Roop : Must point to the object to lock, contents preserved.
53 // Rbox : Must point to the displaced header location, contents destroyed.
54 // Z_R1_scratch : Used as temp and will be killed
55 void unlock_object(Register Rmark, Register Roop, Register Rbox, Label& slow_case);
56
57 void initialize_object(
58 Register obj, // result: Pointer to object after successful allocation.
59 Register klass, // object klass
60 Register var_size_in_bytes, // Object size in bytes if unknown at compile time; invalid otherwise.
61 int con_size_in_bytes, // Object size in bytes if known at compile time.
62 Register t1, // temp register
63 Register t2 // temp register
64 );
65
66 // Allocation of fixed-size objects.
67 // This can also be used to allocate fixed-size arrays, by setting
68 // hdr_size correctly and storing the array length afterwards.
69 void allocate_object(
70 Register obj, // result: Pointer to object after successful allocation.
71 Register t1, // temp register
72 Register t2, // temp register
73 int hdr_size, // object header size in words
74 int obj_size, // object size in words
75 Register klass, // object klass
76 Label& slow_case // Continuation point if fast allocation fails.
77 );
78
79 enum {
80 max_array_allocation_length = 0x01000000
81 };
82
83 // Allocation of arrays.
84 void allocate_array(
85 Register obj, // result: Pointer to array after successful allocation.
86 Register len, // array length
87 Register t1, // temp register
88 Register t2, // temp register
89 int hdr_size, // object header size in words
90 int elt_size, // element size in bytes
91 Register klass, // object klass
92 Label& slow_case // Continuation point if fast allocation fails.
93 );
94
95 // Invalidates registers in this window.
96 void invalidate_registers(Register preserve1 = noreg, Register preserve2 = noreg,
97 Register preserve3 = noreg) PRODUCT_RETURN;
98
99 // This platform only uses signal-based null checks. The Label is not needed.
100 void null_check(Register r, Label *Lnull = nullptr) { MacroAssembler::null_check(r); }
101
102 #endif // CPU_S390_C1_MACROASSEMBLER_S390_HPP