diff options
Diffstat (limited to 'nx-X11/lib/Xaw/Converters.c')
| -rw-r--r-- | nx-X11/lib/Xaw/Converters.c | 701 |
1 files changed, 0 insertions, 701 deletions
diff --git a/nx-X11/lib/Xaw/Converters.c b/nx-X11/lib/Xaw/Converters.c deleted file mode 100644 index 24c01ca14..000000000 --- a/nx-X11/lib/Xaw/Converters.c +++ /dev/null @@ -1,701 +0,0 @@ -/* - * Copyright (c) 1998 by The XFree86 Project, Inc. - * - * 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 XFREE86 PROJECT 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 XFree86 Project 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 - * XFree86 Project. - */ - -/* $XFree86: xc/lib/Xaw/Converters.c,v 3.13 1999/06/06 08:47:54 dawes Exp $ */ - -#ifdef HAVE_CONFIG_H -#include <config.h> -#endif -#include <stdio.h> -#include <X11/IntrinsicP.h> -#include <X11/StringDefs.h> -#include <X11/Xmu/CharSet.h> -#include <X11/Xmu/SysUtil.h> -#include <X11/Xaw/Simple.h> -#include <X11/Xaw/XawInit.h> -#include "Private.h" - -#ifndef OLDXAW - -/* - * Definitions - */ -#define done(type, value) \ -{ \ - if (toVal->addr != NULL) \ - { \ - if (toVal->size < sizeof(type)) \ - { \ - toVal->size = sizeof(type); \ - return (False); \ - } \ - *(type *)(toVal->addr) = (value); \ - } \ - else \ - { \ - static type static_val; \ - \ - static_val = (value); \ - toVal->addr = (XPointer)&static_val; \ - } \ - toVal->size = sizeof(type); \ - return (True); \ -} - -#define string_done(value) \ -{ \ - if (toVal->addr != NULL) \ - { \ - if (toVal->size < size) \ - { \ - toVal->size = size; \ - return (False); \ - } \ - strcpy((char *)toVal->addr, (value)); \ - } \ - else \ - toVal->addr = (XPointer)(value); \ - toVal->size = size; \ - return (True); \ -} - -/* - * Prototypes - */ -static Boolean _XawCvtAtomToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtBooleanToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtBoolToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtCARD32ToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtCardinalToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtDimensionToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtDisplayListToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtFontStructToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtIntToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtPixelToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtPixmapToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtShortToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtPositionToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtStringToDisplayList(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtStringToPixmap(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static Boolean _XawCvtUnsignedCharToString(Display*, XrmValue*, Cardinal*, - XrmValue*, XrmValue*, XtPointer*); -static void TypeToStringNoArgsWarning(Display*, String); - -/* - * Initialization - */ -static XtConvertArgRec PixelArgs[] = { - {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.colormap), - sizeof(Colormap)}, -}; - -static XtConvertArgRec DLArgs[] = { - {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.screen), - sizeof(Screen *)}, - {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.colormap), - sizeof(Colormap)}, - {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.depth), - sizeof(int)}, -}; -#endif /* OLDXAW */ - -static String XtCToolkitError = "ToolkitError"; -static String XtNconversionError = "conversionError"; - -#ifndef OLDXAW -static String XtNwrongParameters = "wrongParameters"; - -/* - * Implementation - */ -void -XawInitializeDefaultConverters(void) -{ - static Boolean first_time = True; - - if (first_time == False) - return; - - first_time = False; - - /* Replace with more apropriate converters */ - XtSetTypeConverter(XtRCallback, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRColormap, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRFunction, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRPointer, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRScreen, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRStringArray, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRVisual, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRWidget, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRWidgetList, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRWindow, XtRString, _XawCvtCARD32ToString, - NULL, 0, XtCacheNone, NULL); - - XtSetTypeConverter(XtRAtom, XtRString, _XawCvtAtomToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRBool, XtRString, _XawCvtBoolToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRBoolean, XtRString, _XawCvtBooleanToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRCardinal, XtRString, _XawCvtCardinalToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRDimension, XtRString, _XawCvtDimensionToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XawRDisplayList, XtRString, _XawCvtDisplayListToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRFontStruct, XtRString, _XawCvtFontStructToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRInt, XtRString, _XawCvtIntToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRPixel, XtRString, _XawCvtPixelToString, - &PixelArgs[0], XtNumber(PixelArgs), XtCacheNone, NULL); - XtSetTypeConverter(XtRPixmap, XtRString, _XawCvtPixmapToString, - &DLArgs[0], XtNumber(DLArgs), XtCacheNone, NULL); - XtSetTypeConverter(XtRPosition, XtRString, _XawCvtPositionToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRShort, XtRString, _XawCvtShortToString, - NULL, 0, XtCacheNone, NULL); - XtSetTypeConverter(XtRString, XawRDisplayList, _XawCvtStringToDisplayList, - &DLArgs[0], XtNumber(DLArgs), XtCacheAll, NULL); - XtSetTypeConverter(XtRString, XtRPixmap, _XawCvtStringToPixmap, - &DLArgs[0], XtNumber(DLArgs), XtCacheAll, NULL); - XtSetTypeConverter(XtRUnsignedChar, XtRString, _XawCvtUnsignedCharToString, - NULL, 0, XtCacheNone, NULL); -} -#endif /* OLDXAW */ - -void -XawTypeToStringWarning(Display *dpy, String type) -{ - char fname[64]; - String params[1]; - Cardinal num_params; - - XmuSnprintf(fname, sizeof(fname), "cvt%sToString", type); - - params[0] = type; - num_params = 1; - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNconversionError, fname, XtCToolkitError, - "Cannot convert %s to String", - params, &num_params); -} - -#ifndef OLDXAW -static void -TypeToStringNoArgsWarning(Display *dpy, String type) -{ - char fname[64]; - String params[1]; - Cardinal num_params; - - XmuSnprintf(fname, sizeof(fname), "cvt%sToString", type); - - params[0] = type; - num_params = 1; - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNconversionError, fname, - XtCToolkitError, - "%s to String conversion needs no extra arguments", - params, &num_params); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtBooleanToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[6]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRBoolean); - - XmuSnprintf(buffer, sizeof(buffer), "%s", - *(Boolean *)fromVal->addr ? XtEtrue : XtEfalse); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtBoolToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[6]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRBool); - - XmuSnprintf(buffer, sizeof(buffer), "%s", - *(Bool *)fromVal->addr ? XtEtrue : XtEfalse); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtPositionToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[7]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRPosition); - - XmuSnprintf(buffer, sizeof(buffer), "%d", *(Position *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtShortToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[7]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRShort); - - XmuSnprintf(buffer, sizeof(buffer), "%d", *(short *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtDimensionToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[6]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRDimension); - - XmuSnprintf(buffer, sizeof(buffer), "%u", *(Dimension *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtCARD32ToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[11]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, "CARD32"); - - XmuSnprintf(buffer, sizeof(buffer), "0x%08hx", *(int *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtIntToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[12]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRInt); - - XmuSnprintf(buffer, sizeof(buffer), "%d", *(int *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtCardinalToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[11]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRCardinal); - - XmuSnprintf(buffer, sizeof(buffer), "%u", *(Cardinal *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtAtomToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char *buffer = NULL; - static char *nullatom = "NULL"; - Cardinal size; - Atom atom; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRAtom); - - if (buffer && buffer != nullatom) - XFree(buffer); - - atom = *(Atom *)fromVal[0].addr; - if (atom == 0) - buffer = nullatom; - else if ((buffer = XGetAtomName(dpy, *(Atom *)fromVal[0].addr)) == NULL) - { - XawTypeToStringWarning(dpy, XtRAtom); - toVal->addr = NULL; - toVal->size = sizeof(String); - return (False); - } - - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtPixelToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[19]; - Cardinal size; - Colormap colormap; - XColor color; - - if (*num_args != 1) - { - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNwrongParameters, "cvtPixelToString", - XtCToolkitError, - "Pixel to String conversion needs colormap argument", - NULL, NULL); - return (False); - } - - colormap = *(Colormap *)args[0].addr; - color.pixel = *(Pixel *)fromVal->addr; - - /* Note: - * If we know the visual type, we can calculate the xcolor - * without asking Xlib. - */ - XQueryColor(dpy, colormap, &color); - XmuSnprintf(buffer, sizeof(buffer), "rgb:%04hx/%04hx/%04hx", - color.red, color.green, color.blue); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtFontStructToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[128]; - Cardinal size; - Atom atom; - unsigned long value; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRFontStruct); - - if ((atom = XInternAtom(dpy, "FONT", True)) == None) - return (False); - - size = 0; - - if (XGetFontProperty(*(XFontStruct **)fromVal->addr, atom, &value)) - { - char *tmp = XGetAtomName(dpy, value); - - if (tmp) - { - XmuSnprintf(buffer, sizeof(buffer), "%s", tmp); - size = strlen(tmp); - XFree(tmp); - } - } - - if (size) - { - ++size; - string_done(buffer); - } - - XawTypeToStringWarning(dpy, XtRFontStruct); - - return (False); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtUnsignedCharToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - static char buffer[4]; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XtRUnsignedChar); - - XmuSnprintf(buffer, sizeof(buffer), "%u", - *(unsigned char *)fromVal->addr); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtStringToDisplayList(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - XawDisplayList *dlist; - Screen *screen; - Colormap colormap; - int depth; - String commands; - - if (*num_args != 3) - { - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNwrongParameters, "cvtStringToDisplayList", - XtCToolkitError, - "String to DisplayList conversion needs screen, " - "colormap, and depth arguments", - NULL, NULL); - return (False); - } - - screen = *(Screen **)args[0].addr; - colormap = *(Colormap *)args[1].addr; - depth = *(int *)args[2].addr; - - commands = (String)(fromVal[0].addr); - - dlist = XawCreateDisplayList(commands, screen, colormap, depth); - - if (!dlist) - { - XtDisplayStringConversionWarning(dpy, (String)fromVal->addr, - XawRDisplayList); - toVal->addr = NULL; - toVal->size = sizeof(XawDisplayList*); - return (False); - } - - done(XawDisplayList*, dlist); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtDisplayListToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - String buffer; - Cardinal size; - - if (*num_args != 0) - TypeToStringNoArgsWarning(dpy, XawRDisplayList); - - buffer = XawDisplayListString(*(XawDisplayList **)(fromVal[0].addr)); - size = strlen(buffer) + 1; - - string_done(buffer); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtStringToPixmap(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - XawPixmap *xaw_pixmap; - Pixmap pixmap; - Screen *screen; - Colormap colormap; - int depth; - String name; - - if (*num_args != 3) - { - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNwrongParameters, "cvtStringToPixmap", - XtCToolkitError, - "String to Pixmap conversion needs screen, " - "colormap, and depth arguments", - NULL, NULL); - return (False); - } - - screen = *(Screen **)args[0].addr; - colormap = *(Colormap *)args[1].addr; - depth = *(int *)args[2].addr; - - name = (String)(fromVal[0].addr); - - if (XmuCompareISOLatin1(name, "None") == 0) - pixmap = None; - else if (XmuCompareISOLatin1(name, "ParentRelative") == 0) - pixmap = ParentRelative; - else if (XmuCompareISOLatin1(name, "XtUnspecifiedPixmap") == 0) - pixmap = XtUnspecifiedPixmap; - else - { - xaw_pixmap = XawLoadPixmap(name, screen, colormap, depth); - if (!xaw_pixmap) - { - XtDisplayStringConversionWarning(dpy, (String)fromVal->addr, - XtRPixmap); - toVal->addr = (XtPointer)XtUnspecifiedPixmap; - toVal->size = sizeof(Pixmap); - return (False); - } - else - pixmap = xaw_pixmap->pixmap; - } - - done(Pixmap, pixmap); -} - -/*ARGSUSED*/ -static Boolean -_XawCvtPixmapToString(Display *dpy, XrmValue *args, Cardinal *num_args, - XrmValue *fromVal, XrmValue *toVal, - XtPointer *converter_data) -{ - XawPixmap *xaw_pixmap; - Pixmap pixmap; - Screen *screen; - Colormap colormap; - int depth; - String buffer = NULL; - Cardinal size; - - if (*num_args != 3) - { - XtAppWarningMsg(XtDisplayToApplicationContext(dpy), - XtNwrongParameters, "cvtPixmapToString", - XtCToolkitError, - "Pixmap to String conversion needs screen, " - "colormap, and depth arguments", - NULL, NULL); - return (False); - } - - screen = *(Screen **)args[0].addr; - colormap = *(Colormap *)args[1].addr; - depth = *(int *)args[2].addr; - - pixmap = *(Pixmap *)(fromVal[0].addr); - - switch (pixmap) - { - case None: - buffer = "None"; - break; - case ParentRelative: - buffer = "ParentRelative"; - break; - case XtUnspecifiedPixmap: - buffer = "XtUnspecifiedPixmap"; - break; - default: - xaw_pixmap = XawPixmapFromXPixmap(pixmap, screen, colormap, depth); - if (xaw_pixmap) - buffer = xaw_pixmap->name; - break; - } - - if (!buffer) - /* Bad Pixmap or Pixmap was not loaded by XawLoadPixmap() */ - return (_XawCvtCARD32ToString(dpy, args, num_args, fromVal, toVal, - converter_data)); - - size = strlen(buffer) + 1; - - string_done(buffer); -} - -#endif /* OLDXAW */ |