src/application.c

   1 /*
   2  *  Window Maker window manager
   3  *
   4  *  Copyright (c) 1997-2003 Alfredo K. Kojima
   5  *  Copyright (c) 1998-2003 Dan Pascu
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; either version 2 of the License, or
  10  *  (at your option) any later version.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, write to the Free Software
  19  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  20  *  USA.
  21  */
  22 #include "wconfig.h"
  23
  24 #include <X11/Xlib.h>
  25
  26 #include <stdlib.h>
  27 #include <string.h>
  28
  29 #include <sys/types.h>
  30 #include <sys/stat.h>
  31 #include <unistd.h>
  32 #include <errno.h>
  33
  34 #include "WindowMaker.h"
  35 #include "menu.h"
  36 #include "window.h"
  37 #ifdef USER_MENU
  38 #include "usermenu.h"
  39 #endif                          /* USER_MENU */
  40 #include "icon.h"
  41 #include "appicon.h"
  42 #include "application.h"
  43 #include "appmenu.h"
  44 #include "properties.h"
  45 #include "funcs.h"
  46 #include "stacking.h"
  47 #include "actions.h"
  48 #include "defaults.h"
  49 #include "workspace.h"
  50 #include "dock.h"
  51
  52 #include "xinerama.h"
  53
  54 /******** Global variables ********/
  55
  56 extern XContext wAppWinContext;
  57 extern XContext wWinContext;
  58 extern WPreferences wPreferences;
  59
  60 extern WDDomain *WDWindowAttributes;
  61
  62 /******** Local variables ********/
  63
  64 static WWindow *makeMainWindow(WScreen * scr, Window window)
  65 {
  66         WWindow *wwin;
  67         XWindowAttributes attr;
  68
  69         if (!XGetWindowAttributes(dpy, window, &attr)) {
  70                 return NULL;
  71         }
  72
  73         wwin = wWindowCreate();
  74         wwin->screen_ptr = scr;
  75         wwin->client_win = window;
  76         wwin->main_window = window;
  77         wwin->wm_hints = XGetWMHints(dpy, window);
  78         /*    if (!MyXFetchName(dpy, window, &(wwin->frame->title))) {
  79            wwin->frame->title = NULL;
  80            }
  81          */
  82         PropGetWMClass(window, &wwin->wm_class, &wwin->wm_instance);
  83
  84         wDefaultFillAttributes(scr, wwin->wm_instance, wwin->wm_class,
  85                                &wwin->user_flags, &wwin->defined_user_flags, True);
  86
  87         XSelectInput(dpy, window, attr.your_event_mask | PropertyChangeMask | StructureNotifyMask);
  88         return wwin;
  89 }
  90
  91 WApplication *wApplicationOf(Window window)
  92 {
  93         WApplication *wapp;
  94
  95         if (window == None)
  96                 return NULL;
  97         if (XFindContext(dpy, window, wAppWinContext, (XPointer *) & wapp) != XCSUCCESS)
  98                 return NULL;
  99         return wapp;
 100 }
 101
 102 static WAppIcon *findDockIconFor(WDock * dock, Window main_window)
 103 {
 104         WAppIcon *aicon = NULL;
 105
 106         aicon = wDockFindIconForWindow(dock, main_window);
 107         if (!aicon) {
 108                 wDockTrackWindowLaunch(dock, main_window);
 109                 aicon = wDockFindIconForWindow(dock, main_window);
 110         }
 111         return aicon;
 112 }
 113
 114 static void extractIcon(WWindow * wwin)
 115 {
 116         char *progname;
 117
 118         progname = GetProgramNameForWindow(wwin->client_win);
 119         if (progname) {
 120                 wApplicationExtractDirPackIcon(wwin->screen_ptr, progname, wwin->wm_instance, wwin->wm_class);
 121                 wfree(progname);
 122         }
 123 }
 124
 125 static void saveIconNameFor(char *iconPath, char *wm_instance, char *wm_class)
 126 {
 127         WMPropList *dict = WDWindowAttributes->dictionary;
 128         WMPropList *adict, *key, *iconk;
 129         WMPropList *val;
 130         char *tmp;
 131         int i;
 132
 133         i = 0;
 134         if (wm_instance)
 135                 i += strlen(wm_instance);
 136         if (wm_class)
 137                 i += strlen(wm_class);
 138
 139         tmp = wmalloc(i + 8);
 140         *tmp = 0;
 141         if (wm_class && wm_instance) {
 142                 sprintf(tmp, "%s.%s", wm_instance, wm_class);
 143         } else {
 144                 if (wm_instance)
 145                         strcat(tmp, wm_instance);
 146                 if (wm_class)
 147                         strcat(tmp, wm_class);
 148         }
 149
 150         key = WMCreatePLString(tmp);
 151         wfree(tmp);
 152         adict = WMGetFromPLDictionary(dict, key);
 153
 154         iconk = WMCreatePLString("Icon");
 155
 156         if (adict) {
 157                 val = WMGetFromPLDictionary(adict, iconk);
 158         } else {
 159                 /* no dictionary for app, so create one */
 160                 adict = WMCreatePLDictionary(NULL, NULL);
 161                 WMPutInPLDictionary(dict, key, adict);
 162                 WMReleasePropList(adict);
 163                 val = NULL;
 164         }
 165         if (!val) {
 166                 val = WMCreatePLString(iconPath);
 167                 WMPutInPLDictionary(adict, iconk, val);
 168                 WMReleasePropList(val);
 169         }
 170         WMReleasePropList(key);
 171         WMReleasePropList(iconk);
 172
 173         if (val && !wPreferences.flags.noupdates) {
 174                 UpdateDomainFile(WDWindowAttributes);
 175         }
 176 }
 177
 178 void wApplicationExtractDirPackIcon(WScreen * scr, char *path, char *wm_instance, char *wm_class)
 179 {
 180         char *iconPath = NULL;
 181         /* Maybe the app is a .app and it has an icon in it, like
 182          * /usr/local/GNUstep/Applications/WPrefs.app/WPrefs.tiff
 183          */
 184         if (strstr(path, ".app")) {
 185                 char *tmp;
 186
 187                 tmp = wmalloc(strlen(path) + 16);
 188
 189                 if (scr->flags.supports_tiff) {
 190                         strcpy(tmp, path);
 191                         strcat(tmp, ".tiff");
 192                         if (access(tmp, R_OK) == 0)
 193                                 iconPath = tmp;
 194                 }
 195                 if (!path) {
 196                         strcpy(tmp, path);
 197                         strcat(tmp, ".xpm");
 198                         if (access(tmp, R_OK) == 0)
 199                                 iconPath = tmp;
 200                 }
 201                 if (!iconPath)
 202                         wfree(tmp);
 203         }
 204
 205         if (iconPath) {
 206                 saveIconNameFor(iconPath, wm_instance, wm_class);
 207
 208                 wfree(iconPath);
 209         }
 210 }
 211
 212 static Bool extractClientIcon(WAppIcon * icon)
 213 {
 214         char *path;
 215
 216         path = wIconStore(icon->icon);
 217         if (!path)
 218                 return False;
 219
 220         saveIconNameFor(path, icon->wm_instance, icon->wm_class);
 221
 222         wfree(path);
 223
 224         return True;
 225 }
 226
 227 WApplication *wApplicationCreate(WWindow * wwin)
 228 {
 229         WScreen *scr = wwin->screen_ptr;
 230         Window main_window = wwin->main_window;
 231         WApplication *wapp;
 232         WWindow *leader;
 233
 234         if (main_window == None || main_window == scr->root_win) {
 235 #ifdef DEBUG0
 236                 wwarning("trying to create application for %x", (unsigned)main_window);
 237 #endif
 238                 return NULL;
 239         }
 240
 241         {
 242                 Window root;
 243                 int foo;
 244                 unsigned int bar;
 245                 /* check if the window is valid */
 246                 if (!XGetGeometry(dpy, main_window, &root, &foo, &foo, &bar, &bar, &bar, &bar)) {
 247                         return NULL;
 248                 }
 249         }
 250
 251         wapp = wApplicationOf(main_window);
 252         if (wapp) {
 253                 wapp->refcount++;
 254                 if (wapp->app_icon && wapp->app_icon->docked &&
 255                     wapp->app_icon->relaunching && wapp->main_window_desc->fake_group) {
 256                         wDockFinishLaunch(wapp->app_icon->dock, wapp->app_icon);
 257                 }
 258
 259                 return wapp;
 260         }
 261
 262         wapp = wmalloc(sizeof(WApplication));
 263         memset(wapp, 0, sizeof(WApplication));
 264
 265         wapp->refcount = 1;
 266         wapp->last_focused = NULL;
 267
 268         wapp->last_workspace = 0;
 269
 270         wapp->main_window = main_window;
 271         wapp->main_window_desc = makeMainWindow(scr, main_window);
 272         if (!wapp->main_window_desc) {
 273                 wfree(wapp);
 274                 return NULL;
 275         }
 276
 277         wapp->main_window_desc->fake_group = wwin->fake_group;
 278 #ifdef NETWM_HINTS
 279         wapp->main_window_desc->net_icon_image = RRetainImage(wwin->net_icon_image);
 280 #endif
 281
 282         extractIcon(wapp->main_window_desc);
 283
 284         leader = wWindowFor(main_window);
 285         if (leader) {
 286                 leader->main_window = main_window;
 287         }
 288         wapp->menu = wAppMenuGet(scr, main_window);
 289 #ifdef USER_MENU
 290         if (!wapp->menu)
 291                 wapp->menu = wUserMenuGet(scr, wapp->main_window_desc);
 292 #endif                          /* USER_MENU */
 293
 294         /*
 295          * Set application wide attributes from the leader.
 296          */
 297         wapp->flags.hidden = WFLAGP(wapp->main_window_desc, start_hidden);
 298
 299         wapp->flags.emulated = WFLAGP(wapp->main_window_desc, emulate_appicon);
 300
 301         /* application descriptor */
 302         XSaveContext(dpy, main_window, wAppWinContext, (XPointer) wapp);
 303
 304         if (!WFLAGP(wapp->main_window_desc, no_appicon)) {
 305                 wapp->app_icon = NULL;
 306                 if (scr->last_dock)
 307                         wapp->app_icon = findDockIconFor(scr->last_dock, main_window);
 308                 /* check main dock if we did not find it in last dock */
 309                 if (!wapp->app_icon && scr->dock) {
 310                         wapp->app_icon = findDockIconFor(scr->dock, main_window);
 311                 }
 312                 /* finally check clips */
 313                 if (!wapp->app_icon) {
 314                         int i;
 315                         for (i = 0; i < scr->workspace_count; i++) {
 316                                 WDock *dock = scr->workspaces[i]->clip;
 317                                 if (dock)
 318                                         wapp->app_icon = findDockIconFor(dock, main_window);
 319                                 if (wapp->app_icon)
 320                                         break;
 321                         }
 322                 }
 323
 324                 if (wapp->app_icon) {
 325                         WWindow *mainw = wapp->main_window_desc;
 326
 327                         wapp->app_icon->running = 1;
 328                         wapp->app_icon->icon->force_paint = 1;
 329                         wapp->app_icon->icon->owner = mainw;
 330                         if (mainw->wm_hints && (mainw->wm_hints->flags & IconWindowHint))
 331                                 wapp->app_icon->icon->icon_win = mainw->wm_hints->icon_window;
 332                         wAppIconPaint(wapp->app_icon);
 333                 } else {
 334                         wapp->app_icon = wAppIconCreate(wapp->main_window_desc);
 335                 }
 336         } else {
 337                 wapp->app_icon = NULL;
 338         }
 339
 340         if (wapp->app_icon) {
 341                 wapp->app_icon->main_window = main_window;
 342         }
 343
 344         if (wapp->app_icon && !wapp->app_icon->docked) {
 345                 WIcon *icon = wapp->app_icon->icon;
 346                 WDock *clip = scr->workspaces[scr->current_workspace]->clip;
 347                 int x = 0, y = 0;
 348
 349                 if (clip && clip->attract_icons && wDockFindFreeSlot(clip, &x, &y)) {
 350                         wapp->app_icon->attracted = 1;
 351                         if (!icon->shadowed) {
 352                                 icon->shadowed = 1;
 353                                 icon->force_paint = 1;
 354                                 /* wAppIconPaint() is done in wDockAttachIcon() below */
 355                         }
 356                         wDockAttachIcon(clip, wapp->app_icon, x, y);
 357                 } else {
 358                         PlaceIcon(scr, &x, &y, wGetHeadForWindow(wapp->main_window_desc));
 359                         wAppIconMove(wapp->app_icon, x, y);
 360                         wLowerFrame(icon->core);
 361                 }
 362                 if (!clip || !wapp->app_icon->attracted || !clip->collapsed)
 363                         XMapWindow(dpy, icon->core->window);
 364         }
 365
 366         if (wPreferences.auto_arrange_icons && wapp->app_icon && !wapp->app_icon->attracted) {
 367                 wArrangeIcons(scr, True);
 368         }
 369
 370         if (wapp->app_icon) {
 371                 char *tmp, *path;
 372                 struct stat dummy;
 373                 RImage *image;
 374
 375                 tmp = wDefaultGetIconFile(scr, wapp->app_icon->wm_instance, wapp->app_icon->wm_class, True);
 376
 377                 /* If the icon was saved by us from the client supplied icon, but is
 378                  * missing, recreate it. */
 379                 if (tmp && strstr(tmp, "Library/WindowMaker/CachedPixmaps") != NULL &&
 380                     stat(tmp, &dummy) != 0 && errno == ENOENT) {
 381                         wmessage(_("recreating missing icon '%s'"), tmp);
 382                         path = wIconStore(wapp->app_icon->icon);
 383                         if (path) {
 384                                 wfree(path);
 385                         }
 386                         image = wDefaultGetImage(scr, wapp->app_icon->wm_instance, wapp->app_icon->wm_class);
 387                         if (image) {
 388                                 wIconChangeImage(wapp->app_icon->icon, image);
 389                                 wAppIconPaint(wapp->app_icon);
 390                                 /* TODO:
 391                                  * wIconChangeImage() should be rewriten to use retain/release
 392                                  * The way it is now is too confusing about where the icon is
 393                                  * finally released.  -Dan */
 394                                 /* --this is wrong at the moment-- RReleaseImage(image); */
 395                         }
 396                 }
 397
 398                 /* if the displayed icon was supplied by the client, save the icon */
 399                 if (!tmp)
 400                         extractClientIcon(wapp->app_icon);
 401         }
 402
 403
 404 #ifdef DEBUG
 405         printf("Created application for %x\n", (unsigned)main_window);
 406 #endif
 407         return wapp;
 408 }
 409
 410 void wApplicationDestroy(WApplication * wapp)
 411 {
 412         Window main_window;
 413         WWindow *wwin;
 414         WScreen *scr;
 415
 416         if (!wapp)
 417                 return;
 418
 419         wapp->refcount--;
 420         if (wapp->refcount > 0)
 421                 return;
 422
 423         scr = wapp->main_window_desc->screen_ptr;
 424         main_window = wapp->main_window;
 425
 426         if (wapp == scr->wapp_list) {
 427                 if (wapp->next)
 428                         wapp->next->prev = NULL;
 429                 scr->wapp_list = wapp->next;
 430         } else {
 431                 if (wapp->next)
 432                         wapp->next->prev = wapp->prev;
 433                 if (wapp->prev)
 434                         wapp->prev->next = wapp->next;
 435         }
 436
 437         XDeleteContext(dpy, wapp->main_window, wAppWinContext);
 438         wAppMenuDestroy(wapp->menu);
 439         if (wapp->app_icon) {
 440                 if (wapp->app_icon->docked && !wapp->app_icon->attracted) {
 441                         wapp->app_icon->running = 0;
 442                         /* since we keep it, we don't care if it was attracted or not */
 443                         wapp->app_icon->attracted = 0;
 444                         wapp->app_icon->icon->shadowed = 0;
 445                         wapp->app_icon->main_window = None;
 446                         wapp->app_icon->pid = 0;
 447                         wapp->app_icon->icon->owner = NULL;
 448                         wapp->app_icon->icon->icon_win = None;
 449                         wapp->app_icon->icon->force_paint = 1;
 450                         wAppIconPaint(wapp->app_icon);
 451                 } else if (wapp->app_icon->docked) {
 452                         wapp->app_icon->running = 0;
 453                         wDockDetach(wapp->app_icon->dock, wapp->app_icon);
 454                 } else {
 455                         wAppIconDestroy(wapp->app_icon);
 456                 }
 457         }
 458         wwin = wWindowFor(wapp->main_window_desc->client_win);
 459
 460         wWindowDestroy(wapp->main_window_desc);
 461         if (wwin) {
 462                 /* undelete client window context that was deleted in
 463                  * wWindowDestroy */
 464                 XSaveContext(dpy, wwin->client_win, wWinContext, (XPointer) & wwin->client_descriptor);
 465         }
 466         wfree(wapp);
 467
 468 #ifdef DEBUG
 469         printf("Destroyed application for %x\n", (unsigned)main_window);
 470 #endif
 471         if (wPreferences.auto_arrange_icons) {
 472                 wArrangeIcons(scr, True);
 473         }
 474 }