diff options
Diffstat (limited to 'xts5/XtC/XtAddInput/XtAddInput.m')
| -rw-r--r-- | xts5/XtC/XtAddInput/XtAddInput.m | 319 |
1 files changed, 319 insertions, 0 deletions
diff --git a/xts5/XtC/XtAddInput/XtAddInput.m b/xts5/XtC/XtAddInput/XtAddInput.m new file mode 100644 index 00000000..9cea8e4a --- /dev/null +++ b/xts5/XtC/XtAddInput/XtAddInput.m @@ -0,0 +1,319 @@ +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/XtC/XtAddInput/XtAddInput.m,v 1.2 2005-04-21 09:40:42 ajosey Exp $ + +Copyright (c) 1999 The Open Group +Copyright (c) Applied Testing and Technology, Inc. 1993, 1994, 1995 +Copyright (c) 88open Consortium, Ltd. 1990, 1991, 1992, 1993 +All Rights Reserved. + +>># +>># Project: VSW5 +>># +>># File: tset/XtC/XtAddInput/XtAddInput.m +>># +>># Description: +>># Tests for XtAddInput() +>># +>># Modifications: +>># $Log: taddinput.m,v $ +>># Revision 1.2 2005-04-21 09:40:42 ajosey +>># resync to VSW5.1.5 +>># +>># Revision 8.2 2005/01/21 12:25:55 gwc +>># Updated copyright notice +>># +>># Revision 8.1 1999/11/26 12:12:37 vsx +>># avoid fixed file locations (for exec-in-place false) +>># +>># Revision 8.0 1998/12/23 23:38:30 mar +>># Branch point for Release 5.0.2 +>># +>># Revision 7.0 1998/10/30 23:01:34 mar +>># Branch point for Release 5.0.2b1 +>># +>># Revision 6.0 1998/03/02 05:29:32 tbr +>># Branch point for Release 5.0.1 +>># +>># Revision 5.0 1998/01/26 03:26:06 tbr +>># Branch point for Release 5.0.1b1 +>># +>># Revision 4.0 1995/12/15 09:22:39 tbr +>># Branch point for Release 5.0.0 +>># +>># Revision 3.1 1995/12/15 02:19:17 andy +>># Prepare for GA Release +>># +>>EXTERN +#include <X11/IntrinsicP.h> +#include <X11/ConstrainP.h> +#include <X11/CoreP.h> + +XtAppContext app_ctext; +Widget topLevel, panedw, boxw1, boxw2; +Widget labelw, rowcolw, click_quit; + +XtInputId input_ret; +char *msg = "Hello World"; +int acount = 0; +FILE *fid; +/* +** Procedure XtTMO_Proc +*/ +void XtTMO_Proc(client_data, id) +XtPointer client_data; +XtIntervalId *id; +{ + tet_infoline("ERROR: 5 seconds elapsed without input procedure being called"); + tet_result(TET_FAIL); + exit(0); +} +/* +** Procedure XtIOP_Proc +*/ +void XtIOP_Proc(client_data, source, id) +XtPointer client_data; +int *source; +XtInputId *id; +{ + avs_set_event(1,avs_get_event(1)+1); + if (acount++ != 0) + return; + tet_infoline("TEST: InputID passed to callback matches return from XtAddInput"); + if (*id != input_ret) { + sprintf(ebuf, "ERROR: InputId passed to callback was %#x, InputId returned by XtAddInput was %#x, should be identical", id, input_ret); + tet_infoline(ebuf); + tet_result(TET_FAIL); + return; + } + tet_infoline("TEST: Source passed to callback matches that passed to XtAddInput"); + if (*source != fileno(fid)) { + sprintf(ebuf, "ERROR: Source passed to callback was %#x, source passed to XtAddInput was %#x, should be identical", *source, fileno(fid)); + tet_infoline(ebuf); + tet_result(TET_FAIL); + return; + } + tet_infoline("TEST: Client data passed to callback matches that passed to XtAddInput"); + if (strncmp(client_data, msg, sizeof(msg)) != 0) { + sprintf(ebuf, "ERROR: Client_data passed to callback was %s, Client_data passed to XtAddInput was %s, should be identical", client_data, msg); + tet_infoline(ebuf); + tet_result(TET_FAIL); + return; + } + exit(0); +} +>>SET tpstartup avs_alloc_sem +>>SET tpcleanup avs_free_sem +>>TITLE XtAddInput XtC +XtInputId +XtAddInput(source, condition, proc, client_data) +>>ASSERTION Good A +If the implementation is POSIX-based: +A successful call to +XtInputId XtAddInput(source, condition, proc, client_data) +when condition is XtInputReadMask shall register +.A proc +as the procedure that will be called for the default +application context of the calling process when +the file descriptor +.A source +has data to be read and return an identifier for it. +>>CODE +char *data; +int status = 0; +pid_t pid2; +pid_t pid3; +int pstatus; + +if (config.posix_system != 0) { + FORK(pid3); + avs_set_event(1, 0); + avs_xt_hier_def("Taddinput1", "XtAddInput"); + data = "data1"; + FORK(pid2); + sprintf(ebuf, "PREP: Open file %s for read", data); + tet_infoline(ebuf); + if (( fid = (FILE *)fopen(data, "w+")) == NULL ) { + sprintf(ebuf, "ERROR: Could not open file %s", data); + tet_infoline(ebuf); + tet_result(TET_FAIL); + } + tet_infoline("TEST: Register file as an input source"); + input_ret = XtAddInput(fileno(fid), (XtPointer)XtInputReadMask, XtIOP_Proc, (XtPointer)msg); + tet_infoline("TEST: Create windows for widgets and map them"); + XtRealizeWidget(topLevel); + /* + ** during idle time file should be read, exit after 5 seconds + */ + tet_infoline("TEST: Start XtMainLoop, stop with timeout after 5 seconds"); + XtAddTimeOut((unsigned long)5000, XtTMO_Proc, topLevel); + tet_infoline("TEST: Loop for events"); + XtMainLoop(); + LKROF(pid2, AVSXTTIMEOUT-4); + unlink(data); + KROF3(pid3, pstatus, AVSXTTIMEOUT-2); + if (pstatus != 0) { + tet_infoline("ERROR: Test process exited abnormally"); + tet_infoline(" May mean display cannot be opened"); + tet_result(TET_UNRESOLVED); + } + else { + tet_infoline("TEST: Input procedure was invoked"); + status = avs_get_event(1); + check_dec(1, status, "XtIOP_Proc invoked status"); + tet_result(TET_PASS); + } +}else { + tet_infoline("INFO: Not configured as a POSIX system"); + tet_result(TET_UNSUPPORTED); +} +>>ASSERTION Good C +If the implementation is POSIX-based: +A successful call to +XtInputId XtAddInput(source, condition, proc, client_data) +when condition is XtInputWriteMask shall register proc as +the procedure that will be called when the file descriptor +.A source +is ready for writing. +>>CODE +char *data; +int status = 0; +pid_t pid2; +pid_t pid3; +int pstatus; + +if (config.posix_system != 0) { + FORK(pid3); + avs_set_event(1, 0); + avs_xt_hier_def("Taddinput1", "XtAddInput"); + data = "data1"; + FORK(pid2); + sprintf(ebuf, "PREP: Open file %s for write", data); + tet_infoline(ebuf); + if (( fid = (FILE *)fopen(data, "w+")) == NULL ) { + sprintf(ebuf, "ERROR: Could not open file %s", data); + tet_infoline(ebuf); + tet_result(TET_FAIL); + } + tet_infoline("TEST: Register file as an input source"); + input_ret = XtAddInput(fileno(fid), (XtPointer)XtInputWriteMask, XtIOP_Proc, (XtPointer)msg); + tet_infoline("TEST: Create windows for widgets and map them"); + XtRealizeWidget(topLevel); + /* + ** during idle time file should be ready, exit after 5 seconds + */ + tet_infoline("TEST: Start XtMainLoop, stop with timeout after 5 seconds"); + XtAddTimeOut((unsigned long)5000, XtTMO_Proc, topLevel); + tet_infoline("TEST: Loop for events"); + XtMainLoop(); + LKROF(pid2, AVSXTTIMEOUT-4); + unlink(data); + KROF3(pid3, pstatus, AVSXTTIMEOUT-2); + if (pstatus != 0) { + tet_infoline("ERROR: Test process exited abnormally"); + tet_infoline(" May mean display cannot be opened"); + tet_result(TET_UNRESOLVED); + } + else { + tet_infoline("TEST: Input procedure was invoked"); + status = avs_get_event(1); + check_dec(1, status, "XtIOP_Proc invoked status"); + tet_result(TET_PASS); + } +}else { + tet_infoline("INFO: Not configured as a POSIX system"); + tet_result(TET_UNSUPPORTED); +} +>>ASSERTION Good D 1 +If the implementation is POSIX-based: +A successful call to +XtInputId XtAddInput(source, condition, proc, client_data) +when condition is XtInputExceptMask shall register proc as +the procedure that will be called when the file descriptor +.A source +has exception data. +>>ASSERTION Good D 3 +If the implementation is POSIX-based: +A call to +XtInputId XtAddInput(source, condition, proc, client_data) +when +.A condition +is some combination of XtInputReadMask, XtInputWriteMask, and +XtInputExceptMask shall be the equivalent of separate calls to +XtAppAddInput for each option specified in +.A condition. +>>ASSERTION Good C +If the implementation is POSIX-based: +A successful call to +XtInputId XtAddInput(source, condition, proc, client_data) +shall cause +.A client_data +to be passed to +.A proc +when it is invoked. +>>CODE +char *data; +int status = 0; +pid_t pid2; +pid_t pid3; +int pstatus; + +if (config.posix_system != 0) { + FORK(pid3); + avs_set_event(1, 0); + avs_xt_hier_def("Taddinput1", "XtAddInput"); + data = "data1"; + FORK(pid2); + sprintf(ebuf, "PREP: Open file %s for read", data); + tet_infoline(ebuf); + if (( fid = (FILE *)fopen(data, "w+")) == NULL ) { + sprintf(ebuf, "ERROR: Could not open file %s", data); + tet_infoline(ebuf); + tet_result(TET_FAIL); + } + tet_infoline("TEST: Register file as an input source"); + input_ret = XtAddInput(fileno(fid), (XtPointer)XtInputReadMask, XtIOP_Proc, (XtPointer)msg); + tet_infoline("TEST: Create windows for widgets and map them"); + XtRealizeWidget(topLevel); + /* + ** during idle time file should be read, exit after 5 seconds + */ + tet_infoline("TEST: Start XtMainLoop, stop with timeout after 5 seconds"); + XtAddTimeOut((unsigned long)5000, XtTMO_Proc, topLevel); + tet_infoline("TEST: Loop for events"); + XtMainLoop(); + LKROF(pid2, AVSXTTIMEOUT-4); + unlink(data); + KROF3(pid3, pstatus, AVSXTTIMEOUT-2); + if (pstatus != 0) { + tet_infoline("ERROR: Test process exited abnormally"); + tet_infoline(" May mean display cannot be opened"); + tet_result(TET_UNRESOLVED); + } + else { + tet_infoline("TEST: Input procedure was invoked"); + status = avs_get_event(1); + check_dec(1, status, "XtIOP_Proc invoked status"); + tet_result(TET_PASS); + } +}else { + tet_infoline("INFO: Not configured as a POSIX system"); + tet_result(TET_UNSUPPORTED); +} |