summaryrefslogtreecommitdiff
path: root/src/win95/debuglog.cpp
blob: 2e76b9f861f07d39f5cb3878a82e821c5f9df7d2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
#include <string.h>
#include <stdlib.h>
#include <windows.h>
#include "debuglog.hpp"

LogFile::LogFile(char const * const _fname) : fname(0) , ever_written(0)
{
	FILE * fp = fopen(_fname,"w");
	if (fp)
	{
		fclose(fp);
		fname = new char[strlen(_fname)+1];
		strcpy(fname,_fname);
		return;
	}
	char const * path = getenv("TEMP");
	if (!path) path = getenv("TMP");
	if (!path) return;
	fname = new char[strlen(path)+1+strlen(_fname)+1];
	strcpy(fname,path);
	strncat(fname,"\\",1);
	strcat(fname,_fname);
	fp = fopen(fname,"w");
	if (fp)
		fclose(fp);
	else
	{
		delete[] fname;
		fname = 0;
	}
}

LogFile::~LogFile()
{
	if (unwritten.size())
	{
		FILE * fp = fopen(fname,"a");
		for (int attempt=0; !fp && attempt<10; ++attempt)
		{
			Sleep(100);
			fp = fopen(fname,"a");
		}
		if (fp)
		{
			FlushOut(fp);
			fclose(fp);
		}
	}
	if (fname) delete[] fname;
}

LogFile & LogFile::operator = (LogFile const & l)
{
	if (&l != this)
	{
		if (fname) delete[] fname;
		if (l.fname)
		{
			fname = new char[strlen(l.fname)+1];
			strcpy(fname,l.fname);
		}
		else
			fname = 0;
			
		unwritten = l.unwritten;
		ever_written = l.ever_written;
	}
	return *this;
}

LogFile::LogFile(LogFile const & l)
: unwritten(l.unwritten)
, ever_written(l.ever_written)
{
	if (l.fname)
	{
		fname = new char[strlen(l.fname)+1];
		strcpy(fname,l.fname);
	}
	else
		fname = 0;
}

void LogFile::FlushOut(FILE * fp)
{
	while (unwritten.size())
	{
		char * str = unwritten.first_entry();
		unwritten.delete_first_entry();
		fputs(str,fp);
		delete[] str;
	}
}

int vlfprintf(LOGFILE * lfp, char const * format, va_list args )
{
	return lfp->vlprintf(format,args);
}

int lfprintf(LOGFILE * lfp, char const * format, ... )
{
	va_list ap;
	va_start(ap, format);
	int rv = lfp->vlprintf(format,ap);
	va_end(ap);
	return rv;
}

int lfputs(LOGFILE * lfp, char const * str)
{
	return lfp->lputs(str);
}

LOGFILE * lfopen(char const * fname)
{
	return new LogFile(fname);
}

void lfclose(LOGFILE * lfp)
{
	delete lfp;
}