1 /*
2 * Copyright (c) 1997, 2023, 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 "interpreter/bytecodeHistogram.hpp"
27 #include "memory/resourceArea.hpp"
28 #include "runtime/os.hpp"
29 #include "utilities/growableArray.hpp"
30
31 // ------------------------------------------------------------------------------------------------
32 // Non-product code
33 #ifndef PRODUCT
34
35 // Implementation of BytecodeCounter
36
37 int BytecodeCounter::_counter_value = 0;
38 jlong BytecodeCounter::_reset_time = 0;
39
40
41 void BytecodeCounter::reset() {
42 _counter_value = 0;
43 _reset_time = os::elapsed_counter();
44 }
45
46
47 double BytecodeCounter::elapsed_time() {
48 return (double)(os::elapsed_counter() - _reset_time) / (double)os::elapsed_frequency();
49 }
50
51
52 double BytecodeCounter::frequency() {
53 return (double)counter_value() / elapsed_time();
54 }
55
56
57 void BytecodeCounter::print() {
58 tty->print_cr(
59 "%d bytecodes executed in %.1fs (%.3fMHz)",
60 counter_value(),
61 elapsed_time(),
62 frequency() / 1000000.0
63 );
64 }
65
66
67 // Helper class for sorting
68
69 class HistoEntry: public ResourceObj {
70 private:
71 int _index;
72 int _count;
73
74 public:
75 HistoEntry(int index, int count) { _index = index; _count = count; }
76 int index() const { return _index; }
77 int count() const { return _count; }
78
79 static int compare(HistoEntry** x, HistoEntry** y) { return (*x)->count() - (*y)->count(); }
80 };
81
82
83 // Helper functions
84
85 static GrowableArray<HistoEntry*>* sorted_array(int* array, int length) {
86 GrowableArray<HistoEntry*>* a = new GrowableArray<HistoEntry*>(length);
87 int i = length;
88 while (i-- > 0) a->append(new HistoEntry(i, array[i]));
89 a->sort(HistoEntry::compare);
90 return a;
91 }
92
93
94 static int total_count(GrowableArray<HistoEntry*>* profile) {
95 int sum = 0;
96 int i = profile->length();
97 while (i-- > 0) sum += profile->at(i)->count();
98 return sum;
99 }
100
101
102 static const char* name_for(int i) {
103 return Bytecodes::is_defined(i) ? Bytecodes::name(Bytecodes::cast(i)) : "xxxunusedxxx";
104 }
105
106
107 // Implementation of BytecodeHistogram
108
109 int BytecodeHistogram::_counters[Bytecodes::number_of_codes];
110
111
112 void BytecodeHistogram::reset() {
113 int i = Bytecodes::number_of_codes;
114 while (i-- > 0) _counters[i] = 0;
115 }
116
117
118 void BytecodeHistogram::print(float cutoff) {
119 ResourceMark rm;
120 GrowableArray<HistoEntry*>* profile = sorted_array(_counters, Bytecodes::number_of_codes);
121 // print profile
122 int tot = total_count(profile);
123 int abs_sum = 0;
124 tty->cr(); //0123456789012345678901234567890123456789012345678901234567890123456789
125 tty->print_cr("Histogram of %d executed bytecodes:", tot);
126 tty->cr();
127 tty->print_cr(" absolute relative code name");
128 tty->print_cr("----------------------------------------------------------------------");
129 int i = profile->length();
130 while (i-- > 0) {
131 HistoEntry* e = profile->at(i);
132 int abs = e->count();
133 float rel = (float)abs * 100.0F / (float)tot;
134 if (cutoff <= rel) {
135 tty->print_cr("%10d %7.2f%% %02x %s", abs, rel, e->index(), name_for(e->index()));
136 abs_sum += abs;
137 }
138 }
139 tty->print_cr("----------------------------------------------------------------------");
140 float rel_sum = (float)abs_sum * 100.0F / (float)tot;
141 tty->print_cr("%10d %7.2f%% (cutoff = %.2f%%)", abs_sum, rel_sum, cutoff);
142 tty->cr();
143 }
144
145
146 // Implementation of BytecodePairHistogram
147
148 int BytecodePairHistogram::_index;
149 int BytecodePairHistogram::_counters[BytecodePairHistogram::number_of_pairs];
150
151
152 void BytecodePairHistogram::reset() {
153 _index = Bytecodes::_nop << log2_number_of_codes;
154
155 int i = number_of_pairs;
156 while (i-- > 0) _counters[i] = 0;
157 }
158
159
160 void BytecodePairHistogram::print(float cutoff) {
161 ResourceMark rm;
162 GrowableArray<HistoEntry*>* profile = sorted_array(_counters, number_of_pairs);
163 // print profile
164 int tot = total_count(profile);
165 int abs_sum = 0;
166 tty->cr(); //0123456789012345678901234567890123456789012345678901234567890123456789
167 tty->print_cr("Histogram of %d executed bytecode pairs:", tot);
168 tty->cr();
169 tty->print_cr(" absolute relative codes 1st bytecode 2nd bytecode");
170 tty->print_cr("----------------------------------------------------------------------");
171 int i = profile->length();
172 while (i-- > 0) {
173 HistoEntry* e = profile->at(i);
174 int abs = e->count();
175 float rel = (float)abs * 100.0F / (float)tot;
176 if (cutoff <= rel) {
177 int c1 = e->index() % number_of_codes;
178 int c2 = e->index() / number_of_codes;
179 tty->print_cr("%10d %6.3f%% %02x %02x %-19s %s", abs, rel, c1, c2, name_for(c1), name_for(c2));
180 abs_sum += abs;
181 }
182 }
183 tty->print_cr("----------------------------------------------------------------------");
184 float rel_sum = (float)abs_sum * 100.0F / (float)tot;
185 tty->print_cr("%10d %6.3f%% (cutoff = %.3f%%)", abs_sum, rel_sum, cutoff);
186 tty->cr();
187 }
188
189 #endif