| 1 |
/* |
| 2 |
* Copyright (c) 2020-2022 joshua stein <jcs@jcs.org> |
| 3 |
* |
| 4 |
* Permission to use, copy, modify, and distribute this software for any |
| 5 |
* purpose with or without fee is hereby granted, provided that the above |
| 6 |
* copyright notice and this permission notice appear in all copies. |
| 7 |
* |
| 8 |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
| 9 |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
| 10 |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
| 11 |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
| 12 |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
| 13 |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
| 14 |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
| 15 |
*/ |
| 16 |
|
| 17 |
#ifndef __UTIL_H__ |
| 18 |
#define __UTIL_H__ |
| 19 |
|
| 20 |
#include <stdlib.h> |
| 21 |
#include "stdint.h" |
| 22 |
#include <time.h> |
| 23 |
|
| 24 |
/* uncomment to enable malloc tracking */ |
| 25 |
//#define MALLOC_DEBUG |
| 26 |
|
| 27 |
#define nitems(what) (sizeof((what)) / sizeof((what)[0])) |
| 28 |
#define member_size(type, member) sizeof(((type *)0)->member) |
| 29 |
|
| 30 |
#define MIN(a, b) ((a) < (b) ? (a) : (b)) |
| 31 |
#define MAX(a, b) ((a) > (b) ? (a) : (b)) |
| 32 |
#define BOUND(a, min, max) ((a) > (max) ? (max) : ((a) < (min) ? (min) : (a))) |
| 33 |
|
| 34 |
#define EXPAND_TO_FIT(var, var_size, used_size, add, grow_amount) { \ |
| 35 |
if ((used_size) + (add) >= (var_size)) { \ |
| 36 |
while ((used_size) + (add) >= (var_size)) { \ |
| 37 |
(var_size) += (grow_amount); \ |
| 38 |
} \ |
| 39 |
(var) = xrealloc((var), (var_size)); \ |
| 40 |
} \ |
| 41 |
} |
| 42 |
|
| 43 |
#define BYTES_TO_LONG(a,b,c,d) (unsigned long)(\ |
| 44 |
((unsigned long)((unsigned char)(a)) << 24) | \ |
| 45 |
((unsigned long)((unsigned char)(b)) << 16) | \ |
| 46 |
((unsigned long)((unsigned char)(c)) << 8) | \ |
| 47 |
(unsigned long)((unsigned char)(d)) ) |
| 48 |
#define BYTES_TO_SHORT(a,b) (unsigned short)(\ |
| 49 |
((unsigned short)((unsigned char)(a)) << 8) | \ |
| 50 |
(unsigned short)((unsigned char)(b)) ) |
| 51 |
|
| 52 |
/* |
| 53 |
* STR(BLAH) will make a string constant from BLAH, though this VAL |
| 54 |
* indirection is needed or it will make it "BLAH" and not the value of |
| 55 |
* BLAH |
| 56 |
*/ |
| 57 |
#define _VAL(x) #x |
| 58 |
#define STR(arg) _VAL(arg) |
| 59 |
|
| 60 |
#define SCROLLBAR_WIDTH 16 |
| 61 |
|
| 62 |
/* GetMBarHeight() is not very useful */ |
| 63 |
#define MENUBAR_HEIGHT 20 |
| 64 |
|
| 65 |
#define TICKS_PER_SEC 60L |
| 66 |
|
| 67 |
#define MAX_TEXTEDIT_SIZE 32767L |
| 68 |
|
| 69 |
/* 24107 days */ |
| 70 |
#define UNIX_TO_MAC_TIME(uts) ((unsigned long)(uts) + 2082844800) |
| 71 |
#define MAC_TO_UNIX_TIME(mts) ((unsigned long)(mts) - 2082844800) |
| 72 |
|
| 73 |
/* singly-linked lists */ |
| 74 |
#define SLIST_HEAD(name, type) struct name { struct type *slh_first; } |
| 75 |
#define SLIST_HEAD_INITIALIZER(head) { NULL } |
| 76 |
#define SLIST_ENTRY(type) struct { struct type *sle_next; } |
| 77 |
#define SLIST_FIRST(head) ((head)->slh_first) |
| 78 |
#define SLIST_END(head) NULL |
| 79 |
#define SLIST_EMPTY(head) (SLIST_FIRST(head) == SLIST_END(head)) |
| 80 |
#define SLIST_NEXT(elm, field) ((elm)->field.sle_next) |
| 81 |
#define SLIST_INIT(head) do { SLIST_FIRST((head)) = NULL; } while (0) |
| 82 |
#define SLIST_FOREACH(var, head, field) \ |
| 83 |
for ((var) = SLIST_FIRST(head); \ |
| 84 |
(var) != SLIST_END(head); \ |
| 85 |
(var) = SLIST_NEXT(var, field)) |
| 86 |
|
| 87 |
#define SLIST_FOREACH_SAFE(var, head, field, tvar) \ |
| 88 |
for ((var) = SLIST_FIRST(head); \ |
| 89 |
(var) && ((tvar) = SLIST_NEXT(var, field), 1); \ |
| 90 |
(var) = (tvar)) |
| 91 |
|
| 92 |
#define SLIST_INSERT_AFTER(slistelm, elm, field) do { \ |
| 93 |
(elm)->field.sle_next = (slistelm)->field.sle_next; \ |
| 94 |
(slistelm)->field.sle_next = (elm); \ |
| 95 |
} while (0) |
| 96 |
|
| 97 |
#define SLIST_INSERT_HEAD(head, elm, field) do { \ |
| 98 |
(elm)->field.sle_next = (head)->slh_first; \ |
| 99 |
(head)->slh_first = (elm); \ |
| 100 |
} while (0) |
| 101 |
|
| 102 |
#define SLIST_APPEND(head, elm, type, field) do { \ |
| 103 |
if (SLIST_EMPTY(head)) { \ |
| 104 |
SLIST_INSERT_HEAD(head, elm, field); \ |
| 105 |
} else { \ |
| 106 |
struct type *curelm = (head)->slh_first; \ |
| 107 |
while (curelm->field.sle_next != NULL) \ |
| 108 |
curelm = curelm->field.sle_next; \ |
| 109 |
curelm->field.sle_next = (elm); \ |
| 110 |
} \ |
| 111 |
} while (0) |
| 112 |
|
| 113 |
#define SLIST_REMOVE_AFTER(elm, field) do { \ |
| 114 |
(elm)->field.sle_next = (elm)->field.sle_next->field.sle_next; \ |
| 115 |
} while (0) |
| 116 |
|
| 117 |
#define SLIST_REMOVE_HEAD(head, field) do { \ |
| 118 |
(head)->slh_first = (head)->slh_first->field.sle_next; \ |
| 119 |
} while (0) |
| 120 |
|
| 121 |
#define SLIST_REMOVE(head, elm, type, field) do { \ |
| 122 |
if ((head)->slh_first == (elm)) { \ |
| 123 |
SLIST_REMOVE_HEAD((head), field); \ |
| 124 |
} else { \ |
| 125 |
struct type *curelm = (head)->slh_first; \ |
| 126 |
while (curelm->field.sle_next != (elm)) \ |
| 127 |
curelm = curelm->field.sle_next; \ |
| 128 |
curelm->field.sle_next = curelm->field.sle_next->field.sle_next; \ |
| 129 |
} \ |
| 130 |
(elm)->field.sle_next = NULL; \ |
| 131 |
} while (0) |
| 132 |
|
| 133 |
typedef struct { |
| 134 |
short push[2], rts; |
| 135 |
void *addr; |
| 136 |
} tCodeStub; |
| 137 |
|
| 138 |
struct stat { |
| 139 |
short st_mode; |
| 140 |
ssize_t st_size; |
| 141 |
time_t st_ctime; |
| 142 |
time_t st_mtime; |
| 143 |
unsigned char st_flags; |
| 144 |
}; |
| 145 |
|
| 146 |
void util_init(void); |
| 147 |
|
| 148 |
void * xmalloc(size_t); |
| 149 |
void xfree(void *ptrptr); |
| 150 |
void xfree_verify(void); |
| 151 |
void * xmalloczero(size_t); |
| 152 |
void * xcalloc(size_t, size_t); |
| 153 |
void * xrealloc(void *src, size_t size); |
| 154 |
void * xreallocarray(void *, size_t, size_t); |
| 155 |
char * xstrdup(const char *); |
| 156 |
char * xstrndup(const char *str, size_t maxlen); |
| 157 |
#ifdef MALLOC_DEBUG |
| 158 |
void xalloc_print(size_t (*printer)(const char *, ...)); |
| 159 |
#endif |
| 160 |
|
| 161 |
short getline(char *str, size_t len, char **ret); |
| 162 |
const char * ordinal(unsigned short n); |
| 163 |
size_t rtrim(char *str, char *chars); |
| 164 |
long strpos_quoted(char *str, char c); |
| 165 |
size_t hexify(unsigned char *input, size_t len, unsigned char *output); |
| 166 |
size_t unhexify(unsigned char *input, size_t len, unsigned char *output); |
| 167 |
char * OSTypeToString(OSType type); |
| 168 |
char * strcasestr(const char *s, const char *find); |
| 169 |
short strcasecmp(const char *s1, const char *s2); |
| 170 |
short strncasecmp(const char *s1, const char *s2, size_t n); |
| 171 |
long strcaseidx(const char *s, const char **list); |
| 172 |
|
| 173 |
unsigned long xorshift32(void); |
| 174 |
|
| 175 |
void panic(const char *format, ...); |
| 176 |
void warn(const char *format, ...); |
| 177 |
void note(const char *format, ...); |
| 178 |
void appicon_note(const char *format, ...); |
| 179 |
short ask(const char *format, ...); |
| 180 |
#define ASK_YES 1 |
| 181 |
#define ASK_NO 2 |
| 182 |
void about(char *program_name); |
| 183 |
void progress(char *format, ...); |
| 184 |
void window_rect(WindowPtr win, Rect *ret); |
| 185 |
void center_in_screen(short width, short height, bool titlebar, Rect *b); |
| 186 |
Point centered_sfget_dialog(void); |
| 187 |
Point centered_sfput_dialog(void); |
| 188 |
void outline_button(ControlHandle button); |
| 189 |
|
| 190 |
Handle xNewHandle(size_t size); |
| 191 |
Handle xGetResource(ResType type, short id); |
| 192 |
StringHandle xGetString(short id); |
| 193 |
char * xGetStringAsChar(short id); |
| 194 |
long xGetStringAsLong(short id); |
| 195 |
void xSetHandleSize(Handle h, Size s); |
| 196 |
|
| 197 |
short getpath(short vRefNum, Str255 fileName, Str255 *ret, bool include_file); |
| 198 |
bool FIsDir(Str255 path); |
| 199 |
short stat(char *path, struct stat *sb); |
| 200 |
short FStat(Str255 path, struct stat *sb); |
| 201 |
OSErr copy_file(Str255 source, Str255 dest, bool overwrite); |
| 202 |
OSErr copy_file_contents(short source_ref, short dest_ref); |
| 203 |
OSErr FSReadLine(short frefnum, char *buf, size_t buflen); |
| 204 |
TrapType GetTrapType(unsigned long theTrap); |
| 205 |
bool TrapAvailable(unsigned long trap); |
| 206 |
void GetSystemFolder(short *vRefNumP, long *dirIDP); |
| 207 |
void GetSystemSubfolder(OSType folder, bool create, short *vRefNumP, |
| 208 |
long *dirIDP); |
| 209 |
|
| 210 |
char * gestalt_machine_type(void); |
| 211 |
char * get_version(bool long_version); |
| 212 |
bool screen_saver_running(void); |
| 213 |
|
| 214 |
short FontHeight(short font_id, short size); |
| 215 |
void DrawGrowIconOnly(WindowPtr win); |
| 216 |
short TEGetWidth(short off, TEHandle te); |
| 217 |
void UpdateScrollbarForTE(GrafPtr win, ControlHandle scroller, TEHandle te, |
| 218 |
bool reset); |
| 219 |
void SetTrackControlTE(TEHandle te); |
| 220 |
pascal void TrackMouseDownInControl(ControlHandle control, short part); |
| 221 |
pascal bool ModalDialogFilter(DialogPtr dlg, EventRecord *event, |
| 222 |
short *hit); |
| 223 |
void PasswordDialogFieldFilterSetup(short ditl_id, char *storage, |
| 224 |
size_t len); |
| 225 |
pascal bool PasswordDialogFieldFilter(DialogPtr dlg, EventRecord *event, |
| 226 |
short *hit); |
| 227 |
void PasswordDialogFieldFinish(void); |
| 228 |
pascal void NullCaretHook(void); |
| 229 |
void HideMenuBar(void); |
| 230 |
void RestoreHiddenMenuBar(void); |
| 231 |
bool CommandPeriodPressed(void); |
| 232 |
|
| 233 |
size_t strlcat(char *dst, const char *src, size_t dsize); |
| 234 |
size_t strlcpy(char *dst, const char *src, size_t dsize); |
| 235 |
char * strndup(const char *str, size_t maxlen); |
| 236 |
char * strsep(char **stringp, const char *delim); |
| 237 |
short snprintf(char *s, size_t size, const char *fmt, ...); |
| 238 |
short vsnprintf(char *s, size_t size, const char *fmt, void *p); |
| 239 |
|
| 240 |
#endif |