![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to TextKinds.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / Xtk|
Return to TextKinds.c CVS log | Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / Xtk |
1.1 root 1: #ifndef lint
2: static char rcsid[] = "$Header: TextKinds.c,v 1.3 87/09/13 13:25:40 swick Exp $";
3: #endif lint
4:
5: /*
6: * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
7: *
8: * All Rights Reserved
9: *
10: * Permission to use, copy, modify, and distribute this software and its
11: * documentation for any purpose and without fee is hereby granted,
12: * provided that the above copyright notice appear in all copies and that
13: * both that copyright notice and this permission notice appear in
14: * supporting documentation, and that the name of Digital Equipment
15: * Corporation not be used in advertising or publicity pertaining to
16: * distribution of the software without specific, written prior permission.
17: *
18: *
19: * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
20: * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
21: * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
22: * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
23: * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
24: * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
25: * SOFTWARE.
26: */
27: #include "Xresource.h"
28: #include "Intrinsic.h"
29: #include "Text.h"
30: #include "TextP.h"
31: #include "Atoms.h"
32: /* #include "TextDisp.h" */
33: #include <strings.h>
34:
35: extern char *tmpnam();
36:
37: /* ||| Bogus definitions to go in some .h file */
38:
39: extern int *XtDiskSourceCreate (/* name, mode */);
40: /* char *name; */
41: /* XtEditType mode; */
42:
43: extern int *XtStringSourceCreate (/* str, maxLength, mode */);
44: /* char *str; */
45: /* int maxLength; */
46: /* XtEditType mode; */
47:
48:
49: /* Private definitions. */
50:
51: typedef enum _TextKinds {diskText, stringText} TextKinds;
52:
53: static int *source;
54:
55: static Boolean initialized = FALSE;
56:
57: /* EditType enumeration constants */
58:
59: static XrmQuark XtQTextRead;
60: static XrmQuark XtQTextAppend;
61: static XrmQuark XtQTextEdit;
62:
63: /*ARGSUSED*/
64: #define done(address, type) \
65: { (*toVal).size = sizeof(type); (*toVal).addr = (caddr_t) address; }
66:
67: extern void _XLowerCase();
68:
69: static void CvtStringToEditMode(dpy, fromVal, toVal)
70: Display *dpy;
71: XrmValue fromVal;
72: XrmValue *toVal;
73: {
74: static XtEditType editType;
75: XrmQuark q;
76: char lowerName[1000];
77:
78: /* ||| where to put LowerCase */
79: _XLowerCase((char *) fromVal.addr, lowerName);
80: q = XrmAtomToQuark(lowerName);
81: if (q == XtQTextRead ) {
82: editType = XttextRead;
83: done(&editType, XtEditType);
84: return;
85: }
86: if (q == XtQTextAppend) {
87: editType = XttextAppend;
88: done(&editType, XtEditType);
89: return;
90: }
91: if (q == XtQTextEdit) {
92: editType = XttextEdit;
93: done(&editType, XtEditType);
94: return;
95: }
96: (*toVal).size = 0;
97: (*toVal).addr = NULL;
98: };
99:
100: static TextKindsInitialize(w)
101: Widget w;
102: {
103: if (initialized)
104: return;
105: XtQTextRead = XrmAtomToQuark(XtEtextRead);
106: XtQTextAppend = XrmAtomToQuark(XtEtextAppend);
107: XtQTextEdit = XrmAtomToQuark(XtEtextEdit);
108: XrmRegisterTypeConverter(XrmRString, XtREditMode, CvtStringToEditMode);
109: initialized = TRUE;
110:
111: }
112:
113: static Widget AsciiTextCreate(w, args, argCount, src)
114: Widget w;
115: Arg *args;
116: int argCount;
117: int *src;
118: {
119: TextWidget tw = (TextWidget)w;
120: ArgList mergedArgs;
121: Arg myArgs[2];
122:
123: XtSetArg(myArgs[0], XtNtextSource, (XtArgVal) src);
124: XtSetArg(myArgs[1], XtNtextSink,
125: (XtArgVal) XtAsciiSinkCreate(w, NULL, 0));
126:
127: mergedArgs = XtMergeArgLists(args, argCount, myArgs, XtNumber(myArgs) );
128: /* XXX first param is bogus */
129: tw = (TextWidget) XtCreateWidget("textname", textWidgetClass,
130: w, mergedArgs, argCount+XtNumber(myArgs));
131:
132: XtFree((char *) mergedArgs);
133: return (Widget)tw;
134: }
135:
136: /***** Public routines. *****/
137:
138: Widget XtTextDiskCreate(w, args, argCount)
139: Widget w;
140: ArgList args;
141: int argCount;
142: {
143: if (!initialized) TextKindsInitialize(w);
144: source = XtDiskSourceCreate (w);
145: return (AsciiTextCreate (w, args, argCount, source));
146: }
147:
148: XtTextDiskDestroy(w)
149: Widget w;
150: {
151: XtDestroyWidget(w);
152: }
153:
154: Widget XtTextStringCreate(w, args, argCount)
155: Widget w;
156: ArgList args;
157: int argCount;
158: {
159: if (!initialized) TextKindsInitialize(w);
160:
161: /* need option for specifying read append mode */
162: source = XtStringSourceCreate (w, args, argCount);
163: return (AsciiTextCreate (w, args, argCount, source));
164: }
165:
166: XtTextStringDestroy(w)
167: Widget w;
168: {
169: XtDestroyWidget(w);
170: }
171:
172:
173: Widget XtTextSourceCreate(w, args, argCount, passedSource)
174: Widget w;
175: ArgList args;
176: int argCount;
177: int *passedSource; /* ||| NOTE: should be in args */
178: {
179: if (!initialized) TextKindsInitialize(w);
180: return (AsciiTextCreate (w, args, argCount, passedSource));
181: }
182:
183: XtTextSourceDestroy(w)
184: Widget w;
185: {
186: XtDestroyWidget(w);
187: }
188:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.