[thirdparty/git.git] / strbuf.c

#include "cache.h"
#include "refs.h"
#include "utf8.h"

int starts_with(const char *str, const char *prefix)
{
	for (; ; str++, prefix++)
		if (!*prefix)
			return 1;
		else if (*str != *prefix)
			return 0;
}

/*
 * Used as the default ->buf value, so that people can always assume
 * buf is non NULL and ->buf is NUL terminated even for a freshly
 * initialized strbuf.
 */
char strbuf_slopbuf[1];

void strbuf_init(struct strbuf *sb, size_t hint)
{
	sb->alloc = sb->len = 0;
	sb->buf = strbuf_slopbuf;
	if (hint)
		strbuf_grow(sb, hint);
}

void strbuf_release(struct strbuf *sb)
{
	if (sb->alloc) {
		free(sb->buf);
		strbuf_init(sb, 0);
	}
}

char *strbuf_detach(struct strbuf *sb, size_t *sz)
{
	char *res;
	strbuf_grow(sb, 0);
	res = sb->buf;
	if (sz)
		*sz = sb->len;
	strbuf_init(sb, 0);
	return res;
}

void strbuf_attach(struct strbuf *sb, void *buf, size_t len, size_t alloc)
{
	strbuf_release(sb);
	sb->buf   = buf;
	sb->len   = len;
	sb->alloc = alloc;
	strbuf_grow(sb, 0);
	sb->buf[sb->len] = '\0';
}

void strbuf_grow(struct strbuf *sb, size_t extra)
{
	int new_buf = !sb->alloc;
	if (unsigned_add_overflows(extra, 1) ||
	    unsigned_add_overflows(sb->len, extra + 1))
		die("you want to use way too much memory");
	if (new_buf)
		sb->buf = NULL;
	ALLOC_GROW(sb->buf, sb->len + extra + 1, sb->alloc);
	if (new_buf)
		sb->buf[0] = '\0';
}

void strbuf_trim(struct strbuf *sb)
{
	strbuf_rtrim(sb);
	strbuf_ltrim(sb);
}
void strbuf_rtrim(struct strbuf *sb)
{
	while (sb->len > 0 && isspace((unsigned char)sb->buf[sb->len - 1]))
		sb->len--;
	sb->buf[sb->len] = '\0';
}

void strbuf_ltrim(struct strbuf *sb)
{
	char *b = sb->buf;
	while (sb->len > 0 && isspace(*b)) {
		b++;
		sb->len--;
	}
	memmove(sb->buf, b, sb->len);
	sb->buf[sb->len] = '\0';
}

int strbuf_reencode(struct strbuf *sb, const char *from, const char *to)
{
	char *out;
	int len;

	if (same_encoding(from, to))
		return 0;

	out = reencode_string_len(sb->buf, sb->len, to, from, &len);
	if (!out)
		return -1;

	strbuf_attach(sb, out, len, len);
	return 0;
}

void strbuf_tolower(struct strbuf *sb)
{
	char *p = sb->buf, *end = sb->buf + sb->len;
	for (; p < end; p++)
		*p = tolower(*p);
}

struct strbuf **strbuf_split_buf(const char *str, size_t slen,
				 int terminator, int max)
{
	struct strbuf **ret = NULL;
	size_t nr = 0, alloc = 0;
	struct strbuf *t;

	while (slen) {
		int len = slen;
		if (max <= 0 || nr + 1 < max) {
			const char *end = memchr(str, terminator, slen);
			if (end)
				len = end - str + 1;
		}
		t = xmalloc(sizeof(struct strbuf));
		strbuf_init(t, len);
		strbuf_add(t, str, len);
		ALLOC_GROW(ret, nr + 2, alloc);
		ret[nr++] = t;
		str += len;
		slen -= len;
	}
	ALLOC_GROW(ret, nr + 1, alloc); /* In case string was empty */
	ret[nr] = NULL;
	return ret;
}

void strbuf_list_free(struct strbuf **sbs)
{
	struct strbuf **s = sbs;

	while (*s) {
		strbuf_release(*s);
		free(*s++);
	}
	free(sbs);
}

int strbuf_cmp(const struct strbuf *a, const struct strbuf *b)
{
	int len = a->len < b->len ? a->len: b->len;
	int cmp = memcmp(a->buf, b->buf, len);
	if (cmp)
		return cmp;
	return a->len < b->len ? -1: a->len != b->len;
}

void strbuf_splice(struct strbuf *sb, size_t pos, size_t len,
				   const void *data, size_t dlen)
{
	if (unsigned_add_overflows(pos, len))
		die("you want to use way too much memory");
	if (pos > sb->len)
		die("`pos' is too far after the end of the buffer");
	if (pos + len > sb->len)
		die("`pos + len' is too far after the end of the buffer");

	if (dlen >= len)
		strbuf_grow(sb, dlen - len);
	memmove(sb->buf + pos + dlen,
			sb->buf + pos + len,
			sb->len - pos - len);
	memcpy(sb->buf + pos, data, dlen);
	strbuf_setlen(sb, sb->len + dlen - len);
}

void strbuf_insert(struct strbuf *sb, size_t pos, const void *data, size_t len)
{
	strbuf_splice(sb, pos, 0, data, len);
}

void strbuf_remove(struct strbuf *sb, size_t pos, size_t len)
{
	strbuf_splice(sb, pos, len, NULL, 0);
}

void strbuf_add(struct strbuf *sb, const void *data, size_t len)
{
	strbuf_grow(sb, len);
	memcpy(sb->buf + sb->len, data, len);
	strbuf_setlen(sb, sb->len + len);
}

