[gegl-gtk/soc-2011-warp] add a probably temporary warping example to help debug the gimp warp tool, not working atm

[Michael Murà <mmure src gnome org>]

commit e864bdeb5950853282b706cb9a68fcb915a305cc
Author: Michael Murà <batolettre gmail com>
Date:   Thu Jul 21 18:02:10 2011 +0200

    add a probably temporary warping example to help debug the gimp warp tool, not working atm

 examples/.gitignore |    1 +
 examples/warp.c     |  202 +++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 203 insertions(+), 0 deletions(-)
---
diff --git a/examples/.gitignore b/examples/.gitignore
index 727dec4..bc9542a 100644
--- a/examples/.gitignore
+++ b/examples/.gitignore
@@ -1,2 +1,3 @@
 gegl-gtk-paint
 gegl-gtk-basic
+warp
diff --git a/examples/warp.c b/examples/warp.c
new file mode 100644
index 0000000..b83ad24
--- /dev/null
+++ b/examples/warp.c
@@ -0,0 +1,202 @@
+/* This file is part of GEGL-GTK
+ *
+ * This program 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, see <http://www.gnu.org/licenses/>.
+ *
+ * Copyright (C) 2011 Michael Murà <batolettre gmail com>
+ */
+
+#include <string.h>
+#include <glib.h>
+#include <gegl.h>
+#include <gtk/gtk.h>
+#include <gegl-gtk.h>
+
+/* Tool */
+static gdouble         cursor_x; /* Hold the cursor x position */
+static gdouble         cursor_y; /* Hold the cursor y position */
+
+static GeglBuffer     *coords_buffer; /* Gegl buffer where coordinates are stored */
+
+static GeglNode       *graph; /* Top level GeglNode. All others node are child of it */
+static GeglNode       *read_coords_buffer_node; /* Gegl node that read in the coords buffer */
+static GeglNode       *render_node; /* Gegl node to render the transformation */
+
+static GeglPath       *current_stroke;
+static guint           stroke_timer;
+
+#define STROKE_PERIOD 100
+
+/* Tool options */
+static gdouble          strength = 1;
+static gdouble          size = 40;
+static gdouble          hardness = 0.5;
+static GeglWarpBehavior behavior = GEGL_WARP_BEHAVIOR_MOVE;
+
+/* gegl-gtk stuff */
+GtkWidget               *window;
+GtkWidget               *view;
+GtkWidget               *eventbox;
+
+static GeglRectangle     rect   = {0, 0, 512, 512}; /* fixed size for the view/window */
+static GeglBuffer       *original_buffer = NULL; /* image to be warped */
+static GeglNode         *readbuf; /* node to read this image */
+
+static gboolean
+add_event_timer (gpointer data)
+{
+  gegl_path_append (current_stroke,
+                    'L', cursor_x, cursor_y);
+  return TRUE;
+}
+
+static void
+add_op ()
+{
+  GeglNode *new_op, *last_op;
+
+  new_op = gegl_node_new_child (graph,
+                                "operation", "gegl:warp",
+                                "behavior", behavior,
+                                "strength", strength,
+                                "size", size,
+                                "hardness", hardness,
+                                "stroke", current_stroke,
+                                NULL);
+
+  last_op = gegl_node_get_producer (render_node, "aux", NULL);
+
+  gegl_node_disconnect (render_node, "aux");
+
+  gegl_node_connect_to (last_op, "output", new_op, "input");
+  gegl_node_connect_to (new_op, "output", render_node, "aux");
+}
+
+static gboolean paint_press (GtkWidget      *widget,
+                             GdkEventButton *event)
+{
+  current_stroke = gegl_path_new ();
+  gegl_path_append (current_stroke,
+                    'M', event->x, event->y);
+
+  add_op ();
+
+  stroke_timer = g_timeout_add (STROKE_PERIOD, add_event_timer, NULL);
+  return TRUE;
+}
+
+
+static gboolean paint_motion (GtkWidget      *widget,
+                              GdkEventMotion *event)
+{
+  cursor_x = event->x;
+  cursor_y = event->y;
+
+  return FALSE;
+}
+
+
+static gboolean paint_release (GtkWidget      *widget,
+                               GdkEventButton *event)
+{
+  g_source_remove (stroke_timer);
+
+  gegl_dot_node_to_png_default(graph);
+  /* added this, not sure */
+  gegl_node_process (render_node);
+
+  return TRUE;
+}
+
+static void
+create_graph ()
+{
+  printf ("Initialize coordinate buffer (%d,%d) at %d,%d\n", rect.width, rect.height, rect.x, rect.y);
+  coords_buffer = gegl_buffer_new (&rect, babl_format_n (babl_type ("float"), 2));
+
+  graph = gegl_node_new ();
+
+  readbuf = gegl_node_new_child (graph,
+                                 "operation", "gegl:buffer-source",
+                                 "buffer",    original_buffer,
+                                 NULL);
+
+  read_coords_buffer_node = gegl_node_new_child (graph,
+                                                 "operation", "gegl:buffer-source",
+                                                 "buffer",    coords_buffer,
+                                                 NULL);
+
+  render_node = gegl_node_new_child (graph,
+                                     "operation", "gegl:map-relative",
+                                     NULL);
+
+
+  gegl_node_connect_to (readbuf, "output",
+                        render_node, "input");
+
+  gegl_node_connect_to (read_coords_buffer_node, "output",
+                        render_node, "aux");
+}
+
+gint
+main (gint    argc,
+      gchar **argv)
+{
+  g_thread_init (NULL);
+  gtk_init (&argc, &argv);
+  gegl_init (&argc, &argv);
+
+  window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
+  gtk_window_set_title (GTK_WINDOW (window), "Warp example");
+
+  if (argv[1] == NULL)
+    {
+      original_buffer = gegl_buffer_new (&rect, babl_format ("RGBA float"));
+    }
+  else
+    {
+      original_buffer = gegl_buffer_open (argv[1]);
+    }
+
+  create_graph ();
+
+  view = g_object_new (GEGL_GTK_TYPE_VIEW, "node", render_node, NULL);
+
+  eventbox = gtk_event_box_new ();
+
+  g_signal_connect (G_OBJECT (eventbox), "motion-notify-event",
+                    (GCallback) paint_motion, NULL);
+  g_signal_connect (G_OBJECT (eventbox), "button-press-event",
+                    (GCallback) paint_press, NULL);
+  g_signal_connect (G_OBJECT (eventbox), "button-release-event",
+                    (GCallback) paint_release, NULL);
+  gtk_widget_add_events (eventbox, GDK_BUTTON_RELEASE_MASK);
+
+  gtk_container_add (GTK_CONTAINER (eventbox), view);
+  gtk_container_add (GTK_CONTAINER (window), eventbox);
+  gtk_widget_set_size_request (view, 512, 512);
+
+  g_signal_connect (G_OBJECT (window), "delete-event",
+                    G_CALLBACK (gtk_main_quit), window);
+  gtk_widget_show_all (window);
+
+  gegl_dot_node_to_png_default(graph);
+
+  gtk_main ();
+  g_object_unref (graph);
+  gegl_buffer_destroy (original_buffer);
+  gegl_buffer_destroy (coords_buffer);
+
+  gegl_exit ();
+  return 0;
+}