[thirdparty/git.git] / color.c

#include "cache.h"
#include "color.h"

static int git_use_color_default = GIT_COLOR_AUTO;
int color_stdout_is_tty = -1;

/*
 * The list of available column colors.
 */
const char *column_colors_ansi[] = {
	GIT_COLOR_RED,
	GIT_COLOR_GREEN,
	GIT_COLOR_YELLOW,
	GIT_COLOR_BLUE,
	GIT_COLOR_MAGENTA,
	GIT_COLOR_CYAN,
	GIT_COLOR_BOLD_RED,
	GIT_COLOR_BOLD_GREEN,
	GIT_COLOR_BOLD_YELLOW,
	GIT_COLOR_BOLD_BLUE,
	GIT_COLOR_BOLD_MAGENTA,
	GIT_COLOR_BOLD_CYAN,
	GIT_COLOR_RESET,
};

/* Ignore the RESET at the end when giving the size */
const int column_colors_ansi_max = ARRAY_SIZE(column_colors_ansi) - 1;

/* An individual foreground or background color. */
struct color {
	enum {
		COLOR_UNSPECIFIED = 0,
		COLOR_NORMAL,
		COLOR_ANSI, /* basic 0-7 ANSI colors */
		COLOR_256,
		COLOR_RGB
	} type;
	/* The numeric value for ANSI and 256-color modes */
	unsigned char value;
	/* 24-bit RGB color values */
	unsigned char red, green, blue;
};

/*
 * "word" is a buffer of length "len"; does it match the NUL-terminated
 * "match" exactly?
 */
static int match_word(const char *word, int len, const char *match)
{
	return !strncasecmp(word, match, len) && !match[len];
}

static int get_hex_color(const char *in, unsigned char *out)
{
	unsigned int val;
	val = (hexval(in[0]) << 4) | hexval(in[1]);
	if (val & ~0xff)
		return -1;
	*out = val;
	return 0;
}

static int parse_color(struct color *out, const char *name, int len)
{
	/* Positions in array must match ANSI color codes */
	static const char * const color_names[] = {
		"black", "red", "green", "yellow",
		"blue", "magenta", "cyan", "white"
	};
	char *end;
	int i;
	long val;

	/* First try the special word "normal"... */
	if (match_word(name, len, "normal")) {
		out->type = COLOR_NORMAL;
		return 0;
	}

	/* Try a 24-bit RGB value */
	if (len == 7 && name[0] == '#') {
		if (!get_hex_color(name + 1, &out->red) &&
		    !get_hex_color(name + 3, &out->green) &&
		    !get_hex_color(name + 5, &out->blue)) {
			out->type = COLOR_RGB;
			return 0;
		}
	}

	/* Then pick from our human-readable color names... */
	for (i = 0; i < ARRAY_SIZE(color_names); i++) {
		if (match_word(name, len, color_names[i])) {
			out->type = COLOR_ANSI;
			out->value = i;
			return 0;
		}
	}

	/* And finally try a literal 256-color-mode number */
	val = strtol(name, &end, 10);
	if (end - name == len) {
		/*
		 * Allow "-1" as an alias for "normal", but other negative
		 * numbers are bogus.
		 */
		if (val < -1)
			; /* fall through to error */
		else if (val < 0) {
			out->type = COLOR_NORMAL;
			return 0;
		/* Rewrite low numbers as more-portable standard colors. */
		} else if (val < 8) {
			out->type = COLOR_ANSI;
			out->value = val;
			return 0;
		} else if (val < 256) {
			out->type = COLOR_256;
			out->value = val;
			return 0;
		}
	}

	return -1;
}

static int parse_attr(const char *name, size_t len)
{
	static const struct {
		const char *name;
		size_t len;
		int val, neg;
	} attrs[] = {
#define ATTR(x, val, neg) { (x), sizeof(x)-1, (val), (neg) }
		ATTR("bold",      1, 22),
		ATTR("dim",       2, 22),
		ATTR("italic",    3, 23),
		ATTR("ul",        4, 24),
		ATTR("blink",     5, 25),
		ATTR("reverse",   7, 27)
#undef ATTR
	};
	int negate = 0;
	int i;

	if (skip_prefix_mem(name, len, "no", &name, &len)) {
		skip_prefix_mem(name, len, "-", &name, &len);
		negate = 1;
	}

	for (i = 0; i < ARRAY_SIZE(attrs); i++) {
		if (attrs[i].len == len && !memcmp(attrs[i].name, name, len))
			return negate ? attrs[i].neg : attrs[i].val;
	}
	return -1;
}

