view plugins/perl/common/Log.xs @ 11249:b4b1be482b4e

[gaim-migrate @ 13418] sf patch #1235519, from Sadrul Habib Chowdhury This is a pretty big patch that makes Gaim correctly save and restore the current status (away/available, away message, available message, invisible, etc). The GaimGtkStatusBoxWidget thing I think defaults to "Available" every time its created, which overrides the setting that was saved to the XML file. So that still needs to be fixed before this will really work. Anyway, mad props to Sadrul for putting up with my requests on this patch committer: Tailor Script <[e-mail]>

#include "module.h"


MODULE = Gaim::Log  PACKAGE = Gaim::Log  PREFIX = gaim_log_
PROTOTYPES: ENABLE



int 
gaim_log_common_sizer(log)
	Gaim::Log log

void 
gaim_log_common_writer(log, time, ext)
	Gaim::Log log
	time_t time
	const char *ext


gint 
gaim_log_compare(y, z)
	gconstpointer y
	gconstpointer z

void 
gaim_log_free(log)
	Gaim::Log log

char *
gaim_log_get_log_dir(type, name, account)
	Gaim::LogType type
	const char *name
	Gaim::Account account

void
gaim_log_get_log_sets()
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_log_get_log_sets(); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

void
gaim_log_get_logs(type, name, account)
	Gaim::LogType type
	const char *name
	Gaim::Account account
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_log_get_logs(type, name, account); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

int 
gaim_log_get_size(log)
	Gaim::Log log

void
gaim_log_get_system_logs(account)
	Gaim::Account account
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_log_get_system_logs(account); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

int 
gaim_log_get_total_size(type, name, account)
	Gaim::LogType type
	const char *name
	Gaim::Account account

void 
gaim_log_init()
 

void 
gaim_log_logger_free(logger)
	Gaim::Log::Logger logger

void
gaim_log_logger_get_options()
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_log_logger_get_options(); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

char *
gaim_log_read(log, flags)
	Gaim::Log log
	Gaim::Log::ReadFlags flags

gint 
gaim_log_set_compare(y, z)
	gconstpointer y
	gconstpointer z