1 /*
2 * Copyright (c) 1997, 2010, 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 "memory/resourceArea.hpp"
27 #include "runtime/icache.hpp"
28 #include "utilities/align.hpp"
29
30 // The flush stub function address
31 AbstractICache::flush_icache_stub_t AbstractICache::_flush_icache_stub = NULL;
32
initialize()33 void AbstractICache::initialize() {
34 // Making this stub must be FIRST use of assembler
35 ResourceMark rm;
36
37 BufferBlob* b = BufferBlob::create("flush_icache_stub", ICache::stub_size);
38 if (b == NULL) {
39 vm_exit_out_of_memory(ICache::stub_size, OOM_MALLOC_ERROR, "CodeCache: no space for flush_icache_stub");
40 }
41 CodeBuffer c(b);
42
43 ICacheStubGenerator g(&c);
44 g.generate_icache_flush(&_flush_icache_stub);
45
46 // The first use of flush_icache_stub must apply it to itself.
47 // The StubCodeMark destructor in generate_icache_flush will
48 // call Assembler::flush, which in turn will call invalidate_range,
49 // which will in turn call the flush stub. Thus we don't need an
50 // explicit call to invalidate_range here. This assumption is
51 // checked in invalidate_range.
52 }
53
call_flush_stub(address start,int lines)54 void AbstractICache::call_flush_stub(address start, int lines) {
55 // The business with the magic number is just a little security.
56 // We cannot call the flush stub when generating the flush stub
57 // because it isn't there yet. So, the stub also returns its third
58 // parameter. This is a cheap check that the stub was really executed.
59 static int magic = 0xbaadbabe;
60
61 int auto_magic = magic; // Make a local copy to avoid race condition
62 int r = (*_flush_icache_stub)(start, lines, auto_magic);
63 guarantee(r == auto_magic, "flush stub routine did not execute");
64 ++magic;
65 }
66
invalidate_word(address addr)67 void AbstractICache::invalidate_word(address addr) {
68 // Because this is called for instruction patching on the fly, long after
69 // bootstrapping, we execute the stub directly. Account for a 4-byte word
70 // spanning two cache lines by computing a start line address by rounding
71 // addr down to a line_size boundary, and an end line address by adding
72 // the word size - 1 and rounding the result down to a line_size boundary.
73 // If we just added word size, we'd mistakenly flush the next cache line
74 // if the word to be flushed started in the last 4 bytes of the line.
75 // Doing that would segv if the next line weren't mapped.
76
77 const int word_size_in_bytes = 4; // Always, regardless of platform
78
79 intptr_t start_line = ((intptr_t)addr + 0) & ~(ICache::line_size - 1);
80 intptr_t end_line = ((intptr_t)addr + word_size_in_bytes - 1)
81 & ~(ICache::line_size - 1);
82 (*_flush_icache_stub)((address)start_line, start_line == end_line ? 1 : 2, 0);
83 }
84
invalidate_range(address start,int nbytes)85 void AbstractICache::invalidate_range(address start, int nbytes) {
86 static bool firstTime = true;
87 if (firstTime) {
88 guarantee(start == CAST_FROM_FN_PTR(address, _flush_icache_stub),
89 "first flush should be for flush stub");
90 firstTime = false;
91 return;
92 }
93 if (nbytes == 0) {
94 return;
95 }
96 // Align start address to an icache line boundary and transform
97 // nbytes to an icache line count.
98 const uint line_offset = mask_address_bits(start, ICache::line_size-1);
99 if (line_offset != 0) {
100 start -= line_offset;
101 nbytes += line_offset;
102 }
103 call_flush_stub(start, align_up(nbytes, (int)ICache::line_size) >>
104 ICache::log2_line_size);
105 }
106
107 // For init.cpp
icache_init()108 void icache_init() {
109 ICache::initialize();
110 }
111