mirror of
https://github.com/irssi/irssi.git
synced 2024-12-04 14:46:39 -05:00
b933f62111
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2791 dbcabf3a-b0e7-0310-adc4-f8d773084564
138 lines
2.8 KiB
Plaintext
138 lines
2.8 KiB
Plaintext
#include "module.h"
|
|
|
|
static GSList *register_hash2list(HV *hv)
|
|
{
|
|
HE *he;
|
|
GSList *list;
|
|
|
|
if (hv == NULL)
|
|
return NULL;
|
|
|
|
list = NULL;
|
|
hv_iterinit(hv);
|
|
while ((he = hv_iternext(hv)) != NULL) {
|
|
I32 len;
|
|
char *key = hv_iterkey(he, &len);
|
|
int value = (int)SvIV(HeVAL(he));
|
|
|
|
list = g_slist_append(list, g_strdup(key));
|
|
list = g_slist_append(list, GINT_TO_POINTER(value));
|
|
}
|
|
return list;
|
|
}
|
|
|
|
static GSList *event_hash2list(HV *hv)
|
|
{
|
|
HE *he;
|
|
GSList *list;
|
|
|
|
if (hv == NULL)
|
|
return NULL;
|
|
|
|
list = NULL;
|
|
hv_iterinit(hv);
|
|
while ((he = hv_iternext(hv)) != NULL) {
|
|
I32 len;
|
|
char *key = hv_iterkey(he, &len);
|
|
char *value = SvPV(HeVAL(he), PL_na);
|
|
|
|
list = g_slist_append(list, g_strdup(key));
|
|
list = g_slist_append(list, g_strdup(value));
|
|
}
|
|
return list;
|
|
}
|
|
|
|
MODULE = Irssi::Irc::Server PACKAGE = Irssi::Irc::Server PREFIX = irc_server_
|
|
PROTOTYPES: ENABLE
|
|
|
|
void
|
|
irc_server_get_channels(server)
|
|
Irssi::Irc::Server server
|
|
PREINIT:
|
|
char *ret;
|
|
PPCODE:
|
|
ret = irc_server_get_channels(server);
|
|
XPUSHs(sv_2mortal(new_pv(ret)));
|
|
g_free(ret);
|
|
|
|
void
|
|
send_raw(server, cmd)
|
|
Irssi::Irc::Server server
|
|
char *cmd
|
|
CODE:
|
|
irc_send_cmd(server, cmd);
|
|
|
|
void
|
|
send_raw_now(server, cmd)
|
|
Irssi::Irc::Server server
|
|
char *cmd
|
|
CODE:
|
|
irc_send_cmd_now(server, cmd);
|
|
|
|
void
|
|
send_raw_split(server, cmd, nickarg, max_nicks)
|
|
Irssi::Irc::Server server
|
|
char *cmd
|
|
int nickarg
|
|
int max_nicks
|
|
CODE:
|
|
irc_send_cmd_split(server, cmd, nickarg, max_nicks);
|
|
|
|
MODULE = Irssi::Irc::Server PACKAGE = Irssi::Irc::Server PREFIX = server_
|
|
|
|
void
|
|
server_redirect_register(command, remote, timeout, start, stop, opt)
|
|
char *command
|
|
int remote
|
|
int timeout
|
|
SV *start
|
|
SV *stop
|
|
SV *opt
|
|
CODE:
|
|
server_redirect_register_list(command, remote, timeout,
|
|
register_hash2list(hvref(start)),
|
|
register_hash2list(hvref(stop)),
|
|
register_hash2list(hvref(opt)));
|
|
|
|
void
|
|
server_redirect_event(server, command, count, arg, remote, failure_signal, signals)
|
|
Irssi::Irc::Server server
|
|
char *command
|
|
int count
|
|
char *arg
|
|
int remote
|
|
char *failure_signal
|
|
SV *signals
|
|
CODE:
|
|
server_redirect_event_list(server, command, count, *arg == '\0' ? NULL : arg, remote,
|
|
*failure_signal == '\0' ? NULL : failure_signal,
|
|
event_hash2list(hvref(signals)));
|
|
|
|
char *
|
|
server_redirect_get_signal(server, event, args)
|
|
Irssi::Irc::Server server
|
|
char *event
|
|
char *args
|
|
CODE:
|
|
RETVAL = (char *) server_redirect_get_signal(server, event, args);
|
|
OUTPUT:
|
|
RETVAL
|
|
|
|
char *
|
|
server_redirect_peek_signal(server, event, args)
|
|
Irssi::Irc::Server server
|
|
char *event
|
|
char *args
|
|
PREINIT:
|
|
int redirection;
|
|
CODE:
|
|
RETVAL = (char *) server_redirect_peek_signal(server, event, args, &redirection);
|
|
OUTPUT:
|
|
RETVAL
|
|
|
|
MODULE = Irssi::Irc::Server PACKAGE = Irssi::Irc::Connect PREFIX = irc_server_
|
|
|
|
Irssi::Irc::Server
|
|
irc_server_connect(conn)
|
|
Irssi::Irc::Connect conn
|