src/dialog.c

   1 /* dialog.c - dialog windows for internal use
   2  *
   3  *  Window Maker window manager
   4  *
   5  *  Copyright (c) 1997, 1998 Alfredo K. Kojima
   6  *  Copyright (c) 1999       Dan Pascu
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License as published by
  10  *  the Free Software Foundation; either version 2 of the License, or
  11  *  (at your option) any later version.
  12  *
  13  *  This program is distributed in the hope that it will be useful,
  14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  *  GNU General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License
  19  *  along with this program; if not, write to the Free Software
  20  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  21  *  USA.
  22  */
  23
  24 #include "wconfig.h"
  25
  26 #include <X11/Xlib.h>
  27 #include <X11/Xutil.h>
  28 #include <X11/keysym.h>
  29
  30 #include <stdlib.h>
  31 #include <stdio.h>
  32 #include <unistd.h>
  33 #include <string.h>
  34 #include <sys/types.h>
  35 #include <sys/stat.h>
  36 #include <dirent.h>
  37 #include <limits.h>
  38
  39 #ifdef HAVE_MALLOC_H
  40 #include <malloc.h>
  41 #endif
  42
  43 #include <signal.h>
  44 #ifdef __FreeBSD__
  45 #include <sys/signal.h>
  46 #endif
  47
  48
  49 #ifndef PATH_MAX
  50 #define PATH_MAX DEFAULT_PATH_MAX
  51 #endif
  52
  53 #include "WindowMaker.h"
  54 #include "GNUstep.h"
  55 #include "screen.h"
  56 #include "dialog.h"
  57 #include "funcs.h"
  58 #include "stacking.h"
  59 #include "framewin.h"
  60 #include "window.h"
  61 #include "actions.h"
  62 #include "defaults.h"
  63
  64
  65 extern WPreferences wPreferences;
  66
  67
  68
  69 int
  70 wMessageDialog(WScreen *scr, char *title, char *message,
  71                char *defBtn, char *altBtn, char *othBtn)
  72 {
  73     WMAlertPanel *panel;
  74     Window parent;
  75     WWindow *wwin;
  76     int result;
  77
  78     panel = WMCreateAlertPanel(scr->wmscreen, NULL, title, message,
  79                                defBtn, altBtn, othBtn);
  80
  81     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 400, 180, 0, 0, 0);
  82
  83     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
  84
  85     wwin = wManageInternalWindow(scr, parent, None, NULL,
  86                                  (scr->scr_width - 400)/2,
  87                                  (scr->scr_height - 180)/2, 400, 180);
  88     wwin->client_leader = WMWidgetXID(panel->win);
  89
  90     WMMapWidget(panel->win);
  91
  92     wWindowMap(wwin);
  93
  94     while (!panel->done) {
  95         XEvent event;
  96
  97         WMNextEvent(dpy, &event);
  98         WMHandleEvent(&event);
  99     }
 100
 101     result = panel->result;
 102
 103     WMUnmapWidget(panel->win);
 104
 105     wUnmanageWindow(wwin, False, False);
 106
 107     WMDestroyAlertPanel(panel);
 108
 109     XDestroyWindow(dpy, parent);
 110
 111     return result;
 112 }
 113
 114
 115
 116 int
 117 wInputDialog(WScreen *scr, char *title, char *message, char **text)
 118 {
 119     WWindow *wwin;
 120     Window parent;
 121     WMInputPanel *panel;
 122     char *result;
 123
 124
 125     panel = WMCreateInputPanel(scr->wmscreen, NULL, title, message, *text,
 126                                _("OK"), _("Cancel"));
 127
 128
 129     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 320, 160, 0, 0, 0);
 130     XSelectInput(dpy, parent, KeyPressMask|KeyReleaseMask);
 131
 132     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
 133
 134     wwin = wManageInternalWindow(scr, parent, None, NULL,
 135                                  (scr->scr_width - 320)/2,
 136                                  (scr->scr_height - 160)/2, 320, 160);
 137
 138     wwin->client_leader = WMWidgetXID(panel->win);
 139
 140     WMMapWidget(panel->win);
 141
 142     wWindowMap(wwin);
 143
 144     while (!panel->done) {
 145         XEvent event;
 146
 147         WMNextEvent(dpy, &event);
 148         WMHandleEvent(&event);
 149     }
 150
 151     if (panel->result == WAPRDefault)
 152         result = WMGetTextFieldText(panel->text);
 153     else
 154         result = NULL;
 155
 156     wUnmanageWindow(wwin, False, False);
 157
 158     WMDestroyInputPanel(panel);
 159
 160     XDestroyWindow(dpy, parent);
 161
 162     if (result==NULL)
 163         return False;
 164     else {
 165         if (*text)
 166             wfree(*text);
 167         *text = result;
 168
 169         return True;
 170     }
 171 }
 172
 173
 174 /*
 175  *****************************************************************
 176  * Icon Selection Panel
 177  *****************************************************************
 178  */
 179
 180 typedef struct IconPanel {
 181
 182     WScreen *scr;
 183
 184     WMWindow *win;
 185
 186     WMLabel *dirLabel;
 187     WMLabel *iconLabel;
 188
 189     WMList *dirList;
 190     WMList *iconList;
 191     WMFont *normalfont;
 192
 193     WMButton *previewButton;
 194
 195     WMLabel *iconView;
 196
 197     WMLabel *fileLabel;
 198     WMTextField *fileField;
 199
 200     WMButton *okButton;
 201     WMButton *cancelButton;
 202 #if 0
 203     WMButton *chooseButton;
 204 #endif
 205     short done;
 206     short result;
 207     short preview;
 208 } IconPanel;
 209
 210
 211
 212 static void
 213 listPixmaps(WScreen *scr, WMList *lPtr, char *path)
 214 {
 215     struct dirent *dentry;
 216     DIR *dir;
 217     char pbuf[PATH_MAX+16];
 218     char *apath;
 219     IconPanel *panel = WMGetHangedData(lPtr);
 220
 221     panel->preview = False;
 222
 223     apath = wexpandpath(path);
 224     dir = opendir(apath);
 225
 226     if (!dir) {
 227         char *msg;
 228         char *tmp;
 229         tmp = _("Could not open directory ");
 230         msg = wmalloc(strlen(tmp)+strlen(path)+6);
 231         strcpy(msg, tmp);
 232         strcat(msg, path);
 233
 234         wMessageDialog(scr, _("Error"), msg, _("OK"), NULL, NULL);
 235         wfree(msg);
 236         wfree(apath);
 237         return;
 238     }
 239
 240     /* list contents in the column */
 241     while ((dentry = readdir(dir))) {
 242         struct stat statb;
 243
 244         if (strcmp(dentry->d_name, ".")==0 ||
 245             strcmp(dentry->d_name, "..")==0)
 246             continue;
 247
 248         strcpy(pbuf, apath);
 249         strcat(pbuf, "/");
 250         strcat(pbuf, dentry->d_name);
 251
 252         if (stat(pbuf, &statb)<0)
 253             continue;
 254
 255         if (statb.st_mode & (S_IRUSR|S_IRGRP|S_IROTH)
 256             && statb.st_mode & (S_IFREG|S_IFLNK)) {
 257             WMAddListItem(lPtr, dentry->d_name);
 258         }
 259     }
 260     WMSortListItems(lPtr);
 261
 262     closedir(dir);
 263     wfree(apath);
 264     panel->preview = True;
 265 }
 266
 267
 268
 269 static void
 270 setViewedImage(IconPanel *panel, char *file)
 271 {
 272     WMPixmap *pixmap;
 273     RColor color;
 274
 275     color.red = 0xae;
 276     color.green = 0xaa;
 277     color.blue = 0xae;
 278     color.alpha = 0;
 279     pixmap = WMCreateBlendedPixmapFromFile(WMWidgetScreen(panel->win),
 280                                            file, &color);
 281     if (!pixmap) {
 282         WMSetButtonEnabled(panel->okButton, False);
 283
 284         WMSetLabelText(panel->iconView, _("Could not load image file "));
 285
 286         WMSetLabelImage(panel->iconView, NULL);
 287     } else {
 288         WMSetButtonEnabled(panel->okButton, True);
 289
 290         WMSetLabelText(panel->iconView, NULL);
 291         WMSetLabelImage(panel->iconView, pixmap);
 292         WMReleasePixmap(pixmap);
 293     }
 294 }
 295
 296
 297 static void
 298 listCallback(void *self, void *data)
 299 {
 300     WMList *lPtr = (WMList*)self;
 301     IconPanel *panel = (IconPanel*)data;
 302     char *path;
 303
 304     if (lPtr==panel->dirList) {
 305         path = WMGetListSelectedItem(lPtr)->text;
 306
 307         WMSetTextFieldText(panel->fileField, path);
 308
 309         WMSetLabelImage(panel->iconView, NULL);
 310
 311         WMSetButtonEnabled(panel->okButton, False);
 312
 313         WMClearList(panel->iconList);
 314         listPixmaps(panel->scr, panel->iconList, path);
 315     } else {
 316         char *tmp, *iconFile;
 317
 318         path = WMGetListSelectedItem(panel->dirList)->text;
 319         tmp = wexpandpath(path);
 320
 321         iconFile = WMGetListSelectedItem(panel->iconList)->text;
 322
 323         path = wmalloc(strlen(tmp)+strlen(iconFile)+4);
 324         strcpy(path, tmp);
 325         strcat(path, "/");
 326         strcat(path, iconFile);
 327         wfree(tmp);
 328         WMSetTextFieldText(panel->fileField, path);
 329         setViewedImage(panel, path);
 330         wfree(path);
 331     }
 332 }
 333
 334
 335 static void
 336 listIconPaths(WMList *lPtr)
 337 {
 338     char *paths;
 339     char *path;
 340
 341     paths = wstrdup(wPreferences.icon_path);
 342
 343     path = strtok(paths, ":");
 344
 345     do {
 346         char *tmp;
 347
 348         tmp = wexpandpath(path);
 349         /* do not sort, because the order implies the order of
 350          * directories searched */
 351         if (access(tmp, X_OK)==0)
 352             WMAddListItem(lPtr, path);
 353         wfree(tmp);
 354     } while ((path=strtok(NULL, ":"))!=NULL);
 355
 356     wfree(paths);
 357 }
 358
 359
 360 void
 361 drawIconProc(WMList *lPtr, int index, Drawable d, char *text,
 362              int state, WMRect *rect)
 363 {
 364     IconPanel *panel = WMGetHangedData(lPtr);
 365     GC gc = panel->scr->draw_gc;
 366     GC copygc = panel->scr->copy_gc;
 367     char *buffer, *dirfile;
 368     WMPixmap *pixmap;
 369     WMColor *blackcolor;
 370     WMColor *whitecolor;
 371     WMSize size;
 372     WMScreen *wmscr=WMWidgetScreen(panel->win);
 373     int width;
 374
 375     if(!panel->preview) return;
 376
 377     width = rect->size.width;
 378
 379     blackcolor = WMBlackColor(wmscr);
 380     whitecolor = WMWhiteColor(wmscr);
 381
 382     dirfile = wexpandpath(WMGetListSelectedItem(panel->dirList)->text);
 383     buffer = wmalloc(strlen(dirfile)+strlen(text)+4);
 384     sprintf(buffer, "%s/%s", dirfile, text);
 385     wfree(dirfile);
 386
 387     pixmap = WMCreatePixmapFromFile(WMWidgetScreen(panel->win), buffer);
 388     wfree(buffer);
 389     if (!pixmap) {
 390         WMRemoveListItem(lPtr, index);
 391         return;
 392     }
 393
 394     XClearArea(dpy, d, rect->pos.x, rect->pos.y, width, rect->size.height,
 395                False);
 396     XSetClipMask(dpy, gc, None);
 397     /*
 398     XDrawRectangle(dpy, d, WMColorGC(whitecolor), rect->pos.x + 5,
 399                    rect->pos.y +5, width - 10, 54);
 400      */
 401     XDrawLine(dpy, d, WMColorGC(whitecolor), rect->pos.x,
 402               rect->pos.y+rect->size.height-1, rect->pos.x+width,
 403               rect->pos.y+rect->size.height-1);
 404
 405
 406     if (state&WLDSSelected) {
 407         XFillRectangle(dpy, d, WMColorGC(whitecolor), rect->pos.x,
 408                        rect->pos.y, width, rect->size.height);
 409     }
 410
 411     size = WMGetPixmapSize(pixmap);
 412
 413     XSetClipMask(dpy, copygc, WMGetPixmapMaskXID(pixmap));
 414     XSetClipOrigin(dpy, copygc, rect->pos.x + (width-size.width)/2,
 415                    rect->pos.y+2);
 416     XCopyArea(dpy, WMGetPixmapXID(pixmap), d, copygc, 0, 0,
 417               size.width>100?100:size.width, size.height>64?64:size.height,
 418               rect->pos.x + (width-size.width)/2, rect->pos.y+2);
 419
 420     {
 421         int i,j;
 422         int fheight = WMFontHeight(panel->normalfont);
 423         int tlen = strlen(text);
 424         int twidth = WMWidthOfString(panel->normalfont, text, tlen);
 425         int ofx, ofy;
 426
 427         ofx = rect->pos.x + (width - twidth)/2;
 428         ofy = rect->pos.y + 64 - fheight;
 429
 430         for(i=-1;i<2;i++)
 431             for(j=-1;j<2;j++)
 432                 WMDrawString(wmscr, d, WMColorGC(whitecolor),
 433                              panel->normalfont, ofx+i, ofy+j,
 434                              text, tlen);
 435
 436         WMDrawString(wmscr, d, WMColorGC(blackcolor), panel->normalfont,
 437                      ofx, ofy, text, tlen);
 438     }
 439
 440     WMReleasePixmap(pixmap);
 441     /* I hope it is better to do not use cache / on my box it is fast nuff */
 442     XFlush(dpy);
 443
 444     WMReleaseColor(blackcolor);
 445     WMReleaseColor(whitecolor);
 446 }
 447
 448
 449 static void
 450 buttonCallback(void *self, void *clientData)
 451 {
 452     WMButton *bPtr = (WMButton*)self;
 453     IconPanel *panel = (IconPanel*)clientData;
 454
 455
 456     if (bPtr==panel->okButton) {
 457         panel->done = True;
 458         panel->result = True;
 459     } else if (bPtr==panel->cancelButton) {
 460         panel->done = True;
 461         panel->result = False;
 462     } else if (bPtr==panel->previewButton) {
 463         /**** Previewer ****/
 464         WMSetButtonEnabled(bPtr, False);
 465         WMSetListUserDrawItemHeight(panel->iconList, 68);
 466         WMSetListUserDrawProc(panel->iconList, drawIconProc);
 467         WMRedisplayWidget(panel->iconList);
 468         /* for draw proc to access screen/gc */
 469         /*** end preview ***/
 470     }
 471 #if 0
 472     else if (bPtr==panel->chooseButton) {
 473         WMOpenPanel *op;
 474
 475         op = WMCreateOpenPanel(WMWidgetScreen(bPtr));
 476
 477         if (WMRunModalFilePanelForDirectory(op, NULL, "/usr/local", NULL, NULL)) {
 478             char *path;
 479             path = WMGetFilePanelFile(op);
 480             WMSetTextFieldText(panel->fileField, path);
 481             setViewedImage(panel, path);
 482             wfree(path);
 483         }
 484         WMDestroyFilePanel(op);
 485     }
 486 #endif
 487 }
 488
 489
 490 Bool
 491 wIconChooserDialog(WScreen *scr, char **file, char *instance, char *class)
 492 {
 493     WWindow *wwin;
 494     Window parent;
 495     IconPanel *panel;
 496     WMColor *color;
 497     WMFont *boldFont;
 498
 499     panel = wmalloc(sizeof(IconPanel));
 500     memset(panel, 0, sizeof(IconPanel));
 501
 502     panel->scr = scr;
 503
 504     panel->win = WMCreateWindow(scr->wmscreen, "iconChooser");
 505     WMResizeWidget(panel->win, 450, 280);
 506
 507     boldFont = WMBoldSystemFontOfSize(scr->wmscreen, 12);
 508     panel->normalfont = WMSystemFontOfSize(WMWidgetScreen(panel->win), 12);
 509
 510     panel->dirLabel = WMCreateLabel(panel->win);
 511     WMResizeWidget(panel->dirLabel, 200, 20);
 512     WMMoveWidget(panel->dirLabel, 10, 7);
 513     WMSetLabelText(panel->dirLabel, _("Directories"));
 514     WMSetLabelFont(panel->dirLabel, boldFont);
 515     WMSetLabelTextAlignment(panel->dirLabel, WACenter);
 516
 517     WMSetLabelRelief(panel->dirLabel, WRSunken);
 518
 519     panel->iconLabel = WMCreateLabel(panel->win);
 520     WMResizeWidget(panel->iconLabel, 140, 20);
 521     WMMoveWidget(panel->iconLabel, 215, 7);
 522     WMSetLabelText(panel->iconLabel, _("Icons"));
 523     WMSetLabelFont(panel->iconLabel, boldFont);
 524     WMSetLabelTextAlignment(panel->iconLabel, WACenter);
 525
 526     WMReleaseFont(boldFont);
 527
 528     color = WMWhiteColor(scr->wmscreen);
 529     WMSetLabelTextColor(panel->dirLabel, color);
 530     WMSetLabelTextColor(panel->iconLabel, color);
 531     WMReleaseColor(color);
 532
 533     color = WMDarkGrayColor(scr->wmscreen);
 534     WMSetWidgetBackgroundColor(panel->iconLabel, color);
 535     WMSetWidgetBackgroundColor(panel->dirLabel, color);
 536     WMReleaseColor(color);
 537
 538     WMSetLabelRelief(panel->iconLabel, WRSunken);
 539
 540     panel->dirList = WMCreateList(panel->win);
 541     WMResizeWidget(panel->dirList, 200, 170);
 542     WMMoveWidget(panel->dirList, 10, 30);
 543     WMSetListAction(panel->dirList, listCallback, panel);
 544
 545     panel->iconList = WMCreateList(panel->win);
 546     WMResizeWidget(panel->iconList, 140, 170);
 547     WMMoveWidget(panel->iconList, 215, 30);
 548     WMSetListAction(panel->iconList, listCallback, panel);
 549
 550     WMHangData(panel->iconList,panel);
 551
 552     panel->previewButton = WMCreateCommandButton(panel->win);
 553     WMResizeWidget(panel->previewButton, 75, 26);
 554     WMMoveWidget(panel->previewButton, 365, 130);
 555     WMSetButtonText(panel->previewButton, _("Preview"));
 556     WMSetButtonAction(panel->previewButton, buttonCallback, panel);
 557
 558     panel->iconView = WMCreateLabel(panel->win);
 559     WMResizeWidget(panel->iconView, 75, 75);
 560     WMMoveWidget(panel->iconView, 365, 40);
 561     WMSetLabelImagePosition(panel->iconView, WIPOverlaps);
 562     WMSetLabelRelief(panel->iconView, WRSunken);
 563     WMSetLabelTextAlignment(panel->iconView, WACenter);
 564
 565     panel->fileLabel = WMCreateLabel(panel->win);
 566     WMResizeWidget(panel->fileLabel, 80, 20);
 567     WMMoveWidget(panel->fileLabel, 10, 210);
 568     WMSetLabelText(panel->fileLabel, _("File Name:"));
 569
 570     panel->fileField = WMCreateTextField(panel->win);
 571     WMResizeWidget(panel->fileField, 345, 20);
 572     WMMoveWidget(panel->fileField, 95, 210);
 573     WMSetTextFieldEditable(panel->fileField, False);
 574
 575     panel->okButton = WMCreateCommandButton(panel->win);
 576     WMResizeWidget(panel->okButton, 80, 26);
 577     WMMoveWidget(panel->okButton, 360, 240);
 578     WMSetButtonText(panel->okButton, _("OK"));
 579     WMSetButtonEnabled(panel->okButton, False);
 580     WMSetButtonAction(panel->okButton, buttonCallback, panel);
 581
 582     panel->cancelButton = WMCreateCommandButton(panel->win);
 583     WMResizeWidget(panel->cancelButton, 80, 26);
 584     WMMoveWidget(panel->cancelButton, 270, 240);
 585     WMSetButtonText(panel->cancelButton, _("Cancel"));
 586     WMSetButtonAction(panel->cancelButton, buttonCallback, panel);
 587 #if 0
 588     panel->chooseButton = WMCreateCommandButton(panel->win);
 589     WMResizeWidget(panel->chooseButton, 110, 26);
 590     WMMoveWidget(panel->chooseButton, 150, 240);
 591     WMSetButtonText(panel->chooseButton, _("Choose File"));
 592     WMSetButtonAction(panel->chooseButton, buttonCallback, panel);
 593 #endif
 594     WMRealizeWidget(panel->win);
 595     WMMapSubwidgets(panel->win);
 596
 597     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 450, 280, 0, 0, 0);
 598
 599     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
 600
 601     {
 602         char *tmp;
 603
 604         tmp = wmalloc((instance ? strlen(instance) : 0)
 605                      + (class ? strlen(class) : 0) + 32);
 606
 607         if (tmp && (instance || class))
 608             sprintf(tmp, "%s [%s.%s]", _("Icon Chooser"), instance, class);
 609         else
 610             strcpy(tmp, _("Icon Chooser"));
 611
 612         wwin = wManageInternalWindow(scr, parent, None, tmp,
 613                                      (scr->scr_width - 450)/2,
 614                                      (scr->scr_height - 280)/2, 450, 280);
 615         wfree(tmp);
 616     }
 617
 618     /* put icon paths in the list */
 619     listIconPaths(panel->dirList);
 620
 621     WMMapWidget(panel->win);
 622
 623     wWindowMap(wwin);
 624
 625     while (!panel->done) {
 626         XEvent event;
 627
 628         WMNextEvent(dpy, &event);
 629         WMHandleEvent(&event);
 630     }
 631
 632     if (panel->result) {
 633         char *defaultPath, *wantedPath;
 634
 635         /* check if the file the user selected is not the one that
 636          * would be loaded by default with the current search path */
 637         *file = WMGetListSelectedItem(panel->iconList)->text;
 638         if ((*file)[0]==0) {
 639             wfree(*file);
 640             *file = NULL;
 641         } else {
 642             defaultPath = FindImage(wPreferences.icon_path, *file);
 643             wantedPath = WMGetTextFieldText(panel->fileField);
 644             /* if the file is not the default, use full path */
 645             if (strcmp(wantedPath, defaultPath)!=0) {
 646                 *file = wantedPath;
 647             } else {
 648                 *file = wstrdup(*file);
 649                 wfree(wantedPath);
 650             }
 651             wfree(defaultPath);
 652         }
 653     } else {
 654         *file = NULL;
 655     }
 656
 657     WMReleaseFont(panel->normalfont);
 658
 659     WMUnmapWidget(panel->win);
 660
 661     WMDestroyWidget(panel->win);
 662
 663     wUnmanageWindow(wwin, False, False);
 664
 665     wfree(panel);
 666
 667     XDestroyWindow(dpy, parent);
 668
 669     return panel->result;
 670 }
 671
 672
 673 /*
 674  ***********************************************************************
 675  * Info Panel
 676  ***********************************************************************
 677  */
 678
 679
 680 typedef struct {
 681     WScreen *scr;
 682
 683     WWindow *wwin;
 684
 685     WMWindow *win;
 686
 687     WMLabel *logoL;
 688     WMLabel *name1L;
 689     WMLabel *name2L;
 690
 691     WMLabel *versionL;
 692
 693     WMLabel *infoL;
 694
 695     WMLabel *copyrL;
 696
 697 #ifdef SILLYNESS
 698     WMHandlerID timer;
 699     int cycle;
 700     RImage *icon;
 701     RImage *pic;
 702     WMPixmap *oldPix;
 703     char *str;
 704     int x;
 705 #endif
 706 } InfoPanel;
 707
 708
 709
 710 #define COPYRIGHT_TEXT  \
 711      "Copyright \xa9 1997~2000 Alfredo K. Kojima <kojima@windowmaker.org>\n"\
 712      "Copyright \xa9 1998~2000 Dan Pascu <dan@windowmaker.org>"
 713
 714
 715
 716 static InfoPanel *thePanel = NULL;
 717
 718 static void
 719 destroyInfoPanel(WCoreWindow *foo, void *data, XEvent *event)
 720 {
 721 #ifdef SILLYNESS
 722     if (thePanel->timer) {
 723         WMDeleteTimerHandler(thePanel->timer);
 724     }
 725     if (thePanel->oldPix) {
 726         WMReleasePixmap(thePanel->oldPix);
 727     }
 728     if (thePanel->icon) {
 729         RDestroyImage(thePanel->icon);
 730     }
 731     if (thePanel->pic) {
 732         RDestroyImage(thePanel->pic);
 733     }
 734 #endif /* SILLYNESS */
 735     WMUnmapWidget(thePanel);
 736
 737     wUnmanageWindow(thePanel->wwin, False, False);
 738
 739     WMDestroyWidget(thePanel->win);
 740
 741     wfree(thePanel);
 742
 743     thePanel = NULL;
 744 }
 745
 746
 747 WMPixmap*
 748 renderText(WMScreen *scr, char *text, char *font, RColor *from, RColor *to)
 749 {
 750     WMPixmap *wpix = NULL;
 751     Pixmap grad = None;
 752     Pixmap mask = None;
 753     RContext *rc = WMScreenRContext(scr);
 754     XFontStruct *f = NULL;
 755     int w, h;
 756     GC gc = None;
 757
 758     f = XLoadQueryFont(dpy, font);
 759     if (!f)
 760         return NULL;
 761
 762     w = XTextWidth(f, text, strlen(text));
 763     h = f->ascent+f->descent;
 764
 765     mask = XCreatePixmap(dpy, rc->drawable, w, h, 1);
 766     gc = XCreateGC(dpy, mask, 0, NULL);
 767     XSetForeground(dpy, gc, 0);
 768     XSetFont(dpy, gc, f->fid);
 769     XFillRectangle(dpy, mask, gc, 0, 0, w, h);
 770
 771     XSetForeground(dpy, gc, 1);
 772     XDrawString(dpy, mask, gc, 0, f->ascent, text, strlen(text));
 773     XSetLineAttributes(dpy, gc, 3, LineSolid, CapRound, JoinMiter);
 774     XDrawLine(dpy, mask, gc, 0, h-2, w, h-2);
 775
 776     grad = XCreatePixmap(dpy, rc->drawable, w, h, rc->depth);
 777     {
 778         WMColor *color;
 779
 780         color = WMBlackColor(scr);
 781         XFillRectangle(dpy, grad, WMColorGC(color), 0, 0, w, h);
 782         WMReleaseColor(color);
 783     }
 784
 785     wpix = WMCreatePixmapFromXPixmaps(scr, grad, mask, w, h, rc->depth);
 786
 787     if (gc)
 788         XFreeGC(dpy, gc);
 789     XFreeFont(dpy, f);
 790
 791     return wpix;
 792 }
 793
 794 #ifdef SILLYNESS
 795
 796 extern WMPixmap *DoXThing();
 797 extern Bool InitXThing();
 798
 799 static void
 800 logoPushCallback(void *data)
 801 {
 802     InfoPanel *panel = (InfoPanel*)data;
 803     char buffer[512];
 804     int i;
 805     int len;
 806     static int jingobeu[] = {
 807         329, 150, -1, 100, 329, 150, -1, 100, 329, 300, -1, 250,
 808             329, 150, -1, 100, 329, 150, -1, 100,  329, 300, -1, 250,
 809             329, 150, 392, 150, 261, 150, 293, 150, 329, 400, -1, 400, 0
 810     };
 811     static int c = 0;
 812
 813     if (panel->x) {
 814         XKeyboardControl kc;
 815
 816         if (panel->x > 0) {
 817             if(jingobeu[panel->x-1]==0){panel->x=-1;}else if(jingobeu[panel->x
 818 -1]<0){panel->x++;c=jingobeu[panel->x-1]/50;panel->x++;}else if(c==0){
 819     kc.bell_pitch=jingobeu[panel->x-1];panel->x++;kc.bell_percent=50;c=
 820         jingobeu[panel->x-1]/50;kc.bell_duration=jingobeu[panel->x-1];panel->x++;
 821 XChangeKeyboardControl(dpy,KBBellPitch|KBBellDuration|KBBellPercent,&kc);
 822     XBell(dpy,50);XFlush(dpy);}else{c--;}}
 823         if (!(panel->cycle % 4)) {
 824             WMPixmap *p;
 825
 826             p = DoXThing(panel->wwin);
 827             WMSetLabelImage(panel->logoL, p);
 828         }
 829     } else if (panel->cycle < 30) {
 830         RImage *image;
 831         WMPixmap *pix;
 832
 833         image = RCloneImage(panel->icon);
 834         RCombineImagesWithOpaqueness(image, panel->pic, panel->cycle*255/30);
 835         pix = WMCreatePixmapFromRImage(panel->scr->wmscreen, image, 128);
 836         RDestroyImage(image);
 837         WMSetLabelImage(panel->logoL, pix);
 838         WMReleasePixmap(pix);
 839     }
 840
 841     i = panel->cycle%200;
 842
 843     len = strlen(panel->str);
 844
 845     strncpy(buffer, panel->str, i<len ? i : len);
 846     if (i >= len)
 847         memset(&buffer[len], ' ', i-len);
 848
 849     strncpy(buffer, panel->str, i<len ? i : len);
 850     if (i >= len)
 851         memset(&buffer[len], ' ', i-len);
 852     buffer[i]=0;
 853     WMSetLabelText(panel->versionL, buffer);
 854
 855     panel->timer = WMAddTimerHandler(50, logoPushCallback, panel);
 856     panel->cycle++;
 857 }
 858
 859
 860 static void
 861 handleLogoPush(XEvent *event, void *data)
 862 {
 863     InfoPanel *panel = (InfoPanel*)data;
 864     static int broken = 0;
 865     static int clicks = 0;
 866     static char *pic_data[] = {
 867 "45 45 57 1",
 868 "       c None",
 869 ".      c #000000",
 870 "X      c #383C00",
 871 "o      c #515500",
 872 "O      c #616100",
 873 "+      c #616900",
 874 "@      c #696D00",
 875 "#      c #697100",
 876 "$      c #495100",
 877 "%      c #202800",
 878 "&      c #969600",
 879 "*      c #CFCF00",
 880 "=      c #D7DB00",
 881 "-      c #D7D700",
 882 ";      c #C7CB00",
 883 ":      c #A6AA00",
 884 ">      c #494900",
 885 ",      c #8E8E00",
 886 "<      c #DFE700",
 887 "1      c #F7FF00",
 888 "2      c #FFFF00",
 889 "3      c #E7EB00",
 890 "4      c #B6B600",
 891 "5      c #595900",
 892 "6      c #717500",
 893 "7      c #AEB200",
 894 "8      c #CFD300",
 895 "9      c #E7EF00",
 896 "0      c #EFF300",
 897 "q      c #9EA200",
 898 "w      c #F7FB00",
 899 "e      c #F7F700",
 900 "r      c #BEBE00",
 901 "t      c #8E9200",
 902 "y      c #EFF700",
 903 "u      c #969A00",
 904 "i      c #414500",
 905 "p      c #595D00",
 906 "a      c #E7E700",
 907 "s      c #C7C700",
 908 "d      c #797D00",
 909 "f      c #BEC300",
 910 "g      c #DFE300",
 911 "h      c #868600",
 912 "j      c #EFEF00",
 913 "k      c #9E9E00",
 914 "l      c #616500",
 915 "z      c #DFDF00",
 916 "x      c #868A00",
 917 "c      c #969200",
 918 "v      c #B6BA00",
 919 "b      c #A6A600",
 920 "n      c #8E8A00",
 921 "m      c #717100",
 922 "M      c #AEAE00",
 923 "N      c #AEAA00",
 924 "B      c #868200",
 925 "               ...............               ",
 926 "             ....XoO+@##+O$%....             ",
 927 "           ...%X&*========-;;:o...           ",
 928 "         ...>.>,<122222222222134@...         ",
 929 "        ..>5678912222222222222220q%..        ",
 930 "       ..$.&-w2222222222222222222er>..       ",
 931 "      ..O.t31222222222222222222222y4>..      ",
 932 "    ...O5u3222222222222222222222222yri...    ",
 933 "    ..>p&a22222222222222222222222222wso..    ",
 934 "   ..ids91222222222222222222222222222wfi..   ",
 935 "  ..X.7w222222wgs-w2222222213=g0222222<hi..  ",
 936 "  ..Xuj2222222<@X5=222222229k@l:022222y4i..  ",
 937 "  .Xdz22222222*X%.s22222222axo%$-222222<c>.. ",
 938 " ..o7y22222222v...r222222223hX.i82222221si.. ",
 939 "..io*222222222&...u22222222yt..%*22222220:%. ",
 940 "..>k02222222227...f222222222v..X=222222229t. ",
 941 "..dz12222222220ui:y2222222223d%qw222222221g. ",
 942 ".%vw222222222221y2222222222219*y2222222222wd.",
 943 ".X;2222222222222222222222222222222222222222b.",
 944 ".i*2222222222222222222222222222222222222222v.",
 945 ".i*2222222222222222222222222222222222222222;.",
 946 ".i*22222222222222222222222222222222222222228.",
 947 ".>*2222222222222222222222222222222222222222=.",
 948 ".i*22222222222222222222222222222222222222228.",
 949 ".i*2222222222222222222222222222222222222222;.",
 950 ".X*222222222222222222222222222222we12222222r.",
 951 ".Xs12222222w3aw22222222222222222y8s0222222wk.",
 952 ".Xq02222222a,na22222222222222222zm6zwy2222gi.",
 953 "..>*22222y<:Xcj22222222222222222-o$k;;02228..",
 954 "..i7y2220rhX.:y22222222222222222jtiXd,a220,..",
 955 " .X@z222a,do%kj2222222222222222wMX5q;gw228%..",
 956 " ..58222wagsh6ry222222222222221;>Of0w222y:...",
 957 " ...:e2222218mdz22222222222222a&$vw222220@...",
 958 " ...O-122222y:.u02222222222229q$uj222221r... ",
 959 "  ..%&a1222223&573w2222222219NOxz122221z>... ",
 960 "   ...t3222221-l$nr8ay1222yzbo,=12222w-5...  ",
 961 "    ..X:022222w-k+>o,7s**s7xOn=12221<f5...   ",
 962 "     ..o:9222221j8:&Bl>>>>ihv<12221=dX...    ",
 963 "      ..Xb9122222109g-****;<y22221zn%...     ",
 964 "       ..X&801222222222222222222w-h....      ",
 965 "        ...o:=022222222222222221=lX...       ",
 966 "          ..X@:;3w2222222222210fO...         ",
 967 "           ...XX&v8<30000003-N@...           ",
 968 "             .....XmnbN:q&Bo....             ",
 969 "                 ............                "};
 970     static char *msgs[] = {
 971             "Have a nice day!"
 972     };
 973
 974
 975     clicks++;
 976     if (!panel->timer && !broken && clicks > 0) {
 977         char *file;
 978         char *path;
 979
 980         panel->x = 0;
 981         clicks = 0;
 982         if (!panel->icon) {
 983             file = wDefaultGetIconFile(panel->scr, "Logo", "WMPanel", False);
 984             if (!file) {
 985                 broken = 1;
 986                 return;
 987             }
 988
 989             path = FindImage(wPreferences.icon_path, file);
 990             if (!path) {
 991                 broken = 1;
 992                 return;
 993             }
 994
 995             panel->icon = RLoadImage(panel->scr->rcontext, path, 0);
 996             wfree(path);
 997             if (!panel->icon) {
 998                 broken = 1;
 999                 return;
1000             }
1001         }
1002         if (!panel->pic) {
1003             panel->pic = RGetImageFromXPMData(panel->scr->rcontext, pic_data);
1004             if (!panel->pic || panel->icon->width!=panel->pic->width
1005                 || panel->icon->height!=panel->pic->height) {
1006                 broken = 1;
1007                 RDestroyImage(panel->icon);
1008                 panel->icon = NULL;
1009                 if (panel->pic) {
1010                     RDestroyImage(panel->pic);
1011                     panel->pic = NULL;
1012                 }
1013                 return;
1014             }
1015
1016             {
1017                 RColor color;
1018                 color.red = 0xae;
1019                 color.green = 0xaa;
1020                 color.blue = 0xae;
1021                 color.alpha = 255;
1022                 RCombineImageWithColor(panel->icon, &color);
1023                 RCombineImageWithColor(panel->pic, &color);
1024             }
1025         }
1026
1027         panel->str = msgs[rand()%(sizeof(msgs)/sizeof(char*))];
1028
1029         panel->timer = WMAddTimerHandler(50, logoPushCallback, panel);
1030         panel->cycle = 0;
1031         panel->oldPix = WMRetainPixmap(WMGetLabelImage(panel->logoL));
1032     } else if (panel->timer) {
1033         char version[20];
1034
1035         panel->x = 0;
1036         clicks = 0;
1037         WMSetLabelImage(panel->logoL, panel->oldPix);
1038         WMReleasePixmap(panel->oldPix);
1039         panel->oldPix = NULL;
1040
1041         WMDeleteTimerHandler(panel->timer);
1042         panel->timer = NULL;
1043
1044         sprintf(version, "Version %s", VERSION);
1045         WMSetLabelText(panel->versionL, version);
1046     }
1047
1048     {
1049         XEvent ev;
1050         while (XCheckTypedWindowEvent(dpy, WMWidgetXID(panel->versionL),
1051                                       ButtonPress, &ev));
1052     }
1053 }
1054 #endif /* SILLYNESS */
1055
1056
1057 void
1058 wShowInfoPanel(WScreen *scr)
1059 {
1060     InfoPanel *panel;
1061     WMPixmap *logo;
1062     WMSize size;
1063     WMFont *font;
1064     char version[32];
1065     char buffer[512];
1066     Window parent;
1067     WWindow *wwin;
1068     RColor color1, color2;
1069     char **strl;
1070     int i;
1071     char *visuals[] = {
1072         "StaticGray",
1073             "GrayScale",
1074             "StaticColor",
1075             "PseudoColor",
1076             "TrueColor",
1077             "DirectColor"
1078     };
1079
1080
1081     if (thePanel) {
1082         if (thePanel->scr == scr) {
1083             wRaiseFrame(thePanel->wwin->frame->core);
1084             wSetFocusTo(scr, thePanel->wwin);
1085         }
1086         return;
1087     }
1088
1089     panel = wmalloc(sizeof(InfoPanel));
1090     memset(panel, 0, sizeof(InfoPanel));
1091
1092     panel->scr = scr;
1093
1094     panel->win = WMCreateWindow(scr->wmscreen, "info");
1095     WMResizeWidget(panel->win, 382, 230);
1096
1097     logo = WMGetApplicationIconImage(scr->wmscreen);
1098     if (logo) {
1099         size = WMGetPixmapSize(logo);
1100         panel->logoL = WMCreateLabel(panel->win);
1101         WMResizeWidget(panel->logoL, 64, 64);
1102         WMMoveWidget(panel->logoL, 30, 20);
1103         WMSetLabelImagePosition(panel->logoL, WIPImageOnly);
1104         WMSetLabelImage(panel->logoL, logo);
1105 #ifdef SILLYNESS
1106         WMCreateEventHandler(WMWidgetView(panel->logoL), ButtonPressMask,
1107                              handleLogoPush, panel);
1108 #endif
1109     }
1110
1111     panel->name1L = WMCreateLabel(panel->win);
1112     WMResizeWidget(panel->name1L, 240, 30);
1113     WMMoveWidget(panel->name1L, 100, 30);
1114     color1.red = 0;
1115     color1.green = 0;
1116     color1.blue = 0;
1117     color2.red = 0x50;
1118     color2.green = 0x50;
1119     color2.blue = 0x70;
1120     logo = renderText(scr->wmscreen, "GNU Window Maker",
1121                       "-*-utopia-*-r-*-*-25-*", &color1, &color2);
1122     if (logo) {
1123         WMSetLabelImagePosition(panel->name1L, WIPImageOnly);
1124         WMSetLabelImage(panel->name1L, logo);
1125         WMReleasePixmap(logo);
1126     } else {
1127         font = WMBoldSystemFontOfSize(scr->wmscreen, 20);
1128         if (font) {
1129             WMSetLabelFont(panel->name1L, font);
1130             WMReleaseFont(font);
1131         }
1132         WMSetLabelTextAlignment(panel->name1L, WACenter);
1133         WMSetLabelText(panel->name1L, "GNU Window Maker");
1134     }
1135
1136     panel->name2L = WMCreateLabel(panel->win);
1137     WMResizeWidget(panel->name2L, 240, 24);
1138     WMMoveWidget(panel->name2L, 100, 60);
1139     font = WMBoldSystemFontOfSize(scr->wmscreen, 18);
1140     if (font) {
1141         WMSetLabelFont(panel->name2L, font);
1142         WMReleaseFont(font);
1143         font = NULL;
1144     }
1145     WMSetLabelTextAlignment(panel->name2L, WACenter);
1146     WMSetLabelText(panel->name2L, "Window Manager for X");
1147
1148
1149     sprintf(version, "Version %s", VERSION);
1150     panel->versionL = WMCreateLabel(panel->win);
1151     WMResizeWidget(panel->versionL, 310, 16);
1152     WMMoveWidget(panel->versionL, 30, 95);
1153     WMSetLabelTextAlignment(panel->versionL, WARight);
1154     WMSetLabelText(panel->versionL, version);
1155     WMSetLabelWraps(panel->versionL, False);
1156
1157     panel->copyrL = WMCreateLabel(panel->win);
1158     WMResizeWidget(panel->copyrL, 340, 40);
1159     WMMoveWidget(panel->copyrL, 15, 185);
1160     WMSetLabelTextAlignment(panel->copyrL, WALeft);
1161     WMSetLabelText(panel->copyrL, COPYRIGHT_TEXT);
1162     /* we want the (c) character in the helvetica font */
1163     font = WMCreateNormalFont(scr->wmscreen, HELVETICA10_FONT);
1164     if (font) {
1165         WMSetLabelFont(panel->copyrL, font);
1166     }
1167
1168     switch (scr->w_depth) {
1169      case 15:
1170         strcpy(version, "32 thousand");
1171         break;
1172      case 16:
1173         strcpy(version, "64 thousand");
1174         break;
1175      case 24:
1176      case 32:
1177         strcpy(version, "16 million");
1178         break;
1179      default:
1180         sprintf(version, "%d", 1<<scr->w_depth);
1181         break;
1182     }
1183
1184     sprintf(buffer, "Using visual 0x%x: %s %ibpp (%s colors)\n",
1185             (unsigned)scr->w_visual->visualid,
1186             visuals[scr->w_visual->class], scr->w_depth, version);
1187
1188 #if defined(HAVE_MALLOC_H) && defined(HAVE_MALLINFO)
1189     {
1190         struct mallinfo ma = mallinfo();
1191         sprintf(buffer+strlen(buffer),
1192                 "Total allocated memory: %i kB. Total memory in use: %i kB.\n",
1193                 (ma.arena+ma.hblkhd)/1024, (ma.uordblks+ma.hblkhd)/1024);
1194
1195     }
1196 #endif
1197
1198     strcat(buffer, "Supported image formats: ");
1199     strl = RSupportedFileFormats();
1200     for (i=0; strl[i]!=NULL; i++) {
1201         strcat(buffer, strl[i]);
1202         strcat(buffer, " ");
1203     }
1204
1205     strcat(buffer, "\nAdditional Support For: ");
1206     {
1207         char *list[8];
1208         char buf[80];
1209         int j = 0;
1210
1211 #ifdef MWM_HINTS
1212         list[j++] = "MWM";
1213 #endif
1214 #ifdef KWM_HINTS
1215         list[j++] = "KDE";
1216 #endif
1217 #ifdef GNOME_STUFF
1218         list[j++] = "GNOME";
1219 #endif
1220 #ifdef OLWM_HINTS
1221         list[j++] = "OLWM";
1222 #endif
1223 #ifdef WSOUND
1224         list[j++] = "Sound";
1225 #endif
1226
1227         buf[0] = 0;
1228         for (i = 0; i < j; i++) {
1229             if (i > 0) {
1230                 if (i == j - 1)
1231                     strcat(buf, " and ");
1232                 else
1233                     strcat(buf, ", ");
1234             }
1235             strcat(buf, list[i]);
1236         }
1237         strcat(buffer, buf);
1238     }
1239
1240
1241     panel->infoL = WMCreateLabel(panel->win);
1242     WMResizeWidget(panel->infoL, 350, 75);
1243     WMMoveWidget(panel->infoL, 15, 115);
1244     WMSetLabelText(panel->infoL, buffer);
1245     if (font) {
1246         WMSetLabelFont(panel->infoL, font);
1247         WMReleaseFont(font);
1248     }
1249
1250
1251     WMRealizeWidget(panel->win);
1252     WMMapSubwidgets(panel->win);
1253
1254     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 382, 230, 0, 0, 0);
1255
1256     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
1257
1258     WMMapWidget(panel->win);
1259
1260     wwin = wManageInternalWindow(scr, parent, None, "Info",
1261                                  (scr->scr_width - 382)/2,
1262                                  (scr->scr_height - 230)/2, 382, 230);
1263
1264     WSETUFLAG(wwin, no_closable, 0);
1265     WSETUFLAG(wwin, no_close_button, 0);
1266 #ifdef XKB_BUTTON_HINT
1267     wFrameWindowHideButton(wwin->frame, WFF_LANGUAGE_BUTTON);
1268 #endif
1269     wWindowUpdateButtonImages(wwin);
1270     wFrameWindowShowButton(wwin->frame, WFF_RIGHT_BUTTON);
1271     wwin->frame->on_click_right = destroyInfoPanel;
1272
1273     wWindowMap(wwin);
1274
1275     panel->wwin = wwin;
1276
1277     thePanel = panel;
1278 #ifdef SILLYNESS
1279     if (InitXThing(panel->scr)) {
1280         panel->timer = WMAddTimerHandler(100, logoPushCallback, panel);
1281         panel->cycle = 0;
1282         panel->x = 1;
1283         panel->str = "Merry Christmas!";
1284         panel->oldPix = WMRetainPixmap(WMGetLabelImage(panel->logoL));
1285     }
1286 #endif
1287 }
1288
1289
1290 /*
1291  ***********************************************************************
1292  * Legal Panel
1293  ***********************************************************************
1294  */
1295
1296 typedef struct {
1297     WScreen *scr;
1298
1299     WWindow *wwin;
1300
1301     WMWindow *win;
1302
1303     WMLabel *licenseL;
1304 } LegalPanel;
1305
1306
1307
1308 #define LICENSE_TEXT \
1309         "    Window Maker is free software; you can redistribute it and/or modify "\
1310         "it under the terms of the GNU General Public License as published "\
1311         "by the Free Software Foundation; either version 2 of the License, "\
1312         "or (at your option) any later version.\n\n\n"\
1313         "    Window Maker is distributed in the hope that it will be useful, but "\
1314         "WITHOUT ANY WARRANTY; without even the implied warranty of "\
1315         "MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU "\
1316         "General Public License for more details.\n\n\n"\
1317         "    You should have received a copy of the GNU General Public License "\
1318         "along with this program; if not, write to the Free Software "\
1319         "Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA "\
1320         "02111-1307, USA."
1321
1322
1323 static LegalPanel *legalPanel = NULL;
1324
1325 static void
1326 destroyLegalPanel(WCoreWindow *foo, void *data, XEvent *event)
1327 {
1328     WMUnmapWidget(legalPanel->win);
1329
1330     WMDestroyWidget(legalPanel->win);
1331
1332     wUnmanageWindow(legalPanel->wwin, False, False);
1333
1334     wfree(legalPanel);
1335
1336     legalPanel = NULL;
1337 }
1338
1339
1340 void
1341 wShowLegalPanel(WScreen *scr)
1342 {
1343     LegalPanel *panel;
1344     Window parent;
1345     WWindow *wwin;
1346
1347     if (legalPanel) {
1348         if (legalPanel->scr == scr) {
1349             wRaiseFrame(legalPanel->wwin->frame->core);
1350             wSetFocusTo(scr, legalPanel->wwin);
1351         }
1352         return;
1353     }
1354
1355     panel = wmalloc(sizeof(LegalPanel));
1356
1357     panel->scr = scr;
1358
1359     panel->win = WMCreateWindow(scr->wmscreen, "legal");
1360     WMResizeWidget(panel->win, 420, 250);
1361
1362
1363     panel->licenseL = WMCreateLabel(panel->win);
1364     WMSetLabelWraps(panel->licenseL, True);
1365     WMResizeWidget(panel->licenseL, 400, 230);
1366     WMMoveWidget(panel->licenseL, 10, 10);
1367     WMSetLabelTextAlignment(panel->licenseL, WALeft);
1368     WMSetLabelText(panel->licenseL, LICENSE_TEXT);
1369     WMSetLabelRelief(panel->licenseL, WRGroove);
1370
1371     WMRealizeWidget(panel->win);
1372     WMMapSubwidgets(panel->win);
1373
1374     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 420, 250, 0, 0, 0);
1375
1376     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
1377
1378     wwin = wManageInternalWindow(scr, parent, None, "Legal",
1379                                  (scr->scr_width - 420)/2,
1380                                  (scr->scr_height - 250)/2, 420, 250);
1381
1382     WSETUFLAG(wwin, no_closable, 0);
1383     WSETUFLAG(wwin, no_close_button, 0);
1384     wWindowUpdateButtonImages(wwin);
1385     wFrameWindowShowButton(wwin->frame, WFF_RIGHT_BUTTON);
1386 #ifdef XKB_BUTTON_HINT
1387     wFrameWindowHideButton(wwin->frame, WFF_LANGUAGE_BUTTON);
1388 #endif
1389     wwin->frame->on_click_right = destroyLegalPanel;
1390
1391     panel->wwin = wwin;
1392
1393     WMMapWidget(panel->win);
1394
1395     wWindowMap(wwin);
1396
1397     legalPanel = panel;
1398 }
1399
1400
1401 /*
1402  ***********************************************************************
1403  * Crashing Dialog Panel
1404  ***********************************************************************
1405  */
1406
1407 extern WDDomain *WDWindowAttributes;
1408
1409
1410 typedef struct _CrashPanel {
1411     WMWindow *win;            /* main window */
1412
1413     WMLabel *iconL;           /* application icon */
1414     WMLabel *nameL;           /* title of panel */
1415
1416     WMFrame *sepF;            /* separator frame */
1417
1418     WMLabel *noteL;           /* Title of note */
1419     WMLabel *note2L;          /* body of note with what happened */
1420
1421     WMFrame *whatF;           /* "what to do next" frame */
1422     WMPopUpButton *whatP;     /* action selection popup button */
1423
1424     WMButton *okB;            /* ok button */
1425
1426     Bool done;                /* if finished with this dialog */
1427     int action;               /* what to do after */
1428
1429     KeyCode retKey;
1430
1431 } CrashPanel;
1432
1433
1434 static void
1435 handleKeyPress(XEvent *event, void *clientData)
1436 {
1437     CrashPanel *panel = (CrashPanel*)clientData;
1438
1439     if (event->xkey.keycode == panel->retKey) {
1440         WMPerformButtonClick(panel->okB);
1441     }
1442 }
1443
1444
1445 static void
1446 okButtonCallback(void *self, void *clientData)
1447 {
1448     CrashPanel *panel = (CrashPanel*)clientData;
1449
1450     panel->done = True;
1451 }
1452
1453
1454 static void
1455 setCrashAction(void *self, void *clientData)
1456 {
1457     WMPopUpButton *pop = (WMPopUpButton*)self;
1458     CrashPanel *panel = (CrashPanel*)clientData;
1459
1460     panel->action = WMGetPopUpButtonSelectedItem(pop);
1461 }
1462
1463
1464 static WMPixmap*
1465 getWindowMakerIconImage(WMScreen *scr)
1466 {
1467     proplist_t dict, key, option, value=NULL;
1468     WMPixmap *pix=NULL;
1469     char *path;
1470
1471     PLSetStringCmpHook(NULL);
1472
1473     key = PLMakeString("Logo.WMPanel");
1474     option = PLMakeString("Icon");
1475
1476     dict = PLGetDictionaryEntry(WDWindowAttributes->dictionary, key);
1477
1478     if (dict) {
1479         value = PLGetDictionaryEntry(dict, option);
1480     }
1481
1482     PLRelease(key);
1483     PLRelease(option);
1484
1485     PLSetStringCmpHook(StringCompareHook);
1486
1487     if (value && PLIsString(value)) {
1488         path = FindImage(wPreferences.icon_path, PLGetString(value));
1489
1490         if (path) {
1491             RImage *image;
1492
1493             image = RLoadImage(WMScreenRContext(scr), path, 0);
1494             if (image) {
1495                 pix = WMCreatePixmapFromRImage(scr, image, 0);
1496                 RDestroyImage(image);
1497             }
1498             wfree(path);
1499         }
1500     }
1501
1502     return pix;
1503 }
1504
1505
1506 #define PWIDTH  295
1507 #define PHEIGHT 345
1508
1509
1510 int
1511 wShowCrashingDialogPanel(int whatSig)
1512 {
1513     CrashPanel *panel;
1514     WMScreen *scr;
1515     WMFont *font;
1516     WMPixmap *logo;
1517     int screen_no, scr_width, scr_height;
1518     int action;
1519     char buf[256];
1520
1521     panel = wmalloc(sizeof(CrashPanel));
1522     memset(panel, 0, sizeof(CrashPanel));
1523
1524     screen_no = DefaultScreen(dpy);
1525     scr_width = WidthOfScreen(ScreenOfDisplay(dpy, screen_no));
1526     scr_height = HeightOfScreen(ScreenOfDisplay(dpy, screen_no));
1527
1528     scr = WMCreateScreen(dpy, screen_no);
1529     if (!scr) {
1530         wsyserror(_("cannot open connection for crashing dialog panel. Aborting."));
1531         return WMAbort;
1532     }
1533
1534     panel->retKey = XKeysymToKeycode(dpy, XK_Return);
1535
1536     panel->win = WMCreateWindow(scr, "crashingDialog");
1537     WMResizeWidget(panel->win, PWIDTH, PHEIGHT);
1538     WMMoveWidget(panel->win, (scr_width - PWIDTH)/2, (scr_height - PHEIGHT)/2);
1539
1540     logo = getWindowMakerIconImage(scr);
1541     if (logo) {
1542         panel->iconL = WMCreateLabel(panel->win);
1543         WMResizeWidget(panel->iconL, 64, 64);
1544         WMMoveWidget(panel->iconL, 10, 10);
1545         WMSetLabelImagePosition(panel->iconL, WIPImageOnly);
1546         WMSetLabelImage(panel->iconL, logo);
1547     }
1548
1549     panel->nameL = WMCreateLabel(panel->win);
1550     WMResizeWidget(panel->nameL, 190, 18);
1551     WMMoveWidget(panel->nameL, 80, 35);
1552     WMSetLabelTextAlignment(panel->nameL, WALeft);
1553     font = WMBoldSystemFontOfSize(scr, 18);
1554     WMSetLabelFont(panel->nameL, font);
1555     WMReleaseFont(font);
1556     WMSetLabelText(panel->nameL, _("Fatal error"));
1557
1558     panel->sepF = WMCreateFrame(panel->win);
1559     WMResizeWidget(panel->sepF, PWIDTH+4, 2);
1560     WMMoveWidget(panel->sepF, -2, 80);
1561
1562     panel->noteL = WMCreateLabel(panel->win);
1563     WMResizeWidget(panel->noteL, PWIDTH-20, 40);
1564     WMMoveWidget(panel->noteL, 10, 90);
1565     WMSetLabelTextAlignment(panel->noteL, WAJustified);
1566 #ifdef SYS_SIGLIST_DECLARED
1567     sprintf(buf, _("Window Maker received signal %i\n(%s)."),
1568             whatSig, sys_siglist[whatSig]);
1569 #else
1570     sprintf(buf, _("Window Maker received signal %i."), whatSig);
1571 #endif
1572     WMSetLabelText(panel->noteL, buf);
1573
1574     panel->note2L = WMCreateLabel(panel->win);
1575     WMResizeWidget(panel->note2L, PWIDTH-20, 100);
1576     WMMoveWidget(panel->note2L, 10, 130);
1577     WMSetLabelTextAlignment(panel->note2L, WALeft);
1578     WMSetLabelText(panel->note2L,
1579                    _(" This fatal error occured probably due to a bug."
1580                    " Please fill the included BUGFORM and "
1581                    "report it to bugs@windowmaker.org."));
1582
1583
1584     panel->whatF = WMCreateFrame(panel->win);
1585     WMResizeWidget(panel->whatF, PWIDTH-20, 50);
1586     WMMoveWidget(panel->whatF, 10, 240);
1587     WMSetFrameTitle(panel->whatF, _("What do you want to do now?"));
1588
1589     panel->whatP = WMCreatePopUpButton(panel->whatF);
1590     WMResizeWidget(panel->whatP, PWIDTH-20-70, 20);
1591     WMMoveWidget(panel->whatP, 35, 20);
1592     WMSetPopUpButtonPullsDown(panel->whatP, False);
1593     WMSetPopUpButtonText(panel->whatP, _("Select action"));
1594     WMAddPopUpButtonItem(panel->whatP, _("Abort and leave a core file"));
1595     WMAddPopUpButtonItem(panel->whatP, _("Restart Window Maker"));
1596     WMAddPopUpButtonItem(panel->whatP, _("Start alternate window manager"));
1597     WMSetPopUpButtonAction(panel->whatP, setCrashAction, panel);
1598     WMSetPopUpButtonSelectedItem(panel->whatP, WMRestart);
1599     panel->action = WMRestart;
1600
1601     WMMapSubwidgets(panel->whatF);
1602
1603     panel->okB = WMCreateCommandButton(panel->win);
1604     WMResizeWidget(panel->okB, 80, 26);
1605     WMMoveWidget(panel->okB, 205, 309);
1606     WMSetButtonText(panel->okB, _("OK"));
1607     WMSetButtonImage(panel->okB, WMGetSystemPixmap(scr, WSIReturnArrow));
1608     WMSetButtonAltImage(panel->okB, WMGetSystemPixmap(scr, WSIHighlightedReturnArrow));
1609     WMSetButtonImagePosition(panel->okB, WIPRight);
1610     WMSetButtonAction(panel->okB, okButtonCallback, panel);
1611
1612     panel->done = 0;
1613
1614     WMCreateEventHandler(WMWidgetView(panel->win), KeyPressMask,
1615                          handleKeyPress, panel);
1616
1617     WMRealizeWidget(panel->win);
1618     WMMapSubwidgets(panel->win);
1619
1620     WMMapWidget(panel->win);
1621
1622     XSetInputFocus(dpy, WMWidgetXID(panel->win), RevertToParent, CurrentTime);
1623
1624     while (!panel->done) {
1625         XEvent event;
1626
1627         WMNextEvent(dpy, &event);
1628         WMHandleEvent(&event);
1629     }
1630
1631     action = panel->action;
1632
1633     WMUnmapWidget(panel->win);
1634     WMDestroyWidget(panel->win);
1635     wfree(panel);
1636
1637     return action;
1638 }
1639
1640
1641
1642
1643 /*****************************************************************************
1644  *                      About GNUstep Panel
1645  *****************************************************************************/
1646
1647
1648 static void
1649 drawGNUstepLogo(Display *dpy, Drawable d, int width, int height,
1650                 unsigned long blackPixel, unsigned long whitePixel)
1651 {
1652     GC gc;
1653     XGCValues gcv;
1654     XRectangle rects[3];
1655
1656     gcv.foreground = blackPixel;
1657     gc = XCreateGC(dpy, d, GCForeground, &gcv);
1658
1659     XFillArc(dpy, d, gc, width/45, height/45,
1660              width - 2*width/45, height - 2*height/45, 0, 360*64);
1661
1662     rects[0].x = 0;
1663     rects[0].y = 37*height/45;
1664     rects[0].width = width/3;
1665     rects[0].height = height - rects[0].y;
1666
1667     rects[1].x = rects[0].width;
1668     rects[1].y = height/2;
1669     rects[1].width = width - 2*width/3;
1670     rects[1].height = height - rects[1].y;
1671
1672     rects[2].x = 2*width/3;
1673     rects[2].y = height - 37*height/45;
1674     rects[2].width = width/3;
1675     rects[2].height = height - rects[2].y;
1676
1677     XSetClipRectangles(dpy, gc, 0, 0, rects, 3, Unsorted);
1678     XFillRectangle(dpy, d, gc, 0, 0, width, height);
1679
1680     XSetForeground(dpy, gc, whitePixel);
1681     XFillArc(dpy, d, gc, width/45, height/45,
1682              width - 2*width/45, height - 2*height/45, 0, 360*64);
1683
1684     XFreeGC(dpy, gc);
1685 }
1686
1687
1688
1689 #define GNUSTEP_TEXT \
1690         "Window Maker is part of the GNUstep project.\n"\
1691         "The GNUstep project aims to create a free\n"\
1692         "implementation of the OpenStep(tm) specification\n"\
1693         "which is a object-oriented framework for\n"\
1694         "creating advanced graphical, multi-platform\n"\
1695         "applications. Additionally, a development and\n"\
1696         "user desktop enviroment will be created on top\n"\
1697         "of the framework. For more information about\n"\
1698         "GNUstep, please visit: www.gnustep.org"
1699
1700
1701 typedef struct {
1702     WScreen *scr;
1703
1704     WWindow *wwin;
1705
1706     WMWindow *win;
1707
1708     WMLabel *gstepL;
1709     WMLabel *textL;
1710 } GNUstepPanel;
1711
1712
1713 static GNUstepPanel *gnustepPanel = NULL;
1714
1715 static void
1716 destroyGNUstepPanel(WCoreWindow *foo, void *data, XEvent *event)
1717 {
1718     WMUnmapWidget(gnustepPanel->win);
1719
1720     WMDestroyWidget(gnustepPanel->win);
1721
1722     wUnmanageWindow(gnustepPanel->wwin, False, False);
1723
1724     wfree(gnustepPanel);
1725
1726     gnustepPanel = NULL;
1727 }
1728
1729
1730 void
1731 wShowGNUstepPanel(WScreen *scr)
1732 {
1733     GNUstepPanel *panel;
1734     Window parent;
1735     WWindow *wwin;
1736     WMPixmap *pixmap;
1737     WMColor *color;
1738
1739     if (gnustepPanel) {
1740         if (gnustepPanel->scr == scr) {
1741             wRaiseFrame(gnustepPanel->wwin->frame->core);
1742             wSetFocusTo(scr, gnustepPanel->wwin);
1743         }
1744         return;
1745     }
1746
1747     panel = wmalloc(sizeof(GNUstepPanel));
1748
1749     panel->scr = scr;
1750
1751     panel->win = WMCreateWindow(scr->wmscreen, "About GNUstep");
1752     WMResizeWidget(panel->win, 325, 200);
1753
1754     pixmap = WMCreatePixmap(scr->wmscreen, 130, 130,
1755                             WMScreenDepth(scr->wmscreen), True);
1756
1757     color = WMCreateNamedColor(scr->wmscreen, "gray50", True);
1758
1759     drawGNUstepLogo(dpy, WMGetPixmapXID(pixmap), 130, 130,
1760                     WMColorPixel(color), scr->white_pixel);
1761
1762     WMReleaseColor(color);
1763
1764     XSetForeground(dpy, scr->mono_gc, 0);
1765     XFillRectangle(dpy, WMGetPixmapMaskXID(pixmap), scr->mono_gc, 0, 0,
1766                    130, 130);
1767     drawGNUstepLogo(dpy, WMGetPixmapMaskXID(pixmap), 130, 130, 1, 1);
1768
1769     panel->gstepL = WMCreateLabel(panel->win);
1770     WMResizeWidget(panel->gstepL, 285, 64);
1771     WMMoveWidget(panel->gstepL, 20, 0);
1772     WMSetLabelTextAlignment(panel->gstepL, WARight);
1773     WMSetLabelText(panel->gstepL, "GNUstep");
1774     {
1775         WMFont *font = WMBoldSystemFontOfSize(scr->wmscreen, 24);
1776
1777         WMSetLabelFont(panel->gstepL, font);
1778         WMReleaseFont(font);
1779     }
1780
1781     panel->textL = WMCreateLabel(panel->win);
1782     WMResizeWidget(panel->textL, 275, 130);
1783     WMMoveWidget(panel->textL, 30, 50);
1784     WMSetLabelTextAlignment(panel->textL, WARight);
1785     WMSetLabelImagePosition(panel->textL, WIPOverlaps);
1786     WMSetLabelText(panel->textL, GNUSTEP_TEXT);
1787     WMSetLabelImage(panel->textL, pixmap);
1788
1789     WMReleasePixmap(pixmap);
1790
1791     WMRealizeWidget(panel->win);
1792     WMMapSubwidgets(panel->win);
1793
1794     parent = XCreateSimpleWindow(dpy, scr->root_win, 0, 0, 325, 200, 0, 0, 0);
1795
1796     XReparentWindow(dpy, WMWidgetXID(panel->win), parent, 0, 0);
1797
1798     wwin = wManageInternalWindow(scr, parent, None, "About GNUstep",
1799                                  (scr->scr_width - 325)/2,
1800                                  (scr->scr_height - 200)/2, 325, 200);
1801
1802     WSETUFLAG(wwin, no_closable, 0);
1803     WSETUFLAG(wwin, no_close_button, 0);
1804     wWindowUpdateButtonImages(wwin);
1805     wFrameWindowShowButton(wwin->frame, WFF_RIGHT_BUTTON);
1806 #ifdef XKB_BUTTON_HINT
1807     wFrameWindowHideButton(wwin->frame, WFF_LANGUAGE_BUTTON);
1808 #endif
1809     wwin->frame->on_click_right = destroyGNUstepPanel;
1810
1811     panel->wwin = wwin;
1812
1813     WMMapWidget(panel->win);
1814
1815     wWindowMap(wwin);
1816
1817     gnustepPanel = panel;
1818 }