void strbuf_adddup(struct strbuf *sb, size_t pos, size_t len)
{
	strbuf_grow(sb, len);
	memcpy(sb->buf + sb->len, sb->buf + pos, len);
	strbuf_setlen(sb, sb->len + len);
}

void strbuf_addchars(struct strbuf *sb, int c, size_t n)
{
	strbuf_grow(sb, n);
	memset(sb->buf + sb->len, c, n);
	strbuf_setlen(sb, sb->len + n);
}

void strbuf_addf(struct strbuf *sb, const char *fmt, ...)
{
	va_list ap;
	va_start(ap, fmt);
	strbuf_vaddf(sb, fmt, ap);
	va_end(ap);
}

static void add_lines(struct strbuf *out,
			const char *prefix1,
			const char *prefix2,
			const char *buf, size_t size)
{
	while (size) {
		const char *prefix;
		const char *next = memchr(buf, '\n', size);
		next = next ? (next + 1) : (buf + size);

		prefix = (prefix2 && buf[0] == '\n') ? prefix2 : prefix1;
		strbuf_addstr(out, prefix);
		strbuf_add(out, buf, next - buf);
		size -= next - buf;
		buf = next;
	}
	strbuf_complete_line(out);
}

void strbuf_add_commented_lines(struct strbuf *out, const char *buf, size_t size)
{
	static char prefix1[3];
	static char prefix2[2];

	if (prefix1[0] != comment_line_char) {
		sprintf(prefix1, "%c ", comment_line_char);
		sprintf(prefix2, "%c", comment_line_char);
	}
	add_lines(out, prefix1, prefix2, buf, size);
}

void strbuf_commented_addf(struct strbuf *sb, const char *fmt, ...)
{
	va_list params;
	struct strbuf buf = STRBUF_INIT;
	int incomplete_line = sb->len && sb->buf[sb->len - 1] != '\n';

	va_start(params, fmt);
	strbuf_vaddf(&buf, fmt, params);
	va_end(params);

	strbuf_add_commented_lines(sb, buf.buf, buf.len);
	if (incomplete_line)
		sb->buf[--sb->len] = '\0';

	strbuf_release(&buf);
}

void strbuf_vaddf(struct strbuf *sb, const char *fmt, va_list ap)
{
	int len;
	va_list cp;

	if (!strbuf_avail(sb))
		strbuf_grow(sb, 64);
	va_copy(cp, ap);
	len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, cp);
	va_end(cp);
	if (len < 0)
		die("BUG: your vsnprintf is broken (returned %d)", len);
	if (len > strbuf_avail(sb)) {
		strbuf_grow(sb, len);
		len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, ap);
		if (len > strbuf_avail(sb))
			die("BUG: your vsnprintf is broken (insatiable)");
	}
	strbuf_setlen(sb, sb->len + len);
}

void strbuf_expand(struct strbuf *sb, const char *format, expand_fn_t fn,
		   void *context)
{
	for (;;) {
		const char *percent;
		size_t consumed;

		percent = strchrnul(format, '%');
		strbuf_add(sb, format, percent - format);
		if (!*percent)
			break;
		format = percent + 1;

		if (*format == '%') {
			strbuf_addch(sb, '%');
			format++;
			continue;
		}

		consumed = fn(sb, format, context);
		if (consumed)
			format += consumed;
		else
			strbuf_addch(sb, '%');
	}
}

size_t strbuf_expand_dict_cb(struct strbuf *sb, const char *placeholder,
		void *context)
{
	struct strbuf_expand_dict_entry *e = context;
	size_t len;

	for (; e->placeholder && (len = strlen(e->placeholder)); e++) {
		if (!strncmp(placeholder, e->placeholder, len)) {
			if (e->value)
				strbuf_addstr(sb, e->value);
			return len;
		}
	}
	return 0;
}

void strbuf_addbuf_percentquote(struct strbuf *dst, const struct strbuf *src)
{
	int i, len = src->len;

	for (i = 0; i < len; i++) {
		if (src->buf[i] == '%')
			strbuf_addch(dst, '%');
		strbuf_addch(dst, src->buf[i]);
	}
}

size_t strbuf_fread(struct strbuf *sb, size_t size, FILE *f)
{
	size_t res;
	size_t oldalloc = sb->alloc;

	strbuf_grow(sb, size);
	res = fread(sb->buf + sb->len, 1, size, f);
	if (res > 0)
		strbuf_setlen(sb, sb->len + res);
	else if (oldalloc == 0)
		strbuf_release(sb);
	return res;
}

ssize_t strbuf_read(struct strbuf *sb, int fd, size_t hint)
{
	size_t oldlen = sb->len;
	size_t oldalloc = sb->alloc;

	strbuf_grow(sb, hint ? hint : 8192);
	for (;;) {
		ssize_t cnt;

		cnt = xread(fd, sb->buf + sb->len, sb->alloc - sb->len - 1);
		if (cnt < 0) {
			if (oldalloc == 0)
				strbuf_release(sb);
			else
				strbuf_setlen(sb, oldlen);
			return -1;
		}
		if (!cnt)
			break;
		sb->len += cnt;
		strbuf_grow(sb, 8192);
	}

	sb->buf[sb->len] = '\0';
	return sb->len - oldlen;
}

#define STRBUF_MAXLINK (2*PATH_MAX)

