pidgin/plugins/perl/common/GtkThemes.xs

Sat, 17 Apr 2010 01:27:04 +0000

author
Paul Aurich <darkrain42@pidgin.im>
date
Sat, 17 Apr 2010 01:27:04 +0000
changeset 30027
2ab6e591cf72
parent 16276
8853d1da70f5
child 18068
b6554e3c8224
child 35312
add13288757e
permissions
-rw-r--r--

Add network listen functions that accept a family argument (AF_INET(6?)).

These allow code to portably support IPv6 for listeners (mostly file
transfers and Bonjour). Callers should use the purple_socket_speaks_ipv4
to determine whether they need two sockets or just an IPv6 one. I used
GIO's g_socket_speaks_ipv4 as the inspiration for that.

#include "gtkmodule.h"

MODULE = Pidgin::Themes  PACKAGE = Pidgin::Themes  PREFIX = pidgin_themes_
PROTOTYPES: ENABLE

void
pidgin_themes_init()

gboolean
pidgin_themes_smileys_disabled()

void
pidgin_themes_smiley_theme_probe()

void
pidgin_themes_load_smiley_theme(file, load)
	const char * file
	gboolean load

void
pidgin_themes_get_proto_smileys(id)
	const char * id
PREINIT:
	GSList *l;
PPCODE:
	for (l = pidgin_themes_get_proto_smileys(id); l != NULL; l = l->next) {
		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::IMHtml::Smiley")));
	}

mercurial