#define PERL_NO_GET_CONTEXT
#include "module.h"

MODULE = Irssi::Log  PACKAGE = Irssi
PROTOTYPES: ENABLE

void
logs()
PREINIT:
	GSList *tmp;
PPCODE:
	for (tmp = logs; tmp != NULL; tmp = tmp->next) {
		XPUSHs(sv_2mortal(plain_bless(tmp->data, "Irssi::Log")));
	}

Irssi::Log
log_create_rec(fname, level)
	char *fname
	int level

Irssi::Log
log_find(fname)
	char *fname

#*******************************
MODULE = Irssi::Log  PACKAGE = Irssi::Log  PREFIX = log_
#*******************************

void
log_item_add(log, type, name, servertag)
	Irssi::Log log
	int type
	char *name
	char *servertag

void
log_item_destroy(log, item)
	Irssi::Log log
	Irssi::Logitem item

Irssi::Logitem
log_item_find(log, type, item, servertag)
	Irssi::Log log
	int type
	char *item
	char *servertag

void
log_update(log)
	Irssi::Log log

void
log_close(log)
	Irssi::Log log

void
log_write_rec(log, str, level, now = -1)
	Irssi::Log log
	char *str
	int level
	time_t now

void
log_start_logging(log)
	Irssi::Log log

void
log_stop_logging(log)
	Irssi::Log log