/* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-

   grouptran.c for the Openbox window manager
   Copyright (c) 2003-2007   Dana Jansens

   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 2 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.

   See the COPYING file for a copy of the GNU General Public License.
*/

#include <stdio.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Xatom.h>

int main () {
  Display   *display;
  Window     one, two, group;
  XEvent     report;
  XWMHints  *wmhints;
  Atom       state, modal;

  display = XOpenDisplay(NULL);

  if (display == NULL) {
    fprintf(stderr, "couldn't connect to X server :0\n");
    return 0;
  }

  state = XInternAtom(display, "_NET_WM_STATE", True);
  modal = XInternAtom(display, "_NET_WM_STATE_MODAL", True);

  group = XCreateWindow(display, RootWindow(display, 0),
                        0,0,1,1, 10, CopyFromParent, CopyFromParent,
			 CopyFromParent, 0, 0);

  one = XCreateWindow(display, RootWindow(display, 0),
                      0,0,300,300, 10, CopyFromParent, CopyFromParent,
			 CopyFromParent, 0, 0);
  two = XCreateWindow(display, RootWindow(display, 0),
                      0,0,100,100, 10, CopyFromParent, CopyFromParent,
                      CopyFromParent, 0, 0);

  XSetWindowBackground(display,one,WhitePixel(display,0));
  XSetWindowBackground(display,two,BlackPixel(display,0));

  XSetTransientForHint(display, two, RootWindow(display,0));
  XChangeProperty(display, two, state, XA_ATOM, 32,
                  PropModeReplace, (unsigned char*)&modal, 1);

  wmhints = XAllocWMHints();

  wmhints->flags = WindowGroupHint;
  wmhints->window_group = group;

  XSetWMHints(display, one, wmhints);
  XSetWMHints(display, two, wmhints);

  XFree(wmhints);

  XMapWindow(display, one);
  XFlush(display);
  sleep(1);
  XMapWindow(display, two);
  XFlush(display);

  while (1) {
    XNextEvent(display, &report);
  }

  return 1;
}
