[thirdparty/git.git] / git-compat-util.h

#ifndef GIT_COMPAT_UTIL_H
#define GIT_COMPAT_UTIL_H

#ifndef FLEX_ARRAY
#if defined(__GNUC__) && (__GNUC__ < 3)
#define FLEX_ARRAY 0
#else
#define FLEX_ARRAY /* empty */
#endif
#endif

#define ARRAY_SIZE(x) (sizeof(x)/sizeof(x[0]))

#if !defined(__APPLE__) && !defined(__FreeBSD__)
#define _XOPEN_SOURCE 600 /* glibc2 and AIX 5.3L need 500, OpenBSD needs 600 for S_ISLNK() */
#define _XOPEN_SOURCE_EXTENDED 1 /* AIX 5.3L needs this */
#endif
#define _GNU_SOURCE
#define _BSD_SOURCE

#include <unistd.h>
#include <stdio.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <stddef.h>
#include <stdlib.h>
#include <stdarg.h>
#include <string.h>
#include <errno.h>
#include <limits.h>
#include <sys/param.h>
#include <sys/types.h>
#include <dirent.h>
#include <sys/time.h>
#include <time.h>
#include <signal.h>
#include <sys/wait.h>
#include <fnmatch.h>
#include <sys/poll.h>
#include <sys/socket.h>
#include <assert.h>
#include <regex.h>
#include <netinet/in.h>
#include <netinet/tcp.h>
#include <arpa/inet.h>
#include <netdb.h>
#include <pwd.h>
#include <grp.h>

#ifndef NO_ICONV
#include <iconv.h>
#endif

/* On most systems <limits.h> would have given us this, but
 * not on some systems (e.g. GNU/Hurd).
 */
#ifndef PATH_MAX
#define PATH_MAX 4096
#endif

#ifdef __GNUC__
#define NORETURN __attribute__((__noreturn__))
#else
#define NORETURN
#ifndef __attribute__
#define __attribute__(x)
#endif
#endif

/* General helper functions */
extern void usage(const char *err) NORETURN;
extern void die(const char *err, ...) NORETURN __attribute__((format (printf, 1, 2)));
extern int error(const char *err, ...) __attribute__((format (printf, 1, 2)));
extern void warn(const char *err, ...) __attribute__((format (printf, 1, 2)));

extern void set_usage_routine(void (*routine)(const char *err) NORETURN);
extern void set_die_routine(void (*routine)(const char *err, va_list params) NORETURN);
extern void set_error_routine(void (*routine)(const char *err, va_list params));
extern void set_warn_routine(void (*routine)(const char *warn, va_list params));

#ifdef NO_MMAP

#ifndef PROT_READ
#define PROT_READ 1
#define PROT_WRITE 2
#define MAP_PRIVATE 1
#define MAP_FAILED ((void*)-1)
#endif

#define mmap git_mmap
#define munmap git_munmap
extern void *git_mmap(void *start, size_t length, int prot, int flags, int fd, off_t offset);
extern int git_munmap(void *start, size_t length);

#define DEFAULT_PACKED_GIT_WINDOW_SIZE (1 * 1024 * 1024)

#else /* NO_MMAP */

#include <sys/mman.h>
#define DEFAULT_PACKED_GIT_WINDOW_SIZE \
	(sizeof(void*) >= 8 \
		?  1 * 1024 * 1024 * 1024 \
		: 32 * 1024 * 1024)

#endif /* NO_MMAP */

#define DEFAULT_PACKED_GIT_LIMIT \
	((1024L * 1024L) * (sizeof(void*) >= 8 ? 8192 : 256))

#ifdef NO_PREAD
#define pread git_pread
extern ssize_t git_pread(int fd, void *buf, size_t count, off_t offset);
#endif

#ifdef NO_SETENV
#define setenv gitsetenv
extern int gitsetenv(const char *, const char *, int);
#endif

