src/skin/colors.c

   1 /*
   2    Skins engine.
   3    Work with colors
   4
   5    Copyright (C) 2009 The Free Software Foundation, Inc.
   6
   7    Written by:
   8    Slava Zanko <slavazanko@gmail.com>, 2009.
   9
  10    This file is part of the Midnight Commander.
  11
  12    The Midnight Commander is free software; you can redistribute it
  13    and/or modify it under the terms of the GNU General Public License as
  14    published by the Free Software Foundation; either version 2 of the
  15    License, or (at your option) any later version.
  16
  17    The Midnight Commander is distributed in the hope that it will be
  18    useful, but WITHOUT ANY WARRANTY; without even the implied warranty
  19    of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20    General Public License for more details.
  21
  22    You should have received a copy of the GNU General Public License
  23    along with this program; if not, write to the Free Software
  24    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
  25    MA 02110-1301, USA.
  26  */
  27
  28 #include <config.h>
  29 #include <string.h>
  30
  31 #include "../src/global.h"
  32 #include "../src/args.h"
  33 #include "../src/tty/color.h"
  34 #include "skin.h"
  35 #include "internal.h"
  36
  37 /*** global variables ****************************************************************************/
  38
  39 int mc_skin_color__cache[MC_SKIN_COLOR_CACHE_COUNT];
  40
  41 /*** file scope macro definitions ****************************************************************/
  42
  43 /*** file scope type declarations ****************************************************************/
  44
  45 /*** file scope variables ************************************************************************/
  46
  47 /*** file scope functions ************************************************************************/
  48
  49 static mc_skin_color_t *
  50 mc_skin_color_get_from_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
  51 {
  52     gchar key_name[BUF_TINY];
  53     mc_skin_color_t *mc_skin_color;
  54
  55     if (group == NULL || key == NULL)
  56         return NULL;
  57
  58     if (mc_skin == NULL)
  59         mc_skin = &mc_skin__default;
  60
  61     g_snprintf (key_name, sizeof (key_name), "%s.%s", group, key);
  62     mc_skin_color = (mc_skin_color_t *) g_hash_table_lookup (mc_skin->colors, (gpointer) key_name);
  63
  64     return mc_skin_color;
  65 }
  66
  67 /* --------------------------------------------------------------------------------------------- */
  68
  69 #if 0
  70 static void
  71 mc_skin_color_remove_from_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
  72 {
  73     gchar key_name[BUF_TINY];
  74     if (group == NULL || key == NULL)
  75         return;
  76
  77     if (mc_skin == NULL)
  78         mc_skin = &mc_skin__default;
  79
  80     g_snprintf (key_name, sizeof (key_name), "%s.%s", group, key);
  81     g_hash_table_remove (mc_skin->colors, (gpointer) key_name);
  82 }
  83 #endif
  84 /* --------------------------------------------------------------------------------------------- */
  85
  86 static void
  87 mc_skin_color_add_to_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key,
  88                            mc_skin_color_t * mc_skin_color)
  89 {
  90     gchar *key_name;
  91
  92     key_name = g_strdup_printf ("%s.%s", group, key);
  93     if (key_name == NULL)
  94         return;
  95
  96     if (g_hash_table_lookup (mc_skin->colors, (gpointer) key_name) != NULL)
  97         g_hash_table_remove (mc_skin->colors, (gpointer) key_name);
  98
  99     g_hash_table_insert (mc_skin->colors, (gpointer) key_name, (gpointer) mc_skin_color);
 100 }
 101
 102 /* --------------------------------------------------------------------------------------------- */
 103
 104 static mc_skin_color_t *
 105 mc_skin_color_get_with_defaults (const gchar * group, const gchar * name)
 106 {
 107     mc_skin_color_t *mc_skin_color;
 108
 109     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, name);
 110     if (mc_skin_color != NULL)
 111         return mc_skin_color;
 112
 113     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, "_default_");
 114     if (mc_skin_color != NULL)
 115         return mc_skin_color;
 116
 117     mc_skin_color = mc_skin_color_get_from_hash (NULL, "core", "_default_");
 118     return mc_skin_color;
 119 }
 120
 121 /* --------------------------------------------------------------------------------------------- */
 122
 123 static mc_skin_color_t *
 124 mc_skin_color_get_from_ini_file (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
 125 {
 126     gsize items_count;
 127     gchar **values;
 128     mc_skin_color_t *mc_skin_color, *tmp;
 129
 130     values = mc_config_get_string_list (mc_skin->config, group, key, &items_count);
 131
 132     if (values == NULL || *values == NULL) {
 133         if (values != NULL)
 134             g_strfreev (values);
 135         return NULL;
 136     }
 137     mc_skin_color = g_try_new0 (mc_skin_color_t, 1);
 138     if (mc_skin_color == NULL) {
 139         g_strfreev (values);
 140         return NULL;
 141     }
 142
 143     switch (items_count) {
 144     case 0:
 145         tmp = mc_skin_color_get_with_defaults (group, "_default_");
 146         if (tmp) {
 147             mc_skin_color->fgcolor = g_strdup (tmp->fgcolor);
 148             mc_skin_color->bgcolor = g_strdup (tmp->bgcolor);
 149         } else {
 150             g_strfreev (values);
 151             g_free (mc_skin_color);
 152             return NULL;
 153         }
 154         break;
 155     case 1:
 156         mc_skin_color->fgcolor = (values[0]) ? g_strstrip (g_strdup (values[0])) : NULL;
 157         tmp = mc_skin_color_get_with_defaults (group, "_default_");
 158         mc_skin_color->bgcolor = (tmp != NULL) ? g_strdup (tmp->bgcolor) : NULL;
 159         break;
 160     case 2:
 161         mc_skin_color->fgcolor = (values[0]) ? g_strstrip (g_strdup (values[0])) : NULL;
 162         mc_skin_color->bgcolor = (values[1]) ? g_strstrip (g_strdup (values[1])) : NULL;
 163         break;
 164     }
 165     g_strfreev (values);
 166
 167     mc_skin_color->pair_index =
 168         tty_try_alloc_color_pair2 (mc_skin_color->fgcolor, mc_skin_color->bgcolor, FALSE);
 169
 170     return mc_skin_color;
 171 }
 172
 173 /* --------------------------------------------------------------------------------------------- */
 174
 175 static void
 176 mc_skin_color_set_default_for_terminal (mc_skin_t * mc_skin)
 177 {
 178     mc_skin_color_t *mc_skin_color;
 179     mc_skin_color = g_try_new0 (mc_skin_color_t, 1);
 180     if (mc_skin_color != NULL) {
 181         mc_skin_color->fgcolor = g_strdup ("default");
 182         mc_skin_color->bgcolor = g_strdup ("default");
 183         mc_skin_color->pair_index =
 184             tty_try_alloc_color_pair2 (mc_skin_color->fgcolor, mc_skin_color->bgcolor, FALSE);
 185         mc_skin_color_add_to_hash (mc_skin, "skin", "terminal_default_color", mc_skin_color);
 186     }
 187 }
 188
 189 /* --------------------------------------------------------------------------------------------- */
 190 static void
 191 mc_skin_color_cache_init (void)
 192 {
 193     DEFAULT_COLOR = mc_skin_color_get ("skin", "terminal_default_color");
 194     NORMAL_COLOR = mc_skin_color_get ("core", "_default_");
 195     MARKED_COLOR = mc_skin_color_get ("core", "marked");
 196     SELECTED_COLOR = mc_skin_color_get ("core", "selected");
 197     MARKED_SELECTED_COLOR = mc_skin_color_get ("core", "markselect");
 198     REVERSE_COLOR = mc_skin_color_get ("core", "reverse");
 199
 200     COLOR_NORMAL = mc_skin_color_get ("dialog", "_default_");
 201     COLOR_FOCUS = mc_skin_color_get ("dialog", "dfocus");
 202     COLOR_HOT_NORMAL = mc_skin_color_get ("dialog", "dhotnormal");
 203     COLOR_HOT_FOCUS = mc_skin_color_get ("dialog", "dhotfocus");
 204
 205     ERROR_COLOR = mc_skin_color_get ("error", "_default_");
 206     ERROR_HOT_NORMAL = mc_skin_color_get ("error", "errdhotnormal");
 207     ERROR_HOT_FOCUS = mc_skin_color_get ("error", "errdhotfocus");
 208
 209     MENU_ENTRY_COLOR = mc_skin_color_get ("menu", "_default_");
 210     MENU_SELECTED_COLOR = mc_skin_color_get ("menu", "menusel");
 211     MENU_HOT_COLOR = mc_skin_color_get ("menu", "menuhot");
 212     MENU_HOTSEL_COLOR = mc_skin_color_get ("menu", "menuhotsel");
 213
 214     GAUGE_COLOR = mc_skin_color_get ("core", "gauge");
 215     INPUT_COLOR = mc_skin_color_get ("core", "input");
 216
 217     HELP_NORMAL_COLOR = mc_skin_color_get ("help", "_default_");
 218     HELP_ITALIC_COLOR = mc_skin_color_get ("help", "helpitalic");
 219     HELP_BOLD_COLOR = mc_skin_color_get ("help", "helpbold");
 220     HELP_LINK_COLOR = mc_skin_color_get ("help", "helplink");
 221     HELP_SLINK_COLOR = mc_skin_color_get ("help", "helpslink");
 222
 223     VIEW_UNDERLINED_COLOR = mc_skin_color_get ("viewer", "viewunderline");
 224
 225     EDITOR_NORMAL_COLOR = mc_skin_color_get ("editor", "_default_");
 226     EDITOR_BOLD_COLOR = mc_skin_color_get ("editor", "editbold");
 227     EDITOR_MARKED_COLOR = mc_skin_color_get ("editor", "editmarked");
 228     EDITOR_WHITESPACE_COLOR = mc_skin_color_get ("editor", "editwhitespace");
 229     EDITOR_RIGHT_MARGIN_COLOR = mc_skin_color_get ("editor", "editrightmargin");
 230     LINE_STATE_COLOR = mc_skin_color_get ("editor", "linestate");
 231
 232     BOOK_MARK_COLOR = mc_skin_color_get ("editor", "bookmark");
 233     BOOK_MARK_FOUND_COLOR = mc_skin_color_get ("editor", "bookmarkfound");
 234     BUTTONBAR_HOTKEY_COLOR = mc_skin_color_get ("buttonbar", "hotkey");
 235     BUTTONBAR_BUTTON_COLOR = mc_skin_color_get ("buttonbar", "button");
 236
 237
 238 }
 239
 240 /* --------------------------------------------------------------------------------------------- */
 241
 242 static gboolean
 243 mc_skin_color_check_inisection (const gchar * group)
 244 {
 245     return !((strcasecmp ("skin", group) == 0)
 246         || (strcasecmp ("lines", group) == 0));
 247 }
 248
 249 /* --------------------------------------------------------------------------------------------- */
 250
 251 static void
 252 mc_skin_color_check_bw_mode (mc_skin_t * mc_skin)
 253 {
 254     gchar **groups, **orig_groups;
 255
 256     if (!mc_args__disable_colors)
 257         return;
 258
 259     orig_groups = groups = mc_config_get_groups (mc_skin->config, NULL);
 260
 261     if (groups == NULL)
 262         return;
 263
 264     for (; *groups != NULL; groups++) {
 265         if (mc_skin_color_check_inisection (*groups))
 266             mc_config_del_group (mc_skin->config, *groups);
 267     }
 268     g_strfreev (orig_groups);
 269     mc_skin_hardcoded_blackwhite_colors (mc_skin);
 270 }
 271
 272 /* --------------------------------------------------------------------------------------------- */
 273 /*** public functions ****************************************************************************/
 274 /* --------------------------------------------------------------------------------------------- */
 275
 276 gboolean
 277 mc_skin_color_parse_ini_file (mc_skin_t * mc_skin)
 278 {
 279     gsize items_count;
 280     gchar **groups, **orig_groups;
 281     gchar **keys, **orig_keys;
 282     mc_skin_color_t *mc_skin_color;
 283
 284     mc_skin_color_check_bw_mode (mc_skin);
 285
 286     orig_groups = groups = mc_config_get_groups (mc_skin->config, &items_count);
 287
 288     if (groups == NULL)
 289         return FALSE;
 290
 291     if (*groups == NULL) {
 292         g_strfreev (groups);
 293         return FALSE;
 294     }
 295
 296     /* as first, need to set up default colors */
 297     mc_skin_color_set_default_for_terminal (mc_skin);
 298     mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, "core", "_default_");
 299     if (mc_skin_color == NULL)
 300         return FALSE;
 301
 302     tty_color_set_defaults (mc_skin_color->fgcolor, mc_skin_color->bgcolor);
 303     mc_skin_color_add_to_hash (mc_skin, "core", "_default_", mc_skin_color);
 304
 305     for (; *groups != NULL; groups++) {
 306         if (!mc_skin_color_check_inisection (*groups))
 307             continue;
 308
 309         orig_keys = keys = mc_config_get_keys (mc_skin->config, *groups, &items_count);
 310         if (keys == NULL)
 311             continue;
 312
 313         if(*keys == NULL) {
 314             g_strfreev (keys);
 315             continue;
 316         }
 317
 318         for (; *keys; keys++) {
 319             mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, *groups, *keys);
 320             if (mc_skin_color != NULL)
 321                 mc_skin_color_add_to_hash (mc_skin, *groups, *keys, mc_skin_color);
 322         }
 323         g_strfreev (orig_keys);
 324     }
 325     g_strfreev (orig_groups);
 326
 327     mc_skin_color_cache_init ();
 328     return TRUE;
 329 }
 330
 331 /* --------------------------------------------------------------------------------------------- */
 332
 333 int
 334 mc_skin_color_get (const gchar * group, const gchar * name)
 335 {
 336     mc_skin_color_t *mc_skin_color;
 337
 338     mc_skin_color = mc_skin_color_get_with_defaults (group, name);
 339
 340     return (mc_skin_color != NULL) ? mc_skin_color->pair_index : 0;
 341 }
 342
 343 /* --------------------------------------------------------------------------------------------- */