Mercurial > pidgin3 / file diff

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/perl/common/Account.xs	Tue Aug 19 21:47:36 2003 +0000
@@ -0,0 +1,151 @@
+#include "module.h"
+
+MODULE = Gaim::Account  PACKAGE = Gaim::Account  PREFIX = gaim_account_
+PROTOTYPES: ENABLE
+
+Gaim::Connection
+gaim_account_connect(account)
+	Gaim::Account account
+
+void
+gaim_account_disconnect(account)
+	Gaim::Account account
+
+void
+gaim_account_set_username(account, username)
+	Gaim::Account account
+	const char *username
+
+void
+gaim_account_set_password(account, password)
+	Gaim::Account account
+	const char *password
+
+void
+gaim_account_set_alias(account, alias)
+	Gaim::Account account
+	const char *alias
+
+void
+gaim_account_set_user_info(account, user_info)
+	Gaim::Account account
+	const char *user_info
+
+void
+gaim_account_set_buddy_icon(account, buddy_icon)
+	Gaim::Account account
+	const char *buddy_icon
+
+void
+gaim_account_set_protocol_id(account, protocol_id)
+	Gaim::Account account
+	const char *protocol_id
+
+void
+gaim_account_set_remember_password(account, value)
+	Gaim::Account account
+	gboolean value
+
+void
+gaim_account_set_check_mail(account, value)
+	Gaim::Account account
+	gboolean value
+
+void
+gaim_account_set_auto_login(account, ui, value)
+	Gaim::Account account
+	const char *ui
+	gboolean value
+
+void
+gaim_account_set_public_ip(account, ip)
+	Gaim::Account account
+	const char *ip
+
+gboolean
+gaim_account_is_connected(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_username(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_password(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_alias(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_user_info(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_buddy_icon(account)
+	Gaim::Account account
+
+const char *
+gaim_account_get_protocol_id(account)
+	Gaim::Account account
+
+Gaim::Connection
+gaim_account_get_connection(account)
+	Gaim::Account account
+
+gboolean
+gaim_account_get_remember_password(account)
+	Gaim::Account account
+
+gboolean
+gaim_account_get_check_mail(account)
+	Gaim::Account account
+
+gboolean
+gaim_account_get_auto_login(account, ui)
+	Gaim::Account account
+	const char *ui
+
+const char *
+gaim_account_get_public_ip(account)
+	Gaim::Account account
+
+void *
+handle()
+CODE:
+	RETVAL = gaim_accounts_get_handle();
+OUTPUT:
+	RETVAL
+
+
+MODULE = Gaim::Account  PACKAGE = Gaim::Accounts  PREFIX = gaim_accounts_
+
+void
+gaim_accounts_add(account)
+	Gaim::Account account
+
+void
+gaim_accounts_remove(account)
+	Gaim::Account account
+
+
+MODULE = Gaim::Account  PACKAGE = Gaim
+
+void
+accounts()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = gaim_accounts_get_all(); l != NULL; l = l->next)
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account")));
+
+Gaim::Account
+account_find(name, protocol_id)
+	const char *name
+	const char *protocol_id
+CODE:
+	RETVAL = gaim_accounts_find_with_prpl_id(name, protocol_id);
+OUTPUT:
+	RETVAL
+