int strbuf_readlink(struct strbuf *sb, const char *path, size_t hint)
{
	size_t oldalloc = sb->alloc;

	if (hint < 32)
		hint = 32;

	while (hint < STRBUF_MAXLINK) {
		int len;

		strbuf_grow(sb, hint);
		len = readlink(path, sb->buf, hint);
		if (len < 0) {
			if (errno != ERANGE)
				break;
		} else if (len < hint) {
			strbuf_setlen(sb, len);
			return 0;
		}

		/* .. the buffer was too small - try again */
		hint *= 2;
	}
	if (oldalloc == 0)
		strbuf_release(sb);
	return -1;
}

int strbuf_getcwd(struct strbuf *sb)
{
	size_t oldalloc = sb->alloc;
	size_t guessed_len = 128;

	for (;; guessed_len *= 2) {
		strbuf_grow(sb, guessed_len);
		if (getcwd(sb->buf, sb->alloc)) {
			strbuf_setlen(sb, strlen(sb->buf));
			return 0;
		}
		if (errno != ERANGE)
			break;
	}
	if (oldalloc == 0)
		strbuf_release(sb);
	else
		strbuf_reset(sb);
	return -1;
}

int strbuf_getwholeline(struct strbuf *sb, FILE *fp, int term)
{
	int ch;

	if (feof(fp))
		return EOF;

	strbuf_reset(sb);
	while ((ch = fgetc(fp)) != EOF) {
		strbuf_grow(sb, 1);
		sb->buf[sb->len++] = ch;
		if (ch == term)
			break;
	}
	if (ch == EOF && sb->len == 0)
		return EOF;

	sb->buf[sb->len] = '\0';
	return 0;
}

int strbuf_getline(struct strbuf *sb, FILE *fp, int term)
{
	if (strbuf_getwholeline(sb, fp, term))
		return EOF;
	if (sb->buf[sb->len-1] == term)
		strbuf_setlen(sb, sb->len-1);
	return 0;
}

int strbuf_getwholeline_fd(struct strbuf *sb, int fd, int term)
{
	strbuf_reset(sb);

	while (1) {
		char ch;
		ssize_t len = xread(fd, &ch, 1);
		if (len <= 0)
			return EOF;
		strbuf_addch(sb, ch);
		if (ch == term)
			break;
	}
	return 0;
}

int strbuf_read_file(struct strbuf *sb, const char *path, size_t hint)
{
	int fd, len;

	fd = open(path, O_RDONLY);
	if (fd < 0)
		return -1;
	len = strbuf_read(sb, fd, hint);
	close(fd);
	if (len < 0)
		return -1;

	return len;
}

void strbuf_add_lines(struct strbuf *out, const char *prefix,
		      const char *buf, size_t size)
{
	add_lines(out, prefix, NULL, buf, size);
}

void strbuf_addstr_xml_quoted(struct strbuf *buf, const char *s)
{
	while (*s) {
		size_t len = strcspn(s, "\"<>&");
		strbuf_add(buf, s, len);
		s += len;
		switch (*s) {
		case '"':
			strbuf_addstr(buf, "&quot;");
			break;
		case '<':
			strbuf_addstr(buf, "&lt;");
			break;
		case '>':
			strbuf_addstr(buf, "&gt;");
			break;
		case '&':
			strbuf_addstr(buf, "&amp;");
			break;
		case 0:
			return;
		}
		s++;
	}
}

static int is_rfc3986_reserved(char ch)
{
	switch (ch) {
		case '!': case '*': case '\'': case '(': case ')': case ';':
		case ':': case '@': case '&': case '=': case '+': case '$':
		case ',': case '/': case '?': case '#': case '[': case ']':
			return 1;
	}
	return 0;
}

static int is_rfc3986_unreserved(char ch)
{
	return isalnum(ch) ||
		ch == '-' || ch == '_' || ch == '.' || ch == '~';
}

static void strbuf_add_urlencode(struct strbuf *sb, const char *s, size_t len,
				 int reserved)
{
	strbuf_grow(sb, len);
	while (len--) {
		char ch = *s++;
		if (is_rfc3986_unreserved(ch) ||
		    (!reserved && is_rfc3986_reserved(ch)))
			strbuf_addch(sb, ch);
		else
			strbuf_addf(sb, "%%%02x", ch);
	}
}

void strbuf_addstr_urlencode(struct strbuf *sb, const char *s,
			     int reserved)
{
	strbuf_add_urlencode(sb, s, strlen(s), reserved);
}

void strbuf_humanise_bytes(struct strbuf *buf, off_t bytes)
{
	if (bytes > 1 << 30) {
		strbuf_addf(buf, "%u.%2.2u GiB",
			    (int)(bytes >> 30),
			    (int)(bytes & ((1 << 30) - 1)) / 10737419);
	} else if (bytes > 1 << 20) {
		int x = bytes + 5243;  /* for rounding */
		strbuf_addf(buf, "%u.%2.2u MiB",
			    x >> 20, ((x & ((1 << 20) - 1)) * 100) >> 20);
	} else if (bytes > 1 << 10) {
		int x = bytes + 5;  /* for rounding */
		strbuf_addf(buf, "%u.%2.2u KiB",
			    x >> 10, ((x & ((1 << 10) - 1)) * 100) >> 10);
	} else {
		strbuf_addf(buf, "%u bytes", (int)bytes);
	}
}

