//
// "$Id: Fl_Xlib_Image_Surface.cxx 11278 2016-03-03 19:16:22Z manolo $"
//
// Draw-to-image code for the Fast Light Tool Kit (FLTK).
//
// Copyright 1998-2016 by Bill Spitzak and others.
//
// This library is free software. Distribution and use rights are outlined in
// the file "COPYING" which should have been included with this file.  If this
// file is missing or damaged, see the license at:
//
//     http://www.fltk.org/COPYING.php
//
// Please report all bugs and problems on the following page:
//
//     http://www.fltk.org/str.php
//

#include <FL/fl_draw.H>

#include "../../config_lib.h"

#ifdef FL_CFG_GFX_XLIB
#include "Fl_Xlib_Graphics_Driver.H"
#include <FL/Fl_Image_Surface.H>
#include "Fl_Translated_Xlib_Graphics_Driver.H"

class Fl_Xlib_Image_Surface_Driver : public Fl_Image_Surface_Driver {
  friend class Fl_Image_Surface;
public:
  Fl_Surface_Device *previous;
  Window pre_window;
  int was_high;
  Fl_Xlib_Image_Surface_Driver(int w, int h, int high_res, Fl_Offscreen off);
  ~Fl_Xlib_Image_Surface_Driver();
  void set_current();
  void translate(int x, int y);
  void untranslate();
  Fl_RGB_Image *image();
  void end_current();
};

Fl_Image_Surface_Driver *Fl_Image_Surface_Driver::newImageSurfaceDriver(int w, int h, int high_res, Fl_Offscreen off)
{
  return new Fl_Xlib_Image_Surface_Driver(w, h, high_res, off);
}

Fl_Xlib_Image_Surface_Driver::Fl_Xlib_Image_Surface_Driver(int w, int h, int high_res, Fl_Offscreen off) : Fl_Image_Surface_Driver(w, h, high_res, off) {
  previous = 0;
  if (!off) {
    fl_open_display();
    offscreen = XCreatePixmap(fl_display, RootWindow(fl_display, fl_screen), w, h, fl_visual->depth);
  }
  driver(new Fl_Translated_Xlib_Graphics_Driver());
}

Fl_Xlib_Image_Surface_Driver::~Fl_Xlib_Image_Surface_Driver() {
  if (offscreen) XFreePixmap(fl_display, offscreen);
}

void Fl_Xlib_Image_Surface_Driver::set_current() {
  pre_window = fl_window;
  if (!previous) previous = Fl_Surface_Device::surface();
  fl_window = offscreen;
  Fl_Surface_Device::set_current();
  fl_push_no_clip();
}

void Fl_Xlib_Image_Surface_Driver::translate(int x, int y) {
  ((Fl_Translated_Xlib_Graphics_Driver*)driver())->translate_all(x, y);
}

void Fl_Xlib_Image_Surface_Driver::untranslate() {
  ((Fl_Translated_Xlib_Graphics_Driver*)driver())->untranslate_all();
}

Fl_RGB_Image* Fl_Xlib_Image_Surface_Driver::image()
{
  unsigned char *data = fl_read_image(NULL, 0, 0, width, height, 0);
  end_current();
  Fl_RGB_Image *image = new Fl_RGB_Image(data, width, height);
  image->alloc_array = 1;
  return image;
}

void Fl_Xlib_Image_Surface_Driver::end_current()
{
  fl_pop_clip();
  previous->Fl_Surface_Device::set_current();
  fl_window = pre_window;
}

#endif // FL_CFG_GFX_XLIB

//
// End of "$Id: Fl_Xlib_Image_Surface.cxx 11220 2016-02-26 12:51:47Z manolo $".
//