/*
 * ModSecurity, http://www.modsecurity.org/
 * Copyright (c) 2015 Trustwave Holdings, Inc. (http://www.trustwave.com/)
 *
 * You may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * If any of the files related to licensing are missing or if you have any
 * other questions related to licensing please contact Trustwave Holdings, Inc.
 * directly using the email address security@modsecurity.org.
 *
 */

#include "audit_log/writer/parallel.h"

#include <time.h>
#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>

#include <fstream>
#include <mutex>

#include "audit_log/audit_log.h"
#include "modsecurity/transaction.h"
#include "src/utils/msc_system.h"
#include "utils/md5.h"


namespace modsecurity {
namespace audit_log {
namespace writer {


std::mutex g_writeMutex;


Parallel::~Parallel() {
    if (log1.is_open()) {
        log1.close();
    }

    if (log2.is_open()) {
        log2.close();
    }
}


inline std::string Parallel::logFilePath(time_t *t,
    int part) {
    struct tm timeinfo;
    char tstr[300];
    std::string name("");

    localtime_r(t, &timeinfo);

    if (part & YearMonthDayDirectory) {
        memset(tstr, '\0', 300);
        strftime(tstr, 299, "/%Y%m%d", &timeinfo);
        name = tstr;
    }

    if (part & YearMonthDayAndTimeDirectory) {
        memset(tstr, '\0', 300);
        strftime(tstr, 299, "/%Y%m%d-%H%M", &timeinfo);
        name = name + tstr;
    }

    if (part & YearMonthDayAndTimeFileName) {
        memset(tstr, '\0', 300);
        strftime(tstr, 299, "/%Y%m%d-%H%M%S", &timeinfo);
        name = name + tstr;
    }

    return name;
}


bool Parallel::init() {
    /** TODO:: Check if the directory exists. */
    /** TODO:: Checking if we have permission to write in the target dir */

    if (!m_audit->m_path1.empty()) {
        log1.open(m_audit->m_path1, std::fstream::out | std::fstream::app);
    }

    if (!m_audit->m_path2.empty()) {
        log2.open(m_audit->m_path2, std::fstream::out | std::fstream::app);
    }

    return true;
}


bool Parallel::write(Transaction *transaction, int parts) {
    std::lock_guard<std::mutex> guard(g_writeMutex);
    FILE *fp;
    int fd;
    std::string log = transaction->toJSON(parts);
    std::string fileName = logFilePath(&transaction->m_timeStamp,
        YearMonthDayDirectory | YearMonthDayAndTimeDirectory
        | YearMonthDayAndTimeFileName);

    std::string logPath = m_audit->m_storage_dir;
    fileName = logPath + fileName + "-" + transaction->m_id;

    if (logPath.empty()) {
      return false;
    }

    utils::createDir((logPath +
        logFilePath(&transaction->m_timeStamp, YearMonthDayDirectory)).c_str(),
        m_audit->directoryPermission);
    utils::createDir((logPath +
        logFilePath(&transaction->m_timeStamp, YearMonthDayDirectory
            | YearMonthDayAndTimeDirectory)).c_str(),
        m_audit->directoryPermission);

    fd = open(fileName.c_str(), O_CREAT | O_WRONLY, m_audit->filePermission);
    if (fd < 0) {
        return false;
    }
    fp = fdopen(fd, "w");
    fwrite(log.c_str(), log.length(), 1, fp);
    fclose(fp);

    if (log1.is_open() && log2.is_open()) {
        log2 << transaction->toOldAuditLogFormatIndex(fileName, log.length(),
            Utils::Md5::hexdigest(log));
        log2.flush();
    }
    if (log1.is_open() && !log2.is_open()) {
        log1 << transaction->toOldAuditLogFormatIndex(fileName, log.length(),
            Utils::Md5::hexdigest(log));
        log1.flush();
    }
    if (!log1.is_open() && log2.is_open()) {
        log2 << transaction->toOldAuditLogFormatIndex(fileName, log.length(),
            Utils::Md5::hexdigest(log));
        log2.flush();
    }

    return true;
}

}  // namespace writer
}  // namespace audit_log
}  // namespace modsecurity