plugins/perl/common/Log.xs

changeset 12780
09514852c086
parent 11294
311ab2073818
equal deleted inserted replaced
12779:b0d89f38aebb 12780:09514852c086
1 #include "module.h" 1 #include "module.h"
2 2
3 MODULE = Gaim::Log PACKAGE = Gaim::Log PREFIX = gaim_log_ 3 MODULE = Gaim::Log PACKAGE = Gaim::Log PREFIX = gaim_log_
4 PROTOTYPES: ENABLE 4 PROTOTYPES: ENABLE
5 5
6 int 6 int
7 gaim_log_common_sizer(log) 7 gaim_log_common_sizer(log)
8 Gaim::Log log 8 Gaim::Log log
9 9
10 void 10 void
11 gaim_log_common_writer(log, ext) 11 gaim_log_common_writer(log, ext)
12 Gaim::Log log 12 Gaim::Log log
13 const char *ext 13 const char *ext
14 14
15 15 gint
16 gint
17 gaim_log_compare(y, z) 16 gaim_log_compare(y, z)
18 gconstpointer y 17 gconstpointer y
19 gconstpointer z 18 gconstpointer z
20 19
21 void 20 void
22 gaim_log_free(log) 21 gaim_log_free(log)
23 Gaim::Log log 22 Gaim::Log log
24 23
25 char * 24 char *
26 gaim_log_get_log_dir(type, name, account) 25 gaim_log_get_log_dir(type, name, account)
29 Gaim::Account account 28 Gaim::Account account
30 29
31 void 30 void
32 gaim_log_get_log_sets() 31 gaim_log_get_log_sets()
33 PREINIT: 32 PREINIT:
34 GHashTable *l; 33 GHashTable *l;
35 PPCODE: 34 PPCODE:
36 l = gaim_log_get_log_sets(); 35 l = gaim_log_get_log_sets();
37 XPUSHs(sv_2mortal(gaim_perl_bless_object(l, "GHashTable"))); 36 XPUSHs(sv_2mortal(gaim_perl_bless_object(l, "GHashTable")));
38 37
39 void 38 void
40 gaim_log_get_logs(type, name, account) 39 gaim_log_get_logs(type, name, account)
41 Gaim::LogType type 40 Gaim::LogType type
42 const char *name 41 const char *name
43 Gaim::Account account 42 Gaim::Account account
44 PREINIT: 43 PREINIT:
45 GList *l; 44 GList *l;
46 PPCODE: 45 PPCODE:
47 for (l = gaim_log_get_logs(type, name, account); l != NULL; l = l->next) { 46 for (l = gaim_log_get_logs(type, name, account); l != NULL; l = l->next) {
48 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); 47 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
49 } 48 }
50 49
51 int 50 int
52 gaim_log_get_size(log) 51 gaim_log_get_size(log)
53 Gaim::Log log 52 Gaim::Log log
54 53
55 void 54 void
56 gaim_log_get_system_logs(account) 55 gaim_log_get_system_logs(account)
57 Gaim::Account account 56 Gaim::Account account
58 PREINIT: 57 PREINIT:
59 GList *l; 58 GList *l;
60 PPCODE: 59 PPCODE:
61 for (l = gaim_log_get_system_logs(account); l != NULL; l = l->next) { 60 for (l = gaim_log_get_system_logs(account); l != NULL; l = l->next) {
62 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); 61 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
63 } 62 }
64 63
65 int 64 int
66 gaim_log_get_total_size(type, name, account) 65 gaim_log_get_total_size(type, name, account)
67 Gaim::LogType type 66 Gaim::LogType type
68 const char *name 67 const char *name
69 Gaim::Account account 68 Gaim::Account account
70 69
71 void 70 void
72 gaim_log_init() 71 gaim_log_init()
73
74 72
75 void 73 void
76 gaim_log_logger_free(logger) 74 gaim_log_logger_free(logger)
77 Gaim::Log::Logger logger 75 Gaim::Log::Logger logger
78 76
79 void 77 void
80 gaim_log_logger_get_options() 78 gaim_log_logger_get_options()
81 PREINIT: 79 PREINIT:
82 GList *l; 80 GList *l;
83 PPCODE: 81 PPCODE:
84 for (l = gaim_log_logger_get_options(); l != NULL; l = l->next) { 82 for (l = gaim_log_logger_get_options(); l != NULL; l = l->next) {
85 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); 83 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
86 } 84 }
87 85
88 char * 86 char *
89 gaim_log_read(log, flags) 87 gaim_log_read(log, flags)
90 Gaim::Log log 88 Gaim::Log log
91 Gaim::Log::ReadFlags flags 89 Gaim::Log::ReadFlags flags
92 90
93 gint 91 gint
94 gaim_log_set_compare(y, z) 92 gaim_log_set_compare(y, z)
95 gconstpointer y 93 gconstpointer y
96 gconstpointer z 94 gconstpointer z
97

mercurial