#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include <string.h>
#include <time.h>
#include "log.h"

static	int	globalErrorType = LM_DEBUG;
static	char	gLogFile[1024] = "yp_clean.log";
static	FILE	*filep = 0;
static	char	logSid[1024] = "";
static  char	logIP[255] = "";

void setErrorType(int type) {
	globalErrorType = type;
}

void setLogSid(char *sid) {
	memset(logSid, '\000', sizeof(logSid));
	strncpy(logSid, sid, sizeof(logSid)-1);
}
void setLogIP(char *ip) {
	memset(logIP, '\000', sizeof(logIP));
	strncpy(logIP, ip, sizeof(logIP)-1);
}
void setLogFile(char *file) {
	if (file) {
		strcpy(gLogFile, file);
	}
}
void closeLog() {
	if (filep) {
		fclose(filep);
	}
}
void LogMessage(int type, char *source, int line, char *fmt, ...) {
	va_list parms;
	char	errortype[25] = "";
	int	addNewline = 1;
	struct tm *tp;
	long t;
	int parseableOutput = 0;
	char    timeStamp[255];

	if (type > globalErrorType) 
        return;

	memset(timeStamp, '\000', sizeof(timeStamp));

	time(&t);
	tp = localtime(&t);
	strftime(timeStamp, sizeof(timeStamp), "%m/%d/%y %T", tp);

	switch (type) {
		case LM_ERROR:
			strcpy(errortype, "Error");
			break;
		case LM_INFO:
			strcpy(errortype, "Info");
			break;
		case LM_DEBUG:
			strcpy(errortype, "Debug");
			break;
		default:
			strcpy(errortype, "Unknown");
			break;
	}

	if (fmt[strlen(fmt)-1] == '\n') {
		addNewline = 0;
	}


    {
		va_start(parms, fmt);

		if (filep == 0) {
			filep = fopen(gLogFile, "a");
		}
		
		if (!filep) {
			fprintf(stdout, "Cannot open logfile: %s(%s:%d): ", errortype, source, line);
			vfprintf(stdout, fmt, parms);
			va_end(parms);
			if (addNewline) {
				fprintf(stdout, "\n");
			}
		}
		else {
			fprintf(filep,  "%s sid(%s) ip(%s) %s(%s:%d): ", timeStamp, logSid, logIP, errortype, source, line);
			vfprintf(filep, fmt, parms);
			va_end(parms);
			if (addNewline) {
				fprintf(filep, "\n");
			}
			fflush(filep);
			//fclose(filep);
		}

	}

}