vpDisplayGTK.cpp

/****************************************************************************
 *
 * ViSP, open source Visual Servoing Platform software.
 * Copyright (C) 2005 - 2019 by Inria. All rights reserved.
 *
 * This software 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.
 * See the file LICENSE.txt at the root directory of this source
 * distribution for additional information about the GNU GPL.
 *
 * For using ViSP with software that can not be combined with the GNU
 * GPL, please contact Inria about acquiring a ViSP Professional
 * Edition License.
 *
 * See http://visp.inria.fr for more information.
 *
 * This software was developed at:
 * Inria Rennes - Bretagne Atlantique
 * Campus Universitaire de Beaulieu
 * 35042 Rennes Cedex
 * France
 *
 * If you have questions regarding the use of this file, please contact
 * Inria at visp@inria.fr
 *
 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 *
 * Description:
 * Image display.
 *
 * Authors:
 * Christophe Collewet
 * Eric Marchand
 * Fabien Spindler
 *
 *****************************************************************************/

#include <visp3/core/vpConfig.h>

#if (defined(VISP_HAVE_GTK))

#include <cmath> // std::fabs
#include <iostream>
#include <limits> // numeric_limits
#include <stdio.h>
#include <stdlib.h>

// Display stuff
#include <visp3/core/vpDisplay.h>
#include <visp3/gui/vpDisplayGTK.h>

// debug / exception
#include <visp3/core/vpDebug.h>
#include <visp3/core/vpDisplayException.h>
#include <visp3/core/vpImageConvert.h>
#include <visp3/core/vpImageTools.h>
#include <visp3/core/vpMath.h>

#ifndef DOXYGEN_SHOULD_SKIP_THIS

#include <gtk/gtk.h>
#include <gdk/gdk.h>
#include <gdk/gdkrgb.h>

class vpDisplayGTK::Impl
{
public:
  Impl()
    : m_widget(NULL), m_background(NULL), m_gc(NULL), m_blue(), m_red(), m_yellow(), m_green(), m_cyan(), m_orange(),
      m_white(), m_black(), m_gdkcolor(), m_lightBlue(), m_darkBlue(), m_lightRed(), m_darkRed(), m_lightGreen(), m_darkGreen(),
      m_purple(), m_lightGray(), m_gray(), m_darkGray(), m_colormap(NULL), m_font(NULL), m_vectgtk(NULL), m_col(NULL)
  {

  }

  ~Impl() {}

