src/main.c

   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.
  10  *
  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.
  15  *
  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.
  20  */
  21
  22 #include "wconfig.h"
  23
  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>
  31
  32 #include <X11/Xlib.h>
  33 #include <X11/Xutil.h>
  34
  35
  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.
  39  */
  40 #include <X11/Xlocale.h>
  41
  42 #define MAINFILE
  43
  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
  53 #include <proplist.h>
  54
  55 /****** Global Variables ******/
  56
  57 /* general info */
  58
  59 Display *dpy;
  60
  61 char *ProgName;
  62
  63 unsigned int ValidModMask = 0xff;
  64
  65 /* locale to use. NULL==POSIX or C */
  66 char *Locale=NULL;
  67
  68 int wScreenCount=0;
  69
  70 WPreferences wPreferences;
  71
  72
  73 proplist_t wDomainName;
  74 proplist_t wAttributeDomainName;
  75
  76 WShortKey wKeyBindings[WKBD_LAST];
  77
  78 /* defaults domains */
  79 WDDomain *WDWindowMaker = NULL;
  80 WDDomain *WDRootMenu = NULL;
  81 WDDomain *WDWindowAttributes = NULL;
  82
  83
  84 /* XContexts */
  85 XContext wWinContext;
  86 XContext wAppWinContext;
  87 XContext wStackContext;
  88
  89 /* Atoms */
  90 Atom _XA_WM_STATE;
  91 Atom _XA_WM_CHANGE_STATE;
  92 Atom _XA_WM_PROTOCOLS;
  93 Atom _XA_WM_TAKE_FOCUS;
  94 Atom _XA_WM_DELETE_WINDOW;
  95 Atom _XA_WM_SAVE_YOURSELF;
  96 Atom _XA_WM_CLIENT_LEADER;
  97 Atom _XA_WM_COLORMAP_WINDOWS;
  98 Atom _XA_WM_COLORMAP_NOTIFY;
  99
 100 Atom _XA_GNUSTEP_WM_ATTR;
 101 Atom _XA_GNUSTEP_WM_MINIATURIZE_WINDOW;
 102 Atom _XA_GNUSTEP_WM_RESIZEBAR;
 103
 104 Atom _XA_WINDOWMAKER_MENU;
 105 Atom _XA_WINDOWMAKER_WM_PROTOCOLS;
 106 Atom _XA_WINDOWMAKER_STATE;
 107
 108 Atom _XA_WINDOWMAKER_WM_FUNCTION;
 109 Atom _XA_WINDOWMAKER_NOTICEBOARD;
 110 Atom _XA_WINDOWMAKER_COMMAND;
 111
 112 #ifdef OFFIX_DND
 113 Atom _XA_DND_PROTOCOL;
 114 Atom _XA_DND_SELECTION;
 115 #endif
 116
 117 /* cursors */
 118 Cursor wCursor[WCUR_LAST];
 119
 120 /* last event timestamp for XSetInputFocus */
 121 Time LastTimestamp;
 122 /* timestamp on the last time we did XSetInputFocus() */
 123 Time LastFocusChange;
 124
 125 #ifdef SHAPE
 126 Bool wShapeSupported;
 127 int wShapeEventBase;
 128 #endif
 129
 130 #ifdef KEEP_XKB_LOCK_STATUS
 131 Bool wXkbSupported;
 132 int wXkbEventBase;
 133 #endif
 134
 135 /* special flags */
 136 char WProgramState = WSTATE_NORMAL;
 137 char WDelayedActionSet = 0;
 138
 139 /* temporary stuff */
 140 int wVisualID = -1;
 141
 142
 143 /******** End Global Variables *****/
 144
 145 static char *DisplayName = NULL;
 146
 147 static char **Arguments;
 148
 149 static int ArgCount;
 150
 151 extern void EventLoop();
 152 extern void StartUp();
 153
 154 static Bool multiHead = True;
 155
 156 /* stdi/o for log shell */
 157 static int LogStdIn = -1, LogStdOut = -1, LogStdErr = -1;
 158
 159
 160 void
 161 Exit(int status)
 162 {
 163 #ifdef XSMP_ENABLED
 164     wSessionDisconnectManager();
 165 #endif
 166     if (dpy)
 167         XCloseDisplay(dpy);
 168
 169     exit(status);
 170 }
 171
 172
 173 void
 174 Restart(char *manager, Bool abortOnFailure)
 175 {
 176     char *prog=NULL;
 177     char *argv[MAX_RESTART_ARGS];
 178     int i;
 179
 180     if (manager && manager[0]!=0) {
 181         prog = argv[0] = strtok(manager, " ");
 182         for (i=1; i<MAX_RESTART_ARGS; i++) {
 183             argv[i]=strtok(NULL, " ");
 184             if (argv[i]==NULL) {
 185                 break;
 186             }
 187         }
 188     }
 189     if (dpy) {
 190 #ifdef XSMP_ENABLED
 191         wSessionDisconnectManager();
 192 #endif
 193         XCloseDisplay(dpy);
 194         dpy = NULL;
 195     }
 196     if (!prog) {
 197         execvp(Arguments[0], Arguments);
 198         wfatal(_("failed to restart Window Maker."));
 199     } else {
 200         execvp(prog, argv);
 201         wsyserror(_("could not exec %s"), prog);
 202     }
 203     if (abortOnFailure)
 204         exit(-1);
 205 }
 206
 207
 208
 209 void
 210 SetupEnvironment(WScreen *scr)
 211 {
 212     char *tmp, *ptr;
 213     char buf[16];
 214
 215     if (multiHead) {
 216         tmp = wmalloc(strlen(DisplayName)+64);
 217         sprintf(tmp, "DISPLAY=%s", XDisplayName(DisplayName));
 218         ptr = strchr(strchr(tmp, ':'), '.');
 219         if (ptr)
 220             *ptr = 0;
 221         sprintf(buf, ".%i", scr->screen);
 222         strcat(tmp, buf);
 223         putenv(tmp);
 224     }
 225     tmp = wmalloc(60);
 226     sprintf(tmp, "WRASTER_COLOR_RESOLUTION%i=%i", scr->screen,
 227                 scr->rcontext->attribs->colors_per_channel);
 228     putenv(tmp);
 229 }
 230
 231
 232
 233
 234 typedef struct {
 235     WScreen *scr;
 236     char *command;
 237 } _tuple;
 238
 239
 240 static void
 241 shellCommandHandler(pid_t pid, unsigned char status, _tuple *data)
 242 {
 243     if (status == 127) {
 244         char *buffer;
 245
 246         buffer = wstrappend(_("Could not execute command: "), data->command);
 247
 248         wMessageDialog(data->scr, _("Error"), buffer, _("OK"), NULL, NULL);
 249         free(buffer);
 250     } else if (status != 127) {
 251         /*
 252         printf("%s: %i\n", data->command, status);
 253          */
 254     }
 255
 256     free(data->command);
 257     free(data);
 258 }
 259
 260
 261 void
 262 ExecuteShellCommand(WScreen *scr, char *command)
 263 {
 264     static char *shell = NULL;
 265     pid_t pid;
 266
 267     /*
 268      * This have a problem: if the shell is tcsh (not sure about others)
 269      * and ~/.tcshrc have /bin/stty erase ^H somewhere on it, the shell
 270      * will block and the command will not be executed.
 271     if (!shell) {
 272         shell = getenv("SHELL");
 273         if (!shell)
 274             shell = "/bin/sh";
 275     }
 276      */
 277     shell = "/bin/sh";
 278
 279     pid = fork();
 280
 281     if (pid==0) {
 282
 283         SetupEnvironment(scr);
 284
 285 #ifdef HAVE_SETPGID
 286         setpgid(0, 0);
 287 #endif
 288         execl(shell, shell, "-c", command, NULL);
 289         wsyserror("could not execute %s -c %s", shell, command);
 290         Exit(-1);
 291     } else if (pid < 0) {
 292         wsyserror("cannot fork a new process");
 293     } else {
 294         _tuple *data = wmalloc(sizeof(_tuple));
 295
 296         data->scr = scr;
 297         data->command = wstrdup(command);
 298
 299         wAddDeathHandler(pid, (WDeathHandler*)shellCommandHandler, data);
 300     }
 301 }
 302
 303
 304 /*
 305  *---------------------------------------------------------------------------
 306  * StartLogShell
 307  *      Start a shell that will receive all stdin and stdout from processes
 308  * forked by wmaker.
 309  *---------------------------------------------------------------------------
 310  */
 311 void
 312 StartLogShell(WScreen *scr)
 313 {
 314     int in_fd[2];
 315     int out_fd[2];
 316     int err_fd[2];
 317     pid_t pid;
 318
 319     SetupEnvironment(scr);
 320
 321     if (pipe(in_fd) < 0) {
 322         wsyserror("could not create pipe for log shell\n");
 323         return;
 324     }
 325     if (pipe(out_fd) < 0) {
 326         wsyserror("could not create pipe for log shell\n");
 327         close(in_fd[0]);
 328         close(in_fd[1]);
 329         return;
 330     }
 331     if (pipe(err_fd) < 0) {
 332         wsyserror("could not create pipe for log shell\n");
 333         close(out_fd[0]);
 334         close(out_fd[1]);
 335         close(in_fd[0]);
 336         close(in_fd[1]);
 337         return;
 338     }
 339
 340     pid = fork();
 341     if (pid < 0) {
 342         wsyserror("could not fork a new process for log shell\n");
 343         return;
 344     } else if (pid == 0) {
 345         close(in_fd[0]);
 346         close(out_fd[1]);
 347         close(err_fd[1]);
 348
 349         close(0);
 350         close(1);
 351         close(2);
 352
 353         if (dup2(in_fd[1], 0) < 0) {
 354             wsyserror("could not redirect stdin for log shell\n");
 355             exit(1);
 356         }
 357         if (dup2(out_fd[1], 1) < 0) {
 358             wsyserror("could not redirect stdout for log shell\n");
 359             exit(1);
 360         }
 361         if (dup2(err_fd[1], 2) < 0) {
 362             wsyserror("could not redirect stderr for log shell\n");
 363             exit(1);
 364         }
 365
 366         close(in_fd[1]);
 367         close(out_fd[1]);
 368         close(err_fd[1]);
 369
 370         execl("/bin/sh", "/bin/sh", "-c", wPreferences.logger_shell, NULL);
 371         wsyserror("could not execute %s\n", wPreferences.logger_shell);
 372         exit(1);
 373     } else {
 374         close(in_fd[1]);
 375         close(out_fd[0]);
 376         close(err_fd[0]);
 377
 378         LogStdIn = in_fd[1];
 379         LogStdOut = out_fd[0];
 380         LogStdErr = err_fd[0];
 381     }
 382 }
 383
 384
 385 /*
 386  *---------------------------------------------------------------------
 387  * wAbort--
 388  *      Do a major cleanup and exit the program
 389  *
 390  *----------------------------------------------------------------------
 391  */
 392 void
 393 wAbort(Bool dumpCore)
 394 {
 395     int i;
 396     WScreen *scr;
 397
 398     for (i=0; i<wScreenCount; i++) {
 399         scr = wScreenWithNumber(i);
 400         if (scr)
 401             RestoreDesktop(scr);
 402     }
 403     printf(_("%s aborted.\n"), ProgName);
 404     if (dumpCore)
 405         abort();
 406     else
 407         exit(1);
 408 }
 409
 410
 411 void
 412 print_help()
 413 {
 414     printf(_("Usage: %s [options]\n"), ProgName);
 415     puts(_("The Window Maker window manager for the X window system"));
 416     puts("");
 417     puts(_(" -display host:dpy  display to use"));
 418 #ifdef USECPP
 419     puts(_(" --no-cpp           disable preprocessing of configuration files"));
 420 #endif
 421     puts(_(" --no-dock          do not open the application Dock"));
 422     puts(_(" --no-clip          do not open the workspace Clip"));
 423
 424     puts(_(" --locale locale            locale to use"));
 425
 426     puts(_(" --visual-id visualid       visual id of visual to use"));
 427     puts(_(" --static           do not update or save configurations"));
 428 #ifdef DEBUG
 429     puts(_(" --synchronous              turn on synchronous display mode"));
 430 #endif
 431     puts(_(" --version          print version and exit"));
 432     puts(_(" --help                     show this message"));
 433 }
 434
 435
 436
 437 void
 438 check_defaults()
 439 {
 440     char *path;
 441
 442     path = wdefaultspathfordomain("");
 443     if (access(path, R_OK)!=0) {
 444         wfatal(_("could not find user GNUstep directory (%s).\n"
 445                  "Make sure you have installed Window Maker correctly and run wmaker.inst"),
 446                path);
 447         exit(1);
 448     }
 449
 450     free(path);
 451 }
 452
 453
 454 static void
 455 execInitScript()
 456 {
 457     char *file;
 458     char *paths = wstrappend(wusergnusteppath(), ":"DEF_CONFIG_PATHS);
 459
 460     file = wfindfile(paths, DEF_INIT_SCRIPT);
 461     free(paths);
 462
 463     if (file) {
 464         if (system(file) != 0) {
 465             wsyserror(_("%s:could not execute initialization script"), file);
 466         }
 467 #if 0
 468         if (fork()==0) {
 469             execl("/bin/sh", "/bin/sh", "-c", file, NULL);
 470             wsyserror(_("%s:could not execute initialization script"), file);
 471             exit(1);
 472         }
 473 #endif
 474         free(file);
 475     }
 476 }
 477
 478
 479 void
 480 ExecExitScript()
 481 {
 482     char *file;
 483     char *paths = wstrappend(wusergnusteppath(), ":"DEF_CONFIG_PATHS);
 484
 485     file = wfindfile(paths, DEF_EXIT_SCRIPT);
 486     free(paths);
 487
 488     if (file) {
 489         if (system(file) != 0) {
 490             wsyserror(_("%s:could not execute exit script"), file);
 491         }
 492 #if 0
 493         if (fork()==0) {
 494             execl("/bin/sh", "/bin/sh", "-c", file, NULL);
 495             wsyserror(_("%s:could not execute exit script"), file);
 496             exit(1);
 497         }
 498 #endif
 499         free(file);
 500     }
 501 }
 502
 503 #if 0
 504 char*
 505 getFullPath(char *path)
 506 {
 507     char buffer[1024];
 508     char *tmp;
 509     char *basep = (char*)buffer;
 510
 511     if (*path != '/' && getcwd(buffer, 1023)) {
 512
 513         for (;;) {
 514             if (strncmp(path, "../", 3)==0) {
 515                 path += 3;
 516                 basep = strchr(basep, '/');
 517                 if (!basep || *path==0)
 518                     break;
 519             }
 520         }
 521         if (*path == '/' || strncmp(path, "./",2)==0) {
 522             tmp =
 523         }
 524
 525         /*
 526          * path
 527          * ./path
 528          * ../path
 529          * ../../path
 530          */
 531
 532
 533     } else {
 534         return wstrappend(path);
 535     }
 536
 537     return tmp;
 538 }
 539 #endif
 540
 541 int
 542 main(int argc, char **argv)
 543 {
 544     int i, restart=0;
 545     char *str;
 546     int d, s;
 547 #ifdef DEBUG
 548     Bool doSync = False;
 549 #endif
 550
 551     wsetabort(wAbort);
 552
 553     /* for telling WPrefs what's the name of the wmaker binary being ran */
 554     {
 555 /*      char *tmp;
 556
 557         tmp = getFullPath(argv[0]);*/
 558         str = wstrappend("WMAKER_BIN_NAME=", argv[0]);
 559 /*      free(tmp);*/
 560         putenv(str);
 561     }
 562
 563     ArgCount = argc;
 564     Arguments = argv;
 565
 566     WMInitializeApplication("WindowMaker", &argc, argv);
 567
 568
 569     ProgName = strrchr(argv[0],'/');
 570     if (!ProgName)
 571       ProgName = argv[0];
 572     else
 573       ProgName++;
 574
 575
 576     restart = 0;
 577
 578     memset(&wPreferences, 0, sizeof(WPreferences));
 579
 580     if (argc>1) {
 581         for (i=1; i<argc; i++) {
 582 #ifdef USECPP
 583             if (strcmp(argv[i], "-nocpp")==0
 584                 || strcmp(argv[i], "--no-cpp")==0) {
 585                 wPreferences.flags.nocpp=1;
 586             } else
 587 #endif
 588             if (strcmp(argv[i], "-nodock")==0
 589                 || strcmp(argv[i], "--no-dock")==0) {
 590                 wPreferences.flags.nodock=1;
 591             } else if (strcmp(argv[i], "-noclip")==0
 592                        || strcmp(argv[i], "--no-clip")==0) {
 593                 wPreferences.flags.noclip=1;
 594             } else if (strcmp(argv[i], "-version")==0
 595                        || strcmp(argv[i], "--version")==0) {
 596                 printf("Window Maker %s\n", VERSION);
 597                 exit(0);
 598             } else if (strcmp(argv[i], "--global_defaults_path")==0) {
 599                 printf("%s/WindowMaker\n", SYSCONFDIR);
 600                 exit(0);
 601 #ifdef DEBUG
 602             } else if (strcmp(argv[i], "--synchronous")==0) {
 603                 doSync = 1;
 604 #endif
 605             } else if (strcmp(argv[i], "-locale")==0
 606                        || strcmp(argv[i], "--locale")==0) {
 607                 i++;
 608                 if (i>=argc) {
 609                     wwarning(_("too few arguments for %s"), argv[i-1]);
 610                     exit(0);
 611                 }
 612                 Locale = argv[i];
 613             } else if (strcmp(argv[i], "-display")==0) {
 614                 i++;
 615                 if (i>=argc) {
 616                     wwarning(_("too few arguments for %s"), argv[i-1]);
 617                     exit(0);
 618                 }
 619                 DisplayName = argv[i];
 620             } else if (strcmp(argv[i], "-visualid")==0
 621                        || strcmp(argv[i], "--visual-id")==0) {
 622                 i++;
 623                 if (i>=argc) {
 624                     wwarning(_("too few arguments for %s"), argv[i-1]);
 625                     exit(0);
 626                 }
 627                 if (sscanf(argv[i], "%i", &wVisualID)!=1) {
 628                     wwarning(_("bad value for visualid: \"%s\""), argv[i]);
 629                     exit(0);
 630                 }
 631             } else if (strcmp(argv[i], "-static")==0
 632                        || strcmp(argv[i], "--static")==0) {
 633
 634                 wPreferences.flags.noupdates = 1;
 635 #ifdef XSMP_ENABLED
 636             } else if (strcmp(argv[i], "-clientid")==0
 637                        || strcmp(argv[i], "-restore")==0) {
 638                 i++;
 639                 if (i>=argc) {
 640                     wwarning(_("too few arguments for %s"), argv[i-1]);
 641                     exit(0);
 642                 }
 643 #endif
 644             } else if (strcmp(argv[i], "--help")==0) {
 645                 print_help();
 646                 exit(0);
 647             } else {
 648                 printf(_("%s: invalid argument '%s'\n"), argv[0], argv[i]);
 649                 printf(_("Try '%s --help' for more information\n"), argv[0]);
 650                 exit(1);
 651             }
 652         }
 653     }
 654
 655     if (!wPreferences.flags.noupdates) {
 656         /* check existence of Defaults DB directory */
 657         check_defaults();
 658     }
 659
 660 #if 0
 661     tmp = getenv("LANG");
 662     if (tmp) {
 663         if (setlocale(LC_ALL,"") == NULL) {
 664             wwarning("cannot set locale %s", tmp);
 665             wwarning("falling back to C locale");
 666             setlocale(LC_ALL,"C");
 667             Locale = NULL;
 668         } else {
 669             if (strcmp(tmp, "C")==0 || strcmp(tmp, "POSIX")==0)
 670               Locale = NULL;
 671             else
 672               Locale = tmp;
 673         }
 674     } else {
 675         Locale = NULL;
 676     }
 677 #endif
 678     if (!Locale) {
 679         Locale = getenv("LANG");
 680     }
 681     setlocale(LC_ALL, Locale);
 682     if (!Locale || strcmp(Locale, "C")==0 || strcmp(Locale, "POSIX")==0)
 683       Locale = NULL;
 684 #ifdef I18N
 685     if (getenv("NLSPATH"))
 686       bindtextdomain("WindowMaker", getenv("NLSPATH"));
 687     else
 688       bindtextdomain("WindowMaker", LOCALEDIR);
 689     textdomain("WindowMaker");
 690
 691     if (!XSupportsLocale()) {
 692         wwarning(_("X server does not support locale"));
 693     }
 694     if (XSetLocaleModifiers("") == NULL) {
 695         wwarning(_("cannot set locale modifiers"));
 696     }
 697 #endif
 698
 699     if (Locale) {
 700         char *ptr;
 701
 702         Locale = wstrdup(Locale);
 703         ptr = strchr(Locale, '.');
 704         if (ptr)
 705             *ptr = 0;
 706     }
 707
 708
 709     /* open display */
 710     dpy = XOpenDisplay(DisplayName);
 711     if (dpy == NULL) {
 712         wfatal(_("could not open display \"%s\""), XDisplayName(DisplayName));
 713         exit(1);
 714     }
 715
 716     if (fcntl(ConnectionNumber(dpy), F_SETFD, FD_CLOEXEC) < 0) {
 717         wsyserror("error setting close-on-exec flag for X connection");
 718         exit(1);
 719     }
 720
 721     /* check if the user specified a complete display name (with screen).
 722      * If so, only manage the specified screen */
 723     if (DisplayName)
 724         str = strchr(DisplayName, ':');
 725     else
 726         str = NULL;
 727
 728     if (str && sscanf(str, "%i.%i", &d, &s)==2)
 729         multiHead = False;
 730
 731     DisplayName = XDisplayName(DisplayName);
 732     str = wmalloc(strlen(DisplayName)+64);
 733     sprintf(str, "DISPLAY=%s", DisplayName);
 734     putenv(str);
 735
 736 #ifdef DEBUG
 737     if (doSync)
 738         XSynchronize(dpy, True);
 739 #endif
 740
 741     wXModifierInitialize();
 742
 743 #ifdef XSMP_ENABLED
 744     wSessionConnectManager(argv, argc);
 745 #endif
 746
 747     StartUp(!multiHead);
 748
 749     if (wScreenCount==1)
 750         multiHead = False;
 751
 752     execInitScript();
 753
 754     EventLoop();
 755     return -1;
 756 }