mirror of
https://github.com/corda/corda.git
synced 2025-01-04 04:04:27 +00:00
9bb3d6b972
git-subtree-dir: sgx-jvm/avian git-subtree-mainline:f978eab8d1git-subtree-split:09e4fe60d0
116 lines
2.4 KiB
C++
116 lines
2.4 KiB
C++
/* Copyright (c) 2008-2015, Avian Contributors
|
|
|
|
Permission to use, copy, modify, and/or distribute this software
|
|
for any purpose with or without fee is hereby granted, provided
|
|
that the above copyright notice and this permission notice appear
|
|
in all copies.
|
|
|
|
There is NO WARRANTY for this software. See license.txt for
|
|
details. */
|
|
|
|
#include "avian/machine.h"
|
|
#include "avian/heapwalk.h"
|
|
|
|
using namespace vm;
|
|
|
|
namespace {
|
|
|
|
namespace local {
|
|
|
|
enum { Root, Size, ClassName, Push, Pop };
|
|
|
|
void write1(FILE* out, uint8_t v)
|
|
{
|
|
size_t n UNUSED = fwrite(&v, 1, 1, out);
|
|
}
|
|
|
|
void write4(FILE* out, uint32_t v)
|
|
{
|
|
uint8_t b[] = {static_cast<uint8_t>(v >> 24),
|
|
static_cast<uint8_t>((v >> 16) & 0xFF),
|
|
static_cast<uint8_t>((v >> 8) & 0xFF),
|
|
static_cast<uint8_t>(v & 0xFF)};
|
|
|
|
size_t n UNUSED = fwrite(b, 4, 1, out);
|
|
}
|
|
|
|
void writeString(FILE* out, int8_t* p, unsigned size)
|
|
{
|
|
write4(out, size);
|
|
size_t n UNUSED = fwrite(p, size, 1, out);
|
|
}
|
|
|
|
unsigned objectSize(Thread* t, object o)
|
|
{
|
|
return extendedSize(t, o, baseSize(t, o, objectClass(t, o)));
|
|
}
|
|
|
|
} // namespace local
|
|
|
|
} // namespace
|
|
|
|
namespace vm {
|
|
|
|
void dumpHeap(Thread* t, FILE* out)
|
|
{
|
|
class Visitor : public HeapVisitor {
|
|
public:
|
|
Visitor(Thread* t, FILE* out) : t(t), out(out), nextNumber(1)
|
|
{
|
|
}
|
|
|
|
virtual void root()
|
|
{
|
|
write1(out, local::Root);
|
|
}
|
|
|
|
virtual unsigned visitNew(object p)
|
|
{
|
|
if (p) {
|
|
unsigned number = nextNumber++;
|
|
local::write4(out, number);
|
|
|
|
local::write1(out, local::Size);
|
|
local::write4(out, local::objectSize(t, p));
|
|
|
|
if (objectClass(t, p) == type(t, GcClass::Type)) {
|
|
GcByteArray* name = static_cast<GcClass*>(p)->name();
|
|
if (name) {
|
|
local::write1(out, local::ClassName);
|
|
local::writeString(out, name->body().begin(), name->length() - 1);
|
|
}
|
|
}
|
|
|
|
return number;
|
|
} else {
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
virtual void visitOld(object, unsigned number)
|
|
{
|
|
local::write4(out, number);
|
|
}
|
|
|
|
virtual void push(object, unsigned, unsigned)
|
|
{
|
|
local::write1(out, local::Push);
|
|
}
|
|
|
|
virtual void pop()
|
|
{
|
|
local::write1(out, local::Pop);
|
|
}
|
|
|
|
Thread* t;
|
|
FILE* out;
|
|
unsigned nextNumber;
|
|
} visitor(t, out);
|
|
|
|
HeapWalker* w = makeHeapWalker(t, &visitor);
|
|
w->visitAllRoots();
|
|
w->dispose();
|
|
}
|
|
|
|
} // namespace vm
|