Gtk-Perl

 view release on metacpan or  search on metacpan

GdkImlib/xs/GdkImlib.xs  view on Meta::CPAN

	Gtk::Gdk::Bitmap bitmap
	CODE:
	gdk_imlib_free_bitmap(bitmap);

MODULE = Gtk::Gdk::ImlibImage	PACKAGE = Gtk::Gdk::ImlibImage	PREFIX = gdk_imlib_

void
gdk_imlib_init(Class)
	CODE:
	if (pgtk_did_we_init_gtk)
		gdk_imlib_init();

int
gdk_imlib_get_render_type(Class)
	SV * Class
	CODE:
	RETVAL = gdk_imlib_get_render_type();
	OUTPUT:
	RETVAL

void
gdk_imlib_set_render_type(Class, rend_type)
	SV * Class
	int rend_type
	CODE:
	gdk_imlib_set_render_type(rend_type);

int
gdk_imlib_load_colors(Class, file)
	SV * Class
	char* file
	CODE:
	RETVAL = gdk_imlib_load_colors(file);
	OUTPUT:
	RETVAL

Gtk::Gdk::ImlibImage
gdk_imlib_load_image(Class, file)
	SV * Class
	char* file
	CODE:
	RETVAL = gdk_imlib_load_image(file);
	OUTPUT:
	RETVAL

Gtk::Gdk::ImlibImage
gdk_imlib_load_alpha(Class, file)
	SV * Class
	char* file
	CODE:
	RETVAL = gdk_imlib_load_alpha(file);
	OUTPUT:
	RETVAL

void
gdk_imlib_best_color_match (Class, r, g, b)
	SV *	Class
	int	r
	int	g
	int	b
	PPCODE:
	{
		int res = gdk_imlib_best_color_match(&r, &g, &b);
		EXTEND(sp, 4);
		XPUSHs(sv_2mortal(newSViv(res)));
		XPUSHs(sv_2mortal(newSViv(r)));
		XPUSHs(sv_2mortal(newSViv(g)));
		XPUSHs(sv_2mortal(newSViv(b)));
	}

int
gdk_imlib_render( image, width, height)
	Gtk::Gdk::ImlibImage image
	int width
	int height

Gtk::Gdk::Pixmap
gdk_imlib_copy_image(image)
	Gtk::Gdk::ImlibImage image

Gtk::Gdk::Bitmap
gdk_imlib_copy_mask(image)
	Gtk::Gdk::ImlibImage image

Gtk::Gdk::Pixmap
gdk_imlib_move_image(image)
	Gtk::Gdk::ImlibImage image

Gtk::Gdk::Bitmap_OrNULL
gdk_imlib_move_mask(image)
	Gtk::Gdk::ImlibImage image

