WPrefs.app/MenuPreferences.c

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