diff options
Diffstat (limited to 'xts5/Xlib5/XQueryTree/XQueryTree.m')
| -rw-r--r-- | xts5/Xlib5/XQueryTree/XQueryTree.m | 326 |
1 files changed, 326 insertions, 0 deletions
diff --git a/xts5/Xlib5/XQueryTree/XQueryTree.m b/xts5/Xlib5/XQueryTree/XQueryTree.m new file mode 100644 index 00000000..dbfffcf4 --- /dev/null +++ b/xts5/Xlib5/XQueryTree/XQueryTree.m @@ -0,0 +1,326 @@ +Copyright (c) 2005 X.Org Foundation L.L.C. + +Permission is hereby granted, free of charge, to any person obtaining a copy of +this software and associated documentation files (the "Software"), to deal in +the Software without restriction, including without limitation the rights to +use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies +of the Software, and to permit persons to whom the Software is furnished to do +so, subject to the following conditions: + +The above copyright notice and this permission notice shall be included in all +copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +SOFTWARE. +$Header: /cvs/xtest/xtest/xts5/tset/Xlib5/XQueryTree/XQueryTree.m,v 1.2 2005-11-03 08:43:40 jmichael Exp $ + +Copyright (c) Applied Testing and Technology, Inc. 1995 +All Rights Reserved. + +>># Project: VSW5 +>># +>># File: xts5/tset/Xlib5/XQueryTree/XQueryTree.m +>># +>># Description: +>># Tests for XQueryTree() +>># +>># Modifications: +>># $Log: qrytr.m,v $ +>># Revision 1.2 2005-11-03 08:43:40 jmichael +>># clean up all vsw5 paths to use xts5 instead. +>># +>># Revision 1.1.1.2 2005/04/15 14:05:29 anderson +>># Reimport of the base with the legal name in the copyright fixed. +>># +>># Revision 8.0 1998/12/23 23:26:48 mar +>># Branch point for Release 5.0.2 +>># +>># Revision 7.0 1998/10/30 22:45:06 mar +>># Branch point for Release 5.0.2b1 +>># +>># Revision 6.0 1998/03/02 05:19:02 tbr +>># Branch point for Release 5.0.1 +>># +>># Revision 5.0 1998/01/26 03:15:33 tbr +>># Branch point for Release 5.0.1b1 +>># +>># Revision 4.0 1995/12/15 08:48:46 tbr +>># Branch point for Release 5.0.0 +>># +>># Revision 3.1 1995/12/15 00:47:37 andy +>># Prepare for GA Release +>># +/* +Portions of this software are based on Xlib and X Protocol Test Suite. +We have used this material under the terms of its copyright, which grants +free use, subject to the conditions below. Note however that those +portions of this software that are based on the original Test Suite have +been significantly revised and that all such revisions are copyright (c) +1995 Applied Testing and Technology, Inc. Insomuch as the proprietary +revisions cannot be separated from the freely copyable material, the net +result is that use of this software is governed by the ApTest copyright. + +Copyright (c) 1990, 1991 X Consortium + +Permission is hereby granted, free of charge, to any person obtaining a copy +of this software and associated documentation files (the "Software"), to deal +in the Software without restriction, including without limitation the rights +to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +copies of the Software, and to permit persons to whom the Software is +furnished to do so, subject to the following conditions: + +The above copyright notice and this permission notice shall be included in +all copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN +AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN +CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. + +Except as contained in this notice, the name of the X Consortium shall not be +used in advertising or otherwise to promote the sale, use or other dealings +in this Software without prior written authorization from the X Consortium. + +Permission to use, copy, modify, distribute, and sell this software and +its documentation for any purpose is hereby granted without fee, +provided that the above copyright notice appear in all copies and that +both that copyright notice and this permission notice appear in +supporting documentation, and that the name of UniSoft not be +used in advertising or publicity pertaining to distribution of the +software without specific, written prior permission. UniSoft +makes no representations about the suitability of this software for any +purpose. It is provided "as is" without express or implied warranty. +*/ +>>TITLE XQueryTree Xlib5 +Status + +Display *display = Dsp; +Window w; +Window *root_return = &root; +Window *parent_return = &parent; +Window **children_return = &children; +unsigned int *nchildren_return = &nchildren; +>>EXTERN +/* These are the store locations for the returned data */ +static Window root; +static Window parent; +static Window *children; +static unsigned int nchildren; + +/* Window structure template */ +/* A window with three child windows, one of which has */ +/* 3 overlapping children */ +static char *QTtemplate[] = { + ".", + "one . (10,10) 80x70", + "onec1 one (5,5) 30x30", + "onec2 one (15,10) 15x15", + "onec3 one (10,15) 15x15", + "two . (20,50) 40x20", + "three . (55,20) 20x20", +}; +static int NQTtemplate = NELEM(QTtemplate); + +static char *QT2template[] = { + ".", + "one . (10,10) 80x70", + "o1 one (5,5) 40x40", + "two . (25,25) 10x10", + "o2 one (30,30) 40x35", + "o3 one (20,50) 45x10", + "o4 one (60,10) 10x10", + "o5 one (15,35) 30x20", +}; +static int NQT2template = NELEM(QT2template); + +>>ASSERTION Good A +A successful call to xname returns non-zero, the root window ID in +.A root_return , +the parent window of the specified window +.A w +in +.A parent_return , +a pointer to the list of children windows of specified window +.A w +in +.A children_return , +and the number of children in the list for the specified window +.A w +in +.A nchildren_return . +>># ALTERNATIVE WORDING: +>># A call to xname returns the root window ID of the specified window +>># .A w +>># in +>># .A root_return , +>># the parent window in +>># .A parent_return , +>># a pointer to the list of child windows in +>># .A children_return +>># which can be freed with XFree, +>># and the number of child windows in the list in +>># .A nchildren_return . +>>STRATEGY +Create a window hierarchy. +Call xname to query the window tree. +Verify that the root window, parent window, number of children and + the children array were returned as expected. +>>CODE +Window realparent; +struct buildtree *tree; +Window one, two, three; +Window childarray[3]; +int loop; + +/* Create a window hierarchy. */ + realparent = defwin(display); + tree = buildtree(display, realparent, QTtemplate, NQTtemplate); + one = btntow(tree, "one"); + two = btntow(tree, "two"); + three = btntow(tree, "three"); + childarray[0] = btntow(tree, "onec1"); + childarray[1] = btntow(tree, "onec2"); + childarray[2] = btntow(tree, "onec3"); + trace("root window is %0x", DefaultRootWindow(Dsp)); + trace("parent is %0x", realparent); + trace("one is %0x", one); + trace("two is %0x", two); + trace("three is %0x", three); + for(loop=0; loop<3; loop++) + trace("onec%d is %0x", loop, childarray[loop]); + +/* Call xname to query the window tree. */ +#ifdef TESTING + w = realparent; +#else + w = one; +#endif + parent = None; + root = None; + children = (Window *)NULL; + nchildren = -1; + XCALL; + +/* Verify that the root window, parent window, number of children and */ +/* the children array were returned as expected. */ + + + if (root != DefaultRootWindow(Dsp)) { + FAIL; + report("%s returned an unexpected value for the root window", TestName); + report("Expected: %0x", DefaultRootWindow(Dsp)); + report("Returned: %0x", root); + } else + CHECK; + + if (parent != realparent) { + FAIL; + report("%s returned an unexpected value for the parent window", TestName); + report("Expected: %0x", realparent); + report("Returned: %0x", parent); + } else + CHECK; + + if (nchildren != 3) { + FAIL; + report("%s returned an unexpected number of child windows", TestName); + report("Expected: 3"); + report("Returned: %d", nchildren); + for(loop=0; loop<nchildren; loop++) + report("children[%d] is %0x", loop, children[loop]); + } else { + for(loop=0; loop<nchildren; loop++) + { + if(children[loop] != childarray[loop]) { + FAIL; + report("children array [%d] returned unexpected window", loop); + report("Expected: %0x", childarray[loop]); + report("Returned: %0x", children[loop]); + } else + CHECK; + } + XFree((char*)children); + } + + CHECKPASS(5); + +>>ASSERTION Good A +A call to xname returns the child windows +of the specified window +.A w +in +.A children_return +in current stacking order from bottommost first to topmost last. +>>STRATEGY +Create a window hierarchy. +Call xname to query the window tree. +Verify that the children array was returned as expected. +>>CODE +Window realparent; +struct buildtree *tree; +Window one, two; +Window childarray[5]; +int loop; + +/* Create a window hierarchy. */ + realparent = defwin(display); + tree = buildtree(display, realparent, QT2template, NQT2template); + one = btntow(tree, "one"); + two = btntow(tree, "two"); + childarray[0] = btntow(tree, "o1"); + childarray[1] = btntow(tree, "o2"); + childarray[2] = btntow(tree, "o3"); + childarray[3] = btntow(tree, "o4"); + childarray[4] = btntow(tree, "o5"); + trace("root window is %0x", DefaultRootWindow(Dsp)); + trace("parent is %0x", realparent); + trace("one is %0x", one); + trace("two is %0x", two); + for(loop=0; loop<5; loop++) + trace("one child %d is %0x", loop, childarray[loop]); + +/* Call xname to query the window tree. */ +#ifdef TESTING + w = realparent; +#else + w = one; +#endif + parent = None; + root = None; + children = (Window *)NULL; + nchildren = -1; + XCALL; + +/* Verify that the children array was returned as expected. */ + if (nchildren != 5) { + FAIL; + report("%s returned an unexpected number of child windows", TestName); + report("Expected: 5"); + report("Returned: %d", nchildren); + for(loop=0; loop<nchildren; loop++) + report("children[%d] is %0x", loop, children[loop]); + } else { + for(loop=0; loop<nchildren; loop++) + { + if(children[loop] != childarray[loop]) { + FAIL; + report("children array [%d] returned unexpected window", loop); + report("Expected: %0x", childarray[loop]); + report("Returned: %0x", children[loop]); + } else + CHECK; + } + XFree((char*)children); + } + + CHECKPASS(5); + +>>ASSERTION Bad A +.ER BadWindow |