1 /* Workspace.c- workspace options
3 * WPrefs - Window Maker 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,
27 typedef struct _Panel
{
34 CallbackRec callbacks
;
58 #define ICON_FILE "workspace"
60 #define ARQUIVO_XIS "xis"
61 #define DONT_LINK_FILE "dontlinkworkspaces"
62 #define CYCLE_FILE "cycleworkspaces"
63 #define ADVANCE_FILE "advancetonewworkspace"
64 #define WSNAME_FILE "workspacename"
65 #define DOCK_FILE "dock"
66 #define CLIP_FILE "clip"
69 static char *WSNamePositions
[] = {
82 createImages(WMScreen
*scr
, RContext
*rc
, RImage
*xis
, char *file
,
83 WMPixmap
**icon1
, WMPixmap
**icon2
)
86 RColor gray
= {0xae,0xaa,0xae};
88 *icon1
= WMCreatePixmapFromFile(scr
, file
);
90 wwarning(_("could not load icon %s"), file
);
99 icon
= RLoadImage(rc
, file
, 0);
101 wwarning(_("could not load icon %s"), file
);
105 RCombineImageWithColor(icon
, &gray
);
107 RCombineImagesWithOpaqueness(icon
, xis
, 180);
108 if (!(*icon2
= WMCreatePixmapFromRImage(scr
, icon
, 127))) {
109 wwarning(_("could not process icon %s:"), file
, RMessageForError(RErrorCode
));
119 showData(_Panel
*panel
)
124 WMSetButtonSelected(panel
->linkB
, !GetBoolForKey("DontLinkWorkspaces"));
126 WMSetButtonSelected(panel
->cyclB
, GetBoolForKey("CycleWorkspaces"));
128 WMSetButtonSelected(panel
->newB
, GetBoolForKey("AdvanceToNewWorkspace"));
130 WMSetButtonSelected(panel
->dockB
, !GetBoolForKey("DisableDock"));
132 WMSetButtonSelected(panel
->clipB
, !GetBoolForKey("DisableClip"));
134 str
= GetStringForKey("WorkspaceNameDisplayPosition");
138 idx
= 1; /* center */
139 for (i
= 0; i
< sizeof(WSNamePositions
)/sizeof(char*); i
++) {
140 if (strcasecmp(WSNamePositions
[i
], str
) == 0) {
145 WMSetPopUpButtonSelectedItem(panel
->posP
, idx
);
151 createPanel(Panel
*p
)
153 _Panel
*panel
= (_Panel
*)p
;
154 WMScreen
*scr
= WMWidgetScreen(panel
->win
);
155 WMPixmap
*icon1
, *icon2
;
157 RContext
*rc
= WMScreenRContext(scr
);
160 path
= LocateImage(ARQUIVO_XIS
);
162 xis
= RLoadImage(rc
, path
, 0);
164 wwarning(_("could not load image file %s"), path
);
169 panel
->frame
= WMCreateFrame(panel
->win
);
170 WMResizeWidget(panel
->frame
, FRAME_WIDTH
, FRAME_HEIGHT
);
171 WMMoveWidget(panel
->frame
, FRAME_LEFT
, FRAME_TOP
);
173 /***************** Workspace Navigation *****************/
174 panel
->navF
= WMCreateFrame(panel
->frame
);
175 WMResizeWidget(panel
->navF
, 365, 210);
176 WMMoveWidget(panel
->navF
, 15, 10);
177 WMSetFrameTitle(panel
->navF
, _("Workspace Navigation"));
180 panel
->cyclB
= WMCreateSwitchButton(panel
->navF
);
181 WMResizeWidget(panel
->cyclB
, 280, 34);
182 WMMoveWidget(panel
->cyclB
, 75, 30);
183 WMSetButtonText(panel
->cyclB
,
184 _("wrap to the first workspace after the last workspace."));
186 panel
->cyclL
= WMCreateLabel(panel
->navF
);
187 WMResizeWidget(panel
->cyclL
, 60, 60);
188 WMMoveWidget(panel
->cyclL
, 10, 15);
189 WMSetLabelImagePosition(panel
->cyclL
, WIPImageOnly
);
190 path
= LocateImage(CYCLE_FILE
);
192 createImages(scr
, rc
, xis
, path
, &icon1
, NULL
);
194 WMSetLabelImage(panel
->cyclL
, icon1
);
195 WMReleasePixmap(icon1
);
202 panel
->linkB
= WMCreateSwitchButton(panel
->navF
);
203 WMResizeWidget(panel
->linkB
, 280, 34);
204 WMMoveWidget(panel
->linkB
, 75, 75);
205 WMSetButtonText(panel
->linkB
,
206 _("switch workspaces while dragging windows."));
208 panel
->linkL
= WMCreateLabel(panel
->navF
);
209 WMResizeWidget(panel
->linkL
, 60, 40);
210 WMMoveWidget(panel
->linkL
, 10, 80);
211 WMSetLabelImagePosition(panel
->linkL
, WIPImageOnly
);
212 path
= LocateImage(DONT_LINK_FILE
);
214 createImages(scr
, rc
, xis
, path
, &icon1
, NULL
);
216 WMSetLabelImage(panel
->linkL
, icon1
);
217 WMReleasePixmap(icon1
);
224 panel
->newB
= WMCreateSwitchButton(panel
->navF
);
225 WMResizeWidget(panel
->newB
, 280, 34);
226 WMMoveWidget(panel
->newB
, 75, 120);
227 WMSetButtonText(panel
->newB
,
228 _("automatically create new workspaces."));
230 panel
->newL
= WMCreateLabel(panel
->navF
);
231 WMResizeWidget(panel
->newL
, 60, 20);
232 WMMoveWidget(panel
->newL
, 10, 130);
233 WMSetLabelImagePosition(panel
->newL
, WIPImageOnly
);
234 path
= LocateImage(ADVANCE_FILE
);
236 createImages(scr
, rc
, xis
, path
, &icon1
, NULL
);
238 WMSetLabelImage(panel
->newL
, icon1
);
239 WMReleasePixmap(icon1
);
246 panel
->posL
= WMCreateLabel(panel
->navF
);
247 WMResizeWidget(panel
->posL
, 140, 30);
248 WMMoveWidget(panel
->posL
, 75, 165);
249 WMSetLabelTextAlignment(panel
->posL
, WARight
);
250 WMSetLabelText(panel
->posL
,
251 _("Position of workspace name display"));
253 panel
->posiL
= WMCreateLabel(panel
->navF
);
254 WMResizeWidget(panel
->posiL
, 60, 40);
255 WMMoveWidget(panel
->posiL
, 10, 160);
256 WMSetLabelImagePosition(panel
->posiL
, WIPImageOnly
);
257 path
= LocateImage(WSNAME_FILE
);
259 createImages(scr
, rc
, xis
, path
, &icon1
, NULL
);
261 WMSetLabelImage(panel
->posiL
, icon1
);
262 WMReleasePixmap(icon1
);
267 panel
->posP
= WMCreatePopUpButton(panel
->navF
);
268 WMResizeWidget(panel
->posP
, 125, 20);
269 WMMoveWidget(panel
->posP
, 225, 175);
270 WMAddPopUpButtonItem(panel
->posP
, _("Disable"));
271 WMAddPopUpButtonItem(panel
->posP
, _("Center"));
272 WMAddPopUpButtonItem(panel
->posP
, _("Top"));
273 WMAddPopUpButtonItem(panel
->posP
, _("Bottom"));
274 WMAddPopUpButtonItem(panel
->posP
, _("Top/left"));
275 WMAddPopUpButtonItem(panel
->posP
, _("Top/right"));
276 WMAddPopUpButtonItem(panel
->posP
, _("Bottom/left"));
277 WMAddPopUpButtonItem(panel
->posP
, _("Bottom/right"));
279 WMMapSubwidgets(panel
->navF
);
281 /***************** Dock/Clip *****************/
282 panel
->dockF
= WMCreateFrame(panel
->frame
);
283 WMResizeWidget(panel
->dockF
, 115, 210);
284 WMMoveWidget(panel
->dockF
, 390, 10);
285 WMSetFrameTitle(panel
->dockF
, _("Dock/Clip"));
287 panel
->dockB
= WMCreateButton(panel
->dockF
, WBTToggle
);
288 WMResizeWidget(panel
->dockB
, 64, 64);
289 WMMoveWidget(panel
->dockB
, 25, 35);
290 WMSetButtonImagePosition(panel
->dockB
, WIPImageOnly
);
291 path
= LocateImage(DOCK_FILE
);
293 createImages(scr
, rc
, xis
, path
, &icon1
, &icon2
);
295 WMSetButtonImage(panel
->dockB
, icon2
);
296 WMReleasePixmap(icon2
);
299 WMSetButtonAltImage(panel
->dockB
, icon1
);
300 WMReleasePixmap(icon1
);
304 WMSetBalloonTextForView(_("Disable/enable the application Dock (the\n"
305 "vertical icon bar in the side of the screen)."),
306 WMWidgetView(panel
->dockB
));
308 panel
->clipB
= WMCreateButton(panel
->dockF
, WBTToggle
);
309 WMResizeWidget(panel
->clipB
, 64, 64);
310 WMMoveWidget(panel
->clipB
, 25, 120);
311 WMSetButtonImagePosition(panel
->clipB
, WIPImageOnly
);
312 path
= LocateImage(CLIP_FILE
);
314 createImages(scr
, rc
, xis
, path
, &icon1
, &icon2
);
316 WMSetButtonImage(panel
->clipB
, icon2
);
317 WMReleasePixmap(icon2
);
320 WMSetButtonAltImage(panel
->clipB
, icon1
);
321 WMReleasePixmap(icon1
);
325 WMSetBalloonTextForView(_("Disable/enable the Clip (that thing with\n"
326 "a paper clip icon)."),
327 WMWidgetView(panel
->clipB
));
329 WMMapSubwidgets(panel
->dockF
);
334 WMRealizeWidget(panel
->frame
);
335 WMMapSubwidgets(panel
->frame
);
342 storeData(_Panel
*panel
)
344 SetBoolForKey(!WMGetButtonSelected(panel
->linkB
), "DontLinkWorkspaces");
345 SetBoolForKey(WMGetButtonSelected(panel
->cyclB
), "CycleWorkspaces");
346 SetBoolForKey(WMGetButtonSelected(panel
->newB
), "AdvanceToNewWorkspace");
348 SetBoolForKey(!WMGetButtonSelected(panel
->dockB
), "DisableDock");
349 SetBoolForKey(!WMGetButtonSelected(panel
->clipB
), "DisableClip");
351 SetStringForKey(WSNamePositions
[WMGetPopUpButtonSelectedItem(panel
->posP
)],
352 "WorkspaceNameDisplayPosition");
358 InitWorkspace(WMScreen
*scr
, WMWindow
*win
)
362 panel
= wmalloc(sizeof(_Panel
));
363 memset(panel
, 0, sizeof(_Panel
));
365 panel
->sectionName
= _("Workspace Preferences");
367 panel
->description
= _("Workspace navigation features.\n"
368 "You can also enable/disable the Dock and Clip here.");
372 panel
->callbacks
.createWidgets
= createPanel
;
373 panel
->callbacks
.updateDomain
= storeData
;
375 AddSection(panel
, ICON_FILE
);