Added support for client message to set window levels and added partial
[wmaker-crm.git] / src / main.c
blob392fdf4c87fdd2feef0e2446aed3514d5bcc5a76
1 /*
2 * Window Maker window manager
3 *
4 * Copyright (c) 1997, 1998 Alfredo K. Kojima
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
19 * USA.
22 #include "wconfig.h"
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <unistd.h>
27 #include <string.h>
28 #include <sys/stat.h>
29 #include <sys/types.h>
30 #include <fcntl.h>
32 #include <X11/Xlib.h>
33 #include <X11/Xutil.h>
36 /* Xlocale.h and locale.h are the same if X_LOCALE is undefind in wconfig.h,
37 * and if X_LOCALE is defined, X's locale emulating functions will be used.
38 * See Xlocale.h for more information.
40 #include <X11/Xlocale.h>
42 #define MAINFILE
44 #include "WindowMaker.h"
45 #include "window.h"
46 #include "funcs.h"
47 #include "menu.h"
48 #include "keybind.h"
49 #include "xmodifier.h"
50 #include "defaults.h"
51 #include "session.h"
52 #include "dialog.h"
54 #include <proplist.h>
56 /****** Global Variables ******/
58 /* general info */
60 Display *dpy;
62 char *ProgName;
64 unsigned int ValidModMask = 0xff;
66 /* locale to use. NULL==POSIX or C */
67 char *Locale=NULL;
69 int wScreenCount=0;
71 WPreferences wPreferences;
74 proplist_t wDomainName;
75 proplist_t wAttributeDomainName;
77 WShortKey wKeyBindings[WKBD_LAST];
79 /* defaults domains */
80 WDDomain *WDWindowMaker = NULL;
81 WDDomain *WDRootMenu = NULL;
82 WDDomain *WDWindowAttributes = NULL;
85 /* XContexts */
86 XContext wWinContext;
87 XContext wAppWinContext;
88 XContext wStackContext;
90 /* Atoms */
91 Atom _XA_WM_STATE;
92 Atom _XA_WM_CHANGE_STATE;
93 Atom _XA_WM_PROTOCOLS;
94 Atom _XA_WM_TAKE_FOCUS;
95 Atom _XA_WM_DELETE_WINDOW;
96 Atom _XA_WM_SAVE_YOURSELF;
97 Atom _XA_WM_CLIENT_LEADER;
98 Atom _XA_WM_COLORMAP_WINDOWS;
99 Atom _XA_WM_COLORMAP_NOTIFY;
101 Atom _XA_GNUSTEP_WM_ATTR;
102 Atom _XA_GNUSTEP_WM_MINIATURIZE_WINDOW;
103 Atom _XA_GNUSTEP_WM_RESIZEBAR;
104 Atom _XA_GNUSTEP_TITLEBAR_STATE;
106 Atom _XA_WINDOWMAKER_MENU;
107 Atom _XA_WINDOWMAKER_WM_PROTOCOLS;
108 Atom _XA_WINDOWMAKER_STATE;
110 Atom _XA_WINDOWMAKER_WM_FUNCTION;
111 Atom _XA_WINDOWMAKER_NOTICEBOARD;
112 Atom _XA_WINDOWMAKER_COMMAND;
114 Atom _XA_WINDOWMAKER_ICON_SIZE;
115 Atom _XA_WINDOWMAKER_ICON_TILE;
118 #ifdef OFFIX_DND
119 Atom _XA_DND_PROTOCOL;
120 Atom _XA_DND_SELECTION;
121 #endif
123 /* cursors */
124 Cursor wCursor[WCUR_LAST];
126 /* last event timestamp for XSetInputFocus */
127 Time LastTimestamp;
128 /* timestamp on the last time we did XSetInputFocus() */
129 Time LastFocusChange;
131 #ifdef SHAPE
132 Bool wShapeSupported;
133 int wShapeEventBase;
134 #endif
136 #ifdef KEEP_XKB_LOCK_STATUS
137 Bool wXkbSupported;
138 int wXkbEventBase;
139 #endif
141 /* special flags */
142 char WProgramState = WSTATE_NORMAL;
143 char WDelayedActionSet = 0;
145 /* temporary stuff */
146 int wVisualID = -1;
149 /******** End Global Variables *****/
151 static char *DisplayName = NULL;
153 static char **Arguments;
155 static int ArgCount;
157 extern void EventLoop();
158 extern void StartUp();
160 static Bool multiHead = True;
162 /* stdi/o for log shell */
163 static int LogStdIn = -1, LogStdOut = -1, LogStdErr = -1;
166 void
167 Exit(int status)
169 #ifdef XSMP_ENABLED
170 wSessionDisconnectManager();
171 #endif
172 if (dpy)
173 XCloseDisplay(dpy);
175 exit(status);
179 void
180 Restart(char *manager, Bool abortOnFailure)
182 char *prog=NULL;
183 char *argv[MAX_RESTART_ARGS];
184 int i;
186 if (manager && manager[0]!=0) {
187 prog = argv[0] = strtok(manager, " ");
188 for (i=1; i<MAX_RESTART_ARGS; i++) {
189 argv[i]=strtok(NULL, " ");
190 if (argv[i]==NULL) {
191 break;
195 if (dpy) {
196 #ifdef XSMP_ENABLED
197 wSessionDisconnectManager();
198 #endif
199 XCloseDisplay(dpy);
200 dpy = NULL;
202 if (!prog) {
203 execvp(Arguments[0], Arguments);
204 wfatal(_("failed to restart Window Maker."));
205 } else {
206 execvp(prog, argv);
207 wsyserror(_("could not exec %s"), prog);
209 if (abortOnFailure)
210 exit(-1);
215 void
216 SetupEnvironment(WScreen *scr)
218 char *tmp, *ptr;
219 char buf[16];
221 if (multiHead) {
222 tmp = wmalloc(strlen(DisplayName)+64);
223 sprintf(tmp, "DISPLAY=%s", XDisplayName(DisplayName));
224 ptr = strchr(strchr(tmp, ':'), '.');
225 if (ptr)
226 *ptr = 0;
227 sprintf(buf, ".%i", scr->screen);
228 strcat(tmp, buf);
229 putenv(tmp);
231 tmp = wmalloc(60);
232 sprintf(tmp, "WRASTER_COLOR_RESOLUTION%i=%i", scr->screen,
233 scr->rcontext->attribs->colors_per_channel);
234 putenv(tmp);
240 typedef struct {
241 WScreen *scr;
242 char *command;
243 } _tuple;
246 static void
247 shellCommandHandler(pid_t pid, unsigned char status, _tuple *data)
249 if (status == 127) {
250 char *buffer;
252 buffer = wstrappend(_("Could not execute command: "), data->command);
254 wMessageDialog(data->scr, _("Error"), buffer, _("OK"), NULL, NULL);
255 free(buffer);
256 } else if (status != 127) {
258 printf("%s: %i\n", data->command, status);
262 free(data->command);
263 free(data);
267 void
268 ExecuteShellCommand(WScreen *scr, char *command)
270 static char *shell = NULL;
271 pid_t pid;
274 * This have a problem: if the shell is tcsh (not sure about others)
275 * and ~/.tcshrc have /bin/stty erase ^H somewhere on it, the shell
276 * will block and the command will not be executed.
277 if (!shell) {
278 shell = getenv("SHELL");
279 if (!shell)
280 shell = "/bin/sh";
283 shell = "/bin/sh";
285 pid = fork();
287 if (pid==0) {
289 SetupEnvironment(scr);
291 #ifdef HAVE_SETPGID
292 setpgid(0, 0);
293 #endif
294 execl(shell, shell, "-c", command, NULL);
295 wsyserror("could not execute %s -c %s", shell, command);
296 Exit(-1);
297 } else if (pid < 0) {
298 wsyserror("cannot fork a new process");
299 } else {
300 _tuple *data = wmalloc(sizeof(_tuple));
302 data->scr = scr;
303 data->command = wstrdup(command);
305 wAddDeathHandler(pid, (WDeathHandler*)shellCommandHandler, data);
311 *---------------------------------------------------------------------------
312 * StartLogShell
313 * Start a shell that will receive all stdin and stdout from processes
314 * forked by wmaker.
315 *---------------------------------------------------------------------------
317 void
318 StartLogShell(WScreen *scr)
320 int in_fd[2];
321 int out_fd[2];
322 int err_fd[2];
323 pid_t pid;
325 SetupEnvironment(scr);
327 if (pipe(in_fd) < 0) {
328 wsyserror("could not create pipe for log shell\n");
329 return;
331 if (pipe(out_fd) < 0) {
332 wsyserror("could not create pipe for log shell\n");
333 close(in_fd[0]);
334 close(in_fd[1]);
335 return;
337 if (pipe(err_fd) < 0) {
338 wsyserror("could not create pipe for log shell\n");
339 close(out_fd[0]);
340 close(out_fd[1]);
341 close(in_fd[0]);
342 close(in_fd[1]);
343 return;
346 pid = fork();
347 if (pid < 0) {
348 wsyserror("could not fork a new process for log shell\n");
349 return;
350 } else if (pid == 0) {
351 close(in_fd[0]);
352 close(out_fd[1]);
353 close(err_fd[1]);
355 close(0);
356 close(1);
357 close(2);
359 if (dup2(in_fd[1], 0) < 0) {
360 wsyserror("could not redirect stdin for log shell\n");
361 exit(1);
363 if (dup2(out_fd[1], 1) < 0) {
364 wsyserror("could not redirect stdout for log shell\n");
365 exit(1);
367 if (dup2(err_fd[1], 2) < 0) {
368 wsyserror("could not redirect stderr for log shell\n");
369 exit(1);
372 close(in_fd[1]);
373 close(out_fd[1]);
374 close(err_fd[1]);
376 execl("/bin/sh", "/bin/sh", "-c", wPreferences.logger_shell, NULL);
377 wsyserror("could not execute %s\n", wPreferences.logger_shell);
378 exit(1);
379 } else {
380 close(in_fd[1]);
381 close(out_fd[0]);
382 close(err_fd[0]);
384 LogStdIn = in_fd[1];
385 LogStdOut = out_fd[0];
386 LogStdErr = err_fd[0];
392 *---------------------------------------------------------------------
393 * wAbort--
394 * Do a major cleanup and exit the program
396 *----------------------------------------------------------------------
398 void
399 wAbort(Bool dumpCore)
401 int i;
402 WScreen *scr;
404 for (i=0; i<wScreenCount; i++) {
405 scr = wScreenWithNumber(i);
406 if (scr)
407 RestoreDesktop(scr);
409 printf(_("%s aborted.\n"), ProgName);
410 if (dumpCore)
411 abort();
412 else
413 exit(1);
417 void
418 print_help()
420 printf(_("Usage: %s [options]\n"), ProgName);
421 puts(_("The Window Maker window manager for the X window system"));
422 puts("");
423 puts(_(" -display host:dpy display to use"));
424 #ifdef USECPP
425 puts(_(" --no-cpp disable preprocessing of configuration files"));
426 #endif
427 puts(_(" --no-dock do not open the application Dock"));
428 puts(_(" --no-clip do not open the workspace Clip"));
429 puts(_(" --no-autolaunch do not autolaunch applications"));
431 puts(_(" --locale locale locale to use"));
433 puts(_(" --visual-id visualid visual id of visual to use"));
434 puts(_(" --static do not update or save configurations"));
435 #ifdef DEBUG
436 puts(_(" --synchronous turn on synchronous display mode"));
437 #endif
438 puts(_(" --version print version and exit"));
439 puts(_(" --help show this message"));
444 void
445 check_defaults()
447 char *path;
449 path = wdefaultspathfordomain("");
450 if (access(path, R_OK)!=0) {
451 wfatal(_("could not find user GNUstep directory (%s).\n"
452 "Make sure you have installed Window Maker correctly and run wmaker.inst"),
453 path);
454 exit(1);
457 free(path);
461 static void
462 execInitScript()
464 char *file;
465 char *paths = wstrappend(wusergnusteppath(), ":"DEF_CONFIG_PATHS);
467 file = wfindfile(paths, DEF_INIT_SCRIPT);
468 free(paths);
470 if (file) {
471 if (system(file) != 0) {
472 wsyserror(_("%s:could not execute initialization script"), file);
474 #if 0
475 if (fork()==0) {
476 execl("/bin/sh", "/bin/sh", "-c", file, NULL);
477 wsyserror(_("%s:could not execute initialization script"), file);
478 exit(1);
480 #endif
481 free(file);
486 void
487 ExecExitScript()
489 char *file;
490 char *paths = wstrappend(wusergnusteppath(), ":"DEF_CONFIG_PATHS);
492 file = wfindfile(paths, DEF_EXIT_SCRIPT);
493 free(paths);
495 if (file) {
496 if (system(file) != 0) {
497 wsyserror(_("%s:could not execute exit script"), file);
499 #if 0
500 if (fork()==0) {
501 execl("/bin/sh", "/bin/sh", "-c", file, NULL);
502 wsyserror(_("%s:could not execute exit script"), file);
503 exit(1);
505 #endif
506 free(file);
510 #if 0
511 char*
512 getFullPath(char *path)
514 char buffer[1024];
515 char *tmp;
516 char *basep = (char*)buffer;
518 if (*path != '/' && getcwd(buffer, 1023)) {
520 for (;;) {
521 if (strncmp(path, "../", 3)==0) {
522 path += 3;
523 basep = strchr(basep, '/');
524 if (!basep || *path==0)
525 break;
528 if (*path == '/' || strncmp(path, "./",2)==0) {
529 tmp =
533 * path
534 * ./path
535 * ../path
536 * ../../path
540 } else {
541 return wstrappend(path);
544 return tmp;
546 #endif
549 main(int argc, char **argv)
551 int i, restart=0;
552 char *str;
553 int d, s;
554 #ifdef DEBUG
555 Bool doSync = False;
556 #endif
557 setlocale(LC_ALL, "");
559 wsetabort(wAbort);
561 /* for telling WPrefs what's the name of the wmaker binary being ran */
563 str = wstrappend("WMAKER_BIN_NAME=", argv[0]);
564 putenv(str);
566 ArgCount = argc;
567 Arguments = argv;
569 WMInitializeApplication("WindowMaker", &argc, argv);
572 ProgName = strrchr(argv[0],'/');
573 if (!ProgName)
574 ProgName = argv[0];
575 else
576 ProgName++;
579 restart = 0;
581 memset(&wPreferences, 0, sizeof(WPreferences));
583 if (argc>1) {
584 for (i=1; i<argc; i++) {
585 #ifdef USECPP
586 if (strcmp(argv[i], "-nocpp")==0
587 || strcmp(argv[i], "--no-cpp")==0) {
588 wPreferences.flags.nocpp=1;
589 } else
590 #endif
591 if (strcmp(argv[i], "-no-autolaunch")==0
592 || strcmp(argv[i], "--no-autolaunch")==0) {
593 wPreferences.flags.noautolaunch = 1;
594 } else if (strcmp(argv[i], "-nodock")==0
595 || strcmp(argv[i], "--no-dock")==0) {
596 wPreferences.flags.nodock=1;
597 } else if (strcmp(argv[i], "-noclip")==0
598 || strcmp(argv[i], "--no-clip")==0) {
599 wPreferences.flags.noclip=1;
600 } else if (strcmp(argv[i], "-version")==0
601 || strcmp(argv[i], "--version")==0) {
602 printf("Window Maker %s\n", VERSION);
603 exit(0);
604 } else if (strcmp(argv[i], "--global_defaults_path")==0) {
605 printf("%s/WindowMaker\n", SYSCONFDIR);
606 exit(0);
607 #ifdef DEBUG
608 } else if (strcmp(argv[i], "--synchronous")==0) {
609 doSync = 1;
610 #endif
611 } else if (strcmp(argv[i], "-locale")==0
612 || strcmp(argv[i], "--locale")==0) {
613 i++;
614 if (i>=argc) {
615 wwarning(_("too few arguments for %s"), argv[i-1]);
616 exit(0);
618 Locale = argv[i];
619 } else if (strcmp(argv[i], "-display")==0) {
620 i++;
621 if (i>=argc) {
622 wwarning(_("too few arguments for %s"), argv[i-1]);
623 exit(0);
625 DisplayName = argv[i];
626 } else if (strcmp(argv[i], "-visualid")==0
627 || strcmp(argv[i], "--visual-id")==0) {
628 i++;
629 if (i>=argc) {
630 wwarning(_("too few arguments for %s"), argv[i-1]);
631 exit(0);
633 if (sscanf(argv[i], "%i", &wVisualID)!=1) {
634 wwarning(_("bad value for visualid: \"%s\""), argv[i]);
635 exit(0);
637 } else if (strcmp(argv[i], "-static")==0
638 || strcmp(argv[i], "--static")==0) {
640 wPreferences.flags.noupdates = 1;
641 #ifdef XSMP_ENABLED
642 } else if (strcmp(argv[i], "-clientid")==0
643 || strcmp(argv[i], "-restore")==0) {
644 i++;
645 if (i>=argc) {
646 wwarning(_("too few arguments for %s"), argv[i-1]);
647 exit(0);
649 #endif
650 } else if (strcmp(argv[i], "--help")==0) {
651 print_help();
652 exit(0);
653 } else {
654 printf(_("%s: invalid argument '%s'\n"), argv[0], argv[i]);
655 printf(_("Try '%s --help' for more information\n"), argv[0]);
656 exit(1);
661 if (!wPreferences.flags.noupdates) {
662 /* check existence of Defaults DB directory */
663 check_defaults();
667 if (!Locale) {
668 Locale = getenv("LC_ALL");
670 if (!Locale) {
671 Locale = getenv("LANG");
674 setlocale(LC_ALL, "");
676 if (!Locale || strcmp(Locale, "C")==0 || strcmp(Locale, "POSIX")==0)
677 Locale = NULL;
678 #ifdef I18N
679 if (getenv("NLSPATH"))
680 bindtextdomain("WindowMaker", getenv("NLSPATH"));
681 else
682 bindtextdomain("WindowMaker", LOCALEDIR);
683 textdomain("WindowMaker");
685 if (!XSupportsLocale()) {
686 wwarning(_("X server does not support locale"));
689 if (XSetLocaleModifiers("") == NULL) {
690 wwarning(_("cannot set locale modifiers"));
692 #endif
694 if (Locale) {
695 char *ptr;
697 Locale = wstrdup(Locale);
698 ptr = strchr(Locale, '.');
699 if (ptr)
700 *ptr = 0;
703 /* open display */
704 dpy = XOpenDisplay(DisplayName);
705 if (dpy == NULL) {
706 wfatal(_("could not open display \"%s\""), XDisplayName(DisplayName));
707 exit(1);
710 if (fcntl(ConnectionNumber(dpy), F_SETFD, FD_CLOEXEC) < 0) {
711 wsyserror("error setting close-on-exec flag for X connection");
712 exit(1);
715 /* check if the user specified a complete display name (with screen).
716 * If so, only manage the specified screen */
717 if (DisplayName)
718 str = strchr(DisplayName, ':');
719 else
720 str = NULL;
722 if (str && sscanf(str, "%i.%i", &d, &s)==2)
723 multiHead = False;
725 DisplayName = XDisplayName(DisplayName);
726 str = wmalloc(strlen(DisplayName)+64);
727 sprintf(str, "DISPLAY=%s", DisplayName);
728 putenv(str);
730 #ifdef DEBUG
731 if (doSync)
732 XSynchronize(dpy, True);
733 #endif
735 wXModifierInitialize();
737 #ifdef XSMP_ENABLED
738 wSessionConnectManager(argv, argc);
739 #endif
741 StartUp(!multiHead);
743 if (wScreenCount==1)
744 multiHead = False;
746 execInitScript();
748 EventLoop();
749 return -1;