/* xsswin -- create a screensaver window
 * Copyright (C) 2008  Neale Pickett <neale@woozle.org>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or (at
 * your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <sys/wait.h>
#include <unistd.h>
#include <stdio.h>

#include <X11/Xlib.h>

#include "obj.h"

int
main(int argc, char * const argv[])
{
  Display *display;
  Pixmap   pmap;
  Window   w;

  if (argc < 2) {
    (void)fprintf(stderr, "Usage: %s PROGRAM [ARGUMENT ...]\n", argv[0]);
    return 64;                  /* EX_USAGE */
  }

  try {
    int                  screen;
    Cursor               invisible;
    XSetWindowAttributes wa;
    Window               root;
    XColor               black;
    int                  child;

    zero(wa);
    zero(black);

    if (! (display = XOpenDisplay(NULL))) raise("cannot open display");
    screen = DefaultScreen(display);
    root = RootWindow(display, screen);

    wa.override_redirect = 1;
    wa.background_pixel = BlackPixel(display, screen);
    w = XCreateWindow(display, root,
                      0, 0,
                      DisplayWidth(display, screen), DisplayHeight(display, screen), 0,
                      CopyFromParent, InputOutput, CopyFromParent,
                      CWOverrideRedirect | CWBackPixel,
                      &wa);
    XAllocColor(display, DefaultColormap(display, screen), &black);
    pmap = XCreateBitmapFromData(display, w, "\0", 1, 1);
    invisible = XCreatePixmapCursor(display, pmap, pmap, &black, &black, 0, 0);
    XDefineCursor(display, w, invisible);
    XMapRaised(display, w);
    XSync(display, False);

    child = fork();
    if (0 == child) {
      char *nargv[argc + 1];
      char id[50];
      int i;

      (void)snprintf(id, sizeof(id), "0x%lx", (unsigned long)w);
      (void)setenv("XSS_WINDOW", id, 1);
      for (i = 0; i < argc; i += 1) {
        if (0 == strcmp(argv[i], "XSS_WINDOW")) {
          nargv[i] = id;
        } else {
          nargv[i] = argv[i];
        }
      }
      nargv[argc] = NULL;
      (void)execvp(nargv[1], nargv + 1);
      perror("exec");
      exit(1);
    }

    /* XXX: maybe important to also watch for X events? */
    (void)waitpid(-1, NULL, 0);
  }

  if (display) {
    (void)XUndefineCursor(display, w);
    (void)XFreePixmap(display, pmap);
    (void)XCloseDisplay(display);
  }

  except {
    (void)fprintf(stderr, "Error: %s\n", exception);
    return 69;                  /* EX_UNAVAILABLE */
  }
  return 0;
}