Mercurial > hg > truffle
annotate src/share/vm/runtime/memprofiler.cpp @ 3202:9352a9c26095
revert outer framesate scheduling change
author | Gilles Duboscq <gilles.duboscq@oracle.com> |
---|---|
date | Fri, 08 Jul 2011 18:00:39 +0200 |
parents | f95d63e2154a |
children | f08d439fab8c |
rev | line source |
---|---|
0 | 1 /* |
1972 | 2 * Copyright (c) 1998, 2010, Oracle and/or its affiliates. All rights reserved. |
0 | 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 * | |
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1490
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1490
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1490
diff
changeset
|
21 * questions. |
0 | 22 * |
23 */ | |
24 | |
1972 | 25 #include "precompiled.hpp" |
26 #include "classfile/systemDictionary.hpp" | |
27 #include "code/codeCache.hpp" | |
28 #include "gc_interface/collectedHeap.inline.hpp" | |
29 #include "interpreter/oopMapCache.hpp" | |
30 #include "memory/generation.hpp" | |
31 #include "memory/permGen.hpp" | |
32 #include "memory/resourceArea.hpp" | |
33 #include "runtime/handles.inline.hpp" | |
34 #include "runtime/jniHandles.hpp" | |
35 #include "runtime/memprofiler.hpp" | |
36 #include "runtime/mutexLocker.hpp" | |
37 #include "runtime/os.hpp" | |
38 #include "runtime/task.hpp" | |
39 #include "runtime/vmThread.hpp" | |
40 #ifdef TARGET_OS_FAMILY_linux | |
41 # include "thread_linux.inline.hpp" | |
42 #endif | |
43 #ifdef TARGET_OS_FAMILY_solaris | |
44 # include "thread_solaris.inline.hpp" | |
45 #endif | |
46 #ifdef TARGET_OS_FAMILY_windows | |
47 # include "thread_windows.inline.hpp" | |
48 #endif | |
0 | 49 |
50 #ifndef PRODUCT | |
51 | |
52 // -------------------------------------------------------- | |
53 // MemProfilerTask | |
54 | |
55 class MemProfilerTask : public PeriodicTask { | |
56 public: | |
57 MemProfilerTask(int interval_time) : PeriodicTask(interval_time) {} | |
58 void task(); | |
59 }; | |
60 | |
61 | |
62 void MemProfilerTask::task() { | |
63 // Get thread lock to provide mutual exclusion, and so we can iterate safely over the thread list. | |
64 MutexLocker mu(Threads_lock); | |
65 MemProfiler::do_trace(); | |
66 } | |
67 | |
68 | |
69 //---------------------------------------------------------- | |
70 // Implementation of MemProfiler | |
71 | |
72 MemProfilerTask* MemProfiler::_task = NULL; | |
73 FILE* MemProfiler::_log_fp = NULL; | |
74 | |
75 | |
76 bool MemProfiler::is_active() { | |
77 return _task != NULL; | |
78 } | |
79 | |
80 | |
81 void MemProfiler::engage() { | |
82 const char *log_name = "mprofile.log"; | |
83 if (!is_active()) { | |
84 // Create log file | |
85 _log_fp = fopen(log_name , "w+"); | |
86 if (_log_fp == NULL) { | |
1490
f03d0a26bf83
6888954: argument formatting for assert() and friends
jcoomes
parents:
579
diff
changeset
|
87 fatal(err_msg("MemProfiler: Cannot create log file: %s", log_name)); |
0 | 88 } |
89 fprintf(_log_fp, "MemProfiler: sizes are in Kb, time is in seconds since startup\n\n"); | |
90 fprintf(_log_fp, " time, #thr, #cls, heap, heap, perm, perm, code, hndls, rescs, oopmp\n"); | |
91 fprintf(_log_fp, " used, total, used, total, total, total, total, total\n"); | |
92 fprintf(_log_fp, "--------------------------------------------------------------------------\n"); | |
93 | |
94 _task = new MemProfilerTask(MemProfilingInterval); | |
95 _task->enroll(); | |
96 } | |
97 } | |
98 | |
99 | |
100 void MemProfiler::disengage() { | |
101 if (!is_active()) return; | |
102 // Do one last trace at disengage time | |
103 do_trace(); | |
104 | |
105 // Close logfile | |
106 fprintf(_log_fp, "MemProfiler detached\n"); | |
107 fclose(_log_fp); | |
108 | |
109 // remove MemProfilerTask | |
110 assert(_task != NULL, "sanity check"); | |
111 _task->disenroll(); | |
112 delete _task; | |
113 _task = NULL; | |
114 } | |
115 | |
116 | |
117 void MemProfiler::do_trace() { | |
118 // Calculate thread local sizes | |
119 size_t handles_memory_usage = VMThread::vm_thread()->handle_area()->size_in_bytes(); | |
120 size_t resource_memory_usage = VMThread::vm_thread()->resource_area()->size_in_bytes(); | |
121 JavaThread *cur = Threads::first(); | |
122 while (cur != NULL) { | |
123 handles_memory_usage += cur->handle_area()->size_in_bytes(); | |
124 resource_memory_usage += cur->resource_area()->size_in_bytes(); | |
125 cur = cur->next(); | |
126 } | |
127 | |
128 // Print trace line in log | |
513
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
129 fprintf(_log_fp, "%6.1f,%5d,%5d," UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) "," |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
130 UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",", |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
131 os::elapsedTime(), |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
132 Threads::number_of_threads(), |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
133 SystemDictionary::number_of_classes(), |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
134 Universe::heap()->used() / K, |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
135 Universe::heap()->capacity() / K, |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
136 Universe::heap()->permanent_used() / HWperKB, |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
137 Universe::heap()->permanent_capacity() / HWperKB); |
0 | 138 |
513
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
139 fprintf(_log_fp, UINTX_FORMAT_W(6) ",", CodeCache::capacity() / K); |
0 | 140 |
513
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
141 fprintf(_log_fp, UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",%6ld\n", |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
142 handles_memory_usage / K, |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
143 resource_memory_usage / K, |
2328d1d3f8cf
6781583: Hotspot build fails on linux 64 bit platform with gcc 4.3.2
xlu
parents:
0
diff
changeset
|
144 OopMapCache::memory_usage() / K); |
0 | 145 fflush(_log_fp); |
146 } | |
147 | |
148 #endif |