Added runtime option that lets one to set a small border around the
[wmaker-crm.git] / WPrefs.app / Preferences.c
blobe3479bc81f1625dbd4f4e0e28f3170528931561b
1 /* Preferences.c- misc personal preferences
2 *
3 * WPrefs - Window Maker Preferences Program
4 *
5 * Copyright (c) 1998 Alfredo K. Kojima
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
20 * USA.
24 #include "WPrefs.h"
26 typedef struct _Panel {
27 WMFrame *frame;
29 char *sectionName;
31 char *description;
33 CallbackRec callbacks;
35 WMWindow *win;
37 WMFrame *sizeF;
38 WMPopUpButton *sizeP;
40 WMFrame *posiF;
41 WMPopUpButton *posiP;
43 WMFrame *ballF;
44 WMButton *ballB[4];
46 WMFrame *optF;
47 WMButton *raisB;
48 #ifdef XKB_MODELOCK
49 WMButton *modeB;
50 #endif /* XKB_MODELOCK */
52 WMFrame *borderF;
53 WMSlider *borderS;
54 WMLabel *borderL;
55 WMButton *lrB;
56 WMButton *tbB;
58 } _Panel;
62 #define ICON_FILE "ergonomic"
65 static void
66 borderCallback(WMWidget *w, void *data)
68 _Panel *panel = (_Panel*)data;
69 char buffer[64];
70 int i;
72 i = WMGetSliderValue(panel->borderS);
74 if (i == 0)
75 WMSetLabelText(panel->borderL, "OFF");
76 else {
77 sprintf(buffer, "%i pixel%s", i, i>1 ? "s" : "");
78 WMSetLabelText(panel->borderL, buffer);
83 static void
84 showData(_Panel *panel)
86 char *str;
87 int x;
89 str = GetStringForKey("ResizeDisplay");
90 if (!str)
91 str = "corner";
92 if (strcasecmp(str, "corner")==0)
93 WMSetPopUpButtonSelectedItem(panel->sizeP, 0);
94 else if (strcasecmp(str, "center")==0)
95 WMSetPopUpButtonSelectedItem(panel->sizeP, 1);
96 else if (strcasecmp(str, "floating")==0)
97 WMSetPopUpButtonSelectedItem(panel->sizeP, 2);
98 else if (strcasecmp(str, "line")==0)
99 WMSetPopUpButtonSelectedItem(panel->sizeP, 3);
101 str = GetStringForKey("MoveDisplay");
102 if (!str)
103 str = "corner";
104 if (strcasecmp(str, "corner")==0)
105 WMSetPopUpButtonSelectedItem(panel->posiP, 0);
106 else if (strcasecmp(str, "center")==0)
107 WMSetPopUpButtonSelectedItem(panel->posiP, 1);
108 else if (strcasecmp(str, "floating")==0)
109 WMSetPopUpButtonSelectedItem(panel->posiP, 2);
111 x = GetIntegerForKey("WorkspaceBorderSize");
112 x = x<0 ? 0 : x;
113 x = x>5 ? 5 : x;
114 WMSetSliderValue(panel->borderS, x);
115 borderCallback(NULL, panel);
117 str = GetStringForKey("WorkspaceBorder");
118 if (!str)
119 str = "none";
120 if (strcasecmp(str, "LeftRight")==0) {
121 WMSetButtonSelected(panel->lrB, True);
122 } else if (strcasecmp(str, "TopBottom")==0) {
123 WMSetButtonSelected(panel->tbB, True);
124 } else if (strcasecmp(str, "AllDirections")==0) {
125 WMSetButtonSelected(panel->tbB, True);
126 WMSetButtonSelected(panel->lrB, True);
129 WMSetButtonSelected(panel->raisB, GetBoolForKey("CirculateRaise"));
130 #ifdef XKB_MODELOCK
131 WMSetButtonSelected(panel->modeB, GetBoolForKey("KbdModeLock"));
132 #endif /* XKB_MODELOCK */
134 WMSetButtonSelected(panel->ballB[0], GetBoolForKey("WindowTitleBalloons"));
135 WMSetButtonSelected(panel->ballB[1], GetBoolForKey("MiniwindowTitleBalloons"));
136 WMSetButtonSelected(panel->ballB[2], GetBoolForKey("AppIconBalloons"));
137 WMSetButtonSelected(panel->ballB[3], GetBoolForKey("HelpBalloons"));
141 static void
142 storeData(_Panel *panel)
144 char *str;
145 Bool lr, tb;
147 switch (WMGetPopUpButtonSelectedItem(panel->sizeP)) {
148 case 0:
149 str = "corner";
150 break;
151 case 1:
152 str = "center";
153 break;
154 case 2:
155 str = "floating";
156 break;
157 default:
158 str = "line";
159 break;
161 SetStringForKey(str, "ResizeDisplay");
163 switch (WMGetPopUpButtonSelectedItem(panel->posiP)) {
164 case 0:
165 str = "corner";
166 break;
167 case 1:
168 str = "center";
169 break;
170 default:
171 str = "floating";
172 break;
174 SetStringForKey(str, "MoveDisplay");
176 lr = WMGetButtonSelected(panel->lrB);
177 tb = WMGetButtonSelected(panel->tbB);
178 if (lr && tb)
179 str = "AllDirections";
180 else if (lr)
181 str = "LeftRight";
182 else if (tb)
183 str = "TopBottom";
184 else
185 str = "None";
186 SetStringForKey(str, "WorkspaceBorder");
187 SetIntegerForKey(WMGetSliderValue(panel->borderS), "WorkspaceBorderSize");
189 SetBoolForKey(WMGetButtonSelected(panel->raisB), "CirculateRaise");
190 #ifdef XKB_MODELOCK
191 SetBoolForKey(WMGetButtonSelected(panel->modeB), "KbdModeLock");
192 #endif /* XKB_MODELOCK */
193 SetBoolForKey(WMGetButtonSelected(panel->ballB[0]), "WindowTitleBalloons");
194 SetBoolForKey(WMGetButtonSelected(panel->ballB[1]), "MiniwindowTitleBalloons");
195 SetBoolForKey(WMGetButtonSelected(panel->ballB[2]), "AppIconBalloons");
196 SetBoolForKey(WMGetButtonSelected(panel->ballB[3]), "HelpBalloons");
200 static void
201 createPanel(Panel *p)
203 _Panel *panel = (_Panel*)p;
204 int i;
206 panel->frame = WMCreateFrame(panel->win);
207 WMResizeWidget(panel->frame, FRAME_WIDTH, FRAME_HEIGHT);
208 WMMoveWidget(panel->frame, FRAME_LEFT, FRAME_TOP);
211 /***************** Size Display ****************/
212 panel->sizeF = WMCreateFrame(panel->frame);
213 WMResizeWidget(panel->sizeF, 240, 60);
214 WMMoveWidget(panel->sizeF, 20, 10);
215 WMSetFrameTitle(panel->sizeF, _("Size Display"));
217 WMSetBalloonTextForView(_("The position or style of the window size\n"
218 "display that's shown when a window is resized."),
219 WMWidgetView(panel->sizeF));
221 panel->sizeP = WMCreatePopUpButton(panel->sizeF);
222 WMResizeWidget(panel->sizeP, 200, 20);
223 WMMoveWidget(panel->sizeP, 22, 24);
224 WMAddPopUpButtonItem(panel->sizeP, _("Corner of screen"));
225 WMAddPopUpButtonItem(panel->sizeP, _("Center of screen"));
226 WMAddPopUpButtonItem(panel->sizeP, _("Center of resized window"));
227 WMAddPopUpButtonItem(panel->sizeP, _("Technical drawing-like"));
229 WMMapSubwidgets(panel->sizeF);
231 /***************** Position Display ****************/
232 panel->posiF = WMCreateFrame(panel->frame);
233 WMResizeWidget(panel->posiF, 240, 60);
234 WMMoveWidget(panel->posiF, 20, 75);
235 WMSetFrameTitle(panel->posiF, _("Position Display"));
237 WMSetBalloonTextForView(_("The position or style of the window position\n"
238 "display that's shown when a window is moved."),
239 WMWidgetView(panel->posiF));
241 panel->posiP = WMCreatePopUpButton(panel->posiF);
242 WMResizeWidget(panel->posiP, 200, 20);
243 WMMoveWidget(panel->posiP, 22, 24);
244 WMAddPopUpButtonItem(panel->posiP, _("Corner of screen"));
245 WMAddPopUpButtonItem(panel->posiP, _("Center of screen"));
246 WMAddPopUpButtonItem(panel->posiP, _("Center of resized window"));
248 WMMapSubwidgets(panel->posiF);
250 /***************** Balloon Text ****************/
251 panel->ballF = WMCreateFrame(panel->frame);
252 WMResizeWidget(panel->ballF, 235, 125);
253 WMMoveWidget(panel->ballF, 270, 10);
254 WMSetFrameTitle(panel->ballF, _("Show balloon text for..."));
256 for (i=0; i<4; i++) {
257 panel->ballB[i] = WMCreateSwitchButton(panel->ballF);
258 WMResizeWidget(panel->ballB[i], 205, 20);
259 WMMoveWidget(panel->ballB[i], 15, 20+i*25);
261 WMSetButtonText(panel->ballB[0], _("incomplete window titles"));
262 WMSetButtonText(panel->ballB[1], _("miniwindow titles"));
263 WMSetButtonText(panel->ballB[2], _("application/dock icons"));
264 WMSetButtonText(panel->ballB[3], _("internal help"));
266 WMMapSubwidgets(panel->ballF);
268 /***************** Options ****************/
269 panel->optF = WMCreateFrame(panel->frame);
270 WMResizeWidget(panel->optF, 235, 75);
271 WMMoveWidget(panel->optF, 270, 145);
273 panel->raisB = WMCreateSwitchButton(panel->optF);
274 WMResizeWidget(panel->raisB, 210, 30);
275 WMMoveWidget(panel->raisB, 15, 7);
276 WMSetButtonText(panel->raisB, _("Raise window when switching focus with keyboard."));
278 #ifdef XKB_MODELOCK
279 panel->modeB = WMCreateSwitchButton(panel->optF);
280 WMResizeWidget(panel->modeB, 210, 30);
281 WMMoveWidget(panel->modeB, 15, 40);
282 WMSetButtonText(panel->modeB, _("Enable keyboard language switch button in window titlebars."));
283 #endif
285 WMMapSubwidgets(panel->optF);
287 /***************** Workspace border ****************/
288 panel->borderF = WMCreateFrame(panel->frame);
289 WMResizeWidget(panel->borderF, 240, 75);
290 WMMoveWidget(panel->borderF, 20, 145);
291 WMSetFrameTitle(panel->borderF, _("Workspace border"));
293 panel->borderS = WMCreateSlider(panel->borderF);
294 WMResizeWidget(panel->borderS, 80, 15);
295 WMMoveWidget(panel->borderS, 20, 20);
296 WMSetSliderMinValue(panel->borderS, 0);
297 WMSetSliderMaxValue(panel->borderS, 5);
298 WMSetSliderAction(panel->borderS, borderCallback, panel);
300 panel->borderL = WMCreateLabel(panel->borderF);
301 WMResizeWidget(panel->borderL, 50, 15);
302 WMMoveWidget(panel->borderL, 105, 20);
304 panel->lrB = WMCreateSwitchButton(panel->borderF);
305 WMMoveWidget(panel->lrB, 20, 40);
306 WMResizeWidget(panel->lrB, 90, 30);
307 WMSetButtonText(panel->lrB, _("Left/Right"));
309 panel->tbB = WMCreateSwitchButton(panel->borderF);
310 WMMoveWidget(panel->tbB, 120, 40);
311 WMResizeWidget(panel->tbB, 90, 30);
312 WMSetButtonText(panel->tbB, _("Top/Bottom"));
315 WMMapSubwidgets(panel->borderF);
317 WMRealizeWidget(panel->frame);
318 WMMapSubwidgets(panel->frame);
320 showData(panel);
325 Panel*
326 InitPreferences(WMScreen *scr, WMWindow *win)
328 _Panel *panel;
330 panel = wmalloc(sizeof(_Panel));
331 memset(panel, 0, sizeof(_Panel));
333 panel->sectionName = _("Miscellaneous Ergonomic Preferences");
334 panel->description = _("Various settings like balloon text, geometry\n"
335 "displays etc.");
337 panel->win = win;
339 panel->callbacks.createWidgets = createPanel;
340 panel->callbacks.updateDomain = storeData;
342 AddSection(panel, ICON_FILE);
344 return panel;