/* * Copyright (c) 1995 Digital Equipment Corportation * * The X Consortium, and any party obtaining a copy of these files from * the X Consortium, directly or indirectly, is granted, free of charge, a * full and unrestricted irrevocable, world-wide, paid up, royalty-free, * nonexclusive right and license to deal in this software and * documentation files (the "Software"), including without limitation the * rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons who receive * copies from any such party to do so. This license includes without * limitation a license to do the foregoing actions under any patents of * the party supplying this software to the X Consortium. */ #pragma ident "@(#)$RCSfile: StringConverters.c,v $ $Revision: 1.1.2.2 $ (DEC) $Date: 1995/01/25 22:13:17 $" #include /* * #include "../X11/IntrinsicI.h" */ #include #include #include #ifdef AMIWIN #include extern struct Library *XtBase; #endif void XtDisplayConversionWarning(); static String XtNwrongParameters = "wrongParameters"; static String XtNconversionError = "conversionError"; static String XtNmissingCharsetList = "missingCharsetList"; typedef struct { int value; char * name; int size; } ConversionMap; static ConversionMap boolean_map[] = { { True, XtEtrue, sizeof(XtEtrue) }, { False, XtEfalse, sizeof(XtEfalse) }, { True, XtEon, sizeof(XtEon) }, { False, XtEoff, sizeof(XtEoff) }, { True, XtEyes, sizeof(XtEyes) }, { False, XtEno, sizeof(XtEno) }, }; static ConversionMap shape_style_map[] = { { XmuShapeRectangle, XtERectangle, sizeof(XtERectangle) }, { XmuShapeRectangle, "ShapeRectangle", sizeof("ShapeRectangle") }, { XmuShapeOval, XtEOval, sizeof(XtEOval) }, { XmuShapeOval, "ShapeOval", sizeof("ShapeOval") }, { XmuShapeEllipse, "ShapeEllipse", sizeof("ShapeEllipse") }, { XmuShapeEllipse, XtEEllipse, sizeof(XtEEllipse) }, { XmuShapeRoundedRectangle, "ShapeRoundedRectangle", sizeof("ShapeRoundedRectangle") }, { XmuShapeRoundedRectangle, XtERoundedRectangle, sizeof( XtERoundedRectangle) }, }; #define string_convert_done(value) \ { \ if (toVal->addr != NULL) { \ if (toVal->size < size) { \ toVal->size = size; \ return False; \ } \ strcpy((char *) toVal->addr, value); \ } \ else { \ toVal->addr = (XtPointer)value; \ } \ toVal->size = size; \ return True; \ } #define map_convert_done(value) \ { \ if (toVal->addr != NULL) { \ if (toVal->size < value.size) { \ toVal->size = value.size; \ return False; \ } \ strcpy((char *) toVal->addr, value.name); \ } \ else { \ toVal->addr = value.name; \ } \ toVal->size = value.size; \ return True; \ } Boolean XtCvtShapeStyleToString (); Boolean XtCvtBooleanToString (); Boolean XtCvtBoolToString (); void XtDisplayConversionWarning(type, from, to) String type; int from; String to; { String params[2]; Cardinal num_params = 2; params[0] = (String)from; params[1] = (String)to; XtWarningMsg("conversionError", type, XtCXtToolkitError, "Cannot convert value %d to type %s", params,&num_params); } Boolean XtCvtShapeStyleToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int * i = (int *) (fromVal->addr); int index; for (index = 0; XtNumber(shape_style_map); index++) if (*i == shape_style_map[index].value) map_convert_done(shape_style_map[index]); XtDisplayConversionWarning(XtRShapeStyle, *i, XtRString); return False; } Boolean XtCvtBooleanToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { Boolean * i = (Boolean *) (fromVal->addr); int index; for (index = 0; XtNumber(boolean_map); index++) if (*i == boolean_map[index].value) map_convert_done(boolean_map[index]); XtDisplayConversionWarning(XtRBoolean, *i, XtRString); return False; } Boolean XtCvtBoolToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { Boolean * i = (Boolean *) (fromVal->addr); int index; for (index = 0; XtNumber(boolean_map); index++) if (*i == boolean_map[index].value) map_convert_done(boolean_map[index]); XtDisplayConversionWarning(XtRBool, *i, XtRString); return False; } Boolean XtCvtPositionToString (dpy, args, numArgs, fromVal, toVal, data) Display* dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtPositionToString",XtCXtToolkitError, "Position to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (Position *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtIntToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtIntToString",XtCXtToolkitError, "Int to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (int *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtCardinalToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtCardinalToString",XtCXtToolkitError, "Cardinal to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (Cardinal *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtPixelToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtPixelToString",XtCXtToolkitError, "Pixel to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (Pixel *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtColorToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtColorToString",XtCXtToolkitError, "Color to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "rgb:%04hx/%04hx/%04hx", ((XColor *)fromVal->addr)->red, ((XColor *)fromVal->addr)->green, ((XColor *)fromVal->addr)->blue); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtUnsignedCharToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtUnsignedCharToString", XtCXtToolkitError, "UnsignedChar to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (unsigned char *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } Boolean XtCvtDimensionToString (dpy, args, numArgs, fromVal, toVal, data) Display * dpy; XrmValue * args; Cardinal * numArgs; XrmValue * fromVal; XrmValue * toVal; XtPointer * data; { int size; static char buffer[32]; if (*numArgs != 0) XtAppWarningMsg(XtDisplayToApplicationContext(dpy), XtNwrongParameters,"cvtDimensionToString",XtCXtToolkitError, "Dimension to String conversion needs no extra arguments", (String *)NULL, (Cardinal *)NULL); sprintf(buffer, "%d", * (Dimension *) fromVal->addr); size = strlen(buffer); string_convert_done(buffer); } void _XtInitStringConverters() { XtSetTypeConverter(XtRShapeStyle, XtRString, XtCvtShapeStyleToString, NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRBoolean, XtRString, XtCvtBooleanToString, NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRBool, XtRString, XtCvtBoolToString, NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRShapeStyle, XtRString , XtCvtShapeStyleToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRBoolean, XtRString , XtCvtBooleanToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRBool, XtRString , XtCvtBoolToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRPosition, XtRString , XtCvtPositionToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRInt, XtRString , XtCvtIntToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRCardinal, XtRString , XtCvtCardinalToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRPixel, XtRString , XtCvtPixelToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRColor, XtRString , XtCvtColorToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRUnsignedChar, XtRString , XtCvtUnsignedCharToString , NULL, 0, XtCacheNone, NULL); XtSetTypeConverter(XtRDimension, XtRString , XtCvtDimensionToString , NULL, 0, XtCacheNone, NULL); }