void strbuf_add_absolute_path(struct strbuf *sb, const char *path)
{
	if (!*path)
		die("The empty string is not a valid path");
	if (!is_absolute_path(path)) {
		struct stat cwd_stat, pwd_stat;
		size_t orig_len = sb->len;
		char *cwd = xgetcwd();
		char *pwd = getenv("PWD");
		if (pwd && strcmp(pwd, cwd) &&
		    !stat(cwd, &cwd_stat) &&
		    (cwd_stat.st_dev || cwd_stat.st_ino) &&
		    !stat(pwd, &pwd_stat) &&
		    pwd_stat.st_dev == cwd_stat.st_dev &&
		    pwd_stat.st_ino == cwd_stat.st_ino)
			strbuf_addstr(sb, pwd);
		else
			strbuf_addstr(sb, cwd);
		if (sb->len > orig_len && !is_dir_sep(sb->buf[sb->len - 1]))
			strbuf_addch(sb, '/');
		free(cwd);
	}
	strbuf_addstr(sb, path);
}

int printf_ln(const char *fmt, ...)
{
	int ret;
	va_list ap;
	va_start(ap, fmt);
	ret = vprintf(fmt, ap);
	va_end(ap);
	if (ret < 0 || putchar('\n') == EOF)
		return -1;
	return ret + 1;
}

int fprintf_ln(FILE *fp, const char *fmt, ...)
{
	int ret;
	va_list ap;
	va_start(ap, fmt);
	ret = vfprintf(fp, fmt, ap);
	va_end(ap);
	if (ret < 0 || putc('\n', fp) == EOF)
		return -1;
	return ret + 1;
}

char *xstrdup_tolower(const char *string)
{
	char *result;
	size_t len, i;

	len = strlen(string);
	result = xmalloc(len + 1);
	for (i = 0; i < len; i++)
		result[i] = tolower(string[i]);
	result[i] = '\0';
	return result;
}

char *xstrvfmt(const char *fmt, va_list ap)
{
	struct strbuf buf = STRBUF_INIT;
	strbuf_vaddf(&buf, fmt, ap);
	return strbuf_detach(&buf, NULL);
}

char *xstrfmt(const char *fmt, ...)
{
	va_list ap;
	char *ret;

	va_start(ap, fmt);
	ret = xstrvfmt(fmt, ap);
	va_end(ap);

	return ret;
}
Commit	Line	Data
812666c8	1	#include "cache.h"
a2fab531	2	#include "refs.h"
d4241f52	3	#include "utf8.h"
d1df5743	4
95662315 CC	5	int starts_with(const char str, const char prefix)
	6	{
	7	for (; ; str++, prefix++)
	8	if (!*prefix)
	9	return 1;
	10	else if (str != prefix)
	11	return 0;
	12	}
	13
b315c5c0 PH	14	/*
	15	* Used as the default ->buf value, so that people can always assume
	16	* buf is non NULL and ->buf is NUL terminated even for a freshly
	17	* initialized strbuf.
	18	*/
	19	char strbuf_slopbuf[1];
	20
917c9a71 PH	21	void strbuf_init(struct strbuf *sb, size_t hint)
917c9a71 PH	22	{
b315c5c0 PH	23	sb->alloc = sb->len = 0;
b315c5c0 PH	24	sb->buf = strbuf_slopbuf;
8c74ef1e	25	if (hint)
f1696ee3	26	strbuf_grow(sb, hint);
d1df5743 JH	27	}
d1df5743 JH	28
917c9a71 PH	29	void strbuf_release(struct strbuf *sb)
917c9a71 PH	30	{
b315c5c0 PH	31	if (sb->alloc) {
	32	free(sb->buf);
	33	strbuf_init(sb, 0);
	34	}
b449f4cf PH	35	}
b449f4cf PH	36
b315c5c0	37	char strbuf_detach(struct strbuf sb, size_t *sz)
917c9a71	38	{
08ad56f3 JK	39	char *res;
	40	strbuf_grow(sb, 0);
	41	res = sb->buf;
b315c5c0 PH	42	if (sz)
b315c5c0 PH	43	*sz = sb->len;
f1696ee3	44	strbuf_init(sb, 0);
b449f4cf PH	45	return res;
	46	}
	47
917c9a71 PH	48	void strbuf_attach(struct strbuf sb, void buf, size_t len, size_t alloc)
	49	{
	50	strbuf_release(sb);
	51	sb->buf = buf;
	52	sb->len = len;
	53	sb->alloc = alloc;
	54	strbuf_grow(sb, 0);
	55	sb->buf[sb->len] = '\0';
	56	}
	57
	58	void strbuf_grow(struct strbuf *sb, size_t extra)
	59	{
8c74ef1e	60	int new_buf = !sb->alloc;
1368f650 JN	61	if (unsigned_add_overflows(extra, 1) \|\|
1368f650 JN	62	unsigned_add_overflows(sb->len, extra + 1))
b449f4cf	63	die("you want to use way too much memory");
8c74ef1e	64	if (new_buf)
b315c5c0	65	sb->buf = NULL;
b449f4cf	66	ALLOC_GROW(sb->buf, sb->len + extra + 1, sb->alloc);
8c74ef1e TR	67	if (new_buf)
8c74ef1e TR	68	sb->buf[0] = '\0';
b449f4cf PH	69	}
b449f4cf PH	70
eacd6dc5 LS	71	void strbuf_trim(struct strbuf *sb)
eacd6dc5 LS	72	{
3bb55e8a BG	73	strbuf_rtrim(sb);
3bb55e8a BG	74	strbuf_ltrim(sb);
eacd6dc5	75	}
f1696ee3 PH	76	void strbuf_rtrim(struct strbuf *sb)
	77	{
	78	while (sb->len > 0 && isspace((unsigned char)sb->buf[sb->len - 1]))
	79	sb->len--;
	80	sb->buf[sb->len] = '\0';
	81	}
	82