  void init(unsigned int win_width, unsigned int win_height, int win_x, int win_y, const std::string &title)
  {
    gint width = static_cast<gint>(win_width);
    gint height = static_cast<gint>(win_height);

    /* Initialisation of the gdk et gdk_rgb library */
    int *argc = NULL;
    char **argv;

    gtk_init(argc, &argv);

    /* Create the window*/
    m_widget = gtk_window_new(GTK_WINDOW_TOPLEVEL);

    gtk_widget_add_events(m_widget, GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK | GDK_POINTER_MOTION_MASK);

    gtk_window_set_default_size(GTK_WINDOW(m_widget), width, height);

    gtk_window_move(GTK_WINDOW(m_widget), win_x, win_y);

    gtk_widget_show(m_widget);

    gdk_rgb_init();

    /* Create background pixmap */
    m_background = gdk_pixmap_new(m_widget->window, width, height, -1);

    /* Create graphic context */
    m_gc = gdk_gc_new(m_widget->window);

    /* get the colormap  */
    m_colormap = gdk_window_get_colormap(m_widget->window);

    m_col = new GdkColor *[vpColor::id_unknown]; // id_unknown = number of predefined colors

    /* Create color */
    gdk_color_parse("light blue", &m_lightBlue);
    gdk_colormap_alloc_color(m_colormap, &m_lightBlue, FALSE, TRUE);
    m_col[vpColor::id_lightBlue] = &m_lightBlue;

    gdk_color_parse("blue", &m_blue);
    gdk_colormap_alloc_color(m_colormap, &m_blue, FALSE, TRUE);
    m_col[vpColor::id_blue] = &m_blue;

    gdk_color_parse("dark blue", &m_darkBlue);
    gdk_colormap_alloc_color(m_colormap, &m_darkBlue, FALSE, TRUE);
    m_col[vpColor::id_darkBlue] = &m_darkBlue;

    gdk_color_parse("#FF8C8C", &m_lightRed);
    gdk_colormap_alloc_color(m_colormap, &m_lightRed, FALSE, TRUE);
    m_col[vpColor::id_lightRed] = &m_lightRed;

    gdk_color_parse("red", &m_red);
    gdk_colormap_alloc_color(m_colormap, &m_red, FALSE, TRUE);
    m_col[vpColor::id_red] = &m_red;

    gdk_color_parse("dark red", &m_darkRed);
    gdk_colormap_alloc_color(m_colormap, &m_darkRed, FALSE, TRUE);
    m_col[vpColor::id_darkRed] = &m_darkRed;

    gdk_color_parse("light green", &m_lightGreen);
    gdk_colormap_alloc_color(m_colormap, &m_lightGreen, FALSE, TRUE);
    m_col[vpColor::id_lightGreen] = &m_lightGreen;

    gdk_color_parse("green", &m_green);
    gdk_colormap_alloc_color(m_colormap, &m_green, FALSE, TRUE);
    m_col[vpColor::id_green] = &m_green;

    gdk_color_parse("dark green", &m_darkGreen);
    gdk_colormap_alloc_color(m_colormap, &m_darkGreen, FALSE, TRUE);
    m_col[vpColor::id_darkGreen] = &m_darkGreen;

    gdk_color_parse("yellow", &m_yellow);
    gdk_colormap_alloc_color(m_colormap, &m_yellow, FALSE, TRUE);
    m_col[vpColor::id_yellow] = &m_yellow;

    gdk_color_parse("cyan", &m_cyan);
    gdk_colormap_alloc_color(m_colormap, &m_cyan, FALSE, TRUE);
    m_col[vpColor::id_cyan] = &m_cyan;

    gdk_color_parse("orange", &m_orange);
    gdk_colormap_alloc_color(m_colormap, &m_orange, FALSE, TRUE);
    m_col[vpColor::id_orange] = &m_orange;

    gdk_color_parse("purple", &m_purple);
    gdk_colormap_alloc_color(m_colormap, &m_purple, FALSE, TRUE);
    m_col[vpColor::id_purple] = &m_purple;

    gdk_color_parse("white", &m_white);
    gdk_colormap_alloc_color(m_colormap, &m_white, FALSE, TRUE);
    m_col[vpColor::id_white] = &m_white;

    gdk_color_parse("black", &m_black);
    gdk_colormap_alloc_color(m_colormap, &m_black, FALSE, TRUE);
    m_col[vpColor::id_black] = &m_black;

    gdk_color_parse("#C0C0C0", &m_lightGray);
    gdk_colormap_alloc_color(m_colormap, &m_lightGray, FALSE, TRUE);
    m_col[vpColor::id_lightGray] = &m_lightGray;

    gdk_color_parse("#808080", &m_gray);
    gdk_colormap_alloc_color(m_colormap, &m_gray, FALSE, TRUE);
    m_col[vpColor::id_gray] = &m_gray;

    gdk_color_parse("#404040", &m_darkGray);
    gdk_colormap_alloc_color(m_colormap, &m_darkGray, FALSE, TRUE);
    m_col[vpColor::id_darkGray] = &m_darkGray;

    // Try to load a default font
    m_font = gdk_font_load("-*-times-medium-r-normal-*-16-*-*-*-*-*-*-*");
    if (m_font == NULL)
      m_font = gdk_font_load("-*-courier-bold-r-normal-*-*-140-*-*-*-*-*-*");
    if (m_font == NULL)
      m_font = gdk_font_load("-*-courier 10 pitch-medium-r-normal-*-16-*-*-*-*-*-*-*");

    if (!title.empty())
      gdk_window_set_title(m_widget->window, title.c_str());
  }

  void setFont(const std::string &fontname)
  {
    m_font = gdk_font_load((const gchar *)fontname.c_str());
  }

  void setTitle(const std::string &title)
  {
    gdk_window_set_title(m_widget->window, title.c_str());
  }

  void setWindowPosition(int win_x, int win_y)
  {
    gtk_window_move(GTK_WINDOW(m_widget), win_x, win_y);
  }

  void displayImage(const vpImage<unsigned char> &I, unsigned int scale, gint width, gint height)
  {
    if (scale == 1) {
      /* Copie de l'image dans le pixmap fond */
      gdk_draw_gray_image(m_background, m_gc, 0, 0, width, height, GDK_RGB_DITHER_NONE, I.bitmap, width);
    } else {
      vpImage<unsigned char> sampled;
      I.subsample(scale, scale, sampled);
      gdk_draw_gray_image(m_background, m_gc, 0, 0, width, height, GDK_RGB_DITHER_NONE, sampled.bitmap, width);
    }

    /* Le pixmap background devient le fond de la zone de dessin */
    gdk_window_set_back_pixmap(m_widget->window, m_background, FALSE);
  }

