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
|
#ifndef UTILITY_H
#define UTILITY_H
#include <stdlib.h>
#include <string.h>
//#include <stdbool.h>
/*
* assumes the memory manager is libmm.a
* - allows malloc(0) or realloc(obj, 0)
* - catches out of memory (and calls MMout_of_memory())
* - catch free(0) and realloc(0, size) in the macros
*/
#define NIL(type) ((type *) 0)
#ifdef BWGC
#define ALLOC(type, num) \
((type *) gc_malloc(sizeof(type) * ((num)==0?1:(num))))
#define REALLOC(type, obj, num) \
(obj) ? ((type *) gc_realloc((char *) obj, sizeof(type) * ((num)==0?1:(num)))) : \
((type *) gc_malloc(sizeof(type) * ((num)==0?1:(num))))
#elif defined(CUSTOM_MALLOC)
#define ALLOC(type, num) \
((type *) CUSTOM_MALLOC(sizeof(type) * (num)))
#define REALLOC(type, obj, num) \
(obj) ? ((type *) CUSTOM_REALLOC((char *) obj, sizeof(type) * (num))) : \
((type *) CUSTOM_MALLOC(sizeof(type) * (num)))
#else
#include <stdlib.h>
#define ALLOC(type, num) \
((type *) malloc(sizeof(type) * (num)))
#define REALLOC(type, obj, num) \
(obj) ? ((type *) realloc((char *) obj, sizeof(type) * (num))) : \
((type *) malloc(sizeof(type) * (num)))
#endif
#ifdef IGNOREFREE
#define FREE(obj) \
{};
#elif defined(CUSTOM_FREE)
#define FREE(obj) \
if ((obj)) { (void) CUSTOM_FREE((char *) (obj)); (obj) = 0; }
#else
#define FREE(obj) \
if ((obj)) { (void) free((char *) (obj)); (obj) = 0; }
#endif
#include "ansi.h"
EXTERN long util_cpu_time
NULLARGS;
EXTERN char *util_path_search
ARGS((char *program));
EXTERN char *util_file_search
ARGS((char *file, char *path, char *mode));
EXTERN int util_pipefork
ARGS((char **argv, FILE **toCommand, FILE **fromCommand, int *pid));
EXTERN int util_csystem
ARGS((char *command));
EXTERN char *util_print_time
ARGS((long t));
EXTERN char *util_strsav
ARGS((char *ptr));
EXTERN char *util_tilde_expand
ARGS((char *filename));
EXTERN char *util_tilde_compress
ARGS((char *filename));
EXTERN void util_register_user
ARGS((char *user, char *directory));
#ifndef NIL_FN
#define NIL_FN(type) ((type (*)()) 0)
#endif /* NIL_FN */
#ifndef MAX
#define MAX(a,b) ((a) > (b) ? (a) : (b))
#endif /* MAX */
#ifndef MIN
#define MIN(a,b) ((a) < (b) ? (a) : (b))
#endif /* MIN */
#ifndef ABS
#define ABS(a) ((a) > 0 ? (a) : -(a))
#endif /* ABS */
#ifdef lint
#undef ALLOC /* allow for lint -h flag */
#undef REALLOC
#define ALLOC(type, num) (((type *) 0) + (num))
#define REALLOC(type, obj, num) ((obj) + (num))
#endif /* lint */
#endif
|