• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

libpurple/plugins/perl/common/Smiley.xs@5dbd0617a27d (annotated)

libpurple/plugins/perl/common/Smiley.xs

Thu, 30 Oct 2008 22:40:49 +0000

author

Richard Laager <rlaager@pidgin.im>

date

Thu, 30 Oct 2008 22:40:49 +0000

changeset 24569

5dbd0617a27d

parent 23329

a3348556c57d

permissions

-rw-r--r--

Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
to detect when we're still using deprecated functions internally (and by
extension, when we've deprecated something we shouldn't have). In the
course of developing this changeset, I fixed a few such cases.

Given that the plan is to switch from PURPLE_HIDE_STRUCTS to
PURPLE_DISABLE_DEPRECATED as each struct is fully dealt with, this will
also ensure we have no regressions on the struct hiding work.

Deprecated functions are still available to the respective .c file, to
avoid missing prototype errors. Also, Perl and DBus undef the
*_DISABLE_DEPRECATED defines as appropriate so that deprecated functions
will still be exported to Perl plugins and via DBus. (Otherwise, we'd
be breaking backwards compatibility.)

23023 6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	1	#include "module.h"
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	2
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	3	MODULE = Purple::Smiley PACKAGE = Purple::Smiley PREFIX = purple_smiley_
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	4	PROTOTYPES: ENABLE
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	5
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	6	Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	7	purple_smiley_new(img, shortcut)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	8	Purple::StoredImage img
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	9	const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	10
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	11	Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	12	purple_smiley_new_from_file(shortcut, filepath)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	13	const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	14	const char * filepath
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	15
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	16	void
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	17	purple_smiley_delete(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	18	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	19
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	20	gboolean
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	21	purple_smiley_set_shortcut(smiley, shortcut)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	22	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	23	const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	24
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	25	void
23329 a3348556c57d Update the perl bindings for the changed smiley API. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: 23023 diff changeset	26	purple_smiley_set_data(smiley, data, data_len)
23023 6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	27	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	28	guchar * data
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	29	size_t data_len
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	30
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	31	const char *
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	32	purple_smiley_get_shortcut(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	33	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	34
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	35	const char *
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	36	purple_smiley_get_checksum(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	37	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	38
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	39	Purple::StoredImage
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	40	purple_smiley_get_stored_image(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	41	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	42
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	43	gconstpointer
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	44	purple_smiley_get_data(smiley, len)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	45	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	46	size_t * len
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	47
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	48	const char *
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	49	purple_smiley_get_extension(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	50	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	51
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	52
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	53	gchar_own *
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	54	purple_smiley_get_full_path(smiley)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	55	Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	56
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	57
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	58	MODULE = Purple::Smiley PACKAGE = Purple::Smileys PREFIX = purple_smileys_
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	59	PROTOTYPES: ENABLE
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	60
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	61	void
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	62	purple_smileys_get_all()
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	63	PREINIT:
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	64	GList *l;
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	65	PPCODE:
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	66	for (l = purple_smileys_get_all(); l != NULL; l = g_list_delete_link(l, l)) {
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	67	XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Smiley")));
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	68	}
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	69
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	70	Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	71	purple_smileys_find_by_shortcut(shortcut)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	72	const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	73
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	74	Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	75	purple_smileys_find_by_checksum(checksum)
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	76	const char * checksum
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	77
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	78	const char *
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	79	purple_smileys_get_storing_dir()
6aeeb2037709 Expose smiley API to perl plugins. Sadrul Habib Chowdhury <sadrul@pidgin.im> parents: diff changeset	80