profanity/src/chat_log.c

/* 
 * chat_log.c
 *
 * Copyright (C) 2012 James Booth <boothj5@gmail.com>
 * 
 * This file is part of Profanity.
 *
 * Profanity 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 3 of the License, or
 * (at your option) any later version.
 *
 * Profanity 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 Profanity.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

#include <stdio.h>
#include <stdlib.h>

#include "glib.h"

#include "chat_log.h"
#include "common.h"
#include "log.h"

static GHashTable *logs;
static GTimeZone *tz;

struct dated_chat_log {
    gpointer logpp;
    GDateTime *date;
};

static void _close_file(gpointer key, gpointer value, gpointer user_data);
static gboolean _log_roll_needed(struct dated_chat_log *dated_log);

void
chat_log_init(void)
{
    log_info("Initialising chat logs");
    tz = g_time_zone_new_local();
    logs = g_hash_table_new(NULL, (GEqualFunc) g_strcmp0);
}

void
chat_log_chat(const gchar * const login, gchar *other, 
    const gchar * const msg, chat_log_direction_t direction)
{
    struct dated_chat_log *dated_log = g_hash_table_lookup(logs, other);
    FILE *logp;
    
    // no log for user
    if (dated_log == NULL) {
        GString *log_file = g_string_new(getenv("HOME"));
        g_string_append(log_file, "/.profanity/log");
        create_dir(log_file->str);
    
        gchar *login_dir = str_replace(login, "@", "_at_");
        g_string_append_printf(log_file, "/%s", login_dir);
        create_dir(log_file->str);
        free(login_dir);
    
        gchar *other_file = str_replace(other, "@", "_at_");
        g_string_append_printf(log_file, "/%s", other_file);

        GDateTime *dt = g_date_time_new_now_local();
        gchar *date = g_date_time_format(dt, "_%d_%m_%Y.log");
        g_string_append_printf(log_file, date);

        logp = fopen(log_file->str, "a");
        
        free(other_file);
        g_string_free(log_file, TRUE);

        struct dated_chat_log *new_log = malloc(sizeof(struct dated_chat_log));
        new_log->logpp = logp;
        new_log->date = dt;
        
        g_hash_table_insert(logs, other, new_log);

    // log exists but needs rolling
    } else if (_log_roll_needed(dated_log)) {
        fclose(dated_log->logpp);        

        GString *log_file = g_string_new(getenv("HOME"));
        g_string_append(log_file, "/.profanity/log");
        create_dir(log_file->str);
    
        gchar *login_dir = str_replace(login, "@", "_at_");
        g_string_append_printf(log_file, "/%s", login_dir);
        create_dir(log_file->str);
        free(login_dir);
    
        gchar *other_file = str_replace(other, "@", "_at_");
        g_string_append_printf(log_file, "/%s", other_file);

        GDateTime *dt = g_date_time_new_now_local();
        gchar *date = g_date_time_format(dt, "_%d_%m_%Y.log");
        g_string_append_printf(log_file, date);

        logp = fopen(log_file->str, "a");
        
        free(other_file);
        g_string_free(log_file, TRUE);

        struct dated_chat_log *new_log = malloc(sizeof(struct dated_chat_log));
        new_log->logpp = logp;
        new_log->date = dt;

        g_hash_table_replace(logs, other, new_log);

    // log exists for user
    } else {
        logp = (FILE *) dated_log->logpp;
    }

    GDateTime *dt = g_date_time_new_now(tz);
    gchar *date_fmt = g_date_time_format(dt, "%H:%M:%S");

    if (direction == IN) {
        fprintf(logp, "%s - %s: %s\n", date_fmt, other, msg);
    } else {
        fprintf(logp, "%s - me: %s\n", date_fmt, msg);
    }
    fflush(logp);

    g_date_time_unref(dt);
}

static gboolean
_log_roll_needed(struct dated_chat_log *dated_log)
{
    gboolean result = FALSE;
    GDateTime *now = g_date_time_new_now_local();
    if (g_date_time_get_day_of_year(dated_log->date) !=
            g_date_time_get_day_of_year(now)) {
        result = TRUE;
    }
    g_date_time_unref(now);

    return result;
}

void
chat_log_close(void)
{
    g_hash_table_foreach(logs, (GHFunc) _close_file, NULL);
    g_time_zone_unref(tz);
}

static void
_close_file(gpointer key, gpointer value, gpointer user_data)
{
    fclose(value);
}