11ab64890Smrg
21ab64890Smrg/*
31ab64890Smrg * Code and supporting documentation (c) Copyright 1990 1991 Tektronix, Inc.
41ab64890Smrg * 	All Rights Reserved
561b2299dSmrg *
61ab64890Smrg * This file is a component of an X Window System-specific implementation
71ab64890Smrg * of Xcms based on the TekColor Color Management System.  Permission is
81ab64890Smrg * hereby granted to use, copy, modify, sell, and otherwise distribute this
91ab64890Smrg * software and its documentation for any purpose and without fee, provided
101ab64890Smrg * that this copyright, permission, and disclaimer notice is reproduced in
111ab64890Smrg * all copies of this software and in supporting documentation.  TekColor
121ab64890Smrg * is a trademark of Tektronix, Inc.
1361b2299dSmrg *
141ab64890Smrg * Tektronix makes no representation about the suitability of this software
151ab64890Smrg * for any purpose.  It is provided "as is" and with all faults.
1661b2299dSmrg *
171ab64890Smrg * TEKTRONIX DISCLAIMS ALL WARRANTIES APPLICABLE TO THIS SOFTWARE,
181ab64890Smrg * INCLUDING THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
191ab64890Smrg * PARTICULAR PURPOSE.  IN NO EVENT SHALL TEKTRONIX BE LIABLE FOR ANY
201ab64890Smrg * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
211ab64890Smrg * RESULTING FROM LOSS OF USE, DATA, OR PROFITS, WHETHER IN AN ACTION OF
221ab64890Smrg * CONTRACT, NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
231ab64890Smrg * CONNECTION WITH THE USE OR THE PERFORMANCE OF THIS SOFTWARE.
241ab64890Smrg *
251ab64890Smrg *
261ab64890Smrg *	NAME
271ab64890Smrg *		XcmsQuCol.c
281ab64890Smrg *
291ab64890Smrg *	DESCRIPTION
301ab64890Smrg *		Source for XcmsQueryColors
311ab64890Smrg *
321ab64890Smrg *
331ab64890Smrg */
341ab64890Smrg
351ab64890Smrg#ifdef HAVE_CONFIG_H
361ab64890Smrg#include <config.h>
371ab64890Smrg#endif
381ab64890Smrg#include "Xlibint.h"
391ab64890Smrg#include "Xcmsint.h"
401ab64890Smrg#include "Cv.h"
411ab64890Smrg
421ab64890Smrg
431ab64890Smrg/************************************************************************
441ab64890Smrg *									*
451ab64890Smrg *			PUBLIC ROUTINES					*
461ab64890Smrg *									*
471ab64890Smrg ************************************************************************/
481ab64890Smrg
491ab64890Smrg/*
501ab64890Smrg *	NAME
511ab64890Smrg *		XcmsQueryColor - Query Color
521ab64890Smrg *
531ab64890Smrg *	SYNOPSIS
541ab64890Smrg */
551ab64890SmrgStatus
561ab64890SmrgXcmsQueryColor(
571ab64890Smrg    Display *dpy,
581ab64890Smrg    Colormap colormap,
591ab64890Smrg    XcmsColor *pXcmsColor_in_out,
601ab64890Smrg    XcmsColorFormat result_format)
611ab64890Smrg/*
621ab64890Smrg *	DESCRIPTION
631ab64890Smrg *		This routine uses XQueryColor to obtain the X RGB values
641ab64890Smrg *		stored in the specified colormap for the specified pixel.
651ab64890Smrg *		The X RGB values are then converted to the target format as
661ab64890Smrg *		specified by the format component of the XcmsColor structure.
671ab64890Smrg *
681ab64890Smrg *	RETURNS
691ab64890Smrg *		XcmsFailure if failed;
701ab64890Smrg *		XcmsSuccess if it succeeded.
711ab64890Smrg *
721ab64890Smrg *		Returns a color specification of the color stored in the
731ab64890Smrg *		specified pixel.
741ab64890Smrg */
751ab64890Smrg{
761ab64890Smrg    return(_XcmsSetGetColor(XQueryColor, dpy, colormap,
771ab64890Smrg	    pXcmsColor_in_out, result_format, (Bool *) NULL));
781ab64890Smrg}
79