WINGs/widgets.c

   1
   2
   3 #include "WINGsP.h"
   4
   5 #include <X11/Xutil.h>
   6
   7 #include <X11/cursorfont.h>
   8
   9 /********** data ************/
  10
  11
  12 #define CHECK_BUTTON_ON_WIDTH   16
  13 #define CHECK_BUTTON_ON_HEIGHT  16
  14
  15 static char *CHECK_BUTTON_ON[] = {
  16 "               %",
  17 " .............%#",
  18 " ........... .%#",
  19 " .......... #.%#",
  20 " ......... #%.%#",
  21 " ........ #%..%#",
  22 " ... #.. #%...%#",
  23 " ... #% #%....%#",
  24 " ... % #%.....%#",
  25 " ...  #%......%#",
  26 " ... #%.......%#",
  27 " ...#%........%#",
  28 " .............%#",
  29 " .............%#",
  30 " %%%%%%%%%%%%%%#",
  31 "%###############"};
  32
  33 #define CHECK_BUTTON_OFF_WIDTH  16
  34 #define CHECK_BUTTON_OFF_HEIGHT 16
  35
  36 static char *CHECK_BUTTON_OFF[] = {
  37 "               %",
  38 " .............%#",
  39 " .............%#",
  40 " .............%#",
  41 " .............%#",
  42 " .............%#",
  43 " .............%#",
  44 " .............%#",
  45 " .............%#",
  46 " .............%#",
  47 " .............%#",
  48 " .............%#",
  49 " .............%#",
  50 " .............%#",
  51 " %%%%%%%%%%%%%%#",
  52 "%###############"};
  53
  54 #define RADIO_BUTTON_ON_WIDTH   15
  55 #define RADIO_BUTTON_ON_HEIGHT  15
  56 static char *RADIO_BUTTON_ON[] = {
  57 ".....%%%%%.....",
  58 "...%%#####%%...",
  59 "..%##.....%.%..",
  60 ".%#%..    .....",
  61 ".%#.        ...",
  62 "%#..        .. ",
  63 "%#.          . ",
  64 "%#.          . ",
  65 "%#.          . ",
  66 "%#.          . ",
  67 ".%%.        . .",
  68 ".%..        . .",
  69 "..%...    .. ..",
  70 ".... .....  ...",
  71 ".....     .....",
  72 };
  73
  74 #define RADIO_BUTTON_OFF_WIDTH  15
  75 #define RADIO_BUTTON_OFF_HEIGHT 15
  76 static char *RADIO_BUTTON_OFF[] = {
  77 ".....%%%%%.....",
  78 "...%%#####%%...",
  79 "..%##.......%..",
  80 ".%#%...........",
  81 ".%#............",
  82 "%#............ ",
  83 "%#............ ",
  84 "%#............ ",
  85 "%#............ ",
  86 "%#............ ",
  87 ".%%.......... .",
  88 ".%........... .",
  89 "..%......... ..",
  90 ".... .....  ...",
  91 ".....     .....",
  92 };
  93
  94
  95 static char *BUTTON_ARROW[] = {
  96 "..................",
  97 "....##....#### ...",
  98 "...#.%....#... ...",
  99 "..#..%#####... ...",
 100 ".#............ ...",
 101 "#............. ...",
 102 ".#............ ...",
 103 "..#..          ...",
 104 "...#. ............",
 105 "....# ............"
 106 };
 107
 108 #define BUTTON_ARROW_WIDTH      18
 109 #define BUTTON_ARROW_HEIGHT     10
 110
 111
 112 static char *BUTTON_ARROW2[] = {
 113 "                  ",
 114 "    ##    ####.   ",
 115 "   # %    #   .   ",
 116 "  #  %#####   .   ",
 117 " #            .   ",
 118 "#             .   ",
 119 " #            .   ",
 120 "  #  ..........   ",
 121 "   # .            ",
 122 "    #.            "
 123 };
 124
 125 #define BUTTON_ARROW2_WIDTH     18
 126 #define BUTTON_ARROW2_HEIGHT    10
 127
 128
 129 static char *SCROLLER_DIMPLE[] = {
 130 ".%###.",
 131 "%#%%%%",
 132 "#%%...",
 133 "#%..  ",
 134 "#%.   ",
 135 ".%.  ."
 136 };
 137
 138 #define SCROLLER_DIMPLE_WIDTH   6
 139 #define SCROLLER_DIMPLE_HEIGHT  6
 140
 141
 142 static char *SCROLLER_ARROW_UP[] = {
 143 "....%....",
 144 "....#....",
 145 "...%#%...",
 146 "...###...",
 147 "..%###%..",
 148 "..#####..",
 149 ".%#####%.",
 150 ".#######.",
 151 "%#######%"
 152 };
 153
 154 static char *HI_SCROLLER_ARROW_UP[] = {
 155 "    %    ",
 156 "    %    ",
 157 "   %%%   ",
 158 "   %%%   ",
 159 "  %%%%%  ",
 160 "  %%%%%  ",
 161 " %%%%%%% ",
 162 " %%%%%%% ",
 163 "%%%%%%%%%"
 164 };
 165
 166 #define SCROLLER_ARROW_UP_WIDTH   9
 167 #define SCROLLER_ARROW_UP_HEIGHT  9
 168
 169
 170 static char *SCROLLER_ARROW_DOWN[] = {
 171 "%#######%",
 172 ".#######.",
 173 ".%#####%.",
 174 "..#####..",
 175 "..%###%..",
 176 "...###...",
 177 "...%#%...",
 178 "....#....",
 179 "....%...."
 180 };
 181
 182 static char *HI_SCROLLER_ARROW_DOWN[] = {
 183 "%%%%%%%%%",
 184 " %%%%%%% ",
 185 " %%%%%%% ",
 186 "  %%%%%  ",
 187 "  %%%%%  ",
 188 "   %%%   ",
 189 "   %%%   ",
 190 "    %    ",
 191 "    %    "
 192 };
 193
 194 #define SCROLLER_ARROW_DOWN_WIDTH   9
 195 #define SCROLLER_ARROW_DOWN_HEIGHT  9
 196
 197
 198
 199 static char *SCROLLER_ARROW_LEFT[] = {
 200 "........%",
 201 "......%##",
 202 "....%####",
 203 "..%######",
 204 "%########",
 205 "..%######",
 206 "....%####",
 207 "......%##",
 208 "........%"
 209 };
 210
 211 static char *HI_SCROLLER_ARROW_LEFT[] = {
 212 "        %",
 213 "      %%%",
 214 "    %%%%%",
 215 "  %%%%%%%",
 216 "%%%%%%%%%",
 217 "  %%%%%%%",
 218 "    %%%%%",
 219 "      %%%",
 220 "        %"
 221 };
 222
 223 #define SCROLLER_ARROW_LEFT_WIDTH   9
 224 #define SCROLLER_ARROW_LEFT_HEIGHT  9
 225
 226
 227 static char *SCROLLER_ARROW_RIGHT[] = {
 228 "%........",
 229 "##%......",
 230 "####%....",
 231 "######%..",
 232 "########%",
 233 "######%..",
 234 "####%....",
 235 "##%......",
 236 "%........"
 237 };
 238
 239 static char *HI_SCROLLER_ARROW_RIGHT[] = {
 240 "%        ",
 241 "%%%      ",
 242 "%%%%%    ",
 243 "%%%%%%%  ",
 244 "%%%%%%%%%",
 245 "%%%%%%%  ",
 246 "%%%%%    ",
 247 "%%%      ",
 248 "%        "
 249 };
 250
 251 #define SCROLLER_ARROW_RIGHT_WIDTH   9
 252 #define SCROLLER_ARROW_RIGHT_HEIGHT  9
 253
 254
 255 static char *POPUP_INDICATOR[] = {
 256 "        #==",
 257 " ......%#==",
 258 " ......%#%%",
 259 " ......%#%%",
 260 " %%%%%%%#%%",
 261 "#########%%",
 262 "==%%%%%%%%%",
 263 "==%%%%%%%%%"
 264 };
 265
 266 #define POPUP_INDICATOR_WIDTH   11
 267 #define POPUP_INDICATOR_HEIGHT  8
 268
 269
 270
 271 static char *PULLDOWN_INDICATOR[] = {
 272 "=#######=",
 273 "=%===== =",
 274 "==%=== ==",
 275 "==%=== ==",
 276 "===%= ===",
 277 "===%= ===",
 278 "====%===="
 279 };
 280 #define PULLDOWN_INDICATOR_WIDTH        9
 281 #define PULLDOWN_INDICATOR_HEIGHT       7
 282
 283
 284 #define CHECK_MARK_WIDTH        8
 285 #define CHECK_MARK_HEIGHT       10
 286
 287 static char *CHECK_MARK[] = {
 288 "======== ",
 289 "======= #",
 290 "====== #%",
 291 "===== #%=",
 292 " #== #%==",
 293 " #% #%===",
 294 " % #%====",
 295 "  #%=====",
 296 " #%======",
 297 "#%======="};
 298
 299
 300 #define STIPPLE_WIDTH 8
 301 #define STIPPLE_HEIGHT 8
 302 static unsigned char STIPPLE_BITS[] = {
 303    0x55, 0xaa, 0x55, 0xaa, 0x55, 0xaa, 0x55, 0xaa};
 304
 305
 306 extern void W_ReadConfigurations(void);
 307
 308
 309 extern W_ViewProcedureTable _WindowViewProcedures;
 310 extern W_ViewProcedureTable _FrameViewProcedures;
 311 extern W_ViewProcedureTable _LabelViewProcedures;
 312 extern W_ViewProcedureTable _ButtonViewProcedures;
 313 extern W_ViewProcedureTable _TextFieldViewProcedures;
 314 extern W_ViewProcedureTable _ScrollerViewProcedures;
 315 extern W_ViewProcedureTable _ScrollViewProcedures;
 316 extern W_ViewProcedureTable _ListViewProcedures;
 317 extern W_ViewProcedureTable _BrowserViewProcedures;
 318 extern W_ViewProcedureTable _PopUpButtonViewProcedures;
 319 extern W_ViewProcedureTable _ColorWellViewProcedures;
 320 extern W_ViewProcedureTable _ScrollViewViewProcedures;
 321 extern W_ViewProcedureTable _SliderViewProcedures;
 322 extern W_ViewProcedureTable _SplitViewViewProcedures;
 323
 324 /*
 325  * All widget classes defined must have an entry here.
 326  */
 327 static W_ViewProcedureTable *procedureTables[16];
 328
 329 static W_ViewProcedureTable **userProcedureTable = NULL;
 330 static int userWidgetCount=0;
 331
 332
 333 /*****  end data  ******/
 334
 335
 336
 337 static void
 338 initProcedureTable()
 339 {
 340     procedureTables[WC_Window] = &_WindowViewProcedures;
 341     procedureTables[WC_Frame] = &_FrameViewProcedures;
 342     procedureTables[WC_Label] = &_LabelViewProcedures;
 343     procedureTables[WC_Button] = &_ButtonViewProcedures;
 344     procedureTables[WC_TextField] = &_TextFieldViewProcedures;
 345     procedureTables[WC_Scroller] = &_ScrollerViewProcedures;
 346     procedureTables[WC_List] = &_ListViewProcedures;
 347     procedureTables[WC_Browser] = &_BrowserViewProcedures;
 348     procedureTables[WC_PopUpButton] = &_PopUpButtonViewProcedures;
 349     procedureTables[WC_ColorWell] = &_ColorWellViewProcedures;
 350     procedureTables[WC_ScrollView] = &_ScrollViewViewProcedures;
 351     procedureTables[WC_Slider] = &_SliderViewProcedures;
 352     procedureTables[WC_SplitView] = &_SplitViewViewProcedures;
 353 }
 354
 355
 356 static void
 357 renderPixmap(W_Screen *screen, Pixmap d, Pixmap mask, char **data,
 358              int width, int height)
 359 {
 360     int x, y;
 361     GC whiteGC = WMColorGC(screen->white);
 362     GC blackGC = WMColorGC(screen->black);
 363     GC lightGC = WMColorGC(screen->gray);
 364     GC darkGC = WMColorGC(screen->darkGray);
 365
 366
 367     if (mask)
 368         XSetForeground(screen->display, screen->monoGC, 0);
 369
 370     for (y = 0; y < height; y++) {
 371         for (x = 0; x < width; x++) {
 372             switch (data[y][x]) {
 373              case ' ':
 374              case 'w':
 375                 XDrawPoint(screen->display, d, whiteGC, x, y);
 376                 break;
 377
 378              case '=':
 379                 if (mask)
 380                     XDrawPoint(screen->display, mask, screen->monoGC, x, y);
 381
 382              case '.':
 383              case 'l':
 384                 XDrawPoint(screen->display, d, lightGC, x, y);
 385                 break;
 386
 387              case '%':
 388              case 'd':
 389                 XDrawPoint(screen->display, d, darkGC, x, y);
 390                 break;
 391
 392              case '#':
 393              case 'b':
 394              default:
 395                 XDrawPoint(screen->display, d, blackGC, x, y);
 396                 break;
 397             }
 398         }
 399     }
 400 }
 401
 402
 403
 404 static WMPixmap*
 405 makePixmap(W_Screen *sPtr, char **data, int width, int height, int masked)
 406 {
 407     Pixmap pixmap, mask = None;
 408
 409     pixmap = XCreatePixmap(sPtr->display, W_DRAWABLE(sPtr), width, height,
 410                            sPtr->depth);
 411
 412     if (masked) {
 413         mask = XCreatePixmap(sPtr->display, W_DRAWABLE(sPtr), width, height, 1);
 414         XSetForeground(sPtr->display, sPtr->monoGC, 1);
 415         XFillRectangle(sPtr->display, mask, sPtr->monoGC, 0, 0, width, height);
 416     }
 417
 418     renderPixmap(sPtr, pixmap, mask, data, width, height);
 419
 420     return WMCreatePixmapFromXPixmaps(sPtr, pixmap, mask, width, height,
 421                                       sPtr->depth);
 422 }
 423
 424
 425 #define T_WINGS_IMAGES_FILE  RESOURCE_PATH"/Images.tiff"
 426 #define T_DEFAULT_OBJECT_ICON_FILE RESOURCE_PATH"/defaultIcon.tiff"
 427
 428 #define X_WINGS_IMAGES_FILE  RESOURCE_PATH"/Images.xpm"
 429 #define X_DEFAULT_OBJECT_ICON_FILE RESOURCE_PATH"/defaultIcon.xpm"
 430
 431
 432 static Bool
 433 loadPixmaps(WMScreen *scr)
 434 {
 435     RImage *image, *tmp;
 436     RColor gray;
 437     RColor white;
 438
 439     gray.red = 0xae;
 440     gray.green = 0xaa;
 441     gray.blue = 0xae;
 442
 443     white.red = 0xff;
 444     white.green = 0xff;
 445     white.blue = 0xff;
 446
 447     image = RLoadImage(scr->rcontext, T_WINGS_IMAGES_FILE, 0);
 448     if (!image)
 449         image = RLoadImage(scr->rcontext, X_WINGS_IMAGES_FILE, 0);
 450     if (!image) {
 451         wwarning("WINGs: could not load widget images file: %s",
 452                  RMessageForError(RErrorCode));
 453         return False;
 454     }
 455     /* home icon */
 456     /* make it have a gray background */
 457     tmp = RGetSubImage(image, 0, 0, 24, 24);
 458     RCombineImageWithColor(tmp, &gray);
 459     scr->homeIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 460     RDestroyImage(tmp);
 461     /* make it have a white background */
 462     tmp = RGetSubImage(image, 0, 0, 24, 24);
 463     RCombineImageWithColor(tmp, &white);
 464     scr->altHomeIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 465     RDestroyImage(tmp);
 466
 467     /* Magnifying Glass Icon for ColorPanel */
 468     tmp = RGetSubImage(image, 24, 0, 40, 32);
 469     RCombineImageWithColor(tmp, &gray);
 470     scr->magnifyIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 471     RDestroyImage(tmp);
 472     tmp = RGetSubImage(image, 24, 0, 40, 32);
 473     RCombineImageWithColor(tmp, &white);
 474     scr->altMagnifyIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 475     RDestroyImage(tmp);
 476     /* ColorWheel Icon for ColorPanel */
 477     tmp = RGetSubImage(image, 0, 25, 24, 24);
 478     scr->wheelIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 479     RDestroyImage(tmp);
 480     /* GrayScale Icon for ColorPanel */
 481     tmp = RGetSubImage(image, 65, 0, 40, 24);
 482     scr->grayIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 483     RDestroyImage(tmp);
 484     /* RGB Icon for ColorPanel */
 485     tmp = RGetSubImage(image, 25, 33, 40, 24);
 486     scr->rgbIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 487     RDestroyImage(tmp);
 488     /* CMYK Icon for ColorPanel */
 489     tmp = RGetSubImage(image, 65, 25, 40, 24);
 490     scr->cmykIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 491     RDestroyImage(tmp);
 492     /* HSB Icon for ColorPanel */
 493     tmp = RGetSubImage(image, 0, 57, 40, 24);
 494     scr->hsbIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 495     RDestroyImage(tmp);
 496     /* CustomColorPalette Icon for ColorPanel */
 497     tmp = RGetSubImage(image, 81, 57, 40, 24);
 498     scr->customPaletteIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 499     RDestroyImage(tmp);
 500     /* ColorList Icon for ColorPanel */
 501     tmp = RGetSubImage(image, 41, 57, 40, 24);
 502     scr->colorListIcon = WMCreatePixmapFromRImage(scr, tmp, 128);
 503     RDestroyImage(tmp);
 504
 505     RDestroyImage(image);
 506
 507 #if 0
 508     scr->defaultObjectIcon =
 509         WMCreatePixmapFromFile(scr, T_DEFAULT_OBJECT_ICON_FILE);
 510     if (!scr->defaultObjectIcon) {
 511         scr->defaultObjectIcon =
 512             WMCreatePixmapFromFile(scr, X_DEFAULT_OBJECT_ICON_FILE);
 513     }
 514     if (!scr->defaultObjectIcon) {
 515         wwarning("WINGs: could not load default icon file");
 516         return False;
 517     }
 518 #endif
 519     return True;
 520 }
 521
 522
 523
 524 WMScreen*
 525 WMCreateSimpleApplicationScreen(Display *display)
 526 {
 527     WMScreen *scr;
 528
 529     scr = WMCreateScreen(display, DefaultScreen(display));
 530
 531     scr->aflags.hasAppIcon = 0;
 532     scr->aflags.simpleApplication = 1;
 533
 534     return scr;
 535 }
 536
 537
 538
 539 WMScreen*
 540 WMCreateScreen(Display *display, int screen)
 541 {
 542     return WMCreateScreenWithRContext(display, screen,
 543                                       RCreateContext(display, screen, NULL));
 544 }
 545
 546
 547 WMScreen*
 548 WMCreateScreenWithRContext(Display *display, int screen, RContext *context)
 549 {
 550     W_Screen *scrPtr;
 551     XGCValues gcv;
 552     Pixmap stipple;
 553     static int initialized = 0;
 554
 555     if (!initialized) {
 556
 557         initialized = 1;
 558
 559         initProcedureTable();
 560
 561         W_ReadConfigurations();
 562
 563         assert(W_ApplicationInitialized());
 564     }
 565
 566     scrPtr = malloc(sizeof(W_Screen));
 567     if (!scrPtr)
 568         return NULL;
 569     memset(scrPtr, 0, sizeof(W_Screen));
 570
 571     scrPtr->aflags.hasAppIcon = 1;
 572
 573     scrPtr->display = display;
 574     scrPtr->screen = screen;
 575     scrPtr->rcontext = context;
 576
 577     scrPtr->depth = context->depth;
 578
 579     scrPtr->visual = context->visual;
 580     scrPtr->lastEventTime = 0;
 581
 582     scrPtr->colormap = context->cmap;
 583
 584     scrPtr->rootWin = RootWindow(display, screen);
 585
 586     scrPtr->fontCache = WMCreateHashTable(WMStringPointerHashCallbacks);
 587
 588     /* initially allocate some colors */
 589     WMWhiteColor(scrPtr);
 590     WMBlackColor(scrPtr);
 591     WMGrayColor(scrPtr);
 592     WMDarkGrayColor(scrPtr);
 593
 594     gcv.graphics_exposures = False;
 595
 596     gcv.function = GXxor;
 597     gcv.foreground = W_PIXEL(scrPtr->white);
 598     if (gcv.foreground == 0) gcv.foreground = 1;
 599     scrPtr->xorGC = XCreateGC(display, W_DRAWABLE(scrPtr), GCFunction
 600                               |GCGraphicsExposures|GCForeground, &gcv);
 601
 602     gcv.function = GXxor;
 603     gcv.foreground = W_PIXEL(scrPtr->gray);
 604     gcv.subwindow_mode = IncludeInferiors;
 605     scrPtr->ixorGC = XCreateGC(display, W_DRAWABLE(scrPtr), GCFunction
 606                                |GCGraphicsExposures|GCForeground
 607                                |GCSubwindowMode, &gcv);
 608
 609     gcv.function = GXcopy;
 610     scrPtr->copyGC = XCreateGC(display, W_DRAWABLE(scrPtr), GCFunction
 611                                |GCGraphicsExposures, &gcv);
 612
 613     scrPtr->clipGC = XCreateGC(display, W_DRAWABLE(scrPtr), GCFunction
 614                                |GCGraphicsExposures, &gcv);
 615
 616
 617     stipple = XCreateBitmapFromData(display, W_DRAWABLE(scrPtr),
 618                                     STIPPLE_BITS, STIPPLE_WIDTH, STIPPLE_HEIGHT);
 619     gcv.foreground = W_PIXEL(scrPtr->darkGray);
 620     gcv.background = W_PIXEL(scrPtr->gray);
 621     gcv.fill_style = FillStippled;
 622     gcv.stipple = stipple;
 623     scrPtr->stippleGC = XCreateGC(display, W_DRAWABLE(scrPtr),
 624                                   GCForeground|GCBackground|GCStipple
 625                                   |GCFillStyle|GCGraphicsExposures, &gcv);
 626
 627     gcv.foreground = W_PIXEL(scrPtr->black);
 628     gcv.background = W_PIXEL(scrPtr->white);
 629     scrPtr->textFieldGC = XCreateGC(display, W_DRAWABLE(scrPtr),
 630                                     GCForeground|GCBackground, &gcv);
 631
 632     /* we need a 1bpp drawable for the monoGC, so borrow this one */
 633     scrPtr->monoGC = XCreateGC(display, stipple, 0, NULL);
 634
 635     XFreePixmap(display, stipple);
 636
 637
 638     scrPtr->normalFont = WMSystemFontOfSize(scrPtr, 12);
 639
 640     scrPtr->boldFont = WMBoldSystemFontOfSize(scrPtr, 12);
 641
 642     if (!scrPtr->boldFont)
 643         scrPtr->boldFont = scrPtr->normalFont;
 644
 645     if (!scrPtr->normalFont) {
 646         wwarning("could not load any fonts. Make sure your font installation"
 647                  "and locale settings are correct.");
 648
 649         return NULL;
 650     }
 651
 652     scrPtr->checkButtonImageOn = makePixmap(scrPtr, CHECK_BUTTON_ON,
 653                                             CHECK_BUTTON_ON_WIDTH,
 654                                             CHECK_BUTTON_ON_HEIGHT, False);
 655
 656     scrPtr->checkButtonImageOff = makePixmap(scrPtr, CHECK_BUTTON_OFF,
 657                                             CHECK_BUTTON_OFF_WIDTH,
 658                                             CHECK_BUTTON_OFF_HEIGHT, False);
 659
 660     scrPtr->radioButtonImageOn = makePixmap(scrPtr, RADIO_BUTTON_ON,
 661                                             RADIO_BUTTON_ON_WIDTH,
 662                                             RADIO_BUTTON_ON_HEIGHT, False);
 663
 664     scrPtr->radioButtonImageOff = makePixmap(scrPtr, RADIO_BUTTON_OFF,
 665                                             RADIO_BUTTON_OFF_WIDTH,
 666                                             RADIO_BUTTON_OFF_HEIGHT, False);
 667
 668     scrPtr->buttonArrow = makePixmap(scrPtr, BUTTON_ARROW,
 669                                      BUTTON_ARROW_WIDTH, BUTTON_ARROW_HEIGHT,
 670                                      False);
 671
 672     scrPtr->pushedButtonArrow = makePixmap(scrPtr, BUTTON_ARROW2,
 673                                    BUTTON_ARROW2_WIDTH, BUTTON_ARROW2_HEIGHT,
 674                                    False);
 675
 676
 677     scrPtr->scrollerDimple = makePixmap(scrPtr, SCROLLER_DIMPLE,
 678                                         SCROLLER_DIMPLE_WIDTH,
 679                                         SCROLLER_DIMPLE_HEIGHT, False);
 680
 681
 682     scrPtr->upArrow = makePixmap(scrPtr, SCROLLER_ARROW_UP,
 683                                  SCROLLER_ARROW_UP_WIDTH,
 684                                  SCROLLER_ARROW_UP_HEIGHT, True);
 685
 686     scrPtr->downArrow = makePixmap(scrPtr, SCROLLER_ARROW_DOWN,
 687                                    SCROLLER_ARROW_DOWN_WIDTH,
 688                                    SCROLLER_ARROW_DOWN_HEIGHT, True);
 689
 690     scrPtr->leftArrow = makePixmap(scrPtr, SCROLLER_ARROW_LEFT,
 691                                    SCROLLER_ARROW_LEFT_WIDTH,
 692                                    SCROLLER_ARROW_LEFT_HEIGHT, True);
 693
 694     scrPtr->rightArrow = makePixmap(scrPtr, SCROLLER_ARROW_RIGHT,
 695                                     SCROLLER_ARROW_RIGHT_WIDTH,
 696                                     SCROLLER_ARROW_RIGHT_HEIGHT, True);
 697
 698     scrPtr->hiUpArrow = makePixmap(scrPtr, HI_SCROLLER_ARROW_UP,
 699                                  SCROLLER_ARROW_UP_WIDTH,
 700                                  SCROLLER_ARROW_UP_HEIGHT, True);
 701
 702     scrPtr->hiDownArrow = makePixmap(scrPtr, HI_SCROLLER_ARROW_DOWN,
 703                                    SCROLLER_ARROW_DOWN_WIDTH,
 704                                    SCROLLER_ARROW_DOWN_HEIGHT, True);
 705
 706     scrPtr->hiLeftArrow = makePixmap(scrPtr, HI_SCROLLER_ARROW_LEFT,
 707                                    SCROLLER_ARROW_LEFT_WIDTH,
 708                                    SCROLLER_ARROW_LEFT_HEIGHT, True);
 709
 710     scrPtr->hiRightArrow = makePixmap(scrPtr, HI_SCROLLER_ARROW_RIGHT,
 711                                     SCROLLER_ARROW_RIGHT_WIDTH,
 712                                     SCROLLER_ARROW_RIGHT_HEIGHT, True);
 713
 714     scrPtr->popUpIndicator = makePixmap(scrPtr, POPUP_INDICATOR,
 715                                         POPUP_INDICATOR_WIDTH,
 716                                         POPUP_INDICATOR_HEIGHT, True);
 717
 718     scrPtr->pullDownIndicator = makePixmap(scrPtr, PULLDOWN_INDICATOR,
 719                                            PULLDOWN_INDICATOR_WIDTH,
 720                                            PULLDOWN_INDICATOR_HEIGHT, True);
 721
 722     scrPtr->checkMark = makePixmap(scrPtr, CHECK_MARK,
 723                                    CHECK_MARK_WIDTH,
 724                                    CHECK_MARK_HEIGHT, True);
 725
 726     loadPixmaps(scrPtr);
 727
 728     scrPtr->defaultCursor = XCreateFontCursor(display, XC_left_ptr);
 729
 730     scrPtr->textCursor = XCreateFontCursor(display, XC_xterm);
 731
 732     scrPtr->internalMessage = XInternAtom(display, "_WINGS_MESSAGE", False);
 733
 734     scrPtr->attribsAtom = XInternAtom(display, "_GNUSTEP_WM_ATTR", False);
 735
 736     scrPtr->deleteWindowAtom = XInternAtom(display, "WM_DELETE_WINDOW", False);
 737
 738     scrPtr->protocolsAtom = XInternAtom(display, "WM_PROTOCOLS", False);
 739
 740     scrPtr->clipboardAtom = XInternAtom(display, "CLIPBOARD", False);
 741
 742     scrPtr->rootView = W_CreateRootView(scrPtr);
 743
 744     W_InitApplication(scrPtr);
 745
 746     return scrPtr;
 747 }
 748
 749
 750 void
 751 WMHangData(WMWidget *widget, void *data)
 752 {
 753     W_VIEW(widget)->hangedData = data;
 754 }
 755
 756
 757 void*
 758 WMGetHangedData(WMWidget *widget)
 759 {
 760     return W_VIEW(widget)->hangedData;
 761 }
 762
 763
 764
 765 void
 766 WMDestroyWidget(WMWidget *widget)
 767 {
 768     W_DestroyView(W_VIEW(widget));
 769 }
 770
 771
 772 void
 773 WMSetFocusToWidget(WMWidget *widget)
 774 {
 775     W_SetFocusOfTopLevel(W_TopLevelOfView(W_VIEW(widget)), W_VIEW(widget));
 776 }
 777
 778
 779 /*
 780  * WMRealizeWidget-
 781  *      Realizes the widget and all it's children.
 782  *
 783  */
 784 void
 785 WMRealizeWidget(WMWidget *w)
 786 {
 787     W_RealizeView(W_VIEW(w));
 788 }
 789
 790 void
 791 WMMapWidget(WMWidget *w)
 792 {
 793     W_MapView(W_VIEW(w));
 794 }
 795
 796
 797 static void
 798 makeChildrenAutomap(W_View *view, int flag)
 799 {
 800     view = view->childrenList;
 801
 802     while (view) {
 803         view->flags.mapWhenRealized = flag;
 804         makeChildrenAutomap(view, flag);
 805
 806         view = view->nextSister;
 807     }
 808 }
 809
 810
 811 void
 812 WMMapSubwidgets(WMWidget *w)
 813 {
 814     /* make sure that subwidgets created after the parent was realized
 815      * are mapped too */
 816     if (!W_VIEW(w)->flags.realized) {
 817         makeChildrenAutomap(W_VIEW(w), True);
 818     } else {
 819         W_MapSubviews(W_VIEW(w));
 820     }
 821 }
 822
 823
 824 void
 825 WMUnmapSubwidgets(WMWidget *w)
 826 {
 827     if (!W_VIEW(w)->flags.realized) {
 828         makeChildrenAutomap(W_VIEW(w), False);
 829     } else {
 830         W_UnmapSubviews(W_VIEW(w));
 831     }
 832 }
 833
 834
 835
 836 void
 837 WMUnmapWidget(WMWidget *w)
 838 {
 839     W_UnmapView(W_VIEW(w));
 840 }
 841
 842
 843 void
 844 WMSetWidgetBackgroundColor(WMWidget *w, WMColor *color)
 845 {
 846     if (W_CLASS(w) < WC_UserWidget
 847         && procedureTables[W_CLASS(w)]->setBackgroundColor) {
 848
 849         (*procedureTables[W_CLASS(w)]->setBackgroundColor)(w, color);
 850
 851     } else if (W_CLASS(w) >= WC_UserWidget
 852         && userProcedureTable[W_CLASS(w)-WC_UserWidget]->setBackgroundColor) {
 853
 854         (*userProcedureTable[W_CLASS(w)-WC_UserWidget]->setBackgroundColor)(w, color);
 855
 856     } else {
 857         W_SetViewBackgroundColor(W_VIEW(w), color);
 858     }
 859 }
 860
 861
 862 void
 863 WMMoveWidget(WMWidget *w, int x, int y)
 864 {
 865     if (W_CLASS(w) < WC_UserWidget
 866         && procedureTables[W_CLASS(w)]->move) {
 867
 868         (*procedureTables[W_CLASS(w)]->move)(w, x, y);
 869
 870     } else if (W_CLASS(w) >= WC_UserWidget
 871         && userProcedureTable[W_CLASS(w)-WC_UserWidget]->move) {
 872
 873         (*userProcedureTable[W_CLASS(w)-WC_UserWidget]->move)(w, x, y);
 874
 875     } else {
 876         W_MoveView(W_VIEW(w), x, y);
 877     }
 878 }
 879
 880
 881 void
 882 WMResizeWidget(WMWidget *w, unsigned int width, unsigned int height)
 883 {
 884     if (W_CLASS(w) < WC_UserWidget
 885         && procedureTables[W_CLASS(w)]->resize) {
 886
 887         (*procedureTables[W_CLASS(w)]->resize)(w, width, height);
 888
 889     } else if (W_CLASS(w) >= WC_UserWidget
 890                && userProcedureTable[W_CLASS(w)-WC_UserWidget]->resize) {
 891
 892         (*userProcedureTable[W_CLASS(w)-WC_UserWidget]->resize)(w, width, height);
 893
 894     } else {
 895         W_ResizeView(W_VIEW(w), width, height);
 896     }
 897 }
 898
 899
 900
 901 W_Class
 902 W_RegisterUserWidget(W_ViewProcedureTable *procTable)
 903 {
 904     W_ViewProcedureTable **newTable;
 905
 906     userWidgetCount++;
 907     newTable = wmalloc(sizeof(W_ViewProcedureTable*)*userWidgetCount);
 908     memcpy(newTable, userProcedureTable,
 909            sizeof(W_ViewProcedureTable*)*(userWidgetCount-1));
 910
 911     newTable[userWidgetCount-1] = procTable;
 912
 913     free(userProcedureTable);
 914
 915     userProcedureTable = newTable;
 916
 917     return userWidgetCount + WC_UserWidget - 1;
 918 }
 919
 920
 921
 922 RContext*
 923 WMScreenRContext(WMScreen *scr)
 924 {
 925     return scr->rcontext;
 926 }
 927
 928
 929
 930 unsigned int
 931 WMWidgetWidth(WMWidget *w)
 932 {
 933     return W_VIEW(w)->size.width;
 934 }
 935
 936
 937 unsigned int
 938 WMWidgetHeight(WMWidget *w)
 939 {
 940     return W_VIEW(w)->size.height;
 941 }
 942
 943
 944 Window
 945 WMWidgetXID(WMWidget *w)
 946 {
 947     return W_VIEW(w)->window;
 948 }
 949
 950
 951 WMScreen*
 952 WMWidgetScreen(WMWidget *w)
 953 {
 954     return W_VIEW(w)->screen;
 955 }
 956
 957
 958
 959 void
 960 WMScreenMainLoop(WMScreen *scr)
 961 {
 962     XEvent event;
 963
 964     while (1) {
 965         WMNextEvent(scr->display, &event);
 966         WMHandleEvent(&event);
 967     }
 968 }
 969
 970
 971
 972 Display*
 973 WMScreenDisplay(WMScreen *scr)
 974 {
 975     return scr->display;
 976 }
 977
 978
 979 int
 980 WMScreenDepth(WMScreen *scr)
 981 {
 982     return scr->depth;
 983 }
 984
 985
 986 void
 987 WMRedisplayWidget(WMWidget *w)
 988 {
 989     W_RedisplayView(W_VIEW(w));
 990 }
 991