int color_parse(const char *value, char *dst)
{
	return color_parse_mem(value, strlen(value), dst);
}

/*
 * Write the ANSI color codes for "c" to "out"; the string should
 * already have the ANSI escape code in it. "out" should have enough
 * space in it to fit any color.
 */
static char *color_output(char *out, const struct color *c, char type)
{
	switch (c->type) {
	case COLOR_UNSPECIFIED:
	case COLOR_NORMAL:
		break;
	case COLOR_ANSI:
		*out++ = type;
		*out++ = '0' + c->value;
		break;
	case COLOR_256:
		out += sprintf(out, "%c8;5;%d", type, c->value);
		break;
	case COLOR_RGB:
		out += sprintf(out, "%c8;2;%d;%d;%d", type,
			       c->red, c->green, c->blue);
		break;
	}
	return out;
}

static int color_empty(const struct color *c)
{
	return c->type <= COLOR_NORMAL;
}

int color_parse_mem(const char *value, int value_len, char *dst)
{
	const char *ptr = value;
	int len = value_len;
	unsigned int attr = 0;
	struct color fg = { COLOR_UNSPECIFIED };
	struct color bg = { COLOR_UNSPECIFIED };

	if (!strncasecmp(value, "reset", len)) {
		strcpy(dst, GIT_COLOR_RESET);
		return 0;
	}

	/* [fg [bg]] [attr]... */
	while (len > 0) {
		const char *word = ptr;
		struct color c;
		int val, wordlen = 0;

		while (len > 0 && !isspace(word[wordlen])) {
			wordlen++;
			len--;
		}

		ptr = word + wordlen;
		while (len > 0 && isspace(*ptr)) {
			ptr++;
			len--;
		}

		if (!parse_color(&c, word, wordlen)) {
			if (fg.type == COLOR_UNSPECIFIED) {
				fg = c;
				continue;
			}
			if (bg.type == COLOR_UNSPECIFIED) {
				bg = c;
				continue;
			}
			goto bad;
		}
		val = parse_attr(word, wordlen);
		if (0 <= val)
			attr |= (1 << val);
		else
			goto bad;
	}

	if (attr || !color_empty(&fg) || !color_empty(&bg)) {
		int sep = 0;
		int i;

		*dst++ = '\033';
		*dst++ = '[';

		for (i = 0; attr; i++) {
			unsigned bit = (1 << i);
			if (!(attr & bit))
				continue;
			attr &= ~bit;
			if (sep++)
				*dst++ = ';';
			dst += sprintf(dst, "%d", i);
		}
		if (!color_empty(&fg)) {
			if (sep++)
				*dst++ = ';';
			/* foreground colors are all in the 3x range */
			dst = color_output(dst, &fg, '3');
		}
		if (!color_empty(&bg)) {
			if (sep++)
				*dst++ = ';';
			/* background colors are all in the 4x range */
			dst = color_output(dst, &bg, '4');
		}
		*dst++ = 'm';
	}
	*dst = 0;
	return 0;
bad:
	return error(_("invalid color value: %.*s"), value_len, value);
}

int git_config_colorbool(const char *var, const char *value)
{
	if (value) {
		if (!strcasecmp(value, "never"))
			return 0;
		if (!strcasecmp(value, "always"))
			return 1;
		if (!strcasecmp(value, "auto"))
			return GIT_COLOR_AUTO;
	}

	if (!var)
		return -1;

	/* Missing or explicit false to turn off colorization */
	if (!git_config_bool(var, value))
		return 0;

	/* any normal truth value defaults to 'auto' */
	return GIT_COLOR_AUTO;
}

static int check_auto_color(void)
{
	if (color_stdout_is_tty < 0)
		color_stdout_is_tty = isatty(1);
	if (color_stdout_is_tty || (pager_in_use() && pager_use_color)) {
		char *term = getenv("TERM");
		if (term && strcmp(term, "dumb"))
			return 1;
	}
	return 0;
}

int want_color(int var)
{
	static int want_auto = -1;

	if (var < 0)
		var = git_use_color_default;

	if (var == GIT_COLOR_AUTO) {
		if (want_auto < 0)
			want_auto = check_auto_color();
		return want_auto;
	}
	return var;
}

