1 /* 2 * Copyright (c) 1998, 2024, Oracle and/or its affiliates. All rights reserved. 3 * Copyright (c) 2014, Red Hat Inc. 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 #include "precompiled.hpp" 27 #include "asm/macroAssembler.hpp" 28 #include "code/nmethod.hpp" 29 #include "code/relocInfo.hpp" 30 #include "nativeInst_aarch64.hpp" 31 #include "oops/oop.inline.hpp" 32 #include "runtime/safepoint.hpp" 33 34 35 void Relocation::pd_set_data_value(address x, bool verify_only) { 36 if (verify_only) 37 return; 38 39 int bytes; 40 41 switch(type()) { 42 case relocInfo::oop_type: 43 { 44 oop_Relocation *reloc = (oop_Relocation *)this; 45 if (NativeInstruction::is_ldr_literal_at(addr())) { 46 address constptr = (address)code()->oop_addr_at(reloc->oop_index()); 47 bytes = MacroAssembler::pd_patch_instruction_size(addr(), constptr); 48 assert(*(address*)constptr == x, "error in oop relocation"); 49 } else{ 50 bytes = MacroAssembler::patch_oop(addr(), x); 51 } 52 } 53 break; 54 default: 55 bytes = MacroAssembler::pd_patch_instruction_size(addr(), x); 56 break; 57 } 58 ICache::invalidate_range(addr(), bytes); 59 } 60 61 address Relocation::pd_call_destination(address orig_addr) { 62 assert(is_call(), "should be a call here"); 63 if (NativeCall::is_call_at(addr())) { 64 address trampoline = nativeCall_at(addr())->get_trampoline(); 65 if (trampoline) { 66 return nativeCallTrampolineStub_at(trampoline)->destination(); 67 } 68 } 69 if (orig_addr != nullptr) { 70 address new_addr = MacroAssembler::pd_call_destination(orig_addr); 71 // If call is branch to self, don't try to relocate it, just leave it 72 // as branch to self. This happens during code generation if the code 73 // buffer expands. It will be relocated to the trampoline above once 74 // code generation is complete. 75 new_addr = (new_addr == orig_addr) ? addr() : new_addr; 76 return new_addr; 77 } 78 return MacroAssembler::pd_call_destination(addr()); 79 } 80 81 82 void Relocation::pd_set_call_destination(address x) { 83 assert(is_call(), "should be a call here"); 84 if (NativeCall::is_call_at(addr())) { 85 address trampoline = nativeCall_at(addr())->get_trampoline(); 86 if (trampoline) { 87 nativeCall_at(addr())->set_destination_mt_safe(x, /* assert_lock */false); 88 return; 89 } 90 } 91 MacroAssembler::pd_patch_instruction(addr(), x); 92 assert(pd_call_destination(addr()) == x, "fail in reloc"); 93 } 94 95 address* Relocation::pd_address_in_code() { 96 return (address*)(addr() + 8); 97 } 98 99 100 address Relocation::pd_get_address_from_code() { 101 return MacroAssembler::pd_call_destination(addr()); 102 } 103 104 void poll_Relocation::fix_relocation_after_move(const CodeBuffer* src, CodeBuffer* dest) { 105 if (NativeInstruction::maybe_cpool_ref(addr())) { 106 address old_addr = old_addr_for(addr(), src, dest); 107 MacroAssembler::pd_patch_instruction(addr(), MacroAssembler::target_addr_for_insn(old_addr)); 108 } 109 } 110 111 void metadata_Relocation::pd_fix_value(address x) { 112 }