blob: 82eb613bceaa7731ee43623cb598af418d7e1656 [file] [log] [blame]
/* Copyright 2000-2005 The Apache Software Foundation
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
/*
*
* @author Mladen Turk
* @version $Revision$, $Date$
*/
#include "tcn.h"
#include "apr_shm.h"
TCN_IMPLEMENT_CALL(jlong, Shm, create)(TCN_STDARGS, jlong reqsize,
jstring filename,
jlong pool)
{
apr_pool_t *p = J2P(pool, apr_pool_t *);
const char *fname = NULL;
apr_shm_t *shm;
UNREFERENCED(o);
if (filename)
fname = (const char *)((*e)->GetStringUTFChars(e, filename, 0));
TCN_THROW_IF_ERR(apr_shm_create(&shm, (apr_size_t)reqsize,
fname, p), shm);
cleanup:
if (fname)
(*e)->ReleaseStringUTFChars(e, filename, fname);
return P2J(shm);
}
TCN_IMPLEMENT_CALL(jint, Shm, remove)(TCN_STDARGS,
jstring filename,
jlong pool)
{
apr_status_t rv;
apr_pool_t *p = J2P(pool, apr_pool_t *);
TCN_ALLOC_CSTRING(filename);
UNREFERENCED(o);
rv = apr_shm_remove(J2S(filename), p);
TCN_FREE_CSTRING(filename);
return (jint)rv;
}
TCN_IMPLEMENT_CALL(jint, Shm, destroy)(TCN_STDARGS, jlong shm)
{
apr_shm_t *s = J2P(shm, apr_shm_t *);
UNREFERENCED_STDARGS;
return (jint)apr_shm_destroy(s);
}
TCN_IMPLEMENT_CALL(jlong, Shm, attach)(TCN_STDARGS,
jstring filename,
jlong pool)
{
apr_pool_t *p = J2P(pool, apr_pool_t *);
const char *fname = NULL;
apr_shm_t *shm;
UNREFERENCED(o);
if (filename)
fname = (const char *)((*e)->GetStringUTFChars(e, filename, 0));
TCN_THROW_IF_ERR(apr_shm_attach(&shm, fname, p), shm);
cleanup:
if (fname)
(*e)->ReleaseStringUTFChars(e, filename, fname);
return P2J(shm);
}
TCN_IMPLEMENT_CALL(jint, Shm, detach)(TCN_STDARGS, jlong shm)
{
apr_shm_t *s = J2P(shm, apr_shm_t *);
UNREFERENCED_STDARGS;
return (jint)apr_shm_detach(s);
}
TCN_IMPLEMENT_CALL(jlong, Shm, baseaddr)(TCN_STDARGS, jlong shm)
{
apr_shm_t *s = J2P(shm, apr_shm_t *);
UNREFERENCED_STDARGS;
return P2J(apr_shm_baseaddr_get(s));
}
TCN_IMPLEMENT_CALL(jlong, Shm, size)(TCN_STDARGS, jlong shm)
{
apr_shm_t *s = J2P(shm, apr_shm_t *);
UNREFERENCED_STDARGS;
return (jlong)apr_shm_size_get(s);
}
TCN_IMPLEMENT_CALL(jobject, Shm, buffer)(TCN_STDARGS, jlong shm)
{
apr_shm_t *s = J2P(shm, apr_shm_t *);
jlong sz = (jlong)apr_shm_size_get(s);
void *a;
UNREFERENCED(o);
if ((a = apr_shm_baseaddr_get(s)) != NULL)
return (*e)->NewDirectByteBuffer(e, a, sz);
else
return NULL;
}