annotate plugins/perl/common/Log.xs @ 14020:13e7ba964993

[gaim-migrate @ 16617] Minor tweaks to the context-menu in the buddylist. committer: Tailor Script <tailor@pidgin.im>
author Sadrul Habib Chowdhury <imadil@gmail.com>
date Wed, 02 Aug 2006 13:37:13 +0000
parents c886fc7e3f24
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
1 #include "module.h"
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
2
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
3 MODULE = Gaim::Log PACKAGE = Gaim::Log PREFIX = gaim_log_
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
4 PROTOTYPES: ENABLE
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
5
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
6 int
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
7 gaim_log_common_sizer(log)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
8 Gaim::Log log
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
9
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
10 void
11294
ad976105c306 [gaim-migrate @ 13494]
Mark Doliner <mark@kingant.net>
parents: 11290
diff changeset
11 gaim_log_common_writer(log, ext)
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
12 Gaim::Log log
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
13 const char *ext
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
14
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
15 gint
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
16 gaim_log_compare(y, z)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
17 gconstpointer y
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
18 gconstpointer z
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
19
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
20 void
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
21 gaim_log_free(log)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
22 Gaim::Log log
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
23
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
24 char *
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
25 gaim_log_get_log_dir(type, name, account)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
26 Gaim::LogType type
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
27 const char *name
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
28 Gaim::Account account
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
29
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
30 void
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
31 gaim_log_get_log_sets()
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
32 PREINIT:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
33 GHashTable *l;
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
34 PPCODE:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
35 l = gaim_log_get_log_sets();
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
36 XPUSHs(sv_2mortal(gaim_perl_bless_object(l, "GHashTable")));
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
37
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
38 void
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
39 gaim_log_get_logs(type, name, account)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
40 Gaim::LogType type
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
41 const char *name
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
42 Gaim::Account account
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
43 PREINIT:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
44 GList *l;
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
45 PPCODE:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
46 for (l = gaim_log_get_logs(type, name, account); l != NULL; l = l->next) {
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
47 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
48 }
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
49
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
50 int
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
51 gaim_log_get_size(log)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
52 Gaim::Log log
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
53
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
54 void
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
55 gaim_log_get_system_logs(account)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
56 Gaim::Account account
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
57 PREINIT:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
58 GList *l;
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
59 PPCODE:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
60 for (l = gaim_log_get_system_logs(account); l != NULL; l = l->next) {
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
61 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
62 }
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
63
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
64 int
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
65 gaim_log_get_total_size(type, name, account)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
66 Gaim::LogType type
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
67 const char *name
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
68 Gaim::Account account
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
69
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
70 void
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
71 gaim_log_init()
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
72
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
73 void
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
74 gaim_log_logger_free(logger)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
75 Gaim::Log::Logger logger
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
76
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
77 void
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
78 gaim_log_logger_get_options()
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
79 PREINIT:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
80 GList *l;
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
81 PPCODE:
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
82 for (l = gaim_log_logger_get_options(); l != NULL; l = l->next) {
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
83 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
84 }
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
85
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
86 char *
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
87 gaim_log_read(log, flags)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
88 Gaim::Log log
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
89 Gaim::Log::ReadFlags flags
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
90
12780
c886fc7e3f24 [gaim-migrate @ 15127]
Etan Reisner <pidgin@unreliablesource.net>
parents: 11294
diff changeset
91 gint
11118
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
92 gaim_log_set_compare(y, z)
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
93 gconstpointer y
134d0001983d [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
94 gconstpointer z