missing header
[wmaker-crm.git] / src / application.c
blob5ceb56f0c82ad85b996253553ceeb1d6c47c8bcf
1 /*
2 * Window Maker window manager
3 *
4 * Copyright (c) 1997, 1998 Alfredo K. Kojima
5 * Copyright (c) 1998 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.
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.
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.
22 #include "wconfig.h"
24 #include <X11/Xlib.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <unistd.h>
30 #include "WindowMaker.h"
31 #include "menu.h"
32 #include "window.h"
33 #ifdef USER_MENU
34 #include "usermenu.h"
35 #endif /* USER_MENU */
36 #include "icon.h"
37 #include "appicon.h"
38 #include "application.h"
39 #include "appmenu.h"
40 #include "properties.h"
41 #include "funcs.h"
42 #include "stacking.h"
43 #include "actions.h"
44 #include "defaults.h"
45 #include "workspace.h"
47 #include "dock.h"
49 #ifdef WSOUND
50 #include "wsound.h"
51 #endif
54 /******** Global variables ********/
56 extern XContext wAppWinContext;
57 extern XContext wWinContext;
58 extern WPreferences wPreferences;
60 extern WDDomain *WDWindowAttributes;
62 /******** Local variables ********/
65 static WWindow*
66 makeMainWindow(WScreen *scr, Window window)
68 WWindow *wwin;
69 XWindowAttributes attr;
71 if (!XGetWindowAttributes(dpy, window, &attr)) {
72 return NULL;
75 wwin = wWindowCreate();
76 wwin->screen_ptr = scr;
77 wwin->client_win = window;
78 wwin->main_window = window;
79 wwin->wm_hints = XGetWMHints(dpy, window);
80 /* if (!MyXFetchName(dpy, window, &(wwin->frame->title))) {
81 wwin->frame->title = NULL;
84 PropGetWMClass(window, &wwin->wm_class, &wwin->wm_instance);
87 wDefaultFillAttributes(scr, wwin->wm_instance, wwin->wm_class,
88 &wwin->user_flags, &wwin->defined_user_flags, True);
90 XSelectInput(dpy, window, attr.your_event_mask | PropertyChangeMask
91 | StructureNotifyMask );
92 return wwin;
96 WApplication*
97 wApplicationOf(Window window)
99 WApplication *wapp;
101 if (window == None)
102 return NULL;
103 if (XFindContext(dpy, window, wAppWinContext, (XPointer*)&wapp)!=XCSUCCESS)
104 return NULL;
105 return wapp;
109 static WAppIcon*
110 findDockIconFor(WDock *dock, Window main_window)
112 WAppIcon *aicon = NULL;
114 aicon = wDockFindIconForWindow(dock, main_window);
115 if (!aicon) {
116 wDockTrackWindowLaunch(dock, main_window);
117 aicon = wDockFindIconForWindow(dock, main_window);
119 return aicon;
123 static void
124 extractIcon(WWindow *wwin)
126 int argc;
127 char **argv;
129 if (!XGetCommand(dpy, wwin->client_win, &argv, &argc) || argc < 1)
130 return;
132 wApplicationExtractDirPackIcon(wwin->screen_ptr,argv[0],
133 wwin->wm_instance,
134 wwin->wm_class);
135 XFreeStringList(argv);
139 static void
140 saveIconNameFor(char *iconPath, char *wm_instance, char *wm_class)
142 proplist_t dict = WDWindowAttributes->dictionary;
143 proplist_t adict, key, iconk;
144 proplist_t val;
145 char *tmp;
146 int i;
148 i = 0;
149 if (wm_instance)
150 i += strlen(wm_instance);
151 if (wm_class)
152 i += strlen(wm_class);
154 tmp = wmalloc(i+8);
155 *tmp = 0;
156 if (wm_class && wm_instance) {
157 sprintf(tmp, "%s.%s", wm_instance, wm_class);
158 } else {
159 if (wm_instance)
160 strcat(tmp, wm_instance);
161 if (wm_class)
162 strcat(tmp, wm_class);
165 key = PLMakeString(tmp);
166 wfree(tmp);
167 adict = PLGetDictionaryEntry(dict, key);
169 iconk = PLMakeString("Icon");
171 if (adict) {
172 val = PLGetDictionaryEntry(adict, iconk);
173 } else {
174 /* no dictionary for app, so create one */
175 adict = PLMakeDictionaryFromEntries(NULL, NULL, NULL);
176 PLInsertDictionaryEntry(dict, key, adict);
177 PLRelease(adict);
178 val = NULL;
180 if (!val) {
181 val = PLMakeString(iconPath);
182 PLInsertDictionaryEntry(adict, iconk, val);
183 PLRelease(val);
185 PLRelease(key);
187 if (val && !wPreferences.flags.noupdates)
188 PLSave(dict, YES);
192 void
193 wApplicationExtractDirPackIcon(WScreen *scr, char *path,
194 char *wm_instance, char *wm_class)
196 char *iconPath=NULL;
197 /* Maybe the app is a .app and it has an icon in it, like
198 * /usr/local/GNUstep/Apps/WPrefs.app/WPrefs.tiff
200 if (strstr(path, ".app")) {
201 char *tmp;
203 tmp = wmalloc(strlen(path)+16);
205 if (scr->flags.supports_tiff) {
206 strcpy(tmp, path);
207 strcat(tmp, ".tiff");
208 if (access(tmp, R_OK)==0)
209 iconPath = tmp;
211 if (!path) {
212 strcpy(tmp, path);
213 strcat(tmp, ".xpm");
214 if (access(tmp, R_OK)==0)
215 iconPath = tmp;
217 if (!iconPath)
218 wfree(tmp);
221 if (iconPath) {
222 saveIconNameFor(iconPath, wm_instance, wm_class);
224 wfree(iconPath);
229 static Bool
230 extractClientIcon(WAppIcon *icon)
232 char *path;
234 path = wIconStore(icon->icon);
235 if (!path)
236 return False;
238 saveIconNameFor(path, icon->wm_instance, icon->wm_class);
240 wfree(path);
242 return True;
246 WApplication*
247 wApplicationCreate(WScreen *scr, Window main_window)
249 WApplication *wapp;
250 WWindow *leader;
252 if (main_window==None || main_window==scr->root_win) {
253 #ifdef DEBUG0
254 wwarning("trying to create application for %x",(unsigned)main_window);
255 #endif
256 return NULL;
260 Window root;
261 int foo;
262 unsigned int bar;
263 /* check if the window is valid */
264 if (!XGetGeometry(dpy, main_window, &root, &foo, &foo, &bar, &bar,
265 &bar, &bar)) {
266 return NULL;
270 wapp = wApplicationOf(main_window);
271 if (wapp) {
272 wapp->refcount++;
273 return wapp;
276 wapp = wmalloc(sizeof(WApplication));
277 memset(wapp, 0, sizeof(WApplication));
279 wapp->refcount = 1;
280 wapp->last_focused = NULL;
282 wapp->last_workspace = 0;
284 wapp->main_window = main_window;
285 wapp->main_window_desc = makeMainWindow(scr, main_window);
286 if (!wapp->main_window_desc) {
287 wfree(wapp);
288 return NULL;
291 extractIcon(wapp->main_window_desc);
293 leader = wWindowFor(main_window);
294 if (leader) {
295 leader->main_window = main_window;
297 wapp->menu = wAppMenuGet(scr, main_window);
298 #ifdef USER_MENU
299 if (!wapp->menu) wapp->menu = wUserMenuGet(scr, wapp->main_window_desc);
300 #endif /* USER_MENU */
304 WApplication *tmp = scr->wapp_list;
306 wapp->next = NULL;
307 wapp->prev = NULL;
309 /* append to app list */
310 if (!tmp) {
311 scr->wapp_list = wapp;
312 } else {
313 while (tmp->next) {
314 tmp = tmp->next;
316 tmp->next = wapp;
317 wapp->prev = tmp;
323 * Set application wide attributes from the leader.
325 wapp->flags.hidden = WFLAGP(wapp->main_window_desc, start_hidden);
327 wapp->flags.emulated = WFLAGP(wapp->main_window_desc, emulate_appicon);
329 /* application descriptor */
330 XSaveContext(dpy, main_window, wAppWinContext, (XPointer)wapp);
332 if (!WFLAGP(wapp->main_window_desc, no_appicon)) {
333 wapp->app_icon = NULL;
334 if (scr->last_dock)
335 wapp->app_icon = findDockIconFor(scr->last_dock, main_window);
336 /* check main dock if we did not find it in last dock */
337 if (!wapp->app_icon && scr->dock) {
338 wapp->app_icon = findDockIconFor(scr->dock, main_window);
340 /* finally check clips */
341 if (!wapp->app_icon) {
342 int i;
343 for (i=0; i<scr->workspace_count; i++) {
344 WDock *dock = scr->workspaces[i]->clip;
345 if (dock)
346 wapp->app_icon = findDockIconFor(dock, main_window);
347 if (wapp->app_icon)
348 break;
352 if (wapp->app_icon) {
353 WWindow *mainw = wapp->main_window_desc;
355 wapp->app_icon->running = 1;
356 wapp->app_icon->icon->force_paint = 1;
357 wapp->app_icon->icon->owner = mainw;
358 if (mainw->wm_hints && (mainw->wm_hints->flags&IconWindowHint))
359 wapp->app_icon->icon->icon_win = mainw->wm_hints->icon_window;
360 wAppIconPaint(wapp->app_icon);
361 } else {
362 wapp->app_icon = wAppIconCreate(wapp->main_window_desc);
364 } else {
365 wapp->app_icon = NULL;
368 if (wapp->app_icon) {
369 wapp->app_icon->main_window = main_window;
372 if (wapp->app_icon && !wapp->app_icon->docked) {
373 WIcon *icon = wapp->app_icon->icon;
374 WDock *clip = scr->workspaces[scr->current_workspace]->clip;
375 int x=0, y=0;
377 if (clip && clip->attract_icons && wDockFindFreeSlot(clip, &x, &y)) {
378 wapp->app_icon->attracted = 1;
379 if (!wapp->app_icon->icon->shadowed) {
380 wapp->app_icon->icon->shadowed = 1;
381 wapp->app_icon->icon->force_paint = 1;
382 /* We don't do an wAppIconPaint() here because it's in
383 * wDockAttachIcon(). -Dan.
386 wDockAttachIcon(clip, wapp->app_icon, x, y);
387 } else {
388 PlaceIcon(scr, &x, &y);
389 wAppIconMove(wapp->app_icon, x, y);
390 wLowerFrame(icon->core);
392 if (!clip || !wapp->app_icon->attracted || !clip->collapsed)
393 XMapWindow(dpy, icon->core->window);
396 if (wPreferences.auto_arrange_icons && wapp->app_icon && !wapp->app_icon->attracted) {
397 wArrangeIcons(scr, True);
400 if (wapp->app_icon) {
401 char *tmp;
403 /* if the displayed icon was supplied by the client, save the icon */
404 tmp = wDefaultGetIconFile(scr, wapp->app_icon->wm_instance,
405 wapp->app_icon->wm_class, True);
406 if (!tmp)
407 extractClientIcon(wapp->app_icon);
411 #ifdef WSOUND
412 wSoundPlay(WSOUND_APPSTART);
413 #endif
415 #ifdef DEBUG
416 printf("Created application for %x\n", (unsigned)main_window);
417 #endif
418 return wapp;
422 void
423 wApplicationDestroy(WApplication *wapp)
425 Window main_window;
426 WWindow *wwin;
427 WScreen *scr;
429 if (!wapp)
430 return;
432 wapp->refcount--;
433 if (wapp->refcount>0)
434 return;
437 scr = wapp->main_window_desc->screen_ptr;
438 main_window = wapp->main_window;
440 if (wapp == scr->wapp_list) {
441 if (wapp->next)
442 wapp->next->prev = NULL;
443 scr->wapp_list = wapp->next;
444 } else {
445 if (wapp->next)
446 wapp->next->prev = wapp->prev;
447 if (wapp->prev)
448 wapp->prev->next = wapp->next;
451 XDeleteContext(dpy, wapp->main_window, wAppWinContext);
452 wAppMenuDestroy(wapp->menu);
453 if (wapp->app_icon) {
454 if (wapp->app_icon->docked && !wapp->app_icon->attracted) {
455 wapp->app_icon->running = 0;
456 /* since we keep it, we don't care if it was attracted or not */
457 wapp->app_icon->attracted = 0;
458 wapp->app_icon->icon->shadowed = 0;
459 wapp->app_icon->main_window = None;
460 wapp->app_icon->pid = 0;
461 wapp->app_icon->icon->owner = NULL;
462 wapp->app_icon->icon->icon_win = None;
463 wapp->app_icon->icon->force_paint = 1;
464 wAppIconPaint(wapp->app_icon);
465 } else if (wapp->app_icon->docked) {
466 wapp->app_icon->running = 0;
467 wDockDetach(wapp->app_icon->dock, wapp->app_icon);
468 } else {
469 wAppIconDestroy(wapp->app_icon);
472 wwin = wWindowFor(wapp->main_window_desc->client_win);
474 wWindowDestroy(wapp->main_window_desc);
475 if (wwin) {
476 /* undelete client window context that was deleted in
477 * wWindowDestroy */
478 XSaveContext(dpy, wwin->client_win, wWinContext,
479 (XPointer)&wwin->client_descriptor);
481 wfree(wapp);
483 #ifdef DEBUG
484 printf("Destroyed application for %x\n", (unsigned)main_window);
485 #endif
486 if (wPreferences.auto_arrange_icons) {
487 wArrangeIcons(scr, True);
490 #ifdef WSOUND
491 wSoundPlay(WSOUND_APPEXIT);
492 #endif
497 void
498 wApplicationSetCollapse(WApplication *app, Bool flag)
500 WApplication *list = app->main_window_desc->screen_ptr->wapp_list;
501 int index = 0;
502 WWindow *wwin = app->main_window_desc;
504 if (WFLAGP(app->main_window_desc, collapse_appicons) == flag)
505 return;
508 while (list) {
509 if (strcmp(wwin->wm_instance,
510 list->main_window_desc->wm_instance) == 0
512 strcmp(wwin->wm_class,
513 list->main_window_desc->wm_class) == 0)
514 WSETUFLAG(list->main_window_desc, collapse_appicons, flag);
516 list = list->next;
519 if (app->app_icon && flag)
520 wAppIconMove(app->app_icon, app->app_icon->x_pos, app->app_icon->y_pos);
527 * Returns index number of the app in case there are more than
528 * one instance of the same class/name.
531 wApplicationIndexOfGroup(WApplication *app)
533 WApplication *list = app->main_window_desc->screen_ptr->wapp_list;
534 int index = 0;
535 WWindow *wwin = app->main_window_desc;
537 if (!WFLAGP(wwin, collapse_appicons))
538 return 0;
541 while (list) {
542 if (app == list)
543 return index;
545 if (strcmp(wwin->wm_instance,
546 list->main_window_desc->wm_instance) == 0
548 strcmp(wwin->wm_class,
549 list->main_window_desc->wm_class) == 0)
550 index++;
552 list = list->next;
555 puts("OH SHIT!?!?!? HOW THE FUCK DID WE GET HERE!?!?!?!?!");
557 return 0;