1 /* WindowHandling.c- options for handling windows
3 * WPrefs - WindowMaker Preferences Program
5 * Copyright (c) 1998 Alfredo K. Kojima
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,
26 typedef struct _Panel
{
31 CallbackRec callbacks
;
57 #define ICON_FILE "whandling"
59 #define OPAQUE_MOVE_PIXMAP "opaque"
61 #define NON_OPAQUE_MOVE_PIXMAP "nonopaque"
67 static char *placements
[] = {
76 sliderCallback(WMWidget
*w
, void *data
)
78 _Panel
*panel
= (_Panel
*)data
;
81 int swidth
= WMGetSliderMaxValue(panel
->hsli
);
82 int sheight
= WMGetSliderMaxValue(panel
->vsli
);
84 x
= WMGetSliderValue(panel
->hsli
);
85 y
= WMGetSliderValue(panel
->vsli
);
87 rx
= x
*(WMWidgetWidth(panel
->porigF
)-3)/swidth
+2;
88 ry
= y
*(WMWidgetHeight(panel
->porigF
)-3)/sheight
+2;
89 WMMoveWidget(panel
->porigW
, rx
, ry
);
91 sprintf(buffer
, "(%i,%i)", x
, y
);
92 WMSetLabelText(panel
->porigvL
, buffer
);
97 getPlacement(char *str
)
99 if (strcasecmp(str
, "auto")==0 || strcasecmp(str
, "smart")==0)
101 else if (strcasecmp(str
, "random")==0)
103 else if (strcasecmp(str
, "manual")==0)
105 else if (strcasecmp(str
, "cascade")==0)
108 wwarning(_("bad option value %s in WindowPlacement. Using default value"),
115 showData(_Panel
*panel
)
121 str
= GetStringForKey("WindowPlacement");
123 WMSetPopUpButtonSelectedItem(panel
->placP
, getPlacement(str
));
125 arr
= GetObjectForKey("WindowPlaceOrigin");
129 if (arr
&& (!PLIsArray(arr
) || PLGetNumberOfElements(arr
)!=2)) {
130 wwarning(_("invalid data in option WindowPlaceOrigin. Using default (0,0)"));
133 x
= atoi(PLGetString(PLGetArrayElement(arr
, 0)));
134 y
= atoi(PLGetString(PLGetArrayElement(arr
, 1)));
138 WMSetSliderValue(panel
->hsli
, x
);
139 WMSetSliderValue(panel
->vsli
, y
);
141 sliderCallback(NULL
, panel
);
143 WMSetButtonSelected(panel
->tranB
, GetBoolForKey("OnTopTransients"));
145 WMSetButtonSelected(panel
->opaqB
, GetBoolForKey("OpaqueMove"));
147 WMSetButtonSelected(panel
->miconB
, GetBoolForKey("NoWindowOverIcons"));
149 WMSetButtonSelected(panel
->mdockB
, GetBoolForKey("NoWindowUnderDock"));
154 storeData(_Panel
*panel
)
159 SetBoolForKey(WMGetButtonSelected(panel
->miconB
), "NoWindowOverIcons");
160 SetBoolForKey(WMGetButtonSelected(panel
->mdockB
), "NoWindowUnderDock");
161 SetBoolForKey(WMGetButtonSelected(panel
->opaqB
), "OpaqueMove");
162 SetBoolForKey(WMGetButtonSelected(panel
->tranB
), "OnTopTransients");
163 SetStringForKey(placements
[WMGetPopUpButtonSelectedItem(panel
->placP
)],
165 sprintf(x
, "%i", WMGetSliderValue(panel
->hsli
));
166 sprintf(y
, "%i", WMGetSliderValue(panel
->vsli
));
167 arr
= PLMakeArrayFromElements(PLMakeString(x
), PLMakeString(y
), NULL
);
168 SetObjectForKey(arr
, "WindowPlaceOrigin");
174 createPanel(Panel
*p
)
176 _Panel
*panel
= (Panel
*)p
;
177 WMScreen
*scr
= WMWidgetScreen(panel
->win
);
184 panel
->frame
= WMCreateFrame(panel
->win
);
185 WMResizeWidget(panel
->frame
, FRAME_WIDTH
, FRAME_HEIGHT
);
186 WMMoveWidget(panel
->frame
, FRAME_LEFT
, FRAME_TOP
);
188 /************** Window Placement ***************/
189 panel
->placF
= WMCreateFrame(panel
->frame
);
190 WMResizeWidget(panel
->placF
, 270, 150);
191 WMMoveWidget(panel
->placF
, 20, 15);
192 WMSetFrameTitle(panel
->placF
, _("Window Placement"));
194 panel
->placP
= WMCreatePopUpButton(panel
->placF
);
195 WMResizeWidget(panel
->placP
, 195, 20);
196 WMMoveWidget(panel
->placP
, 35, 20);
197 WMAddPopUpButtonItem(panel
->placP
, _("Automatic"));
198 WMAddPopUpButtonItem(panel
->placP
, _("Random"));
199 WMAddPopUpButtonItem(panel
->placP
, _("Manual"));
200 WMAddPopUpButtonItem(panel
->placP
, _("Cascade"));
202 panel
->porigL
= WMCreateLabel(panel
->placF
);
203 WMResizeWidget(panel
->porigL
, 118, 32);
204 WMMoveWidget(panel
->porigL
, 5, 60);
205 WMSetLabelTextAlignment(panel
->porigL
, WACenter
);
206 WMSetLabelText(panel
->porigL
, _("Placement Origin"));
208 panel
->porigvL
= WMCreateLabel(panel
->placF
);
209 WMResizeWidget(panel
->porigvL
, 70, 20);
210 WMMoveWidget(panel
->porigvL
, 25, 95);
211 WMSetLabelTextAlignment(panel
->porigvL
, WACenter
);
213 color
= WMCreateRGBColor(scr
, 0x5100, 0x5100, 0x7100, True
);
214 panel
->porigF
= WMCreateFrame(panel
->placF
);
215 WMSetWidgetBackgroundColor(panel
->porigF
, color
);
216 WMReleaseColor(color
);
217 WMSetFrameRelief(panel
->porigF
, WRSunken
);
219 swidth
= WidthOfScreen(DefaultScreenOfDisplay(WMScreenDisplay(scr
)));
220 sheight
= HeightOfScreen(DefaultScreenOfDisplay(WMScreenDisplay(scr
)));
222 if (120*sheight
/swidth
< 80*swidth
/sheight
) {
223 width
= 80*swidth
/sheight
;
226 height
= 120*sheight
/swidth
;
229 WMResizeWidget(panel
->porigF
, width
, height
);
230 WMMoveWidget(panel
->porigF
, 125+(120-width
)/2, 45+(80-height
)/2);
232 panel
->porigW
= WMCreateLabel(panel
->porigF
);
233 WMResizeWidget(panel
->porigW
, THUMB_SIZE
, THUMB_SIZE
);
234 WMMoveWidget(panel
->porigW
, 2, 2);
235 WMSetLabelRelief(panel
->porigW
, WRRaised
);
238 panel
->hsli
= WMCreateSlider(panel
->placF
);
239 WMResizeWidget(panel
->hsli
, width
, 12);
240 WMMoveWidget(panel
->hsli
, 125+(120-width
)/2, 45+(80-height
)/2+height
+2);
241 WMSetSliderAction(panel
->hsli
, sliderCallback
, panel
);
242 WMSetSliderMinValue(panel
->hsli
, 0);
243 WMSetSliderMaxValue(panel
->hsli
, swidth
);
245 panel
->vsli
= WMCreateSlider(panel
->placF
);
246 WMResizeWidget(panel
->vsli
, 12, height
);
247 WMMoveWidget(panel
->vsli
, 125+(120-width
)/2+width
+2, 45+(80-height
)/2);
248 WMSetSliderAction(panel
->vsli
, sliderCallback
, panel
);
249 WMSetSliderMinValue(panel
->vsli
, 0);
250 WMSetSliderMaxValue(panel
->vsli
, sheight
);
252 WMMapSubwidgets(panel
->porigF
);
254 WMMapSubwidgets(panel
->placF
);
256 /************** Opaque Move ***************/
257 panel
->opaqF
= WMCreateFrame(panel
->frame
);
258 WMMoveWidget(panel
->opaqF
, 300, 15);
259 WMResizeWidget(panel
->opaqF
, 205, 125);
260 WMSetFrameTitle(panel
->opaqF
, _("Opaque Move"));
262 panel
->opaqB
= WMCreateButton(panel
->opaqF
, WBTToggle
);
263 WMResizeWidget(panel
->opaqB
, 64, 64);
264 WMMoveWidget(panel
->opaqB
, 70, 35);
265 WMSetButtonImagePosition(panel
->opaqB
, WIPImageOnly
);
267 path
= LocateImage(NON_OPAQUE_MOVE_PIXMAP
);
269 pixmap
= WMCreatePixmapFromFile(scr
, path
);
271 WMSetButtonImage(panel
->opaqB
, pixmap
);
272 WMReleasePixmap(pixmap
);
274 wwarning(_("could not load icon %s"), path
);
279 path
= LocateImage(OPAQUE_MOVE_PIXMAP
);
281 pixmap
= WMCreatePixmapFromFile(scr
, path
);
283 WMSetButtonAltImage(panel
->opaqB
, pixmap
);
284 WMReleasePixmap(pixmap
);
286 wwarning(_("could not load icon %s"), path
);
290 WMMapSubwidgets(panel
->opaqF
);
292 /**************** Account for Icon/Dock ***************/
293 panel
->maxiF
= WMCreateFrame(panel
->frame
);
294 WMResizeWidget(panel
->maxiF
, 205, 70);
295 WMMoveWidget(panel
->maxiF
, 300, 145);
296 WMSetFrameTitle(panel
->maxiF
, _("When maximizing..."));
298 panel
->miconB
= WMCreateSwitchButton(panel
->maxiF
);
299 WMResizeWidget(panel
->miconB
, 185, 20);
300 WMMoveWidget(panel
->miconB
, 10, 20);
301 WMSetButtonText(panel
->miconB
, _("...do not resize over icons"));
303 panel
->mdockB
= WMCreateSwitchButton(panel
->maxiF
);
304 WMResizeWidget(panel
->mdockB
, 185, 20);
305 WMMoveWidget(panel
->mdockB
, 10, 40);
306 WMSetButtonText(panel
->mdockB
, _("...do not resize over dock"));
308 WMMapSubwidgets(panel
->maxiF
);
310 /**************** Transients On Top ****************/
312 panel
->tranF
= WMCreateFrame(panel
->frame
);
313 WMResizeWidget(panel
->tranF
, 270, 40);
314 WMMoveWidget(panel
->tranF
, 20, 175);
316 panel
->tranB
= WMCreateSwitchButton(panel
->tranF
);
317 WMMoveWidget(panel
->tranB
, 10, 10);
318 WMResizeWidget(panel
->tranB
, 235, 20);
319 WMSetButtonText(panel
->tranB
, _("Keep transients above their owners"));
321 WMMapSubwidgets(panel
->tranF
);
323 WMRealizeWidget(panel
->frame
);
324 WMMapSubwidgets(panel
->frame
);
326 /* show the config data */
339 InitWindowHandling(WMScreen
*scr
, WMWindow
*win
)
343 panel
= wmalloc(sizeof(_Panel
));
344 memset(panel
, 0, sizeof(_Panel
));
346 panel
->sectionName
= _("Window Handling Preferences");
350 panel
->callbacks
.createWidgets
= createPanel
;
351 panel
->callbacks
.updateDomain
= storeData
;
352 panel
->callbacks
.undoChanges
= undo
;
354 AddSection(panel
, ICON_FILE
);