/* gtk - the gimp toolkit
 * copyright (c) 1995-1997 peter mattis, spencer kimball and josh macdonald
 *
 * this library is free software; you can redistribute it and/or
 * modify it under the terms of the gnu library general public
 * license as published by the free software foundation; either
 * version 2 of the license, or (at your option) any later version.
 *
 * this library 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
 * library general public license for more details.
 *
 * you should have received a copy of the gnu library general public
 * license along with this library; if not, write to the
 * free software foundation, inc., 59 temple place - suite 330,
 * boston, ma 02111-1307, usa.
 */
#include <stdlib.h>
#include <gtk/gtk.h>
/* backing pixmap for drawing area */
static gdkpixmap *pixmap = null;
/* create a new backing pixmap of the appropriate size */
static gint configure_event( gtkwidget         *widget,
                             gdkeventconfigure *event )
{
  if (pixmap)
    g_object_unref (pixmap);
  pixmap = gdk_pixmap_new (widget->window,
			   widget->allocation.width,
			   widget->allocation.height,
			   -1);
  gdk_draw_rectangle (pixmap,
		      widget->style->white_gc,
		      true,
		      0, 0,
		      widget->allocation.width,
		      widget->allocation.height);
  return true;
}
/* redraw the screen from the backing pixmap */
static gint expose_event( gtkwidget      *widget,
                          gdkeventexpose *event )
{
  gdk_draw_drawable (widget->window,
		     widget->style->fg_gc[gtk_widget_state (widget)],
		     pixmap,
		     event->area.x, event->area.y,
		     event->area.x, event->area.y,
		     event->area.width, event->area.height);
  return false;
}
/* draw a rectangle on the screen */
static void draw_brush( gtkwidget *widget,
                        gdouble    x,
                        gdouble    y)
{
  gdkrectangle update_rect;
  update_rect.x = x - 5;
  update_rect.y = y - 5;
  update_rect.width = 10;
  update_rect.height = 10;
  gdk_draw_rectangle (pixmap,
		      widget->style->black_gc,
		      true,
		      update_rect.x, update_rect.y,
		      update_rect.width, update_rect.height);
		      update_rect.x, update_rect.y,
		      update_rect.width, update_rect.height);
}
static gint button_press_event( gtkwidget      *widget,
                                gdkeventbutton *event )
{
  if (event->button == 1 && pixmap != null)
    draw_brush (widget, event->x, event->y);
  return true;
}
static gint motion_notify_event( gtkwidget *widget,
                                 gdkeventmotion *event )
{
  int x, y;
  gdkmodifiertype state;
  if (event->is_hint)
    gdk_window_get_pointer (event->window, &x, &y, &state);
  else
    {
      x = event->x;
      y = event->y;
      state = event->state;
    }
  if (state & gdk_button1_mask && pixmap != null)
    draw_brush (widget, x, y);
  return true;
}
void quit ()
{
  exit (0);
}
          char *argv[] )
{
  gtkwidget *window;
  gtkwidget *drawing_area;
  gtkwidget *vbox;
  gtkwidget *button;
  gtk_init (&argc, &argv);
  window = gtk_window_new (gtk_window_toplevel);
  gtk_widget_set_name (window, "test input");
  vbox = gtk_vbox_new (false, 0);
  gtk_container_add (gtk_container (window), vbox);
  gtk_widget_show (vbox);
  g_signal_connect (g_object (window), "destroy",
                    g_callback (quit), null);
  /* create the drawing area */
  drawing_area = gtk_drawing_area_new ();
  gtk_widget_set_size_request (gtk_widget (drawing_area), 200, 200);
  gtk_box_pack_start (gtk_box (vbox), drawing_area, true, true, 0);
  gtk_widget_show (drawing_area);
  /* signals used to handle backing pixmap */
  g_signal_connect (g_object (drawing_area), "expose_event",
		    g_callback (expose_event), null);
  g_signal_connect (g_object (drawing_area),"configure_event",
		    g_callback (configure_event), null);
  /* event signals */
  g_signal_connect (g_object (drawing_area), "motion_notify_event",
		    g_callback (motion_notify_event), null);
  g_signal_connect (g_object (drawing_area), "button_press_event",
		    g_callback (button_press_event), null);
  gtk_widget_set_events (drawing_area, gdk_exposure_mask
			 | gdk_leave_notify_mask
			 | gdk_button_press_mask
			 | gdk_pointer_motion_mask
			 | gdk_pointer_motion_hint_mask);
  /* .. and a quit button */
  button = gtk_button_new_with_label ("quit");
  gtk_box_pack_start (gtk_box (vbox), button, false, false, 0);
  g_signal_connect_swapped (g_object (button), "clicked",
			    g_callback (gtk_widget_destroy),
			    g_object (window));
  gtk_widget_show (button);
  gtk_widget_show (window);
  gtk_main ();
  return 0;
}