eacd6dc5 LS	83	void strbuf_ltrim(struct strbuf *sb)
	84	{
	85	char *b = sb->buf;
	86	while (sb->len > 0 && isspace(*b)) {
	87	b++;
	88	sb->len--;
	89	}
	90	memmove(sb->buf, b, sb->len);
	91	sb->buf[sb->len] = '\0';
	92	}
	93
d4241f52 JK	94	int strbuf_reencode(struct strbuf sb, const char from, const char *to)
	95	{
	96	char *out;
	97	int len;
	98
	99	if (same_encoding(from, to))
	100	return 0;
	101
	102	out = reencode_string_len(sb->buf, sb->len, to, from, &len);
	103	if (!out)
	104	return -1;
	105
	106	strbuf_attach(sb, out, len, len);
	107	return 0;
	108	}
	109
ffb20ce1 JK	110	void strbuf_tolower(struct strbuf *sb)
	111	{
	112	char p = sb->buf, end = sb->buf + sb->len;
	113	for (; p < end; p++)
	114	p = tolower(p);
	115	}
	116
17b73dc6 MH	117	struct strbuf *strbuf_split_buf(const char str, size_t slen,
17b73dc6 MH	118	int terminator, int max)
eacd6dc5	119	{
b8c2c1fa MH	120	struct strbuf **ret = NULL;
b8c2c1fa MH	121	size_t nr = 0, alloc = 0;
eacd6dc5 LS	122	struct strbuf *t;
eacd6dc5 LS	123
1173bb33 MH	124	while (slen) {
	125	int len = slen;
	126	if (max <= 0 \|\| nr + 1 < max) {
17b73dc6	127	const char *end = memchr(str, terminator, slen);
1173bb33 MH	128	if (end)
	129	len = end - str + 1;
	130	}
eacd6dc5 LS	131	t = xmalloc(sizeof(struct strbuf));
eacd6dc5 LS	132	strbuf_init(t, len);
1173bb33	133	strbuf_add(t, str, len);
b8c2c1fa MH	134	ALLOC_GROW(ret, nr + 2, alloc);
b8c2c1fa MH	135	ret[nr++] = t;
1173bb33 MH	136	str += len;
1173bb33 MH	137	slen -= len;
eacd6dc5	138	}
b8c2c1fa MH	139	ALLOC_GROW(ret, nr + 1, alloc); /* In case string was empty */
b8c2c1fa MH	140	ret[nr] = NULL;
eacd6dc5 LS	141	return ret;
	142	}
	143
	144	void strbuf_list_free(struct strbuf **sbs)
	145	{
	146	struct strbuf **s = sbs;
	147
	148	while (*s) {
	149	strbuf_release(*s);
	150	free(*s++);
	151	}
	152	free(sbs);
	153	}
	154
9b200fd6	155	int strbuf_cmp(const struct strbuf a, const struct strbuf b)
45f66f64	156	{
8f024655 AR	157	int len = a->len < b->len ? a->len: b->len;
	158	int cmp = memcmp(a->buf, b->buf, len);
	159	if (cmp)
	160	return cmp;
	161	return a->len < b->len ? -1: a->len != b->len;
45f66f64 PH	162	}
45f66f64 PH	163
917c9a71 PH	164	void strbuf_splice(struct strbuf *sb, size_t pos, size_t len,
	165	const void *data, size_t dlen)
	166	{
1368f650	167	if (unsigned_add_overflows(pos, len))
917c9a71 PH	168	die("you want to use way too much memory");
	169	if (pos > sb->len)
	170	die("`pos' is too far after the end of the buffer");
	171	if (pos + len > sb->len)
	172	die("`pos + len' is too far after the end of the buffer");
	173
	174	if (dlen >= len)
	175	strbuf_grow(sb, dlen - len);
	176	memmove(sb->buf + pos + dlen,
	177	sb->buf + pos + len,
	178	sb->len - pos - len);
	179	memcpy(sb->buf + pos, data, dlen);
	180	strbuf_setlen(sb, sb->len + dlen - len);
	181	}
	182
c76689df PH	183	void strbuf_insert(struct strbuf sb, size_t pos, const void data, size_t len)
	184	{
	185	strbuf_splice(sb, pos, 0, data, len);
	186	}
	187
	188	void strbuf_remove(struct strbuf *sb, size_t pos, size_t len)
	189	{
	190	strbuf_splice(sb, pos, len, NULL, 0);
	191	}
	192
917c9a71 PH	193	void strbuf_add(struct strbuf sb, const void data, size_t len)
917c9a71 PH	194	{
b449f4cf PH	195	strbuf_grow(sb, len);
	196	memcpy(sb->buf + sb->len, data, len);
	197	strbuf_setlen(sb, sb->len + len);
	198	}
	199
91db267e RS	200	void strbuf_adddup(struct strbuf *sb, size_t pos, size_t len)
	201	{
	202	strbuf_grow(sb, len);
	203	memcpy(sb->buf + sb->len, sb->buf + pos, len);
	204	strbuf_setlen(sb, sb->len + len);
	205	}
	206
d07235a0 RS	207	void strbuf_addchars(struct strbuf *sb, int c, size_t n)
	208	{
	209	strbuf_grow(sb, n);
	210	memset(sb->buf + sb->len, c, n);
	211	strbuf_setlen(sb, sb->len + n);
	212	}
	213
917c9a71 PH	214	void strbuf_addf(struct strbuf sb, const char fmt, ...)
917c9a71 PH	215	{
b449f4cf	216	va_list ap;
ebeb6090 JK	217	va_start(ap, fmt);
	218	strbuf_vaddf(sb, fmt, ap);
	219	va_end(ap);
	220	}
	221
