xref: /openbmc/linux/tools/perf/util/color.c (revision 110e6f26)
1 #include <linux/kernel.h>
2 #include "cache.h"
3 #include "color.h"
4 #include <math.h>
5 
6 int perf_use_color_default = -1;
7 
8 int perf_config_colorbool(const char *var, const char *value, int stdout_is_tty)
9 {
10 	if (value) {
11 		if (!strcasecmp(value, "never"))
12 			return 0;
13 		if (!strcasecmp(value, "always"))
14 			return 1;
15 		if (!strcasecmp(value, "auto"))
16 			goto auto_color;
17 	}
18 
19 	/* Missing or explicit false to turn off colorization */
20 	if (!perf_config_bool(var, value))
21 		return 0;
22 
23 	/* any normal truth value defaults to 'auto' */
24  auto_color:
25 	if (stdout_is_tty < 0)
26 		stdout_is_tty = isatty(1);
27 	if (stdout_is_tty || pager_in_use()) {
28 		char *term = getenv("TERM");
29 		if (term && strcmp(term, "dumb"))
30 			return 1;
31 	}
32 	return 0;
33 }
34 
35 int perf_color_default_config(const char *var, const char *value,
36 			      void *cb __maybe_unused)
37 {
38 	if (!strcmp(var, "color.ui")) {
39 		perf_use_color_default = perf_config_colorbool(var, value, -1);
40 		return 0;
41 	}
42 
43 	return 0;
44 }
45 
46 static int __color_vsnprintf(char *bf, size_t size, const char *color,
47 			     const char *fmt, va_list args, const char *trail)
48 {
49 	int r = 0;
50 
51 	/*
52 	 * Auto-detect:
53 	 */
54 	if (perf_use_color_default < 0) {
55 		if (isatty(1) || pager_in_use())
56 			perf_use_color_default = 1;
57 		else
58 			perf_use_color_default = 0;
59 	}
60 
61 	if (perf_use_color_default && *color)
62 		r += scnprintf(bf, size, "%s", color);
63 	r += vscnprintf(bf + r, size - r, fmt, args);
64 	if (perf_use_color_default && *color)
65 		r += scnprintf(bf + r, size - r, "%s", PERF_COLOR_RESET);
66 	if (trail)
67 		r += scnprintf(bf + r, size - r, "%s", trail);
68 	return r;
69 }
70 
71 /* Colors are not included in return value */
72 static int __color_vfprintf(FILE *fp, const char *color, const char *fmt,
73 		va_list args)
74 {
75 	int r = 0;
76 
77 	/*
78 	 * Auto-detect:
79 	 */
80 	if (perf_use_color_default < 0) {
81 		if (isatty(fileno(fp)) || pager_in_use())
82 			perf_use_color_default = 1;
83 		else
84 			perf_use_color_default = 0;
85 	}
86 
87 	if (perf_use_color_default && *color)
88 		fprintf(fp, "%s", color);
89 	r += vfprintf(fp, fmt, args);
90 	if (perf_use_color_default && *color)
91 		fprintf(fp, "%s", PERF_COLOR_RESET);
92 	return r;
93 }
94 
95 int color_vsnprintf(char *bf, size_t size, const char *color,
96 		    const char *fmt, va_list args)
97 {
98 	return __color_vsnprintf(bf, size, color, fmt, args, NULL);
99 }
100 
101 int color_vfprintf(FILE *fp, const char *color, const char *fmt, va_list args)
102 {
103 	return __color_vfprintf(fp, color, fmt, args);
104 }
105 
106 int color_snprintf(char *bf, size_t size, const char *color,
107 		   const char *fmt, ...)
108 {
109 	va_list args;
110 	int r;
111 
112 	va_start(args, fmt);
113 	r = color_vsnprintf(bf, size, color, fmt, args);
114 	va_end(args);
115 	return r;
116 }
117 
118 int color_fprintf(FILE *fp, const char *color, const char *fmt, ...)
119 {
120 	va_list args;
121 	int r;
122 
123 	va_start(args, fmt);
124 	r = color_vfprintf(fp, color, fmt, args);
125 	va_end(args);
126 	return r;
127 }
128 
129 /*
130  * This function splits the buffer by newlines and colors the lines individually.
131  *
132  * Returns 0 on success.
133  */
134 int color_fwrite_lines(FILE *fp, const char *color,
135 		size_t count, const char *buf)
136 {
137 	if (!*color)
138 		return fwrite(buf, count, 1, fp) != 1;
139 
140 	while (count) {
141 		char *p = memchr(buf, '\n', count);
142 
143 		if (p != buf && (fputs(color, fp) < 0 ||
144 				fwrite(buf, p ? (size_t)(p - buf) : count, 1, fp) != 1 ||
145 				fputs(PERF_COLOR_RESET, fp) < 0))
146 			return -1;
147 		if (!p)
148 			return 0;
149 		if (fputc('\n', fp) < 0)
150 			return -1;
151 		count -= p + 1 - buf;
152 		buf = p + 1;
153 	}
154 	return 0;
155 }
156 
157 const char *get_percent_color(double percent)
158 {
159 	const char *color = PERF_COLOR_NORMAL;
160 
161 	/*
162 	 * We color high-overhead entries in red, mid-overhead
163 	 * entries in green - and keep the low overhead places
164 	 * normal:
165 	 */
166 	if (fabs(percent) >= MIN_RED)
167 		color = PERF_COLOR_RED;
168 	else {
169 		if (fabs(percent) > MIN_GREEN)
170 			color = PERF_COLOR_GREEN;
171 	}
172 	return color;
173 }
174 
175 int percent_color_fprintf(FILE *fp, const char *fmt, double percent)
176 {
177 	int r;
178 	const char *color;
179 
180 	color = get_percent_color(percent);
181 	r = color_fprintf(fp, color, fmt, percent);
182 
183 	return r;
184 }
185 
186 int value_color_snprintf(char *bf, size_t size, const char *fmt, double value)
187 {
188 	const char *color = get_percent_color(value);
189 	return color_snprintf(bf, size, color, fmt, value);
190 }
191 
192 int percent_color_snprintf(char *bf, size_t size, const char *fmt, ...)
193 {
194 	va_list args;
195 	double percent;
196 
197 	va_start(args, fmt);
198 	percent = va_arg(args, double);
199 	va_end(args);
200 	return value_color_snprintf(bf, size, fmt, percent);
201 }
202 
203 int percent_color_len_snprintf(char *bf, size_t size, const char *fmt, ...)
204 {
205 	va_list args;
206 	int len;
207 	double percent;
208 	const char *color;
209 
210 	va_start(args, fmt);
211 	len = va_arg(args, int);
212 	percent = va_arg(args, double);
213 	va_end(args);
214 
215 	color = get_percent_color(percent);
216 	return color_snprintf(bf, size, color, fmt, len, percent);
217 }
218