int git_color_config(const char *var, const char *value, void *cb)
{
	if (!strcmp(var, "color.ui")) {
		git_use_color_default = git_config_colorbool(var, value);
		return 0;
	}

	return 0;
}

int git_color_default_config(const char *var, const char *value, void *cb)
{
	if (git_color_config(var, value, cb) < 0)
		return -1;

	return git_default_config(var, value, cb);
}

void color_print_strbuf(FILE *fp, const char *color, const struct strbuf *sb)
{
	if (*color)
		fprintf(fp, "%s", color);
	fprintf(fp, "%s", sb->buf);
	if (*color)
		fprintf(fp, "%s", GIT_COLOR_RESET);
}

static int color_vfprintf(FILE *fp, const char *color, const char *fmt,
		va_list args, const char *trail)
{
	int r = 0;

	if (*color)
		r += fprintf(fp, "%s", color);
	r += vfprintf(fp, fmt, args);
	if (*color)
		r += fprintf(fp, "%s", GIT_COLOR_RESET);
	if (trail)
		r += fprintf(fp, "%s", trail);
	return r;
}


int color_fprintf(FILE *fp, const char *color, const char *fmt, ...)
{
	va_list args;
	int r;
	va_start(args, fmt);
	r = color_vfprintf(fp, color, fmt, args, NULL);
	va_end(args);
	return r;
}

int color_fprintf_ln(FILE *fp, const char *color, const char *fmt, ...)
{
	va_list args;
	int r;
	va_start(args, fmt);
	r = color_vfprintf(fp, color, fmt, args, "\n");
	va_end(args);
	return r;
}

int color_is_nil(const char *c)
{
	return !strcmp(c, "NIL");
}
Commit	Line	Data
7c92fe0e	1	#include "cache.h"
85023577	2	#include "color.h"
7c92fe0e	3
4c7f1819	4	static int git_use_color_default = GIT_COLOR_AUTO;
e269eb79	5	int color_stdout_is_tty = -1;
6b2f2d98	6
7cd52b5b DM	7	/*
	8	* The list of available column colors.
	9	*/
	10	const char *column_colors_ansi[] = {
	11	GIT_COLOR_RED,
	12	GIT_COLOR_GREEN,
	13	GIT_COLOR_YELLOW,
	14	GIT_COLOR_BLUE,
	15	GIT_COLOR_MAGENTA,
	16	GIT_COLOR_CYAN,
	17	GIT_COLOR_BOLD_RED,
	18	GIT_COLOR_BOLD_GREEN,
	19	GIT_COLOR_BOLD_YELLOW,
	20	GIT_COLOR_BOLD_BLUE,
	21	GIT_COLOR_BOLD_MAGENTA,
	22	GIT_COLOR_BOLD_CYAN,
	23	GIT_COLOR_RESET,
	24	};
	25
	26	/* Ignore the RESET at the end when giving the size */
	27	const int column_colors_ansi_max = ARRAY_SIZE(column_colors_ansi) - 1;
	28
695d95df JK	29	/* An individual foreground or background color. */
	30	struct color {
	31	enum {
	32	COLOR_UNSPECIFIED = 0,
	33	COLOR_NORMAL,
	34	COLOR_ANSI, /* basic 0-7 ANSI colors */
17a4be26 JK	35	COLOR_256,
17a4be26 JK	36	COLOR_RGB
695d95df JK	37	} type;
	38	/* The numeric value for ANSI and 256-color modes */
	39	unsigned char value;
17a4be26 JK	40	/* 24-bit RGB color values */
17a4be26 JK	41	unsigned char red, green, blue;
695d95df JK	42	};
	43
	44	/*
	45	* "word" is a buffer of length "len"; does it match the NUL-terminated
	46	* "match" exactly?
	47	*/
	48	static int match_word(const char word, int len, const char match)
7c92fe0e	49	{
695d95df JK	50	return !strncasecmp(word, match, len) && !match[len];
	51	}
	52
17a4be26 JK	53	static int get_hex_color(const char in, unsigned char out)
	54	{
	55	unsigned int val;
	56	val = (hexval(in[0]) << 4) \| hexval(in[1]);
	57	if (val & ~0xff)
	58	return -1;
	59	*out = val;
	60	return 0;
	61	}
	62