#ifdef NO_UNSETENV
#define unsetenv gitunsetenv
extern void gitunsetenv(const char *);
#endif

#ifdef NO_STRCASESTR
#define strcasestr gitstrcasestr
extern char *gitstrcasestr(const char *haystack, const char *needle);
#endif

#ifdef NO_STRLCPY
#define strlcpy gitstrlcpy
extern size_t gitstrlcpy(char *, const char *, size_t);
#endif

extern void release_pack_memory(size_t);

static inline char* xstrdup(const char *str)
{
	char *ret = strdup(str);
	if (!ret) {
		release_pack_memory(strlen(str) + 1);
		ret = strdup(str);
		if (!ret)
			die("Out of memory, strdup failed");
	}
	return ret;
}

static inline void *xmalloc(size_t size)
{
	void *ret = malloc(size);
	if (!ret && !size)
		ret = malloc(1);
	if (!ret) {
		release_pack_memory(size);
		ret = malloc(size);
		if (!ret && !size)
			ret = malloc(1);
		if (!ret)
			die("Out of memory, malloc failed");
	}
#ifdef XMALLOC_POISON
	memset(ret, 0xA5, size);
#endif
	return ret;
}

static inline void *xrealloc(void *ptr, size_t size)
{
	void *ret = realloc(ptr, size);
	if (!ret && !size)
		ret = realloc(ptr, 1);
	if (!ret) {
		release_pack_memory(size);
		ret = realloc(ptr, size);
		if (!ret && !size)
			ret = realloc(ptr, 1);
		if (!ret)
			die("Out of memory, realloc failed");
	}
	return ret;
}

static inline void *xcalloc(size_t nmemb, size_t size)
{
	void *ret = calloc(nmemb, size);
	if (!ret && (!nmemb || !size))
		ret = calloc(1, 1);
	if (!ret) {
		release_pack_memory(nmemb * size);
		ret = calloc(nmemb, size);
		if (!ret && (!nmemb || !size))
			ret = calloc(1, 1);
		if (!ret)
			die("Out of memory, calloc failed");
	}
	return ret;
}

static inline void *xmmap(void *start, size_t length,
	int prot, int flags, int fd, off_t offset)
{
	void *ret = mmap(start, length, prot, flags, fd, offset);
	if (ret == MAP_FAILED) {
		release_pack_memory(length);
		ret = mmap(start, length, prot, flags, fd, offset);
		if (ret == MAP_FAILED)
			die("Out of memory? mmap failed: %s", strerror(errno));
	}
	return ret;
}

static inline ssize_t xread(int fd, void *buf, size_t len)
{
	ssize_t nr;
	while (1) {
		nr = read(fd, buf, len);
		if ((nr < 0) && (errno == EAGAIN || errno == EINTR))
			continue;
		return nr;
	}
}

static inline ssize_t xwrite(int fd, const void *buf, size_t len)
{
	ssize_t nr;
	while (1) {
		nr = write(fd, buf, len);
		if ((nr < 0) && (errno == EAGAIN || errno == EINTR))
			continue;
		return nr;
	}
}

static inline int has_extension(const char *filename, const char *ext)
{
	size_t len = strlen(filename);
	size_t extlen = strlen(ext);
	return len > extlen && !memcmp(filename + len - extlen, ext, extlen);
}

/* Sane ctype - no locale, and works with signed chars */
#undef isspace
#undef isdigit
#undef isalpha
#undef isalnum
#undef tolower
#undef toupper
extern unsigned char sane_ctype[256];
#define GIT_SPACE 0x01
#define GIT_DIGIT 0x02
#define GIT_ALPHA 0x04
#define sane_istest(x,mask) ((sane_ctype[(unsigned char)(x)] & (mask)) != 0)
#define isspace(x) sane_istest(x,GIT_SPACE)
#define isdigit(x) sane_istest(x,GIT_DIGIT)
#define isalpha(x) sane_istest(x,GIT_ALPHA)
#define isalnum(x) sane_istest(x,GIT_ALPHA | GIT_DIGIT)
#define tolower(x) sane_case((unsigned char)(x), 0x20)
#define toupper(x) sane_case((unsigned char)(x), 0)

