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 for (i = 0; i < ARRAY_SIZE(color_names); i++) { 15 const char *str = color_names[i]; 16 if (!strncasecmp(name, str, len) && !str[len]) 17 return i - 1; 18 } 19 i = strtol(name, &end, 10); 20 if (end - name == len && i >= -1 && i <= 255) 21 return i; 22 return -2; 23 } 24 25 static int parse_attr(const char *name, int len) 26 { 27 static const int attr_values[] = { 1, 2, 4, 5, 7 }; 28 static const char * const attr_names[] = { 29 "bold", "dim", "ul", "blink", "reverse" 30 }; 31 int i; 32 for (i = 0; i < ARRAY_SIZE(attr_names); i++) { 33 const char *str = attr_names[i]; 34 if (!strncasecmp(name, str, len) && !str[len]) 35 return attr_values[i]; 36 } 37 return -1; 38 } 39 40 void color_parse(const char *value, const char *var, char *dst) 41 { 42 color_parse_mem(value, strlen(value), var, dst); 43 } 44 45 void color_parse_mem(const char *value, int value_len, const char *var, 46 char *dst) 47 { 48 const char *ptr = value; 49 int len = value_len; 50 int attr = -1; 51 int fg = -2; 52 int bg = -2; 53 54 if (!strncasecmp(value, "reset", len)) { 55 strcpy(dst, PERF_COLOR_RESET); 56 return; 57 } 58 59 /* [fg [bg]] [attr] */ 60 while (len > 0) { 61 const char *word = ptr; 62 int val, wordlen = 0; 63 64 while (len > 0 && !isspace(word[wordlen])) { 65 wordlen++; 66 len--; 67 } 68 69 ptr = word + wordlen; 70 while (len > 0 && isspace(*ptr)) { 71 ptr++; 72 len--; 73 } 74 75 val = parse_color(word, wordlen); 76 if (val >= -1) { 77 if (fg == -2) { 78 fg = val; 79 continue; 80 } 81 if (bg == -2) { 82 bg = val; 83 continue; 84 } 85 goto bad; 86 } 87 val = parse_attr(word, wordlen); 88 if (val < 0 || attr != -1) 89 goto bad; 90 attr = val; 91 } 92 93 if (attr >= 0 || fg >= 0 || bg >= 0) { 94 int sep = 0; 95 96 *dst++ = '\033'; 97 *dst++ = '['; 98 if (attr >= 0) { 99 *dst++ = '0' + attr; 100 sep++; 101 } 102 if (fg >= 0) { 103 if (sep++) 104 *dst++ = ';'; 105 if (fg < 8) { 106 *dst++ = '3'; 107 *dst++ = '0' + fg; 108 } else { 109 dst += sprintf(dst, "38;5;%d", fg); 110 } 111 } 112 if (bg >= 0) { 113 if (sep++) 114 *dst++ = ';'; 115 if (bg < 8) { 116 *dst++ = '4'; 117 *dst++ = '0' + bg; 118 } else { 119 dst += sprintf(dst, "48;5;%d", bg); 120 } 121 } 122 *dst++ = 'm'; 123 } 124 *dst = 0; 125 return; 126 bad: 127 die("bad color value '%.*s' for variable '%s'", value_len, value, var); 128 } 129 130 int perf_config_colorbool(const char *var, const char *value, int stdout_is_tty) 131 { 132 if (value) { 133 if (!strcasecmp(value, "never")) 134 return 0; 135 if (!strcasecmp(value, "always")) 136 return 1; 137 if (!strcasecmp(value, "auto")) 138 goto auto_color; 139 } 140 141 /* Missing or explicit false to turn off colorization */ 142 if (!perf_config_bool(var, value)) 143 return 0; 144 145 /* any normal truth value defaults to 'auto' */ 146 auto_color: 147 if (stdout_is_tty < 0) 148 stdout_is_tty = isatty(1); 149 if (stdout_is_tty || (pager_in_use() && pager_use_color)) { 150 char *term = getenv("TERM"); 151 if (term && strcmp(term, "dumb")) 152 return 1; 153 } 154 return 0; 155 } 156 157 int perf_color_default_config(const char *var, const char *value, void *cb) 158 { 159 if (!strcmp(var, "color.ui")) { 160 perf_use_color_default = perf_config_colorbool(var, value, -1); 161 return 0; 162 } 163 164 return perf_default_config(var, value, cb); 165 } 166 167 static int color_vfprintf(FILE *fp, const char *color, const char *fmt, 168 va_list args, const char *trail) 169 { 170 int r = 0; 171 172 /* 173 * Auto-detect: 174 */ 175 if (perf_use_color_default < 0) { 176 if (isatty(1) || pager_in_use()) 177 perf_use_color_default = 1; 178 else 179 perf_use_color_default = 0; 180 } 181 182 if (perf_use_color_default && *color) 183 r += fprintf(fp, "%s", color); 184 r += vfprintf(fp, fmt, args); 185 if (perf_use_color_default && *color) 186 r += fprintf(fp, "%s", PERF_COLOR_RESET); 187 if (trail) 188 r += fprintf(fp, "%s", trail); 189 return r; 190 } 191 192 193 194 int color_fprintf(FILE *fp, const char *color, const char *fmt, ...) 195 { 196 va_list args; 197 int r; 198 199 va_start(args, fmt); 200 r = color_vfprintf(fp, color, fmt, args, NULL); 201 va_end(args); 202 return r; 203 } 204 205 int color_fprintf_ln(FILE *fp, const char *color, const char *fmt, ...) 206 { 207 va_list args; 208 int r; 209 va_start(args, fmt); 210 r = color_vfprintf(fp, color, fmt, args, "\n"); 211 va_end(args); 212 return r; 213 } 214 215 /* 216 * This function splits the buffer by newlines and colors the lines individually. 217 * 218 * Returns 0 on success. 219 */ 220 int color_fwrite_lines(FILE *fp, const char *color, 221 size_t count, const char *buf) 222 { 223 if (!*color) 224 return fwrite(buf, count, 1, fp) != 1; 225 while (count) { 226 char *p = memchr(buf, '\n', count); 227 if (p != buf && (fputs(color, fp) < 0 || 228 fwrite(buf, p ? p - buf : count, 1, fp) != 1 || 229 fputs(PERF_COLOR_RESET, fp) < 0)) 230 return -1; 231 if (!p) 232 return 0; 233 if (fputc('\n', fp) < 0) 234 return -1; 235 count -= p + 1 - buf; 236 buf = p + 1; 237 } 238 return 0; 239 } 240 241 242