WINGs/wapplication.c

   1
   2
   3 #include <unistd.h>
   4
   5 #include "WINGsP.h"
   6
   7 #include <X11/Xutil.h>
   8
   9 /* Xmd.h which is indirectly included by GNUstep.h defines BOOL,
  10  * but libPropList also defines it. So we do this kluge to get rid of BOOL
  11  * temporarily */
  12 #ifdef BOOL
  13 # define WINGS_BOOL
  14 # undef BOOL
  15 #endif
  16
  17 #include "GNUstep.h"
  18
  19 #ifdef WINGS_BOOL
  20 # define BOOL
  21 # undef WINGS_BOOL
  22 #endif
  23
  24
  25
  26 extern void W_InitNotificationCenter(void);
  27
  28
  29 typedef struct W_Application {
  30     char *applicationName;
  31     int argc;
  32     char **argv;
  33     char *resourcePath;
  34 } W_Application;
  35
  36
  37 struct W_Application WMApplication;
  38
  39
  40 char *_WINGS_progname = NULL;
  41
  42
  43
  44 Bool
  45 W_ApplicationInitialized(void)
  46 {
  47     return _WINGS_progname!=NULL;
  48 }
  49
  50
  51 void
  52 WMInitializeApplication(char *applicationName, int *argc, char **argv)
  53 {
  54     int i;
  55
  56     assert(argc!=NULL);
  57     assert(argv!=NULL);
  58     assert(applicationName!=NULL);
  59
  60     _WINGS_progname = argv[0];
  61
  62     WMApplication.applicationName = wstrdup(applicationName);
  63     WMApplication.argc = *argc;
  64
  65     WMApplication.argv = wmalloc((*argc+1)*sizeof(char*));
  66     for (i=0; i<*argc; i++) {
  67         WMApplication.argv[i] = wstrdup(argv[i]);
  68     }
  69     WMApplication.argv[i] = NULL;
  70
  71     /* initialize notification center */
  72     W_InitNotificationCenter();
  73 }
  74
  75
  76 void
  77 WMSetResourcePath(char *path)
  78 {
  79     if (WMApplication.resourcePath)
  80         free(WMApplication.resourcePath);
  81     WMApplication.resourcePath = wstrdup(path);
  82 }
  83
  84
  85 char*
  86 WMGetApplicationName()
  87 {
  88     return WMApplication.applicationName;
  89 }
  90
  91
  92 static char*
  93 checkFile(char *path, char *folder, char *ext, char *resource)
  94 {
  95     char *ret;
  96     int extralen;
  97
  98     extralen = (ext ? strlen(ext) : 0) + (folder ? strlen(folder) : 0) + 4;
  99     ret = wmalloc(strlen(path)+strlen(resource)+extralen+8);
 100     strcpy(ret, path);
 101     if (folder) {
 102         strcat(ret, "/");
 103         strcat(ret, folder);
 104     }
 105     if (ext) {
 106         strcat(ret, "/");
 107         strcat(ret, ext);
 108     }
 109     strcat(ret, "/");
 110     strcat(ret, resource);
 111
 112     if (access(ret, F_OK)!=0) {
 113         free(ret);
 114         ret = NULL;
 115     }
 116
 117     return ret;
 118 }
 119
 120
 121 char*
 122 WMPathForResourceOfType(char *resource, char *ext)
 123 {
 124     char *path = NULL;
 125     char *tmp, *appdir;
 126     int i;
 127
 128     /*
 129      * Paths are searched in this order:
 130      * - resourcePath/ext
 131      * - argv[0]/ext
 132      * - GNUSTEP_USER_ROOT/Apps/ApplicationName.app/ext
 133      * - ~/GNUstep/Apps/ApplicationName.app/ext
 134      * - GNUSTEP_LOCAL_ROOT/Apps/ApplicationName.app/ext
 135      * - /usr/local/GNUstep/Apps/ApplicationName.app/ext
 136      * - GNUSTEP_SYSTEM_ROOT/Apps/ApplicationName.app/ext
 137      * - /usr/GNUstep/Apps/ApplicationName.app/ext
 138      */
 139
 140     if (WMApplication.resourcePath) {
 141         path = checkFile(WMApplication.resourcePath, NULL, ext, resource);
 142         if (path)
 143             return path;
 144     }
 145
 146     if (WMApplication.argv[0]) {
 147         tmp = wstrdup(WMApplication.argv[0]);
 148         i = strlen(tmp);
 149         while (i > 0 && tmp[i]!='/')
 150             i--;
 151         tmp[i] = 0;
 152         if (i>0) {
 153             path = checkFile(tmp, NULL, ext, resource);
 154         } else {
 155             path = NULL;
 156         }
 157         free(tmp);
 158         if (path)
 159             return path;
 160     }
 161
 162     appdir = wmalloc(strlen(WMApplication.applicationName)+10);
 163     sprintf(appdir, "Apps/%s.app", WMApplication.applicationName);
 164
 165     if (getenv("GNUSTEP_USER_ROOT")) {
 166         path = checkFile(getenv("GNUSTEP_USER_ROOT"), appdir, ext, resource);
 167         if (path) {
 168             free(appdir);
 169             return path;
 170         }
 171     }
 172
 173     tmp = wusergnusteppath();
 174     if (tmp) {
 175         path = checkFile(tmp, appdir, ext, resource);
 176         free(tmp);
 177         if (path) {
 178             free(appdir);
 179             return path;
 180         }
 181     }
 182
 183     if (getenv("GNUSTEP_LOCAL_ROOT")) {
 184         path = checkFile(getenv("GNUSTEP_LOCAL_ROOT"), appdir, ext, resource);
 185         if (path) {
 186             free(appdir);
 187             return path;
 188         }
 189     }
 190
 191     path = checkFile("/usr/local/GNUstep", appdir, ext, resource);
 192     if (path) {
 193         free(appdir);
 194         return path;
 195     }
 196
 197
 198     if (getenv("GNUSTEP_SYSTEM_ROOT")) {
 199         path = checkFile(getenv("GNUSTEP_SYSTEM_ROOT"), appdir, ext, resource);
 200         if (path) {
 201             free(appdir);
 202             return path;
 203         }
 204     }
 205
 206     path = checkFile("/usr/GNUstep", appdir, ext, resource);
 207     if (path) {
 208         free(appdir);
 209         return path;
 210     }
 211
 212     return NULL;
 213 }
 214
 215
 216 /********************* WMScreen related stuff ********************/
 217
 218
 219 void
 220 WMSetApplicationIconImage(WMScreen *scr, WMPixmap *icon)
 221 {
 222     if (scr->applicationIcon)
 223         WMReleasePixmap(scr->applicationIcon);
 224
 225     scr->applicationIcon = WMRetainPixmap(icon);
 226
 227     if (scr->groupLeader) {
 228         XWMHints *hints;
 229
 230         hints = XGetWMHints(scr->display, scr->groupLeader);
 231         hints->flags |= IconPixmapHint|IconMaskHint;
 232         hints->icon_pixmap = icon->pixmap;
 233         hints->icon_mask = icon->mask;
 234
 235         XSetWMHints(scr->display, scr->groupLeader, hints);
 236         XFree(hints);
 237     }
 238 }
 239
 240
 241 WMPixmap*
 242 WMGetApplicationIconImage(WMScreen *scr)
 243 {
 244     return scr->applicationIcon;
 245 }
 246
 247
 248 void
 249 WMSetApplicationHasAppIcon(WMScreen *scr, Bool flag)
 250 {
 251     scr->aflags.hasAppIcon = flag;
 252 }
 253
 254
 255 void
 256 W_InitApplication(WMScreen *scr)
 257 {
 258     Window leader;
 259     XClassHint *classHint;
 260     XWMHints *hints;
 261
 262     leader = XCreateSimpleWindow(scr->display, scr->rootWin, -1, -1,
 263                                  1, 1, 0, 0, 0);
 264
 265     if (!scr->aflags.simpleApplication) {
 266         classHint = XAllocClassHint();
 267         classHint->res_name = "groupLeader";
 268         classHint->res_class = WMApplication.applicationName;
 269         XSetClassHint(scr->display, leader, classHint);
 270         XFree(classHint);
 271
 272         XSetCommand(scr->display, leader, WMApplication.argv,
 273                     WMApplication.argc);
 274
 275         hints = XAllocWMHints();
 276
 277         hints->flags = WindowGroupHint;
 278         hints->window_group = leader;
 279
 280         if (scr->applicationIcon) {
 281             hints->flags |= IconPixmapHint;
 282             hints->icon_pixmap = scr->applicationIcon->pixmap;
 283             if (scr->applicationIcon->mask) {
 284                 hints->flags |= IconMaskHint;
 285                 hints->icon_mask = scr->applicationIcon->mask;
 286             }
 287         }
 288
 289         XSetWMHints(scr->display, leader, hints);
 290
 291         XFree(hints);
 292     }
 293     scr->groupLeader = leader;
 294 }
 295
 296