Loading...
1#include <linux/kernel.h>
2#include "cache.h"
3#include "color.h"
4
5int perf_use_color_default = -1;
6
7static int parse_color(const char *name, int len)
8{
9 static const char * const color_names[] = {
10 "normal", "black", "red", "green", "yellow",
11 "blue", "magenta", "cyan", "white"
12 };
13 char *end;
14 int i;
15
16 for (i = 0; i < (int)ARRAY_SIZE(color_names); i++) {
17 const char *str = color_names[i];
18 if (!strncasecmp(name, str, len) && !str[len])
19 return i - 1;
20 }
21 i = strtol(name, &end, 10);
22 if (end - name == len && i >= -1 && i <= 255)
23 return i;
24 return -2;
25}
26
27static int parse_attr(const char *name, int len)
28{
29 static const int attr_values[] = { 1, 2, 4, 5, 7 };
30 static const char * const attr_names[] = {
31 "bold", "dim", "ul", "blink", "reverse"
32 };
33 unsigned int i;
34
35 for (i = 0; i < ARRAY_SIZE(attr_names); i++) {
36 const char *str = attr_names[i];
37 if (!strncasecmp(name, str, len) && !str[len])
38 return attr_values[i];
39 }
40 return -1;
41}
42
43void color_parse(const char *value, const char *var, char *dst)
44{
45 color_parse_mem(value, strlen(value), var, dst);
46}
47
48void color_parse_mem(const char *value, int value_len, const char *var,
49 char *dst)
50{
51 const char *ptr = value;
52 int len = value_len;
53 int attr = -1;
54 int fg = -2;
55 int bg = -2;
56
57 if (!strncasecmp(value, "reset", len)) {
58 strcpy(dst, PERF_COLOR_RESET);
59 return;
60 }
61
62 /* [fg [bg]] [attr] */
63 while (len > 0) {
64 const char *word = ptr;
65 int val, wordlen = 0;
66
67 while (len > 0 && !isspace(word[wordlen])) {
68 wordlen++;
69 len--;
70 }
71
72 ptr = word + wordlen;
73 while (len > 0 && isspace(*ptr)) {
74 ptr++;
75 len--;
76 }
77
78 val = parse_color(word, wordlen);
79 if (val >= -1) {
80 if (fg == -2) {
81 fg = val;
82 continue;
83 }
84 if (bg == -2) {
85 bg = val;
86 continue;
87 }
88 goto bad;
89 }
90 val = parse_attr(word, wordlen);
91 if (val < 0 || attr != -1)
92 goto bad;
93 attr = val;
94 }
95
96 if (attr >= 0 || fg >= 0 || bg >= 0) {
97 int sep = 0;
98
99 *dst++ = '\033';
100 *dst++ = '[';
101 if (attr >= 0) {
102 *dst++ = '0' + attr;
103 sep++;
104 }
105 if (fg >= 0) {
106 if (sep++)
107 *dst++ = ';';
108 if (fg < 8) {
109 *dst++ = '3';
110 *dst++ = '0' + fg;
111 } else {
112 dst += sprintf(dst, "38;5;%d", fg);
113 }
114 }
115 if (bg >= 0) {
116 if (sep++)
117 *dst++ = ';';
118 if (bg < 8) {
119 *dst++ = '4';
120 *dst++ = '0' + bg;
121 } else {
122 dst += sprintf(dst, "48;5;%d", bg);
123 }
124 }
125 *dst++ = 'm';
126 }
127 *dst = 0;
128 return;
129bad:
130 die("bad color value '%.*s' for variable '%s'", value_len, value, var);
131}
132
133int perf_config_colorbool(const char *var, const char *value, int stdout_is_tty)
134{
135 if (value) {
136 if (!strcasecmp(value, "never"))
137 return 0;
138 if (!strcasecmp(value, "always"))
139 return 1;
140 if (!strcasecmp(value, "auto"))
141 goto auto_color;
142 }
143
144 /* Missing or explicit false to turn off colorization */
145 if (!perf_config_bool(var, value))
146 return 0;
147
148 /* any normal truth value defaults to 'auto' */
149 auto_color:
150 if (stdout_is_tty < 0)
151 stdout_is_tty = isatty(1);
152 if (stdout_is_tty || (pager_in_use() && pager_use_color)) {
153 char *term = getenv("TERM");
154 if (term && strcmp(term, "dumb"))
155 return 1;
156 }
157 return 0;
158}
159
160int perf_color_default_config(const char *var, const char *value, void *cb)
161{
162 if (!strcmp(var, "color.ui")) {
163 perf_use_color_default = perf_config_colorbool(var, value, -1);
164 return 0;
165 }
166
167 return perf_default_config(var, value, cb);
168}
169
170static int __color_vsnprintf(char *bf, size_t size, const char *color,
171 const char *fmt, va_list args, const char *trail)
172{
173 int r = 0;
174
175 /*
176 * Auto-detect:
177 */
178 if (perf_use_color_default < 0) {
179 if (isatty(1) || pager_in_use())
180 perf_use_color_default = 1;
181 else
182 perf_use_color_default = 0;
183 }
184
185 if (perf_use_color_default && *color)
186 r += scnprintf(bf, size, "%s", color);
187 r += vscnprintf(bf + r, size - r, fmt, args);
188 if (perf_use_color_default && *color)
189 r += scnprintf(bf + r, size - r, "%s", PERF_COLOR_RESET);
190 if (trail)
191 r += scnprintf(bf + r, size - r, "%s", trail);
192 return r;
193}
194
195static int __color_vfprintf(FILE *fp, const char *color, const char *fmt,
196 va_list args, const char *trail)
197{
198 int r = 0;
199
200 /*
201 * Auto-detect:
202 */
203 if (perf_use_color_default < 0) {
204 if (isatty(fileno(fp)) || pager_in_use())
205 perf_use_color_default = 1;
206 else
207 perf_use_color_default = 0;
208 }
209
210 if (perf_use_color_default && *color)
211 r += fprintf(fp, "%s", color);
212 r += vfprintf(fp, fmt, args);
213 if (perf_use_color_default && *color)
214 r += fprintf(fp, "%s", PERF_COLOR_RESET);
215 if (trail)
216 r += fprintf(fp, "%s", trail);
217 return r;
218}
219
220int color_vsnprintf(char *bf, size_t size, const char *color,
221 const char *fmt, va_list args)
222{
223 return __color_vsnprintf(bf, size, color, fmt, args, NULL);
224}
225
226int color_vfprintf(FILE *fp, const char *color, const char *fmt, va_list args)
227{
228 return __color_vfprintf(fp, color, fmt, args, NULL);
229}
230
231int color_snprintf(char *bf, size_t size, const char *color,
232 const char *fmt, ...)
233{
234 va_list args;
235 int r;
236
237 va_start(args, fmt);
238 r = color_vsnprintf(bf, size, color, fmt, args);
239 va_end(args);
240 return r;
241}
242
243int color_fprintf(FILE *fp, const char *color, const char *fmt, ...)
244{
245 va_list args;
246 int r;
247
248 va_start(args, fmt);
249 r = color_vfprintf(fp, color, fmt, args);
250 va_end(args);
251 return r;
252}
253
254int color_fprintf_ln(FILE *fp, const char *color, const char *fmt, ...)
255{
256 va_list args;
257 int r;
258 va_start(args, fmt);
259 r = __color_vfprintf(fp, color, fmt, args, "\n");
260 va_end(args);
261 return r;
262}
263
264/*
265 * This function splits the buffer by newlines and colors the lines individually.
266 *
267 * Returns 0 on success.
268 */
269int color_fwrite_lines(FILE *fp, const char *color,
270 size_t count, const char *buf)
271{
272 if (!*color)
273 return fwrite(buf, count, 1, fp) != 1;
274
275 while (count) {
276 char *p = memchr(buf, '\n', count);
277
278 if (p != buf && (fputs(color, fp) < 0 ||
279 fwrite(buf, p ? (size_t)(p - buf) : count, 1, fp) != 1 ||
280 fputs(PERF_COLOR_RESET, fp) < 0))
281 return -1;
282 if (!p)
283 return 0;
284 if (fputc('\n', fp) < 0)
285 return -1;
286 count -= p + 1 - buf;
287 buf = p + 1;
288 }
289 return 0;
290}
291
292const char *get_percent_color(double percent)
293{
294 const char *color = PERF_COLOR_NORMAL;
295
296 /*
297 * We color high-overhead entries in red, mid-overhead
298 * entries in green - and keep the low overhead places
299 * normal:
300 */
301 if (percent >= MIN_RED)
302 color = PERF_COLOR_RED;
303 else {
304 if (percent > MIN_GREEN)
305 color = PERF_COLOR_GREEN;
306 }
307 return color;
308}
309
310int percent_color_fprintf(FILE *fp, const char *fmt, double percent)
311{
312 int r;
313 const char *color;
314
315 color = get_percent_color(percent);
316 r = color_fprintf(fp, color, fmt, percent);
317
318 return r;
319}
320
321int percent_color_snprintf(char *bf, size_t size, const char *fmt, double percent)
322{
323 const char *color = get_percent_color(percent);
324 return color_snprintf(bf, size, color, fmt, percent);
325}
1// SPDX-License-Identifier: GPL-2.0
2#include <linux/kernel.h>
3#include <subcmd/pager.h>
4#include <stdlib.h>
5#include <stdio.h>
6#include <string.h>
7#include "color.h"
8#include <math.h>
9#include <unistd.h>
10
11int perf_use_color_default = -1;
12
13static int __color_vsnprintf(char *bf, size_t size, const char *color,
14 const char *fmt, va_list args, const char *trail)
15{
16 int r = 0;
17
18 /*
19 * Auto-detect:
20 */
21 if (perf_use_color_default < 0) {
22 if (isatty(1) || pager_in_use())
23 perf_use_color_default = 1;
24 else
25 perf_use_color_default = 0;
26 }
27
28 if (perf_use_color_default && *color)
29 r += scnprintf(bf, size, "%s", color);
30 r += vscnprintf(bf + r, size - r, fmt, args);
31 if (perf_use_color_default && *color)
32 r += scnprintf(bf + r, size - r, "%s", PERF_COLOR_RESET);
33 if (trail)
34 r += scnprintf(bf + r, size - r, "%s", trail);
35 return r;
36}
37
38/* Colors are not included in return value */
39static int __color_vfprintf(FILE *fp, const char *color, const char *fmt,
40 va_list args)
41{
42 int r = 0;
43
44 /*
45 * Auto-detect:
46 */
47 if (perf_use_color_default < 0) {
48 if (isatty(fileno(fp)) || pager_in_use())
49 perf_use_color_default = 1;
50 else
51 perf_use_color_default = 0;
52 }
53
54 if (perf_use_color_default && *color)
55 fprintf(fp, "%s", color);
56 r += vfprintf(fp, fmt, args);
57 if (perf_use_color_default && *color)
58 fprintf(fp, "%s", PERF_COLOR_RESET);
59 return r;
60}
61
62int color_vsnprintf(char *bf, size_t size, const char *color,
63 const char *fmt, va_list args)
64{
65 return __color_vsnprintf(bf, size, color, fmt, args, NULL);
66}
67
68int color_vfprintf(FILE *fp, const char *color, const char *fmt, va_list args)
69{
70 return __color_vfprintf(fp, color, fmt, args);
71}
72
73int color_snprintf(char *bf, size_t size, const char *color,
74 const char *fmt, ...)
75{
76 va_list args;
77 int r;
78
79 va_start(args, fmt);
80 r = color_vsnprintf(bf, size, color, fmt, args);
81 va_end(args);
82 return r;
83}
84
85int color_fprintf(FILE *fp, const char *color, const char *fmt, ...)
86{
87 va_list args;
88 int r;
89
90 va_start(args, fmt);
91 r = color_vfprintf(fp, color, fmt, args);
92 va_end(args);
93 return r;
94}
95
96/*
97 * This function splits the buffer by newlines and colors the lines individually.
98 *
99 * Returns 0 on success.
100 */
101int color_fwrite_lines(FILE *fp, const char *color,
102 size_t count, const char *buf)
103{
104 if (!*color)
105 return fwrite(buf, count, 1, fp) != 1;
106
107 while (count) {
108 char *p = memchr(buf, '\n', count);
109
110 if (p != buf && (fputs(color, fp) < 0 ||
111 fwrite(buf, p ? (size_t)(p - buf) : count, 1, fp) != 1 ||
112 fputs(PERF_COLOR_RESET, fp) < 0))
113 return -1;
114 if (!p)
115 return 0;
116 if (fputc('\n', fp) < 0)
117 return -1;
118 count -= p + 1 - buf;
119 buf = p + 1;
120 }
121 return 0;
122}
123
124const char *get_percent_color(double percent)
125{
126 const char *color = PERF_COLOR_NORMAL;
127
128 /*
129 * We color high-overhead entries in red, mid-overhead
130 * entries in green - and keep the low overhead places
131 * normal:
132 */
133 if (fabs(percent) >= MIN_RED)
134 color = PERF_COLOR_RED;
135 else {
136 if (fabs(percent) > MIN_GREEN)
137 color = PERF_COLOR_GREEN;
138 }
139 return color;
140}
141
142int percent_color_fprintf(FILE *fp, const char *fmt, double percent)
143{
144 int r;
145 const char *color;
146
147 color = get_percent_color(percent);
148 r = color_fprintf(fp, color, fmt, percent);
149
150 return r;
151}
152
153int value_color_snprintf(char *bf, size_t size, const char *fmt, double value)
154{
155 const char *color = get_percent_color(value);
156 return color_snprintf(bf, size, color, fmt, value);
157}
158
159int percent_color_snprintf(char *bf, size_t size, const char *fmt, ...)
160{
161 va_list args;
162 double percent;
163
164 va_start(args, fmt);
165 percent = va_arg(args, double);
166 va_end(args);
167 return value_color_snprintf(bf, size, fmt, percent);
168}
169
170int percent_color_len_snprintf(char *bf, size_t size, const char *fmt, ...)
171{
172 va_list args;
173 int len;
174 double percent;
175 const char *color;
176
177 va_start(args, fmt);
178 len = va_arg(args, int);
179 percent = va_arg(args, double);
180 va_end(args);
181
182 color = get_percent_color(percent);
183 return color_snprintf(bf, size, color, fmt, len, percent);
184}