chiark - git - mdw - disorder/blob - disobedience/settings.c

   1 /*
   2  * This file is part of Disobedience
   3  * Copyright (C) 2007, 2008 Richard Kettlewell
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 3 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18 /** @file disobedience/settings.c
  19  * @brief Disobedience settings
  20  *
  21  * Originally I attempted to use a built-in rc file to configure
  22  * Disobedience's colors.  This is quite convenient but fails in the
  23  * face of themes, as the theme settings override the application
  24  * ones.
  25  *
  26  * This file therefore collects all the colors of the Disobedience UI
  27  * and (in time) will have a configuration dialog too.
  28  */
  29
  30 #include "disobedience.h"
  31 #include "inputline.h"
  32 #include "split.h"
  33 #include <sys/stat.h>
  34
  35 /** @brief HTML displayer */
  36 const char *browser = BROWSER;
  37
  38 /** @brief Default style for layouts */
  39 GtkStyle *layout_style;
  40
  41 /** @brief Title-row style for layouts */
  42 GtkStyle *title_style;
  43
  44 /** @brief Even-row style for layouts */
  45 GtkStyle *even_style;
  46
  47 /** @brief Odd-row style for layouts */
  48 GtkStyle *odd_style;
  49
  50 /** @brief Active-row style for layouts */
  51 GtkStyle *active_style;
  52
  53 /** @brief Style for tools */
  54 GtkStyle *tool_style;
  55
  56 /** @brief Style for search results */
  57 GtkStyle *search_style;
  58
  59 /** @brief Style for drag targets */
  60 GtkStyle *drag_style;
  61
  62 /** @brief Table of styles */
  63 static const struct {
  64   const char *name;
  65   GtkStyle **style;
  66 } styles[] = {
  67   { "layout", &layout_style },
  68   { "title", &title_style },
  69   { "even", &even_style },
  70   { "odd", &odd_style },
  71   { "active", &active_style },
  72   { "tool", &tool_style },
  73   { "search", &search_style },
  74   { "drag", &drag_style },
  75 };
  76
  77 #define NSTYLES (sizeof styles / sizeof *styles)
  78
  79 /** @brief Table of state types */
  80 static const char *const states[] = {
  81   "normal",
  82   "active",
  83   "prelight",
  84   "selected",
  85   "insensitive"
  86 };
  87
  88 #define NSTATES (sizeof states / sizeof *states)
  89
  90 /** @brief Table of colors */
  91 static const struct {
  92   const char *name;
  93   size_t offset;
  94 } colors[] = {
  95   { "fg", offsetof(GtkStyle, fg) },
  96   { "bg", offsetof(GtkStyle, bg) },
  97 };
  98
  99 #define NCOLORS (sizeof colors / sizeof *colors)
 100
 101 /** @brief Initialize styles */
 102 void init_styles(void) {
 103   layout_style = gtk_style_new();
 104   title_style = gtk_style_new();
 105   even_style = gtk_style_new();
 106   odd_style = gtk_style_new();
 107   active_style = gtk_style_new();
 108   search_style = gtk_style_new();
 109   tool_style = gtk_style_new();
 110   drag_style = gtk_style_new();
 111
 112   /* Style defaults */
 113
 114   /* Layouts are basically black on white */
 115   layout_style->bg[GTK_STATE_NORMAL] = layout_style->white;
 116   layout_style->fg[GTK_STATE_NORMAL] = layout_style->black;
 117
 118   /* Title row is inverted */
 119   title_style->bg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
 120   title_style->fg[GTK_STATE_NORMAL] = layout_style->bg[GTK_STATE_NORMAL];
 121
 122   /* Active row is pastel green */
 123   active_style->bg[GTK_STATE_NORMAL].red = 0xE000;
 124   active_style->bg[GTK_STATE_NORMAL].green = 0xFFFF;
 125   active_style->bg[GTK_STATE_NORMAL].blue = 0xE000;
 126   active_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
 127
 128   /* Even rows are pastel red */
 129   even_style->bg[GTK_STATE_NORMAL].red = 0xFFFF;
 130   even_style->bg[GTK_STATE_NORMAL].green = 0xEC00;
 131   even_style->bg[GTK_STATE_NORMAL].blue = 0xEC00;
 132   even_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
 133
 134   /* Odd rows match the underlying layout */
 135   odd_style->bg[GTK_STATE_NORMAL] = layout_style->bg[GTK_STATE_NORMAL];
 136   odd_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
 137
 138   /* Search results have a yellow background */
 139   search_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
 140   search_style->bg[GTK_STATE_NORMAL].red = 0xFFFF;
 141   search_style->bg[GTK_STATE_NORMAL].green = 0xFFFF;
 142   search_style->bg[GTK_STATE_NORMAL].blue = 0x0000;
 143
 144   /* Drag targets are grey */
 145   drag_style->bg[GTK_STATE_NORMAL].red = 0x6666;
 146   drag_style->bg[GTK_STATE_NORMAL].green = 0x6666;
 147   drag_style->bg[GTK_STATE_NORMAL].blue = 0x6666;
 148
 149   /* Tools we leave at GTK+ defaults */
 150 }
 151
 152 void save_settings(void) {
 153   char *dir, *path, *tmp;
 154   FILE *fp = 0;
 155   size_t n, m, c;
 156
 157   byte_xasprintf(&dir, "%s/.disorder", getenv("HOME"));
 158   byte_xasprintf(&path, "%s/disobedience", dir);
 159   byte_xasprintf(&tmp, "%s.tmp", path);
 160   mkdir(dir, 02700);                    /* make sure directory exists */
 161   if(!(fp = fopen(tmp, "w"))) {
 162     fpopup_msg(GTK_MESSAGE_ERROR, "error opening %s: %s",
 163                tmp, strerror(errno));
 164     goto done;
 165   }
 166   if(fprintf(fp,
 167              "# automatically generated!\n\n") < 0)
 168     goto write_error;
 169   for(n = 0; n < NSTYLES; ++n)
 170     for(c = 0; c < NCOLORS; ++c)
 171       for(m = 0; m < NSTATES; ++m) {
 172         const GdkColor *color = (GdkColor *)((char *)styles[n].style + colors[c].offset) + m;
 173         if(fprintf(fp, "color %8s %12s %s 0x%04x 0x%04x 0x%04x\n",
 174                    styles[n].name, states[m], colors[c].name,
 175                    color->red,
 176                    color->green,
 177                    color->blue) < 0)
 178           goto write_error;
 179       }
 180   if(fprintf(fp, "browser %s\n", browser) < 0)
 181     goto write_error;
 182   if(fclose(fp) < 0) {
 183     fp = 0;
 184   write_error:
 185     fpopup_msg(GTK_MESSAGE_ERROR, "error writing to %s: %s",
 186                tmp, strerror(errno));
 187     goto done;
 188   }
 189   fp = 0;
 190   if(rename(tmp, path) < 0)
 191     fpopup_msg(GTK_MESSAGE_ERROR, "error renaming %s to %s: %s",
 192                tmp, path, strerror(errno));
 193 done:
 194   if(fp)
 195     fclose(fp);
 196 }
 197
 198 static inline unsigned clamp(unsigned n) {
 199   return n > 0xFFFF ? 0xFFFF : n;
 200 }
 201
 202 void load_settings(void) {
 203   char *path, *line;
 204   FILE *fp;
 205   char **vec;
 206   int nvec;
 207   size_t n, m, c;
 208
 209   byte_xasprintf(&path, "%s/.disorder/disobedience", getenv("HOME"));
 210   if(!(fp = fopen(path, "r"))) {
 211     if(errno != ENOENT)
 212       fpopup_msg(GTK_MESSAGE_ERROR, "error opening %s: %s",
 213                  path, strerror(errno));
 214   } else {
 215     while(!inputline(path, fp, &line, '\n')) {
 216       if(!(vec = split(line, &nvec, SPLIT_COMMENTS|SPLIT_QUOTES, 0, 0))
 217          || !nvec)
 218         continue;
 219       if(!strcmp(vec[0], "color")) {
 220         GdkColor *color;
 221         if(nvec != 7) {
 222           error(0, "%s: malformed '%s' command", path, vec[0]);
 223           continue;
 224         }
 225         for(n = 0; n < NSTYLES && strcmp(styles[n].name, vec[1]); ++n)
 226           ;
 227         if(n >= NSTYLES) {
 228           error(0, "%s: unknown style '%s'", path, vec[1]);
 229           continue;
 230         }
 231         for(m = 0; m < NSTATES && strcmp(states[m], vec[2]); ++m)
 232           ;
 233         if(m >= NSTATES) {
 234           error(0, "%s: unknown state '%s'", path, vec[2]);
 235           continue;
 236         }
 237         for(c = 0; c < NCOLORS && strcmp(colors[c].name, vec[3]); ++c)
 238           ;
 239         if(c >= NCOLORS) {
 240           error(0, "%s: unknown color '%s'", path, vec[3]);
 241           continue;
 242         }
 243         color = (GdkColor *)((char *)styles[n].style + colors[c].offset) + m;
 244         color->red = strtoul(vec[4], 0, 0);
 245         color->green = strtoul(vec[5], 0, 0);
 246         color->blue = strtoul(vec[6], 0, 0);
 247       } else if(!strcmp(vec[0], "browser")) {
 248         if(nvec != 2) {
 249           error(0, "%s: malformed '%s' command", path, vec[0]);
 250           continue;
 251         }
 252         browser = vec[1];
 253       } else
 254         /* mention errors but otherwise ignore them */
 255         error(0, "%s: unknown command '%s'", path, vec[0]);
 256     }
 257     if(ferror(fp)) {
 258       fpopup_msg(GTK_MESSAGE_ERROR, "error reading %s: %s",
 259                  path, strerror(errno));
 260       fclose(fp);
 261     }
 262   }
 263 }
 264
 265 /** @brief Recursively set tool widget colors
 266  *
 267  * This is currently unused; the idea was to allow for configurability without
 268  * allowing GTK+ to override our use of color, but things seem generally better
 269  * without this particular call.
 270  */
 271 void set_tool_colors(GtkWidget attribute((unused)) *w) {
 272 }
 273
 274 /** @brief Pop up a settings editor widget */
 275 void popup_settings(void) {
 276   static GtkWidget *settings_window;
 277   GtkWidget *table;
 278   unsigned row, col;
 279
 280   if(settings_window) {
 281     gtk_window_present(GTK_WINDOW(settings_window));
 282     return;
 283   }
 284   /* Create the window */
 285   settings_window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 286   gtk_widget_set_style(settings_window, tool_style);
 287   gtk_window_set_title(GTK_WINDOW(settings_window), "Disobedience Settings");
 288   /* Clear the pointer to the window widget when it is closed */
 289   g_signal_connect(settings_window, "destroy",
 290                    G_CALLBACK(gtk_widget_destroyed), &settings_window);
 291
 292   /* The color settings live in a big table */
 293   table = gtk_table_new(2 * NSTYLES + 1/*rows */, NSTATES + 1/*cols*/,
 294                         TRUE/*homogeneous*/);
 295   /* Titles */
 296   for(row = 0; row < 2 * NSTYLES; ++row) {
 297     char *legend;
 298
 299     byte_xasprintf(&legend, "%s %s", styles[row / 2].name,
 300                    row % 2 ? "background" : "foreground");
 301     gtk_table_attach(GTK_TABLE(table),
 302                      gtk_label_new(legend),
 303                      0, 1,
 304                      row + 1, row + 2,
 305                      GTK_FILL, GTK_FILL,
 306                      1, 1);
 307   }
 308   for(col = 0; col < NSTATES; ++col) {
 309     gtk_table_attach(GTK_TABLE(table),
 310                      gtk_label_new(states[col]),
 311                      col + 1, col + 2,
 312                      0, 1,
 313                      GTK_FILL, GTK_FILL,
 314                      1, 1);
 315   }
 316   /* The actual colors */
 317   for(row = 0; row < 2 * NSTYLES; ++row) {
 318     for(col = 0; col <  NSTATES; ++col) {
 319       GdkColor *const c = &(row % 2
 320                             ? (**styles[row / 2].style).bg
 321                             : (**styles[row / 2].style).fg)[col];
 322       gtk_table_attach(GTK_TABLE(table),
 323                        gtk_color_button_new_with_color(c),
 324                        col + 1, col + 2,
 325                        row + 1, row + 2,
 326                        GTK_FILL, GTK_FILL,
 327                        1, 1);
 328     }
 329   }
 330   gtk_container_add(GTK_CONTAINER(settings_window), frame_widget(table, NULL));
 331   gtk_widget_show_all(settings_window);
 332   /* TODO: save settings
 333      TODO: web browser
 334      TODO: impose settings when they are set
 335   */
 336 }
 337
 338 /*
 339 Local Variables:
 340 c-basic-offset:2
 341 comment-column:40
 342 fill-column:79
 343 indent-tabs-mode:nil
 344 End:
 345 */