openbox/tests/modal2.c
Dana Jansens 16f46c296d no tabs
2003-09-17 07:44:49 +00:00

74 lines
2.2 KiB
C

/* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
modal2.c for the Openbox window manager
Copyright (c) 2003 Ben 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 parent, child;
XEvent report;
Atom state, modal;
int x=10,y=10,h=400,w=400;
XEvent ce;
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);
parent = XCreateWindow(display, RootWindow(display, 0),
x, y, w, h, 10, CopyFromParent, CopyFromParent,
CopyFromParent, 0, 0);
child = XCreateWindow(display, RootWindow(display, 0),
x, y, w/2, h/2, 10, CopyFromParent, CopyFromParent,
CopyFromParent, 0, 0);
XSetWindowBackground(display,parent,WhitePixel(display,0));
XSetWindowBackground(display,child,BlackPixel(display,0));
XSetTransientForHint(display, child, parent);
XMapWindow(display, parent);
XMapWindow(display, child);
XFlush(display);
ce.xclient.type = ClientMessage;
ce.xclient.message_type = state;
ce.xclient.display = display;
ce.xclient.window = child;
ce.xclient.format = 32;
ce.xclient.data.l[0] = 1;
ce.xclient.data.l[1] = modal;
ce.xclient.data.l[2] = 0;
XSendEvent(display, RootWindow(display, DefaultScreen(display)),
False, SubstructureNotifyMask | SubstructureRedirectMask, &ce);
while (1) {
XNextEvent(display, &report);
}
return 1;
}