1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
|
/*
* Motif Tools Library, Version 3.1
* $Id$
*
* Written by David Flanagan.
* Copyright (c) 1992-2001 by David Flanagan.
* All Rights Reserved. See the file COPYRIGHT for details.
* This is open source software. See the file LICENSE for details.
* There is no warranty for this software. See NO_WARRANTY for details.
*
* $Log$
* Revision 1.1.1.1 2001/07/18 11:06:02 root
* Initial checkin.
*
* Revision 1.2 2001/06/12 16:25:28 andre
* *** empty log message ***
*
*
*/
#include <Xmt/Xmt.h>
#include <Xmt/ConvertersP.h>
/* ARGSUSED */
#if NeedFunctionPrototypes
Boolean XmtConvertStringToEnum(Display *dpy,
XrmValuePtr args, Cardinal *num_args,
XrmValuePtr from, XrmValuePtr to, XtPointer *data)
#else
Boolean XmtConvertStringToEnum(dpy, args, num_args, from, to, data)
Display *dpy;
XrmValuePtr args;
Cardinal *num_args;
XrmValuePtr from;
XrmValuePtr to;
XtPointer *data;
#endif
{
String type = *(String *)args[0].addr;
String *names = *(String **)args[1].addr;
/* Cardinal *values = *(Cardinal**)args[2].addr; */
/* Cardinal num = (Cardinal)*(XtPointer*)args[3].addr; */
Cardinal *values = (Cardinal*)*(XtPointer*)args[2].addr;
Cardinal num = (Cardinal)*(XtPointer*)args[3].addr;
String *prefixes = *(String **)args[4].addr;
String target = (String) from->addr;
String prefix;
int i;
static Cardinal value; /* static for converter return */
/*
* First, strip any of the listed prefixes off of target.
* All of the prefixes are optional, but they must occur in the
* order that they appear in the array in.
*/
if (prefixes) {
while (*prefixes) {
prefix = *prefixes;
for(i=0; prefix[i] && (target[i] == prefix[i]); i++);
if (prefix[i] == '\0') target += i;
prefixes++;
}
}
/*
* now see if the target appears in the names array.
* If not, print a warning and fail.
*/
i = XmtBSearch(target, names, num);
/* printf("XmtBSearch(target, names, num) => %d\n", i); */
if (i == -1) {
XtDisplayStringConversionWarning(dpy, (String)from->addr, type);
return False;
}
/*
* converted value is values[i].
* We return it in different ways depending on the desired size to.size.
* Note how this code compares to the done() macro in ConvertersP.h
*/
value = values[i];
if (to->addr != NULL) {
switch (to->size) {
case sizeof(char):
*(char *)to->addr = value;
break;
#ifdef CRAY /* short and int are the same size (8 bytes) on the Cray */
case sizeof(int):
*(int *)to->addr = value;
break;
#else
case sizeof(short):
*(short *)to->addr = value;
break;
case sizeof(Cardinal):
*(Cardinal *)to->addr = value;
break;
#endif
default:
if (to->size > sizeof(Cardinal)) {
to->size = sizeof(Cardinal);
*(Cardinal *)to->addr = value;
}
else {
to->size = sizeof(Cardinal);
return False;
}
break;
}
}
else {
to->addr = (XtPointer)&value; /* value is a static variable */
to->size = sizeof(value);
}
return True;
}
#if NeedFunctionPrototypes
void XmtRegisterEnumConverter(StringConst type, String *names, Cardinal *values,
Cardinal num, String *prefixes)
#else
void XmtRegisterEnumConverter(type, names, values, num, prefixes)
StringConst type;
String *names;
Cardinal *values;
Cardinal num;
String *prefixes;
#endif
{
XtConvertArgRec args[5];
/*
* XtSetTypeConverter copies these args, so it is
* okay to use an automatic array.
*/
args[0].address_mode = XtImmediate;
args[0].address_id = (XtPointer) type;
args[0].size = sizeof(type);
args[1].address_mode = XtImmediate;
args[1].address_id = (XtPointer) names;
args[1].size = sizeof(names);
args[2].address_mode = XtImmediate;
args[2].address_id = (XtPointer) values;
args[2].size = sizeof(values);
args[3].address_mode = XtImmediate;
args[3].address_id = (XtPointer) num;
args[3].size = sizeof(num);
args[4].address_mode = XtImmediate;
args[4].address_id = (XtPointer) prefixes;
args[4].size = sizeof(prefixes);
XtSetTypeConverter(XtRString, (String)type, XmtConvertStringToEnum,
args, 5, XtCacheNone, NULL);
}
|
