WINGs/wwindow.c

   1
   2 #include <X11/Xmd.h>
   3
   4 #include "WINGsP.h"
   5
   6 #include <X11/Xatom.h>
   7
   8
   9 typedef struct W_Window {
  10     W_Class widgetClass;
  11     W_View *view;
  12
  13     struct W_Window *nextPtr;          /* next in the window list */
  14
  15     struct W_Window *owner;
  16
  17     char *title;
  18
  19     WMPixmap *miniImage;               /* miniwindow */
  20     char *miniTitle;
  21
  22     char *wname;
  23
  24     WMSize resizeIncrement;
  25     WMSize baseSize;
  26     WMSize minSize;
  27     WMSize maxSize;
  28     WMPoint minAspect;
  29     WMPoint maxAspect;
  30
  31     WMPoint upos;
  32
  33     WMAction *closeAction;
  34     void *closeData;
  35
  36     int level;
  37
  38     struct {
  39         unsigned style:4;
  40         unsigned configured:1;
  41         unsigned documentEdited:1;
  42
  43         unsigned setUPos:1;
  44         unsigned setAspect:1;
  45     } flags;
  46 } _Window;
  47
  48
  49
  50 typedef struct {
  51     CARD32 flags;
  52     CARD32 window_style;
  53     CARD32 window_level;
  54     CARD32 reserved;
  55     Pixmap miniaturize_pixmap;         /* pixmap for miniaturize button */
  56     Pixmap close_pixmap;               /* pixmap for close button */
  57     Pixmap miniaturize_mask;           /* miniaturize pixmap mask */
  58     Pixmap close_mask;                 /* close pixmap mask */
  59     CARD32 extra_flags;
  60 } GNUstepWMAttributes;
  61
  62 #define GSWindowStyleAttr       (1<<0)
  63 #define GSWindowLevelAttr       (1<<1)
  64 #define GSMiniaturizePixmapAttr (1<<3)
  65 #define GSClosePixmapAttr       (1<<4)
  66 #define GSMiniaturizeMaskAttr   (1<<5)
  67 #define GSCloseMaskAttr         (1<<6)
  68 #define GSExtraFlagsAttr        (1<<7)
  69
  70 /* extra flags */
  71 #define GSDocumentEditedFlag    (1<<0)
  72 #define GSNoApplicationIconFlag (1<<5)
  73
  74 #define WMFHideOtherApplications        10
  75 #define WMFHideApplication              12
  76
  77
  78
  79 static void willResizeWindow(W_ViewDelegate *, WMView *, unsigned*, unsigned*);
  80
  81 struct W_ViewDelegate _WindowViewDelegate = {
  82     NULL,
  83         NULL,
  84         NULL,
  85         NULL,
  86         willResizeWindow
  87 };
  88
  89
  90 #define DEFAULT_WIDTH   400
  91 #define DEFAULT_HEIGHT  180
  92 #define DEFAULT_TITLE   ""
  93
  94
  95 static void destroyWindow(_Window *win);
  96
  97 static void handleEvents();
  98
  99 static void realizeWindow();
 100
 101 static void
 102 realizeObserver(void *self, WMNotification *not)
 103 {
 104     realizeWindow(self);
 105 }
 106
 107
 108 WMWindow*
 109 WMCreatePanelWithStyleForWindow(WMWindow *owner, char *name, int style)
 110 {
 111     WMWindow *win;
 112
 113     win = WMCreateWindowWithStyle(owner->view->screen, name, style);
 114     win->owner = owner;
 115
 116     return win;
 117 }
 118
 119
 120
 121 WMWindow*
 122 WMCreatePanelForWindow(WMWindow *owner, char *name)
 123 {
 124     return WMCreatePanelWithStyleForWindow(owner, name,
 125                                            WMTitledWindowMask
 126                                            |WMClosableWindowMask
 127                                            |WMResizableWindowMask);
 128 }
 129
 130
 131 void
 132 WMChangePanelOwner(WMWindow *win, WMWindow *newOwner)
 133 {
 134     win->owner = newOwner;
 135
 136     if (win->view->flags.realized && newOwner) {
 137         XSetTransientForHint(win->view->screen->display, win->view->window,
 138                              newOwner->view->window);
 139     }
 140 }
 141
 142
 143
 144 WMWindow*
 145 WMCreateWindow(WMScreen *screen, char *name)
 146 {
 147     return WMCreateWindowWithStyle(screen, name, WMTitledWindowMask
 148                                    |WMClosableWindowMask
 149                                    |WMMiniaturizableWindowMask
 150                                    |WMResizableWindowMask);
 151 }
 152
 153
 154
 155 WMWindow*
 156 WMCreateWindowWithStyle(WMScreen *screen, char *name, int style)
 157 {
 158     _Window *win;
 159
 160     win = wmalloc(sizeof(_Window));
 161     memset(win, 0, sizeof(_Window));
 162
 163     win->widgetClass = WC_Window;
 164
 165     win->view = W_CreateTopView(screen);
 166     if (!win->view) {
 167         wfree(win);
 168         return NULL;
 169     }
 170     win->view->self = win;
 171
 172     win->view->delegate = &_WindowViewDelegate;
 173
 174     win->wname = wstrdup(name);
 175
 176     /* add to the window list of the screen (application) */
 177     win->nextPtr = screen->windowList;
 178     screen->windowList = win;
 179
 180     WMCreateEventHandler(win->view, ExposureMask|StructureNotifyMask
 181                          |ClientMessageMask|FocusChangeMask,
 182                          handleEvents, win);
 183
 184     W_ResizeView(win->view, DEFAULT_WIDTH, DEFAULT_HEIGHT);
 185
 186     WMAddNotificationObserver(realizeObserver, win,
 187                               WMViewRealizedNotification, win->view);
 188
 189     win->flags.style = style;
 190
 191     win->level = WMNormalWindowLevel;
 192
 193     /* kluge. Find a better solution */
 194     W_SetFocusOfTopLevel(win->view, win->view);
 195
 196     return win;
 197 }
 198
 199
 200 void
 201 WMSetWindowTitle(WMWindow *win, char *title)
 202 {
 203     XTextProperty property;
 204     int result;
 205
 206     if (win->title!=NULL)
 207         wfree(win->title);
 208     if (title!=NULL)
 209         win->title = wstrdup(title);
 210     else
 211         win->title = NULL;
 212
 213     if (win->view->flags.realized) {
 214         result = XmbTextListToTextProperty (win->view->screen->display,
 215                                             &title, 1, XStdICCTextStyle,
 216                                             &property);
 217         if (result == XNoMemory || result == XLocaleNotSupported) {
 218             wwarning("window title conversion error... using STRING encoding");
 219             XStoreName(win->view->screen->display, win->view->window, title);
 220         } else {
 221             XSetWMName(win->view->screen->display, win->view->window, &property);
 222             if (property.value)
 223                 XFree(property.value);
 224         }
 225     }
 226 }
 227
 228
 229
 230
 231 void
 232 WMSetWindowCloseAction(WMWindow *win, WMAction *action, void *clientData)
 233 {
 234     Atom *atoms = NULL;
 235     Atom *newAtoms;
 236     int count;
 237     WMScreen *scr = win->view->screen;
 238
 239     if (win->view->flags.realized) {
 240         if (action && !win->closeAction) {
 241             if (!XGetWMProtocols(scr->display, win->view->window, &atoms,
 242                                 &count)) {
 243                 count = 0;
 244             }
 245             newAtoms = wmalloc((count+1)*sizeof(Atom));
 246             if (count > 0)
 247                 memcpy(newAtoms, atoms, count*sizeof(Atom));
 248             newAtoms[count++] = scr->deleteWindowAtom;
 249             XSetWMProtocols(scr->display, win->view->window, newAtoms, count);
 250             if (atoms)
 251                 XFree(atoms);
 252             wfree(newAtoms);
 253         } else if (!action && win->closeAction) {
 254             int i, ncount;
 255
 256             if (XGetWMProtocols(scr->display, win->view->window, &atoms,
 257                                  &count) && count>0) {
 258                 newAtoms = wmalloc((count-1)*sizeof(Atom));
 259                 ncount = 0;
 260                 for (i=0; i < count; i++) {
 261                     if (atoms[i]!=scr->deleteWindowAtom) {
 262                         newAtoms[i] = atoms[i];
 263                         ncount++;
 264                     }
 265                 }
 266                 XSetWMProtocols(scr->display, win->view->window, newAtoms,
 267                                 ncount);
 268                 if (atoms)
 269                     XFree(atoms);
 270                 wfree(newAtoms);
 271             }
 272         }
 273     }
 274     win->closeAction = action;
 275     win->closeData = clientData;
 276 }
 277
 278
 279
 280 static void
 281 willResizeWindow(W_ViewDelegate *self, WMView *view,
 282              unsigned *width, unsigned *height)
 283 {
 284     WMWindow *win = (WMWindow*)view->self;
 285
 286     if (win->minSize.width > 0 && win->minSize.height > 0) {
 287         if (*width < win->minSize.width)
 288             *width = win->minSize.width;
 289         if (*height < win->minSize.height)
 290             *height = win->minSize.height;
 291     }
 292
 293     if (win->maxSize.width > 0 && win->maxSize.height > 0) {
 294         if (*width > win->maxSize.width)
 295             *width = win->maxSize.width;
 296         if (*height > win->maxSize.height)
 297             *height = win->maxSize.height;
 298     }
 299 }
 300
 301
 302 static void
 303 setSizeHints(WMWindow *win)
 304 {
 305     XSizeHints *hints;
 306
 307     hints = XAllocSizeHints();
 308     if (!hints) {
 309         wwarning("could not allocate memory for window size hints");
 310         return;
 311     }
 312
 313     hints->flags = 0;
 314
 315     if (win->flags.setUPos) {
 316         hints->flags |= USPosition;
 317         hints->x = win->upos.x;
 318         hints->y = win->upos.y;
 319     }
 320     if (win->minSize.width>0 && win->minSize.height>0) {
 321         hints->flags |= PMinSize;
 322         hints->min_width = win->minSize.width;
 323         hints->min_height = win->minSize.height;
 324     }
 325     if (win->maxSize.width>0 && win->maxSize.height>0) {
 326         hints->flags |= PMaxSize;
 327         hints->max_width = win->maxSize.width;
 328         hints->max_height = win->maxSize.height;
 329     }
 330     if (win->baseSize.width>0 && win->baseSize.height>0) {
 331         hints->flags |= PBaseSize;
 332         hints->base_width = win->baseSize.width;
 333         hints->base_height = win->baseSize.height;
 334     }
 335     if (win->resizeIncrement.width>0 && win->resizeIncrement.height>0) {
 336         hints->flags |= PResizeInc;
 337         hints->width_inc = win->resizeIncrement.width;
 338         hints->height_inc = win->resizeIncrement.height;
 339     }
 340     if (win->flags.setAspect) {
 341         hints->flags |= PAspect;
 342         hints->min_aspect.x = win->minAspect.x;
 343         hints->min_aspect.y = win->minAspect.y;
 344         hints->max_aspect.x = win->maxAspect.x;
 345         hints->max_aspect.y = win->maxAspect.y;
 346     }
 347
 348
 349     if (hints->flags) {
 350         XSetWMNormalHints(win->view->screen->display, win->view->window, hints);
 351     }
 352     XFree(hints);
 353 }
 354
 355
 356
 357 static void
 358 writeGNUstepWMAttr(WMScreen *scr, Window window, GNUstepWMAttributes *attr)
 359 {
 360     unsigned long data[9];
 361
 362     /* handle idiot compilers where array of CARD32 != struct of CARD32 */
 363     data[0] = attr->flags;
 364     data[1] = attr->window_style;
 365     data[2] = attr->window_level;
 366     data[3] = 0;                       /* reserved */
 367     /* The X protocol says XIDs are 32bit */
 368     data[4] = attr->miniaturize_pixmap;
 369     data[5] = attr->close_pixmap;
 370     data[6] = attr->miniaturize_mask;
 371     data[7] = attr->close_mask;
 372     data[8] = attr->extra_flags;
 373     XChangeProperty(scr->display, window, scr->attribsAtom, scr->attribsAtom,
 374                     32, PropModeReplace,  (unsigned char *)data, 9);
 375 }
 376
 377
 378 static void
 379 setWindowMakerHints(WMWindow *win)
 380 {
 381     GNUstepWMAttributes attribs;
 382     WMScreen *scr = WMWidgetScreen(win);
 383
 384     memset(&attribs, 0, sizeof(GNUstepWMAttributes));
 385     attribs.flags = GSWindowStyleAttr|GSWindowLevelAttr|GSExtraFlagsAttr;
 386     attribs.window_style = win->flags.style;
 387     attribs.window_level = win->level;
 388     if (win->flags.documentEdited)
 389         attribs.extra_flags = GSDocumentEditedFlag;
 390     else
 391         attribs.extra_flags = 0;
 392
 393     writeGNUstepWMAttr(scr, win->view->window, &attribs);
 394 }
 395
 396
 397 static void
 398 realizeWindow(WMWindow *win)
 399 {
 400     XWMHints *hints;
 401     XClassHint *classHint;
 402     WMScreen *scr = win->view->screen;
 403     Atom atoms[4];
 404     int count;
 405
 406     classHint = XAllocClassHint();
 407     classHint->res_name = win->wname;
 408     classHint->res_class = WMGetApplicationName();
 409     XSetClassHint(scr->display, win->view->window, classHint);
 410     XFree(classHint);
 411
 412     hints = XAllocWMHints();
 413     hints->flags = 0;
 414     if (!scr->aflags.simpleApplication) {
 415         hints->flags |= WindowGroupHint;
 416         hints->window_group = scr->groupLeader;
 417     }
 418     if (win->miniImage) {
 419         hints->flags |= IconPixmapHint;
 420         hints->icon_pixmap = WMGetPixmapXID(win->miniImage);
 421         hints->icon_mask = WMGetPixmapMaskXID(win->miniImage);
 422         if (hints->icon_mask != None) {
 423             hints->flags |= IconMaskHint;
 424         }
 425     }
 426     if (hints->flags != 0)
 427         XSetWMHints(scr->display, win->view->window, hints);
 428     XFree(hints);
 429
 430     count = 0;
 431     if (win->closeAction) {
 432         atoms[count++] = scr->deleteWindowAtom;
 433     }
 434
 435     if (count>0)
 436         XSetWMProtocols(scr->display, win->view->window, atoms, count);
 437
 438     if (win->title || win->miniTitle)
 439         XmbSetWMProperties(scr->display, win->view->window, win->title,
 440                            win->miniTitle, NULL, 0, NULL, NULL, NULL);
 441
 442     setWindowMakerHints(win);
 443
 444     setSizeHints(win);
 445
 446     if (win->owner) {
 447         XSetTransientForHint(scr->display, win->view->window,
 448                              win->owner->view->window);
 449     }
 450 }
 451
 452
 453
 454 void
 455 WMSetWindowAspectRatio(WMWindow *win, int minX, int minY,
 456                        int maxX, int maxY)
 457 {
 458     win->flags.setAspect = 1;
 459     win->minAspect.x = minX;
 460     win->minAspect.y = minY;
 461     win->maxAspect.x = maxX;
 462     win->maxAspect.y = maxY;
 463     if (win->view->flags.realized)
 464         setSizeHints(win);
 465 }
 466
 467
 468
 469 void
 470 WMSetWindowInitialPosition(WMWindow *win, int x, int y)
 471 {
 472     win->flags.setUPos = 1;
 473     win->upos.x = x;
 474     win->upos.y = y;
 475     if (win->view->flags.realized)
 476         setSizeHints(win);
 477 }
 478
 479
 480
 481
 482 void
 483 WMSetWindowMinSize(WMWindow *win, unsigned width, unsigned height)
 484 {
 485     win->minSize.width = width;
 486     win->minSize.height = height;
 487     if (win->view->flags.realized)
 488         setSizeHints(win);
 489 }
 490
 491
 492
 493 void
 494 WMSetWindowMaxSize(WMWindow *win, unsigned width, unsigned height)
 495 {
 496     win->maxSize.width = width;
 497     win->maxSize.height = height;
 498     if (win->view->flags.realized)
 499         setSizeHints(win);
 500 }
 501
 502
 503 void
 504 WMSetWindowBaseSize(WMWindow *win, unsigned width, unsigned height)
 505 {
 506     /* TODO: validate sizes */
 507     win->baseSize.width = width;
 508     win->baseSize.height = height;
 509     if (win->view->flags.realized)
 510         setSizeHints(win);
 511 }
 512
 513
 514 void
 515 WMSetWindowResizeIncrements(WMWindow *win, unsigned wIncr, unsigned hIncr)
 516 {
 517     win->resizeIncrement.width = wIncr;
 518     win->resizeIncrement.height = hIncr;
 519     if (win->view->flags.realized)
 520         setSizeHints(win);
 521 }
 522
 523
 524 void
 525 WMSetWindowLevel(WMWindow *win, int level)
 526 {
 527     win->level = level;
 528     if (win->view->flags.realized)
 529         setWindowMakerHints(win);
 530 }
 531
 532
 533 void
 534 WMSetWindowDocumentEdited(WMWindow *win, Bool flag)
 535 {
 536     if (win->flags.documentEdited != flag) {
 537         win->flags.documentEdited = flag;
 538         if (win->view->flags.realized)
 539             setWindowMakerHints(win);
 540     }
 541 }
 542
 543
 544 void
 545 WMSetWindowMiniwindowImage(WMWindow *win, WMPixmap *pixmap)
 546 {
 547     if ((win->miniImage && !pixmap) || (!win->miniImage && pixmap)) {
 548         if (win->miniImage)
 549             WMReleasePixmap(win->miniImage);
 550
 551         if (pixmap)
 552             win->miniImage = WMRetainPixmap(pixmap);
 553         else
 554             win->miniImage = NULL;
 555
 556         if (win->view->flags.realized) {
 557             XWMHints *hints;
 558
 559             hints = XGetWMHints(win->view->screen->display, win->view->window);
 560             if (!hints) {
 561                 hints = XAllocWMHints();
 562                 if (!hints) {
 563                     wwarning("could not allocate memory for WM hints");
 564                     return;
 565                 }
 566                 hints->flags = 0;
 567             }
 568             if (pixmap) {
 569                 hints->flags |= IconPixmapHint;
 570                 hints->icon_pixmap = WMGetPixmapXID(pixmap);
 571                 hints->icon_mask = WMGetPixmapMaskXID(pixmap);
 572                 if (hints->icon_mask != None) {
 573                     hints->flags |= IconMaskHint;
 574                 }
 575             }
 576             XSetWMHints(win->view->screen->display, win->view->window, hints);
 577             XFree(hints);
 578         }
 579     }
 580 }
 581
 582
 583 void
 584 WMSetWindowMiniwindowTitle(WMWindow *win, char *title)
 585 {
 586     XTextProperty property;
 587     int result;
 588
 589     if ((win->miniTitle && !title) || (!win->miniTitle && title)
 590         || (title && win->miniTitle && strcoll(title, win->miniTitle)!=0)) {
 591         if (win->miniTitle)
 592             wfree(win->miniTitle);
 593
 594         if (title)
 595             win->miniTitle = wstrdup(title);
 596         else
 597             win->miniTitle = NULL;
 598
 599         if (win->view->flags.realized) {
 600             result = XmbTextListToTextProperty (win->view->screen->display,
 601                                                 &title, 1, XStdICCTextStyle,
 602                                                 &property);
 603             if (result == XNoMemory || result == XLocaleNotSupported) {
 604                 wwarning("icon title conversion error..using STRING encoding");
 605                 XSetIconName(win->view->screen->display, win->view->window,
 606                              title);
 607             } else {
 608                 XSetWMIconName(win->view->screen->display, win->view->window,
 609                                &property);
 610                 if (property.value)
 611                     XFree(property.value);
 612             }
 613         }
 614     }
 615 }
 616
 617
 618 void
 619 WMCloseWindow(WMWindow *win)
 620 {
 621     WMUnmapWidget(win);
 622     /* withdraw the window */
 623     if (win->view->flags.realized)
 624         XWithdrawWindow(win->view->screen->display, win->view->window,
 625                         win->view->screen->screen);
 626 }
 627
 628
 629 static void
 630 handleEvents(XEvent *event, void *clientData)
 631 {
 632     _Window *win = (_Window*)clientData;
 633     W_View *view = win->view;
 634
 635
 636     switch (event->type) {
 637      case ClientMessage:
 638         if (event->xclient.message_type == win->view->screen->protocolsAtom
 639             && event->xclient.format == 32
 640             && event->xclient.data.l[0]==win->view->screen->deleteWindowAtom) {
 641
 642             if (win->closeAction) {
 643                 (*win->closeAction)(win, win->closeData);
 644             }
 645         }
 646         break;
 647
 648      case UnmapNotify:
 649         WMUnmapWidget(win);
 650         break;
 651
 652      case DestroyNotify:
 653         destroyWindow(win);
 654         break;
 655
 656      case ConfigureNotify:
 657         if (event->xconfigure.width != view->size.width
 658             || event->xconfigure.height != view->size.height) {
 659
 660             view->size.width = event->xconfigure.width;
 661             view->size.height = event->xconfigure.height;
 662
 663             if (view->flags.notifySizeChanged) {
 664                 WMPostNotificationName(WMViewSizeDidChangeNotification,
 665                                        view, NULL);
 666             }
 667         }
 668         if (event->xconfigure.x != view->pos.x
 669             || event->xconfigure.y != view->pos.y) {
 670
 671             if (event->xconfigure.send_event) {
 672                 view->pos.x = event->xconfigure.x;
 673                 view->pos.y = event->xconfigure.y;
 674             } else {
 675                 Window foo;
 676
 677                 XTranslateCoordinates(view->screen->display,
 678                                       view->window, view->screen->rootWin,
 679                                       event->xconfigure.x, event->xconfigure.y,
 680                                       &view->pos.x, &view->pos.y, &foo);
 681             }
 682         }
 683         break;
 684     }
 685 }
 686
 687
 688
 689
 690 static void
 691 destroyWindow(_Window *win)
 692 {
 693     WMScreen *scr = win->view->screen;
 694
 695     WMRemoveNotificationObserver(win);
 696
 697     if (scr->windowList == win) {
 698         scr->windowList = scr->windowList->nextPtr;
 699     } else {
 700         WMWindow *ptr;
 701         ptr = scr->windowList;
 702
 703         if (ptr) {
 704             while (ptr->nextPtr) {
 705                 if (ptr->nextPtr==win) {
 706                     ptr->nextPtr = ptr->nextPtr->nextPtr;
 707                     break;
 708                 }
 709                 ptr = ptr->nextPtr;
 710             }
 711         }
 712     }
 713
 714     if (win->title) {
 715         wfree(win->title);
 716     }
 717
 718     if (win->miniTitle) {
 719         wfree(win->miniTitle);
 720     }
 721
 722     if (win->miniImage) {
 723         WMReleasePixmap(win->miniImage);
 724     }
 725
 726     if (win->wname)
 727         wfree(win->wname);
 728
 729     wfree(win);
 730 }
 731
 732