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
|
/* geml - General extendable macro language
* utils.h Various utility functions
*
* Copyright (C) 2016 Karel Kočí
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#include <stdio.h>
#include <stdarg.h>
#include "utils.h"
static enum Verbosity verbosity = V_INFO;
void verbosity_set(enum Verbosity level) {
if (level > V_DIE)
level = V_DIE;
else if (level < V_DEVEL)
level = V_DEVEL;
verbosity = level;
}
void verbosity_inc(void) {
verbosity--;
verbosity_set(verbosity);
}
void verbosity_dec(void) {
verbosity++;
verbosity_set(verbosity);
}
// TODO colors if terminal supports them
static const char *v_name[] = {
"DEVEL",
"DEBUG",
"INFO",
"WARN",
"ERROR",
"DIE"
};
void print_message(const char *file, const int line, enum Verbosity level, const char *msg, ...) {
ASSERT(level <= V_DIE && level >= V_DEVEL);
if (level < verbosity)
return;
fputs(v_name[level + 2], stderr);
if (verbosity <= V_DEBUG)
fprintf(stderr, ":%s:%d", file, line);
fputs(":", stderr);
va_list args;
va_start(args, msg);
vfprintf(stderr, msg, args);
va_end(args);
fputs("\n", stderr);
}
void *smalloc_internal(const char *file, const int line, size_t size) {
void *r;
r = malloc(size);
if (!r)
error_out_of_memmory_internal(file, line);
return r;
}
void *scalloc_internal(const char *file, const int line, size_t nmemb, size_t size) {
void *r;
r = calloc(nmemb, size);
if (!r)
error_out_of_memmory_internal(file, line);
return r;
}
void *srealloc_internal(const char *file, const int line, void *ptr, size_t size) {
void *r;
r = realloc(ptr, size);
if (!r)
error_out_of_memmory_internal(file, line);
return r;
}
void error_out_of_memmory_internal(const char *file, const int line) {
print_message(file, line, V_DIE, "Memory allocation failed. Out of memory?");
abort();
}
|
