lib/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 "internal.h"
  32 #include "lib/tty/color.h"
  33
  34 #include "src/args.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 /*** file scope variables ************************************************************************/
  45
  46 /*** file scope functions ************************************************************************/
  47
  48 static mc_skin_color_t *
  49 mc_skin_color_get_from_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
  50 {
  51     gchar kname[BUF_TINY];
  52     mc_skin_color_t *mc_skin_color;
  53
  54     if (group == NULL || key == NULL)
  55         return NULL;
  56
  57     if (mc_skin == NULL)
  58         mc_skin = &mc_skin__default;
  59
  60     g_snprintf (kname, sizeof (kname), "%s.%s", group, key);
  61     mc_skin_color = (mc_skin_color_t *) g_hash_table_lookup (mc_skin->colors, (gpointer) kname);
  62
  63     return mc_skin_color;
  64 }
  65
  66 /* --------------------------------------------------------------------------------------------- */
  67
  68 #if 0
  69 static void
  70 mc_skin_color_remove_from_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
  71 {
  72     gchar kname[BUF_TINY];
  73     if (group == NULL || key == NULL)
  74         return;
  75
  76     if (mc_skin == NULL)
  77         mc_skin = &mc_skin__default;
  78
  79     g_snprintf (kname, sizeof (kname), "%s.%s", group, key);
  80     g_hash_table_remove (mc_skin->colors, (gpointer) kname);
  81 }
  82 #endif
  83 /* --------------------------------------------------------------------------------------------- */
  84
  85 static void
  86 mc_skin_color_add_to_hash (mc_skin_t * mc_skin, const gchar * group, const gchar * key,
  87                            mc_skin_color_t * mc_skin_color)
  88 {
  89     gchar *kname;
  90
  91     kname = g_strdup_printf ("%s.%s", group, key);
  92     if (kname != NULL)
  93     {
  94         if (g_hash_table_lookup (mc_skin->colors, (gpointer) kname) != NULL)
  95             g_hash_table_remove (mc_skin->colors, (gpointer) kname);
  96
  97         g_hash_table_insert (mc_skin->colors, (gpointer) kname, (gpointer) mc_skin_color);
  98     }
  99 }
 100
 101 /* --------------------------------------------------------------------------------------------- */
 102
 103 static mc_skin_color_t *
 104 mc_skin_color_get_with_defaults (const gchar * group, const gchar * name)
 105 {
 106     mc_skin_color_t *mc_skin_color;
 107
 108     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, name);
 109     if (mc_skin_color != NULL)
 110         return mc_skin_color;
 111
 112     mc_skin_color = mc_skin_color_get_from_hash (NULL, group, "_default_");
 113     if (mc_skin_color != NULL)
 114         return mc_skin_color;
 115
 116     mc_skin_color = mc_skin_color_get_from_hash (NULL, "core", "_default_");
 117     return mc_skin_color;
 118 }
 119
 120 /* --------------------------------------------------------------------------------------------- */
 121
 122 static mc_skin_color_t *
 123 mc_skin_color_get_from_ini_file (mc_skin_t * mc_skin, const gchar * group, const gchar * key)
 124 {
 125     gsize items_count;
 126     gchar **values;
 127     mc_skin_color_t *mc_skin_color, *tmp;
 128
 129     values = mc_config_get_string_list (mc_skin->config, group, key, &items_count);
 130     if (values == NULL)
 131         return NULL;
 132     if (*values == NULL)
 133     {
 134         g_strfreev (values);
 135         return NULL;
 136     }
 137
 138     mc_skin_color = g_try_new0 (mc_skin_color_t, 1);
 139     if (mc_skin_color == NULL)
 140     {
 141         g_strfreev (values);
 142         return NULL;
 143     }
 144
 145     switch (items_count)
 146     {
 147     case 0:
 148         tmp = mc_skin_color_get_with_defaults (group, "_default_");
 149         if (tmp != NULL)
 150         {
 151             mc_skin_color->fgcolor = g_strdup (tmp->fgcolor);
 152             mc_skin_color->bgcolor = g_strdup (tmp->bgcolor);
 153         }
 154         else
 155         {
 156             g_strfreev (values);
 157             g_free (mc_skin_color);
 158             return NULL;
 159         }
 160         break;
 161     case 1:
 162         mc_skin_color->fgcolor = (values[0]) ? g_strstrip (g_strdup (values[0])) : NULL;
 163         tmp = mc_skin_color_get_with_defaults (group, "_default_");
 164         mc_skin_color->bgcolor = (tmp != NULL) ? g_strdup (tmp->bgcolor) : NULL;
 165         break;
 166     case 2:
 167         mc_skin_color->fgcolor = (values[0]) ? g_strstrip (g_strdup (values[0])) : NULL;
 168         mc_skin_color->bgcolor = (values[1]) ? g_strstrip (g_strdup (values[1])) : NULL;
 169         break;
 170     }
 171     g_strfreev (values);
 172
 173     mc_skin_color->pair_index =
 174         tty_try_alloc_color_pair2 (mc_skin_color->fgcolor, mc_skin_color->bgcolor, FALSE);
 175
 176     return mc_skin_color;
 177 }
 178
 179 /* --------------------------------------------------------------------------------------------- */
 180
 181 static void
 182 mc_skin_color_set_default_for_terminal (mc_skin_t * mc_skin)
 183 {
 184     mc_skin_color_t *mc_skin_color;
 185     mc_skin_color = g_try_new0 (mc_skin_color_t, 1);
 186     if (mc_skin_color != NULL)
 187     {
 188         mc_skin_color->fgcolor = g_strdup ("default");
 189         mc_skin_color->bgcolor = g_strdup ("default");
 190         mc_skin_color->pair_index =
 191             tty_try_alloc_color_pair2 (mc_skin_color->fgcolor, mc_skin_color->bgcolor, FALSE);
 192         mc_skin_color_add_to_hash (mc_skin, "skin", "terminal_default_color", mc_skin_color);
 193     }
 194 }
 195
 196 /* --------------------------------------------------------------------------------------------- */
 197 static void
 198 mc_skin_color_cache_init (void)
 199 {
 200     DEFAULT_COLOR = mc_skin_color_get ("skin", "terminal_default_color");
 201     NORMAL_COLOR = mc_skin_color_get ("core", "_default_");
 202     MARKED_COLOR = mc_skin_color_get ("core", "marked");
 203     SELECTED_COLOR = mc_skin_color_get ("core", "selected");
 204     MARKED_SELECTED_COLOR = mc_skin_color_get ("core", "markselect");
 205     DISABLED_COLOR =  mc_skin_color_get ("core", "disabled");
 206     REVERSE_COLOR = mc_skin_color_get ("core", "reverse");
 207     HEADER_COLOR = mc_skin_color_get ("core", "header");
 208     COMMAND_MARK_COLOR = mc_skin_color_get ("core", "commandlinemark");
 209
 210     COLOR_NORMAL = mc_skin_color_get ("dialog", "_default_");
 211     COLOR_FOCUS = mc_skin_color_get ("dialog", "dfocus");
 212     COLOR_HOT_NORMAL = mc_skin_color_get ("dialog", "dhotnormal");
 213     COLOR_HOT_FOCUS = mc_skin_color_get ("dialog", "dhotfocus");
 214     COLOR_TITLE = mc_skin_color_get ("dialog", "dtitle");
 215
 216     ERROR_COLOR = mc_skin_color_get ("error", "_default_");
 217     ERROR_FOCUS = mc_skin_color_get ("error", "errdfocus");
 218     ERROR_HOT_NORMAL = mc_skin_color_get ("error", "errdhotnormal");
 219     ERROR_HOT_FOCUS = mc_skin_color_get ("error", "errdhotfocus");
 220     ERROR_TITLE = mc_skin_color_get ("error", "errdtitle");
 221
 222     MENU_ENTRY_COLOR = mc_skin_color_get ("menu", "_default_");
 223     MENU_SELECTED_COLOR = mc_skin_color_get ("menu", "menusel");
 224     MENU_HOT_COLOR = mc_skin_color_get ("menu", "menuhot");
 225     MENU_HOTSEL_COLOR = mc_skin_color_get ("menu", "menuhotsel");
 226     MENU_INACTIVE_COLOR = mc_skin_color_get ("menu", "menuinactive");
 227
 228     GAUGE_COLOR = mc_skin_color_get ("core", "gauge");
 229     INPUT_COLOR = mc_skin_color_get ("core", "input");
 230     INPUT_HISTORY_COLOR = mc_skin_color_get ("core", "inputhistory");
 231     COMMAND_HISTORY_COLOR = mc_skin_color_get ("core", "commandhistory");
 232     INPUT_MARK_COLOR = mc_skin_color_get ("core", "inputmark");
 233     INPUT_UNCHANGED_COLOR = mc_skin_color_get ("core", "inputunchanged");
 234
 235     HELP_NORMAL_COLOR = mc_skin_color_get ("help", "_default_");
 236     HELP_ITALIC_COLOR = mc_skin_color_get ("help", "helpitalic");
 237     HELP_BOLD_COLOR = mc_skin_color_get ("help", "helpbold");
 238     HELP_LINK_COLOR = mc_skin_color_get ("help", "helplink");
 239     HELP_SLINK_COLOR = mc_skin_color_get ("help", "helpslink");
 240     HELP_TITLE_COLOR = mc_skin_color_get ("help", "helptitle");
 241
 242     VIEW_BOLD_COLOR = mc_skin_color_get ("viewer", "viewbold");
 243     VIEW_UNDERLINED_COLOR = mc_skin_color_get ("viewer", "viewunderline");
 244     VIEW_SELECTED_COLOR = mc_skin_color_get ("viewer", "viewselected");
 245
 246     EDITOR_NORMAL_COLOR = mc_skin_color_get ("editor", "_default_");
 247     EDITOR_BOLD_COLOR = mc_skin_color_get ("editor", "editbold");
 248     EDITOR_MARKED_COLOR = mc_skin_color_get ("editor", "editmarked");
 249     EDITOR_WHITESPACE_COLOR = mc_skin_color_get ("editor", "editwhitespace");
 250     EDITOR_RIGHT_MARGIN_COLOR = mc_skin_color_get ("editor", "editrightmargin");
 251     LINE_STATE_COLOR = mc_skin_color_get ("editor", "editlinestate");
 252
 253     BOOK_MARK_COLOR = mc_skin_color_get ("editor", "bookmark");
 254     BOOK_MARK_FOUND_COLOR = mc_skin_color_get ("editor", "bookmarkfound");
 255     BUTTONBAR_HOTKEY_COLOR = mc_skin_color_get ("buttonbar", "hotkey");
 256     BUTTONBAR_BUTTON_COLOR = mc_skin_color_get ("buttonbar", "button");
 257
 258     DFF_ADD_COLOR = mc_skin_color_get ("diffviewer", "added");
 259     DFF_CHG_COLOR = mc_skin_color_get ("diffviewer", "changedline");
 260     DFF_CHH_COLOR = mc_skin_color_get ("diffviewer", "changednew");
 261     DFF_CHD_COLOR = mc_skin_color_get ("diffviewer", "changed");
 262     DFF_DEL_COLOR = mc_skin_color_get ("diffviewer", "removed");
 263     DFF_FOLDER_COLOR = mc_skin_color_get ("diffviewer", "folder");
 264     DFF_ERROR_COLOR = mc_skin_color_get ("diffviewer", "error");
 265 }
 266
 267 /* --------------------------------------------------------------------------------------------- */
 268
 269 static gboolean
 270 mc_skin_color_check_inisection (const gchar * group)
 271 {
 272     return !((strcasecmp ("skin", group) == 0)
 273              || (strcasecmp ("lines", group) == 0) || (strncasecmp ("widget-", group, 7) == 0));
 274 }
 275
 276 /* --------------------------------------------------------------------------------------------- */
 277
 278 static void
 279 mc_skin_color_check_bw_mode (mc_skin_t * mc_skin)
 280 {
 281     gchar **groups, **orig_groups;
 282
 283     if (tty_use_colors () && !mc_args__disable_colors)
 284         return;
 285
 286     orig_groups = groups = mc_config_get_groups (mc_skin->config, NULL);
 287
 288     if (groups == NULL)
 289         return;
 290
 291     for (; *groups != NULL; groups++)
 292     {
 293         if (mc_skin_color_check_inisection (*groups))
 294             mc_config_del_group (mc_skin->config, *groups);
 295     }
 296     g_strfreev (orig_groups);
 297     mc_skin_hardcoded_blackwhite_colors (mc_skin);
 298 }
 299
 300 /* --------------------------------------------------------------------------------------------- */
 301 /*** public functions ****************************************************************************/
 302 /* --------------------------------------------------------------------------------------------- */
 303
 304 gboolean
 305 mc_skin_color_parse_ini_file (mc_skin_t * mc_skin)
 306 {
 307     gsize items_count;
 308     gchar **groups, **orig_groups;
 309     gchar **keys, **orig_keys;
 310     mc_skin_color_t *mc_skin_color;
 311
 312     mc_skin_color_check_bw_mode (mc_skin);
 313
 314     orig_groups = groups = mc_config_get_groups (mc_skin->config, &items_count);
 315
 316     if (groups == NULL)
 317         return FALSE;
 318
 319     if (*groups == NULL)
 320     {
 321         g_strfreev (groups);
 322         return FALSE;
 323     }
 324
 325     /* as first, need to set up default colors */
 326     mc_skin_color_set_default_for_terminal (mc_skin);
 327     mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, "core", "_default_");
 328     if (mc_skin_color == NULL)
 329         return FALSE;
 330
 331     tty_color_set_defaults (mc_skin_color->fgcolor, mc_skin_color->bgcolor);
 332     mc_skin_color_add_to_hash (mc_skin, "core", "_default_", mc_skin_color);
 333
 334     for (; *groups != NULL; groups++)
 335     {
 336         if (!mc_skin_color_check_inisection (*groups))
 337             continue;
 338
 339         orig_keys = keys = mc_config_get_keys (mc_skin->config, *groups, &items_count);
 340         if (keys == NULL)
 341             continue;
 342
 343         for (; *keys != NULL; keys++)
 344         {
 345             mc_skin_color = mc_skin_color_get_from_ini_file (mc_skin, *groups, *keys);
 346             if (mc_skin_color != NULL)
 347                 mc_skin_color_add_to_hash (mc_skin, *groups, *keys, mc_skin_color);
 348         }
 349         g_strfreev (orig_keys);
 350     }
 351     g_strfreev (orig_groups);
 352
 353     mc_skin_color_cache_init ();
 354     return TRUE;
 355 }
 356
 357 /* --------------------------------------------------------------------------------------------- */
 358
 359 int
 360 mc_skin_color_get (const gchar * group, const gchar * name)
 361 {
 362     mc_skin_color_t *mc_skin_color;
 363
 364     mc_skin_color = mc_skin_color_get_with_defaults (group, name);
 365
 366     return (mc_skin_color != NULL) ? mc_skin_color->pair_index : 0;
 367 }
 368
 369 /* --------------------------------------------------------------------------------------------- */