WPrefs.app/MenuPreferences.c

   1 /* MenuPreferences.c- menu related preferences
   2  *
   3  *  WPrefs - Window Maker Preferences Program
   4  *
   5  *  Copyright (c) 1998-2003 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.
  11  *
  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.
  16  *
  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.
  21  */
  22
  23 #include "WPrefs.h"
  24
  25 typedef struct _Panel {
  26         WMBox *box;
  27
  28         char *sectionName;
  29
  30         char *description;
  31
  32         CallbackRec callbacks;
  33
  34         WMWidget *parent;
  35
  36         WMFrame *scrF;
  37         WMButton *scrB[5];
  38
  39         WMFrame *aliF;
  40         WMButton *aliyB;
  41         WMButton *alinB;
  42
  43         WMFrame *optF;
  44         WMButton *autoB;
  45         WMButton *wrapB;
  46
  47 } _Panel;
  48
  49 #define ICON_FILE       "menuprefs"
  50 #define SPEED_IMAGE "speed%i"
  51 #define SPEED_IMAGE_S "speed%is"
  52
  53 #define MENU_ALIGN1 "menualign1"
  54 #define MENU_ALIGN2 "menualign2"
  55
  56 static void showData(_Panel * panel)
  57 {
  58         WMPerformButtonClick(panel->scrB[GetSpeedForKey("MenuScrollSpeed")]);
  59
  60         if (GetBoolForKey("AlignSubmenus"))
  61                 WMPerformButtonClick(panel->aliyB);
  62         else
  63                 WMPerformButtonClick(panel->alinB);
  64
  65         WMSetButtonSelected(panel->wrapB, GetBoolForKey("WrapMenus"));
  66
  67         WMSetButtonSelected(panel->autoB, GetBoolForKey("ScrollableMenus"));
  68 }
  69
  70 static void storeData(_Panel * panel)
  71 {
  72         int i;
  73
  74         for (i = 0; i < 5; i++) {
  75                 if (WMGetButtonSelected(panel->scrB[i]))
  76                         break;
  77         }
  78         SetSpeedForKey(i, "MenuScrollSpeed");
  79
  80         SetBoolForKey(WMGetButtonSelected(panel->aliyB), "AlignSubmenus");
  81
  82         SetBoolForKey(WMGetButtonSelected(panel->wrapB), "WrapMenus");
  83         SetBoolForKey(WMGetButtonSelected(panel->autoB), "ScrollableMenus");
  84 }
  85
  86 static void createPanel(Panel * p)
  87 {
  88         _Panel *panel = (_Panel *) p;
  89         WMScreen *scr = WMWidgetScreen(panel->parent);
  90         WMPixmap *icon;
  91         int i;
  92         char *buf1, *buf2;
  93         char *path;
  94
  95         panel->box = WMCreateBox(panel->parent);
  96         WMSetViewExpandsToParent(WMWidgetView(panel->box), 2, 2, 2, 2);
  97
  98     /***************** Menu Scroll Speed ****************/
  99         panel->scrF = WMCreateFrame(panel->box);
 100         WMResizeWidget(panel->scrF, 235, 90);
 101         WMMoveWidget(panel->scrF, 25, 20);
 102         WMSetFrameTitle(panel->scrF, _("Menu Scrolling Speed"));
 103
 104         buf1 = wmalloc(strlen(SPEED_IMAGE) + 1);
 105         buf2 = wmalloc(strlen(SPEED_IMAGE_S) + 1);
 106         for (i = 0; i < 5; i++) {
 107                 panel->scrB[i] = WMCreateCustomButton(panel->scrF, WBBStateChangeMask);
 108                 WMResizeWidget(panel->scrB[i], 40, 40);
 109                 WMMoveWidget(panel->scrB[i], 15 + (40 * i), 30);
 110                 WMSetButtonBordered(panel->scrB[i], False);
 111                 WMSetButtonImagePosition(panel->scrB[i], WIPImageOnly);
 112                 if (i > 0) {
 113                         WMGroupButtons(panel->scrB[0], panel->scrB[i]);
 114                 }
 115                 sprintf(buf1, SPEED_IMAGE, i);
 116                 sprintf(buf2, SPEED_IMAGE_S, i);
 117                 path = LocateImage(buf1);
 118                 if (path) {
 119                         icon = WMCreatePixmapFromFile(scr, path);
 120                         if (icon) {
 121                                 WMSetButtonImage(panel->scrB[i], icon);
 122                                 WMReleasePixmap(icon);
 123                         } else {
 124                                 wwarning(_("could not load icon file %s"), path);
 125                         }
 126                         wfree(path);
 127                 }
 128                 path = LocateImage(buf2);
 129                 if (path) {
 130                         icon = WMCreatePixmapFromFile(scr, path);
 131                         if (icon) {
 132                                 WMSetButtonAltImage(panel->scrB[i], icon);
 133                                 WMReleasePixmap(icon);
 134                         } else {
 135                                 wwarning(_("could not load icon file %s"), path);
 136                         }
 137                         wfree(path);
 138                 }
 139         }
 140         wfree(buf1);
 141         wfree(buf2);
 142
 143         WMMapSubwidgets(panel->scrF);
 144
 145     /***************** Submenu Alignment ****************/
 146
 147         panel->aliF = WMCreateFrame(panel->box);
 148         WMResizeWidget(panel->aliF, 220, 90);
 149         WMMoveWidget(panel->aliF, 280, 20);
 150         WMSetFrameTitle(panel->aliF, _("Submenu Alignment"));
 151
 152         panel->alinB = WMCreateButton(panel->aliF, WBTOnOff);
 153         WMResizeWidget(panel->alinB, 48, 48);
 154         WMMoveWidget(panel->alinB, 56, 25);
 155         WMSetButtonImagePosition(panel->alinB, WIPImageOnly);
 156         path = LocateImage(MENU_ALIGN1);
 157         if (path) {
 158                 icon = WMCreatePixmapFromFile(scr, path);
 159                 if (icon) {
 160                         WMSetButtonImage(panel->alinB, icon);
 161                         WMReleasePixmap(icon);
 162                 } else {
 163                         wwarning(_("could not load icon file %s"), path);
 164                 }
 165                 wfree(path);
 166         }
 167         panel->aliyB = WMCreateButton(panel->aliF, WBTOnOff);
 168         WMResizeWidget(panel->aliyB, 48, 48);
 169         WMMoveWidget(panel->aliyB, 120, 25);
 170         WMSetButtonImagePosition(panel->aliyB, WIPImageOnly);
 171         path = LocateImage(MENU_ALIGN2);
 172         if (path) {
 173                 icon = WMCreatePixmapFromFile(scr, path);
 174                 if (icon) {
 175                         WMSetButtonImage(panel->aliyB, icon);
 176                         WMReleasePixmap(icon);
 177                 } else {
 178                         wwarning(_("could not load icon file %s"), path);
 179                 }
 180                 wfree(path);
 181         }
 182         WMGroupButtons(panel->alinB, panel->aliyB);
 183
 184         WMMapSubwidgets(panel->aliF);
 185
 186     /***************** Options ****************/
 187         panel->optF = WMCreateFrame(panel->box);
 188         WMResizeWidget(panel->optF, 475, 80);
 189         WMMoveWidget(panel->optF, 25, 130);
 190
 191         panel->wrapB = WMCreateSwitchButton(panel->optF);
 192         WMResizeWidget(panel->wrapB, 440, 32);
 193         WMMoveWidget(panel->wrapB, 25, 8);
 194         WMSetButtonText(panel->wrapB,
 195                         _
 196                         ("Always open submenus inside the screen, instead of scrolling.\nNote: this is annoying."));
 197
 198         panel->autoB = WMCreateSwitchButton(panel->optF);
 199         WMResizeWidget(panel->autoB, 440, 32);
 200         WMMoveWidget(panel->autoB, 25, 45);
 201         WMSetButtonText(panel->autoB, _("Scroll off-screen menus when pointer is moved over them."));
 202
 203         WMMapSubwidgets(panel->optF);
 204
 205         WMRealizeWidget(panel->box);
 206         WMMapSubwidgets(panel->box);
 207
 208         showData(panel);
 209 }
 210
 211 Panel *InitMenuPreferences(WMScreen * scr, WMWidget * parent)
 212 {
 213         _Panel *panel;
 214
 215         panel = wmalloc(sizeof(_Panel));
 216         memset(panel, 0, sizeof(_Panel));
 217
 218         panel->sectionName = _("Menu Preferences");
 219
 220         panel->description = _("Menu usability related options. Scrolling speed,\n" "alignment of submenus etc.");
 221
 222         panel->parent = parent;
 223
 224         panel->callbacks.createWidgets = createPanel;
 225         panel->callbacks.updateDomain = storeData;
 226
 227         AddSection(panel, ICON_FILE);
 228
 229         return panel;
 230 }