File: path.cpp

package info (click to toggle)
mothur 1.48.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 13,692 kB
  • sloc: cpp: 161,866; makefile: 122; sh: 31
file content (151 lines) | stat: -rwxr-xr-x 3,039 bytes parent folder | download | duplicates (7)
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
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
#include "myutils.h"
#include "path.h"
#include "timing.h"

#define TRACE	0

const unsigned PathMagic = 0x9A783A16;

struct PathBuffer
	{
	unsigned Magic;
	char *Buffer;
	unsigned Size;
	bool InUse;
	};

static PathBuffer **g_PathBuffers;
static unsigned g_PathBufferSize;

static char *AllocBuffer(unsigned Size)
	{
	if (Size == 0)
		return 0;

// Is a free buffer that is big enough?
	for (unsigned i = 0; i < g_PathBufferSize; ++i)
		{
		PathBuffer *PB = g_PathBuffers[i];
		asserta(PB->Magic == PathMagic);
		if (!PB->InUse)
			{
			if (PB->Size >= Size)
				{
				PB->InUse = true;
				return PB->Buffer;
				}
			if (PB->Buffer == 0)
				{
				unsigned Size2 = Size + 1024;
				PB->Buffer = MYALLOC(char, Size2, Path);
				PB->Size = Size2;
				PB->InUse = true;
				return PB->Buffer;
				}
			}
		}

// No available buffer, must expand g_PathBuffers[]
	unsigned NewPathBufferSize = g_PathBufferSize + 1024;
	PathBuffer **NewPathBuffers = MYALLOC(PathBuffer *, NewPathBufferSize, Path);
	
	for (unsigned i = 0; i < g_PathBufferSize; ++i)
		NewPathBuffers[i] = g_PathBuffers[i];

	for (unsigned i = g_PathBufferSize; i < NewPathBufferSize; ++i)
		{
		PathBuffer *PB = MYALLOC(PathBuffer, 1, Path);
		PB->Magic = PathMagic;
		PB->Buffer = 0;
		PB->Size = 0;
		PB->InUse = false;
		NewPathBuffers[i] = PB;
		}

	PathBuffer *PB = NewPathBuffers[g_PathBufferSize];

	MYFREE(g_PathBuffers, g_PathBufferSize, Path);
	g_PathBuffers = NewPathBuffers;
	g_PathBufferSize = NewPathBufferSize;

	asserta(!PB->InUse && PB->Buffer == 0);

	unsigned Size2 = Size + 1024;
	PB->Buffer = MYALLOC(char, Size2, Path);
	PB->Size = Size2;
	PB->InUse = true;
	return PB->Buffer;
	}

static void FreeBuffer(char *Buffer)
	{
	if (Buffer == 0)
		return;

	for (unsigned i = 0; i < g_PathBufferSize; ++i)
		{
		PathBuffer *PB = g_PathBuffers[i];
		if (PB->Buffer == Buffer)
			{
			asserta(PB->InUse);
			PB->InUse = false;
			return;
			}
		}

	Die("FreeBuffer, not found");
	}

void PathData::Alloc(unsigned MaxLen)
	{
	if (MaxLen < Bytes)
		return;

	StartTimer(PathAlloc);
	if (Bytes > 0)
		{
		FreeBuffer(Front);
		}

	Bytes = MaxLen + 1;
	Front = AllocBuffer(Bytes);
	Back = Front + Bytes - 1;
	Start = 0;
	EndTimer(PathAlloc);
	}

void PathData::Free()
	{
	FreeBuffer(Front);
	Front = 0;
	Start = 0;
	Back = 0;
	}

void PathData::Copy(const PathData &rhs)
	{
	Alloc(rhs.Bytes);
	strcpy(Front, rhs.Front);
	Start = Front + (rhs.Start - rhs.Front);
	}

void PathData::FromStr(const char *PathStr)
	{
	asserta(PathStr != 0);
	unsigned NeededBytes = (unsigned) strlen(PathStr) + 1;
	Alloc(NeededBytes);
	strcpy(Front, PathStr);
	Start = Front;
	}

void LogPathStats()
	{
	Log("\n");
	unsigned Bytes = 0;
	for (unsigned i = 0; i < g_PathBufferSize; ++i)
		{
		const PathBuffer *PB = g_PathBuffers[i];
		Bytes += PB->Size;
		}
	Log("%u paths allocated, total memory %u bytes\n", g_PathBufferSize, Bytes);
	}