duke@435: /*
duke@435:  * Copyright 1998-2007 Sun Microsystems, Inc.  All Rights Reserved.
duke@435:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435:  *
duke@435:  * This code is free software; you can redistribute it and/or modify it
duke@435:  * under the terms of the GNU General Public License version 2 only, as
duke@435:  * published by the Free Software Foundation.
duke@435:  *
duke@435:  * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
duke@435:  * version 2 for more details (a copy is included in the LICENSE file that
duke@435:  * accompanied this code).
duke@435:  *
duke@435:  * You should have received a copy of the GNU General Public License version
duke@435:  * 2 along with this work; if not, write to the Free Software Foundation,
duke@435:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435:  *
duke@435:  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
duke@435:  * CA 95054 USA or visit www.sun.com if you need additional information or
duke@435:  * have any questions.
duke@435:  *
duke@435:  */
duke@435: 
duke@435: # include "incls/_precompiled.incl"
duke@435: # include "incls/_memprofiler.cpp.incl"
duke@435: 
duke@435: #ifndef PRODUCT
duke@435: 
duke@435: // --------------------------------------------------------
duke@435: // MemProfilerTask
duke@435: 
duke@435: class MemProfilerTask : public PeriodicTask {
duke@435:  public:
duke@435:   MemProfilerTask(int interval_time) : PeriodicTask(interval_time) {}
duke@435:   void task();
duke@435: };
duke@435: 
duke@435: 
duke@435: void MemProfilerTask::task() {
duke@435:   // Get thread lock to provide mutual exclusion, and so we can iterate safely over the thread list.
duke@435:   MutexLocker mu(Threads_lock);
duke@435:   MemProfiler::do_trace();
duke@435: }
duke@435: 
duke@435: 
duke@435: //----------------------------------------------------------
duke@435: // Implementation of MemProfiler
duke@435: 
duke@435: MemProfilerTask* MemProfiler::_task   = NULL;
duke@435: FILE*            MemProfiler::_log_fp = NULL;
duke@435: 
duke@435: 
duke@435: bool MemProfiler::is_active() {
duke@435:   return _task != NULL;
duke@435: }
duke@435: 
duke@435: 
duke@435: void MemProfiler::engage() {
duke@435:   const char *log_name = "mprofile.log";
duke@435:   if (!is_active()) {
duke@435:     // Create log file
duke@435:     _log_fp = fopen(log_name , "w+");
duke@435:     if (_log_fp == NULL) {
duke@435:       fatal1("MemProfiler: Cannot create log file: %s", log_name);
duke@435:     }
duke@435:     fprintf(_log_fp, "MemProfiler: sizes are in Kb, time is in seconds since startup\n\n");
duke@435:     fprintf(_log_fp, "  time, #thr, #cls,  heap,  heap,  perm,  perm,  code, hndls, rescs, oopmp\n");
duke@435:     fprintf(_log_fp, "                     used, total,  used, total, total, total, total, total\n");
duke@435:     fprintf(_log_fp, "--------------------------------------------------------------------------\n");
duke@435: 
duke@435:     _task = new MemProfilerTask(MemProfilingInterval);
duke@435:     _task->enroll();
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: void MemProfiler::disengage() {
duke@435:   if (!is_active()) return;
duke@435:   // Do one last trace at disengage time
duke@435:   do_trace();
duke@435: 
duke@435:   // Close logfile
duke@435:   fprintf(_log_fp, "MemProfiler detached\n");
duke@435:   fclose(_log_fp);
duke@435: 
duke@435:   // remove MemProfilerTask
duke@435:   assert(_task != NULL, "sanity check");
duke@435:   _task->disenroll();
duke@435:   delete _task;
duke@435:   _task = NULL;
duke@435: }
duke@435: 
duke@435: 
duke@435: void MemProfiler::do_trace() {
duke@435:   // Calculate thread local sizes
duke@435:   size_t handles_memory_usage    = VMThread::vm_thread()->handle_area()->size_in_bytes();
duke@435:   size_t resource_memory_usage   = VMThread::vm_thread()->resource_area()->size_in_bytes();
duke@435:   JavaThread *cur = Threads::first();
duke@435:   while (cur != NULL) {
duke@435:     handles_memory_usage  += cur->handle_area()->size_in_bytes();
duke@435:     resource_memory_usage += cur->resource_area()->size_in_bytes();
duke@435:     cur = cur->next();
duke@435:   }
duke@435: 
duke@435:   // Print trace line in log
duke@435:   fprintf(_log_fp, "%6.1f,%5d,%5d,%6ld,%6ld,%6ld,%6ld,",
duke@435:       os::elapsedTime(),
duke@435:       Threads::number_of_threads(),
duke@435:       SystemDictionary::number_of_classes(),
duke@435:       Universe::heap()->used() / K,
duke@435:       Universe::heap()->capacity() / K,
duke@435:       Universe::heap()->permanent_used() / HWperKB,
duke@435:       Universe::heap()->permanent_capacity() / HWperKB);
duke@435: 
duke@435:   fprintf(_log_fp, "%6ld,", CodeCache::capacity() / K);
duke@435: 
duke@435:   fprintf(_log_fp, "%6ld,%6ld,%6ld\n",
duke@435:       handles_memory_usage / K,
duke@435:       resource_memory_usage / K,
duke@435:       OopMapCache::memory_usage() / K);
duke@435:   fflush(_log_fp);
duke@435: }
duke@435: 
duke@435: #endif