Fix Xproto test programs to match test names

1 files changed, 306 insertions, 0 deletions

diff --git a/xts5/tset/Xproto/pCreateCursor/pCreateCursor.m b/xts5/tset/Xproto/pCreateCursor/pCreateCursor.m
new file mode 100644
index 00000000..734c34b7
--- /dev/null
+++ b/xts5/tset/Xproto/pCreateCursor/pCreateCursor.m
@@ -0,0 +1,306 @@
+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/Xproto/CreateCursor/CreateCursor.m,v 1.2 2005-11-03 08:44:05 jmichael Exp $
+
+Copyright (c) Applied Testing and Technology, Inc. 1995
+All Rights Reserved.
+
+>># Project: VSW5
+>># 
+>># File: xts5/tset/Xproto/CreateCursor/CreateCursor.m
+>># 
+>># Description:
+>># 	Tests for CreateCursor
+>># 
+>># Modifications:
+>># $Log: crtcrsr.m,v $
+>># Revision 1.2  2005-11-03 08:44:05  jmichael
+>># clean up all vsw5 paths to use xts5 instead.
+>>#
+>># Revision 1.1.1.2  2005/04/15 14:05:50  anderson
+>># Reimport of the base with the legal name in the copyright fixed.
+>>#
+>># Revision 8.0  1998/12/23 23:32:26  mar
+>># Branch point for Release 5.0.2
+>>#
+>># Revision 7.0  1998/10/30 22:52:59  mar
+>># Branch point for Release 5.0.2b1
+>>#
+>># Revision 6.0  1998/03/02 05:23:56  tbr
+>># Branch point for Release 5.0.1
+>>#
+>># Revision 5.0  1998/01/26 03:20:28  tbr
+>># Branch point for Release 5.0.1b1
+>>#
+>># Revision 4.0  1995/12/15 09:05:03  tbr
+>># Branch point for Release 5.0.0
+>>#
+>># Revision 3.1  1995/12/15  01:03:50  andy
+>># Prepare for GA Release
+>>#
+/*
+ 
+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.
+
+Copyright 1990, 1991 by UniSoft Group Limited.
+
+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.
+
+Copyright 1989 by Sequent Computer Systems, Inc., Portland, Oregon
+
+			All Rights Reserved
+
+Permission to use, copy, modify, and distribute this software and its
+documentation for any purpose and without fee is hereby granted,
+provided that the above copyright notice appears in all copies and that
+both that copyright notice and this permission notice appear in
+supporting documentation, and that the name of Sequent not be used
+in advertising or publicity pertaining to distribution or use of the
+software without specific, written prior permission.
+
+SEQUENT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
+ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS; IN NO EVENT SHALL
+SEQUENT BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
+ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
+ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
+SOFTWARE.
+*/
+>>TITLE CreateCursor Xproto
+>>SET startup protostartup
+>>SET cleanup protocleanup
+>>EXTERN
+/* Touch test for CreateCursor request */
+
+#include "Xstlib.h"
+
+#define CLIENT 0
+static TestType test_type = SETUP;
+Window win;
+Pixmap pix;
+xCreateCursorReq *req;
+
+static
+void
+tester()
+{
+	Create_Client(CLIENT);
+
+	win = Create_Default_Window(CLIENT);
+	pix = Create_Default_Cursor_Pixmap(CLIENT);
+
+	Set_Test_Type(CLIENT, test_type);
+	req = (xCreateCursorReq *) Make_Req(CLIENT, X_CreateCursor);
+	if(test_type == BAD_IDCHOICE1) {
+        	Send_Req(CLIENT, (xReq *) req);
+        	Log_Trace("client %d sent CreateCursor request\n", CLIENT);
+		(void) Expect_Nothing(CLIENT);
+	}
+	if(test_type == BAD_IDCHOICE2) {
+        	req->cid = 0xffffffff; /* top 2 bits set ==> invalid */
+	}
+	Send_Req(CLIENT, (xReq *) req);
+	Set_Test_Type(CLIENT, GOOD);
+	switch(test_type) {
+	case GOOD:
+		Log_Trace("client %d sent default CreateCursor request\n", CLIENT);
+		(void) Expect_Nothing(CLIENT);
+		break;
+	case BAD_IDCHOICE1:
+        	Log_Trace("client %d sent CreateCursor request with same resource ID\n", CLIENT);
+		(void) Expect_BadIDChoice(CLIENT);
+        	(void) Expect_Nothing(CLIENT);
+		break;
+	case BAD_IDCHOICE2:
+		Log_Trace("client %d sent CreateCursor request with out-of-range resource ID\n", CLIENT);
+		(void) Expect_BadIDChoice(CLIENT);
+        	(void) Expect_Nothing(CLIENT);
+		break;
+	case BAD_LENGTH:
+		Log_Trace("client %d sent CreateCursor request with bad length (%d)\n", CLIENT, req->length);
+		(void) Expect_BadLength(CLIENT);
+		(void) Expect_Nothing(CLIENT);
+		break;
+	case TOO_LONG:
+	case JUST_TOO_LONG:
+		Log_Trace("client %d sent overlong CreateCursor request (%d)\n", CLIENT, req->length);
+		(void) Expect_BadLength(CLIENT);
+		(void) Expect_Nothing(CLIENT);
+		break;
+	default:
+		Log_Err("INTERNAL ERROR: test_type %d not one of GOOD(%d), BAD_LENGTH(%d), TOO_LONG(%d) or JUST_TOO_LONG(%d)\n",
+			test_type, GOOD, BAD_LENGTH, TOO_LONG, JUST_TOO_LONG);
+		Abort();
+		/*NOTREACHED*/
+		break;
+	}
+	Free_Req(req);
+	Exit_OK();
+}
+>>ASSERTION Good A
+When a client sends a valid xname protocol request to the X server,
+then the X server does not send back an error, event or reply to the client.
+>>STRATEGY
+Call library function testfunc() to do the following:
+Open a connection to the X server using native byte sex.
+Send a valid xname protocol request to the X server.
+Verify that the X server does not send back an error, event or reply.
+Open a connection to the X server using reversed byte sex.
+Send a valid xname protocol request to the X server.
+Verify that the X server does not send back an error, event or reply.
+>>CODE
+
+	test_type = GOOD;
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);
+
+>>ASSERTION Bad A
+When a client sends an invalid xname protocol request to the X server,
+in which the length field of the request is not the minimum length required to 
+contain the request,
+then the X server sends back a BadLength error to the client.
+>>STRATEGY
+Call library function testfunc() to do the following:
+Open a connection to the X server using native byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one less than the minimum length required to contain the request.
+Verify that the X server sends back a BadLength error.
+Open a connection to the X server using reversed byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one less than the minimum length required to contain the request.
+Verify that the X server sends back a BadLength error.
+
+Open a connection to the X server using native byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one greater than the minimum length required to contain the request.
+Verify that the X server sends back a BadLength error.
+Open a connection to the X server using reversed byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one greater than the minimum length required to contain the request.
+Verify that the X server sends back a BadLength error.
+>>CODE
+
+	test_type = BAD_LENGTH; /* < minimum */
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);
+
+	test_type = JUST_TOO_LONG; /* > minimum */
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);
+
+>>ASSERTION Bad B 1
+When a client sends an invalid xname protocol request to the X server,
+in which the length field of the request exceeds the maximum length accepted
+by the X server,
+then the X server sends back a BadLength error to the client.
+>>STRATEGY
+Call library function testfunc() to do the following:
+Open a connection to the X server using native byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one greater than the maximum length accepted by the server.
+Verify that the X server sends back a BadLength error.
+Open a connection to the X server using reversed byte sex.
+Send an invalid xname protocol request to the X server with length 
+  one greater than the maximum length accepted by the server.
+Verify that the X server sends back a BadLength error.
+>>CODE
+
+	test_type = TOO_LONG;
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);
+
+>>ASSERTION Bad A
+When a client sends an invalid xname protocol request to the X server,
+in which the resource ID is already in use,
+then the X server sends back a BadIDChoice error to the client.
+>>STRATEGY
+Call library function testfunc() to do the following:
+Open a connection to the X server using native byte sex.
+Send a valid xname protocol request to the X server.
+Send an invalid xname protocol request with identical resource ID 
+  to the X server.
+Verify that the X server sends back a BadIDChoice error.
+Open a connection to the X server using reversed byte sex.
+Send a valid xname protocol request to the X server.
+Send an invalid xname protocol request with identical resource ID 
+  to the X server.
+Verify that the X server sends back a BadIDChoice error.
+>>CODE
+
+	test_type = BAD_IDCHOICE1;
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);
+
+>>ASSERTION Bad A
+When a client sends an invalid xname protocol request to the X server,
+in which the resource ID is outside the range assigned to the client,
+then the X server sends back a BadIDChoice error to the client.
+>>STRATEGY
+Call library function testfunc() to do the following:
+Open a connection to the X server using native byte sex.
+Send a valid xname protocol request to the X server.
+Send an invalid xname protocol request to the X server with a resource ID 
+  outside the range assigned to the client.
+Verify that the X server sends back a BadIDChoice error.
+Open a connection to the X server using reversed byte sex.
+Send a valid xname protocol request to the X server.
+Send an invalid xname protocol request to the X server with a resource ID 
+  outside the range assigned to the client.
+Verify that the X server sends back a BadIDChoice error.
+>>CODE
+
+	test_type = BAD_IDCHOICE2;
+
+	/* Call a library function to exercise the test code */
+	testfunc(tester);