irssi/src/perl/irc/Modes.xs

#include "module.h"

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

void
modes_join(old, mode, channel)
	char *old
	char *mode
        int channel
PREINIT:
	char *ret;
PPCODE:
	ret = modes_join(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)
	Irssi::Irc::Channel channel
	char *ban
Dependencies finally work correctly in perl libraries (they're each compiled separately now). Added statusbar code to available to perl, it's now possible to create new statusbar items with perl scripts. statusbar_items_redraw(char *name) can now be used to easily redraw all named statusbar items in screen. Probably several other changes I've already forgotten :) git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1861 dbcabf3a-b0e7-0310-adc4-f8d773084564 2001-10-20 15:52:07 -04:00			`#include "module.h"`

			`MODULE = Irssi::Irc::Modes PACKAGE = Irssi::Irc`
			`PROTOTYPES: ENABLE`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00
fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`void`
updating user modes were handled as they were channel modes, like +o etc. thought they needed arguments. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@735 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-13 18:05:57 -04:00			`modes_join(old, mode, channel)`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00			`char *old`
			`char *mode`
updating user modes were handled as they were channel modes, like +o etc. thought they needed arguments. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@735 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-13 18:05:57 -04:00			`int channel`
fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`PREINIT:`
			`char *ret;`
			`PPCODE:`
			`ret = modes_join(old, mode, channel);`
fixes git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2791 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 14:25:21 -04:00			`XPUSHs(sv_2mortal(new_pv(ret)));`
fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`g_free(ret);`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00
			`#*******************************`
Dependencies finally work correctly in perl libraries (they're each compiled separately now). Added statusbar code to available to perl, it's now possible to create new statusbar items with perl scripts. statusbar_items_redraw(char *name) can now be used to easily redraw all named statusbar items in screen. Probably several other changes I've already forgotten :) git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1861 dbcabf3a-b0e7-0310-adc4-f8d773084564 2001-10-20 15:52:07 -04:00			`MODULE = Irssi::Irc::Modes PACKAGE = Irssi::Irc::Channel PREFIX = channel_`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00			`#*******************************`

fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`void`
/BANTYPE -> /SET ban_type. /BAN: -type option added to override default ban type. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1318 dbcabf3a-b0e7-0310-adc4-f8d773084564 2001-03-03 15:48:23 -05:00			`ban_get_mask(channel, nick, ban_type)`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00			`Irssi::Irc::Channel channel`
perl updates git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1089 dbcabf3a-b0e7-0310-adc4-f8d773084564 2001-01-07 04:54:21 -05:00			`char *nick`
/BANTYPE -> /SET ban_type. /BAN: -type option added to override default ban type. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1318 dbcabf3a-b0e7-0310-adc4-f8d773084564 2001-03-03 15:48:23 -05:00			`int ban_type`
fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`PREINIT:`
			`char *ret;`
			`PPCODE:`
			`ret = ban_get_mask(channel, nick, ban_type);`
fixes git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2791 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 14:25:21 -04:00			`XPUSHs(sv_2mortal(new_pv(ret)));`
fixed memory leaks with several functions. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2789 dbcabf3a-b0e7-0310-adc4-f8d773084564 2002-05-13 13:57:19 -04:00			`g_free(ret);`
Perl works again :) Split to Irssi and Irssi::Irc packages. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@705 dbcabf3a-b0e7-0310-adc4-f8d773084564 2000-10-01 16:48:48 -04:00
			`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)`
			`Irssi::Irc::Channel channel`
			`char *ban`