Mercurial > pidgin.yaz
view libpurple/plugins/perl/common/Server.xs @ 15377:0e17470b47c2
Update win32 build for libpurple and pidgin renames. This compiles, but is far from complete.
author | Daniel Atallah <daniel.atallah@gmail.com> |
---|---|
date | Sun, 21 Jan 2007 21:55:07 +0000 |
parents | 5fe8042783c1 |
children | 2f8274ce570a |
line wrap: on
line source
#include "module.h" MODULE = Gaim::Serv PACKAGE = Gaim::Serv PREFIX = serv_ PROTOTYPES: ENABLE void serv_add_deny(con, a) Gaim::Connection con const char * a void serv_add_permit(a, b) Gaim::Connection a const char * b void serv_alias_buddy(buddy) Gaim::BuddyList::Buddy buddy void serv_chat_invite(con, a, b, c) Gaim::Connection con int a const char * b const char * c void serv_chat_leave(a, b) Gaim::Connection a int b int serv_chat_send(con, a, b, flags) Gaim::Connection con int a const char * b Gaim::MessageFlags flags void serv_chat_whisper(con, a, b, c) Gaim::Connection con int a const char * b const char * c void serv_get_info(con, a) Gaim::Connection con const char * a void serv_got_alias(gc, who, alias) Gaim::Connection gc const char *who const char *alias void serv_got_chat_in(g, id, who, chatflags, message, mtime) Gaim::Connection g int id const char *who Gaim::MessageFlags chatflags const char *message time_t mtime void serv_got_chat_invite(gc, name, who, message, components) Gaim::Connection gc const char *name const char *who const char *message SV * components INIT: HV * t_HV; HE * t_HE; SV * t_SV; GHashTable * t_GHash; I32 len; char *t_key, *t_value; CODE: t_HV = (HV *)SvRV(components); t_GHash = g_hash_table_new(g_str_hash, g_str_equal); for (t_HE = hv_iternext(t_HV); t_HE != NULL; t_HE = hv_iternext(t_HV) ) { t_key = hv_iterkey(t_HE, &len); t_SV = *hv_fetch(t_HV, t_key, len, 0); t_value = SvPV(t_SV, PL_na); g_hash_table_insert(t_GHash, t_key, t_value); } serv_got_chat_invite(gc, name, who, message, t_GHash); void serv_got_chat_left(g, id) Gaim::Connection g int id void serv_got_im(gc, who, msg, imflags, mtime) Gaim::Connection gc const char *who const char *msg Gaim::MessageFlags imflags time_t mtime Gaim::Conversation serv_got_joined_chat(gc, id, name) Gaim::Connection gc int id const char *name void serv_got_typing(gc, name, timeout, state) Gaim::Connection gc const char *name int timeout Gaim::TypingState state void serv_got_typing_stopped(gc, name) Gaim::Connection gc const char *name void serv_join_chat(con, components) Gaim::Connection con SV * components INIT: HV * t_HV; HE * t_HE; SV * t_SV; GHashTable * t_GHash; I32 len; char *t_key, *t_value; CODE: t_HV = (HV *)SvRV(components); t_GHash = g_hash_table_new(g_str_hash, g_str_equal); for (t_HE = hv_iternext(t_HV); t_HE != NULL; t_HE = hv_iternext(t_HV) ) { t_key = hv_iterkey(t_HE, &len); t_SV = *hv_fetch(t_HV, t_key, len, 0); t_value = SvPV(t_SV, PL_na); g_hash_table_insert(t_GHash, t_key, t_value); } serv_join_chat(con, t_GHash); void serv_move_buddy(buddy, group1, group2) Gaim::BuddyList::Buddy buddy Gaim::BuddyList::Group group1 Gaim::BuddyList::Group group2 void serv_reject_chat(con, components) Gaim::Connection con SV * components INIT: HV * t_HV; HE * t_HE; SV * t_SV; GHashTable * t_GHash; I32 len; char *t_key, *t_value; CODE: t_HV = (HV *)SvRV(components); t_GHash = g_hash_table_new(g_str_hash, g_str_equal); for (t_HE = hv_iternext(t_HV); t_HE != NULL; t_HE = hv_iternext(t_HV) ) { t_key = hv_iterkey(t_HE, &len); t_SV = *hv_fetch(t_HV, t_key, len, 0); t_value = SvPV(t_SV, PL_na); g_hash_table_insert(t_GHash, t_key, t_value); } serv_reject_chat(con, t_GHash); void serv_rem_deny(con, a) Gaim::Connection con const char * a void serv_rem_permit(con, a) Gaim::Connection con const char * a void serv_send_file(gc, who, file) Gaim::Connection gc const char *who const char *file int serv_send_im(con, a, b, flags ) Gaim::Connection con const char * a const char * b Gaim::MessageFlags flags int serv_send_typing(con, a, state) Gaim::Connection con const char * a Gaim::TypingState state void serv_set_info(con, a) Gaim::Connection con const char * a void serv_set_permit_deny(con) Gaim::Connection con