#include <gegl.h>

#include <glib/gprintf.h>

#include <stdlib.h>

gint

main (gint    argc,

      gchar **argv)

{

  GeglBuffer *buffer; /* instantiate a graph */

  GeglNode   *gegl;   /* the gegl graph we're using as a node factor */

  GeglNode   *write_buffer,

             *shift,

             *load;

  gchar *in_file;

  gchar *buf_file;

  gdouble x;

  gdouble y;

  gegl_init (&argc, &argv);  /* initialize the GEGL library */

  if (argv[1]==NULL ||

      argv[2]==NULL ||

      argv[3]==NULL ||

      argv[4]==NULL)

    {

      g_print ("\nUsage: %s <gegl buffer> <image file> <x> <y>\n"

               "\nWrites an image into the GeglBuffer at the specified coordinates\n",

               argv[0]);

      return -1;

    }

  buf_file = argv[1];

  in_file = argv[2];

  x = atof (argv[3]);

  y = atof (argv[4]);

  buffer = gegl_buffer_open (buf_file);

  gegl = gegl_node_new ();

  write_buffer = gegl_node_new_child (gegl,

                                    "operation", "gegl:write-buffer",

                                    "buffer", buffer,

                                    NULL);

  shift      = gegl_node_new_child (gegl,

                                    "operation", "gegl:translate",

                                    "x", x,

                                    "y", y,

                                    NULL);

  load        = gegl_node_new_child (gegl,

                                   "operation", "gegl:load",

                                   "path", in_file,

                                   NULL);

  gegl_node_link_many (load, shift, write_buffer, NULL);

  gegl_node_process (write_buffer);

  /* free resources used by the graph and the nodes it owns */

  g_object_unref (gegl);

  g_object_unref (buffer);

  /* free resources globally used by GEGL */

  gegl_exit ();

  return 0;

}