chiark / gitweb /
automatically upgrade on startup if necessary
[disorder] / disobedience / settings.c
1 /*
2  * This file is part of Disobedience
3  * Copyright (C) 2007 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 2 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, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * 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, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
18  * USA
19  */
20 /** @file disobedience/settings.c
21  * @brief Disobedience settings
22  *
23  * Originally I attempted to use a built-in rc file to configure
24  * Disobedience's colors.  This is quite convenient but fails in the
25  * face of themes, as the theme settings override the application
26  * ones.
27  *
28  * This file therefore collects all the colors of the Disobedience UI
29  * and (in time) will have a configuration dialog too.
30  */
31
32 #include "disobedience.h"
33 #include "inputline.h"
34 #include "split.h"
35 #include <sys/stat.h>
36
37 /** @brief HTML displayer */
38 const char *browser = BROWSER;
39
40 /** @brief Default style for layouts */
41 GtkStyle *layout_style;
42
43 /** @brief Title-row style for layouts */
44 GtkStyle *title_style;
45
46 /** @brief Even-row style for layouts */
47 GtkStyle *even_style;
48
49 /** @brief Odd-row style for layouts */
50 GtkStyle *odd_style;
51
52 /** @brief Active-row style for layouts */
53 GtkStyle *active_style;
54
55 /** @brief Style for tools */
56 GtkStyle *tool_style;
57
58 /** @brief Style for search results */
59 GtkStyle *search_style;
60
61 /** @brief Style for drag targets */
62 GtkStyle *drag_style;
63
64 /** @brief Table of styles */
65 static const struct {
66   const char *name;
67   GtkStyle **style;
68 } styles[] = {
69   { "layout", &layout_style },
70   { "title", &title_style },
71   { "even", &even_style },
72   { "odd", &odd_style },
73   { "active", &active_style },
74   { "tool", &tool_style },
75   { "search", &search_style },
76   { "drag", &drag_style },
77 };
78
79 #define NSTYLES (sizeof styles / sizeof *styles)
80
81 /** @brief Table of state types */
82 static const char *const states[] = {
83   "normal",
84   "active",
85   "prelight",
86   "selected",
87   "insensitive"
88 };
89
90 #define NSTATES (sizeof states / sizeof *states)
91
92 /** @brief Table of colors */
93 static const struct {
94   const char *name;
95   size_t offset;
96 } colors[] = {
97   { "fg", offsetof(GtkStyle, fg) },
98   { "bg", offsetof(GtkStyle, bg) },
99 };
100
101 #define NCOLORS (sizeof colors / sizeof *colors)
102
103 /** @brief Initialize styles */
104 void init_styles(void) {
105   layout_style = gtk_style_new();
106   title_style = gtk_style_new();
107   even_style = gtk_style_new();
108   odd_style = gtk_style_new();
109   active_style = gtk_style_new();
110   search_style = gtk_style_new();
111   tool_style = gtk_style_new();
112   drag_style = gtk_style_new();
113
114   /* Style defaults */
115     
116   /* Layouts are basically black on white */
117   layout_style->bg[GTK_STATE_NORMAL] = layout_style->white;
118   layout_style->fg[GTK_STATE_NORMAL] = layout_style->black;
119     
120   /* Title row is inverted */
121   title_style->bg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
122   title_style->fg[GTK_STATE_NORMAL] = layout_style->bg[GTK_STATE_NORMAL];
123
124   /* Active row is pastel green */
125   active_style->bg[GTK_STATE_NORMAL].red = 0xE000;
126   active_style->bg[GTK_STATE_NORMAL].green = 0xFFFF;
127   active_style->bg[GTK_STATE_NORMAL].blue = 0xE000;
128   active_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
129
130   /* Even rows are pastel red */
131   even_style->bg[GTK_STATE_NORMAL].red = 0xFFFF;
132   even_style->bg[GTK_STATE_NORMAL].green = 0xEC00;
133   even_style->bg[GTK_STATE_NORMAL].blue = 0xEC00;
134   even_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
135
136   /* Odd rows match the underlying layout */
137   odd_style->bg[GTK_STATE_NORMAL] = layout_style->bg[GTK_STATE_NORMAL];
138   odd_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
139
140   /* Search results have a yellow background */
141   search_style->fg[GTK_STATE_NORMAL] = layout_style->fg[GTK_STATE_NORMAL];
142   search_style->bg[GTK_STATE_NORMAL].red = 0xFFFF;
143   search_style->bg[GTK_STATE_NORMAL].green = 0xFFFF;
144   search_style->bg[GTK_STATE_NORMAL].blue = 0x0000;
145
146   /* Drag targets are grey */
147   drag_style->bg[GTK_STATE_NORMAL].red = 0x6666;
148   drag_style->bg[GTK_STATE_NORMAL].green = 0x6666;
149   drag_style->bg[GTK_STATE_NORMAL].blue = 0x6666;
150   
151   /* Tools we leave at GTK+ defaults */
152 }
153
154 void save_settings(void) {
155   char *dir, *path, *tmp;
156   FILE *fp = 0;
157   size_t n, m, c;
158
159   byte_xasprintf(&dir, "%s/.disorder", getenv("HOME"));
160   byte_xasprintf(&path, "%s/disobedience", dir);
161   byte_xasprintf(&tmp, "%s.tmp", path);
162   mkdir(dir, 02700);                    /* make sure directory exists */
163   if(!(fp = fopen(tmp, "w"))) {
164     fpopup_msg(GTK_MESSAGE_ERROR, "error opening %s: %s",
165                tmp, strerror(errno));
166     goto done;
167   }
168   if(fprintf(fp,
169              "# automatically generated!\n\n") < 0)
170     goto write_error;
171   for(n = 0; n < NSTYLES; ++n)
172     for(c = 0; c < NCOLORS; ++c)
173       for(m = 0; m < NSTATES; ++m) {
174         const GdkColor *color = (GdkColor *)((char *)styles[n].style + colors[c].offset) + m;
175         if(fprintf(fp, "color %8s %12s %s 0x%04x 0x%04x 0x%04x\n",
176                    styles[n].name, states[m], colors[c].name,
177                    color->red,
178                    color->green,
179                    color->blue) < 0)
180           goto write_error;
181       }
182   if(fprintf(fp, "browser %s\n", browser) < 0)
183     goto write_error;
184   if(fclose(fp) < 0) {
185     fp = 0;
186   write_error:
187     fpopup_msg(GTK_MESSAGE_ERROR, "error writing to %s: %s",
188                tmp, strerror(errno));
189     goto done;
190   }
191   fp = 0;
192   if(rename(tmp, path) < 0)
193     fpopup_msg(GTK_MESSAGE_ERROR, "error renaming %s to %s: %s",
194                tmp, path, strerror(errno));
195 done:
196   if(fp)
197     fclose(fp);
198 }
199
200 static inline unsigned clamp(unsigned n) {
201   return n > 0xFFFF ? 0xFFFF : n;
202 }
203
204 void load_settings(void) {
205   char *path, *line;
206   FILE *fp;
207   char **vec;
208   int nvec;
209   size_t n, m, c;
210
211   byte_xasprintf(&path, "%s/.disorder/disobedience", getenv("HOME"));
212   if(!(fp = fopen(path, "r"))) {
213     if(errno != ENOENT)
214       fpopup_msg(GTK_MESSAGE_ERROR, "error opening %s: %s",
215                  path, strerror(errno));
216   } else {
217     while(!inputline(path, fp, &line, '\n')) {
218       if(!(vec = split(line, &nvec, SPLIT_COMMENTS|SPLIT_QUOTES, 0, 0))
219          || !nvec)
220         continue;
221       if(!strcmp(vec[0], "color")) {
222         GdkColor *color;
223         if(nvec != 7) {
224           error(0, "%s: malformed '%s' command", path, vec[0]);
225           continue;
226         }
227         for(n = 0; n < NSTYLES && strcmp(styles[n].name, vec[1]); ++n)
228           ;
229         if(n >= NSTYLES) {
230           error(0, "%s: unknown style '%s'", path, vec[1]);
231           continue;
232         }
233         for(m = 0; m < NSTATES && strcmp(states[m], vec[2]); ++m)
234           ;
235         if(m >= NSTATES) {
236           error(0, "%s: unknown state '%s'", path, vec[2]);
237           continue;
238         }
239         for(c = 0; c < NCOLORS && strcmp(colors[c].name, vec[3]); ++c)
240           ;
241         if(c >= NCOLORS) {
242           error(0, "%s: unknown color '%s'", path, vec[3]);
243           continue;
244         }
245         color = (GdkColor *)((char *)styles[n].style + colors[c].offset) + m;
246         color->red = strtoul(vec[4], 0, 0);
247         color->green = strtoul(vec[5], 0, 0);
248         color->blue = strtoul(vec[6], 0, 0);
249       } else if(!strcmp(vec[0], "browser")) {
250         if(nvec != 2) {
251           error(0, "%s: malformed '%s' command", path, vec[0]);
252           continue;
253         }
254         browser = vec[1];
255       } else
256         /* mention errors but otherwise ignore them */
257         error(0, "%s: unknown command '%s'", path, vec[0]);
258     }
259     if(ferror(fp)) {
260       fpopup_msg(GTK_MESSAGE_ERROR, "error reading %s: %s",
261                  path, strerror(errno));
262       fclose(fp);
263     }
264   }
265 }
266
267 /** @brief Callback used by set_tool_colors() */
268 static void set_tool_colors_callback(GtkWidget *w,
269                                      gpointer attribute((unused)) data) {
270   set_tool_colors(w);
271 }
272
273 /** @brief Recursively set tool widget colors */
274 void set_tool_colors(GtkWidget *w) {
275   GtkWidget *child;
276
277   gtk_widget_set_style(w, tool_style);
278   if(GTK_IS_CONTAINER(w))
279     gtk_container_foreach(GTK_CONTAINER(w), set_tool_colors_callback, 0);
280   if(GTK_IS_MENU_ITEM(w)
281      && (child = gtk_menu_item_get_submenu(GTK_MENU_ITEM(w))))
282     set_tool_colors(child);
283 }
284
285 /*
286 Local Variables:
287 c-basic-offset:2
288 comment-column:40
289 fill-column:79
290 indent-tabs-mode:nil
291 End:
292 */