summaryrefslogtreecommitdiffstatshomepage
path: root/src/emu/netlist/pstring.h
blob: f4b1dd5078e7d971227eb6dc621dda9ee4114220 (plain) (blame)
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
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
// license:GPL-2.0+
// copyright-holders:Couriersud
/*
 * pstring.h
 */

#ifndef _PSTRING_H_
#define _PSTRING_H_

#include "nl_config.h"
#include <cstdio>

// ----------------------------------------------------------------------------------------
// pblockbool: allocate small memory more efficiently at the expense of some overhead
// ----------------------------------------------------------------------------------------

struct pblockpool {
	NETLIST_PREVENT_COPYING(pblockpool)
public:
	static const int MINDATASIZE = 8;

	pblockpool();
	~pblockpool();

	void resetmem();

	void *alloc(std::size_t n);
	void dealloc(void *ptr);

	template<class T>
	void destroy(T* object)
	{
		object->~T();
		dealloc(object);
	}
	bool m_shutdown;

private:
	struct memblock
	{
		memblock *next;
		int size;
		int allocated;
		int remaining;
		char *cur;
		char data[MINDATASIZE];
	};

	memblock *m_first;
	int m_blocksize;
	int m_align;
};

/* objects must be destroyed using destroy above */

inline void *operator new(std::size_t size, pblockpool &pool, int extra = 0) throw (std::bad_alloc)
{
	void *result = pool.alloc(size + extra);
	//std::printf("allocating %ld + %d\n", size, extra);
	if (result == NULL)
		throw std::bad_alloc();
	return result;
}

inline void operator delete(void *pMem, pblockpool &pool, int extra)
{
	pool.dealloc(pMem);
}

// ----------------------------------------------------------------------------------------
// nstring: immutable strings ...
//
// nstrings are just a pointer to a "pascal-style" string representation.
// It uses reference counts and only uses new memory when a string changes.
// ----------------------------------------------------------------------------------------

struct pstring
{
public:
	// simple construction/destruction
	pstring()
	{
		init();
	}
	~pstring();

	// construction with copy
	pstring(const char *string) {init(); if (string != NULL && *string != 0) pcopy(string); }
	pstring(const pstring &string) {init(); pcopy(string); }

	// assignment operators
	pstring &operator=(const char *string) { pcopy(string); return *this; }
	pstring &operator=(const pstring &string) { pcopy(string); return *this; }

	// C string conversion operators and helpers
	operator const char *() const { return m_ptr->str(); }
	inline const char *cstr() const { return m_ptr->str(); }

	// concatenation operators
	pstring& operator+=(const pstring &string) { pcat(string.cstr()); return *this; }
	friend pstring operator+(const pstring &lhs, const pstring &rhs) { return pstring(lhs) += rhs; }
	friend pstring operator+(const pstring &lhs, const char *rhs) { return pstring(lhs) += rhs; }
	friend pstring operator+(const char *lhs, const pstring &rhs) { return pstring(lhs) += rhs; }

	// comparison operators
	bool operator==(const char *string) const { return (pcmp(string) == 0); }
	bool operator==(const pstring &string) const { return (pcmp(string.cstr()) == 0); }
	bool operator!=(const char *string) const { return (pcmp(string) != 0); }
	bool operator!=(const pstring &string) const { return (pcmp(string.cstr()) != 0); }
	bool operator<(const char *string) const { return (pcmp(string) < 0); }
	bool operator<(const pstring &string) const { return (pcmp(string.cstr()) < 0); }
	bool operator<=(const char *string) const { return (pcmp(string) <= 0); }
	bool operator<=(const pstring &string) const { return (pcmp(string.cstr()) <= 0); }
	bool operator>(const char *string) const { return (pcmp(string) > 0); }
	bool operator>(const pstring &string) const { return (pcmp(string.cstr()) > 0); }
	bool operator>=(const char *string) const { return (pcmp(string) >= 0); }
	bool operator>=(const pstring &string) const { return (pcmp(string.cstr()) >= 0); }

	//
	inline int len() const { return m_ptr->len(); }

	inline bool equals(const pstring &string) { return (pcmp(string.cstr(), m_ptr->str()) == 0); }
	inline bool iequals(const pstring &string) { return (pcmpi(string.cstr(), m_ptr->str()) == 0); }

	inline int cmp(const pstring &string) const { return pcmp(string.cstr()); }
	inline int cmpi(const pstring &string) const { return pcmpi(cstr(), string.cstr()); }

	inline int find(const char *search, int start = 0) const
	{
		int alen = len();
		const char *result = strstr(cstr() + MIN(start, alen), search);
		return (result != NULL) ? (result - cstr()) : -1;
	}

	// various

	inline bool startsWith(const pstring &arg) const { return (pcmp(cstr(), arg.cstr(), arg.len()) == 0); }
	inline bool startsWith(const char *arg) const { return (pcmp(cstr(), arg, strlen(arg)) == 0); }

	// these return nstring ...
	inline pstring cat(const pstring &s) const { return *this + s; }
	inline pstring cat(const char *s) const { return *this + s; }

	pstring substr(unsigned int start, int count = -1) const ;

	inline pstring left(unsigned int count) const { return substr(0, count); }
	inline pstring right(unsigned int count) const  { return substr(len() - count, count); }

	pstring ucase() const;

	// conversions

	double as_double(bool *error = NULL) const;

	long as_long(bool *error = NULL) const;

	// printf using string as format ...

	pstring vprintf(va_list args) const;

	// static
	static pstring sprintf(const char *format, ...);
	static void resetmem();

protected:

	struct str_t
	{
		str_t(int alen) : m_ref_count(1), m_len(alen) { m_str[0] = 0; }

		char *str() { return &m_str[0]; }
		int len() { return m_len; }
	//private:
		int m_ref_count;
		int m_len;
		char m_str[1];
	};

	str_t *m_ptr;

	static pblockpool m_pool;

private:
	inline void init()
	{
		if (m_zero == NULL)
		{
			m_zero = new(pstring::m_pool, 0) pstring::str_t(0);
		}
		m_ptr = m_zero;
		m_ptr->m_ref_count++;
	}

	inline int pcmp(const char *right) const
	{
		return pcmp(m_ptr->str(), right);
	}

	inline int pcmp(const char *left, const char *right, int count = -1) const
	{
		if (count < 0)
			return strcmp(left, right);
		else
			return strncmp(left, right, count);
	}

	int pcmpi(const char *lhs, const char *rhs, int count = -1) const;

	void pcopy(const char *from, int size);

	inline void pcopy(const char *from)
	{
		pcopy(from, strlen(from));
	}

	inline void pcopy(const pstring &from)
	{
		sfree(m_ptr);
		m_ptr = from.m_ptr;
		m_ptr->m_ref_count++;
	}

	void pcat(const char *s);

	static str_t *salloc(int n);
	static void sfree(str_t *s);

	static str_t *m_zero;
};



#endif /* _PSTRING_H_ */