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