libpurple/plugins/perl/common/Network.xs

Thu, 07 Aug 2008 02:48:21 +0000

author
Daniel Atallah <datallah@pidgin.im>
date
Thu, 07 Aug 2008 02:48:21 +0000
changeset 23982
204b6e71f403
parent 15894
765ec644ac47
child 16238
33bf2fd32108
child 18068
b6554e3c8224
child 20478
46933dc62880
child 23983
586866581434
permissions
-rw-r--r--

Some Perl bindings fixes and additions from Zsombor Welker.
Technically some of these change the API, but in those couple cases, the way it
is now is either broken, not usable or pretty unlikely to be used. Feel free
to yell at me and/or revert this if you think this is unacceptable.
Fixes #5912

#include "module.h"

MODULE = Purple::Network  PACKAGE = Purple::Network  PREFIX = purple_network_
PROTOTYPES: ENABLE

const char *
purple_network_get_local_system_ip(fd)
	int fd

const char *
purple_network_get_my_ip(fd)
	int fd

unsigned short
purple_network_get_port_from_fd(fd)
	int fd

const char *
purple_network_get_public_ip()

void
purple_network_init()

const unsigned char *
purple_network_ip_atoi(ip)
	const char *ip

Purple::NetworkListenData
purple_network_listen(port, socket_type, cb, cb_data)
	unsigned short port
	int socket_type
	Purple::NetworkListenCallback cb
	gpointer cb_data

Purple::NetworkListenData
purple_network_listen_range(start, end, socket_type, cb, cb_data)
	unsigned short start
	unsigned short end
	int socket_type
	Purple::NetworkListenCallback cb
	gpointer cb_data

void
purple_network_set_public_ip(ip)
	const char *ip

mercurial