summaryrefslogtreecommitdiff
path: root/xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m
diff options
context:
space:
mode:
Diffstat (limited to 'xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m')
-rw-r--r--xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m525
1 files changed, 525 insertions, 0 deletions
diff --git a/xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m b/xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m
new file mode 100644
index 00000000..9d565c9e
--- /dev/null
+++ b/xts5/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m
@@ -0,0 +1,525 @@
+Copyright (c) 2005 X.Org Foundation LLC
+
+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/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m,v 1.1 2005-02-12 14:37:36 anderson Exp $
+
+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/Xlib7/XcmsSetWhiteAdjustProc/XcmsSetWhiteAdjustProc.m
+>>#
+>># Description:
+>># Tests for XcmsSetWhiteAdjustProc()
+>>#
+>># Modifications:
+>># $Log: cmswapr.m,v $
+>># Revision 1.1 2005-02-12 14:37:36 anderson
+>># Initial revision
+>>#
+>># Revision 8.0 1998/12/23 23:27:21 mar
+>># Branch point for Release 5.0.2
+>>#
+>># Revision 7.0 1998/10/30 22:45:40 mar
+>># Branch point for Release 5.0.2b1
+>>#
+>># Revision 6.0 1998/03/02 05:19:33 tbr
+>># Branch point for Release 5.0.1
+>>#
+>># Revision 5.0 1998/01/26 03:16:04 tbr
+>># Branch point for Release 5.0.1b1
+>>#
+>># Revision 4.0 1995/12/15 08:50:37 tbr
+>># Branch point for Release 5.0.0
+>>#
+>># Revision 3.1 1995/12/15 00:50:58 andy
+>># Prepare for GA Release
+>>#
+>>AVSCODE
+>>TITLE XcmsSetWhiteAdjustProc Xlib7
+XcmsSetWhiteAdjustProc()
+>>EXTERN
+
+/******
+ * User defined globals for test
+ ******/
+
+Bool writeable_colormaps = 1;
+
+/******
+ * User defined globals for test case sets
+ ******/
+Display *display_good;
+Visual *visual_good ;
+XcmsCCC ccc_good ;
+Colormap rw_colormap ;
+XcmsColor color_good ;
+XcmsColor color_in_out ;
+XcmsColorFormat format_good ;
+int screen_good ;
+int depth_good ;
+XcmsWhiteAdjustProc adjust_proc ;
+
+/******
+ * generated globals
+ ******/
+char *exec_file_name;
+int x_init,
+ y_init,
+ h_init,
+ w_init;
+
+/******
+ * routines
+ ******/
+
+/*****
+ * svccmsSetWhiteAdjustProc routine
+ *****/
+svccmsSetWhiteAdjustProc(display, ccc, white_adjust_proc, client_data)
+Display *display ;
+XcmsCCC ccc ;
+XcmsWhiteAdjustProc white_adjust_proc ;
+XPointer client_data ;
+{
+
+/*****
+ * external defs
+ *****/
+
+ extern int errcnt;
+ extern int errflg;
+ extern int chkflg;
+ extern int signal_status();
+ extern int unexp_err();
+ extern char *svc_user_arg;
+ extern char *strcpy();
+
+/******
+ * local storage
+ ******/
+ char fmtstr[256], *call_string;
+ union msglst fmt_lst[1];
+ int skip_pixcheck;
+
+ int
+ ss_status, /* save stat return status */
+ stat_status, /* check stat return status */
+ setup_status,
+ cleanup_status,
+ i1;
+
+ XcmsWhiteAdjustProc svc_ret_value;
+
+/******
+ * Turn on buffering and buffer parameter information
+ * in case an error occurs
+ ******/
+
+ regr_args.l_flags.bufrout = 1;
+
+ (void)strcpy(fmtstr, "*********************\n");
+ message(fmtstr, fmt_lst, 0);
+ (void)strcpy(fmtstr, "An error occurred during a call to %s\n\n");
+ fmt_lst[0].typ_str = TestName;
+ message(fmtstr, fmt_lst, 1);
+
+
+ call_string = "svc_ret_value = XcmsSetWhiteAdjustProc(";
+
+ (void)strcpy(fmtstr, "The routine call looked like this - \n %s\n");
+ fmt_lst[0].typ_str = call_string;
+ message(fmtstr, fmt_lst, 1);
+
+ call_string = " ccc, white_adjust_proc, client_data);\n\n";
+ message(call_string, fmt_lst, 0);
+ (void)strcpy(fmtstr, "The parameter values were as follows... \n");
+ message(fmtstr, fmt_lst, 0);
+
+ bufrdisp(display); /* buffer display struct info for error checking */
+
+/******
+ * Setup code for this service - this should always be executed.
+ ******/
+
+ XSync(display_arg, 0);
+
+/******
+ * save environment
+ ******/
+ if (regr_args.l_flags.chksta == 1)
+ ss_status = save_stat(dpy_msk | win_msk ,
+ gc_id,
+ display_arg,
+ drawable_id);
+
+
+ first_error = 0; /* no errors encountered yet */
+/******
+ * service call
+ ******/
+
+ svc_ret_value = 0 ;
+ errflg = 0;
+ XSetErrorHandler(signal_status);
+ svc_ret_value = XcmsSetWhiteAdjustProc(
+ ccc,
+ white_adjust_proc,
+ client_data
+ );
+ XSync(display_arg, 0);
+ XSetErrorHandler(unexp_err);
+ r_wait(display_arg, window_arg, time_delay, None); /* no colormap by default */
+
+/******
+ * check saved environment with current environment.
+ ******/
+ if (regr_args.l_flags.chksta == 1)
+ stat_status = chek_stat (dpy_msk | win_msk ,
+ gc_id,
+ display_arg,
+ drawable_id,
+ ss_status);
+ else
+ stat_status = REGR_NORMAL;
+
+/******
+ * check Success returns with expected returns
+ ******/
+ if ((!errflg) && (!chkflg))
+ if ((badstat(display_arg, estatus, Success)) != REGR_NORMAL)
+ errflg = 1;
+
+
+/******
+ * verify the results of the service if successful completion.
+ ******/
+ if ((regr_args.l_flags.check) &&
+ (errflg == 0) &&
+ (stat_status == REGR_NORMAL))
+ {
+ /* check the procedure was set */
+ XcmsWhiteAdjustProc prev_func ;
+ prev_func = XcmsSetWhiteAdjustProc(ccc,
+ adjust_proc, (XPointer)0);
+ check_adr((ADDRESS)adjust_proc, (ADDRESS)prev_func,
+ "address of previous function");
+
+ }
+ XSync(display_arg, 0);
+
+/******
+ * cleanup code for this service.
+ ******/
+ if (regr_args.l_flags.cleanup)
+ {
+ cleanup_status = REGR_NORMAL;
+ }
+ XSync(display_arg, 0);
+
+ if (errflg) { /* if there was an error ... */
+ errcnt++; /* ...increment the error count */
+ (void)strcpy(fmtstr, "\nEnd of error report\n");
+ message(fmtstr, fmt_lst, 0);
+ (void)strcpy(fmtstr, "*********************\n");
+ message(fmtstr, fmt_lst, 0);
+ }
+
+/*****
+ * clear all flags
+ *****/
+ chkflg = 0;
+ regr_args.l_flags.bufrout = 0;
+
+ dumpbuf();
+}
+
+
+>>ASSERTION Good C
+If the implementation is X11R5 or later:
+A call to xname
+shall change the white point adjustment procedure in the specified
+Color Conversion Context.
+>>CODE
+
+#if XT_X_RELEASE > 4
+ display_arg = Dsp;
+/*
+ * Create a GC to save environmental data in
+ */
+ gc_save = XCreateGC(display_arg,XRootWindow(display_arg,XDefaultScreen(display_arg)),(unsigned long)0,(XGCValues *)0);
+
+ regr_args.l_flags.check = 0;
+ regr_args.l_flags.nostat = 0;
+ regr_args.l_flags.perf = 0;
+ regr_args.l_flags.setup = 0;
+ regr_args.l_flags.cleanup = 0;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+ regr_args.l_flags.verbose = 0;
+ regr_args.iter = 1; /* execute service once */
+ estatus[0] = 1;
+
+
+/******
+ * User defined initialization code for test case sets
+ ******/
+ display_good = display_arg;
+
+/*****
+ * Test wide set up
+ *****/
+
+ screen_good = XDefaultScreen(display_good);
+ depth_good = DisplayPlanes( display_good, screen_good );
+ visual_good = XDefaultVisual(display_good, screen_good );
+
+ if ((visual_good->class == StaticGray) ||
+ (visual_good->class == StaticColor) ||
+ (visual_good->class == TrueColor))
+ writeable_colormaps = 0 ;
+
+ if ( writeable_colormaps ) {
+ rw_colormap = XCreateColormap(
+ display_good,
+ XRootWindow(display_good, screen_good),
+ visual_good,
+ AllocAll);
+ ccc_good = XcmsCCCOfColormap(display_good, rw_colormap) ;
+ }
+
+ if (writeable_colormaps)
+ {
+
+ estatus[0] = 1;
+ estatus[1] = Success;
+
+ if ((regr_args.l_flags.good == 0) ||
+ (estatus[1] == Success)) {
+ tet_infoline("TEST: Testing XcmsSetWhiteAdjustProc for Success\n");
+ tet_infoline(" Testing procedure XcmsCIELabWhiteShiftColors\n") ;
+ regr_args.l_flags.check = 1;
+ regr_args.l_flags.setup = 1;
+ regr_args.l_flags.cleanup = 1;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+
+ {
+ adjust_proc = XcmsCIELabWhiteShiftColors ;
+
+ svccmsSetWhiteAdjustProc(
+ display_good,
+ ccc_good,
+ adjust_proc,
+ (XPointer)0
+ );
+
+ }
+ } /* end if */
+ }
+ else
+ message("Warning: not a writeable colormap\n", NULL, 0) ;
+ tet_result(TET_PASS);
+#else
+ tet_infoline("INFO: Implementation not X11R5 or greater");
+ tet_result(TET_UNSUPPORTED);
+#endif
+>>ASSERTION Good C
+If the implementation is X11R5 or later:
+If the white point adjustment procedure is
+.B XcmsCIELabWhiteShiftColors
+it shall use the CIELab color space to shift the chromatic character of
+colors by the chromatic displacement between the initial and target
+white point.
+>>CODE
+
+#if XT_X_RELEASE > 4
+ display_arg = Dsp;
+/*
+ * Create a GC to save environmental data in
+ */
+ gc_save = XCreateGC(display_arg,XRootWindow(display_arg,XDefaultScreen(display_arg)),(unsigned long)0,(XGCValues *)0);
+
+ regr_args.l_flags.check = 0;
+ regr_args.l_flags.nostat = 0;
+ regr_args.l_flags.perf = 0;
+ regr_args.l_flags.setup = 0;
+ regr_args.l_flags.cleanup = 0;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+ regr_args.l_flags.verbose = 0;
+ regr_args.iter = 1; /* execute service once */
+ estatus[0] = 1;
+
+
+/******
+ * User defined initialization code for test case sets
+ ******/
+ display_good = display_arg;
+
+/*****
+ * Test wide set up
+ *****/
+
+ screen_good = XDefaultScreen(display_good);
+ depth_good = DisplayPlanes( display_good, screen_good );
+ visual_good = XDefaultVisual(display_good, screen_good );
+
+ if ((visual_good->class == StaticGray) ||
+ (visual_good->class == StaticColor) ||
+ (visual_good->class == TrueColor))
+ writeable_colormaps = 0 ;
+
+ if ( writeable_colormaps ) {
+ rw_colormap = XCreateColormap(
+ display_good,
+ XRootWindow(display_good, screen_good),
+ visual_good,
+ AllocAll);
+ ccc_good = XcmsCCCOfColormap(display_good, rw_colormap) ;
+ }
+
+ if (writeable_colormaps)
+ {
+
+ estatus[0] = 1;
+ estatus[1] = Success;
+
+ if ((regr_args.l_flags.good == 0) || (estatus[1] == Success)) {
+ tet_infoline("TEST: Testing XcmsSetWhiteAdjustProc for Success\n");
+ tet_infoline(" Testing procedure XcmsCIELuvWhiteShiftColors\n") ;
+ regr_args.l_flags.check = 1;
+ regr_args.l_flags.setup = 1;
+ regr_args.l_flags.cleanup = 1;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+
+ {
+ adjust_proc = XcmsCIELuvWhiteShiftColors ;
+
+ svccmsSetWhiteAdjustProc(
+ display_good,
+ ccc_good,
+ adjust_proc,
+ (XPointer)0
+ );
+
+ }
+ } /* end if */
+ }
+ else
+ message("Warning: not a writeable colormap\n", NULL, 0) ;
+ tet_result(TET_PASS);
+#else
+ tet_infoline("INFO: Implementation not X11R5 or greater");
+ tet_result(TET_UNSUPPORTED);
+#endif
+>>ASSERTION Good C
+If the implementation is X11R5 or later:
+If the white point adjustment procedure is
+.B XcmsCIELuvWhiteShiftColors
+it shall use the CIELuv color space to shift the chromatic character of
+colors by the chromatic displacement between the initial and target white
+point.
+>>CODE
+
+#if XT_X_RELEASE > 4
+ display_arg = Dsp;
+/*
+ * Create a GC to save environmental data in
+ */
+ gc_save = XCreateGC(display_arg,XRootWindow(display_arg,XDefaultScreen(display_arg)),(unsigned long)0,(XGCValues *)0);
+
+ regr_args.l_flags.check = 0;
+ regr_args.l_flags.nostat = 0;
+ regr_args.l_flags.perf = 0;
+ regr_args.l_flags.setup = 0;
+ regr_args.l_flags.cleanup = 0;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+ regr_args.l_flags.verbose = 0;
+ regr_args.iter = 1; /* execute service once */
+ estatus[0] = 1;
+
+
+/******
+ * User defined initialization code for test case sets
+ ******/
+ display_good = display_arg;
+
+/*****
+ * Test wide set up
+ *****/
+
+ screen_good = XDefaultScreen(display_good);
+ depth_good = DisplayPlanes( display_good, screen_good );
+ visual_good = XDefaultVisual(display_good, screen_good );
+
+ if ((visual_good->class == StaticGray) ||
+ (visual_good->class == StaticColor) ||
+ (visual_good->class == TrueColor))
+ writeable_colormaps = 0 ;
+
+ if ( writeable_colormaps ) {
+ rw_colormap = XCreateColormap(
+ display_good,
+ XRootWindow(display_good, screen_good),
+ visual_good,
+ AllocAll);
+ ccc_good = XcmsCCCOfColormap(display_good, rw_colormap) ;
+ }
+
+ if (writeable_colormaps)
+ {
+
+ estatus[0] = 1;
+ estatus[1] = Success;
+
+ if ((regr_args.l_flags.good == 0) || (estatus[1] == Success)) {
+ tet_infoline("TEST: Testing XcmsSetWhiteAdjustProc for Success\n");
+ tet_infoline(" Testing procedure XcmsTekHVCWhiteShiftColors\n") ;
+ regr_args.l_flags.check = 1;
+ regr_args.l_flags.setup = 1;
+ regr_args.l_flags.cleanup = 1;
+ regr_args.l_flags.chksta = 0;
+ regr_args.l_flags.chkdpy = 0;
+
+ {
+ adjust_proc = XcmsTekHVCWhiteShiftColors ;
+
+ svccmsSetWhiteAdjustProc(
+ display_good,
+ ccc_good,
+ adjust_proc,
+ (XPointer)0
+ );
+
+ }
+ } /* end if */
+ }
+ else
+ message("Warning: not a writeable colormap\n", NULL, 0) ;
+ tet_result(TET_PASS);
+#else
+ tet_infoline("INFO: Implementation not X11R5 or greater");
+ tet_result(TET_UNSUPPORTED);
+#endif
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-21 23:00:04 +0000