static inline int sane_case(int x, int high)
{
	if (sane_istest(x, GIT_ALPHA))
		x = (x & ~0x20) | high;
	return x;
}

#endif
Commit	Line	Data
4050c0df JH	1	#ifndef GIT_COMPAT_UTIL_H
	2	#define GIT_COMPAT_UTIL_H
	3
8f1d2e6f JH	4	#ifndef FLEX_ARRAY
	5	#if defined(__GNUC__) && (__GNUC__ < 3)
	6	#define FLEX_ARRAY 0
	7	#else
	8	#define FLEX_ARRAY /* empty */
	9	#endif
	10	#endif
	11
b4f2a6ac JH	12	#define ARRAY_SIZE(x) (sizeof(x)/sizeof(x[0]))
b4f2a6ac JH	13
95ca1c6c	14	#if !defined(__APPLE__) && !defined(__FreeBSD__)
85023577 JH	15	#define _XOPEN_SOURCE 600 /* glibc2 and AIX 5.3L need 500, OpenBSD needs 600 for S_ISLNK() */
85023577 JH	16	#define _XOPEN_SOURCE_EXTENDED 1 /* AIX 5.3L needs this */
c902c9a6	17	#endif
85023577 JH	18	#define _GNU_SOURCE
	19	#define _BSD_SOURCE
	20
4050c0df JH	21	#include <unistd.h>
	22	#include <stdio.h>
	23	#include <sys/stat.h>
	24	#include <fcntl.h>
	25	#include <stddef.h>
	26	#include <stdlib.h>
	27	#include <stdarg.h>
	28	#include <string.h>
	29	#include <errno.h>
	30	#include <limits.h>
	31	#include <sys/param.h>
4050c0df JH	32	#include <sys/types.h>
4050c0df JH	33	#include <dirent.h>
85023577 JH	34	#include <sys/time.h>
	35	#include <time.h>
	36	#include <signal.h>
	37	#include <sys/wait.h>
	38	#include <fnmatch.h>
	39	#include <sys/poll.h>
	40	#include <sys/socket.h>
	41	#include <assert.h>
	42	#include <regex.h>
	43	#include <netinet/in.h>
	44	#include <netinet/tcp.h>
	45	#include <arpa/inet.h>
	46	#include <netdb.h>
	47	#include <pwd.h>
	48	#include <grp.h>
	49
	50	#ifndef NO_ICONV
	51	#include <iconv.h>
	52	#endif
4050c0df	53
d0c2449f JH	54	/* On most systems <limits.h> would have given us this, but
	55	* not on some systems (e.g. GNU/Hurd).
	56	*/
	57	#ifndef PATH_MAX
	58	#define PATH_MAX 4096
	59	#endif
	60
4050c0df JH	61	#ifdef __GNUC__
	62	#define NORETURN __attribute__((__noreturn__))
	63	#else
	64	#define NORETURN
	65	#ifndef __attribute__
	66	#define __attribute__(x)
	67	#endif
	68	#endif
	69
	70	/* General helper functions */
	71	extern void usage(const char *err) NORETURN;
	72	extern void die(const char *err, ...) NORETURN __attribute__((format (printf, 1, 2)));
	73	extern int error(const char *err, ...) __attribute__((format (printf, 1, 2)));
fa39b6b5	74	extern void warn(const char *err, ...) __attribute__((format (printf, 1, 2)));
4050c0df	75
39a3f5ea PB	76	extern void set_usage_routine(void (routine)(const char err) NORETURN);
	77	extern void set_die_routine(void (routine)(const char err, va_list params) NORETURN);
	78	extern void set_error_routine(void (routine)(const char err, va_list params));
