summaryrefslogtreecommitdiff
path: root/src/perl/irc/Modes.xs
blob: a53391b3dbd41b9031ba8b9edbd0fcbd591eb445 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
#define PERL_NO_GET_CONTEXT
#include "module.h"

MODULE = Irssi::Irc::Modes	PACKAGE = Irssi::Irc
PROTOTYPES: ENABLE

void
modes_join(server, old, mode, channel)
	Irssi::Irc::Server server
	char *old
	char *mode
        int channel
PREINIT:
	char *ret;
PPCODE:
	ret = modes_join(server, old, mode, channel);
	XPUSHs(sv_2mortal(new_pv(ret)));
	g_free(ret);

#*******************************
MODULE = Irssi::Irc::Modes	PACKAGE = Irssi::Irc::Channel  PREFIX = channel_
#*******************************

void
ban_get_mask(channel, nick, ban_type)
	Irssi::Irc::Channel channel
	char *nick
	int ban_type
PREINIT:
	char *ret;
PPCODE:
	ret = ban_get_mask(channel, nick, ban_type);
	XPUSHs(sv_2mortal(new_pv(ret)));
	g_free(ret);

Irssi::Irc::Ban
banlist_add(channel, ban, nick, time)
	Irssi::Irc::Channel channel
	char *ban
	char *nick
	time_t time

void
banlist_remove(channel, ban, nick)
	Irssi::Irc::Channel channel
	char *ban
	char *nick