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