view release on metacpan or  search on metacpan

lib/Gimp/UI.xs  view on Meta::CPAN

};
ENUM(gimp_unit)
static const GEnumValue _gimp_chain_position_values[] = {
  { GIMP_CHAIN_TOP, "GIMP_CHAIN_TOP", "top" },
  { GIMP_CHAIN_LEFT, "GIMP_CHAIN_LEFT", "left" },
  { GIMP_CHAIN_BOTTOM, "GIMP_CHAIN_BOTTOM", "bottom" },
  { GIMP_CHAIN_RIGHT, "GIMP_CHAIN_RIGHT", "right" },
  { 0, NULL, NULL }
};
ENUM(gimp_chain_position)
static const GEnumValue _gimp_color_area_type_values[] = {
  { GIMP_COLOR_AREA_FLAT, "GIMP_COLOR_AREA_FLAT", "flat" },
  { GIMP_COLOR_AREA_SMALL_CHECKS, "GIMP_COLOR_AREA_SMALL_CHECKS", "small-checks" },
  { GIMP_COLOR_AREA_LARGE_CHECKS, "GIMP_COLOR_AREA_LARGE_CHECKS", "large-checks" },
  { 0, NULL, NULL }
};
ENUM(gimp_color_area_type)
static const GEnumValue _gimp_color_selector_channel_values[] = {
  { GIMP_COLOR_SELECTOR_HUE, "GIMP_COLOR_SELECTOR_HUE", "hue" },
  { GIMP_COLOR_SELECTOR_SATURATION, "GIMP_COLOR_SELECTOR_SATURATION", "saturation" },
  { GIMP_COLOR_SELECTOR_VALUE, "GIMP_COLOR_SELECTOR_VALUE", "value" },
  { GIMP_COLOR_SELECTOR_RED, "GIMP_COLOR_SELECTOR_RED", "red" },
  { GIMP_COLOR_SELECTOR_GREEN, "GIMP_COLOR_SELECTOR_GREEN", "green" },
  { GIMP_COLOR_SELECTOR_BLUE, "GIMP_COLOR_SELECTOR_BLUE", "blue" },
  { GIMP_COLOR_SELECTOR_ALPHA, "GIMP_COLOR_SELECTOR_ALPHA", "alpha" },
  { 0, NULL, NULL }
};
ENUM(gimp_color_selector_channel)
static const GEnumValue _gimp_size_entry_update_policy_values[] = {
  { GIMP_SIZE_ENTRY_UPDATE_NONE, "GIMP_SIZE_ENTRY_UPDATE_NONE", "none" },
  { GIMP_SIZE_ENTRY_UPDATE_SIZE, "GIMP_SIZE_ENTRY_UPDATE_SIZE", "size" },
  { GIMP_SIZE_ENTRY_UPDATE_RESOLUTION, "GIMP_SIZE_ENTRY_UPDATE_RESOLUTION", "resolution" },
  { 0, NULL, NULL }
};
ENUM(gimp_size_entry_update_policy)

#define SvGimpRGB(sv, color) sv_color3 ((sv), &(color).r, &(color).g, &(color).b, &(color).a)
#define SvGimpHSV(sv, color) sv_color3 ((sv), &(color).h, &(color).s, &(color).v, &(color).a)

#define newSVGimpRGB(color) newSV_color3 ((color).r, (color).g, (color).b, (color).a)
#define newSVGimpHSV(color) newSV_color3 ((color).h, (color).s, (color).v, (color).a)

typedef GtkWidget GimpMemsizeEntry_own;
typedef GtkWidget GimpButton_own;
typedef GtkWidget GimpChainButton_own;
typedef GtkWidget GimpColorArea_own;
typedef GtkWidget GimpColorButton_own;
typedef GtkWidget GimpColorDisplay_own;
typedef GtkWidget GimpColorNotebook_own;
typedef GtkWidget GimpColorScale_own;
typedef GtkWidget GimpColorSelect_own;
typedef GtkWidget GimpColorSelector_own;
typedef GtkWidget GimpDialog_own;
typedef GtkWidget GimpFileEntry_own;
typedef GtkWidget GimpFontSelectButton_own;
typedef GtkWidget GimpOffsetArea_own;
typedef GtkWidget GimpPathEditor_own;
typedef GtkWidget GimpPickButton_own;
typedef GtkWidget GimpPixmap_own;
typedef GtkWidget GimpSizeEntry_own;
typedef GtkWidget GimpUnitMenu_own;

MODULE = Gimp::UI	PACKAGE = Gimp::UI

BOOT:
	gimp_ui_init (g_strdup (SvPV_nolen (get_sv("0", 0))), 0);

PROTOTYPES: ENABLE

void
set_transient(window)
  GtkWindow *window
  CODE:
    if (gimp_display_name())
      gimp_window_set_transient (window);

gint32
export_image(image_ID, drawable_ID, format_name, capabilities)
	SV *	image_ID
        SV *	drawable_ID
        gchar *	format_name
        gint	capabilities
        PREINIT:
          gint32 image;
          gint32 drawable;
        CODE:
          image = SvIV (SvRV (image_ID));
          drawable = SvIV (SvRV (drawable_ID));
	  if (gimp_display_name())
	    RETVAL = gimp_export_image (&image, &drawable, format_name, capabilities);
	  else
	    RETVAL = GIMP_EXPORT_IGNORE; /* fake if no UI */
          sv_setiv (SvRV (image_ID), image);
          sv_setiv (SvRV (drawable_ID), drawable);
	OUTPUT:
        image_ID
        drawable_ID
        RETVAL