  void displayImage(const vpImage<vpRGBa> &I, unsigned int scale, gint width, gint height)
  {
    if (scale == 1) {
      /* Copie de l'image dans le pixmap fond */
      gdk_draw_rgb_32_image(m_background, m_gc, 0, 0, width, height, GDK_RGB_DITHER_NONE, (unsigned char *)I.bitmap, 4 * width);
    } else {
      vpImage<vpRGBa> sampled;
      I.subsample(scale, scale, sampled);
      gdk_draw_rgb_32_image(m_background, m_gc, 0, 0, width, height, GDK_RGB_DITHER_NONE, (unsigned char *)sampled.bitmap, 4 * width);
    }

    /* Le pixmap background devient le fond de la zone de dessin */
    gdk_window_set_back_pixmap(m_widget->window, m_background, FALSE);
  }

  void displayImageROI(const vpImage<unsigned char> &I, gint j_min, gint i_min, gint width, gint height)
  {
    gdk_draw_gray_image(m_background, m_gc, j_min, i_min,
                        width, height, GDK_RGB_DITHER_NONE, I.bitmap, width);
    /* Le pixmap background devient le fond de la zone de dessin */
    gdk_window_set_back_pixmap(m_widget->window, m_background, FALSE);
  }

  void displayImageROI(const vpImage<vpRGBa> &I, gint j_min, gint i_min, gint width, gint height)
  {
    gdk_draw_rgb_32_image(m_background, m_gc, j_min, i_min, width, height, GDK_RGB_DITHER_NONE,
                          (unsigned char *)I.bitmap, width * 4);

    /* Le pixmap background devient le fond de la zone de dessin */
    gdk_window_set_back_pixmap(m_widget->window, m_background, FALSE);
  }

  void closeDisplay()
  {
    if (m_col != NULL) {
      delete[] m_col;
      m_col = NULL;
    }

    if (m_widget != NULL) {
      gdk_window_hide(m_widget->window);
      gdk_window_destroy(m_widget->window);
      gtk_widget_destroy(m_widget);
      m_widget = NULL;
    }
  }

  void flushDisplay()
  {
    gdk_window_clear(m_widget->window);
    gdk_flush();
  }

