[/trunk] Changeset 189 by mikael
* Add a "load_logs" variable to enable logs reading.
(Actual reading is not implemented yet...)
/*
* histolog.c -- File history handling
*
* Copyright (C) 2005 Mikael Berthe <bmikael@lists.lilotux.net>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or (at
* your option) any later version.
*
* This program is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
* USA
*/
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <ctype.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include "histolog.h"
#include "jabglue.h"
#include "screen.h"
static guint UseFileLogging;
static guint FileLoadLogs;
static char *RootDir;
// user_histo_file()
// Returns history filename for the given jid
// Note: the caller *must* free the filename after use (if not null).
static char *user_histo_file(const char *jid)
{
char *filename;
if (!UseFileLogging)
return NULL;
filename = g_new(char, strlen(RootDir) + strlen(jid) + 1);
strcpy(filename, RootDir);
strcat(filename, jid);
return filename;
}
// write()
// Adds a history (multi-)line to the jid's history logfile
static void write_histo_line(const char *jid,
time_t timestamp, guchar type, guchar info, const char *data)
{
guint len = 0;
FILE *fp;
time_t ts;
const char *p;
char *filename = user_histo_file(jid);
if (!filename)
return;
// If timestamp is null, get current date
if (timestamp)
ts = timestamp;
else
time(&ts);
if (!data)
data = "";
// Count number of extra lines
for (p=data ; *p ; p++)
if (*p == '\n') len++;
/* Line format: "TI DDDDDDDDDD LLL [data]"
* T=Type, I=Info, DDDDDDDDDD=date, LLL=0-padded-len
*
* Types:
* - M message Info: S (send) R (receive)
* - S status Info: [oaifdcn]
* We don't check them, we'll trust the caller.
*/
fp = fopen(filename, "a");
g_free(filename);
if (!fp)
return;
fprintf(fp, "%c%c %10u %03d %s\n", type, info, (unsigned int)ts, len, data);
fclose(fp);
}
// hlog_enable()
// Enable logging to files. If root_dir is NULL, then $HOME/.mcabber is used.
// If loadfiles is TRUE, we will try to load buddies history logs from file.
void hlog_enable(guint enable, char *root_dir, guint loadfiles)
{
UseFileLogging = enable;
FileLoadLogs = loadfiles;
if (enable || loadfiles) {
if (root_dir) {
int l = strlen(root_dir);
if (l < 1) {
scr_LogPrint("root_dir too short");
UseFileLogging = FALSE;
return;
}
// RootDir must be slash-terminated
if (root_dir[l-1] == '/')
RootDir = g_strdup(root_dir);
else {
RootDir = g_new(char, l+2);
strcpy(RootDir, root_dir);
strcat(RootDir, "/");
}
} else {
char *home = getenv("HOME");
char *dir = "/.mcabber/histo/";
RootDir = g_new(char, strlen(home) + strlen(dir) + 1);
strcpy(RootDir, home);
strcat(RootDir, dir);
}
// FIXME
// We should check the directory actually exists
} else // Disable history logging
if (RootDir) {
g_free(RootDir);
}
}
inline void hlog_write_message(const char *jid, time_t timestamp, int sent,
const char *msg)
{
write_histo_line(jid, timestamp, 'M', ((sent) ? 'S' : 'R'), msg);
}
inline void hlog_write_status(const char *jid, time_t timestamp,
enum imstatus status)
{
// #1 XXX Check status value?
// #2 We could add a user-readable comment
write_histo_line(jid, timestamp, 'S', toupper(imstatus2char[status]),
NULL);
}