src/colors.c

   1 /*
   2  * (c) 2004 by Kalle Wallin (kaw@linux.se)
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  * You should have received a copy of the GNU General Public License
  14  * along with this program; if not, write to the Free Software
  15  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  16  *
  17  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <string.h>
  22 #include <ncurses.h>
  23 #include <glib.h>
  24
  25 #include "config.h"
  26 #include "ncmpc.h"
  27 #include "options.h"
  28 #include "support.h"
  29 #include "colors.h"
  30
  31 #ifdef DEBUG
  32 #define D(x) x
  33 #else
  34 #define D(x)
  35 #endif
  36
  37 #define COLOR_BRIGHT_MASK   (1<<7)
  38
  39 #define COLOR_BRIGHT_BLACK    (COLOR_BLACK | COLOR_BRIGHT_MASK)
  40 #define COLOR_BRIGHT_RED      (COLOR_RED   | COLOR_BRIGHT_MASK)
  41 #define COLOR_BRIGHT_GREEN    (COLOR_GREEN | COLOR_BRIGHT_MASK)
  42 #define COLOR_BRIGHT_YELLOW   (COLOR_YELLOW | COLOR_BRIGHT_MASK)
  43 #define COLOR_BRIGHT_BLUE     (COLOR_BLUE | COLOR_BRIGHT_MASK)
  44 #define COLOR_BRIGHT_MAGENTA  (COLOR_MAGENTA | COLOR_BRIGHT_MASK)
  45 #define COLOR_BRIGHT_CYAN     (COLOR_CYAN | COLOR_BRIGHT_MASK)
  46 #define COLOR_BRIGHT_WHITE    (COLOR_WHITE | COLOR_BRIGHT_MASK)
  47
  48 #define IS_BRIGHT(color) (color & COLOR_BRIGHT_MASK)
  49
  50 /* name of the color fields */
  51 #define NAME_TITLE        "title"
  52 #define NAME_TITLE_BOLD   "title-bold"
  53 #define NAME_LINE         "line"
  54 #define NAME_LINE_BOLD    "line-flags"
  55 #define NAME_LIST         "list"
  56 #define NAME_LIST_BOLD    "list-bold"
  57 #define NAME_PROGRESS     "progressbar"
  58 #define NAME_STATUS       "status-song"
  59 #define NAME_STATUS_BOLD  "status-state"
  60 #define NAME_STATUS_TIME  "status-time"
  61 #define NAME_ALERT        "alert"
  62 #define NAME_BGCOLOR      "background"
  63
  64 typedef struct {
  65   short color;
  66   short r,g,b;
  67 } color_definition_entry_t;
  68
  69 typedef struct {
  70   int    id;
  71   char   *name;
  72   short  fg;
  73   attr_t attrs;
  74 } color_entry_t;
  75
  76 static color_entry_t colors[] = {
  77
  78   /* color pair,        field name,        color,            mono attribute */
  79   /*-------------------------------------------------------------------------*/
  80   { COLOR_TITLE,        NAME_TITLE,        COLOR_YELLOW,         A_NORMAL },
  81   { COLOR_TITLE_BOLD,   NAME_TITLE_BOLD,   COLOR_BRIGHT_YELLOW,  A_BOLD },
  82   { COLOR_LINE,         NAME_LINE,         COLOR_WHITE,          A_NORMAL },
  83   { COLOR_LINE_BOLD,    NAME_LINE_BOLD,    COLOR_BRIGHT_WHITE,   A_BOLD },
  84   { COLOR_LIST,         NAME_LIST,         COLOR_GREEN,          A_NORMAL },
  85   { COLOR_LIST_BOLD,    NAME_LIST_BOLD,    COLOR_BRIGHT_GREEN,   A_BOLD },
  86   { COLOR_PROGRESSBAR,  NAME_PROGRESS,     COLOR_WHITE,          A_NORMAL },
  87   { COLOR_STATUS,       NAME_STATUS,       COLOR_YELLOW,         A_NORMAL },
  88   { COLOR_STATUS_BOLD,  NAME_STATUS_BOLD,  COLOR_BRIGHT_YELLOW,  A_BOLD },
  89   { COLOR_STATUS_TIME,  NAME_STATUS_TIME,  COLOR_RED,            A_NORMAL },
  90   { COLOR_STATUS_ALERT, NAME_ALERT,        COLOR_BRIGHT_RED,     A_BOLD },
  91   { 0,                  NULL,              0,                    0 }
  92 };
  93
  94 /* background color */
  95 static short bg = COLOR_BLACK;
  96
  97 static GList *color_definition_list = NULL;
  98
  99 static color_entry_t *
 100 colors_lookup(int id)
 101 {
 102   int i;
 103
 104   i=0;
 105   while( colors[i].name != NULL )
 106     {
 107       if( colors[i].id == id )
 108         return &colors[i];
 109       i++;
 110     }
 111   return NULL;
 112 }
 113
 114 static color_entry_t *
 115 colors_lookup_by_name(char *name)
 116 {
 117   int i;
 118
 119   i=0;
 120   while( colors[i].name != NULL )
 121     {
 122       if( !strcasecmp(colors[i].name, name) )
 123         return &colors[i];
 124       i++;
 125     }
 126   return NULL;
 127 }
 128
 129 static int
 130 colors_update_pair(int id)
 131 {
 132   color_entry_t *entry = colors_lookup(id);
 133   short fg = -1;
 134
 135   if( !entry )
 136     return -1;
 137
 138   if( IS_BRIGHT(entry->fg) )
 139     {
 140       entry->attrs = A_BOLD;
 141       fg = entry->fg & ~COLOR_BRIGHT_MASK;
 142     }
 143   else
 144     {
 145       entry->attrs = A_NORMAL;
 146       fg = entry->fg;
 147     }
 148
 149   init_pair(entry->id, fg, bg);
 150
 151   return 0;
 152 }
 153
 154 short
 155 colors_str2color(char *str)
 156 {
 157   if( !strcasecmp(str,"black") )
 158     return COLOR_BLACK;
 159   else if( !strcasecmp(str,"red") )
 160     return COLOR_RED;
 161   else if( !strcasecmp(str,"green") )
 162     return COLOR_GREEN;
 163   else if( !strcasecmp(str,"yellow") )
 164     return COLOR_YELLOW;
 165   else if( !strcasecmp(str,"blue") )
 166     return COLOR_BLUE;
 167   else if( !strcasecmp(str,"magenta") )
 168     return COLOR_MAGENTA;
 169   else if( !strcasecmp(str,"cyan") )
 170     return COLOR_CYAN;
 171   else if( !strcasecmp(str,"white") )
 172     return COLOR_WHITE;
 173   else if( !strcasecmp(str,"brightred") )
 174     return COLOR_BRIGHT_RED;
 175   else if( !strcasecmp(str,"brightgreen") )
 176     return COLOR_BRIGHT_GREEN;
 177   else if( !strcasecmp(str,"brightyellow") )
 178     return COLOR_BRIGHT_YELLOW;
 179   else if( !strcasecmp(str,"brightblue") )
 180     return COLOR_BRIGHT_BLUE;
 181   else if( !strcasecmp(str,"brightmagenta") )
 182     return COLOR_BRIGHT_MAGENTA;
 183   else if( !strcasecmp(str,"brightcyan") )
 184     return COLOR_BRIGHT_CYAN;
 185   else if( !strcasecmp(str,"brightwhite") )
 186     return COLOR_BRIGHT_WHITE;
 187   else if( !strcasecmp(str,"grey") || !strcasecmp(str,"gray") )
 188     return COLOR_BRIGHT_BLACK;
 189   else if( !strcasecmp(str,"none") )
 190     return -1;
 191   fprintf(stderr,_("Warning: Unknown color - %s\n"), str);
 192   return -2;
 193 }
 194
 195 /* This function is called from conf.c before curses have been started,
 196  * it adds the definition to the color_definition_list and init_color() is
 197  * done in colors_start() */
 198 int
 199 colors_define(char *name, short r, short g, short b)
 200 {
 201   color_definition_entry_t *entry;
 202   short color = colors_str2color(name);
 203
 204   if( color<0 )
 205     return -1;
 206
 207   entry = g_malloc(sizeof(color_definition_entry_t));
 208   entry->color = color;
 209   entry->r = r;
 210   entry->g = g;
 211   entry->b = b;
 212
 213   color_definition_list = g_list_append(color_definition_list, entry);
 214
 215   return 0;
 216 }
 217
 218
 219 int
 220 colors_assign(char *name, char *value)
 221 {
 222   color_entry_t *entry = colors_lookup_by_name(name);
 223   short color;
 224
 225   if( !entry )
 226     {
 227       if( !strcasecmp(NAME_BGCOLOR, name) )
 228         {
 229           if( (color=colors_str2color(value)) < -1 )
 230             return -1;
 231           if( color > COLORS )
 232             color = color & ~COLOR_BRIGHT_MASK;
 233           bg = color;
 234           return 0;
 235         }
 236       fprintf(stderr,_("Warning: Unknown color field - %s\n"), name);
 237       return -1;
 238     }
 239
 240   if( (color=colors_str2color(value)) < -1 )
 241     return -1;
 242   entry->fg = color;
 243
 244   return 0;
 245 }
 246
 247
 248 int
 249 colors_start(void)
 250 {
 251   if( has_colors() )
 252     {
 253       /* initialize color support */
 254       start_color();
 255       use_default_colors();
 256       /* define any custom colors defined in the configuration file */
 257       if( color_definition_list && can_change_color() )
 258         {
 259           GList *list = color_definition_list;
 260
 261           while( list )
 262             {
 263               color_definition_entry_t *entry = list->data;
 264
 265               if( entry->color <= COLORS )
 266                 init_color(entry->color, entry->r, entry->g, entry->b);
 267               list=list->next;
 268             }
 269         }
 270       else if( !can_change_color() )
 271         fprintf(stderr, _("Terminal lacks support for changing colors!\n"));
 272
 273       if( options.enable_colors )
 274         {
 275           int i = 0;
 276
 277           while(colors[i].name)
 278             {
 279               /* update the color pairs */
 280               colors_update_pair(colors[i].id);
 281               i++;
 282             }
 283
 284         }
 285     }
 286   else if( options.enable_colors )
 287     {
 288       fprintf(stderr, _("Terminal lacks color capabilities!\n"));
 289       options.enable_colors = 0;
 290     }
 291
 292   /* free the color_definition_list */
 293   if( color_definition_list )
 294     {
 295       GList *list = color_definition_list;
 296
 297       while( list )
 298         {
 299           g_free(list->data);
 300           list=list->next;
 301         }
 302       g_list_free(color_definition_list);
 303       color_definition_list = NULL;
 304     }
 305
 306   return 0;
 307 }
 308
 309
 310 int
 311 colors_use(WINDOW *w, int id)
 312 {
 313   color_entry_t *entry = colors_lookup(id);
 314   short pair;
 315   attr_t attrs;
 316
 317   if( !entry )
 318     return -1;
 319
 320   wattr_get(w, &attrs, &pair, NULL);
 321
 322   if( options.enable_colors )
 323     {
 324       /* color mode */
 325       if( attrs != entry->attrs || id!=pair )
 326         wattr_set(w, entry->attrs, id, NULL);
 327     }
 328   else
 329     {
 330       /* mono mode */
 331       if( attrs != entry->attrs )
 332         wattrset(w, entry->attrs);
 333     }
 334
 335   return 0;
 336 }
 337