1 /*
   2  * Copyright (c) 1998, 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 "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
  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) {
  87       fatal(err_msg("MemProfiler: Cannot create log file: %s", log_name));
  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
 129   fprintf(_log_fp, "%6.1f,%5d,%5d," UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ","
 130           UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",",
 131           os::elapsedTime(),
 132           Threads::number_of_threads(),
 133           SystemDictionary::number_of_classes(),
 134           Universe::heap()->used() / K,
 135           Universe::heap()->capacity() / K,
 136           Universe::heap()->permanent_used() / HWperKB,
 137           Universe::heap()->permanent_capacity() / HWperKB);
 138 
 139   fprintf(_log_fp, UINTX_FORMAT_W(6) ",", CodeCache::capacity() / K);
 140 
 141   fprintf(_log_fp, UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",%6ld\n",
 142           handles_memory_usage / K,
 143           resource_memory_usage / K,
 144           OopMapCache::memory_usage() / K);
 145   fflush(_log_fp);
 146 }
 147 
 148 #endif