1 /*
   2  * Copyright (c) 1998, 2017, 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/shared/collectedHeap.inline.hpp"
  29 #include "gc/shared/generation.hpp"
  30 #include "interpreter/oopMapCache.hpp"
  31 #include "memory/resourceArea.hpp"
  32 #include "runtime/handles.inline.hpp"
  33 #include "runtime/jniHandles.hpp"
  34 #include "runtime/memprofiler.hpp"
  35 #include "runtime/mutexLocker.hpp"
  36 #include "runtime/os.hpp"
  37 #include "runtime/task.hpp"
  38 #include "runtime/thread.inline.hpp"
  39 #include "runtime/threadSMR.hpp"
  40 #include "runtime/vmThread.hpp"
  41 
  42 #ifndef PRODUCT
  43 
  44 // --------------------------------------------------------
  45 // MemProfilerTask
  46 
  47 class MemProfilerTask : public PeriodicTask {
  48  public:
  49   MemProfilerTask(int interval_time) : PeriodicTask(interval_time) {}
  50   void task();
  51 };
  52 
  53 
  54 void MemProfilerTask::task() {
  55   // Get thread lock to provide mutual exclusion, and so we can iterate safely over the thread list.
  56   MutexLocker mu(Threads_lock);
  57   MemProfiler::do_trace();
  58 }
  59 
  60 
  61 //----------------------------------------------------------
  62 // Implementation of MemProfiler
  63 
  64 MemProfilerTask* MemProfiler::_task   = NULL;
  65 FILE*            MemProfiler::_log_fp = NULL;
  66 
  67 
  68 bool MemProfiler::is_active() {
  69   return _task != NULL;
  70 }
  71 
  72 
  73 void MemProfiler::engage() {
  74   const char *log_name = "mprofile.log";
  75   if (!is_active()) {
  76     // Create log file
  77     _log_fp = fopen(log_name , "w+");
  78     if (_log_fp == NULL) {
  79       fatal("MemProfiler: Cannot create log file: %s", log_name);
  80     }
  81     fprintf(_log_fp, "MemProfiler: sizes are in Kb, time is in seconds since startup\n\n");
  82     fprintf(_log_fp, "  time, #thr, #cls,  heap,  heap,  perm,  perm,  code, hndls, rescs, oopmp\n");
  83     fprintf(_log_fp, "                     used, total,  used, total, total, total, total, total\n");
  84     fprintf(_log_fp, "--------------------------------------------------------------------------\n");
  85 
  86     _task = new MemProfilerTask(MemProfilingInterval);
  87     _task->enroll();
  88   }
  89 }
  90 
  91 
  92 void MemProfiler::disengage() {
  93   if (!is_active()) return;
  94   // Do one last trace at disengage time
  95   do_trace();
  96 
  97   // Close logfile
  98   fprintf(_log_fp, "MemProfiler detached\n");
  99   fclose(_log_fp);
 100 
 101   // remove MemProfilerTask
 102   assert(_task != NULL, "sanity check");
 103   _task->disenroll();
 104   delete _task;
 105   _task = NULL;
 106 }
 107 
 108 
 109 void MemProfiler::do_trace() {
 110   // Calculate thread local sizes
 111   size_t handles_memory_usage    = VMThread::vm_thread()->handle_area()->size_in_bytes();
 112   size_t resource_memory_usage   = VMThread::vm_thread()->resource_area()->size_in_bytes();
 113   {
 114     JavaThreadIteratorWithHandle jtiwh;
 115     for (; JavaThread *cur = jtiwh.next(); ) {
 116       handles_memory_usage  += cur->handle_area()->size_in_bytes();
 117       resource_memory_usage += cur->resource_area()->size_in_bytes();
 118     }
 119 
 120     // Print trace line in log
 121     fprintf(_log_fp, "%6.1f,%5d,%5d," UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",",
 122             os::elapsedTime(),
 123             jtiwh.length(),
 124             InstanceKlass::number_of_instance_classes(),
 125             Universe::heap()->used() / K,
 126             Universe::heap()->capacity() / K);
 127   }
 128 
 129   fprintf(_log_fp, UINTX_FORMAT_W(6) ",", CodeCache::capacity() / K);
 130 
 131   fprintf(_log_fp, UINTX_FORMAT_W(6) "," UINTX_FORMAT_W(6) ",%6ld\n",
 132           handles_memory_usage / K,
 133           resource_memory_usage / K,
 134           0L);
 135   fflush(_log_fp);
 136 }
 137 
 138 #endif