/*=================================================================
   Copyright (C) 2012 2013 BizStation Corp All rights reserved.

   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 "debuglog.h"
#include <bzs/env/fileopen.h>
#include <algorithm>
#include <time.h>

namespace bzs
{
namespace rtl
{

#ifdef DEBUG_PROFILE
boost::timer::cpu_timer g_t;
#endif

static char datebuf[30];

debuglog* debuglog::m_ptr = NULL;
boost::mutex debuglog::m_mutex;
char debuglog::logfilename[MAX_PATH];

const char* dateTimeStr(char* buf, unsigned int bufsize)
{
    struct tm* date;
    time_t now;
    time(&now);
    struct tm tmp;
    date = &tmp;
    localtime_x(date, &now);
    sprintf_s(buf, bufsize, "%04d/%02d/%02d %02d:%02d:%02d",
              date->tm_year + 1900, date->tm_mon + 1, date->tm_mday,
              date->tm_hour, date->tm_min, date->tm_sec);
    return buf;
}

const char* debuglog::dateTime()
{
    return dateTimeStr(datebuf, 30);
}

void debuglog::write(const char* msg)
{
    boost::mutex::scoped_lock lck(m_mutex);
    FILE* fp = fileOpen(logfilename, "a+");
    if (fp)
    {
        fputs(dateTime(), fp);
        fputs(" ", fp);
        fputs(msg, fp);
        fclose(fp);
    }
}

void debuglog::dump(FILE* fp, const char* p, int size, int limit)
{
    size = std::min<int>(size, limit);
    for (int i = 0; i < size; i += 16)
    {

        for (int j = 0; j < 16; j++)
            fprintf(fp, "%02X ", *((unsigned char*)(p + i + j)));
        fprintf(fp, " ");
        for (int j = 0; j < 16; j++)
            fprintf(fp, "%c", *((unsigned char*)(p + i + j)));
        fprintf(fp, "\n");
    }
    fprintf(fp, "\n");
}

void debuglog::writeDump(const char* msg, const char* ptr, int size)
{
    boost::mutex::scoped_lock lck(m_mutex);
    FILE* fp = fileOpen(logfilename, "a+");
    if (fp)
    {
        fputs(msg, fp);
        fputs("\n", fp);
        dump(fp, ptr, size, INT_MAX);

        fclose(fp);
    }
}

} // namespace rtl
} // namespace bzs