fa39b6b5	79	extern void set_warn_routine(void (routine)(const char warn, va_list params));
39a3f5ea	80
4050c0df JH	81	#ifdef NO_MMAP
	82
	83	#ifndef PROT_READ
	84	#define PROT_READ 1
	85	#define PROT_WRITE 2
	86	#define MAP_PRIVATE 1
	87	#define MAP_FAILED ((void*)-1)
	88	#endif
	89
d6779124 SP	90	#define mmap git_mmap
	91	#define munmap git_munmap
	92	extern void git_mmap(void start, size_t length, int prot, int flags, int fd, off_t offset);
	93	extern int git_munmap(void *start, size_t length);
4050c0df	94
8c82534d SP	95	#define DEFAULT_PACKED_GIT_WINDOW_SIZE (1 * 1024 * 1024)
8c82534d SP	96
4050c0df JH	97	#else /* NO_MMAP */
	98
	99	#include <sys/mman.h>
22bac0ea SP	100	#define DEFAULT_PACKED_GIT_WINDOW_SIZE \
	101	(sizeof(void*) >= 8 \
	102	? 1 * 1024 * 1024 * 1024 \
	103	: 32 * 1024 * 1024)
4050c0df JH	104
	105	#endif /* NO_MMAP */
	106
22bac0ea	107	#define DEFAULT_PACKED_GIT_LIMIT \
ecaebf4a	108	((1024L * 1024L) * (sizeof(void*) >= 8 ? 8192 : 256))
8c82534d	109
6900679c SH	110	#ifdef NO_PREAD
	111	#define pread git_pread
	112	extern ssize_t git_pread(int fd, void *buf, size_t count, off_t offset);
	113	#endif
	114
4050c0df JH	115	#ifdef NO_SETENV
	116	#define setenv gitsetenv
	117	extern int gitsetenv(const char , const char , int);
	118	#endif
	119
731043fd JR	120	#ifdef NO_UNSETENV
	121	#define unsetenv gitunsetenv
	122	extern void gitunsetenv(const char *);
	123	#endif
	124
4050c0df JH	125	#ifdef NO_STRCASESTR
	126	#define strcasestr gitstrcasestr
	127	extern char gitstrcasestr(const char haystack, const char *needle);
	128	#endif
	129
817151e6 PE	130	#ifdef NO_STRLCPY
	131	#define strlcpy gitstrlcpy
	132	extern size_t gitstrlcpy(char , const char , size_t);
	133	#endif
	134
97bfeb34 SP	135	extern void release_pack_memory(size_t);
97bfeb34 SP	136
9befac47 SP	137	static inline char* xstrdup(const char *str)
	138	{
	139	char *ret = strdup(str);
97bfeb34 SP	140	if (!ret) {
	141	release_pack_memory(strlen(str) + 1);
	142	ret = strdup(str);
	143	if (!ret)
	144	die("Out of memory, strdup failed");
	145	}
9befac47 SP	146	return ret;
	147	}
	148
