Bouncing appicon effect
[wmaker-crm.git] / 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 return NULL;
236
237 {
238 Window root;
239 int foo;
240 unsigned int bar;
241 /* check if the window is valid */
242 if (!XGetGeometry(dpy, main_window, &root, &foo, &foo, &bar, &bar, &bar, &bar)) {
243 return NULL;
244 }
245 }
246
247 wapp = wApplicationOf(main_window);
248 if (wapp) {
249 wapp->refcount++;
250 if (wapp->app_icon && wapp->app_icon->docked &&
251 wapp->app_icon->relaunching && wapp->main_window_desc->fake_group) {
252 wDockFinishLaunch(wapp->app_icon->dock, wapp->app_icon);
253 }
254
255 return wapp;
256 }
257
258 wapp = wmalloc(sizeof(WApplication));
259 memset(wapp, 0, sizeof(WApplication));
260
261 wapp->refcount = 1;
262 wapp->last_focused = NULL;
263
264 wapp->last_workspace = 0;
265
266 wapp->main_window = main_window;
267 wapp->main_window_desc = makeMainWindow(scr, main_window);
268 if (!wapp->main_window_desc) {
269 wfree(wapp);
270 return NULL;
271 }
272
273 wapp->main_window_desc->fake_group = wwin->fake_group;
274 wapp->main_window_desc->net_icon_image = RRetainImage(wwin->net_icon_image);
275
276 extractIcon(wapp->main_window_desc);
277
278 leader = wWindowFor(main_window);
279 if (leader) {
280 leader->main_window = main_window;
281 }
282 wapp->menu = wAppMenuGet(scr, main_window);
283 #ifdef USER_MENU
284 if (!wapp->menu)
285 wapp->menu = wUserMenuGet(scr, wapp->main_window_desc);
286 #endif /* USER_MENU */
287
288 /*
289 * Set application wide attributes from the leader.
290 */
291 wapp->flags.hidden = WFLAGP(wapp->main_window_desc, start_hidden);
292
293 wapp->flags.emulated = WFLAGP(wapp->main_window_desc, emulate_appicon);
294
295 /* application descriptor */
296 XSaveContext(dpy, main_window, wAppWinContext, (XPointer) wapp);
297
298 if (!WFLAGP(wapp->main_window_desc, no_appicon)) {
299 wapp->app_icon = NULL;
300 if (scr->last_dock)
301 wapp->app_icon = findDockIconFor(scr->last_dock, main_window);
302 /* check main dock if we did not find it in last dock */
303 if (!wapp->app_icon && scr->dock) {
304 wapp->app_icon = findDockIconFor(scr->dock, main_window);
305 }
306 /* finally check clips */
307 if (!wapp->app_icon) {
308 int i;
309 for (i = 0; i < scr->workspace_count; i++) {
310 WDock *dock = scr->workspaces[i]->clip;
311 if (dock)
312 wapp->app_icon = findDockIconFor(dock, main_window);
313 if (wapp->app_icon)
314 break;
315 }
316 }
317
318 if (wapp->app_icon) {
319 WWindow *mainw = wapp->main_window_desc;
320
321 wapp->app_icon->running = 1;
322 wapp->app_icon->icon->force_paint = 1;
323 wapp->app_icon->icon->owner = mainw;
324 if (mainw->wm_hints && (mainw->wm_hints->flags & IconWindowHint))
325 wapp->app_icon->icon->icon_win = mainw->wm_hints->icon_window;
326 wAppIconPaint(wapp->app_icon);
327 } else {
328 wapp->app_icon = wAppIconCreate(wapp->main_window_desc);
329 }
330 } else {
331 wapp->app_icon = NULL;
332 }
333
334 if (wapp->app_icon) {
335 wapp->app_icon->main_window = main_window;
336 }
337
338 if (wapp->app_icon && !wapp->app_icon->docked) {
339 WIcon *icon = wapp->app_icon->icon;
340 WDock *clip = scr->workspaces[scr->current_workspace]->clip;
341 int x = 0, y = 0;
342
343 if (clip && clip->attract_icons && wDockFindFreeSlot(clip, &x, &y)) {
344 wapp->app_icon->attracted = 1;
345 if (!icon->shadowed) {
346 icon->shadowed = 1;
347 icon->force_paint = 1;
348 /* wAppIconPaint() is done in wDockAttachIcon() below */
349 }
350 wDockAttachIcon(clip, wapp->app_icon, x, y);
351 } else {
352 PlaceIcon(scr, &x, &y, wGetHeadForWindow(wapp->main_window_desc));
353 wAppIconMove(wapp->app_icon, x, y);
354 wLowerFrame(icon->core);
355 }
356 if (!clip || !wapp->app_icon->attracted || !clip->collapsed)
357 XMapWindow(dpy, icon->core->window);
358 }
359
360 if (wPreferences.auto_arrange_icons && wapp->app_icon && !wapp->app_icon->attracted) {
361 wArrangeIcons(scr, True);
362 }
363
364 if (wapp->app_icon) {
365 char *tmp, *path;
366 struct stat dummy;
367 RImage *image;
368
369 tmp = wDefaultGetIconFile(scr, wapp->app_icon->wm_instance, wapp->app_icon->wm_class, True);
370
371 /* If the icon was saved by us from the client supplied icon, but is
372 * missing, recreate it. */
373 if (tmp && strstr(tmp, "Library/WindowMaker/CachedPixmaps") != NULL &&
374 stat(tmp, &dummy) != 0 && errno == ENOENT) {
375 wmessage(_("recreating missing icon '%s'"), tmp);
376 path = wIconStore(wapp->app_icon->icon);
377 if (path) {
378 wfree(path);
379 }
380 image = wDefaultGetImage(scr, wapp->app_icon->wm_instance, wapp->app_icon->wm_class);
381 if (image) {
382 wIconChangeImage(wapp->app_icon->icon, image);
383 wAppIconPaint(wapp->app_icon);
384 /* TODO:
385 * wIconChangeImage() should be rewriten to use retain/release
386 * The way it is now is too confusing about where the icon is
387 * finally released. -Dan */
388 /* --this is wrong at the moment-- RReleaseImage(image); */
389 }
390 }
391
392 /* if the displayed icon was supplied by the client, save the icon */
393 if (!tmp)
394 extractClientIcon(wapp->app_icon);
395 }
396 return wapp;
397 }
398
399 void wApplicationDestroy(WApplication * wapp)
400 {
401 Window main_window;
402 WWindow *wwin;
403 WScreen *scr;
404
405 if (!wapp)
406 return;
407
408 wapp->refcount--;
409 if (wapp->refcount > 0)
410 return;
411
412 #ifdef BOUNCE_APP
413 if (wapp->flags.bouncing) {
414 /* event.c:handleDestroyNotify forced this destroy
415 and thereby overlooked the bounce callback */
416 wapp->refcount = 1;
417 return;
418 }
419 #endif
420
421 scr = wapp->main_window_desc->screen_ptr;
422 main_window = wapp->main_window;
423
424 if (wapp == scr->wapp_list) {
425 if (wapp->next)
426 wapp->next->prev = NULL;
427 scr->wapp_list = wapp->next;
428 } else {
429 if (wapp->next)
430 wapp->next->prev = wapp->prev;
431 if (wapp->prev)
432 wapp->prev->next = wapp->next;
433 }
434
435 XDeleteContext(dpy, wapp->main_window, wAppWinContext);
436 wAppMenuDestroy(wapp->menu);
437 if (wapp->app_icon) {
438 if (wapp->app_icon->docked && !wapp->app_icon->attracted) {
439 wapp->app_icon->running = 0;
440 /* since we keep it, we don't care if it was attracted or not */
441 wapp->app_icon->attracted = 0;
442 wapp->app_icon->icon->shadowed = 0;
443 wapp->app_icon->main_window = None;
444 wapp->app_icon->pid = 0;
445 wapp->app_icon->icon->owner = NULL;
446 wapp->app_icon->icon->icon_win = None;
447 wapp->app_icon->icon->force_paint = 1;
448 wAppIconPaint(wapp->app_icon);
449 } else if (wapp->app_icon->docked) {
450 wapp->app_icon->running = 0;
451 wDockDetach(wapp->app_icon->dock, wapp->app_icon);
452 } else {
453 wAppIconDestroy(wapp->app_icon);
454 }
455 }
456 wwin = wWindowFor(wapp->main_window_desc->client_win);
457
458 wWindowDestroy(wapp->main_window_desc);
459 if (wwin) {
460 /* undelete client window context that was deleted in
461 * wWindowDestroy */
462 XSaveContext(dpy, wwin->client_win, wWinContext, (XPointer) & wwin->client_descriptor);
463 }
464 wfree(wapp);
465
466 if (wPreferences.auto_arrange_icons)
467 wArrangeIcons(scr, True);
468 }