  void displayCharString(const vpImagePoint &ip, const char *text, const vpColor &color, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }
    if (m_font != NULL)
      gdk_draw_string(m_background, m_font, m_gc, vpMath::round(ip.get_u() / scale),
                      vpMath::round(ip.get_v() / scale), (const gchar *)text);
    else
      std::cout << "Cannot draw string: no font is selected" << std::endl;
  }

  void displayCircle(const vpImagePoint &center, unsigned int radius, const vpColor &color, bool fill,
                     unsigned int thickness, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }

    gdk_gc_set_line_attributes(m_gc, static_cast<gint>(thickness), GDK_LINE_SOLID, GDK_CAP_BUTT, GDK_JOIN_BEVEL);

    if (fill == false)
      gdk_draw_arc(m_background, m_gc, FALSE, vpMath::round((center.get_u() - radius) / scale),
                   vpMath::round((center.get_v() - radius) / scale), static_cast<gint>(2. * radius / scale),
                   static_cast<gint>(2. * radius / scale), 23040, 23040); /* 23040 = 360*64 */
    else
      gdk_draw_arc(m_background, m_gc, TRUE, vpMath::round((center.get_u() - radius) / scale),
                   vpMath::round((center.get_v() - radius) / scale), static_cast<gint>(2. * radius / scale),
                   static_cast<gint>(2. * radius / scale), 23040, 23040); /* 23040 = 360*64 */
  }

  void displayDotLine(const vpImagePoint &ip1, const vpImagePoint &ip2, const vpColor &color, unsigned int thickness, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }

    gdk_gc_set_line_attributes(m_gc, static_cast<gint>(thickness), GDK_LINE_ON_OFF_DASH, GDK_CAP_BUTT, GDK_JOIN_BEVEL);
    gdk_draw_line(m_background, m_gc, vpMath::round(ip1.get_u() / scale), vpMath::round(ip1.get_v() / scale),
                  vpMath::round(ip2.get_u() / scale), vpMath::round(ip2.get_v() / scale));
    gdk_gc_set_line_attributes(m_gc, 0, GDK_LINE_SOLID, GDK_CAP_BUTT, GDK_JOIN_BEVEL);
  }

  void displayLine(const vpImagePoint &ip1, const vpImagePoint &ip2, const vpColor &color, unsigned int thickness, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }

    gdk_gc_set_line_attributes(m_gc, static_cast<gint>(thickness), GDK_LINE_SOLID, GDK_CAP_BUTT, GDK_JOIN_BEVEL);
    gdk_draw_line(m_background, m_gc, vpMath::round(ip1.get_u() / scale), vpMath::round(ip1.get_v() / scale),
                  vpMath::round(ip2.get_u() / scale), vpMath::round(ip2.get_v() / scale));
  }

  void displayPoint(const vpImagePoint &ip, const vpColor &color, unsigned int thickness, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }

    if (thickness == 1) {
      gdk_draw_point(m_background, m_gc, vpMath::round(ip.get_u() / scale), vpMath::round(ip.get_v() / scale));
    } else {
      gdk_draw_rectangle(m_background, m_gc, TRUE, vpMath::round(ip.get_u() / scale),
                         vpMath::round(ip.get_v() / scale), static_cast<gint>(thickness), static_cast<gint>(thickness));
    }
  }

  void displayRectangle(const vpImagePoint &topLeft, unsigned int w, unsigned int h, const vpColor &color,
                        bool fill, unsigned int thickness, unsigned int scale)
  {
    if (color.id < vpColor::id_unknown)
      gdk_gc_set_foreground(m_gc, m_col[color.id]);
    else {
      m_gdkcolor.red = 256 * color.R;
      m_gdkcolor.green = 256 * color.G;
      m_gdkcolor.blue = 256 * color.B;
      gdk_colormap_alloc_color(m_colormap, &m_gdkcolor, FALSE, TRUE);
      gdk_gc_set_foreground(m_gc, &m_gdkcolor);
    }
    gdk_gc_set_line_attributes(m_gc, static_cast<gint>(thickness), GDK_LINE_SOLID, GDK_CAP_BUTT, GDK_JOIN_BEVEL);

    if (fill == false)
      gdk_draw_rectangle(m_background, m_gc, FALSE, vpMath::round(topLeft.get_u() / scale),
                         vpMath::round(topLeft.get_v() / scale), static_cast<gint>(w / scale), static_cast<gint>(h / scale));
    else
      gdk_draw_rectangle(m_background, m_gc, TRUE, vpMath::round(topLeft.get_u() / scale),
                         vpMath::round(topLeft.get_v() / scale), static_cast<gint>(w / scale), static_cast<gint>(h / scale));

    if (thickness > 1)
      gdk_gc_set_line_attributes(m_gc, 0, GDK_LINE_SOLID, GDK_CAP_BUTT, GDK_JOIN_BEVEL);
  }

  bool getClick(vpImagePoint &ip, vpMouseButton::vpMouseButtonType &button, bool blocking, unsigned int scale, const GdkEventType   &event_type)
  {
    bool ret = false;
    do {
      GdkEvent *ev = NULL;
      while ((ev = gdk_event_get())) {
        if (ev->any.window == m_widget->window && ev->type == event_type) {
          double u = ((GdkEventButton *)ev)->x;
          double v = ((GdkEventButton *)ev)->y;
          ip.set_u(u * scale);
          ip.set_v(v * scale);

          switch (static_cast<int>(((GdkEventButton *)ev)->button)) {
          case 1:
            button = vpMouseButton::button1;
            break;
          case 2:
            button = vpMouseButton::button2;
            break;
          case 3:
            button = vpMouseButton::button3;
            break;
          }
          ret = true;
        }
        gdk_event_free(ev);
      }
      if (blocking) {
        flushDisplay();
        vpTime::wait(100);
      }

    } while (ret == false && blocking == true);
    return ret;
  }

  void getImage(vpImage<vpRGBa> &I, gint width, gint height)
  {
    GdkImage *ImageGtk;
    ImageGtk = gdk_image_get(m_background, 0, 0, width, height);

    I.resize(height, width);
    guint32 pixel;

    guchar OctetRouge, OctetVert, OctetBleu, mask;
    mask = 0x000000FF;

    for (gint y = 0; y < height; y++) {
      for (gint x = 0; x < width; x++) {
        pixel = gdk_image_get_pixel(ImageGtk, x, y);
        OctetBleu = static_cast<guchar>(pixel) & mask;
        OctetVert = static_cast<guchar>(pixel >> 8) & mask;
        OctetRouge = static_cast<guchar>(pixel >> 16) & mask;
        I[y][x].R = OctetRouge;
        I[y][x].G = OctetVert;
        I[y][x].B = OctetBleu;
        I[y][x].A = vpRGBa::alpha_default; // default opacity
      }
    }
  }

  unsigned int getScreenDepth()
  {
    return static_cast<unsigned int>(gdk_window_get_visual(m_widget->window)->depth);
  }

  bool getKeyboardEvent(std::string &key, bool blocking)
  {
    bool ret = false;
    int cpt = 0;
    do {
      GdkEvent *ev = NULL;
      while ((ev = gdk_event_get()) != NULL) {
        cpt++;
        //  printf("event %d type %d on window %p My window %p\n",
        // cpt, ev->type, ev->any.window, widget->window);

        if (ev->any.window == m_widget->window && ev->type == GDK_KEY_PRESS) {
          // std::cout << "Key val: \"" << gdk_keyval_name (ev->key.keyval)
          // /*ev->key.string*/ << "\"" << std::endl;
          key = gdk_keyval_name(ev->key.keyval);
          ret = true;
          // printf("Key press detection\n");
        }
        gdk_event_free(ev);
      }
      if (blocking) {
        flushDisplay();
        vpTime::wait(100);
      }
    } while (ret == false && blocking == true);
    return ret;
  }

  bool getPointerMotionEvent(vpImagePoint &ip, unsigned int scale)
  {
    bool ret = false;
    GdkEvent *ev = NULL;
    if ((ev = gdk_event_get())) {
      if (ev->any.window == m_widget->window && ev->type == GDK_MOTION_NOTIFY) {
        double u = ((GdkEventMotion *)ev)->x;
        double v = ((GdkEventMotion *)ev)->y;
        ip.set_u(u * scale);
        ip.set_v(v * scale);

        ret = true;
      }
      gdk_event_free(ev);
    }
    return ret;
  }

  void getPointerPosition(vpImagePoint &ip, unsigned int scale)
  {
    gint u, v;
    gdk_window_get_pointer(m_widget->window, &u, &v, NULL);
    ip.set_u(static_cast<double>(u) * scale);
    ip.set_v(static_cast<double>(v) * scale);
  }

  void getScreenSize(bool is_init, unsigned int &w, unsigned int &h)
  {
    if (!is_init) {
      int *argc = NULL;
      char **argv;

      gtk_init(argc, &argv);

      GtkWidget *widget_ = gtk_window_new(GTK_WINDOW_TOPLEVEL);
      gtk_window_set_default_size(GTK_WINDOW(widget_), 100, 100);
      gtk_widget_show(widget_);

      GdkScreen *screen_ = gdk_window_get_screen(widget_->window);
      w = static_cast<unsigned int>(gdk_screen_get_width(screen_));
      h = static_cast<unsigned int>(gdk_screen_get_height(screen_));
      gtk_widget_destroy(widget_);
    } else {
      GdkScreen *screen_ = gdk_window_get_screen(m_widget->window);
      w = static_cast<unsigned int>(gdk_screen_get_width(screen_));
      h = static_cast<unsigned int>(gdk_screen_get_height(screen_));
    }
  }

