WPrefs.app/Font.c

   1 /* Font.c- text/font settings
   2  *
   3  *  WPrefs - Window Maker Preferences Program
   4  *
   5  *  Copyright (c) 1999 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 #include <proplist.h>
  27
  28 typedef struct _Panel {
  29     WMBox *box;
  30     char *sectionName;
  31
  32     char *description;
  33
  34     CallbackRec callbacks;
  35
  36     WMWidget *parent;
  37
  38
  39     WMLabel *prevL;
  40
  41     WMFrame *langF;
  42     WMPopUpButton *langP;
  43
  44     /* single byte */
  45     WMTextField *fontT;
  46     WMButton *changeB;
  47
  48     /* multibyte */
  49     WMLabel *fsetL;
  50     WMList *fsetLs;
  51
  52     WMButton *addB;
  53     WMButton *editB;
  54     WMButton *remB;
  55
  56
  57     WMFont *windowTitleFont;
  58     WMFont *menuTitleFont;
  59     WMFont *menuItemFont;
  60
  61
  62     WMColor *white;
  63     WMColor *black;
  64     WMColor *light;
  65     WMColor *dark;
  66
  67     WMColor *back;
  68
  69     Pixmap preview;
  70     WMPixmap *previewPix;
  71 } _Panel;
  72
  73
  74
  75 #define ICON_FILE       "fonts"
  76
  77
  78
  79 static proplist_t DefaultWindowTitleFont = NULL;
  80 static proplist_t DefaultMenuTitleFont = NULL;
  81 static proplist_t DefaultMenuTextFont = NULL;
  82 static proplist_t DefaultIconTitleFont = NULL;
  83 static proplist_t DefaultClipTitleFont = NULL;
  84 static proplist_t DefaultDisplayFont = NULL;
  85
  86
  87
  88 static void
  89 drawMenuItem(WMScreen *scr, Display *dpy, Drawable d,
  90              int x, int y, int w, int h,
  91              GC light, GC dark, GC black, GC white,
  92              WMFont *font, int fh, char *text)
  93 {
  94     XFillRectangle(dpy, d, light, x, y, w, h);
  95
  96     XDrawLine(dpy, d, black, x, y, x, y+h);
  97     XDrawLine(dpy, d, black, x+w, y, x+w, y+h);
  98
  99     XDrawLine(dpy, d, white, x+1, y, x+1, y+h-1);
 100     XDrawLine(dpy, d, white, x+1, y, x+w-1, y);
 101
 102     XDrawLine(dpy, d, dark, x+w-1, y+1, x+w-1, y+h-3);
 103     XDrawLine(dpy, d, dark, x+1, y+h-2, x+w-1, y+h-2);
 104
 105     XDrawLine(dpy, d, black, x, y+h-1, x+w, y+h-1);
 106
 107     WMDrawString(scr, d, black, font, x + 5, y+(h-fh)/2,
 108                  text, strlen(text));
 109 }
 110
 111
 112
 113 static void
 114 paintPreviewBox(Panel *panel)
 115 {
 116     WMScreen *scr = WMWidgetScreen(panel->parent);
 117     Display *dpy = WMScreenDisplay(scr);
 118     GC black = WMColorGC(panel->black);
 119     GC white = WMColorGC(panel->white);
 120     GC dark = WMColorGC(panel->dark);
 121     GC light = WMColorGC(panel->light);
 122
 123
 124     if (panel->preview == None) {
 125         WMPixmap *pix;
 126
 127         panel->preview = XCreatePixmap(dpy, WMWidgetXID(panel->parent),
 128                                        240-4, 215-4, WMScreenDepth(scr));
 129
 130         pix = WMCreatePixmapFromXPixmaps(scr, panel->preview, None,
 131                                          240-4, 215-4, WMScreenDepth(scr));
 132
 133         WMSetLabelImage(panel->prevL, pix);
 134         WMReleasePixmap(pix);
 135     }
 136
 137     XFillRectangle(dpy, panel->preview, WMColorGC(panel->back),
 138                    0, 0, 240-4, 215-4);
 139
 140     /* window title */
 141     {
 142         int h, fh;
 143
 144         fh = WMFontHeight(panel->windowTitleFont);
 145         h = fh+6;
 146
 147         XFillRectangle(dpy, panel->preview, black,
 148                        19, 19, 203, h+3);
 149
 150         XDrawLine(dpy, panel->preview, light,
 151                   20, 20, 220, 20);
 152         XDrawLine(dpy, panel->preview, light,
 153                   20, 20, 20, 20+h);
 154
 155         XDrawLine(dpy, panel->preview, dark,
 156                   20, 20+h, 220, 20+h);
 157         XDrawLine(dpy, panel->preview, dark,
 158                   220, 20, 220, 20+h);
 159
 160         WMDrawString(scr, panel->preview, white, panel->windowTitleFont,
 161                      20+(200-WMWidthOfString(panel->windowTitleFont, "Window Titlebar", 15))/2,
 162                      20+(h-fh)/2, "Window Titlebar", 15);
 163     }
 164
 165     /* menu title */
 166     {
 167         int h, h2, fh, fh2;
 168         int i;
 169         const int mx = 20;
 170         const int my = 120;
 171         const int mw = 100;
 172
 173
 174         fh = WMFontHeight(panel->menuTitleFont);
 175         h = fh+6;
 176
 177         XFillRectangle(dpy, panel->preview, black,
 178                        mx-1, my-1, mw+3, h+3);
 179
 180         XDrawLine(dpy, panel->preview, light,
 181                   mx, my, mx+mw, my);
 182         XDrawLine(dpy, panel->preview, light,
 183                   mx, my, mx, my+h);
 184
 185         XDrawLine(dpy, panel->preview, dark,
 186                   mx, my+h, mx+mw, my+h);
 187         XDrawLine(dpy, panel->preview, dark,
 188                   mx+mw, my, mx+mw, my+h);
 189
 190         WMDrawString(scr, panel->preview, white, panel->menuTitleFont,
 191                      mx+5, my+(h-fh)/2, "Menu Title", 10);
 192
 193         fh2 = WMFontHeight(panel->menuItemFont);
 194         h2 = fh2+6;
 195
 196         /* menu items */
 197         for (i = 0; i < 4; i++) {
 198             drawMenuItem(scr, dpy, panel->preview,
 199                          mx-1, my+2+h+i*h2, mw+2, h2,
 200                          light, dark, black, white,
 201                          panel->menuItemFont, fh2,
 202                          "Menu Item");
 203         }
 204     }
 205
 206
 207     WMRedisplayWidget(panel->prevL);
 208 }
 209
 210
 211
 212 static void
 213 showData(_Panel *panel)
 214 {
 215     WMScreen *scr = WMWidgetScreen(panel->parent);
 216     char *str;
 217
 218     str = GetStringForKey("WindowTitleFont");
 219
 220     panel->windowTitleFont = WMCreateFont(scr, str);
 221
 222
 223     str = GetStringForKey("MenuTitleFont");
 224
 225     panel->menuTitleFont = WMCreateFont(scr, str);
 226
 227
 228     str = GetStringForKey("MenuTextFont");
 229
 230     panel->menuItemFont = WMCreateFont(scr, str);
 231
 232
 233
 234
 235     paintPreviewBox(panel);
 236 }
 237
 238
 239 static void
 240 setLanguageType(Panel *p, Bool multiByte)
 241 {
 242     if (multiByte) {
 243         WMMapWidget(p->fsetL);
 244         WMMapWidget(p->fsetLs);
 245         WMMapWidget(p->addB);
 246         WMMapWidget(p->editB);
 247         WMMapWidget(p->remB);
 248
 249         WMUnmapWidget(p->fontT);
 250         WMUnmapWidget(p->changeB);
 251     } else {
 252         WMUnmapWidget(p->fsetL);
 253         WMUnmapWidget(p->fsetLs);
 254         WMUnmapWidget(p->addB);
 255         WMUnmapWidget(p->editB);
 256         WMUnmapWidget(p->remB);
 257
 258         WMMapWidget(p->fontT);
 259         WMMapWidget(p->changeB);
 260     }
 261 }
 262
 263
 264
 265
 266
 267
 268 static void
 269 readFontEncodings(Panel *panel)
 270 {
 271     proplist_t pl = NULL;
 272     char *path;
 273     char *msg;
 274
 275     path = WMPathForResourceOfType("font.data", NULL);
 276     if (!path) {
 277         msg = _("Could not locate font information file WPrefs.app/font.data");
 278         goto error;
 279     }
 280
 281     pl = PLGetProplistWithPath(path);
 282     if (!pl) {
 283         msg = _("Could not read font information file WPrefs.app/font.data");
 284         goto error;
 285     } else {
 286         int i;
 287         proplist_t key = PLMakeString("Encodings");
 288         proplist_t array;
 289         WMMenuItem *mi;
 290
 291         array = PLGetDictionaryEntry(pl, key);
 292         PLRelease(key);
 293         if (!array || !PLIsArray(array)) {
 294             msg = _("Invalid data in font information file WPrefs.app/font.data.\n"
 295                     "Encodings data not found.");
 296             goto error;
 297         }
 298
 299         WMAddPopUpButtonItem(panel->langP, _("- Custom -"));
 300
 301         for (i = 0; i < PLGetNumberOfElements(array); i++) {
 302             proplist_t item, str;
 303
 304             item = PLGetArrayElement(array, i);
 305             str = PLGetArrayElement(item, 0);
 306             mi = WMAddPopUpButtonItem(panel->langP, PLGetString(str));
 307             WMSetMenuItemRepresentedObject(mi, PLRetain(item));
 308         }
 309
 310         key = PLMakeString("WindowTitleFont");
 311         DefaultWindowTitleFont = PLGetDictionaryEntry(pl, key);
 312         PLRelease(key);
 313
 314         key = PLMakeString("MenuTitleFont");
 315         DefaultMenuTitleFont = PLGetDictionaryEntry(pl, key);
 316         PLRelease(key);
 317
 318         key = PLMakeString("MenuTextFont");
 319         DefaultMenuTextFont = PLGetDictionaryEntry(pl, key);
 320         PLRelease(key);
 321     }
 322
 323     PLRelease(pl);
 324     return;
 325 error:
 326     if (pl)
 327         PLRelease(pl);
 328
 329     WMRunAlertPanel(WMWidgetScreen(panel->parent), panel->parent,
 330                     _("Error"), msg, _("OK"), NULL, NULL);
 331 }
 332
 333
 334
 335 static void
 336 changeLanguageAction(WMWidget *w, void *data)
 337 {
 338     /*Panel *panel = (Panel*)data;*/
 339     WMMenuItem *mi;
 340     proplist_t pl;
 341
 342     mi = WMGetPopUpButtonMenuItem(w, WMGetPopUpButtonSelectedItem(w));
 343     pl = WMGetMenuItemRepresentedObject(mi);
 344
 345     if (!pl) {
 346         /* custom */
 347     } else {
 348
 349     }
 350 }
 351
 352
 353 static void
 354 createPanel(Panel *p)
 355 {
 356     _Panel *panel = (_Panel*)p;
 357     WMScreen *scr = WMWidgetScreen(panel->parent);
 358
 359
 360     panel->box = WMCreateBox(panel->parent);
 361     WMSetViewExpandsToParent(WMWidgetView(panel->box), 2, 2, 0, 0);
 362
 363
 364     panel->prevL = WMCreateLabel(panel->box);
 365     WMResizeWidget(panel->prevL, 240, FRAME_HEIGHT-20);
 366     WMMoveWidget(panel->prevL, 15, 10);
 367     WMSetLabelRelief(panel->prevL, WRSunken);
 368     WMSetLabelImagePosition(panel->prevL, WIPImageOnly);
 369
 370
 371     /* language selection */
 372
 373     panel->langF = WMCreateFrame(panel->box);
 374     WMResizeWidget(panel->langF, 245, 50);
 375     WMMoveWidget(panel->langF, 265, 10);
 376     WMSetFrameTitle(panel->langF, _("Default Font Sets"));
 377
 378     panel->langP = WMCreatePopUpButton(panel->langF);
 379     WMResizeWidget(panel->langP, 215, 20);
 380     WMMoveWidget(panel->langP, 15, 20);
 381
 382     WMMapSubwidgets(panel->langF);
 383
 384
 385     /* multibyte */
 386     panel->fsetL = WMCreateLabel(panel->box);
 387     WMResizeWidget(panel->fsetL, 205, 20);
 388     WMMoveWidget(panel->fsetL, 215, 127);
 389     WMSetLabelText(panel->fsetL, _("Font Set"));
 390     WMSetLabelRelief(panel->fsetL, WRSunken);
 391     WMSetLabelTextAlignment(panel->fsetL, WACenter);
 392     {
 393         WMFont *font;
 394         WMColor *color;
 395
 396         color = WMDarkGrayColor(scr);
 397         font = WMBoldSystemFontOfSize(scr, 12);
 398
 399         WMSetWidgetBackgroundColor(panel->fsetL, color);
 400         WMSetLabelFont(panel->fsetL, font);
 401
 402         WMReleaseFont(font);
 403         WMReleaseColor(color);
 404
 405         color = WMWhiteColor(scr);
 406         WMSetLabelTextColor(panel->fsetL, color);
 407         WMReleaseColor(color);
 408     }
 409
 410     panel->fsetLs = WMCreateList(panel->box);
 411     WMResizeWidget(panel->fsetLs, 205, 71);
 412     WMMoveWidget(panel->fsetLs, 215, 149);
 413
 414
 415     panel->addB = WMCreateCommandButton(panel->box);
 416     WMResizeWidget(panel->addB, 80, 24);
 417     WMMoveWidget(panel->addB, 430, 127);
 418     WMSetButtonText(panel->addB, _("Add..."));
 419
 420     panel->editB = WMCreateCommandButton(panel->box);
 421     WMResizeWidget(panel->editB, 80, 24);
 422     WMMoveWidget(panel->editB, 430, 161);
 423     WMSetButtonText(panel->editB, _("Change..."));
 424
 425     panel->remB = WMCreateCommandButton(panel->box);
 426     WMResizeWidget(panel->remB, 80, 24);
 427     WMMoveWidget(panel->remB, 430, 195);
 428     WMSetButtonText(panel->remB, _("Remove"));
 429
 430     /* single byte */
 431     panel->fontT = WMCreateTextField(panel->box);
 432     WMResizeWidget(panel->fontT, 240, 20);
 433     WMMoveWidget(panel->fontT, 265, 130);
 434
 435     panel->changeB = WMCreateCommandButton(panel->box);
 436     WMResizeWidget(panel->changeB, 104, 24);
 437     WMMoveWidget(panel->changeB, 335, 160);
 438     WMSetButtonText(panel->changeB, _("Change..."));
 439
 440
 441     panel->black = WMBlackColor(scr);
 442     panel->white = WMWhiteColor(scr);
 443     panel->light = WMGrayColor(scr);
 444     panel->dark = WMDarkGrayColor(scr);
 445     panel->back = WMCreateRGBColor(scr, 0x5100, 0x5100, 0x7100, True);
 446
 447 #if 0
 448     for (i = 0; Languages[i].language != NULL; i++) {
 449         WMAddPopUpButtonItem(panel->langP, Languages[i].language);
 450     }
 451
 452     for (i = 0; Options[i].description != NULL; i++) {
 453         WMAddListItem(panel->settingLs, Options[i].description);
 454     }
 455 #endif
 456     WMRealizeWidget(panel->box);
 457     WMMapSubwidgets(panel->box);
 458
 459     setLanguageType(panel, False);
 460
 461     showData(panel);
 462
 463     readFontEncodings(panel);
 464 }
 465
 466
 467
 468
 469 Panel*
 470 InitFont(WMScreen *scr, WMWidget *parent)
 471 {
 472     _Panel *panel;
 473
 474     panel = wmalloc(sizeof(_Panel));
 475     memset(panel, 0, sizeof(_Panel));
 476
 477     panel->sectionName = _("Font Preferences");
 478     panel->description = _("Font Configurations for Windows, Menus etc");
 479
 480     panel->parent = parent;
 481
 482     panel->callbacks.createWidgets = createPanel;
 483
 484     AddSection(panel, ICON_FILE);
 485
 486     return panel;
 487 }
 488