libpurple/plugins/perl/common/Conversation.xs

changeset 16238
33bf2fd32108
parent 12892
aa322da897d6
parent 15894
765ec644ac47
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/libpurple/plugins/perl/common/Conversation.xs	Mon Apr 16 00:44:33 2007 +0000
@@ -0,0 +1,402 @@
+#include "module.h"
+
+MODULE = Purple::Conversation  PACKAGE = Purple  PREFIX = purple_
+PROTOTYPES: ENABLE
+
+void
+purple_get_ims()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = purple_get_ims(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
+	}
+
+void
+purple_get_conversations()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = purple_get_conversations(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
+	}
+
+void
+purple_get_chats()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = purple_get_chats(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
+	}
+
+MODULE = Purple::Conversation  PACKAGE = Purple::Conversations  PREFIX = purple_conversations_
+PROTOTYPES: ENABLE
+
+Purple::Handle
+purple_conversations_get_handle()
+
+void
+purple_conversations_init()
+
+void
+purple_conversations_uninit()
+
+MODULE = Purple::Conversation  PACKAGE = Purple::Conversation  PREFIX = purple_conversation_
+PROTOTYPES: ENABLE
+
+void
+purple_conversation_destroy(conv)
+	Purple::Conversation conv
+
+Purple::ConversationType
+purple_conversation_get_type(conv)
+	Purple::Conversation conv
+
+Purple::Account
+purple_conversation_get_account(conv)
+	Purple::Conversation conv
+
+Purple::Connection
+purple_conversation_get_gc(conv)
+	Purple::Conversation conv
+
+void
+purple_conversation_set_title(conv, title);
+	Purple::Conversation conv
+	const char * title
+
+const char *
+purple_conversation_get_title(conv)
+	Purple::Conversation conv
+
+void
+purple_conversation_autoset_title(conv)
+	Purple::Conversation conv
+
+void
+purple_conversation_set_name(conv, name)
+	Purple::Conversation conv
+	const char *name
+
+const char *
+purple_conversation_get_name(conv)
+	Purple::Conversation conv
+
+void
+purple_conversation_set_logging(conv, log)
+	Purple::Conversation conv
+	gboolean log
+
+gboolean
+purple_conversation_is_logging(conv)
+	Purple::Conversation conv
+
+Purple::Conversation::IM
+purple_conversation_get_im_data(conv)
+	Purple::Conversation conv
+
+Purple::Conversation::Chat
+purple_conversation_get_chat_data(conv)
+	Purple::Conversation conv
+
+gpointer
+purple_conversation_get_data(conv, key)
+	Purple::Conversation conv
+	const char * key
+
+Purple::ConnectionFlags
+purple_conversation_get_features(conv)
+	Purple::Conversation conv
+
+gboolean
+purple_conversation_has_focus(conv)
+	Purple::Conversation conv
+
+void
+purple_conversation_update(conv, type)
+	Purple::Conversation conv
+	Purple::ConvUpdateType type
+
+Purple::Conversation
+purple_conversation_new(class, type, account, name)
+	Purple::ConversationType type
+	Purple::Account account
+	const char *name
+    C_ARGS:
+	type, account, name
+
+void
+purple_conversation_set_account(conv, account);
+	Purple::Conversation conv
+	Purple::Account account
+
+MODULE = Purple::Conversation  PACKAGE = Purple::Conversation::IM  PREFIX = purple_conv_im_
+PROTOTYPES: ENABLE
+
+Purple::Conversation
+purple_conv_im_get_conversation(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_set_icon(im, icon)
+	Purple::Conversation::IM im
+	Purple::Buddy::Icon icon
+
+Purple::Buddy::Icon
+purple_conv_im_get_icon(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_set_typing_state(im, state)
+	Purple::Conversation::IM im
+	Purple::TypingState state
+
+Purple::TypingState
+purple_conv_im_get_typing_state(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_start_typing_timeout(im, timeout)
+	Purple::Conversation::IM im
+	int timeout
+
+void
+purple_conv_im_stop_typing_timeout(im)
+	Purple::Conversation::IM im
+
+guint
+purple_conv_im_get_typing_timeout(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_set_type_again(im, val)
+	Purple::Conversation::IM im
+	time_t val
+
+time_t
+purple_conv_im_get_type_again(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_start_send_typed_timeout(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_stop_send_typed_timeout(im)
+	Purple::Conversation::IM im
+
+guint
+purple_conv_im_get_send_typed_timeout(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_update_typing(im)
+	Purple::Conversation::IM im
+
+void
+purple_conv_im_send(im, message)
+	Purple::Conversation::IM im
+	const char *message
+
+void
+purple_conv_im_write(im, who, message, flags, mtime)
+	Purple::Conversation::IM im
+	const char *who
+	const char *message
+	Purple::MessageFlags flags
+	time_t mtime
+
+MODULE = Purple::Conversation  PACKAGE = Purple::Conversation  PREFIX = purple_conv_
+PROTOTYPES: ENABLE
+
+gboolean
+purple_conv_present_error(who, account, what)
+	const char *who
+	Purple::Account account
+	const char *what
+
+void
+purple_conv_custom_smiley_close(conv, smile)
+	Purple::Conversation conv
+	const char *smile
+
+MODULE = Purple::Conversation  PACKAGE = Purple::Conversation::Chat  PREFIX = purple_conv_chat_
+PROTOTYPES: ENABLE
+
+Purple::Conversation
+purple_conv_chat_get_conversation(chat)
+	Purple::Conversation::Chat chat
+
+void
+purple_conv_chat_set_users(chat, users)
+	Purple::Conversation::Chat chat
+	SV * users
+PREINIT:
+	GList *l, *t_GL;
+	int i, t_len;
+PPCODE:
+	t_GL = NULL;
+	t_len = av_len((AV *)SvRV(users));
+
+	for (i = 0; i < t_len; i++) {
+		STRLEN t_sl;
+		t_GL = g_list_append(t_GL, SvPV(*av_fetch((AV *)SvRV(users), i, 0), t_sl));
+	}
+
+	for (l = purple_conv_chat_set_users(chat, t_GL); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
+	}
+
+void
+purple_conv_chat_get_users(chat)
+	Purple::Conversation::Chat chat
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = purple_conv_chat_get_users(chat); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
+	}
+
+void
+purple_conv_chat_ignore(chat, name)
+	Purple::Conversation::Chat chat
+	const char *name
+
+void
+purple_conv_chat_unignore(chat, name)
+	Purple::Conversation::Chat chat
+	const char *name
+
+void
+purple_conv_chat_set_ignored(chat, ignored)
+	Purple::Conversation::Chat chat
+	SV * ignored
+PREINIT:
+	GList *l, *t_GL;
+	int i, t_len;
+PPCODE:
+	t_GL = NULL;
+	t_len = av_len((AV *)SvRV(ignored));
+
+	for (i = 0; i < t_len; i++) {
+		STRLEN t_sl;
+		t_GL = g_list_append(t_GL, SvPV(*av_fetch((AV *)SvRV(ignored), i, 0), t_sl));
+	}
+
+	for (l = purple_conv_chat_set_ignored(chat, t_GL); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
+	}
+
+void
+purple_conv_chat_get_ignored(chat)
+	Purple::Conversation::Chat chat
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = purple_conv_chat_get_ignored(chat); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
+	}
+
+const char *
+purple_conv_chat_get_topic(chat)
+	Purple::Conversation::Chat chat
+
+void
+purple_conv_chat_set_id(chat, id)
+	Purple::Conversation::Chat chat
+	int id
+
+int
+purple_conv_chat_get_id(chat)
+	Purple::Conversation::Chat chat
+
+void
+purple_conv_chat_send(chat, message)
+	Purple::Conversation::Chat chat
+	const char * message
+
+void
+purple_conv_chat_write(chat, who, message, flags, mtime)
+	Purple::Conversation::Chat chat
+	const char *who
+	const char *message
+	Purple::MessageFlags flags
+	time_t mtime
+
+void
+purple_conv_chat_add_users(chat, users, extra_msgs, flags, new_arrivals)
+	Purple::Conversation::Chat chat
+	SV * users
+	SV * extra_msgs
+	SV * flags
+	gboolean new_arrivals
+PREINIT:
+	GList *t_GL_users, *t_GL_extra_msgs, *t_GL_flags;
+	int i, t_len;
+PPCODE:
+	t_GL_users = NULL;
+	t_len = av_len((AV *)SvRV(users));
+
+	for (i = 0; i < t_len; i++) {
+		STRLEN t_sl;
+		t_GL_users = g_list_append(t_GL_users, SvPV(*av_fetch((AV *)SvRV(users), i, 0), t_sl));
+	}
+
+	t_GL_flags = NULL;
+	t_len = av_len((AV *)SvRV(flags));
+
+	for (i = 0; i < t_len; i++) {
+		STRLEN t_sl;
+		t_GL_flags = g_list_append(t_GL_flags, SvPV(*av_fetch((AV *)SvRV(flags), i, 0), t_sl));
+	}
+
+	t_GL_extra_msgs = NULL;
+	t_len = av_len((AV *)SvRV(extra_msgs));
+
+	for (i = 0; i < t_len; i++) {
+		STRLEN t_sl;
+		t_GL_extra_msgs = g_list_append(t_GL_extra_msgs, SvPV(*av_fetch((AV *)SvRV(extra_msgs), i, 0), t_sl));
+	}
+
+	purple_conv_chat_add_users(chat, t_GL_users, t_GL_extra_msgs, t_GL_flags, new_arrivals);
+
+gboolean
+purple_conv_chat_find_user(chat, user)
+	Purple::Conversation::Chat chat
+	const char * user
+
+void purple_conv_chat_clear_users(chat)
+	Purple::Conversation::Chat chat
+
+void purple_conv_chat_set_nick(chat, nick)
+	Purple::Conversation::Chat chat
+	const char * nick
+
+const char *
+purple_conv_chat_get_nick(chat)
+	Purple::Conversation::Chat chat
+
+Purple::Conversation
+purple_find_chat(gc, id)
+	Purple::Connection gc
+	int id
+
+void purple_conv_chat_left(chat)
+	Purple::Conversation::Chat chat
+
+gboolean purple_conv_chat_has_left(chat)
+	Purple::Conversation::Chat chat
+
+Purple::Conversation::ChatBuddy
+purple_conv_chat_cb_find(chat, name)
+	Purple::Conversation::Chat chat
+	const char *name
+
+const char *
+purple_conv_chat_cb_get_name(cb)
+	Purple::Conversation::ChatBuddy cb
+
+void
+purple_conv_chat_cb_destroy(cb);
+	Purple::Conversation::ChatBuddy cb

mercurial