eff80a9f JH	222	static void add_lines(struct strbuf *out,
	223	const char *prefix1,
	224	const char *prefix2,
	225	const char *buf, size_t size)
	226	{
	227	while (size) {
	228	const char *prefix;
	229	const char *next = memchr(buf, '\n', size);
	230	next = next ? (next + 1) : (buf + size);
	231
	232	prefix = (prefix2 && buf[0] == '\n') ? prefix2 : prefix1;
	233	strbuf_addstr(out, prefix);
	234	strbuf_add(out, buf, next - buf);
	235	size -= next - buf;
	236	buf = next;
	237	}
	238	strbuf_complete_line(out);
	239	}
	240
	241	void strbuf_add_commented_lines(struct strbuf out, const char buf, size_t size)
	242	{
	243	static char prefix1[3];
	244	static char prefix2[2];
	245
	246	if (prefix1[0] != comment_line_char) {
	247	sprintf(prefix1, "%c ", comment_line_char);
	248	sprintf(prefix2, "%c", comment_line_char);
	249	}
	250	add_lines(out, prefix1, prefix2, buf, size);
	251	}
	252
	253	void strbuf_commented_addf(struct strbuf sb, const char fmt, ...)
	254	{
	255	va_list params;
	256	struct strbuf buf = STRBUF_INIT;
	257	int incomplete_line = sb->len && sb->buf[sb->len - 1] != '\n';
	258
	259	va_start(params, fmt);
	260	strbuf_vaddf(&buf, fmt, params);
	261	va_end(params);
	262
	263	strbuf_add_commented_lines(sb, buf.buf, buf.len);
	264	if (incomplete_line)
	265	sb->buf[--sb->len] = '\0';
	266
	267	strbuf_release(&buf);
	268	}
	269
ebeb6090 JK	270	void strbuf_vaddf(struct strbuf sb, const char fmt, va_list ap)
	271	{
	272	int len;
	273	va_list cp;
b449f4cf	274
f141bd80 SP	275	if (!strbuf_avail(sb))
f141bd80 SP	276	strbuf_grow(sb, 64);
ebeb6090 JK	277	va_copy(cp, ap);
	278	len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, cp);
	279	va_end(cp);
f141bd80	280	if (len < 0)
ebeb6090	281	die("BUG: your vsnprintf is broken (returned %d)", len);
f1696ee3	282	if (len > strbuf_avail(sb)) {
b449f4cf	283	strbuf_grow(sb, len);
b449f4cf	284	len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, ap);
ebeb6090 JK	285	if (len > strbuf_avail(sb))
ebeb6090 JK	286	die("BUG: your vsnprintf is broken (insatiable)");
b449f4cf PH	287	}
b449f4cf PH	288	strbuf_setlen(sb, sb->len + len);
d1df5743 JH	289	}
d1df5743 JH	290
c3a670de MC	291	void strbuf_expand(struct strbuf sb, const char format, expand_fn_t fn,
c3a670de MC	292	void *context)
cde75e59 RS	293	{
cde75e59 RS	294	for (;;) {
c3a670de MC	295	const char *percent;
c3a670de MC	296	size_t consumed;
cde75e59 RS	297
	298	percent = strchrnul(format, '%');
	299	strbuf_add(sb, format, percent - format);
	300	if (!*percent)
	301	break;
	302	format = percent + 1;
	303
0a0416a3 JK	304	if (*format == '%') {
	305	strbuf_addch(sb, '%');
	306	format++;
	307	continue;
	308	}
	309
c3a670de MC	310	consumed = fn(sb, format, context);
	311	if (consumed)
	312	format += consumed;
	313	else
cde75e59 RS	314	strbuf_addch(sb, '%');
	315	}
	316	}
	317
9b864e73 RS	318	size_t strbuf_expand_dict_cb(struct strbuf sb, const char placeholder,
	319	void *context)
	320	{
	321	struct strbuf_expand_dict_entry *e = context;
	322	size_t len;
	323
	324	for (; e->placeholder && (len = strlen(e->placeholder)); e++) {
	325	if (!strncmp(placeholder, e->placeholder, len)) {
	326	if (e->value)
	327	strbuf_addstr(sb, e->value);
	328	return len;
	329	}
	330	}
	331	return 0;
	332	}
	333
361df5df JK	334	void strbuf_addbuf_percentquote(struct strbuf dst, const struct strbuf src)
	335	{
	336	int i, len = src->len;
	337
	338	for (i = 0; i < len; i++) {
	339	if (src->buf[i] == '%')
	340	strbuf_addch(dst, '%');
	341	strbuf_addch(dst, src->buf[i]);
	342	}
	343	}
	344
