5 * Permission is hereby granted, free of charge, to any person obtaining a copy of
6 * this software and associated documentation files (the "Software"), to deal in
7 * the Software without restriction, including without limitation the rights to
8 * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
9 * of the Software, and to permit persons to whom the Software is furnished to do
10 * so, subject to the following conditions:
12 * The above copyright notice and this permission notice shall be included in all
13 * copies or substantial portions of the Software.
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
27 unsigned long long mem_ab = 0;
28 unsigned long long mem_db = 0;
29 unsigned long long mem_at = 0;
30 unsigned long long mem_dt = 0;
38 void *util_memory_a(unsigned int byte, unsigned int line, const char *file) {
39 struct memblock_t *info = malloc(sizeof(struct memblock_t) + byte);
40 void *data =(void*)((uintptr_t)info+sizeof(struct memblock_t));
41 if (!data) return NULL;
46 util_debug("MEM", "allocation: % 8u (bytes) address 0x%08X @ %s:%u\n", byte, data, file, line);
52 void util_memory_d(void *ptrn, unsigned int line, const char *file) {
54 void *data = (void*)((uintptr_t)ptrn-sizeof(struct memblock_t));
55 struct memblock_t *info = (struct memblock_t*)data;
57 util_debug("MEM", "released: % 8u (bytes) address 0x%08X @ %s:%u\n", info->byte, data, file, line);
67 util_debug("MEM", "Memory information:\n\
68 Total allocations: %llu\n\
69 Total deallocations: %llu\n\
70 Total allocated: %llu (bytes)\n\
71 Total deallocated: %llu (bytes)\n",
78 //#define mem_d(x) util_memory_d((x), __LINE__, __FILE__)
81 //#define mem_a(x) util_memory_a((x), __LINE__, __FILE__)
85 * Some string utility functions, because strdup uses malloc, and we want
86 * to track all memory (without replacing malloc).
88 char *util_strdup(const char *s) {
95 if ((len = strlen(s)) && (ptr = mem_a(len+1))) {
103 * Remove quotes from a string, escapes from \ in string
104 * as well. This function shouldn't be used to create a
105 * char array that is later freed (it uses pointer arith)
107 char *util_strrq(char *s) {
111 while ((chr = *src++) != '\0') {
114 if ((chr = *src++) == '\0')
117 } else if (chr != '"')
125 * Remove newline from a string (if it exists). This is
126 * done pointer wise instead of strlen(), and an array
129 char *util_strrnl(char *src) {
130 if (!src) return NULL;
132 while (*cpy && *cpy != '\n')
139 void util_debug(const char *area, const char *ms, ...) {
145 fprintf (stdout, "DEBUG: ");
147 fprintf(stdout, "%s", area);
148 fputs ("] ", stdout);
149 vfprintf(stdout, ms, va);
154 * Endianess swapping, all data must be stored little-endian. This
155 * reorders by stride and length, much nicer than other functions for
156 * certian-sized types like short or int.
158 void util_endianswap(void *m, int s, int l) {
162 /* ignore if we're already LE */
167 for(; i < s << 1; i++) {
168 unsigned char *p = (unsigned char *)m+w*s;
169 unsigned char t = p[i];
177 * Implements libc getline for systems that don't have it, which is
178 * assmed all. This works the same as getline().
180 int util_getline(char **lineptr, size_t *n, FILE *stream) {
185 if (!lineptr || !n || !stream)
188 if (!(*lineptr = mem_a((*n = 64))))
196 int c = getc(stream);
199 char *tmp = mem_a((*n+=(*n>16)?*n:64));
203 chr = *n + *lineptr - pos;
204 strcpy(tmp,*lineptr);
205 if (!(*lineptr = tmp)) {
209 pos = *n - chr + *lineptr;
227 return (ret = pos - *lineptr);