MODULE = Gimp::UI	PACKAGE = Gimp::UI::MemsizeEntry	PREFIX = gimp_memsize_entry_

BOOT:
	gperl_register_object (GIMP_TYPE_MEMSIZE_ENTRY, "Gimp::UI::MemsizeEntry");

GimpMemsizeEntry_own * gimp_memsize_entry_new (SV *unused_class, gulong value, gulong lower, gulong upper)
	C_ARGS: value, lower, upper

void gimp_memsize_entry_set_value (GimpMemsizeEntry *entry, gulong value)

gulong gimp_memsize_entry_get_value (GimpMemsizeEntry *entry)

MODULE = Gimp::UI	PACKAGE = Gimp::UI::Button	PREFIX = gimp_button_

BOOT:
	gperl_register_object (GIMP_TYPE_BUTTON, "Gimp::UI::Button");

GimpButton_own * gimp_button_new (SV *unused_class)
	C_ARGS:

void gimp_button_extended_clicked (GimpButton *button, GdkModifierType state);

lib/Gimp/UI.xs  view on Meta::CPAN

GimpPickButton_own * gimp_pick_button_new (SV *unused_class)
	C_ARGS:

MODULE = Gimp::UI	PACKAGE = Gimp::UI::Pixmap	PREFIX = gimp_pixmap_

BOOT:
	gperl_register_object (GIMP_TYPE_PIXMAP, "Gimp::UI::Pixmap");

#GimpPixmap_own * gimp_pixmap_new (SV *unused_class, char **xpm_data)
#	C_ARGS:

#GtkWidget * gimp_pixmap_new      (gchar      **xpm_data);

#void        gimp_pixmap_set      (GimpPixmap  *pixmap,
#				  gchar      **xpm_data);

MODULE = Gimp::UI	PACKAGE = Gimp::UI::SizeEntry	PREFIX = gimp_size_entry_

BOOT:
	gperl_register_object (GIMP_TYPE_SIZE_ENTRY, "Gimp::UI::SizeEntry");

GimpSizeEntry_own * gimp_size_entry_new (SV *unused_class, gint number_of_fields, GimpUnit unit, char *unit_format, \
                                         gboolean menu_show_pixels, gboolean menu_show_percent, gboolean show_refval, \
                                         gint spinbutton_width, GimpSizeEntryUpdatePolicy update_policy)
	C_ARGS: number_of_fields, unit, unit_format, menu_show_pixels, menu_show_percent, show_refval, spinbutton_width, update_policy

void gimp_size_entry_add_field (GimpSizeEntry *gse, GtkSpinButton *value_spinbutton, GtkSpinButton *refval_spinbutton)

void gimp_size_entry_attach_label (GimpSizeEntry *gse, utf8_str text, gint row, gint column, gfloat alignment)

void gimp_size_entry_set_resolution (GimpSizeEntry *gse, gint field, gdouble resolution, gboolean keep_size)

void gimp_size_entry_set_size (GimpSizeEntry *gse, gint field, gdouble lower, gdouble upper)

void gimp_size_entry_set_value_boundaries (GimpSizeEntry *gse, gint field, gdouble lower, gdouble upper)

gdouble gimp_size_entry_get_value (GimpSizeEntry *gse, gint field)

void gimp_size_entry_set_value (GimpSizeEntry *gse, gint field, gdouble value)

void gimp_size_entry_set_refval_boundaries (GimpSizeEntry *gse, gint field, gdouble lower, gdouble upper)

void gimp_size_entry_set_refval_digits (GimpSizeEntry *gse, gint field, gint digits)

gdouble gimp_size_entry_get_refval (GimpSizeEntry *gse, gint field)

void gimp_size_entry_set_refval (GimpSizeEntry *gse, gint field, gdouble refval)

GimpUnit gimp_size_entry_get_unit (GimpSizeEntry *gse)

void gimp_size_entry_set_unit (GimpSizeEntry *gse, GimpUnit unit)

void gimp_size_entry_grab_focus (GimpSizeEntry *gse)

MODULE = Gimp::UI	PACKAGE = Gimp::UI::Stock	PREFIX = gimp_stock_

BOOT:
	gimp_stock_init();
	CARGS:

MODULE = Gimp::UI	PACKAGE = Gimp::UI::UnitMenu	PREFIX = gimp_unit_menu_

BOOT:
	gperl_register_object (GIMP_TYPE_UNIT_MENU, "Gimp::UI::UnitMenu");

GimpUnitMenu_own * gimp_unit_menu_new (SV *unused_class, char *format, GimpUnit unit, \
                                       gboolean show_pixels, gboolean show_percent, gboolean show_custom)
	C_ARGS: format, unit, show_pixels, show_percent, show_custom

void gimp_unit_menu_set_unit (GimpUnitMenu *menu, GimpUnit unit)

GimpUnit gimp_unit_menu_get_unit (GimpUnitMenu *menu)