1 /*
 2  * Copyright (c) 2016, 2025, 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 "asm/macroAssembler.hpp"
26 #include "runtime/interfaceSupport.inline.hpp"
27 #include "runtime/sharedRuntime.hpp"
28 #include "utilities/globalDefinitions.hpp"
29 #include "vmreg_x86.inline.hpp"
30 #ifdef COMPILER1
31 #include "c1/c1_Runtime1.hpp"
32 #endif //COMPILER1
33 
34 #define __ masm->
35 
36 #ifdef COMPILER1
37 // ---------------------------------------------------------------------------
38 // Object.hashCode, System.identityHashCode can pull the hashCode from the
39 // header word instead of doing a full VM transition once it's been computed.
40 // Since hashCode is usually polymorphic at call sites we can't do this
41 // optimization at the call site without a lot of work.
42 void SharedRuntime::inline_check_hashcode_from_object_header(MacroAssembler* masm,
43                                  const methodHandle& method,
44                                  Register obj_reg,
45                                  Register result) {
46   Label slowCase;
47 
48   // Unlike for Object.hashCode, System.identityHashCode is static method and
49   // gets object as argument instead of the receiver.
50   if (method->intrinsic_id() == vmIntrinsics::_identityHashCode) {
51     Label Continue;
52     // return 0 for null reference input
53     __ cmpptr(obj_reg, NULL_WORD);
54     __ jcc(Assembler::notEqual, Continue);
55     __ xorptr(result, result);
56     __ ret(0);
57     __ bind(Continue);
58   }
59 
60   __ movptr(result, Address(obj_reg, oopDesc::mark_offset_in_bytes()));
61 
62   if (!UseObjectMonitorTable) {
63     // check if monitor
64     __ testptr(result, markWord::monitor_value);
65     __ jcc(Assembler::notZero, slowCase);
66   }
67 
68   // get hash
69   // Read the header and build a mask to get its hash field.
70   // Depend on hash_mask being at most 32 bits and avoid the use of hash_mask_in_place
71   // because it could be larger than 32 bits in a 64-bit vm. See markWord.hpp.
72   __ shrptr(result, markWord::hash_shift);
73   __ andptr(result, markWord::hash_mask);
74 
75   // test if hashCode exists
76   __ jccb(Assembler::zero, slowCase);
77   __ ret(0);
78   __ bind(slowCase);
79 }
80 #endif //COMPILER1
81 
82 JRT_LEAF(jfloat, SharedRuntime::frem(jfloat x, jfloat y))
83   assert(StubRoutines::fmod() != nullptr, "");
84   jdouble (*addr)(jdouble, jdouble) = (double (*)(double, double))StubRoutines::fmod();
85   jdouble dx = (jdouble) x;
86   jdouble dy = (jdouble) y;
87 
88   return (jfloat) (*addr)(dx, dy);
89 JRT_END
90 
91 JRT_LEAF(jdouble, SharedRuntime::drem(jdouble x, jdouble y))
92   assert(StubRoutines::fmod() != nullptr, "");
93   jdouble (*addr)(jdouble, jdouble) = (double (*)(double, double))StubRoutines::fmod();
94 
95   return (*addr)(x, y);
96 JRT_END