917c9a71 PH	345	size_t strbuf_fread(struct strbuf sb, size_t size, FILE f)
917c9a71 PH	346	{
b449f4cf	347	size_t res;
2fc64700	348	size_t oldalloc = sb->alloc;
b449f4cf PH	349
	350	strbuf_grow(sb, size);
	351	res = fread(sb->buf + sb->len, 1, size, f);
2fc64700	352	if (res > 0)
b449f4cf	353	strbuf_setlen(sb, sb->len + res);
6651c3f7	354	else if (oldalloc == 0)
2fc64700	355	strbuf_release(sb);
b449f4cf	356	return res;
d1df5743 JH	357	}
d1df5743 JH	358
f1696ee3	359	ssize_t strbuf_read(struct strbuf *sb, int fd, size_t hint)
b449f4cf PH	360	{
b449f4cf PH	361	size_t oldlen = sb->len;
2fc64700	362	size_t oldalloc = sb->alloc;
b449f4cf	363
f1696ee3	364	strbuf_grow(sb, hint ? hint : 8192);
b449f4cf PH	365	for (;;) {
	366	ssize_t cnt;
	367
b449f4cf PH	368	cnt = xread(fd, sb->buf + sb->len, sb->alloc - sb->len - 1);
b449f4cf PH	369	if (cnt < 0) {
2fc64700 RS	370	if (oldalloc == 0)
	371	strbuf_release(sb);
	372	else
	373	strbuf_setlen(sb, oldlen);
b449f4cf PH	374	return -1;
	375	}
	376	if (!cnt)
	377	break;
	378	sb->len += cnt;
f1696ee3	379	strbuf_grow(sb, 8192);
b449f4cf PH	380	}
	381
	382	sb->buf[sb->len] = '\0';
	383	return sb->len - oldlen;
d1df5743 JH	384	}
d1df5743 JH	385
b11b7e13 LT	386	#define STRBUF_MAXLINK (2*PATH_MAX)
	387
	388	int strbuf_readlink(struct strbuf sb, const char path, size_t hint)
	389	{
2fc64700 RS	390	size_t oldalloc = sb->alloc;
2fc64700 RS	391
b11b7e13 LT	392	if (hint < 32)
	393	hint = 32;
	394
	395	while (hint < STRBUF_MAXLINK) {
	396	int len;
	397
	398	strbuf_grow(sb, hint);
	399	len = readlink(path, sb->buf, hint);
	400	if (len < 0) {
	401	if (errno != ERANGE)
	402	break;
	403	} else if (len < hint) {
	404	strbuf_setlen(sb, len);
	405	return 0;
	406	}
	407
	408	/* .. the buffer was too small - try again */
	409	hint *= 2;
	410	}
2fc64700 RS	411	if (oldalloc == 0)
2fc64700 RS	412	strbuf_release(sb);
b11b7e13 LT	413	return -1;
	414	}
	415
f22a76e9 RS	416	int strbuf_getcwd(struct strbuf *sb)
	417	{
	418	size_t oldalloc = sb->alloc;
	419	size_t guessed_len = 128;
	420
	421	for (;; guessed_len *= 2) {
	422	strbuf_grow(sb, guessed_len);
	423	if (getcwd(sb->buf, sb->alloc)) {
	424	strbuf_setlen(sb, strlen(sb->buf));
	425	return 0;
	426	}
	427	if (errno != ERANGE)
	428	break;
	429	}
	430	if (oldalloc == 0)
	431	strbuf_release(sb);
	432	else
	433	strbuf_reset(sb);
	434	return -1;
	435	}
	436
c7e4f0d7	437	int strbuf_getwholeline(struct strbuf sb, FILE fp, int term)
917c9a71	438	{
d1df5743	439	int ch;
e6c019d0	440
e6c019d0 PH	441	if (feof(fp))
e6c019d0 PH	442	return EOF;
b449f4cf PH	443
b449f4cf PH	444	strbuf_reset(sb);
d1df5743	445	while ((ch = fgetc(fp)) != EOF) {
b449f4cf PH	446	strbuf_grow(sb, 1);
b449f4cf PH	447	sb->buf[sb->len++] = ch;
c7e4f0d7 BC	448	if (ch == term)
c7e4f0d7 BC	449	break;
d1df5743	450	}
e6c019d0 PH	451	if (ch == EOF && sb->len == 0)
e6c019d0 PH	452	return EOF;
b449f4cf	453
b449f4cf	454	sb->buf[sb->len] = '\0';
e6c019d0	455	return 0;
d1df5743	456	}
a9390b9f	457
c7e4f0d7 BC	458	int strbuf_getline(struct strbuf sb, FILE fp, int term)
	459	{
	460	if (strbuf_getwholeline(sb, fp, term))
	461	return EOF;
	462	if (sb->buf[sb->len-1] == term)
	463	strbuf_setlen(sb, sb->len-1);
	464	return 0;
	465	}
	466
5e8617f5 TR	467	int strbuf_getwholeline_fd(struct strbuf *sb, int fd, int term)
	468	{
	469	strbuf_reset(sb);
	470
	471	while (1) {
	472	char ch;
	473	ssize_t len = xread(fd, &ch, 1);
	474	if (len <= 0)
	475	return EOF;
	476	strbuf_addch(sb, ch);
	477	if (ch == term)
	478	break;
	479	}
	480	return 0;
	481	}
	482
387e7e19	483	int strbuf_read_file(struct strbuf sb, const char path, size_t hint)
a9390b9f KH	484	{
	485	int fd, len;
	486
	487	fd = open(path, O_RDONLY);
	488	if (fd < 0)
	489	return -1;
387e7e19	490	len = strbuf_read(sb, fd, hint);
a9390b9f KH	491	close(fd);
	492	if (len < 0)
	493	return -1;
	494
	495	return len;
	496	}