695d95df JK	63	static int parse_color(struct color out, const char name, int len)
	64	{
	65	/* Positions in array must match ANSI color codes */
7c92fe0e	66	static const char * const color_names[] = {
695d95df	67	"black", "red", "green", "yellow",
7c92fe0e JK	68	"blue", "magenta", "cyan", "white"
	69	};
	70	char *end;
	71	int i;
695d95df JK	72	long val;
	73
	74	/* First try the special word "normal"... */
	75	if (match_word(name, len, "normal")) {
	76	out->type = COLOR_NORMAL;
	77	return 0;
	78	}
	79
17a4be26 JK	80	/* Try a 24-bit RGB value */
	81	if (len == 7 && name[0] == '#') {
	82	if (!get_hex_color(name + 1, &out->red) &&
	83	!get_hex_color(name + 3, &out->green) &&
	84	!get_hex_color(name + 5, &out->blue)) {
	85	out->type = COLOR_RGB;
	86	return 0;
	87	}
	88	}
	89
695d95df	90	/* Then pick from our human-readable color names... */
7c92fe0e	91	for (i = 0; i < ARRAY_SIZE(color_names); i++) {
695d95df JK	92	if (match_word(name, len, color_names[i])) {
	93	out->type = COLOR_ANSI;
	94	out->value = i;
	95	return 0;
	96	}
7c92fe0e	97	}
695d95df JK	98
	99	/* And finally try a literal 256-color-mode number */
	100	val = strtol(name, &end, 10);
	101	if (end - name == len) {
	102	/*
	103	* Allow "-1" as an alias for "normal", but other negative
	104	* numbers are bogus.
	105	*/
	106	if (val < -1)
	107	; /* fall through to error */
	108	else if (val < 0) {
	109	out->type = COLOR_NORMAL;
	110	return 0;
	111	/* Rewrite low numbers as more-portable standard colors. */
	112	} else if (val < 8) {
	113	out->type = COLOR_ANSI;
	114	out->value = val;
3759d27a	115	return 0;
695d95df JK	116	} else if (val < 256) {
	117	out->type = COLOR_256;
	118	out->value = val;
	119	return 0;
	120	}
	121	}
	122
	123	return -1;
7c92fe0e JK	124	}
7c92fe0e JK	125
df8e472c	126	static int parse_attr(const char *name, size_t len)
7c92fe0e	127	{
df8e472c JK	128	static const struct {
	129	const char *name;
	130	size_t len;
	131	int val, neg;
	132	} attrs[] = {
	133	#define ATTR(x, val, neg) { (x), sizeof(x)-1, (val), (neg) }
	134	ATTR("bold", 1, 22),
	135	ATTR("dim", 2, 22),
54590a0e	136	ATTR("italic", 3, 23),
df8e472c JK	137	ATTR("ul", 4, 24),
	138	ATTR("blink", 5, 25),
	139	ATTR("reverse", 7, 27)
	140	#undef ATTR
7c92fe0e	141	};
df8e472c	142	int negate = 0;
7c92fe0e	143	int i;
df8e472c	144
5621068f JK	145	if (skip_prefix_mem(name, len, "no", &name, &len)) {
5621068f JK	146	skip_prefix_mem(name, len, "-", &name, &len);
df8e472c	147	negate = 1;
5621068f	148	}
df8e472c JK	149
	150	for (i = 0; i < ARRAY_SIZE(attrs); i++) {
	151	if (attrs[i].len == len && !memcmp(attrs[i].name, name, len))
	152	return negate ? attrs[i].neg : attrs[i].val;
7c92fe0e JK	153	}
	154	return -1;
	155	}
	156
f6c5a296	157	int color_parse(const char value, char dst)
2c2dc7c8	158	{
f6c5a296	159	return color_parse_mem(value, strlen(value), dst);
2c2dc7c8 RS	160	}
2c2dc7c8 RS	161
695d95df JK	162	/*
	163	* Write the ANSI color codes for "c" to "out"; the string should
	164	* already have the ANSI escape code in it. "out" should have enough
	165	* space in it to fit any color.
	166	*/
	167	static char color_output(char out, const struct color *c, char type)
	168	{
	169	switch (c->type) {
	170	case COLOR_UNSPECIFIED:
	171	case COLOR_NORMAL:
	172	break;
	173	case COLOR_ANSI:
	174	*out++ = type;
	175	*out++ = '0' + c->value;
	176	break;
	177	case COLOR_256:
	178	out += sprintf(out, "%c8;5;%d", type, c->value);
	179	break;
17a4be26 JK	180	case COLOR_RGB:
	181	out += sprintf(out, "%c8;2;%d;%d;%d", type,
	182	c->red, c->green, c->blue);
	183	break;
695d95df JK	184	}
	185	return out;
	186	}
	187
	188	static int color_empty(const struct color *c)
	189	{
	190	return c->type <= COLOR_NORMAL;
	191	}
	192
