[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_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_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);
	}
}

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
917c9a71 PH	207	void strbuf_addf(struct strbuf sb, const char fmt, ...)
917c9a71 PH	208	{
b449f4cf	209	va_list ap;
ebeb6090 JK	210	va_start(ap, fmt);
	211	strbuf_vaddf(sb, fmt, ap);
	212	va_end(ap);
	213	}
	214
eff80a9f JH	215	static void add_lines(struct strbuf *out,
	216	const char *prefix1,
	217	const char *prefix2,
	218	const char *buf, size_t size)
	219	{
	220	while (size) {
	221	const char *prefix;
	222	const char *next = memchr(buf, '\n', size);
	223	next = next ? (next + 1) : (buf + size);
	224
	225	prefix = (prefix2 && buf[0] == '\n') ? prefix2 : prefix1;
	226	strbuf_addstr(out, prefix);
	227	strbuf_add(out, buf, next - buf);
	228	size -= next - buf;
	229	buf = next;
	230	}
	231	strbuf_complete_line(out);
	232	}
	233
	234	void strbuf_add_commented_lines(struct strbuf out, const char buf, size_t size)
	235	{
	236	static char prefix1[3];
	237	static char prefix2[2];
	238
	239	if (prefix1[0] != comment_line_char) {
	240	sprintf(prefix1, "%c ", comment_line_char);
	241	sprintf(prefix2, "%c", comment_line_char);
	242	}
	243	add_lines(out, prefix1, prefix2, buf, size);
	244	}
	245
	246	void strbuf_commented_addf(struct strbuf sb, const char fmt, ...)
	247	{
	248	va_list params;
	249	struct strbuf buf = STRBUF_INIT;
	250	int incomplete_line = sb->len && sb->buf[sb->len - 1] != '\n';
	251
	252	va_start(params, fmt);
	253	strbuf_vaddf(&buf, fmt, params);
	254	va_end(params);
	255
	256	strbuf_add_commented_lines(sb, buf.buf, buf.len);
	257	if (incomplete_line)
	258	sb->buf[--sb->len] = '\0';
	259
	260	strbuf_release(&buf);
	261	}
	262
ebeb6090 JK	263	void strbuf_vaddf(struct strbuf sb, const char fmt, va_list ap)
	264	{
	265	int len;
	266	va_list cp;
b449f4cf	267
f141bd80 SP	268	if (!strbuf_avail(sb))
f141bd80 SP	269	strbuf_grow(sb, 64);
ebeb6090 JK	270	va_copy(cp, ap);
	271	len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, cp);
	272	va_end(cp);
f141bd80	273	if (len < 0)
ebeb6090	274	die("BUG: your vsnprintf is broken (returned %d)", len);
f1696ee3	275	if (len > strbuf_avail(sb)) {
b449f4cf	276	strbuf_grow(sb, len);
b449f4cf	277	len = vsnprintf(sb->buf + sb->len, sb->alloc - sb->len, fmt, ap);
ebeb6090 JK	278	if (len > strbuf_avail(sb))
ebeb6090 JK	279	die("BUG: your vsnprintf is broken (insatiable)");
b449f4cf PH	280	}
b449f4cf PH	281	strbuf_setlen(sb, sb->len + len);
d1df5743 JH	282	}
d1df5743 JH	283
c3a670de MC	284	void strbuf_expand(struct strbuf sb, const char format, expand_fn_t fn,
c3a670de MC	285	void *context)
cde75e59 RS	286	{
cde75e59 RS	287	for (;;) {
c3a670de MC	288	const char *percent;
c3a670de MC	289	size_t consumed;
cde75e59 RS	290
	291	percent = strchrnul(format, '%');
	292	strbuf_add(sb, format, percent - format);
	293	if (!*percent)
	294	break;
	295	format = percent + 1;
	296
0a0416a3 JK	297	if (*format == '%') {
	298	strbuf_addch(sb, '%');
	299	format++;
	300	continue;
	301	}
	302
c3a670de MC	303	consumed = fn(sb, format, context);
	304	if (consumed)
	305	format += consumed;
	306	else
cde75e59 RS	307	strbuf_addch(sb, '%');
	308	}
	309	}
	310
9b864e73 RS	311	size_t strbuf_expand_dict_cb(struct strbuf sb, const char placeholder,
	312	void *context)
	313	{
	314	struct strbuf_expand_dict_entry *e = context;
	315	size_t len;
	316
	317	for (; e->placeholder && (len = strlen(e->placeholder)); e++) {
	318	if (!strncmp(placeholder, e->placeholder, len)) {
	319	if (e->value)
	320	strbuf_addstr(sb, e->value);
	321	return len;
	322	}
	323	}
	324	return 0;
	325	}
	326
361df5df JK	327	void strbuf_addbuf_percentquote(struct strbuf dst, const struct strbuf src)
	328	{
	329	int i, len = src->len;
	330
	331	for (i = 0; i < len; i++) {
	332	if (src->buf[i] == '%')
	333	strbuf_addch(dst, '%');
	334	strbuf_addch(dst, src->buf[i]);
	335	}
	336	}
	337