private:
  GtkWidget *m_widget;
  GdkPixmap *m_background;
  GdkGC *m_gc;
  GdkColor m_blue, m_red, m_yellow, m_green, m_cyan, m_orange, m_white, m_black, m_gdkcolor;
  GdkColor m_lightBlue, m_darkBlue, m_lightRed, m_darkRed, m_lightGreen, m_darkGreen, m_purple;
  GdkColor m_lightGray, m_gray, m_darkGray;
  GdkColormap *m_colormap;

  GdkFont *m_font;
  guchar *m_vectgtk;
  GdkColor **m_col;
};

#endif // #ifndef DOXYGEN_SHOULD_SKIP_THIS

vpDisplayGTK::vpDisplayGTK(vpImage<unsigned char> &I, vpScaleType scaleType)
  : vpDisplay(), m_impl(new Impl())
{
  setScale(scaleType, I.getWidth(), I.getHeight());
  init(I);
}

vpDisplayGTK::vpDisplayGTK(vpImage<unsigned char> &I, int win_x, int win_y, const std::string &win_title, vpScaleType scaleType)
  : vpDisplay(), m_impl(new Impl())
{
  setScale(scaleType, I.getWidth(), I.getHeight());
  init(I, win_x, win_y, win_title);
}

vpDisplayGTK::vpDisplayGTK(vpImage<vpRGBa> &I, vpScaleType scaleType)
  : vpDisplay(), m_impl(new Impl())
{
  setScale(scaleType, I.getWidth(), I.getHeight());
  init(I);
}

