1 /*
  2  * Copyright (c) 2022, 2023, 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.hpp"
 27 #include "classfile/classLoaderDataGraph.hpp"
 28 #include "classfile/classPrinter.hpp"
 29 #include "memory/iterator.hpp"
 30 #include "memory/resourceArea.hpp"
 31 #include "oops/instanceKlass.hpp"
 32 #include "oops/klass.inline.hpp"
 33 #include "oops/method.hpp"
 34 #include "oops/symbol.hpp"
 35 #include "utilities/ostream.hpp"
 36 
 37 class ClassPrinter::KlassPrintClosure : public LockedClassesDo {
 38   const char* _class_name_pattern;
 39   const char* _method_name_pattern;
 40   const char* _method_signature_pattern;
 41   bool _always_print_class_name;
 42   int _flags;
 43   outputStream* _st;
 44   int _num;
 45   bool _has_printed_methods;
 46 public:
 47   KlassPrintClosure(const char* class_name_pattern,
 48                     const char* method_name_pattern,
 49                     const char* method_signature_pattern,
 50                     bool always_print_class_name,
 51                     int flags, outputStream* st)
 52     : _class_name_pattern(class_name_pattern),
 53       _method_name_pattern(method_name_pattern),
 54       _method_signature_pattern(method_signature_pattern),
 55       _always_print_class_name(always_print_class_name),
 56       _flags(flags), _st(st), _num(0), _has_printed_methods(false)
 57   {
 58     _flags |= (PRINT_PROFILE);
 59     if (has_mode(_flags, PRINT_METHOD_HANDLE)) {
 60       _flags |= (PRINT_METHOD_NAME | PRINT_BYTECODE);
 61     }
 62     if (has_mode(_flags, PRINT_DYNAMIC)) {
 63       _flags |= (PRINT_METHOD_NAME | PRINT_BYTECODE);
 64     }
 65     if (has_mode(_flags, PRINT_BYTECODE_ADDR)) {
 66       _flags |= (PRINT_METHOD_NAME | PRINT_BYTECODE);
 67     }
 68     if (has_mode(_flags, PRINT_BYTECODE)) {
 69       _flags |= (PRINT_METHOD_NAME);
 70     }
 71   }
 72 
 73   virtual void do_klass(Klass* k) {
 74     if (!k->is_instance_klass()) {
 75       return;
 76     }
 77     print_instance_klass(InstanceKlass::cast(k));
 78   }
 79 
 80   static bool match(const char* pattern, Symbol* sym) {
 81     return (pattern == nullptr || sym->is_star_match(pattern));
 82   }
 83 
 84   void print_klass_name(InstanceKlass* ik) {
 85     _st->print("[%3d] " INTPTR_FORMAT " class %s mirror: " INTPTR_FORMAT " ", _num++,
 86                p2i(ik), ik->name()->as_C_string(), p2i(ik->java_mirror()));
 87     ik->class_loader_data()->print_value_on(_st);
 88     _st->cr();
 89   }
 90 
 91   void print_instance_klass(InstanceKlass* ik) {
 92     if (ik->is_loaded() && ik->name()->is_star_match(_class_name_pattern)) {
 93       ResourceMark rm;
 94       if (_has_printed_methods) {
 95         // We have printed some methods in the previous class.
 96         // Print a new line to separate the two classes
 97         _st->cr();
 98       }
 99       _has_printed_methods = false;
100       if (_always_print_class_name) {
101         print_klass_name(ik);
102       }
103 
104       if (has_mode(_flags, ClassPrinter::PRINT_METHOD_NAME)) {
105         bool print_codes = has_mode(_flags, ClassPrinter::PRINT_BYTECODE);
106         int len = ik->methods()->length();
107         int num_methods_printed = 0;
108 
109         for (int index = 0; index < len; index++) {
110           Method* m = ik->methods()->at(index);
111           if (match(_method_name_pattern, m->name()) &&
112               match(_method_signature_pattern, m->signature())) {
113             if (print_codes && num_methods_printed++ > 0) {
114               _st->cr();
115             }
116 
117             if (_has_printed_methods == false) {
118               if (!_always_print_class_name) {
119                 print_klass_name(ik);
120               }
121               _has_printed_methods = true;
122             }
123             print_method(m);
124           }
125         }
126       }
127     }
128   }
129 
130   void print_method(Method* m) {
131     bool print_codes = has_mode(_flags, ClassPrinter::PRINT_BYTECODE);
132     _st->print_cr(INTPTR_FORMAT " %smethod %s : %s", p2i(m),
133                   m->is_static() ? "static " : "",
134                   m->name()->as_C_string(), m->signature()->as_C_string());
135     if (print_codes) {
136       m->print_codes_on(_st, _flags);
137     }
138   }
139 };
140 
141 void ClassPrinter::print_flags_help(outputStream* os) {
142   os->print_cr("flags (bitmask):");
143   os->print_cr("   0x%02x  - print names of methods", PRINT_METHOD_NAME);
144   os->print_cr("   0x%02x  - print bytecodes", PRINT_BYTECODE);
145   os->print_cr("   0x%02x  - print the address of bytecodes", PRINT_BYTECODE_ADDR);
146   os->print_cr("   0x%02x  - print info for invokedynamic", PRINT_DYNAMIC);
147   os->print_cr("   0x%02x  - print info for invokehandle",  PRINT_METHOD_HANDLE);
148   os->cr();
149 }
150 
151 void ClassPrinter::print_classes(const char* class_name_pattern, int flags, outputStream* os) {
152   KlassPrintClosure closure(class_name_pattern, nullptr, nullptr, true, flags, os);
153   ClassLoaderDataGraph::classes_do(&closure);
154 }
155 
156 void ClassPrinter::print_methods(const char* class_name_pattern,
157                                  const char* method_pattern, int flags, outputStream* os) {
158   ResourceMark rm;
159   const char* method_name_pattern;
160   const char* method_signature_pattern;
161 
162   const char* colon = strchr(method_pattern, ':');
163   if (colon == nullptr) {
164     method_name_pattern = method_pattern;
165     method_signature_pattern = nullptr;
166   } else {
167     ptrdiff_t name_pat_len = colon - method_pattern;
168     assert(name_pat_len >= 0, "sanity");
169     char* buf = NEW_RESOURCE_ARRAY(char, name_pat_len + 1);
170     strncpy(buf, method_pattern, name_pat_len);
171     buf[name_pat_len] = 0;
172 
173     method_name_pattern = buf;
174     method_signature_pattern = colon + 1;
175   }
176 
177   KlassPrintClosure closure(class_name_pattern, method_name_pattern, method_signature_pattern,
178                             false, flags | PRINT_METHOD_NAME, os);
179   ClassLoaderDataGraph::classes_do(&closure);
180 }