1 /* Handling of color output. 2 Copyright (C) 2011 Red Hat, Inc. 3 This file is part of elfutils. 4 Written by Ulrich Drepper <drepper (at) redhat.com>, 2011. 5 6 This file is free software; you can redistribute it and/or modify 7 it under the terms of either 8 9 * the GNU Lesser General Public License as published by the Free 10 Software Foundation; either version 3 of the License, or (at 11 your option) any later version 12 13 or 14 15 * the GNU General Public License as published by the Free 16 Software Foundation; either version 2 of the License, or (at 17 your option) any later version 18 19 or both in parallel, as here. 20 21 elfutils is distributed in the hope that it will be useful, but 22 WITHOUT ANY WARRANTY; without even the implied warranty of 23 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 24 General Public License for more details. 25 26 You should have received copies of the GNU General Public License and 27 the GNU Lesser General Public License along with this program. If 28 not, see <http://www.gnu.org/licenses/>. */ 29 30 #ifdef HAVE_CONFIG_H 31 # include <config.h> 32 #endif 33 34 #include <argp.h> 35 #include <error.h> 36 #include <libintl.h> 37 #include <stdlib.h> 38 #include <string.h> 39 #include <unistd.h> 40 #include "system.h" 41 42 43 /* Prototype for option handler. */ 44 static error_t parse_opt (int key, char *arg, struct argp_state *state); 45 46 /* Option values. */ 47 #define OPT_COLOR 0x100100 48 49 /* Definitions of arguments for argp functions. */ 50 static const struct argp_option options[] = 51 { 52 { "color", OPT_COLOR, "WHEN", OPTION_ARG_OPTIONAL, 53 N_("colorize the output. WHEN defaults to 'always' or can be 'auto' or 'never'"), 0 }, 54 55 { NULL, 0, NULL, 0, NULL, 0 } 56 }; 57 58 /* Parser data structure. */ 59 const struct argp color_argp = 60 { 61 options, parse_opt, NULL, NULL, NULL, NULL, NULL 62 }; 63 64 /* Coloring mode. */ 65 enum color_enum color_mode; 66 67 /* Colors to use for the various components. */ 68 char *color_address = ""; 69 char *color_bytes = ""; 70 char *color_mnemonic = ""; 71 char *color_operand = NULL; 72 char *color_operand1 = ""; 73 char *color_operand2 = ""; 74 char *color_operand3 = ""; 75 char *color_label = ""; 76 char *color_undef = ""; 77 char *color_undef_tls = ""; 78 char *color_undef_weak = ""; 79 char *color_symbol = ""; 80 char *color_tls = ""; 81 char *color_weak = ""; 82 83 const char color_off[] = "\e[0m"; 84 85 86 /* Handle program arguments. */ 87 static error_t 88 parse_opt (int key, char *arg, 89 struct argp_state *state __attribute__ ((unused))) 90 { 91 switch (key) 92 { 93 case OPT_COLOR: 94 if (arg == NULL) 95 color_mode = color_always; 96 else 97 { 98 static const struct 99 { 100 const char str[7]; 101 enum color_enum mode; 102 } values[] = 103 { 104 { "always", color_always }, 105 { "yes", color_always }, 106 { "force", color_always }, 107 { "never", color_never }, 108 { "no", color_never }, 109 { "none", color_never }, 110 { "auto", color_auto }, 111 { "tty", color_auto }, 112 { "if-tty", color_auto } 113 }; 114 const int nvalues = sizeof (values) / sizeof (values[0]); 115 int i; 116 for (i = 0; i < nvalues; ++i) 117 if (strcmp (arg, values[i].str) == 0) 118 { 119 color_mode = values[i].mode; 120 if (color_mode == color_auto) 121 color_mode 122 = isatty (STDOUT_FILENO) ? color_always : color_never; 123 break; 124 } 125 if (i == nvalues) 126 { 127 error (0, 0, dgettext ("elfutils", "\ 128 %s: invalid argument '%s' for '--color'\n\ 129 valid arguments are:\n\ 130 - 'always', 'yes', 'force'\n\ 131 - 'never', 'no', 'none'\n\ 132 - 'auto', 'tty', 'if-tty'\n"), 133 program_invocation_short_name, arg); 134 argp_help (&color_argp, stderr, ARGP_HELP_SEE, 135 program_invocation_short_name); 136 exit (EXIT_FAILURE); 137 } 138 } 139 140 if (color_mode == color_always) 141 { 142 const char *env = getenv ("ELFUTILS_COLORS"); 143 if (env != NULL) 144 { 145 do 146 { 147 const char *start = env; 148 while (*env != '=' && *env != '\0') 149 ++env; 150 if (*env == '=' && env != start) 151 { 152 size_t name_len = env - start; 153 const char *val = ++env; 154 env = strchrnul (env, ':'); 155 if (val != env) 156 { 157 static const struct 158 { 159 unsigned char len; 160 const char name[sizeof (char *) - 1]; 161 char **varp; 162 } known[] = 163 { 164 #define E(name, var) { sizeof (#name) - 1, #name, &color_##var } 165 E (a, address), 166 E (b, bytes), 167 E (m, mnemonic), 168 E (o, operand), 169 E (o1, operand1), 170 E (o1, operand2), 171 E (o1, operand3), 172 E (l, label), 173 E (u, undef), 174 E (ut, undef_tls), 175 E (uw, undef_weak), 176 E (sy, symbol), 177 E (st, tls), 178 E (sw, weak), 179 }; 180 const size_t nknown = (sizeof (known) 181 / sizeof (known[0])); 182 183 for (size_t i = 0; i < nknown; ++i) 184 if (name_len == known[i].len 185 && memcmp (start, known[i].name, name_len) == 0) 186 { 187 if (asprintf (known[i].varp, "\e[%.*sm", 188 (int) (env - val), val) < 0) 189 error (EXIT_FAILURE, errno, 190 gettext ("cannot allocate memory")); 191 break; 192 } 193 } 194 if (*env == ':') 195 ++env; 196 } 197 } 198 while (*env != '\0'); 199 200 if (color_operand != NULL) 201 { 202 if (color_operand1[0] == '\0') 203 color_operand1 = color_operand; 204 if (color_operand2[0] == '\0') 205 color_operand2 = color_operand; 206 if (color_operand3[0] == '\0') 207 color_operand3 = color_operand; 208 } 209 } 210 #if 0 211 else 212 { 213 // XXX Just for testing. 214 color_address = xstrdup ("\e[38;5;166;1m"); 215 color_bytes = xstrdup ("\e[38;5;141m"); 216 color_mnemonic = xstrdup ("\e[38;5;202;1m"); 217 color_operand1 = xstrdup ("\e[38;5;220m"); 218 color_operand2 = xstrdup ("\e[38;5;48m"); 219 color_operand3 = xstrdup ("\e[38;5;112m"); 220 color_label = xstrdup ("\e[38;5;21m"); 221 } 222 #endif 223 } 224 break; 225 226 default: 227 return ARGP_ERR_UNKNOWN; 228 } 229 return 0; 230 } 231