917c9a71 PH	338	size_t strbuf_fread(struct strbuf sb, size_t size, FILE f)
917c9a71 PH	339	{
b449f4cf	340	size_t res;
2fc64700	341	size_t oldalloc = sb->alloc;
b449f4cf PH	342
	343	strbuf_grow(sb, size);
	344	res = fread(sb->buf + sb->len, 1, size, f);
2fc64700	345	if (res > 0)
b449f4cf	346	strbuf_setlen(sb, sb->len + res);
6651c3f7	347	else if (oldalloc == 0)
2fc64700	348	strbuf_release(sb);
b449f4cf	349	return res;
d1df5743 JH	350	}
d1df5743 JH	351
f1696ee3	352	ssize_t strbuf_read(struct strbuf *sb, int fd, size_t hint)
b449f4cf PH	353	{
b449f4cf PH	354	size_t oldlen = sb->len;
2fc64700	355	size_t oldalloc = sb->alloc;
b449f4cf	356
f1696ee3	357	strbuf_grow(sb, hint ? hint : 8192);
b449f4cf PH	358	for (;;) {
	359	ssize_t cnt;
	360
b449f4cf PH	361	cnt = xread(fd, sb->buf + sb->len, sb->alloc - sb->len - 1);
b449f4cf PH	362	if (cnt < 0) {
2fc64700 RS	363	if (oldalloc == 0)
	364	strbuf_release(sb);
	365	else
	366	strbuf_setlen(sb, oldlen);
b449f4cf PH	367	return -1;
	368	}
	369	if (!cnt)
	370	break;
	371	sb->len += cnt;
f1696ee3	372	strbuf_grow(sb, 8192);
b449f4cf PH	373	}
	374
	375	sb->buf[sb->len] = '\0';
	376	return sb->len - oldlen;
d1df5743 JH	377	}
d1df5743 JH	378
b11b7e13 LT	379	#define STRBUF_MAXLINK (2*PATH_MAX)
	380
	381	int strbuf_readlink(struct strbuf sb, const char path, size_t hint)
	382	{
2fc64700 RS	383	size_t oldalloc = sb->alloc;
2fc64700 RS	384
b11b7e13 LT	385	if (hint < 32)
	386	hint = 32;
	387
	388	while (hint < STRBUF_MAXLINK) {
	389	int len;
	390
	391	strbuf_grow(sb, hint);
	392	len = readlink(path, sb->buf, hint);
	393	if (len < 0) {
	394	if (errno != ERANGE)
	395	break;
	396	} else if (len < hint) {
	397	strbuf_setlen(sb, len);
	398	return 0;
	399	}
	400
	401	/* .. the buffer was too small - try again */
	402	hint *= 2;
	403	}
2fc64700 RS	404	if (oldalloc == 0)
2fc64700 RS	405	strbuf_release(sb);
b11b7e13 LT	406	return -1;
	407	}
	408
c7e4f0d7	409	int strbuf_getwholeline(struct strbuf sb, FILE fp, int term)
917c9a71	410	{
d1df5743	411	int ch;
e6c019d0	412
e6c019d0 PH	413	if (feof(fp))
e6c019d0 PH	414	return EOF;
b449f4cf PH	415
b449f4cf PH	416	strbuf_reset(sb);
d1df5743	417	while ((ch = fgetc(fp)) != EOF) {
b449f4cf PH	418	strbuf_grow(sb, 1);
b449f4cf PH	419	sb->buf[sb->len++] = ch;
c7e4f0d7 BC	420	if (ch == term)
c7e4f0d7 BC	421	break;
d1df5743	422	}
e6c019d0 PH	423	if (ch == EOF && sb->len == 0)
e6c019d0 PH	424	return EOF;
b449f4cf	425
b449f4cf	426	sb->buf[sb->len] = '\0';
e6c019d0	427	return 0;
d1df5743	428	}
a9390b9f	429
c7e4f0d7 BC	430	int strbuf_getline(struct strbuf sb, FILE fp, int term)
	431	{
	432	if (strbuf_getwholeline(sb, fp, term))
	433	return EOF;
	434	if (sb->buf[sb->len-1] == term)
	435	strbuf_setlen(sb, sb->len-1);
	436	return 0;
	437	}
	438
5e8617f5 TR	439	int strbuf_getwholeline_fd(struct strbuf *sb, int fd, int term)
	440	{
	441	strbuf_reset(sb);
	442
	443	while (1) {
	444	char ch;
	445	ssize_t len = xread(fd, &ch, 1);
	446	if (len <= 0)
	447	return EOF;
	448	strbuf_addch(sb, ch);
	449	if (ch == term)
	450	break;
	451	}
	452	return 0;
	453	}
	454
387e7e19	455	int strbuf_read_file(struct strbuf sb, const char path, size_t hint)
a9390b9f KH	456	{
	457	int fd, len;
	458
	459	fd = open(path, O_RDONLY);
	460	if (fd < 0)
	461	return -1;
387e7e19	462	len = strbuf_read(sb, fd, hint);
a9390b9f KH	463	close(fd);
	464	if (len < 0)
	465	return -1;
	466
	467	return len;
	468	}
