Retro68/gcc/libjava/gnu/gcj/xlib/natXAnyEvent.cc
Wolfgang Thaller aaf905ce07 add gcc 4.70
2012-03-28 01:13:14 +02:00

154 lines
3.3 KiB
C++

/* Copyright (C) 2000 Free Software Foundation
This file is part of libgcj.
This software is copyrighted work licensed under the terms of the
Libgcj License. Please consult the file "LIBGCJ_LICENSE" for
details. */
#include <config.h>
#include <platform.h>
#include <gcj/javaprims.h>
#include <jvm.h>
#include <X11/Xlib.h>
#include <gcj/cni.h>
#include <gnu/gcj/RawData.h>
#include <java/lang/RuntimeException.h>
#include <java/lang/System.h>
#include <java/io/PrintStream.h>
#include <gnu/gcj/xlib/Display.h>
#include <gnu/gcj/xlib/Window.h>
#include <gnu/gcj/xlib/XAnyEvent.h>
#include <gnu/gcj/xlib/XExposeEvent.h>
#include <gnu/gcj/xlib/XException.h>
#include <unistd.h>
#include <posix.h>
void gnu::gcj::xlib::XAnyEvent::init()
{
::XEvent* event = new ::XEvent;
int *pipes = new int[2];
pipe(pipes);
structure = reinterpret_cast<gnu::gcj::RawData*>(event);
pipefds = reinterpret_cast<gnu::gcj::RawData*>(pipes);
}
void gnu::gcj::xlib::XAnyEvent::finalize()
{
delete structure;
int *pipe = reinterpret_cast<int *>(pipefds);
close(pipe[0]);
close(pipe[1]);
delete [] pipefds;
pipefds = 0;
structure = 0;
}
jboolean gnu::gcj::xlib::XAnyEvent::loadNext(jboolean block)
{
::Display* dpy = (::Display*) display->display;
::XEvent* evt = (::XEvent*) structure;
if (XPending(dpy))
{
XNextEvent(dpy, evt);
return true;
}
if (!block)
return false;
int *pipe = reinterpret_cast<int *>(pipefds);
int xfd = XConnectionNumber(dpy);
int pipefd = pipe[0];
int n = (xfd > pipefd ? xfd : pipefd) + 1;
fd_set rfds;
FD_ZERO(&rfds);
FD_SET(xfd, &rfds);
FD_SET(pipefd, &rfds);
int sel = _Jv_select (n, &rfds, NULL, NULL, NULL);
if (sel > 0)
{
if (FD_ISSET(xfd, &rfds))
{
XNextEvent(dpy, evt);
return true;
}
if (FD_ISSET(pipefd, &rfds))
{
char c;
read(pipefd, &c, 1);
}
}
return false;
}
void gnu::gcj::xlib::XAnyEvent::interrupt()
{
int *pipe = reinterpret_cast<int *>(pipefds);
write(pipe[1], "W", 1);
}
jint gnu::gcj::xlib::XAnyEvent::getType()
{
::XEvent* event = (::XEvent*) structure;
return event->type;
}
void gnu::gcj::xlib::XAnyEvent::setType(jint type)
{
::XEvent* event = (::XEvent*) structure;
event->type = type;
}
gnu::gcj::xlib::Window* gnu::gcj::xlib::XAnyEvent::getWindow()
{
::XEvent* event = (::XEvent*) structure;
return display->getWindow(event->xany.window);
}
void gnu::gcj::xlib::XAnyEvent::setWindow(gnu::gcj::xlib::Window* window)
{
::XEvent* event = (::XEvent*) structure;
event->xany.window = window->getXID();
}
jlong gnu::gcj::xlib::XAnyEvent::getSerial()
{
::XEvent* event = (::XEvent*) structure;
return event->xany.serial;
}
void gnu::gcj::xlib::XAnyEvent::send(gnu::gcj::xlib::Window* destination,
jboolean propagate, jlong mask)
{
::Display* dpy = (::Display*) display->display;
::XEvent* event = (::XEvent*) structure;
Status status =
XSendEvent(dpy, destination->getXID(), propagate ? True : False,
mask, event);
switch (status)
{
case 0:
throw new XException(JvNewStringLatin1("conversion to wire "
"protocol failed"));
case BadWindow:
case BadValue:
throw new XException(display, status);
default:
/* All other return values indicate success. Ie. (status ==
1) indicates success, not BadRequest. */
; // NOP
}
}