mirror of
https://github.com/Stichting-MINIX-Research-Foundation/xsrc.git
synced 2025-09-11 13:49:48 -04:00
137 lines
3.5 KiB
C
137 lines
3.5 KiB
C
/* $Xorg: ParseCol.c,v 1.4 2001/02/09 02:03:35 xorgcvs Exp $ */
|
|
/*
|
|
|
|
Copyright 1985, 1998 The Open Group
|
|
|
|
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.
|
|
|
|
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
|
|
OPEN GROUP 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 Open Group 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 Open Group.
|
|
|
|
*/
|
|
/* $XFree86: xc/lib/X11/ParseCol.c,v 1.7 2003/11/17 22:20:08 dawes Exp $ */
|
|
|
|
#define NEED_REPLIES
|
|
#include <stdio.h>
|
|
#include "Xlibint.h"
|
|
#include "Xcmsint.h"
|
|
|
|
|
|
Status
|
|
XParseColor (
|
|
register Display *dpy,
|
|
Colormap cmap,
|
|
_Xconst char *spec,
|
|
XColor *def)
|
|
{
|
|
register int n, i;
|
|
int r, g, b;
|
|
char c;
|
|
XcmsCCC ccc;
|
|
XcmsColor cmsColor;
|
|
|
|
if (!spec) return(0);
|
|
n = strlen (spec);
|
|
if (*spec == '#') {
|
|
/*
|
|
* RGB
|
|
*/
|
|
spec++;
|
|
n--;
|
|
if (n != 3 && n != 6 && n != 9 && n != 12)
|
|
return (0);
|
|
n /= 3;
|
|
g = b = 0;
|
|
do {
|
|
r = g;
|
|
g = b;
|
|
b = 0;
|
|
for (i = n; --i >= 0; ) {
|
|
c = *spec++;
|
|
b <<= 4;
|
|
if (c >= '0' && c <= '9')
|
|
b |= c - '0';
|
|
else if (c >= 'A' && c <= 'F')
|
|
b |= c - ('A' - 10);
|
|
else if (c >= 'a' && c <= 'f')
|
|
b |= c - ('a' - 10);
|
|
else return (0);
|
|
}
|
|
} while (*spec != '\0');
|
|
n <<= 2;
|
|
n = 16 - n;
|
|
def->red = r << n;
|
|
def->green = g << n;
|
|
def->blue = b << n;
|
|
def->flags = DoRed | DoGreen | DoBlue;
|
|
return (1);
|
|
}
|
|
|
|
|
|
/*
|
|
* Let's Attempt to use Xcms and i18n approach to Parse Color
|
|
*/
|
|
if ((ccc = XcmsCCCOfColormap(dpy, cmap)) != (XcmsCCC)NULL) {
|
|
const char *tmpName = spec;
|
|
|
|
switch (_XcmsResolveColorString(ccc, &tmpName, &cmsColor,
|
|
XcmsRGBFormat)) {
|
|
case XcmsSuccess:
|
|
case XcmsSuccessWithCompression:
|
|
cmsColor.pixel = def->pixel;
|
|
_XcmsRGB_to_XColor(&cmsColor, def, 1);
|
|
return(1);
|
|
case XcmsFailure:
|
|
case _XCMS_NEWNAME:
|
|
/*
|
|
* if the result was _XCMS_NEWNAME tmpName points to
|
|
* a string in cmsColNm.c:pairs table, for example,
|
|
* gray70 would become tekhvc:0.0/70.0/0.0
|
|
*/
|
|
break;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Xcms and i18n methods failed, so lets pass it to the server
|
|
* for parsing.
|
|
*/
|
|
{
|
|
xLookupColorReply reply;
|
|
register xLookupColorReq *req;
|
|
LockDisplay(dpy);
|
|
GetReq (LookupColor, req);
|
|
req->cmap = cmap;
|
|
req->nbytes = n = strlen(spec);
|
|
req->length += (n + 3) >> 2;
|
|
Data (dpy, spec, (long)n);
|
|
if (!_XReply (dpy, (xReply *) &reply, 0, xTrue)) {
|
|
UnlockDisplay(dpy);
|
|
SyncHandle();
|
|
return (0);
|
|
}
|
|
def->red = reply.exactRed;
|
|
def->green = reply.exactGreen;
|
|
def->blue = reply.exactBlue;
|
|
def->flags = DoRed | DoGreen | DoBlue;
|
|
UnlockDisplay(dpy);
|
|
SyncHandle();
|
|
return (1);
|
|
}
|
|
}
|