/* gtk - the gimp toolkit
 * copyright (c) 1995-1997 peter mattis, spencer kimball and josh macdonald
 *
 * this library is free software; you can redistribute it and/or
 * modify it under the terms of the gnu library general public
 * license as published by the free software foundation; either
 * version 2 of the license, or (at your option) any later version.
 *
 * this library 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
 * library general public license for more details.
 *
 * you should have received a copy of the gnu library general public
 * license along with this library; if not, write to the
 * free software foundation, inc., 59 temple place - suite 330,
 * boston, ma 02111-1307, usa.
 */
#include <gtk/gtk.h>
/* backing pixmap for drawing area */
static gdkpixmap *pixmap = null;
/* create a new backing pixmap of the appropriate size */
static gint
configure_event (gtkwidget *widget, gdkeventconfigure *event)
{
  if (pixmap)
     g_object_unref (pixmap);
  pixmap = gdk_pixmap_new (widget->window,
                           widget->allocation.width,
                           widget->allocation.height,
                           -1);
  gdk_draw_rectangle (pixmap,
                      widget->style->white_gc,
                      true,
                      0, 0,
                      widget->allocation.width,
                      widget->allocation.height);
  return true;
}
/* redraw the screen from the backing pixmap */
static gint
expose_event (gtkwidget *widget, gdkeventexpose *event)
{
  gdk_draw_drawable (widget->window,
                     widget->style->fg_gc[gtk_widget_state (widget)],
                     pixmap,
                     event->area.x, event->area.y,
                     event->area.x, event->area.y,
                     event->area.width, event->area.height);
  return false;
}
/* draw a rectangle on the screen, size depending on pressure,
   and color on the type of device */