895680f0 JH	497
	498	void strbuf_add_lines(struct strbuf out, const char prefix,
	499	const char *buf, size_t size)
	500	{
eff80a9f	501	add_lines(out, prefix, NULL, buf, size);
895680f0	502	}
367d20ec	503
5963c036 MH	504	void strbuf_addstr_xml_quoted(struct strbuf buf, const char s)
	505	{
	506	while (*s) {
	507	size_t len = strcspn(s, "\"<>&");
	508	strbuf_add(buf, s, len);
	509	s += len;
	510	switch (*s) {
	511	case '"':
	512	strbuf_addstr(buf, """);
	513	break;
	514	case '<':
	515	strbuf_addstr(buf, "<");
	516	break;
	517	case '>':
	518	strbuf_addstr(buf, ">");
	519	break;
	520	case '&':
	521	strbuf_addstr(buf, "&");
	522	break;
	523	case 0:
	524	return;
	525	}
	526	s++;
	527	}
	528	}
	529
c505116b JK	530	static int is_rfc3986_reserved(char ch)
	531	{
	532	switch (ch) {
	533	case '!': case '*': case '\'': case '(': case ')': case ';':
	534	case ':': case '@': case '&': case '=': case '+': case '$':
	535	case ',': case '/': case '?': case '#': case '[': case ']':
	536	return 1;
	537	}
	538	return 0;
	539	}
	540
	541	static int is_rfc3986_unreserved(char ch)
	542	{
	543	return isalnum(ch) \|\|
	544	ch == '-' \|\| ch == '_' \|\| ch == '.' \|\| ch == '~';
	545	}
	546
ea03a8e1 JH	547	static void strbuf_add_urlencode(struct strbuf sb, const char s, size_t len,
ea03a8e1 JH	548	int reserved)
c505116b JK	549	{
	550	strbuf_grow(sb, len);
	551	while (len--) {
	552	char ch = *s++;
	553	if (is_rfc3986_unreserved(ch) \|\|
	554	(!reserved && is_rfc3986_reserved(ch)))
	555	strbuf_addch(sb, ch);
	556	else
	557	strbuf_addf(sb, "%%%02x", ch);
	558	}
	559	}
	560
	561	void strbuf_addstr_urlencode(struct strbuf sb, const char s,
	562	int reserved)
	563	{
	564	strbuf_add_urlencode(sb, s, strlen(s), reserved);
	565	}
9a0a30aa	566
079b546a AP	567	void strbuf_humanise_bytes(struct strbuf *buf, off_t bytes)
	568	{
	569	if (bytes > 1 << 30) {
	570	strbuf_addf(buf, "%u.%2.2u GiB",
	571	(int)(bytes >> 30),
	572	(int)(bytes & ((1 << 30) - 1)) / 10737419);
	573	} else if (bytes > 1 << 20) {
	574	int x = bytes + 5243; /* for rounding */
	575	strbuf_addf(buf, "%u.%2.2u MiB",
	576	x >> 20, ((x & ((1 << 20) - 1)) * 100) >> 20);
	577	} else if (bytes > 1 << 10) {
	578	int x = bytes + 5; /* for rounding */
	579	strbuf_addf(buf, "%u.%2.2u KiB",
	580	x >> 10, ((x & ((1 << 10) - 1)) * 100) >> 10);
	581	} else {
	582	strbuf_addf(buf, "%u bytes", (int)bytes);
	583	}
	584	}
	585
679eebe2 RS	586	void strbuf_add_absolute_path(struct strbuf sb, const char path)
	587	{
	588	if (!*path)
	589	die("The empty string is not a valid path");
	590	if (!is_absolute_path(path)) {
	591	struct stat cwd_stat, pwd_stat;
	592	size_t orig_len = sb->len;
	593	char *cwd = xgetcwd();
	594	char *pwd = getenv("PWD");
	595	if (pwd && strcmp(pwd, cwd) &&
	596	!stat(cwd, &cwd_stat) &&
	597	(cwd_stat.st_dev \|\| cwd_stat.st_ino) &&
	598	!stat(pwd, &pwd_stat) &&
	599	pwd_stat.st_dev == cwd_stat.st_dev &&
	600	pwd_stat.st_ino == cwd_stat.st_ino)
	601	strbuf_addstr(sb, pwd);
	602	else
	603	strbuf_addstr(sb, cwd);
	604	if (sb->len > orig_len && !is_dir_sep(sb->buf[sb->len - 1]))
	605	strbuf_addch(sb, '/');
	606	free(cwd);
	607	}
	608	strbuf_addstr(sb, path);
	609	}
	610
9a0a30aa NTND	611	int printf_ln(const char *fmt, ...)
	612	{
	613	int ret;
	614	va_list ap;
	615	va_start(ap, fmt);
	616	ret = vprintf(fmt, ap);
	617	va_end(ap);
	618	if (ret < 0 \|\| putchar('\n') == EOF)
	619	return -1;
	620	return ret + 1;
	621	}
	622
	623	int fprintf_ln(FILE fp, const char fmt, ...)
	624	{
	625	int ret;
	626	va_list ap;
	627	va_start(ap, fmt);
	628	ret = vfprintf(fp, fmt, ap);
	629	va_end(ap);
	630	if (ret < 0 \|\| putc('\n', fp) == EOF)
	631	return -1;
	632	return ret + 1;
	633	}
88d5a6f6 JK	634
	635	char xstrdup_tolower(const char string)
	636	{
	637	char *result;
	638	size_t len, i;
	639
	640	len = strlen(string);
	641	result = xmalloc(len + 1);
	642	for (i = 0; i < len; i++)
	643	result[i] = tolower(string[i]);
	644	result[i] = '\0';
	645	return result;
	646	}
30a0ddb7 JK	647
	648	char xstrvfmt(const char fmt, va_list ap)
	649	{
	650	struct strbuf buf = STRBUF_INIT;
	651	strbuf_vaddf(&buf, fmt, ap);
	652	return strbuf_detach(&buf, NULL);
	653	}
	654
	655	char xstrfmt(const char fmt, ...)
	656	{
	657	va_list ap;
	658	char *ret;
	659
	660	va_start(ap, fmt);
	661	ret = xstrvfmt(fmt, ap);
	662	va_end(ap);
	663
	664	return ret;
	665	}