vpDisplayGTK::vpDisplayGTK(vpImage<vpRGBa> &I, int win_x, int win_y, const std::string &win_title, vpScaleType scaleType)
  : vpDisplay(), m_impl(new Impl())
{
  setScale(scaleType, I.getWidth(), I.getHeight());
  init(I, win_x, win_y, win_title);
}

vpDisplayGTK::vpDisplayGTK(int win_x, int win_y, const std::string &win_title)
  : vpDisplay(), m_impl(new Impl())
{
  m_windowXPosition = win_x;
  m_windowYPosition = win_y;
  m_title = win_title;
}

vpDisplayGTK::vpDisplayGTK()
  : vpDisplay(), m_impl(new Impl())
{
}

vpDisplayGTK::~vpDisplayGTK()
{
  closeDisplay();
  delete m_impl;
}

void vpDisplayGTK::init(vpImage<unsigned char> &I, int win_x, int win_y, const std::string &win_title)
{
  if ((I.getHeight() == 0) || (I.getWidth() == 0)) {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "Image not initialized"));
  }

  if (win_x != -1)
    m_windowXPosition = win_x;
  if (win_y != -1)
    m_windowYPosition = win_y;

  if (!win_title.empty())
    m_title = win_title;

  setScale(m_scaleType, I.getWidth(), I.getHeight());
  init(I.getWidth(), I.getHeight(), m_windowXPosition, m_windowYPosition, m_title);

  I.display = this;
  m_displayHasBeenInitialized = true;
}

void vpDisplayGTK::init(vpImage<vpRGBa> &I, int win_x, int win_y, const std::string &win_title)
{
  if ((I.getHeight() == 0) || (I.getWidth() == 0)) {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "Image not initialized"));
  }

  if (win_x != -1)
    m_windowXPosition = win_x;
  if (win_y != -1)
    m_windowYPosition = win_y;

  if (!win_title.empty())
    m_title = win_title;

  setScale(m_scaleType, I.getWidth(), I.getHeight());
  init(I.getWidth(), I.getHeight(), m_windowXPosition, m_windowYPosition, m_title);

  I.display = this;
  m_displayHasBeenInitialized = true;
}

void vpDisplayGTK::init(unsigned int win_width, unsigned int win_height, int win_x, int win_y, const std::string &win_title)
{
  setScale(m_scaleType, win_width, win_height);

  m_width = win_width / m_scale;
  m_height = win_height / m_scale;

  if (win_x != -1)
    m_windowXPosition = win_x;
  if (win_y != -1)
    m_windowYPosition = win_y;

  m_title = win_title;

  m_impl->init(m_width, m_height, m_windowXPosition, m_windowYPosition, m_title);

  m_displayHasBeenInitialized = true;
}

void vpDisplayGTK::setFont(const std::string &fontname)
{
  m_impl->setFont(fontname);
}