static void
draw_brush (gtkwidget *widget, gdkinputsource source,
            gdouble x, gdouble y, gdouble pressure)
{
  gdkgc *gc;
  gdkrectangle update_rect;
  switch (source)
    {
    case gdk_source_mouse:
      gc = widget->style->dark_gc[gtk_widget_state (widget)];
      break;
    case gdk_source_pen:
      gc = widget->style->black_gc;
      break;
    case gdk_source_eraser:
      gc = widget->style->white_gc;
      break;
    default:
      gc = widget->style->light_gc[gtk_widget_state (widget)];
    }
  update_rect.x = x - 10 * pressure;
  update_rect.y = y - 10 * pressure;
  update_rect.width = 20 * pressure;
  update_rect.height = 20 * pressure;
  gdk_draw_rectangle (pixmap, gc, true,
                      update_rect.x, update_rect.y,
                      update_rect.width, update_rect.height);
                      update_rect.x, update_rect.y,
                      update_rect.width, update_rect.height);
}
static void
print_button_press (gdkdevice *device)
{
  g_print ("button press on device '%s'\n", device->name);
}
static gint
button_press_event (gtkwidget *widget, gdkeventbutton *event)
{
  print_button_press (event->device);
  if (event->button == 1 && pixmap != null) {
    gdouble pressure;
    gdk_event_get_axis ((gdkevent *)event, gdk_axis_pressure, &pressure);
    draw_brush (widget, event->device->source, event->x, event->y, pressure);
  }
  return true;
}
static gint
motion_notify_event (gtkwidget *widget, gdkeventmotion *event)
{
  gdouble x, y;
  gdouble pressure;
  gdkmodifiertype state;
    {
      gdk_device_get_state (event->device, event->window, null, &state);
      gdk_event_get_axis ((gdkevent *)event, gdk_axis_x, &x);
      gdk_event_get_axis ((gdkevent *)event, gdk_axis_y, &y);
      gdk_event_get_axis ((gdkevent *)event, gdk_axis_pressure, &pressure);
    }
  else
    {
      x = event->x;
      y = event->y;
      gdk_event_get_axis ((gdkevent *)event, gdk_axis_pressure, &pressure);
      state = event->state;
    }
  if (state & gdk_button1_mask && pixmap != null)
    draw_brush (widget, event->device->source, x, y, pressure);
  return true;
}
void
input_dialog_destroy (gtkwidget *w, gpointer data)
{
  *((gtkwidget **)data) = null;
}
void
create_input_dialog ()
{
  static gtkwidget *inputd = null;
  if (!inputd)
    {
      inputd = gtk_input_dialog_new();
      g_signal_connect (g_object (inputd), "destroy",
                        g_callback (input_dialog_destroy), (gpointer) &inputd);
      g_signal_connect_swapped (g_object (gtk_input_dialog (inputd)->close_button),
                                "clicked",
                                g_callback (gtk_widget_hide),
                                g_object (inputd));
      gtk_widget_hide (gtk_input_dialog (inputd)->save_button);
      gtk_widget_show (inputd);
    }
  else
    {
      if (!gtk_widget_mapped (inputd))
        gtk_widget_show (inputd);
      else
        gdk_window_raise (inputd->window);
    }
}
void
quit ()
{
  exit (0);
}
int
main (int argc, char *argv[])
{
  gtkwidget *window;
  gtkwidget *drawing_area;
  gtkwidget *vbox;
  gtkwidget *button;
  gtk_init (&argc, &argv);
  window = gtk_window_new (gtk_window_toplevel);
  gtk_widget_set_name (window, "test input");
  vbox = gtk_vbox_new (false, 0);
  gtk_container_add (gtk_container (window), vbox);
  gtk_widget_show (vbox);
  g_signal_connect (g_object (window), "destroy",
                    g_callback (quit), null);
  /* create the drawing area */
  drawing_area = gtk_drawing_area_new ();
  gtk_widget_set_size_request (gtk_widget (drawing_area), 200, 200);
  gtk_box_pack_start (gtk_box (vbox), drawing_area, true, true, 0);
  gtk_widget_show (drawing_area);
  /* signals used to handle backing pixmap */
  g_signal_connect (g_object (drawing_area), "expose_event",
                    g_callback (expose_event), null);
  g_signal_connect (g_object(drawing_area),"configure_event",
                    g_callback (configure_event), null);
  /* event signals */
  g_signal_connect (g_object (drawing_area), "motion_notify_event",
                    g_callback (motion_notify_event), null);
  g_signal_connect (g_object (drawing_area), "button_press_event",
                    g_callback (button_press_event), null);
  gtk_widget_set_events (drawing_area, gdk_exposure_mask
                         | gdk_leave_notify_mask
                         | gdk_button_press_mask
                         | gdk_pointer_motion_mask
                         | gdk_pointer_motion_hint_mask);
  /* the following call enables tracking and processing of extension
     events for the drawing area */
  gtk_widget_set_extension_events (drawing_area, gdk_extension_events_cursor);
  /* .. and some buttons */
  button = gtk_button_new_with_label ("input dialog");
  gtk_box_pack_start (gtk_box (vbox), button, false, false, 0);
  g_signal_connect (g_object (button), "clicked",
                    g_callback (create_input_dialog), null);
  gtk_widget_show (button);
  button = gtk_button_new_with_label ("quit");
  gtk_box_pack_start (gtk_box (vbox), button, false, false, 0);
  g_signal_connect_swapped (g_object (button), "clicked",
                            g_callback (gtk_widget_destroy),
                            g_object (window));
  gtk_widget_show (button);
  gtk_widget_show (window);
  gtk_main ();
  return 0;
}