|
Packit Service |
2b1f13 |
/*
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
Copyright 1988, 1998 The Open Group
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
Permission to use, copy, modify, distribute, and sell this software and its
|
|
Packit Service |
2b1f13 |
documentation for any purpose is hereby granted without fee, provided that
|
|
Packit Service |
2b1f13 |
the above copyright notice appear in all copies and that both that
|
|
Packit Service |
2b1f13 |
copyright notice and this permission notice appear in supporting
|
|
Packit Service |
2b1f13 |
documentation.
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
The above copyright notice and this permission notice shall be included in
|
|
Packit Service |
2b1f13 |
all copies or substantial portions of the Software.
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
Packit Service |
2b1f13 |
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
Packit Service |
2b1f13 |
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
Packit Service |
2b1f13 |
OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
|
Packit Service |
2b1f13 |
AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
Packit Service |
2b1f13 |
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
Except as contained in this notice, the name of The Open Group shall not be
|
|
Packit Service |
2b1f13 |
used in advertising or otherwise to promote the sale, use or other dealings
|
|
Packit Service |
2b1f13 |
in this Software without prior written authorization from The Open Group.
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
*/
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
#ifdef HAVE_CONFIG_H
|
|
Packit Service |
2b1f13 |
#include <config.h>
|
|
Packit Service |
2b1f13 |
#endif
|
|
Packit Service |
2b1f13 |
#include <X11/Intrinsic.h>
|
|
Packit Service |
2b1f13 |
#include "Converters.h"
|
|
Packit Service |
2b1f13 |
#include "CharSet.h"
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
/*
|
|
Packit Service |
2b1f13 |
* Prototypes
|
|
Packit Service |
2b1f13 |
*/
|
|
Packit Service |
2b1f13 |
static void InitializeQuarks(void);
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
/*
|
|
Packit Service |
2b1f13 |
* Initialization
|
|
Packit Service |
2b1f13 |
*/
|
|
Packit Service |
2b1f13 |
static XrmQuark QnotUseful, QwhenMapped, Qalways, Qdefault;
|
|
Packit Service |
2b1f13 |
static Boolean haveQuarks;
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
/*
|
|
Packit Service |
2b1f13 |
* Implementation
|
|
Packit Service |
2b1f13 |
*/
|
|
Packit Service |
2b1f13 |
static void
|
|
Packit Service |
2b1f13 |
InitializeQuarks(void)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
if (!haveQuarks)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
char name[11];
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
XmuNCopyISOLatin1Lowered(name, XtEnotUseful, sizeof(name));
|
|
Packit Service |
2b1f13 |
QnotUseful = XrmStringToQuark(name);
|
|
Packit Service |
2b1f13 |
XmuNCopyISOLatin1Lowered(name, XtEwhenMapped, sizeof(name));
|
|
Packit Service |
2b1f13 |
QwhenMapped = XrmStringToQuark(name);
|
|
Packit Service |
2b1f13 |
XmuNCopyISOLatin1Lowered(name, XtEalways, sizeof(name));
|
|
Packit Service |
2b1f13 |
Qalways = XrmStringToQuark(name);
|
|
Packit Service |
2b1f13 |
XmuNCopyISOLatin1Lowered(name, XtEdefault, sizeof(name));
|
|
Packit Service |
2b1f13 |
Qdefault = XrmStringToQuark(name);
|
|
Packit Service |
2b1f13 |
haveQuarks = True;
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
/*ARGSUSED*/
|
|
Packit Service |
2b1f13 |
void
|
|
Packit Service |
2b1f13 |
XmuCvtStringToBackingStore(XrmValue *args, Cardinal *num_args,
|
|
Packit Service |
2b1f13 |
XrmValuePtr fromVal, XrmValuePtr toVal)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
XrmQuark q;
|
|
Packit Service |
2b1f13 |
char name[11];
|
|
Packit Service |
2b1f13 |
static int backingStoreType;
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
if (*num_args != 0)
|
|
Packit Service |
2b1f13 |
XtWarning("String to BackingStore conversion needs no extra arguments");
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
InitializeQuarks();
|
|
Packit Service |
2b1f13 |
XmuNCopyISOLatin1Lowered(name, (char *)fromVal->addr, sizeof(name));
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
q = XrmStringToQuark (name);
|
|
Packit Service |
2b1f13 |
if (q == QnotUseful)
|
|
Packit Service |
2b1f13 |
backingStoreType = NotUseful;
|
|
Packit Service |
2b1f13 |
else if (q == QwhenMapped)
|
|
Packit Service |
2b1f13 |
backingStoreType = WhenMapped;
|
|
Packit Service |
2b1f13 |
else if (q == Qalways)
|
|
Packit Service |
2b1f13 |
backingStoreType = Always;
|
|
Packit Service |
2b1f13 |
else if (q == Qdefault)
|
|
Packit Service |
2b1f13 |
backingStoreType = Always + WhenMapped + NotUseful;
|
|
Packit Service |
2b1f13 |
else
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
XtStringConversionWarning((char *)fromVal->addr, XtRBackingStore);
|
|
Packit Service |
2b1f13 |
return;
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
toVal->size = sizeof(int);
|
|
Packit Service |
2b1f13 |
toVal->addr = (XPointer)&backingStoreType;
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
/*ARGSUSED*/
|
|
Packit Service |
2b1f13 |
Boolean
|
|
Packit Service |
2b1f13 |
XmuCvtBackingStoreToString(Display *dpy, XrmValuePtr args, Cardinal *num_args,
|
|
Packit Service |
2b1f13 |
XrmValuePtr fromVal, XrmValuePtr toVal,
|
|
Packit Service |
2b1f13 |
XtPointer *data)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
static String buffer;
|
|
Packit Service |
2b1f13 |
Cardinal size;
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
switch (*(int *)fromVal->addr)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
case NotUseful:
|
|
Packit Service |
2b1f13 |
buffer = XtEnotUseful;
|
|
Packit Service |
2b1f13 |
break;
|
|
Packit Service |
2b1f13 |
case WhenMapped:
|
|
Packit Service |
2b1f13 |
buffer = XtEwhenMapped;
|
|
Packit Service |
2b1f13 |
break;
|
|
Packit Service |
2b1f13 |
case Always:
|
|
Packit Service |
2b1f13 |
buffer = XtEalways;
|
|
Packit Service |
2b1f13 |
break;
|
|
Packit Service |
2b1f13 |
case (Always + WhenMapped + NotUseful):
|
|
Packit Service |
2b1f13 |
buffer = XtEdefault;
|
|
Packit Service |
2b1f13 |
break;
|
|
Packit Service |
2b1f13 |
default:
|
|
Packit Service |
2b1f13 |
XtWarning("Cannot convert BackingStore to String");
|
|
Packit Service |
2b1f13 |
toVal->addr = NULL;
|
|
Packit Service |
2b1f13 |
toVal->size = 0;
|
|
Packit Service |
2b1f13 |
return (False);
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
size = strlen(buffer) + 1;
|
|
Packit Service |
2b1f13 |
if (toVal->addr != NULL)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
if (toVal->size < size)
|
|
Packit Service |
2b1f13 |
{
|
|
Packit Service |
2b1f13 |
toVal->size = size;
|
|
Packit Service |
2b1f13 |
return (False);
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
strcpy((char *)toVal->addr, buffer);
|
|
Packit Service |
2b1f13 |
}
|
|
Packit Service |
2b1f13 |
else
|
|
Packit Service |
2b1f13 |
toVal->addr = (XPointer)buffer;
|
|
Packit Service |
2b1f13 |
toVal->size = sizeof(String);
|
|
Packit Service |
2b1f13 |
|
|
Packit Service |
2b1f13 |
return (True);
|
|
Packit Service |
2b1f13 |
}
|