388 lines
12 KiB
C
388 lines
12 KiB
C
/* gnu_java_nio_channel_KqueueSelectorImpl.c --
|
|
Copyright (C) 2006 Free Software Foundation, Inc.
|
|
|
|
This file is a part of GNU Classpath.
|
|
|
|
GNU Classpath is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or (at
|
|
your option) any later version.
|
|
|
|
GNU Classpath is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GNU Classpath; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301
|
|
USA
|
|
|
|
Linking this library statically or dynamically with other modules is
|
|
making a combined work based on this library. Thus, the terms and
|
|
conditions of the GNU General Public License cover the whole
|
|
combination.
|
|
|
|
As a special exception, the copyright holders of this library give you
|
|
permission to link this library with independent modules to produce an
|
|
executable, regardless of the license terms of these independent
|
|
modules, and to copy and distribute the resulting executable under
|
|
terms of your choice, provided that you also meet, for each linked
|
|
independent module, the terms and conditions of the license of that
|
|
module. An independent module is a module which is not derived from
|
|
or based on this library. If you modify this library, you may extend
|
|
this exception to your version of the library, but you are not
|
|
obligated to do so. If you do not wish to do so, delete this
|
|
exception statement from your version. */
|
|
|
|
|
|
#if HAVE_CONFIG_H
|
|
#include <config.h>
|
|
#endif /* HAVE_CONFIG_H */
|
|
|
|
#include <sys/types.h>
|
|
#if HAVE_SYS_EVENT_H
|
|
#include <sys/event.h>
|
|
#endif /* HAVE_SYS_EVENT_H */
|
|
#include <sys/time.h>
|
|
#include <errno.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include <jni.h>
|
|
#include <gnu_java_nio_KqueueSelectorImpl.h>
|
|
|
|
#include <jcl.h>
|
|
|
|
#define KEY_OP_ACCEPT 16
|
|
#define KEY_OP_CONNECT 8
|
|
#define KEY_OP_READ 1
|
|
#define KEY_OP_WRITE 4
|
|
|
|
/* XXX this requires -std=gnu99 or c99 */
|
|
/* #ifdef TRACE_KQUEUE */
|
|
/* #define TRACE(fmt, ...) fprintf (stderr, "%s: " fmt "\n", __FUNCTION__, __VA_ARGS__); */
|
|
/* #else */
|
|
/* #define TRACE(fmt, ...) */
|
|
/* #endif */
|
|
|
|
/* #define TRACE_KQUEUE 1 */
|
|
|
|
|
|
#define throw_not_supported(env) JCL_ThrowException (env, "java/lang/UnsupportedOperationException", "kqueue/kevent support not available")
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: kqueue_supported
|
|
* Signature: ()Z
|
|
*/
|
|
JNIEXPORT jboolean JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_kqueue_1supported (JNIEnv *env __attribute__((unused)),
|
|
jclass clazz __attribute__((unused)))
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
return JNI_TRUE;
|
|
#else
|
|
return JNI_FALSE;
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: sizeof_struct_kevent
|
|
* Signature: ()I
|
|
*/
|
|
JNIEXPORT jint JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_sizeof_1struct_1kevent
|
|
(JNIEnv *env __attribute__((unused)), jclass clazz __attribute__((unused)))
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
/* TRACE("return sizeof %lu", sizeof (struct kevent)); */
|
|
return sizeof (struct kevent);
|
|
#else
|
|
throw_not_supported (env);
|
|
return -1;
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: implOpen
|
|
* Signature: ()I
|
|
*/
|
|
JNIEXPORT jint JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_implOpen
|
|
(JNIEnv *env, jclass clazz __attribute__((unused)))
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
int kq = kqueue ();
|
|
/* TRACE("kqueue returns %d", kq); */
|
|
if (kq == -1)
|
|
JCL_ThrowException (env, "java/io/IOException", strerror (errno));
|
|
return kq;
|
|
#else
|
|
throw_not_supported (env);
|
|
return -1;
|
|
#endif
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: implClose
|
|
* Signature: (I)V
|
|
*/
|
|
JNIEXPORT void JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_implClose (JNIEnv *env,
|
|
jclass clazz __attribute__((unused)),
|
|
jint kq)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
/* TRACE("closing %d", kq); */
|
|
if (close (kq) != 0)
|
|
JCL_ThrowException (env, "java/io/IOException", strerror (errno));
|
|
#else
|
|
(void) kq;
|
|
throw_not_supported (env);
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: kevent_set
|
|
* Signature: (Ljava/nio/ByteBuffer;IIIZ)V
|
|
*/
|
|
JNIEXPORT void JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_kevent_1set (JNIEnv *env,
|
|
jclass clazz __attribute__((unused)),
|
|
jobject nstate, jint i, jint fd,
|
|
jint ops, jint active, jint key)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
struct kevent *kev;
|
|
short ident;
|
|
|
|
kev = (struct kevent *) (*env)->GetDirectBufferAddress (env, nstate);
|
|
|
|
#ifdef TRACE_KQUEUE
|
|
printf ("kevent_set fd:%d p:%p i:%d ops:%x active:%x key:%x\n",
|
|
fd, (void *) kev, i, ops, active, key);
|
|
#endif /* TRACE_KQUEUE */
|
|
|
|
if (kev == NULL)
|
|
{
|
|
JCL_ThrowException (env, "java/lang/InternalError",
|
|
"GetDirectBufferAddress returned NULL!");
|
|
return;
|
|
}
|
|
|
|
ident = fd;
|
|
memset (&kev[i], 0, sizeof (struct kevent));
|
|
|
|
if ((ops & KEY_OP_READ) || (ops & KEY_OP_ACCEPT))
|
|
{
|
|
/* Add event if it wasn't previously added. */
|
|
if (!(active & KEY_OP_READ) && !(active & KEY_OP_ACCEPT))
|
|
EV_SET(&kev[i], ident, EVFILT_READ, EV_ADD, 0, 0, (void *) key);
|
|
}
|
|
else
|
|
{
|
|
/* Delete event if it was previously added */
|
|
if ((active & KEY_OP_READ) || (active & KEY_OP_ACCEPT))
|
|
EV_SET(&kev[i], ident, EVFILT_READ, EV_DELETE, 0, 0, (void *) key);
|
|
}
|
|
|
|
/* Do the same thing for the write filter. */
|
|
if ((ops & KEY_OP_WRITE) || (ops & KEY_OP_CONNECT))
|
|
{
|
|
if (!(active & KEY_OP_WRITE) && !(active & KEY_OP_CONNECT))
|
|
EV_SET(&kev[i], ident, EVFILT_WRITE, EV_ADD, 0, 0, (void *) key);
|
|
}
|
|
else
|
|
{
|
|
if ((active & KEY_OP_WRITE) || (active & KEY_OP_CONNECT))
|
|
EV_SET(&kev[i], ident, EVFILT_WRITE, EV_DELETE, 0, 0, (void *) key);
|
|
}
|
|
|
|
#ifdef TRACE_KQUEUE
|
|
printf (" set kevent %2d: ident:%u filter:%x flags:%o fflags:%o data:%p udata:%p\n",
|
|
i, (unsigned) kev[i].ident, kev[i].filter, kev[i].flags, kev[i].fflags,
|
|
(void *) kev[i].data, kev[i].udata);
|
|
#endif /* TRACE_KQUEUE */
|
|
#else
|
|
(void) nstate;
|
|
(void) i;
|
|
(void) fd;
|
|
(void) ops;
|
|
(void) key;
|
|
(void) active;
|
|
throw_not_supported (env);
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: kevent
|
|
* Signature: (ILjava/nio/ByteBuffer;IJ)I
|
|
*/
|
|
JNIEXPORT jint JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_kevent (JNIEnv *env,
|
|
jobject this __attribute__((unused)),
|
|
jint kq, jobject nstate, jint nevents,
|
|
jint maxevents, jlong timeout)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
struct timespec tv;
|
|
struct timespec *t = NULL;
|
|
struct kevent *kev = (struct kevent *) (*env)->GetDirectBufferAddress (env, nstate);
|
|
int ret;
|
|
|
|
#ifdef TRACE_KQUEUE
|
|
int i;
|
|
|
|
printf ("[%d] kevent nevents:%d maxevents:%d timeout:%lld\n", kq, nevents, maxevents, timeout);
|
|
printf ("[%d] addding/deleting %d events\n", kq, nevents);
|
|
for (i = 0; i < nevents; i++)
|
|
{
|
|
printf ("[%d] kevent input [%d]: ident:%u filter:%x flags:%o fflags:%o data:%p udata:%p\n",
|
|
kq, i, (unsigned) kev[i].ident, kev[i].filter, kev[i].flags, kev[i].fflags,
|
|
(void *) kev[i].data, kev[i].udata);
|
|
}
|
|
#endif
|
|
|
|
/* TRACE("events: %p; nevents: %d; timeout: %lld", (void *) kev, nevents, timeout); */
|
|
|
|
if (timeout != -1)
|
|
{
|
|
tv.tv_sec = timeout / 1000;
|
|
tv.tv_nsec = (timeout % 1000) * 1000;
|
|
t = &tv;
|
|
}
|
|
|
|
ret = kevent (kq, (const struct kevent *) kev, nevents, kev, maxevents, t);
|
|
|
|
if (ret == -1)
|
|
{
|
|
if (errno == EINTR)
|
|
ret = 0;
|
|
else
|
|
JCL_ThrowException (env, "java/io/IOException", strerror (errno));
|
|
}
|
|
|
|
#ifdef TRACE_KQUEUE
|
|
for (i = 0; i < ret; i++)
|
|
{
|
|
printf ("[%d] kevent output [%d]: ident:%u filter:%x flags:%o fflags:%o data:%p udata:%p\n",
|
|
kq, i, (unsigned) kev[i].ident, kev[i].filter, kev[i].flags, kev[i].fflags,
|
|
(void *) kev[i].data, kev[i].udata);
|
|
}
|
|
#endif
|
|
|
|
return ret;
|
|
#else
|
|
(void) kq;
|
|
(void) nstate;
|
|
(void) nevents;
|
|
(void) maxevents;
|
|
(void) timeout;
|
|
throw_not_supported (env);
|
|
return -1;
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: fetch_key
|
|
* Signature: (Ljava/nio/ByteBuffer;)I;
|
|
*/
|
|
JNIEXPORT jint JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_fetch_1key (JNIEnv *env,
|
|
jclass clazz __attribute__((unused)),
|
|
jobject nstate)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
struct kevent *kev = (struct kevent *) (*env)->GetDirectBufferAddress (env, nstate);
|
|
/* TRACE("return key %p\n", kev->udata); */
|
|
return (jint) kev->udata;
|
|
#else
|
|
(void) nstate;
|
|
throw_not_supported (env);
|
|
return -1;
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: ready_ops
|
|
* Signature: (Ljava/nio/ByteBuffer;I)I
|
|
*/
|
|
JNIEXPORT jint JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_ready_1ops (JNIEnv *env,
|
|
jclass clazz __attribute__((unused)),
|
|
jobject nstate, jint interest)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
struct kevent *kev = (struct kevent *) (*env)->GetDirectBufferAddress (env, nstate);
|
|
jint ready = 0;
|
|
|
|
if ((kev->flags & EV_ERROR) == EV_ERROR)
|
|
{
|
|
printf ("!!! error selecting fd %d: %s", (int) (kev->ident), strerror ((int) (kev->data)));
|
|
return 0;
|
|
}
|
|
|
|
/* We poll for READ for OP_READ and OP_ACCEPT. */
|
|
if (kev->filter == EVFILT_READ)
|
|
{
|
|
ready = (interest & KEY_OP_READ) | (interest & KEY_OP_ACCEPT);
|
|
/* TRACE("filter EVFILT_READ. Ready ops set to %x", ready); */
|
|
}
|
|
|
|
/* Poll for WRITE for OP_WRITE and OP_CONNECT; I guess we *should*
|
|
get a WRITE event if we are connected, but I don't know if we do
|
|
for real. FIXME */
|
|
if (kev->filter == EVFILT_WRITE)
|
|
{
|
|
ready = (interest & KEY_OP_WRITE) | (interest & KEY_OP_CONNECT);
|
|
/* TRACE("filter EVFILT_WRITE. Ready ops set to %x", ready); */
|
|
}
|
|
|
|
return ready;
|
|
#else
|
|
(void) nstate;
|
|
(void) interest;
|
|
throw_not_supported (env);
|
|
return -1;
|
|
#endif /* HAVE_KQUEUE && HAVE_KEVENT */
|
|
}
|
|
|
|
|
|
/*
|
|
* Class: gnu_java_nio_KqueueSelectorImpl
|
|
* Method: check_eof
|
|
* Signature: (Ljava/nio/ByteBuffer;)Z
|
|
*/
|
|
JNIEXPORT jboolean JNICALL
|
|
Java_gnu_java_nio_KqueueSelectorImpl_check_1eof (JNIEnv *env,
|
|
jclass clazz __attribute__((unused)),
|
|
jobject nstate)
|
|
{
|
|
#if defined(HAVE_KQUEUE) && defined(HAVE_KEVENT)
|
|
struct kevent *kev = (struct kevent *) (*env)->GetDirectBufferAddress (env, nstate);
|
|
if ((kev->flags & EV_EOF) == EV_EOF)
|
|
return JNI_TRUE;
|
|
return JNI_FALSE;
|
|
#else
|
|
(void) nstate;
|
|
throw_not_supported (env);
|
|
return JNI_FALSE;
|
|
#endif
|
|
}
|