f6c5a296	193	int color_parse_mem(const char value, int value_len, char dst)
7c92fe0e JK	194	{
7c92fe0e JK	195	const char *ptr = value;
2c2dc7c8	196	int len = value_len;
8b124135	197	unsigned int attr = 0;
695d95df JK	198	struct color fg = { COLOR_UNSPECIFIED };
695d95df JK	199	struct color bg = { COLOR_UNSPECIFIED };
7c92fe0e	200
2c2dc7c8	201	if (!strncasecmp(value, "reset", len)) {
dc6ebd4c	202	strcpy(dst, GIT_COLOR_RESET);
f6c5a296	203	return 0;
7c92fe0e JK	204	}
7c92fe0e JK	205
8b124135	206	/* [fg [bg]] [attr]... */
2c2dc7c8	207	while (len > 0) {
7c92fe0e	208	const char *word = ptr;
695d95df	209	struct color c;
2c2dc7c8	210	int val, wordlen = 0;
7c92fe0e	211
2c2dc7c8 RS	212	while (len > 0 && !isspace(word[wordlen])) {
	213	wordlen++;
	214	len--;
	215	}
7c92fe0e	216
2c2dc7c8 RS	217	ptr = word + wordlen;
2c2dc7c8 RS	218	while (len > 0 && isspace(*ptr)) {
7c92fe0e	219	ptr++;
2c2dc7c8 RS	220	len--;
2c2dc7c8 RS	221	}
7c92fe0e	222
695d95df JK	223	if (!parse_color(&c, word, wordlen)) {
	224	if (fg.type == COLOR_UNSPECIFIED) {
	225	fg = c;
7c92fe0e JK	226	continue;
7c92fe0e JK	227	}
695d95df JK	228	if (bg.type == COLOR_UNSPECIFIED) {
695d95df JK	229	bg = c;
7c92fe0e JK	230	continue;
	231	}
	232	goto bad;
	233	}
2c2dc7c8	234	val = parse_attr(word, wordlen);
8b124135 JH	235	if (0 <= val)
	236	attr \|= (1 << val);
	237	else
7c92fe0e	238	goto bad;
7c92fe0e JK	239	}
7c92fe0e JK	240
695d95df	241	if (attr \|\| !color_empty(&fg) \|\| !color_empty(&bg)) {
7c92fe0e	242	int sep = 0;
8b124135	243	int i;
7c92fe0e JK	244
	245	*dst++ = '\033';
	246	*dst++ = '[';
8b124135 JH	247
	248	for (i = 0; attr; i++) {
	249	unsigned bit = (1 << i);
	250	if (!(attr & bit))
	251	continue;
	252	attr &= ~bit;
	253	if (sep++)
	254	*dst++ = ';';
ff40d185	255	dst += sprintf(dst, "%d", i);
7c92fe0e	256	}
695d95df	257	if (!color_empty(&fg)) {
7c92fe0e JK	258	if (sep++)
7c92fe0e JK	259	*dst++ = ';';
71b59849 JK	260	/* foreground colors are all in the 3x range */
71b59849 JK	261	dst = color_output(dst, &fg, '3');
7c92fe0e	262	}
695d95df	263	if (!color_empty(&bg)) {
7c92fe0e JK	264	if (sep++)
7c92fe0e JK	265	*dst++ = ';';
71b59849 JK	266	/* background colors are all in the 4x range */
71b59849 JK	267	dst = color_output(dst, &bg, '4');
7c92fe0e JK	268	}
	269	*dst++ = 'm';
	270	}
	271	*dst = 0;
f6c5a296	272	return 0;
7c92fe0e	273	bad:
f6c5a296	274	return error(_("invalid color value: %.*s"), value_len, value);
7c92fe0e JK	275	}
7c92fe0e JK	276
e269eb79	277	int git_config_colorbool(const char var, const char value)
7c92fe0e	278	{
57f2b842 JH	279	if (value) {
	280	if (!strcasecmp(value, "never"))
	281	return 0;
	282	if (!strcasecmp(value, "always"))
	283	return 1;
	284	if (!strcasecmp(value, "auto"))
daa0c3d9	285	return GIT_COLOR_AUTO;
7c92fe0e	286	}
57f2b842	287
73e9da01 ML	288	if (!var)
	289	return -1;
	290
57f2b842 JH	291	/* Missing or explicit false to turn off colorization */
57f2b842 JH	292	if (!git_config_bool(var, value))
7c92fe0e	293	return 0;
57f2b842 JH	294
57f2b842 JH	295	/* any normal truth value defaults to 'auto' */
daa0c3d9 JK	296	return GIT_COLOR_AUTO;
	297	}
	298
	299	static int check_auto_color(void)
	300	{
e269eb79 JK	301	if (color_stdout_is_tty < 0)
	302	color_stdout_is_tty = isatty(1);
	303	if (color_stdout_is_tty \|\| (pager_in_use() && pager_use_color)) {
57f2b842 JH	304	char *term = getenv("TERM");
	305	if (term && strcmp(term, "dumb"))
	306	return 1;
	307	}
	308	return 0;
7c92fe0e JK	309	}
7c92fe0e JK	310
daa0c3d9 JK	311	int want_color(int var)
	312	{
	313	static int want_auto = -1;
	314
c9bfb953 JK	315	if (var < 0)
	316	var = git_use_color_default;
	317
daa0c3d9 JK	318	if (var == GIT_COLOR_AUTO) {
	319	if (want_auto < 0)
	320	want_auto = check_auto_color();
	321	return want_auto;
	322	}
c9bfb953	323	return var;
daa0c3d9 JK	324	}
daa0c3d9 JK	325
3e1dd17a	326	int git_color_config(const char var, const char value, void *cb)
6b2f2d98 MK	327	{
6b2f2d98 MK	328	if (!strcmp(var, "color.ui")) {
e269eb79	329	git_use_color_default = git_config_colorbool(var, value);
6b2f2d98 MK	330	return 0;
	331	}
	332
3e1dd17a JK	333	return 0;
	334	}
	335
	336	int git_color_default_config(const char var, const char value, void *cb)
	337	{
	338	if (git_color_config(var, value, cb) < 0)
	339	return -1;
	340
ef90d6d4	341	return git_default_config(var, value, cb);
6b2f2d98 MK	342	}
6b2f2d98 MK	343
becbdae8 JN	344	void color_print_strbuf(FILE fp, const char color, const struct strbuf *sb)
	345	{
	346	if (*color)
	347	fprintf(fp, "%s", color);
	348	fprintf(fp, "%s", sb->buf);
	349	if (*color)
	350	fprintf(fp, "%s", GIT_COLOR_RESET);
	351	}
	352
