libjava/gnu/classpath/natVMStackWalker.cc

   1 // natVMStackWalker.cc
   2
   3 /* Copyright (C) 2006  Free Software Foundation
   4
   5    This file is part of libgcj.
   6
   7 This software is copyrighted work licensed under the terms of the
   8 Libgcj License.  Please consult the file "LIBGCJ_LICENSE" for
   9 details.  */
  10
  11 #include <config.h>
  12 #include <platform.h>
  13
  14 #include <gcj/cni.h>
  15 #include <jvm.h>
  16 #include <java-stack.h>
  17 #include <gnu/classpath/VMStackWalker.h>
  18 #include <gnu/gcj/RawData.h>
  19 #include <java/lang/ClassLoader.h>
  20
  21 JArray<jclass> *
  22 gnu::classpath::VMStackWalker::getClassContext(void)
  23 {
  24   return _Jv_StackTrace::GetStackWalkerStack ();
  25 }
  26
  27 jclass
  28 gnu::classpath::VMStackWalker::getCallingClass(void)
  29 {
  30   return _Jv_StackTrace::GetStackWalkerCallingClass ();
  31 }
  32
  33 jclass
  34 gnu::classpath::VMStackWalker::getCallingClass(::gnu::gcj::RawData *pc)
  35 {
  36   void *f = _Unwind_FindEnclosingFunction (pc);
  37
  38   // FIXME: it might well be a good idea to cache pc values here in
  39   // order to avoid repeated invocations of
  40   // _Unwind_FindEnclosingFunction, which is quite expensive.  On the
  41   // other hand, which not simply write a caching version of
  42   // _Unwind_FindEnclosingFunction itself?  That would probably be
  43   // worthwhile.
  44
  45   _Jv_StackTrace::UpdateNCodeMap ();
  46   jclass klass = (jclass) _Jv_StackTrace::ncodeMap->get ((jobject) f);
  47
  48   // If the caller is a compiled frame and the caller of the caller
  49   // is an interpreted frame then klass will be null and we need to
  50   // unwind the stack.
  51   if (klass == NULL)
  52     klass = _Jv_StackTrace::GetStackWalkerCallingClass ();
  53
  54   return klass;
  55 }
  56
  57 ::java::lang::ClassLoader *
  58 gnu::classpath::VMStackWalker::getClassLoader(::java::lang::Class *c)
  59 {
  60   return c->getClassLoaderInternal ();
  61 }
  62
  63 ::java::lang::ClassLoader *
  64 gnu::classpath::VMStackWalker::getCallingClassLoader(void)
  65 {
  66   return
  67     _Jv_StackTrace::GetStackWalkerCallingClass ()->getClassLoaderInternal ();
  68 }
  69
  70 ::java::lang::ClassLoader *
  71 gnu::classpath::VMStackWalker::getCallingClassLoader(::gnu::gcj::RawData *pc)
  72 {
  73   return getCallingClass (pc)->getClassLoaderInternal ();
  74 }
  75
  76 ::java::lang::ClassLoader *
  77 gnu::classpath::VMStackWalker::firstNonNullClassLoader(void)
  78 {
  79   return _Jv_StackTrace::GetStackWalkerFirstNonNullLoader ();
  80 }