895680f0 JH	469
	470	void strbuf_add_lines(struct strbuf out, const char prefix,
	471	const char *buf, size_t size)
	472	{
eff80a9f	473	add_lines(out, prefix, NULL, buf, size);
895680f0	474	}
367d20ec	475
5963c036 MH	476	void strbuf_addstr_xml_quoted(struct strbuf buf, const char s)
	477	{
	478	while (*s) {
	479	size_t len = strcspn(s, "\"<>&");
	480	strbuf_add(buf, s, len);
	481	s += len;
	482	switch (*s) {
	483	case '"':
	484	strbuf_addstr(buf, """);
	485	break;
	486	case '<':
	487	strbuf_addstr(buf, "<");
	488	break;
	489	case '>':
	490	strbuf_addstr(buf, ">");
	491	break;
	492	case '&':
	493	strbuf_addstr(buf, "&");
	494	break;
	495	case 0:
	496	return;
	497	}
	498	s++;
	499	}
	500	}
	501
c505116b JK	502	static int is_rfc3986_reserved(char ch)
	503	{
	504	switch (ch) {
	505	case '!': case '*': case '\'': case '(': case ')': case ';':
	506	case ':': case '@': case '&': case '=': case '+': case '$':
	507	case ',': case '/': case '?': case '#': case '[': case ']':
	508	return 1;
	509	}
	510	return 0;
	511	}
	512
	513	static int is_rfc3986_unreserved(char ch)
	514	{
	515	return isalnum(ch) \|\|
	516	ch == '-' \|\| ch == '_' \|\| ch == '.' \|\| ch == '~';
	517	}
	518
ea03a8e1 JH	519	static void strbuf_add_urlencode(struct strbuf sb, const char s, size_t len,
ea03a8e1 JH	520	int reserved)
c505116b JK	521	{
	522	strbuf_grow(sb, len);
	523	while (len--) {
	524	char ch = *s++;
	525	if (is_rfc3986_unreserved(ch) \|\|
	526	(!reserved && is_rfc3986_reserved(ch)))
	527	strbuf_addch(sb, ch);
	528	else
	529	strbuf_addf(sb, "%%%02x", ch);
	530	}
	531	}
	532
	533	void strbuf_addstr_urlencode(struct strbuf sb, const char s,
	534	int reserved)
	535	{
	536	strbuf_add_urlencode(sb, s, strlen(s), reserved);
	537	}
9a0a30aa	538
079b546a AP	539	void strbuf_humanise_bytes(struct strbuf *buf, off_t bytes)
	540	{
	541	if (bytes > 1 << 30) {
	542	strbuf_addf(buf, "%u.%2.2u GiB",
	543	(int)(bytes >> 30),
	544	(int)(bytes & ((1 << 30) - 1)) / 10737419);
	545	} else if (bytes > 1 << 20) {
	546	int x = bytes + 5243; /* for rounding */
	547	strbuf_addf(buf, "%u.%2.2u MiB",
	548	x >> 20, ((x & ((1 << 20) - 1)) * 100) >> 20);
	549	} else if (bytes > 1 << 10) {
	550	int x = bytes + 5; /* for rounding */
	551	strbuf_addf(buf, "%u.%2.2u KiB",
	552	x >> 10, ((x & ((1 << 10) - 1)) * 100) >> 10);
	553	} else {
	554	strbuf_addf(buf, "%u bytes", (int)bytes);
	555	}
	556	}
	557
9a0a30aa NTND	558	int printf_ln(const char *fmt, ...)
	559	{
	560	int ret;
	561	va_list ap;
	562	va_start(ap, fmt);
	563	ret = vprintf(fmt, ap);
	564	va_end(ap);
	565	if (ret < 0 \|\| putchar('\n') == EOF)
	566	return -1;
	567	return ret + 1;
	568	}
	569
	570	int fprintf_ln(FILE fp, const char fmt, ...)
	571	{
	572	int ret;
	573	va_list ap;
	574	va_start(ap, fmt);
	575	ret = vfprintf(fp, fmt, ap);
	576	va_end(ap);
	577	if (ret < 0 \|\| putc('\n', fp) == EOF)
	578	return -1;
	579	return ret + 1;
	580	}
88d5a6f6 JK	581
	582	char xstrdup_tolower(const char string)
	583	{
	584	char *result;
	585	size_t len, i;
	586
	587	len = strlen(string);
	588	result = xmalloc(len + 1);
	589	for (i = 0; i < len; i++)
	590	result[i] = tolower(string[i]);
	591	result[i] = '\0';
	592	return result;
	593	}
30a0ddb7 JK	594
	595	char xstrvfmt(const char fmt, va_list ap)
	596	{
	597	struct strbuf buf = STRBUF_INIT;
	598	strbuf_vaddf(&buf, fmt, ap);
	599	return strbuf_detach(&buf, NULL);
	600	}
	601
	602	char xstrfmt(const char fmt, ...)
	603	{
	604	va_list ap;
	605	char *ret;
	606
	607	va_start(ap, fmt);
	608	ret = xstrvfmt(fmt, ap);
	609	va_end(ap);
	610
	611	return ret;
	612	}