f26a0012	353	static int color_vfprintf(FILE fp, const char color, const char *fmt,
7c92fe0e JK	354	va_list args, const char *trail)
	355	{
	356	int r = 0;
	357
	358	if (*color)
f26a0012 KH	359	r += fprintf(fp, "%s", color);
f26a0012 KH	360	r += vfprintf(fp, fmt, args);
7c92fe0e	361	if (*color)
dc6ebd4c	362	r += fprintf(fp, "%s", GIT_COLOR_RESET);
7c92fe0e	363	if (trail)
f26a0012	364	r += fprintf(fp, "%s", trail);
7c92fe0e JK	365	return r;
	366	}
	367
	368
	369
f26a0012	370	int color_fprintf(FILE fp, const char color, const char *fmt, ...)
7c92fe0e JK	371	{
	372	va_list args;
	373	int r;
	374	va_start(args, fmt);
f26a0012	375	r = color_vfprintf(fp, color, fmt, args, NULL);
7c92fe0e JK	376	va_end(args);
	377	return r;
	378	}
	379
f26a0012	380	int color_fprintf_ln(FILE fp, const char color, const char *fmt, ...)
7c92fe0e JK	381	{
	382	va_list args;
	383	int r;
	384	va_start(args, fmt);
f26a0012	385	r = color_vfprintf(fp, color, fmt, args, "\n");
7c92fe0e JK	386	va_end(args);
	387	return r;
	388	}
148135fc JK	389
	390	int color_is_nil(const char *c)
	391	{
	392	return !strcmp(c, "NIL");
	393	}