Line data Source code
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@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 "libeu.h"
41 : #include "color.h"
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 515 : parse_opt (int key, char *arg,
89 : struct argp_state *state __attribute__ ((unused)))
90 : {
91 515 : switch (key)
92 : {
93 0 : case OPT_COLOR:
94 0 : if (arg == NULL)
95 0 : color_mode = color_always;
96 : else
97 0 : {
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 0 : for (i = 0; i < nvalues; ++i)
117 0 : if (strcmp (arg, values[i].str) == 0)
118 : {
119 0 : color_mode = values[i].mode;
120 0 : if (color_mode == color_auto)
121 : color_mode
122 0 : = isatty (STDOUT_FILENO) ? color_always : color_never;
123 : break;
124 : }
125 0 : if (i == nvalues)
126 : {
127 0 : 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 0 : argp_help (&color_argp, stderr, ARGP_HELP_SEE,
135 : program_invocation_short_name);
136 0 : exit (EXIT_FAILURE);
137 : }
138 : }
139 :
140 0 : if (color_mode == color_always)
141 : {
142 0 : const char *env = getenv ("ELFUTILS_COLORS");
143 0 : if (env != NULL)
144 : {
145 : do
146 : {
147 0 : const char *start = env;
148 0 : while (*env != '=' && *env != '\0')
149 0 : ++env;
150 0 : if (*env == '=' && env != start)
151 : {
152 0 : size_t name_len = env - start;
153 0 : const char *val = ++env;
154 0 : env = strchrnul (env, ':');
155 0 : 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 0 : for (size_t i = 0; i < nknown; ++i)
184 0 : if (name_len == known[i].len
185 0 : && memcmp (start, known[i].name, name_len) == 0)
186 : {
187 0 : if (asprintf (known[i].varp, "\e[%.*sm",
188 0 : (int) (env - val), val) < 0)
189 0 : error (EXIT_FAILURE, errno,
190 0 : gettext ("cannot allocate memory"));
191 : break;
192 : }
193 : }
194 0 : if (*env == ':')
195 0 : ++env;
196 : }
197 : }
198 0 : while (*env != '\0');
199 :
200 0 : if (color_operand != NULL)
201 : {
202 0 : if (color_operand1[0] == '\0')
203 0 : color_operand1 = color_operand;
204 0 : if (color_operand2[0] == '\0')
205 0 : color_operand2 = color_operand;
206 0 : if (color_operand3[0] == '\0')
207 0 : 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 : }
|