4050c0df JH	149	static inline void *xmalloc(size_t size)
	150	{
	151	void *ret = malloc(size);
4e7a2ecc JH	152	if (!ret && !size)
4e7a2ecc JH	153	ret = malloc(1);
97bfeb34 SP	154	if (!ret) {
	155	release_pack_memory(size);
	156	ret = malloc(size);
	157	if (!ret && !size)
	158	ret = malloc(1);
	159	if (!ret)
	160	die("Out of memory, malloc failed");
	161	}
aa5481c1 JH	162	#ifdef XMALLOC_POISON
	163	memset(ret, 0xA5, size);
	164	#endif
4050c0df JH	165	return ret;
	166	}
	167
	168	static inline void xrealloc(void ptr, size_t size)
	169	{
	170	void *ret = realloc(ptr, size);
4e7a2ecc JH	171	if (!ret && !size)
4e7a2ecc JH	172	ret = realloc(ptr, 1);
97bfeb34 SP	173	if (!ret) {
	174	release_pack_memory(size);
	175	ret = realloc(ptr, size);
	176	if (!ret && !size)
	177	ret = realloc(ptr, 1);
	178	if (!ret)
	179	die("Out of memory, realloc failed");
	180	}
4050c0df JH	181	return ret;
	182	}
	183
	184	static inline void *xcalloc(size_t nmemb, size_t size)
	185	{
	186	void *ret = calloc(nmemb, size);
4e7a2ecc JH	187	if (!ret && (!nmemb \|\| !size))
4e7a2ecc JH	188	ret = calloc(1, 1);
97bfeb34 SP	189	if (!ret) {
	190	release_pack_memory(nmemb * size);
	191	ret = calloc(nmemb, size);
	192	if (!ret && (!nmemb \|\| !size))
	193	ret = calloc(1, 1);
	194	if (!ret)
	195	die("Out of memory, calloc failed");
	196	}
4050c0df JH	197	return ret;
	198	}
	199
c4712e45 SP	200	static inline void xmmap(void start, size_t length,
	201	int prot, int flags, int fd, off_t offset)
	202	{
	203	void *ret = mmap(start, length, prot, flags, fd, offset);
	204	if (ret == MAP_FAILED) {
	205	release_pack_memory(length);
	206	ret = mmap(start, length, prot, flags, fd, offset);
	207	if (ret == MAP_FAILED)
	208	die("Out of memory? mmap failed: %s", strerror(errno));
	209	}
	210	return ret;
	211	}
	212
1c15afb9 JH	213	static inline ssize_t xread(int fd, void *buf, size_t len)
	214	{
	215	ssize_t nr;
	216	while (1) {
	217	nr = read(fd, buf, len);
	218	if ((nr < 0) && (errno == EAGAIN \|\| errno == EINTR))
	219	continue;
	220	return nr;
	221	}
	222	}
	223
	224	static inline ssize_t xwrite(int fd, const void *buf, size_t len)
	225	{
	226	ssize_t nr;
	227	while (1) {
	228	nr = write(fd, buf, len);
	229	if ((nr < 0) && (errno == EAGAIN \|\| errno == EINTR))
	230	continue;
	231	return nr;
	232	}
	233	}
	234
5bb1cda5	235	static inline int has_extension(const char filename, const char ext)
83a2b841	236	{
5bb1cda5 RS	237	size_t len = strlen(filename);
5bb1cda5 RS	238	size_t extlen = strlen(ext);
83a2b841 RS	239	return len > extlen && !memcmp(filename + len - extlen, ext, extlen);
	240	}
	241
4050c0df JH	242	/* Sane ctype - no locale, and works with signed chars */
	243	#undef isspace
	244	#undef isdigit
	245	#undef isalpha
	246	#undef isalnum
	247	#undef tolower
	248	#undef toupper
	249	extern unsigned char sane_ctype[256];
	250	#define GIT_SPACE 0x01
	251	#define GIT_DIGIT 0x02
	252	#define GIT_ALPHA 0x04
	253	#define sane_istest(x,mask) ((sane_ctype[(unsigned char)(x)] & (mask)) != 0)
	254	#define isspace(x) sane_istest(x,GIT_SPACE)
	255	#define isdigit(x) sane_istest(x,GIT_DIGIT)
	256	#define isalpha(x) sane_istest(x,GIT_ALPHA)
	257	#define isalnum(x) sane_istest(x,GIT_ALPHA \| GIT_DIGIT)
	258	#define tolower(x) sane_case((unsigned char)(x), 0x20)
	259	#define toupper(x) sane_case((unsigned char)(x), 0)
	260
	261	static inline int sane_case(int x, int high)
	262	{
	263	if (sane_istest(x, GIT_ALPHA))
	264	x = (x & ~0x20) \| high;
	265	return x;
	266	}
	267
	268	#endif