Mon, 12 Aug 2019 18:30:40 +0300
8223147: JFR Backport
8199712: Flight Recorder
8203346: JFR: Inconsistent signature of jfr_add_string_constant
8195817: JFR.stop should require name of recording
8195818: JFR.start should increase autogenerated name by one
8195819: Remove recording=x from jcmd JFR.check output
8203921: JFR thread sampling is missing fixes from JDK-8194552
8203929: Limit amount of data for JFR.dump
8203664: JFR start failure after AppCDS archive created with JFR StartFlightRecording
8003209: JFR events for network utilization
8207392: [PPC64] Implement JFR profiling
8202835: jfr/event/os/TestSystemProcess.java fails on missing events
Summary: Backport JFR from JDK11. Initial integration
Reviewed-by: neugens
2 /*
3 * Copyright (c) 2002, 2014, Oracle and/or its affiliates. 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 */
26 #include "precompiled.hpp"
27 #include "gc_implementation/parallelScavenge/gcTaskManager.hpp"
28 #include "gc_implementation/parallelScavenge/gcTaskThread.hpp"
29 #include "memory/allocation.hpp"
30 #include "memory/allocation.inline.hpp"
31 #include "memory/resourceArea.hpp"
32 #include "runtime/handles.hpp"
33 #include "runtime/handles.inline.hpp"
34 #include "runtime/os.hpp"
35 #include "runtime/thread.hpp"
37 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC
39 GCTaskThread::GCTaskThread(GCTaskManager* manager,
40 uint which,
41 uint processor_id) :
42 _manager(manager),
43 _processor_id(processor_id),
44 _time_stamps(NULL),
45 _time_stamp_index(0)
46 {
47 if (!os::create_thread(this, os::pgc_thread))
48 vm_exit_out_of_memory(0, OOM_MALLOC_ERROR, "Cannot create GC thread. Out of system resources.");
50 if (PrintGCTaskTimeStamps) {
51 _time_stamps = NEW_C_HEAP_ARRAY(GCTaskTimeStamp, GCTaskTimeStampEntries, mtGC);
53 guarantee(_time_stamps != NULL, "Sanity");
54 }
55 set_id(which);
56 set_name("GC task thread#%d (ParallelGC)", which);
57 }
59 GCTaskThread::~GCTaskThread() {
60 if (_time_stamps != NULL) {
61 FREE_C_HEAP_ARRAY(GCTaskTimeStamp, _time_stamps, mtGC);
62 }
63 }
65 void GCTaskThread::start() {
66 os::start_thread(this);
67 }
69 GCTaskTimeStamp* GCTaskThread::time_stamp_at(uint index) {
70 guarantee(index < GCTaskTimeStampEntries, "increase GCTaskTimeStampEntries");
72 return &(_time_stamps[index]);
73 }
75 void GCTaskThread::print_task_time_stamps() {
76 assert(PrintGCTaskTimeStamps, "Sanity");
77 assert(_time_stamps != NULL, "Sanity (Probably set PrintGCTaskTimeStamps late)");
79 tty->print_cr("GC-Thread %u entries: %d", id(), _time_stamp_index);
80 for(uint i=0; i<_time_stamp_index; i++) {
81 GCTaskTimeStamp* time_stamp = time_stamp_at(i);
82 tty->print_cr("\t[ %s " INT64_FORMAT " " INT64_FORMAT " ]",
83 time_stamp->name(),
84 time_stamp->entry_time(),
85 time_stamp->exit_time());
86 }
88 // Reset after dumping the data
89 _time_stamp_index = 0;
90 }
92 void GCTaskThread::print_on(outputStream* st) const {
93 st->print("\"%s\" ", name());
94 Thread::print_on(st);
95 st->cr();
96 }
98 // GC workers get tasks from the GCTaskManager and execute
99 // them in this method. If there are no tasks to execute,
100 // the GC workers wait in the GCTaskManager's get_task()
101 // for tasks to be enqueued for execution.
103 void GCTaskThread::run() {
104 // Set up the thread for stack overflow support
105 this->record_stack_base_and_size();
106 this->initialize_thread_local_storage();
107 // Bind yourself to your processor.
108 if (processor_id() != GCTaskManager::sentinel_worker()) {
109 if (TraceGCTaskThread) {
110 tty->print_cr("GCTaskThread::run: "
111 " binding to processor %u", processor_id());
112 }
113 if (!os::bind_to_processor(processor_id())) {
114 DEBUG_ONLY(
115 warning("Couldn't bind GCTaskThread %u to processor %u",
116 which(), processor_id());
117 )
118 }
119 }
120 // Part of thread setup.
121 // ??? Are these set up once here to make subsequent ones fast?
122 HandleMark hm_outer;
123 ResourceMark rm_outer;
125 TimeStamp timer;
127 for (;/* ever */;) {
128 // These are so we can flush the resources allocated in the inner loop.
129 HandleMark hm_inner;
130 ResourceMark rm_inner;
131 for (; /* break */; ) {
132 // This will block until there is a task to be gotten.
133 GCTask* task = manager()->get_task(which());
134 // Record if this is an idle task for later use.
135 bool is_idle_task = task->is_idle_task();
136 // In case the update is costly
137 if (PrintGCTaskTimeStamps) {
138 timer.update();
139 }
141 jlong entry_time = timer.ticks();
142 char* name = task->name();
144 // If this is the barrier task, it can be destroyed
145 // by the GC task manager once the do_it() executes.
146 task->do_it(manager(), which());
148 // Use the saved value of is_idle_task because references
149 // using "task" are not reliable for the barrier task.
150 if (!is_idle_task) {
151 manager()->note_completion(which());
153 if (PrintGCTaskTimeStamps) {
154 assert(_time_stamps != NULL,
155 "Sanity (PrintGCTaskTimeStamps set late?)");
157 timer.update();
159 GCTaskTimeStamp* time_stamp = time_stamp_at(_time_stamp_index++);
161 time_stamp->set_name(name);
162 time_stamp->set_entry_time(entry_time);
163 time_stamp->set_exit_time(timer.ticks());
164 }
165 } else {
166 // idle tasks complete outside the normal accounting
167 // so that a task can complete without waiting for idle tasks.
168 // They have to be terminated separately.
169 IdleGCTask::destroy((IdleGCTask*)task);
170 set_is_working(true);
171 }
173 // Check if we should release our inner resources.
174 if (manager()->should_release_resources(which())) {
175 manager()->note_release(which());
176 break;
177 }
178 }
179 }
180 }