]> icculus.org git repositories - mikachu/openbox.git/blob - tests/modal3.c
tyƶtila %i
[mikachu/openbox.git] / tests / modal3.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    modal3.c for the Openbox window manager
4    Copyright (c) 2003-2007   Dana Jansens
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    See the COPYING file for a copy of the GNU General Public License.
17 */
18
19 #include <stdio.h>
20 #include <X11/Xlib.h>
21 #include <X11/Xutil.h>
22 #include <X11/Xatom.h>
23
24 int main () {
25   Display   *display;
26   Window     parent, child;
27   XEvent     report;
28   Atom       state, modal;
29   int        x=10,y=10,h=400,w=400;
30   XEvent ce;
31
32   display = XOpenDisplay(NULL);
33
34   if (display == NULL) {
35     fprintf(stderr, "couldn't connect to X server :0\n");
36     return 0;
37   }
38
39   state = XInternAtom(display, "_NET_WM_STATE", True);
40   modal = XInternAtom(display, "_NET_WM_STATE_MODAL", True);
41
42   parent = XCreateWindow(display, RootWindow(display, 0),
43                          x, y, w, h, 10, CopyFromParent, CopyFromParent,
44                          CopyFromParent, 0, 0);
45   child = XCreateWindow(display, RootWindow(display, 0),
46                         x, y, w/2, h/2, 10, CopyFromParent, CopyFromParent,
47                         CopyFromParent, 0, 0);
48
49   XSetWindowBackground(display,parent,WhitePixel(display,0)); 
50   XSetWindowBackground(display,child,BlackPixel(display,0)); 
51
52   XSetTransientForHint(display, child, parent);
53   
54   XMapWindow(display, parent);
55   XMapWindow(display, child);
56   XFlush(display);
57
58   ce.xclient.type = ClientMessage;
59   ce.xclient.message_type = state;
60   ce.xclient.display = display;
61   ce.xclient.window = child;
62   ce.xclient.format = 32;
63   ce.xclient.data.l[0] = 1;
64   ce.xclient.data.l[1] = modal;
65   ce.xclient.data.l[2] = 0;
66   XSendEvent(display, RootWindow(display, DefaultScreen(display)),
67              False, SubstructureNotifyMask | SubstructureRedirectMask, &ce);
68
69   ce.xclient.data.l[0] = 0;
70   XSendEvent(display, RootWindow(display, DefaultScreen(display)),
71              False, SubstructureNotifyMask | SubstructureRedirectMask, &ce);
72   
73   while (1) {
74     XNextEvent(display, &report);
75   }
76
77   return 1;
78 }