1*adf37648SKyle Evans // SPDX-License-Identifier: GPL-2.0 OR MIT
2*adf37648SKyle Evans /*
3*adf37648SKyle Evans  * Copyright (C) 2015-2020 Jason A. Donenfeld <Jason@zx2c4.com>. All Rights Reserved.
4*adf37648SKyle Evans  */
5*adf37648SKyle Evans 
6*adf37648SKyle Evans #include <stdarg.h>
7*adf37648SKyle Evans #include <stddef.h>
8*adf37648SKyle Evans #include <stdio.h>
9*adf37648SKyle Evans #include <stdlib.h>
10*adf37648SKyle Evans #include <string.h>
11*adf37648SKyle Evans #include <stdbool.h>
12*adf37648SKyle Evans #include <unistd.h>
13*adf37648SKyle Evans #include "ctype.h"
14*adf37648SKyle Evans #include "terminal.h"
15*adf37648SKyle Evans 
color_mode(void)16*adf37648SKyle Evans static bool color_mode(void)
17*adf37648SKyle Evans {
18*adf37648SKyle Evans 	static int mode = -1;
19*adf37648SKyle Evans 	const char *var;
20*adf37648SKyle Evans 
21*adf37648SKyle Evans 	if (mode != -1)
22*adf37648SKyle Evans 		return mode;
23*adf37648SKyle Evans 	var = getenv("WG_COLOR_MODE");
24*adf37648SKyle Evans 	if (var && !strcmp(var, "always"))
25*adf37648SKyle Evans 		mode = true;
26*adf37648SKyle Evans 	else if (var && !strcmp(var, "never"))
27*adf37648SKyle Evans 		mode = false;
28*adf37648SKyle Evans 	else
29*adf37648SKyle Evans 		mode = isatty(fileno(stdout));
30*adf37648SKyle Evans 	return mode;
31*adf37648SKyle Evans }
32*adf37648SKyle Evans 
filter_ansi(const char * fmt,va_list args)33*adf37648SKyle Evans static void filter_ansi(const char *fmt, va_list args)
34*adf37648SKyle Evans {
35*adf37648SKyle Evans 	char *str = NULL;
36*adf37648SKyle Evans 	size_t len, i, j;
37*adf37648SKyle Evans 
38*adf37648SKyle Evans 	if (color_mode()) {
39*adf37648SKyle Evans 		vfprintf(stdout, fmt, args);
40*adf37648SKyle Evans 		return;
41*adf37648SKyle Evans 	}
42*adf37648SKyle Evans 
43*adf37648SKyle Evans 	len = vasprintf(&str, fmt, args);
44*adf37648SKyle Evans 
45*adf37648SKyle Evans 	if (len >= 2) {
46*adf37648SKyle Evans 		for (i = 0; i < len - 2; ++i) {
47*adf37648SKyle Evans 			if (str[i] == '\x1b' && str[i + 1] == '[') {
48*adf37648SKyle Evans 				str[i] = str[i + 1] = '\0';
49*adf37648SKyle Evans 				for (j = i + 2; j < len; ++j) {
50*adf37648SKyle Evans 					if (char_is_alpha(str[j]))
51*adf37648SKyle Evans 						break;
52*adf37648SKyle Evans 					str[j] = '\0';
53*adf37648SKyle Evans 				}
54*adf37648SKyle Evans 				str[j] = '\0';
55*adf37648SKyle Evans 			}
56*adf37648SKyle Evans 		}
57*adf37648SKyle Evans 	}
58*adf37648SKyle Evans 	for (i = 0; i < len; i = j) {
59*adf37648SKyle Evans 		fputs(&str[i], stdout);
60*adf37648SKyle Evans 		for (j = i + strlen(&str[i]); j < len; ++j) {
61*adf37648SKyle Evans 			if (str[j] != '\0')
62*adf37648SKyle Evans 				break;
63*adf37648SKyle Evans 		}
64*adf37648SKyle Evans 	}
65*adf37648SKyle Evans 
66*adf37648SKyle Evans 	free(str);
67*adf37648SKyle Evans }
68*adf37648SKyle Evans 
terminal_printf(const char * fmt,...)69*adf37648SKyle Evans void terminal_printf(const char *fmt, ...)
70*adf37648SKyle Evans {
71*adf37648SKyle Evans 	va_list args;
72*adf37648SKyle Evans 
73*adf37648SKyle Evans 	va_start(args, fmt);
74*adf37648SKyle Evans 	filter_ansi(fmt, args);
75*adf37648SKyle Evans 	va_end(args);
76*adf37648SKyle Evans }
77