summaryrefslogtreecommitdiffstats
path: root/src/perl/common/Log.xs
blob: 532095fb2167ef2ae730d2f95ef6bdf370d03211 (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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
#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