lib/skin/colors.c

lib/skin/colors.c
Manual pages: mc • mcdiff • mcedit • mcview
/* */
This source file includes following definitions.
mc_skin_color_get_from_hash
mc_skin_color_remove_from_hash
mc_skin_color_add_to_hash
mc_skin_color_get_with_defaults
mc_skin_color_look_up_alias
mc_skin_color_get_from_ini_file
mc_skin_color_set_default_for_terminal
mc_skin_color_cache_init
mc_skin_color_check_inisection
mc_skin_color_check_bw_mode
mc_skin_color_parse_ini_file
mc_skin_color_get
   1 /*
   2    Skins engine.
   3    Work with colors
   4 
   5    Copyright (C) 2009-2025
   6    Free Software Foundation, Inc.
   7 
   8    Written by:
   9    Slava Zanko <slavazanko@gmail.com>, 2009
  10    Egmont Koblinger <egmont@gmail.com>, 2010
  11    Andrew Borodin <aborodin@vmail.ru>, 2012
  12 
  13    This file is part of the Midnight Commander.
  14 
  15    The Midnight Commander is free software: you can redistribute it
  16    and/or modify it under the terms of the GNU General Public License as
  17    published by the Free Software Foundation, either version 3 of the License,
  18    or (at your option) any later version.
  19 
  20    The Midnight Commander is distributed in the hope that it will be useful,
  21    but WITHOUT ANY WARRANTY; without even the implied warranty of
  22    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23    GNU General Public License for more details.
  24 
  25    You should have received a copy of the GNU General Public License
  26    along with this program.  If not, see <https://www.gnu.org/licenses/>.
  27  */
  28 
  29 #include <config.h>
  30 #include <string.h>
  31 
  32 #include "internal.h"
  33 
  34 #include "lib/tty/color.h"
  35 
  36 /*** global variables ****************************************************************************/
  37 
  38 int mc_skin_color__cache[MC_SKIN_COLOR_CACHE_COUNT];
  39 
  40 /*** file scope macro definitions ****************************************************************/
  41 
  42 /*** file scope type declarations ****************************************************************/
  43 
  44 /*** forward declarations (file scope functions) *************************************************/
  45 
  46 /*** file scope variables ************************************************************************/
  47 
  48 /* --------------------------------------------------------------------------------------------- */
  49 /*** file scope functions ************************************************************************/
  50 /* --------------------------------------------------------------------------------------------- */
  51 
  52 static tty_color_pair_t *
  53 mc_skin_color_get_from_hash (mc_skin_t *mc_skin, const gchar *group, const gchar *key)
     /*   */
  54 {
  55     gchar kname[BUF_TINY];
  56     tty_color_pair_t *mc_skin_color;
  57 
  58     if (group == NULL || key == NULL)
  59         return NULL;
  60 
  61     if (mc_skin == NULL)
  62         mc_skin = &mc_skin__default;
  63 
  64     g_snprintf (kname, sizeof (kname), "%s.%s", group, key);
  65     mc_skin_color = (tty_color_pair_t *) g_hash_table_lookup (mc_skin->colors, (gpointer) kname);
  66 
  67     return mc_skin_color;
  68 }
  69 
  70 /* --------------------------------------------------------------------------------------------- */
  71 
  72 #if 0
  73 static void
  74 mc_skin_color_remove_from_hash (mc_skin_t *mc_skin, const gchar *group, const gchar *key)
     /*   */
  75 {
  76     gchar kname[BUF_TINY];
  77     if (group == NULL || key == NULL)
  78         return;
  79 
  80     if (mc_skin == NULL)
  81         mc_skin = &mc_skin__default;
  82 
  83     g_snprintf (kname, sizeof (kname), "%s.%s", group, key);
  84     g_hash_table_remove (mc_skin->colors, (gpointer) kname);
  85 }
  86 #endif
  87 
  88 /* --------------------------------------------------------------------------------------------- */
  89 
  90 static void
  91 mc_skin_color_add_to_hash (mc_skin_t *mc_skin, const gchar *group, const gchar *key,
     /*   */
  92                            tty_color_pair_t *mc_skin_color)
  93 {
  94     gchar *kname;
  95 
  96     kname = g_strdup_printf ("%s.%s", group, key);
  97     if (kname != NULL)
  98     {
  99         if (g_hash_table_lookup (mc_skin->colors, (gpointer) kname) != NULL)
 100             g_hash_table_remove (mc_skin->colors, (gpointer) kname);
 101 
 102         g_hash_table_insert (mc_skin->colors, (gpointer) kname, (gpointer) mc_skin_color);
 103     }
 104 }
 105 
 106 /* --------------------------------------------------------------------------------------------- */
 107 
 108 static tty_color_pair_t *
 109 mc_skin_color_get_with_defaults (const gchar *group, const gchar *name)
     /*   */
 110 {
 111     tty_color_pair_t *mc_skin_color;
 112 
 113     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, name);
 114     if (mc_skin_color != NULL)
 115         return mc_skin_color;
 116 
 117     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, "_default_");
 118     if (mc_skin_color != NULL)
 119         return mc_skin_color;
 120 
 121     mc_skin_color = mc_skin_color_get_from_hash (NULL, "core", "_default_");
 122     return mc_skin_color;
 123 }
 124 
 125 /* --------------------------------------------------------------------------------------------- */
 126 
 127 /* If an alias is found, alloc a new string for the resolved value and free the input parameter.
 128    Otherwise it's a no-op returning the original string. */
 129 static gchar *
 130 mc_skin_color_look_up_alias (mc_skin_t *mc_skin, gchar *str)
     /*   */
 131 {
 132     gchar *orig, *str2;
 133     int hop = 0;
 134 
 135     orig = g_strdup (str);
 136     str2 = g_strdup (str);
 137 
 138     while (TRUE)
 139     {
 140         gchar **values;
 141         gsize items_count;
 142 
 143         values = mc_config_get_string_list (mc_skin->config, "aliases", str, &items_count);
 144         if (items_count != 1)
 145         {
 146             // No such alias declaration found, that is, we've got the resolved value.
 147             g_strfreev (values);
 148             g_free (str2);
 149             g_free (orig);
 150             return str;
 151         }
 152 
 153         g_free (str);
 154         str = g_strdup (values[0]);
 155         g_strfreev (values);
 156 
 157         // str2 resolves at half speed than str. This is used for loop detection.
 158         if (hop++ % 2 != 0)
 159         {
 160             values = mc_config_get_string_list (mc_skin->config, "aliases", str2, &items_count);
 161             g_assert (items_count == 1);
 162             g_free (str2);
 163             str2 = g_strdup (values[0]);
 164             g_strfreev (values);
 165 
 166             if (strcmp (str, str2) == 0)
 167             {
 168                 // Loop detected.
 169                 fprintf (stderr,
 170                          "Loop detected while trying to resolve alias \"%s\" in skin \"%s\"\n",
 171                          orig, mc_skin->name);
 172                 g_free (str);
 173                 g_free (str2);
 174                 return orig;
 175             }
 176         }
 177     }
 178 }
 179 
 180 /* --------------------------------------------------------------------------------------------- */
 181 
 182 static tty_color_pair_t *
 183 mc_skin_color_get_from_ini_file (mc_skin_t *mc_skin, const gchar *group, const gchar *key)
     /*   */
 184 {
 185     gsize items_count;
 186     gchar **values;
 187     tty_color_pair_t *mc_skin_color, *tmp;
 188 
 189     values = mc_config_get_string_list (mc_skin->config, group, key, &items_count);
 190     if (values == NULL || values[0] == NULL)
 191     {
 192         g_strfreev (values);
 193         return NULL;
 194     }
 195 
 196     mc_skin_color = g_try_new0 (tty_color_pair_t, 1);
 197     if (mc_skin_color == NULL)
 198     {
 199         g_strfreev (values);
 200         return NULL;
 201     }
 202 
 203     tmp = mc_skin_color_get_with_defaults (group, "_default_");
 204     mc_skin_color->fg = (items_count > 0 && values[0][0])
 205         ? mc_skin_color_look_up_alias (mc_skin, g_strstrip (g_strdup (values[0])))
 206         : (tmp != NULL) ? g_strdup (tmp->fg)
 207                         : NULL;
 208     mc_skin_color->bg = (items_count > 1 && values[1][0])
 209         ? mc_skin_color_look_up_alias (mc_skin, g_strstrip (g_strdup (values[1])))
 210         : (tmp != NULL) ? g_strdup (tmp->bg)
 211                         : NULL;
 212     mc_skin_color->attrs = (items_count > 2 && values[2][0])
 213         ? mc_skin_color_look_up_alias (mc_skin, g_strstrip (g_strdup (values[2])))
 214         : (tmp != NULL) ? g_strdup (tmp->attrs)
 215                         : NULL;
 216 
 217     g_strfreev (values);
 218 
 219     mc_skin_color->pair_index = tty_try_alloc_color_pair (mc_skin_color, FALSE);
 220 
 221     return mc_skin_color;
 222 }
 223 
 224 /* --------------------------------------------------------------------------------------------- */
 225 
 226 static void
 227 mc_skin_color_set_default_for_terminal (mc_skin_t *mc_skin)
     /*   */
 228 {
 229     tty_color_pair_t *mc_skin_color;
 230 
 231     mc_skin_color = g_try_new0 (tty_color_pair_t, 1);
 232     if (mc_skin_color != NULL)
 233     {
 234         mc_skin_color->fg = g_strdup ("default");
 235         mc_skin_color->bg = g_strdup ("default");
 236         mc_skin_color->attrs = NULL;
 237         mc_skin_color->pair_index = tty_try_alloc_color_pair (mc_skin_color, FALSE);
 238         mc_skin_color_add_to_hash (mc_skin, "skin", "terminal_default_color", mc_skin_color);
 239     }
 240 }
 241 
 242 /* --------------------------------------------------------------------------------------------- */
 243 
 244 static void
 245 mc_skin_color_cache_init (void)
     /*   */
 246 {
 247     DEFAULT_COLOR = mc_skin_color_get ("skin", "terminal_default_color");
 248     NORMAL_COLOR = mc_skin_color_get ("core", "_default_");
 249     MARKED_COLOR = mc_skin_color_get ("core", "marked");
 250     SELECTED_COLOR = mc_skin_color_get ("core", "selected");
 251     MARKED_SELECTED_COLOR = mc_skin_color_get ("core", "markselect");
 252     DISABLED_COLOR = mc_skin_color_get ("core", "disabled");
 253     REVERSE_COLOR = mc_skin_color_get ("core", "reverse");
 254     HEADER_COLOR = mc_skin_color_get ("core", "header");
 255     COMMAND_MARK_COLOR = mc_skin_color_get ("core", "commandlinemark");
 256     SHADOW_COLOR = mc_skin_color_get ("core", "shadow");
 257 
 258     COLOR_NORMAL = mc_skin_color_get ("dialog", "_default_");
 259     COLOR_FOCUS = mc_skin_color_get ("dialog", "dfocus");
 260     COLOR_HOT_NORMAL = mc_skin_color_get ("dialog", "dhotnormal");
 261     COLOR_HOT_FOCUS = mc_skin_color_get ("dialog", "dhotfocus");
 262     COLOR_SELECTED_NORMAL = mc_skin_color_get ("dialog", "dselnormal");
 263     COLOR_SELECTED_FOCUS = mc_skin_color_get ("dialog", "dselfocus");
 264     COLOR_TITLE = mc_skin_color_get ("dialog", "dtitle");
 265 
 266     ERROR_COLOR = mc_skin_color_get ("error", "_default_");
 267     ERROR_FOCUS = mc_skin_color_get ("error", "errdfocus");
 268     ERROR_HOT_NORMAL = mc_skin_color_get ("error", "errdhotnormal");
 269     ERROR_HOT_FOCUS = mc_skin_color_get ("error", "errdhotfocus");
 270     ERROR_TITLE = mc_skin_color_get ("error", "errdtitle");
 271 
 272     MENU_ENTRY_COLOR = mc_skin_color_get ("menu", "_default_");
 273     MENU_SELECTED_COLOR = mc_skin_color_get ("menu", "menusel");
 274     MENU_HOT_COLOR = mc_skin_color_get ("menu", "menuhot");
 275     MENU_HOTSEL_COLOR = mc_skin_color_get ("menu", "menuhotsel");
 276     MENU_INACTIVE_COLOR = mc_skin_color_get ("menu", "menuinactive");
 277 
 278     PMENU_ENTRY_COLOR = mc_skin_color_get ("popupmenu", "_default_");
 279     PMENU_SELECTED_COLOR = mc_skin_color_get ("popupmenu", "menusel");
 280     PMENU_TITLE_COLOR = mc_skin_color_get ("popupmenu", "menutitle");
 281 
 282     BUTTONBAR_HOTKEY_COLOR = mc_skin_color_get ("buttonbar", "hotkey");
 283     BUTTONBAR_BUTTON_COLOR = mc_skin_color_get ("buttonbar", "button");
 284 
 285     STATUSBAR_COLOR = mc_skin_color_get ("statusbar", "_default_");
 286 
 287     GAUGE_COLOR = mc_skin_color_get ("core", "gauge");
 288     INPUT_COLOR = mc_skin_color_get ("core", "input");
 289     INPUT_HISTORY_COLOR = mc_skin_color_get ("core", "inputhistory");
 290     COMMAND_HISTORY_COLOR = mc_skin_color_get ("core", "commandhistory");
 291     INPUT_MARK_COLOR = mc_skin_color_get ("core", "inputmark");
 292     INPUT_UNCHANGED_COLOR = mc_skin_color_get ("core", "inputunchanged");
 293 
 294     HELP_NORMAL_COLOR = mc_skin_color_get ("help", "_default_");
 295     HELP_ITALIC_COLOR = mc_skin_color_get ("help", "helpitalic");
 296     HELP_BOLD_COLOR = mc_skin_color_get ("help", "helpbold");
 297     HELP_LINK_COLOR = mc_skin_color_get ("help", "helplink");
 298     HELP_SLINK_COLOR = mc_skin_color_get ("help", "helpslink");
 299     HELP_TITLE_COLOR = mc_skin_color_get ("help", "helptitle");
 300 
 301     VIEW_NORMAL_COLOR = mc_skin_color_get ("viewer", "_default_");
 302     VIEW_BOLD_COLOR = mc_skin_color_get ("viewer", "viewbold");
 303     VIEW_UNDERLINED_COLOR = mc_skin_color_get ("viewer", "viewunderline");
 304     VIEW_SELECTED_COLOR = mc_skin_color_get ("viewer", "viewselected");
 305 
 306     EDITOR_NORMAL_COLOR = mc_skin_color_get ("editor", "_default_");
 307     EDITOR_BOLD_COLOR = mc_skin_color_get ("editor", "editbold");
 308     EDITOR_MARKED_COLOR = mc_skin_color_get ("editor", "editmarked");
 309     EDITOR_WHITESPACE_COLOR = mc_skin_color_get ("editor", "editwhitespace");
 310     EDITOR_NONPRINTABLE_COLOR = mc_skin_color_get ("editor", "editnonprintable");
 311     EDITOR_RIGHT_MARGIN_COLOR = mc_skin_color_get ("editor", "editrightmargin");
 312     LINE_STATE_COLOR = mc_skin_color_get ("editor", "editlinestate");
 313     EDITOR_BACKGROUND = mc_skin_color_get ("editor", "editbg");
 314     EDITOR_FRAME = mc_skin_color_get ("editor", "editframe");
 315     EDITOR_FRAME_ACTIVE = mc_skin_color_get ("editor", "editframeactive");
 316     EDITOR_FRAME_DRAG = mc_skin_color_get ("editor", "editframedrag");
 317 
 318     BOOK_MARK_COLOR = mc_skin_color_get ("editor", "bookmark");
 319     BOOK_MARK_FOUND_COLOR = mc_skin_color_get ("editor", "bookmarkfound");
 320 
 321     DFF_ADD_COLOR = mc_skin_color_get ("diffviewer", "added");
 322     DFF_CHG_COLOR = mc_skin_color_get ("diffviewer", "changedline");
 323     DFF_CHH_COLOR = mc_skin_color_get ("diffviewer", "changednew");
 324     DFF_CHD_COLOR = mc_skin_color_get ("diffviewer", "changed");
 325     DFF_DEL_COLOR = mc_skin_color_get ("diffviewer", "removed");
 326     DFF_ERROR_COLOR = mc_skin_color_get ("diffviewer", "error");
 327 }
 328 
 329 /* --------------------------------------------------------------------------------------------- */
 330 
 331 static gboolean
 332 mc_skin_color_check_inisection (const gchar *group)
     /*   */
 333 {
 334     return !((strcasecmp ("skin", group) == 0) || (strcasecmp ("aliases", group) == 0)
 335              || (strcasecmp ("lines", group) == 0) || (strncasecmp ("widget-", group, 7) == 0));
 336 }
 337 
 338 /* --------------------------------------------------------------------------------------------- */
 339 
 340 static void
 341 mc_skin_color_check_bw_mode (mc_skin_t *mc_skin)
     /*   */
 342 {
 343     gchar **groups, **orig_groups;
 344 
 345     if (tty_use_colors () && !mc_global.tty.disable_colors)
 346         return;
 347 
 348     orig_groups = mc_config_get_groups (mc_skin->config, NULL);
 349 
 350     for (groups = orig_groups; *groups != NULL; groups++)
 351         if (mc_skin_color_check_inisection (*groups))
 352             mc_config_del_group (mc_skin->config, *groups);
 353 
 354     g_strfreev (orig_groups);
 355 
 356     mc_skin_hardcoded_blackwhite_colors (mc_skin);
 357 }
 358 
 359 /* --------------------------------------------------------------------------------------------- */
 360 /*** public functions ****************************************************************************/
 361 /* --------------------------------------------------------------------------------------------- */
 362 
 363 gboolean
 364 mc_skin_color_parse_ini_file (mc_skin_t *mc_skin)
     /*   */
 365 {
 366     gboolean ret = FALSE;
 367     gsize items_count;
 368     gchar **groups, **orig_groups;
 369     tty_color_pair_t *mc_skin_color;
 370 
 371     mc_skin_color_check_bw_mode (mc_skin);
 372 
 373     orig_groups = mc_config_get_groups (mc_skin->config, &items_count);
 374     if (*orig_groups == NULL)
 375         goto ret;
 376 
 377     // as first, need to set up default colors
 378     mc_skin_color_set_default_for_terminal (mc_skin);
 379     mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, "core", "_default_");
 380     if (mc_skin_color == NULL)
 381         goto ret;
 382 
 383     tty_color_set_defaults (mc_skin_color);
 384     mc_skin_color_add_to_hash (mc_skin, "core", "_default_", mc_skin_color);
 385 
 386     for (groups = orig_groups; *groups != NULL; groups++)
 387     {
 388         gchar **keys, **orig_keys;
 389 
 390         if (!mc_skin_color_check_inisection (*groups))
 391             continue;
 392 
 393         orig_keys = mc_config_get_keys (mc_skin->config, *groups, NULL);
 394 
 395         for (keys = orig_keys; *keys != NULL; keys++)
 396         {
 397             mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, *groups, *keys);
 398             if (mc_skin_color != NULL)
 399                 mc_skin_color_add_to_hash (mc_skin, *groups, *keys, mc_skin_color);
 400         }
 401         g_strfreev (orig_keys);
 402     }
 403 
 404     mc_skin_color_cache_init ();
 405 
 406     ret = TRUE;
 407 
 408 ret:
 409     g_strfreev (orig_groups);
 410     return ret;
 411 }
 412 
 413 /* --------------------------------------------------------------------------------------------- */
 414 
 415 int
 416 mc_skin_color_get (const gchar *group, const gchar *name)
     /*   */
 417 {
 418     tty_color_pair_t *mc_skin_color;
 419 
 420     mc_skin_color = mc_skin_color_get_with_defaults (group, name);
 421 
 422     return (mc_skin_color != NULL) ? mc_skin_color->pair_index : 0;
 423 }
 424 
 425 /* --------------------------------------------------------------------------------------------- */
/* */
root/lib/skin/colors.c

DEFINITIONS