void vpDisplayGTK::setTitle(const std::string &title)
{
  if (m_displayHasBeenInitialized) {
    m_title = title;
    if (!title.empty()) {
      m_impl->setTitle(title);
    }
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::setWindowPosition(int win_x, int win_y)
{
  if (m_displayHasBeenInitialized) {
    m_impl->setWindowPosition(win_x, win_y);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayImage(const vpImage<unsigned char> &I)
{
  if (m_displayHasBeenInitialized) {
    m_impl->displayImage(I, m_scale, static_cast<gint>(m_width), static_cast<gint>(m_height));
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayImageROI(const vpImage<unsigned char> &I, const vpImagePoint &iP, unsigned int w,
                                   unsigned int h)
{
  if (m_displayHasBeenInitialized) {
    vpImage<unsigned char> Itemp;
    vpImageTools::crop(I, iP.get_i(), iP.get_j(), h, w, Itemp, m_scale, m_scale);

    /* Copie de l'image dans le pixmap fond */
    int i_min = (std::max)(static_cast<int>(ceil(iP.get_i() / m_scale)), 0);
    int j_min = (std::max)(static_cast<int>(ceil(iP.get_j() / m_scale)), 0);

    m_impl->displayImageROI(Itemp, static_cast<gint>(j_min), static_cast<gint>(i_min),
                            static_cast<gint>(Itemp.getWidth()), static_cast<gint>(Itemp.getHeight()));
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayImage(const vpImage<vpRGBa> &I)
{
  if (m_displayHasBeenInitialized) {
    m_impl->displayImage(I, m_scale, static_cast<gint>(m_width), static_cast<gint>(m_height));
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayImageROI(const vpImage<vpRGBa> &I, const vpImagePoint &iP, unsigned int w,
                                   unsigned int h)
{
  if (m_displayHasBeenInitialized) {
    vpImage<vpRGBa> Itemp;
    vpImageTools::crop(I, iP.get_i(), iP.get_j(), h, w, Itemp, m_scale, m_scale);

    /* Copie de l'image dans le pixmap fond */
    int i_min = (std::max)(static_cast<int>(ceil(iP.get_i() / m_scale)), 0);
    int j_min = (std::max)(static_cast<int>(ceil(iP.get_j() / m_scale)), 0);

    m_impl->displayImageROI(Itemp, static_cast<gint>(j_min), static_cast<gint>(i_min),
                            static_cast<gint>(Itemp.getWidth()), static_cast<gint>(Itemp.getHeight()));
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayImage(const unsigned char * /* I */) { vpTRACE(" not implemented "); }

void vpDisplayGTK::closeDisplay()
{
  if (m_displayHasBeenInitialized) {
    m_impl->closeDisplay();

    m_displayHasBeenInitialized = false;
  }
}

void vpDisplayGTK::flushDisplay()
{
  if (m_displayHasBeenInitialized) {
    m_impl->flushDisplay();
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::flushDisplayROI(const vpImagePoint & /*iP*/, const unsigned int /*width*/,
                                   const unsigned int /*height*/)
{
  if (m_displayHasBeenInitialized) {
    m_impl->flushDisplay();
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::clearDisplay(const vpColor & /* color */) { vpTRACE("Not implemented"); }

void vpDisplayGTK::displayArrow(const vpImagePoint &ip1, const vpImagePoint &ip2, const vpColor &color, unsigned int w,
                                unsigned int h, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    double a = ip2.get_i() - ip1.get_i();
    double b = ip2.get_j() - ip1.get_j();
    double lg = sqrt(vpMath::sqr(a) + vpMath::sqr(b));

    if ((std::fabs(a) > std::numeric_limits<double>::epsilon()) &&
        (std::fabs(b) > std::numeric_limits<double>::epsilon())) {
      a /= lg;
      b /= lg;

      vpImagePoint ip3;
      ip3.set_i(ip2.get_i() - w * a);
      ip3.set_j(ip2.get_j() - w * b);

      vpImagePoint ip4;
      ip4.set_i(ip3.get_i() - b * h);
      ip4.set_j(ip3.get_j() + a * h);

      if (lg > 2 * vpImagePoint::distance(ip2, ip4))
        displayLine(ip2, ip4, color, thickness);

      ip4.set_i(ip3.get_i() + b * h);
      ip4.set_j(ip3.get_j() - a * h);

      if (lg > 2 * vpImagePoint::distance(ip2, ip4))
        displayLine(ip2, ip4, color, thickness);

      displayLine(ip1, ip2, color, thickness);
    }
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayCharString(const vpImagePoint &ip, const char *text, const vpColor &color)
{
  if (m_displayHasBeenInitialized) {
    m_impl->displayCharString(ip, text, color, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}
void vpDisplayGTK::displayCircle(const vpImagePoint &center, unsigned int radius, const vpColor &color, bool fill,
                                 unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    m_impl->displayCircle(center, radius, color, fill, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}
void vpDisplayGTK::displayCross(const vpImagePoint &ip, unsigned int size, const vpColor &color, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    double i = ip.get_i();
    double j = ip.get_j();
    vpImagePoint ip1, ip2;

    ip1.set_i(i - size / 2);
    ip1.set_j(j);
    ip2.set_i(i + size / 2);
    ip2.set_j(j);
    displayLine(ip1, ip2, color, thickness);

    ip1.set_i(i);
    ip1.set_j(j - size / 2);
    ip2.set_i(i);
    ip2.set_j(j + size / 2);

    displayLine(ip1, ip2, color, thickness);
  }

  else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}
void vpDisplayGTK::displayDotLine(const vpImagePoint &ip1, const vpImagePoint &ip2, const vpColor &color,
                                  unsigned int thickness)
{

  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    m_impl->displayDotLine(ip1, ip2, color, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayLine(const vpImagePoint &ip1, const vpImagePoint &ip2, const vpColor &color,
                               unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    m_impl->displayLine(ip1, ip2, color, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayPoint(const vpImagePoint &ip, const vpColor &color, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    m_impl->displayPoint(ip, color, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayRectangle(const vpImagePoint &topLeft, unsigned int w, unsigned int h, const vpColor &color,
                                    bool fill, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    m_impl->displayRectangle(topLeft, w, h, color, fill, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayRectangle(const vpImagePoint &topLeft, const vpImagePoint &bottomRight, const vpColor &color,
                                    bool fill, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    unsigned int w = static_cast<unsigned int>(vpMath::round(bottomRight.get_u() - topLeft.get_u()));
    unsigned int h = static_cast<unsigned int>(vpMath::round(bottomRight.get_v() - topLeft.get_v()));

    m_impl->displayRectangle(topLeft, w, h, color, fill, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

void vpDisplayGTK::displayRectangle(const vpRect &rectangle, const vpColor &color, bool fill, unsigned int thickness)
{
  if (m_displayHasBeenInitialized) {
    if (thickness == 1)
      thickness = 0;

    vpImagePoint topLeft = rectangle.getTopLeft();
    unsigned int w = static_cast<unsigned int>(vpMath::round(rectangle.getWidth()));
    unsigned int h = static_cast<unsigned int>(vpMath::round(rectangle.getRight()));
    m_impl->displayRectangle(topLeft, w, h, color, fill, thickness, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

bool vpDisplayGTK::getClick(bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    vpImagePoint ip;
    vpMouseButton::vpMouseButtonType button;
    ret = m_impl->getClick(ip, button, blocking, m_scale, GDK_BUTTON_PRESS);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getClick(vpImagePoint &ip, bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    vpMouseButton::vpMouseButtonType button;
    ret = m_impl->getClick(ip, button, blocking, m_scale, GDK_BUTTON_PRESS);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getClick(vpImagePoint &ip, vpMouseButton::vpMouseButtonType &button, bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    ret = m_impl->getClick(ip, button, blocking, m_scale, GDK_BUTTON_PRESS);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getClickUp(vpImagePoint &ip, vpMouseButton::vpMouseButtonType &button, bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    ret = m_impl->getClick(ip, button, blocking, m_scale, GDK_BUTTON_RELEASE);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

/*
  \brief gets the displayed image (including the overlay plane)
  and returns an RGBa image
*/
void vpDisplayGTK::getImage(vpImage<vpRGBa> &I)
{
  // should certainly be optimized.
  if (m_displayHasBeenInitialized) {
    m_impl->getImage(I, static_cast<gint>(m_width), static_cast<gint>(m_height));
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
}

unsigned int vpDisplayGTK::getScreenDepth()
{
  unsigned int depth = m_impl->getScreenDepth();

  return (depth);
}

bool vpDisplayGTK::getKeyboardEvent(bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    std::string key;
    ret = m_impl->getKeyboardEvent(key, blocking);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getKeyboardEvent(std::string &key, bool blocking)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    ret = m_impl->getKeyboardEvent(key, blocking);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getPointerMotionEvent(vpImagePoint &ip)
{
  bool ret = false;

  if (m_displayHasBeenInitialized) {
    ret = m_impl->getPointerMotionEvent(ip, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }
  return ret;
}

bool vpDisplayGTK::getPointerPosition(vpImagePoint &ip)
{
  if (m_displayHasBeenInitialized) {
    m_impl->getPointerPosition(ip, m_scale);
  } else {
    throw(vpDisplayException(vpDisplayException::notInitializedError, "GTK not initialized"));
  }

  return true;
}

void vpDisplayGTK::getScreenSize(unsigned int &w, unsigned int &h)
{
  w = h = 0;

  m_impl->getScreenSize(m_displayHasBeenInitialized, w, h);
}

unsigned int vpDisplayGTK::getScreenWidth()
{
  unsigned int width, height;
  getScreenSize(width, height);
  return width;
}

unsigned int vpDisplayGTK::getScreenHeight()
{
  unsigned int width, height;
  getScreenSize(width, height);
  return height;
}

#elif !defined(VISP_BUILD_SHARED_LIBS)
// Work arround to avoid warning: libvisp_core.a(vpDisplayGTK.cpp.o) has no
// symbols
void dummy_vpDisplayGTK(){};
#endif