Subversion Repositories openrisc

/* 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 <X11/Xlib.h>

#include <X11/Xutil.h>

#include <gcj/cni.h>

#include <gnu/gcj/RawData.h>

#include <java/lang/OutOfMemoryError.h>

#include <gnu/gcj/xlib/Display.h>

#include <gnu/gcj/xlib/Screen.h>

#include <gnu/gcj/xlib/Visual.h>

#include <gnu/gcj/xlib/XImage.h>

#include <java/lang/System.h>

#include <java/io/PrintStream.h>

void gnu::gcj::xlib::XImage::init(Visual* visual, jint depth,

                                  jint format, jint xoffset,

                                  jint width, jint height,

                                  jint bitmapPad, jint bytesPerLine,

                                  jint bitsPerPixel)

{

  ::Display* dpy = (::Display*) visual->display->display;

  ::Visual* vis = (::Visual*) visual->getVisualStructure();

  char* data = 0; // no preallocated data

  ::XImage* ximage = XCreateImage(dpy, vis, depth, format, xoffset,

                                  data,

                                  width, height,

                                  bitmapPad,

                                  bytesPerLine

                                  );

  if (ximage == 0)

    {

      jstring errorMessage = JvNewStringLatin1("XCreateImage failed");

      throw new ::java::lang::OutOfMemoryError(errorMessage);

    }

  bool reinitialize = false;

  if ((bitsPerPixel != 0) && (ximage->bits_per_pixel != bitsPerPixel))

    {

      ximage->bits_per_pixel = bitsPerPixel;

      reinitialize = true;

    }

  // FIXME: make autoconf test?

  jshort endianTestShort[] = { 1 };

  jbyte* endianTestByte = reinterpret_cast<jbyte*>(endianTestShort);

  jint byteOrder;

  if (endianTestByte[0] == 1)

    {

      // little endian machine

      byteOrder = LEAST_SIGNIFICANT_B_FIRST_ORDER;

    }

  else

    {

      // big endian machine

      byteOrder = MOST_SIGNIFICANT_B_FIRST_ORDER;

    }

  /* NB: This doesn't consider those weird machines out there with

     middle-endian byte order. */

  if (byteOrder != ximage->byte_order)

    {

      ximage->byte_order = byteOrder;

      reinitialize = true;

    }

  if (reinitialize)

    XInitImage(ximage);

  structure = reinterpret_cast<gnu::gcj::RawData*>(ximage);

  // Notice that no image data has been allocated at this point

}

void gnu::gcj::xlib::XImage::init(Visual* visual,

                                  jint width,

                                  jint height)

{

  int depth = visual->getDepth();

  int format = ZPixmap; // Chunky, not planar.

  int offset = 0;

  int bitmapPad = 32; // FIXME, don't hardcode this

  int bytesPerLine = 0; // Let the server figure it out

  init(visual, depth, format, offset, width, height, bitmapPad,

       bytesPerLine, 0);

}

void gnu::gcj::xlib::XImage::internalSetData(jbyteArray data, jint offset)

{

  ::XImage* ximage = (::XImage*) structure;

  ximage->data = reinterpret_cast<char*>(elements(data)+offset);

}

void gnu::gcj::xlib::XImage::internalSetData(jshortArray data, jint offset)

{

  ::XImage* ximage = (::XImage*) structure;

  ximage->data = reinterpret_cast<char*>(elements(data)+offset);

}

void gnu::gcj::xlib::XImage::internalSetData(jintArray data, jint offset)

{

  ::XImage* ximage = (::XImage*) structure;

  ximage->data = reinterpret_cast<char*>(elements(data)+offset);

}

void gnu::gcj::xlib::XImage::finalize()

{

  ::XImage* ximage = (::XImage*) structure;

  if (ownsData)

    delete ximage->data;

  ximage->data = 0; // Never allow XLib to free the data allocation.

  dataRef = 0;

  XDestroyImage(ximage);

}

jint gnu::gcj::xlib::XImage::getWidth()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->width;

}

jint gnu::gcj::xlib::XImage::getHeight()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->height;

}

jint gnu::gcj::xlib::XImage::getDepth()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->depth;

}

jint gnu::gcj::xlib::XImage::getFormat()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->format;

}

jint gnu::gcj::xlib::XImage::getXOffset()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->xoffset;

}

jint gnu::gcj::xlib::XImage::getImageByteOrder()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->byte_order;

}

jint gnu::gcj::xlib::XImage::getBitmapBitOrder()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->bitmap_bit_order;

}

jint gnu::gcj::xlib::XImage::getBitmapUnit()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->bitmap_unit;

}

jint gnu::gcj::xlib::XImage::getBitmapPad()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->bitmap_pad;

}

jint gnu::gcj::xlib::XImage::getBytesPerLine()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->bytes_per_line;

}

jint gnu::gcj::xlib::XImage::getBitsPerPixel()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->bits_per_pixel;

}

// True/Direct Color specific:

jint gnu::gcj::xlib::XImage::getRedMask()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->red_mask;

}

jint gnu::gcj::xlib::XImage::getGreenMask()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->green_mask;

}

jint gnu::gcj::xlib::XImage::getBlueMask()

{

  ::XImage* ximage = (::XImage*) structure;

  return ximage->blue_mask;

}

void gnu::gcj::xlib::XImage::setPixel(jint x, jint y, jint pixel)

{

  ::XImage* ximage = (::XImage*) structure;

  XPutPixel(ximage, x, y, pixel);

}