#include <config.h>
#include <gcj/cni.h>
#include <jvm.h>
#include <string.h>
#include <stdlib.h>
#include <java/lang/NullPointerException.h>
#include <java/io/IOException.h>
#include <gnu/gcj/Core.h>
static _Jv_core_chain *root;
static void
default_register_resource (_Jv_core_chain *node)
{
node->next = root;
root = node;
}
void (*_Jv_RegisterCoreHook) (_Jv_core_chain *) = default_register_resource;
void
_Jv_RegisterResource (void *vptr)
{
char *rptr = (char *) vptr;
_Jv_core_chain *cc = (_Jv_core_chain *) _Jv_Malloc (sizeof (_Jv_core_chain));
cc->name_length = ((int *)rptr)[0];
cc->data_length = ((int *)rptr)[1];
cc->name = rptr + 2 * sizeof (int);
cc->data = cc->name + cc->name_length;
cc->next = NULL;
(*_Jv_RegisterCoreHook) (cc);
}
void
_Jv_FreeCoreChain (_Jv_core_chain *chain)
{
while (chain != NULL)
{
_Jv_core_chain *next = chain->next;
_Jv_Free (chain);
chain = next;
}
}
_Jv_core_chain *
_Jv_FindCore (_Jv_core_chain *node, jstring name)
{
char *buf = (char *) __builtin_alloca (JvGetStringUTFLength (name) + 1);
jsize total = JvGetStringUTFRegion (name, 0, name->length(), buf);
buf[total] = '\0';
if (buf[0] == '/')
{
++buf;
--total;
}
while (node)
{
if (total == node->name_length
&& strncmp (buf, node->name, total) == 0)
return node;
node = node->next;
}
return NULL;
}
gnu::gcj::Core *
_Jv_create_core (_Jv_core_chain *node, jstring name)
{
node = _Jv_FindCore (node, name);
gnu::gcj::Core *core = NULL;
if (node)
{
core = new gnu::gcj::Core ();
core->ptr = (gnu::gcj::RawData *) node->data;
core->length = node->data_length;
}
return core;
}
gnu::gcj::Core *
gnu::gcj::Core::find (jstring name)
{
gnu::gcj::Core *core = _Jv_create_core (root, name);
return core;
}
gnu::gcj::Core *
gnu::gcj::Core::create (jstring name)
{
gnu::gcj::Core *core = _Jv_create_core (root, name);
if (core == NULL)
throw new java::io::IOException (JvNewStringLatin1 ("can't open core"));
return core;
}