gimp/app/pdb/brush_cmds.c

/* The GIMP -- an image manipulation program
 * Copyright (C) 1995-2003 Spencer Kimball and Peter Mattis
 *
 * 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 2 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

/* NOTE: This file is autogenerated by pdbgen.pl. */

#include "config.h"

#include <string.h>

#include <glib-object.h>

#include "pdb-types.h"
#include "gimpprocedure.h"
#include "procedural_db.h"
#include "core/gimpparamspecs.h"

#include "base/temp-buf.h"
#include "core/gimp.h"
#include "core/gimpbrush.h"
#include "core/gimpbrushgenerated.h"
#include "core/gimpcontext.h"
#include "core/gimpdatafactory.h"
#include "core/gimplist.h"

static ProcRecord brush_new_proc;
static ProcRecord brush_duplicate_proc;
static ProcRecord brush_is_generated_proc;
static ProcRecord brush_rename_proc;
static ProcRecord brush_delete_proc;
static ProcRecord brush_is_editable_proc;
static ProcRecord brush_get_info_proc;
static ProcRecord brush_get_pixels_proc;
static ProcRecord brush_get_spacing_proc;
static ProcRecord brush_set_spacing_proc;
static ProcRecord brush_get_shape_proc;
static ProcRecord brush_get_radius_proc;
static ProcRecord brush_get_spikes_proc;
static ProcRecord brush_get_hardness_proc;
static ProcRecord brush_get_aspect_ratio_proc;
static ProcRecord brush_get_angle_proc;
static ProcRecord brush_set_shape_proc;
static ProcRecord brush_set_radius_proc;
static ProcRecord brush_set_spikes_proc;
static ProcRecord brush_set_hardness_proc;
static ProcRecord brush_set_aspect_ratio_proc;
static ProcRecord brush_set_angle_proc;