void
gdk_imlib_destroy_image(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	gdk_imlib_destroy_image(image);
	UnregisterMisc((HV*)SvRV(ST(0)), image);

void
gdk_imlib_kill_image(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	gdk_imlib_kill_image(image);
	UnregisterMisc((HV*)SvRV(ST(0)), image);

void
DESTROY(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	UnregisterMisc((HV*)SvRV(ST(0)), image);

void
gdk_imlib_free_colors(Class)
	SV * Class
	CODE:
	gdk_imlib_free_colors();

void
gdk_imlib_set_image_border (image, left, right, top, bottom)
	Gtk::Gdk::ImlibImage image
	int	left
	int	right
	int	top
	int	bottom
	CODE:
	{
		GdkImlibBorder border;
		border.left = left;
		border.right = right;
		border.top = top;
		border.bottom = bottom;
		gdk_imlib_set_image_border(image, &border);
	}

void
gdk_imlib_get_image_border (image)
	Gtk::Gdk::ImlibImage image
	PPCODE:
	{
		GdkImlibBorder border;
		gdk_imlib_get_image_border (image, &border);
		EXTEND(sp, 4);
		XPUSHs(sv_2mortal(newSViv(border.left)));
		XPUSHs(sv_2mortal(newSViv(border.right)));
		XPUSHs(sv_2mortal(newSViv(border.top)));
		XPUSHs(sv_2mortal(newSViv(border.bottom)));
	}

void
gdk_imlib_set_image_shape(image, r, g, b)
	Gtk::Gdk::ImlibImage image
	int	r
	int	g
	int	b
	CODE:
	{
		GdkImlibColor color;
		color.r = r; color.g = g; color.b = b;
		gdk_imlib_set_image_shape(image, &color);
	}

int
gdk_imlib_save_image_to_eim(image, file)
	Gtk::Gdk::ImlibImage image
	char* file

int
gdk_imlib_add_image_to_eim(image, file)
	Gtk::Gdk::ImlibImage image
	char* file

int
gdk_imlib_save_image_to_ppm(image, file)
	Gtk::Gdk::ImlibImage image
	char* file

void
gdk_imlib_load_file_to_pixmap(Class, file)
	SV * Class
	char* file
	PPCODE:
	{
		GdkPixmap * result = 0;
		GdkBitmap * mask = 0;
		int ret;
		ret = gdk_imlib_load_file_to_pixmap(file, &result, &mask);
		if (result) {
			EXTEND(sp,1);
			PUSHs(sv_2mortal(newSVGdkPixmap(result)));
		}
		if (mask) {
			EXTEND(sp,1);
			PUSHs(sv_2mortal(newSVGdkBitmap(mask)));
		}
	}

void
gdk_imlib_set_image_modifier(image, mod)
	Gtk::Gdk::ImlibImage image
	Gtk::Gdk::Imlib::ColorModifier mod

void
gdk_imlib_set_image_red_modifier(image, mod)
	Gtk::Gdk::ImlibImage image
	Gtk::Gdk::Imlib::ColorModifier mod

void
gdk_imlib_set_image_green_modifier(image, mod)
	Gtk::Gdk::ImlibImage image
	Gtk::Gdk::Imlib::ColorModifier mod

void
gdk_imlib_set_image_blue_modifier(image, mod)
	Gtk::Gdk::ImlibImage image
	Gtk::Gdk::Imlib::ColorModifier mod

Gtk::Gdk::Imlib::ColorModifier
gdk_imlib_get_image_modifier(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	{
		GdkImlibColorModifier mod;
		gdk_imlib_get_image_modifier(image, &mod);
		RETVAL = &mod;
	}
	OUTPUT:
	RETVAL

Gtk::Gdk::Imlib::ColorModifier
gdk_imlib_get_image_red_modifier(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	{
		GdkImlibColorModifier mod;
		gdk_imlib_get_image_red_modifier(image, &mod);
		RETVAL = &mod;
	}
	OUTPUT:
	RETVAL

Gtk::Gdk::Imlib::ColorModifier

GdkImlib/xs/GdkImlib.xs  view on Meta::CPAN

       int h

int
gdk_imlib_get_fallback(Class)
	SV * Class
	CODE:
	RETVAL = gdk_imlib_get_fallback();
	OUTPUT:
	RETVAL

void
gdk_imlib_set_fallback(Class, fallback)
	SV * Class
	int fallback
	CODE:
	gdk_imlib_set_fallback(fallback);

Gtk::Gdk::Visual
gdk_imlib_get_visual(Class)
	SV * Class
	CODE:
	RETVAL = gdk_imlib_get_visual();
	OUTPUT:
	RETVAL

Gtk::Gdk::Colormap
gdk_imlib_get_colormap(Class)
	SV * Class
	CODE:
	RETVAL = gdk_imlib_get_colormap();
	OUTPUT:
	RETVAL

char*
gdk_imlib_get_sysconfig(Class)
	SV * Class
	CODE:
	RETVAL = gdk_imlib_get_sysconfig();
	OUTPUT:
	RETVAL

Gtk::Gdk::ImlibImage
gdk_imlib_create_image_from_xpm_data(Class, data, ...)
	SV * Class
	SV * data
	CODE:
	{
		char ** lines = (char**)malloc(sizeof(char*)*(items-1));
		int i;
		for(i=1;i<items;i++)
			lines[i-1] = SvPV(ST(i),PL_na);
		RETVAL = gdk_imlib_create_image_from_xpm_data(lines);
		free(lines);
	}
	OUTPUT:
	RETVAL

void
gdk_imlib_data_to_pixmap(Class, data, ...)
	SV *	data
	PPCODE:
	{
		GdkPixmap * result = 0;
		GdkBitmap * mask = 0;
		int ret;
		char ** lines = (char**)malloc(sizeof(char*)*(items-1));
		int i;
		for(i=1;i<items;i++)
			lines[i-1] = SvPV(ST(i),PL_na);
		ret = gdk_imlib_data_to_pixmap(lines, &result, &mask);
		if (result) {
			EXTEND(sp,1);
			PUSHs(sv_2mortal(newSVGdkPixmap(result)));
		}
		if (mask) {
			EXTEND(sp,1);
			PUSHs(sv_2mortal(newSVGdkBitmap(mask)));
		}
		free(lines);
	}

void
gdk_imlib_get_cache_info(Class)
	SV *	Class
	PPCODE:
	{
		int cache_p, cache_i;
		gdk_imlib_get_cache_info(&cache_p, &cache_i);
		EXTEND(sp,2);
		PUSHs(sv_2mortal(newSViv(cache_p)));
		PUSHs(sv_2mortal(newSViv(cache_i)));
	}

void
gdk_imlib_set_cache_info(Class, cache_pixmaps, cache_images)
	SV *	Class
	int	cache_pixmaps
	int	cache_images
	CODE:
	gdk_imlib_set_cache_info(cache_pixmaps, cache_images);

gint
gdk_imlib_save_image(image, file, info=0)
	Gtk::Gdk::ImlibImage image
	char *	file
	Gtk::Gdk::Imlib::SaveInfo info
	CODE:
	RETVAL = gdk_imlib_save_image(image, file, info);
	OUTPUT:
	RETVAL

int
rgb_width(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	RETVAL = image->rgb_width;
	OUTPUT:
	RETVAL

int
rgb_height(image)
	Gtk::Gdk::ImlibImage image
	CODE:
	RETVAL = image->rgb_height;
	OUTPUT:
	RETVAL



( run in 1.038 second using v1.01-cache-2.11-cpan-5511b514fd6 )