1 /*
   2  * Copyright (c) 2014, 2020, 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/classLoaderData.inline.hpp"
  27 #include "classfile/classLoaderDataGraph.hpp"
  28 #include "classfile/classLoaderStats.hpp"
  29 #include "oops/objArrayKlass.hpp"
  30 #include "oops/oop.inline.hpp"
  31 #include "utilities/globalDefinitions.hpp"
  32 
  33 
  34 class ClassStatsClosure : public KlassClosure {
  35 public:
  36   int _num_classes;
  37 
  38   ClassStatsClosure() :
  39     _num_classes(0) {
  40   }
  41 
  42   virtual void do_klass(Klass* k) {
  43     _num_classes++;
  44   }
  45 };
  46 
  47 
  48 void ClassLoaderStatsClosure::do_cld(ClassLoaderData* cld) {
  49   oop cl = cld->class_loader();
  50   ClassLoaderStats* cls;
  51 
  52   // The hashtable key is the ClassLoader oop since we want to account
  53   // for "real" classes and anonymous classes together
  54   ClassLoaderStats** cls_ptr = _stats->get(cl);
  55   if (cls_ptr == NULL) {
  56     cls = new ClassLoaderStats();
  57     _stats->put(cl, cls);
  58     _total_loaders++;
  59   } else {
  60     cls = *cls_ptr;
  61   }
  62 
  63   if (!cld->has_class_mirror_holder()) {
  64     cls->_cld = cld;
  65   }
  66 
  67   cls->_class_loader = cl;
  68   if (cl != NULL) {
  69     cls->_parent = java_lang_ClassLoader::parent(cl);
  70     addEmptyParents(cls->_parent);
  71   }
  72 
  73   ClassStatsClosure csc;
  74   cld->classes_do(&csc);
  75   bool is_hidden = false;
  76   if(cld->has_class_mirror_holder()) {
  77     // if cld has a class holder then it must be either hidden or unsafe anonymous.
  78     Klass* k = cld->klasses();
  79     // if it's an array class then need to see if bottom class is hidden.
  80     if (k->is_array_klass()) {
  81       k = ObjArrayKlass::cast(k)->bottom_klass();
  82     }
  83     is_hidden = k->is_hidden();
  84     if (is_hidden) {
  85       cls->_hidden_classes_count += csc._num_classes;
  86     } else {
  87       cls->_anon_classes_count += csc._num_classes;
  88     }
  89   } else {
  90     cls->_classes_count = csc._num_classes;
  91   }
  92   _total_classes += csc._num_classes;
  93 
  94   ClassLoaderMetaspace* ms = cld->metaspace_or_null();
  95   if (ms != NULL) {
  96     if(cld->has_class_mirror_holder()) {
  97       if (is_hidden) {
  98         cls->_hidden_chunk_sz += ms->allocated_chunks_bytes();
  99         cls->_hidden_block_sz += ms->allocated_blocks_bytes();
 100       } else {
 101         cls->_anon_chunk_sz += ms->allocated_chunks_bytes();
 102         cls->_anon_block_sz += ms->allocated_blocks_bytes();
 103       }
 104     } else {
 105       cls->_chunk_sz = ms->allocated_chunks_bytes();
 106       cls->_block_sz = ms->allocated_blocks_bytes();
 107     }
 108     _total_chunk_sz += ms->allocated_chunks_bytes();
 109     _total_block_sz += ms->allocated_blocks_bytes();
 110   }
 111 }
 112 
 113 
 114 // Handles the difference in pointer width on 32 and 64 bit platforms
 115 #ifdef _LP64
 116   #define SPACE "%8s"
 117 #else
 118   #define SPACE "%s"
 119 #endif
 120 
 121 
 122 bool ClassLoaderStatsClosure::do_entry(oop const& key, ClassLoaderStats* const& cls) {
 123   Klass* class_loader_klass = (cls->_class_loader == NULL ? NULL : cls->_class_loader->klass());
 124   Klass* parent_klass = (cls->_parent == NULL ? NULL : cls->_parent->klass());
 125 
 126   _out->print(INTPTR_FORMAT "  " INTPTR_FORMAT "  " INTPTR_FORMAT "  " UINTX_FORMAT_W(6) "  " SIZE_FORMAT_W(8) "  " SIZE_FORMAT_W(8) "  ",
 127       p2i(class_loader_klass), p2i(parent_klass), p2i(cls->_cld),
 128       cls->_classes_count,
 129       cls->_chunk_sz, cls->_block_sz);
 130   if (class_loader_klass != NULL) {
 131     _out->print("%s", class_loader_klass->external_name());
 132   } else {
 133     _out->print("<boot class loader>");
 134   }
 135   _out->cr();
 136   if (cls->_anon_classes_count > 0) {
 137     _out->print_cr(SPACE SPACE SPACE "                                    " UINTX_FORMAT_W(6) "  " SIZE_FORMAT_W(8) "  " SIZE_FORMAT_W(8) "   + unsafe anonymous classes",
 138         "", "", "",
 139         cls->_anon_classes_count,
 140         cls->_anon_chunk_sz, cls->_anon_block_sz);
 141   }
 142   if (cls->_hidden_classes_count > 0) {
 143     _out->print_cr(SPACE SPACE SPACE "                                    " UINTX_FORMAT_W(6) "  " SIZE_FORMAT_W(8) "  " SIZE_FORMAT_W(8) "   + hidden classes",
 144         "", "", "",
 145         cls->_hidden_classes_count,
 146         cls->_hidden_chunk_sz, cls->_hidden_block_sz);
 147   }
 148   return true;
 149 }
 150 
 151 
 152 void ClassLoaderStatsClosure::print() {
 153   _out->print_cr("ClassLoader" SPACE " Parent" SPACE "      CLD*" SPACE "       Classes   ChunkSz   BlockSz  Type", "", "", "");
 154   _stats->iterate(this);
 155   _out->print("Total = " UINTX_FORMAT_W(-6), _total_loaders);
 156   _out->print(SPACE SPACE SPACE "                      ", "", "", "");
 157   _out->print_cr(UINTX_FORMAT_W(6) "  " SIZE_FORMAT_W(8) "  " SIZE_FORMAT_W(8) "  ",
 158       _total_classes,
 159       _total_chunk_sz,
 160       _total_block_sz);
 161   _out->print_cr("ChunkSz: Total size of all allocated metaspace chunks");
 162   _out->print_cr("BlockSz: Total size of all allocated metaspace blocks (each chunk has several blocks)");
 163 }
 164 
 165 
 166 void ClassLoaderStatsClosure::addEmptyParents(oop cl) {
 167   while (cl != NULL && java_lang_ClassLoader::loader_data_acquire(cl) == NULL) {
 168     // This classloader has not loaded any classes
 169     ClassLoaderStats** cls_ptr = _stats->get(cl);
 170     if (cls_ptr == NULL) {
 171       // It does not exist in our table - add it
 172       ClassLoaderStats* cls = new ClassLoaderStats();
 173       cls->_class_loader = cl;
 174       cls->_parent = java_lang_ClassLoader::parent(cl);
 175       _stats->put(cl, cls);
 176       _total_loaders++;
 177     }
 178 
 179     cl = java_lang_ClassLoader::parent(cl);
 180   }
 181 }
 182 
 183 
 184 void ClassLoaderStatsVMOperation::doit() {
 185   ClassLoaderStatsClosure clsc (_out);
 186   ClassLoaderDataGraph::loaded_cld_do(&clsc);
 187   clsc.print();
 188 }
 189 
 190 
 191 void ClassLoaderStatsDCmd::execute(DCmdSource source, TRAPS) {
 192   ClassLoaderStatsVMOperation op(output());
 193   VMThread::execute(&op);
 194 }