void
register_brush_procs (Gimp *gimp)
{
  ProcRecord *procedure;

  /*
   * brush_new
   */
  procedure = gimp_procedure_init (&brush_new_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The requested name of the new brush",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_STRING,
                                   gimp_param_spec_string ("actual-name",
                                                           "actual name",
                                                           "The actual new brush name",
                                                           FALSE, FALSE,
                                                           NULL,
                                                           GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_duplicate
   */
  procedure = gimp_procedure_init (&brush_duplicate_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_STRING,
                                   gimp_param_spec_string ("copy-name",
                                                           "copy name",
                                                           "The name of the brush's copy",
                                                           FALSE, FALSE,
                                                           NULL,
                                                           GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_is_generated
   */
  procedure = gimp_procedure_init (&brush_is_generated_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_boolean ("generated",
                                                         "generated",
                                                         "TRUE if the brush is generated",
                                                         FALSE,
                                                         GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_rename
   */
  procedure = gimp_procedure_init (&brush_rename_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("new-name",
                                                       "new name",
                                                       "The new name of the brush",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_STRING,
                                   gimp_param_spec_string ("actual-name",
                                                           "actual name",
                                                           "The actual new name of the brush",
                                                           FALSE, FALSE,
                                                           NULL,
                                                           GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_delete
   */
  procedure = gimp_procedure_init (&brush_delete_proc, 1, 0);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_is_editable
   */
  procedure = gimp_procedure_init (&brush_is_editable_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_boolean ("editable",
                                                         "editable",
                                                         "TRUE if the brush can be edited",
                                                         FALSE,
                                                         GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_info
   */
  procedure = gimp_procedure_init (&brush_get_info_proc, 1, 4);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("width",
                                                     "width",
                                                     "The brush width",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("height",
                                                     "height",
                                                     "The brush height",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("mask-bpp",
                                                     "mask bpp",
                                                     "The brush mask bpp",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("color-bpp",
                                                     "color bpp",
                                                     "The brush color bpp",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_pixels
   */
  procedure = gimp_procedure_init (&brush_get_pixels_proc, 1, 8);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("width",
                                                     "width",
                                                     "The brush width",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("height",
                                                     "height",
                                                     "The brush height",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("mask-bpp",
                                                     "mask bpp",
                                                     "The brush mask bpp",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("num-mask-bytes",
                                                     "num mask bytes",
                                                     "Length of brush mask data",
                                                     0, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT8ARRAY,
                                   g_param_spec_pointer ("mask-bytes",
                                                         "mask bytes",
                                                         "The brush mask data",
                                                         GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("color-bpp",
                                                     "color bpp",
                                                     "The brush color bpp",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("num-color-bytes",
                                                     "num color bytes",
                                                     "Length of brush color data",
                                                     0, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT8ARRAY,
                                   g_param_spec_pointer ("color-bytes",
                                                         "color bytes",
                                                         "The brush color data",
                                                         GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_spacing
   */
  procedure = gimp_procedure_init (&brush_get_spacing_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("spacing",
                                                     "spacing",
                                                     "The brush spacing (0 <= spacing <= 1000)",
                                                     0, 1000, 0,
                                                     GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_spacing
   */
  procedure = gimp_procedure_init (&brush_set_spacing_proc, 2, 0);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_INT32,
                               g_param_spec_int ("spacing",
                                                 "spacing",
                                                 "The brush spacing (0 <= spacing <= 1000)",
                                                 0, 1000, 0,
                                                 GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_shape
   */
  procedure = gimp_procedure_init (&brush_get_shape_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_enum ("shape",
                                                      "shape",
                                                      "The brush shape: { GIMP_BRUSH_GENERATED_CIRCLE (0), GIMP_BRUSH_GENERATED_SQUARE (1), GIMP_BRUSH_GENERATED_DIAMOND (2) }",
                                                      GIMP_TYPE_BRUSH_GENERATED_SHAPE,
                                                      GIMP_BRUSH_GENERATED_CIRCLE,
                                                      GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_radius
   */
  procedure = gimp_procedure_init (&brush_get_radius_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("radius",
                                                        "radius",
                                                        "The radius of the brush in pixels",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_spikes
   */
  procedure = gimp_procedure_init (&brush_get_spikes_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("spikes",
                                                     "spikes",
                                                     "The number of spikes on the brush.",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_hardness
   */
  procedure = gimp_procedure_init (&brush_get_hardness_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("hardness",
                                                        "hardness",
                                                        "The hardness of the brush.",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_aspect_ratio
   */
  procedure = gimp_procedure_init (&brush_get_aspect_ratio_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("aspect-ratio",
                                                        "aspect ratio",
                                                        "The aspect ratio of the brush.",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_get_angle
   */
  procedure = gimp_procedure_init (&brush_get_angle_proc, 1, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("angle",
                                                        "angle",
                                                        "The rotation angle of the brush.",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_shape
   */
  procedure = gimp_procedure_init (&brush_set_shape_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_INT32,
                               g_param_spec_enum ("shape-in",
                                                  "shape in",
                                                  "The brush shape: { GIMP_BRUSH_GENERATED_CIRCLE (0), GIMP_BRUSH_GENERATED_SQUARE (1), GIMP_BRUSH_GENERATED_DIAMOND (2) }",
                                                  GIMP_TYPE_BRUSH_GENERATED_SHAPE,
                                                  GIMP_BRUSH_GENERATED_CIRCLE,
                                                  GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_enum ("shape-out",
                                                      "shape out",
                                                      "The brush shape actually assigned: { GIMP_BRUSH_GENERATED_CIRCLE (0), GIMP_BRUSH_GENERATED_SQUARE (1), GIMP_BRUSH_GENERATED_DIAMOND (2) }",
                                                      GIMP_TYPE_BRUSH_GENERATED_SHAPE,
                                                      GIMP_BRUSH_GENERATED_CIRCLE,
                                                      GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_radius
   */
  procedure = gimp_procedure_init (&brush_set_radius_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_FLOAT,
                               g_param_spec_double ("radius-in",
                                                    "radius in",
                                                    "The desired brush radius",
                                                    -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                    GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("radius-out",
                                                        "radius out",
                                                        "The brush radius actually assigned",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_spikes
   */
  procedure = gimp_procedure_init (&brush_set_spikes_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_INT32,
                               g_param_spec_int ("spikes-in",
                                                 "spikes in",
                                                 "The desired number of spikes",
                                                 G_MININT32, G_MAXINT32, 0,
                                                 GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_INT32,
                                   g_param_spec_int ("spikes-out",
                                                     "spikes out",
                                                     "The number of spikes actually assigned",
                                                     G_MININT32, G_MAXINT32, 0,
                                                     GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_hardness
   */
  procedure = gimp_procedure_init (&brush_set_hardness_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_FLOAT,
                               g_param_spec_double ("hardness-in",
                                                    "hardness in",
                                                    "The desired brush hardness",
                                                    -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                    GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("hardness-out",
                                                        "hardness out",
                                                        "The brush hardness actually assigned",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_aspect_ratio
   */
  procedure = gimp_procedure_init (&brush_set_aspect_ratio_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_FLOAT,
                               g_param_spec_double ("aspect-ratio-in",
                                                    "aspect ratio in",
                                                    "The desired brush aspect ratio",
                                                    -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                    GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("aspect-ratio-out",
                                                        "aspect ratio out",
                                                        "The brush aspect ratio actually assigned",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

  /*
   * brush_set_angle
   */
  procedure = gimp_procedure_init (&brush_set_angle_proc, 2, 1);
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_STRING,
                               gimp_param_spec_string ("name",
                                                       "name",
                                                       "The brush name",
                                                       FALSE, FALSE,
                                                       NULL,
                                                       GIMP_PARAM_READWRITE));
  gimp_procedure_add_argument (procedure,
                               GIMP_PDB_FLOAT,
                               g_param_spec_double ("angle-in",
                                                    "angle in",
                                                    "The desired brush rotation angle",
                                                    -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                    GIMP_PARAM_READWRITE));
  gimp_procedure_add_return_value (procedure,
                                   GIMP_PDB_FLOAT,
                                   g_param_spec_double ("angle-out",
                                                        "angle out",
                                                        "The brush rotation angle actually assigned",
                                                        -G_MAXDOUBLE, G_MAXDOUBLE, 0,
                                                        GIMP_PARAM_READWRITE));
  procedural_db_register (gimp, procedure);

}

static Argument *
brush_new_invoker (ProcRecord   *proc_record,
                   Gimp         *gimp,
                   GimpContext  *context,
                   GimpProgress *progress,
                   Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gchar *actual_name = NULL;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      if (strlen (name))
        {
          GimpData *data = gimp_data_factory_data_new (gimp->brush_factory, name);

          if (data)
            actual_name = g_strdup (gimp_object_get_name (GIMP_OBJECT (data)));
          else
            success = FALSE;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_take_string (&return_vals[1].value, actual_name);

  return return_vals;
}

static ProcRecord brush_new_proc =
{
  "gimp-brush-new",
  "gimp-brush-new",
  "Creates a new brush",
  "This procedure creates a new, uninitialized brush",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_new_invoker } }
};

static Argument *
brush_duplicate_invoker (ProcRecord   *proc_record,
                         Gimp         *gimp,
                         GimpContext  *context,
                         GimpProgress *progress,
                         Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gchar *copy_name = NULL;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        {
          GimpBrush *brush_copy = (GimpBrush *)
            gimp_data_factory_data_duplicate (gimp->brush_factory,
                                              GIMP_DATA (brush));

          if (brush_copy)
            copy_name = g_strdup (gimp_object_get_name (GIMP_OBJECT (brush_copy)));
          else
            success = FALSE;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_take_string (&return_vals[1].value, copy_name);

  return return_vals;
}

static ProcRecord brush_duplicate_proc =
{
  "gimp-brush-duplicate",
  "gimp-brush-duplicate",
  "Duplicates a brush",
  "This procedure creates an identical brush by a different name",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_duplicate_invoker } }
};

static Argument *
brush_is_generated_invoker (ProcRecord   *proc_record,
                            Gimp         *gimp,
                            GimpContext  *context,
                            GimpProgress *progress,
                            Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gboolean generated = FALSE;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        generated = GIMP_IS_BRUSH_GENERATED (brush);
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_boolean (&return_vals[1].value, generated);

  return return_vals;
}

static ProcRecord brush_is_generated_proc =
{
  "gimp-brush-is-generated",
  "gimp-brush-is-generated",
  "Tests if brush is generated",
  "Returns TRUE if this brush is parametric, FALSE for other types",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_is_generated_invoker } }
};

static Argument *
brush_rename_invoker (ProcRecord   *proc_record,
                      Gimp         *gimp,
                      GimpContext  *context,
                      GimpProgress *progress,
                      Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gchar *new_name;
  gchar *actual_name = NULL;

  name = (gchar *) g_value_get_string (&args[0].value);
  new_name = (gchar *) g_value_get_string (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush && GIMP_DATA (brush)->writable)
        {
          gimp_object_set_name (GIMP_OBJECT (brush), new_name);
          actual_name = g_strdup (gimp_object_get_name (GIMP_OBJECT (brush)));
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_take_string (&return_vals[1].value, actual_name);

  return return_vals;
}

static ProcRecord brush_rename_proc =
{
  "gimp-brush-rename",
  "gimp-brush-rename",
  "Rename a brush",
  "This procedure renames a brush",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_rename_invoker } }
};

static Argument *
brush_delete_invoker (ProcRecord   *proc_record,
                      Gimp         *gimp,
                      GimpContext  *context,
                      GimpProgress *progress,
                      Argument     *args)
{
  gboolean success = TRUE;
  gchar *name;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush && GIMP_DATA (brush)->deletable)
        {
          GError *error = NULL;

          success = gimp_data_factory_data_delete (gimp->brush_factory,
                                                   GIMP_DATA (brush),
                                                   TRUE, &error);

          if (! success)
            {
              g_message (error->message);
              g_clear_error (&error);
            }
        }
      else
        success = FALSE;
    }

  return gimp_procedure_get_return_values (proc_record, success);
}

static ProcRecord brush_delete_proc =
{
  "gimp-brush-delete",
  "gimp-brush-delete",
  "Deletes a brush",
  "This procedure deletes a brush",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_delete_invoker } }
};

static Argument *
brush_is_editable_invoker (ProcRecord   *proc_record,
                           Gimp         *gimp,
                           GimpContext  *context,
                           GimpProgress *progress,
                           Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gboolean editable = FALSE;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        editable = GIMP_DATA (brush)->writable;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_boolean (&return_vals[1].value, editable);

  return return_vals;
}

static ProcRecord brush_is_editable_proc =
{
  "gimp-brush-is-editable",
  "gimp-brush-is-editable",
  "Tests if brush can be edited",
  "Returns TRUE if you have permission to change the brush",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_is_editable_invoker } }
};

static Argument *
brush_get_info_invoker (ProcRecord   *proc_record,
                        Gimp         *gimp,
                        GimpContext  *context,
                        GimpProgress *progress,
                        Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 width = 0;
  gint32 height = 0;
  gint32 mask_bpp = 0;
  gint32 color_bpp = 0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        {
          width     = brush->mask->width;
          height    = brush->mask->height;
          mask_bpp  = brush->mask->bytes;
          color_bpp = brush->pixmap ? brush->pixmap->bytes : 0;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    {
      g_value_set_int (&return_vals[1].value, width);
      g_value_set_int (&return_vals[2].value, height);
      g_value_set_int (&return_vals[3].value, mask_bpp);
      g_value_set_int (&return_vals[4].value, color_bpp);
    }

  return return_vals;
}

static ProcRecord brush_get_info_proc =
{
  "gimp-brush-get-info",
  "gimp-brush-get-info",
  "Retrieve information about the specified brush.",
  "This procedure retrieves information about the specified brush. This includes the brush name, and the brush extents (width and height).",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_info_invoker } }
};

static Argument *
brush_get_pixels_invoker (ProcRecord   *proc_record,
                          Gimp         *gimp,
                          GimpContext  *context,
                          GimpProgress *progress,
                          Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 width = 0;
  gint32 height = 0;
  gint32 mask_bpp = 0;
  gint32 num_mask_bytes = 0;
  guint8 *mask_bytes = NULL;
  gint32 color_bpp = 0;
  gint32 num_color_bytes = 0;
  guint8 *color_bytes = NULL;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        {
          width          = brush->mask->width;
          height         = brush->mask->height;
          mask_bpp       = brush->mask->bytes;
          num_mask_bytes = brush->mask->height * brush->mask->width;
          mask_bytes     = g_memdup (temp_buf_data (brush->mask), num_mask_bytes);

          if (brush->pixmap)
            {
              color_bpp       = brush->pixmap->bytes;
              num_color_bytes = brush->pixmap->height * brush->pixmap->width;
              color_bytes     = g_memdup (temp_buf_data (brush->pixmap),
                                          num_color_bytes);
            }
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    {
      g_value_set_int (&return_vals[1].value, width);
      g_value_set_int (&return_vals[2].value, height);
      g_value_set_int (&return_vals[3].value, mask_bpp);
      g_value_set_int (&return_vals[4].value, num_mask_bytes);
      g_value_set_pointer (&return_vals[5].value, mask_bytes);
      g_value_set_int (&return_vals[6].value, color_bpp);
      g_value_set_int (&return_vals[7].value, num_color_bytes);
      g_value_set_pointer (&return_vals[8].value, color_bytes);
    }

  return return_vals;
}

static ProcRecord brush_get_pixels_proc =
{
  "gimp-brush-get-pixels",
  "gimp-brush-get-pixels",
  "Retrieve information about the specified brush.",
  "This procedure retrieves information about the specified brush. This includes the brush extents (width and height) and its pixels data.",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_pixels_invoker } }
};

static Argument *
brush_get_spacing_invoker (ProcRecord   *proc_record,
                           Gimp         *gimp,
                           GimpContext  *context,
                           GimpProgress *progress,
                           Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 spacing = 0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        spacing = gimp_brush_get_spacing (brush);
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_int (&return_vals[1].value, spacing);

  return return_vals;
}

static ProcRecord brush_get_spacing_proc =
{
  "gimp-brush-get-spacing",
  "gimp-brush-get-spacing",
  "Get the brush spacing.",
  "This procedure returns the spacing setting for the specified brush. The return value is an integer between 0 and 1000 which represents percentage of the maximum of the width and height of the mask.",
  "Michael Natterer <mitch@gimp.org>",
  "Michael Natterer",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_spacing_invoker } }
};

static Argument *
brush_set_spacing_invoker (ProcRecord   *proc_record,
                           Gimp         *gimp,
                           GimpContext  *context,
                           GimpProgress *progress,
                           Argument     *args)
{
  gboolean success = TRUE;
  gchar *name;
  gint32 spacing;

  name = (gchar *) g_value_get_string (&args[0].value);
  spacing = g_value_get_int (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (brush)
        gimp_brush_set_spacing (brush, spacing);
      else
        success = FALSE;
    }

  return gimp_procedure_get_return_values (proc_record, success);
}

static ProcRecord brush_set_spacing_proc =
{
  "gimp-brush-set-spacing",
  "gimp-brush-set-spacing",
  "Set the brush spacing.",
  "This procedure modifies the spacing setting for the specified brush. The value should be a integer between 0 and 1000.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_spacing_invoker } }
};

static Argument *
brush_get_shape_invoker (ProcRecord   *proc_record,
                         Gimp         *gimp,
                         GimpContext  *context,
                         GimpProgress *progress,
                         Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 shape = 0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        shape = GIMP_BRUSH_GENERATED (brush)->shape;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_enum (&return_vals[1].value, shape);

  return return_vals;
}

static ProcRecord brush_get_shape_proc =
{
  "gimp-brush-get-shape",
  "gimp-brush-get-shape",
  "Get the shape of a generated brush.",
  "This procedure gets the shape value for a generated brush. If called for any other type of brush, it does not succeed. The current possibilities are Circle (GIMP_BRUSH_GENERATED_CIRCLE), Square (GIMP_BRUSH_GENERATED_SQUARE), and Diamond (GIMP_BRUSH_GENERATED_DIAMOND). Other shapes are likely to be added in the future.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_shape_invoker } }
};

static Argument *
brush_get_radius_invoker (ProcRecord   *proc_record,
                          Gimp         *gimp,
                          GimpContext  *context,
                          GimpProgress *progress,
                          Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble radius = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        radius = GIMP_BRUSH_GENERATED (brush)->radius;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, radius);

  return return_vals;
}

static ProcRecord brush_get_radius_proc =
{
  "gimp-brush-get-radius",
  "gimp-brush-get-radius",
  "Get the radius of a generated brush.",
  "This procedure gets the radius value for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_radius_invoker } }
};

static Argument *
brush_get_spikes_invoker (ProcRecord   *proc_record,
                          Gimp         *gimp,
                          GimpContext  *context,
                          GimpProgress *progress,
                          Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 spikes = 0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        spikes = GIMP_BRUSH_GENERATED (brush)->spikes;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_int (&return_vals[1].value, spikes);

  return return_vals;
}

static ProcRecord brush_get_spikes_proc =
{
  "gimp-brush-get-spikes",
  "gimp-brush-get-spikes",
  "Get the number of spikes for a generated brush.",
  "This procedure gets the number of spikes for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_spikes_invoker } }
};

static Argument *
brush_get_hardness_invoker (ProcRecord   *proc_record,
                            Gimp         *gimp,
                            GimpContext  *context,
                            GimpProgress *progress,
                            Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble hardness = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        hardness = GIMP_BRUSH_GENERATED (brush)->hardness;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, hardness);

  return return_vals;
}

static ProcRecord brush_get_hardness_proc =
{
  "gimp-brush-get-hardness",
  "gimp-brush-get-hardness",
  "Get the hardness of a generated brush.",
  "This procedure gets the hardness of a generated brush. The hardness of a brush is the amount its intensity fades at the outside edge. If called for any other type of brush, the function does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_hardness_invoker } }
};

static Argument *
brush_get_aspect_ratio_invoker (ProcRecord   *proc_record,
                                Gimp         *gimp,
                                GimpContext  *context,
                                GimpProgress *progress,
                                Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble aspect_ratio = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        aspect_ratio = GIMP_BRUSH_GENERATED (brush)->aspect_ratio;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, aspect_ratio);

  return return_vals;
}

static ProcRecord brush_get_aspect_ratio_proc =
{
  "gimp-brush-get-aspect-ratio",
  "gimp-brush-get-aspect-ratio",
  "Get the aspect ratio of a generated brush.",
  "This procedure gets the aspect ratio of a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_aspect_ratio_invoker } }
};

static Argument *
brush_get_angle_invoker (ProcRecord   *proc_record,
                         Gimp         *gimp,
                         GimpContext  *context,
                         GimpProgress *progress,
                         Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble angle = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush))
        angle = GIMP_BRUSH_GENERATED (brush)->angle;
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, angle);

  return return_vals;
}

static ProcRecord brush_get_angle_proc =
{
  "gimp-brush-get-angle",
  "gimp-brush-get-angle",
  "Get the rotation angle of a generated brush.",
  "This procedure gets the angle of rotation for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_get_angle_invoker } }
};

static Argument *
brush_set_shape_invoker (ProcRecord   *proc_record,
                         Gimp         *gimp,
                         GimpContext  *context,
                         GimpProgress *progress,
                         Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 shape_in;
  gint32 shape_out = 0;

  name = (gchar *) g_value_get_string (&args[0].value);
  shape_in = g_value_get_enum (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_shape (GIMP_BRUSH_GENERATED (brush),
                                          shape_in);
          shape_out = GIMP_BRUSH_GENERATED (brush)->shape;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_enum (&return_vals[1].value, shape_out);

  return return_vals;
}

static ProcRecord brush_set_shape_proc =
{
  "gimp-brush-set-shape",
  "gimp-brush-set-shape",
  "Set the shape of a generated brush.",
  "This procedure sets the shape value for a generated brush. If called for any other type of brush, it does not succeed. The current possibilities are Circle (GIMP_BRUSH_GENERATED_CIRCLE), Square (GIMP_BRUSH_GENERATED_SQUARE), and Diamond (GIMP_BRUSH_GENERATED_DIAMOND). Other shapes are likely to be added in the future.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_shape_invoker } }
};

static Argument *
brush_set_radius_invoker (ProcRecord   *proc_record,
                          Gimp         *gimp,
                          GimpContext  *context,
                          GimpProgress *progress,
                          Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble radius_in;
  gdouble radius_out = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);
  radius_in = g_value_get_double (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_radius (GIMP_BRUSH_GENERATED (brush),
                                           radius_in);
          radius_out = GIMP_BRUSH_GENERATED (brush)->radius;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, radius_out);

  return return_vals;
}

static ProcRecord brush_set_radius_proc =
{
  "gimp-brush-set-radius",
  "gimp-brush-set-radius",
  "Set the radius of a generated brush.",
  "This procedure sets the radius for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_radius_invoker } }
};

static Argument *
brush_set_spikes_invoker (ProcRecord   *proc_record,
                          Gimp         *gimp,
                          GimpContext  *context,
                          GimpProgress *progress,
                          Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gint32 spikes_in;
  gint32 spikes_out = 0;

  name = (gchar *) g_value_get_string (&args[0].value);
  spikes_in = g_value_get_int (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_spikes (GIMP_BRUSH_GENERATED (brush),
                                           spikes_in);
          spikes_out = GIMP_BRUSH_GENERATED (brush)->spikes;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_int (&return_vals[1].value, spikes_out);

  return return_vals;
}

static ProcRecord brush_set_spikes_proc =
{
  "gimp-brush-set-spikes",
  "gimp-brush-set-spikes",
  "Set the number of spikes for a generated brush.",
  "This procedure sets the number of spikes for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_spikes_invoker } }
};

static Argument *
brush_set_hardness_invoker (ProcRecord   *proc_record,
                            Gimp         *gimp,
                            GimpContext  *context,
                            GimpProgress *progress,
                            Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble hardness_in;
  gdouble hardness_out = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);
  hardness_in = g_value_get_double (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_hardness (GIMP_BRUSH_GENERATED (brush),
                                             hardness_in);
          hardness_out = GIMP_BRUSH_GENERATED (brush)->hardness;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, hardness_out);

  return return_vals;
}

static ProcRecord brush_set_hardness_proc =
{
  "gimp-brush-set-hardness",
  "gimp-brush-set-hardness",
  "Set the hardness of a generated brush.",
  "This procedure sets the hardness for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_hardness_invoker } }
};

static Argument *
brush_set_aspect_ratio_invoker (ProcRecord   *proc_record,
                                Gimp         *gimp,
                                GimpContext  *context,
                                GimpProgress *progress,
                                Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble aspect_ratio_in;
  gdouble aspect_ratio_out = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);
  aspect_ratio_in = g_value_get_double (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_aspect_ratio (GIMP_BRUSH_GENERATED (brush),
                                                 aspect_ratio_in);
          aspect_ratio_out = GIMP_BRUSH_GENERATED (brush)->aspect_ratio;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, aspect_ratio_out);

  return return_vals;
}

static ProcRecord brush_set_aspect_ratio_proc =
{
  "gimp-brush-set-aspect-ratio",
  "gimp-brush-set-aspect-ratio",
  "Set the aspect ratio of a generated brush.",
  "This procedure sets the aspect ratio for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_aspect_ratio_invoker } }
};

static Argument *
brush_set_angle_invoker (ProcRecord   *proc_record,
                         Gimp         *gimp,
                         GimpContext  *context,
                         GimpProgress *progress,
                         Argument     *args)
{
  gboolean success = TRUE;
  Argument *return_vals;
  gchar *name;
  gdouble angle_in;
  gdouble angle_out = 0.0;

  name = (gchar *) g_value_get_string (&args[0].value);
  angle_in = g_value_get_double (&args[1].value);

  if (success)
    {
      GimpBrush *brush = (GimpBrush *)
        gimp_container_get_child_by_name (gimp->brush_factory->container, name);

      if (GIMP_IS_BRUSH_GENERATED (brush) && GIMP_DATA (brush)->writable)
        {
          gimp_brush_generated_set_angle (GIMP_BRUSH_GENERATED (brush),
                                          angle_in);
          angle_out = GIMP_BRUSH_GENERATED (brush)->angle;
        }
      else
        success = FALSE;
    }

  return_vals = gimp_procedure_get_return_values (proc_record, success);

  if (success)
    g_value_set_double (&return_vals[1].value, angle_out);

  return return_vals;
}

static ProcRecord brush_set_angle_proc =
{
  "gimp-brush-set-angle",
  "gimp-brush-set-angle",
  "Set the rotation angle of a generated brush.",
  "This procedure sets the rotation angle for a generated brush. If called for any other type of brush, it does not succeed.",
  "Bill Skaggs <weskaggs@primate.ucdavis.edu>",
  "Bill Skaggs",
  "2004",
  NULL,
  GIMP_INTERNAL,
  0, NULL, 0, NULL,
  { { brush_set_angle_invoker } }
};