![[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 / oldXtk|
Return to TextKinds.c CVS log | Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / oldXtk |
1.1 root 1: /* $Header: TextKinds.c,v 1.1 87/09/11 07:58:58 toddb Exp $ */
2: #ifndef lint
3: static char *sccsid = "@(#)TextKinds.c 1.18 2/25/87";
4: #endif lint
5:
6: /*
7: * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
8: *
9: * All Rights Reserved
10: *
11: * Permission to use, copy, modify, and distribute this software and its
12: * documentation for any purpose and without fee is hereby granted,
13: * provided that the above copyright notice appear in all copies and that
14: * both that copyright notice and this permission notice appear in
15: * supporting documentation, and that the name of Digital Equipment
16: * Corporation not be used in advertising or publicity pertaining to
17: * distribution of the software without specific, written prior permission.
18: *
19: *
20: * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
21: * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
22: * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
23: * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
24: * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
25: * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
26: * SOFTWARE.
27: */
28:
29: #include "Xlib.h"
30: #include "Intrinsic.h"
31: #include "Text.h"
32: #include "Atoms.h"
33: #include "TextDisp.h"
34: #include <strings.h>
35:
36: extern char *tmpnam();
37:
38: /* ||| Bogus definitions to go in some .h file */
39:
40: extern int *XtDiskSourceCreate (/* name, mode */);
41: /* char *name; */
42: /* XtEditType mode; */
43:
44: extern int *XtStringSourceCreate (/* str, maxLength, mode */);
45: /* char *str; */
46: /* int maxLength; */
47: /* XtEditType mode; */
48:
49:
50: /* Private definitions. */
51:
52: typedef enum TextKinds {diskText, stringText};
53:
54: static XtEditType editMode;
55: static XtEditType defaultEditMode = XttextRead;
56: static XFontStruct *defaultFont;
57: static XFontStruct *textFontStruct;
58: static char *nullValue = NULL;
59: static int *source, textLength;
60: static int defaultLength = 100;
61: static int foreground, background;
62: static char *fileName, *textString;
63:
64: static Resource rawResources[] = {
65: {XtNfont, XtCFont, XrmRFontStruct, sizeof (XFontStruct *),
66: (caddr_t) &textFontStruct, (caddr_t) &defaultFont},
67: {XtNforeground, XtCColor, XrmRPixel, sizeof (int),
68: (caddr_t) &foreground, (caddr_t) &XtDefaultFGPixel},
69: {XtNbackground, XtCColor, XrmRPixel, sizeof (int),
70: (caddr_t) &background, (caddr_t) &XtDefaultBGPixel},
71: };
72:
73: static Resource stringResources[] = {
74: {XtNforeground, XtCColor, XrmRPixel, sizeof (int),
75: (caddr_t) &foreground, (caddr_t) &XtDefaultFGPixel},
76: {XtNbackground, XtCColor, XrmRPixel, sizeof (int),
77: (caddr_t) &background, (caddr_t) &XtDefaultBGPixel},
78: {XtNstring, XtCString, XrmRString, sizeof (char *),
79: (caddr_t) &textString, (caddr_t) &nullValue},
80: {XtNfont, XtCFont, XrmRFontStruct, sizeof (XFontStruct *),
81: (caddr_t) &textFontStruct, (caddr_t) &defaultFont},
82: {XtNlength, XtCLength, XrmRInt, sizeof (int), (caddr_t) &textLength,
83: (caddr_t)&defaultLength},
84: {XtNeditType, XtCEditType, XtREditMode, sizeof(editMode),
85: (caddr_t)&editMode, (caddr_t)&defaultEditMode},
86: };
87:
88: static Resource diskResources[] = {
89: {XtNforeground, XtCColor, XrmRPixel, sizeof (int),
90: (caddr_t) &foreground, (caddr_t) &XtDefaultFGPixel},
91: {XtNbackground, XtCColor, XrmRPixel, sizeof (int),
92: (caddr_t) &background, (caddr_t) &XtDefaultBGPixel},
93: {XtNfile, XtCFile, XrmRString, sizeof (char *),
94: (caddr_t) &fileName, (caddr_t) &nullValue},
95: {XtNfont, XtCFont, XrmRFontStruct, sizeof (XFontStruct *),
96: (caddr_t) &textFontStruct, (caddr_t) &defaultFont},
97: {XtNeditType, XtCEditType, XtREditMode, sizeof(editMode),
98: (caddr_t)&editMode, (caddr_t)&defaultEditMode},
99: };
100:
101: static Boolean initialized = FALSE;
102:
103: static TextKindsInitialize(dpy)
104: Display *dpy;
105: {
106: if (initialized)
107: return;
108: initialized = TRUE;
109:
110: defaultFont = XLoadQueryFont(dpy, "fixed");
111: }
112:
113: static Window AsciiTextCreate(dpy, parent, args, argCount, names, classes, src)
114: Display *dpy;
115: Window parent;
116: Arg *args;
117: int argCount;
118: XrmNameList names;
119: XrmClassList classes;
120: int *src;
121: {
122: Window textWidget;
123: ArgList mergedArgs;
124: Arg myArgs[2];
125:
126: XtSetArg(myArgs[0], XtNtextSource, (XtArgVal) src);
127: XtSetArg(myArgs[1], XtNtextSink,
128: (XtArgVal) XtAsciiSinkCreate(dpy, textFontStruct,
129: foreground, background));
130:
131: mergedArgs = XtMergeArgLists(args, argCount, myArgs, XtNumber(myArgs) );
132: textWidget = XtTextCreate(
133: dpy, parent, mergedArgs, argCount+XtNumber(myArgs));
134:
135: XtSetNameAndClass(dpy, textWidget, names, classes);
136: XrmFreeNameList(names);
137: XrmFreeClassList(classes);
138: XtFree((char *) mergedArgs);
139: return textWidget;
140: }
141:
142: /* Public routines. */
143:
144: Window XtTextDiskCreate(dpy, parent, args, argCount)
145: Display *dpy;
146: Window parent;
147: ArgList args;
148: int argCount;
149: {
150: XrmNameList names;
151: XrmClassList classes;
152: char *tmpName;
153:
154: if (!initialized) TextKindsInitialize(dpy);
155: XtGetResources (dpy,
156: diskResources, XtNumber(diskResources), args, argCount, parent,
157: "text", "Text", &names, &classes);
158: /* NOTE: Do not want to leave temp file around. Must be unlinked
159: somewhere */
160: if (fileName == NULL) {
161: tmpName = tmpnam (fileName);
162: fileName = XtMalloc (sizeof (tmpName));
163: (void) strcpy (fileName, tmpName);
164: }
165: source = XtDiskSourceCreate (fileName, editMode);
166: return (AsciiTextCreate (dpy, parent, args, argCount, names, classes, source));
167: }
168:
169: XtTextDiskDestroy(dpy, w)
170: Display *dpy;
171: Window w;
172: {
173: XDestroyWindow(dpy, w);
174: (void) XtSendDestroyNotify(dpy, w);
175: }
176:
177: Window XtTextStringCreate(dpy, parent, args, argCount)
178: Display *dpy;
179: Window parent;
180: ArgList args;
181: int argCount;
182: {
183: XrmNameList names;
184: XrmClassList classes;
185:
186: if (!initialized) TextKindsInitialize(dpy);
187: XtGetResources (dpy, stringResources, XtNumber(stringResources), args, argCount,
188: parent, "text", "Text", &names, &classes);
189: if (textString == NULL) {
190: textString = (char *) XtMalloc (1000);
191: textLength = 1000;
192: }
193: /* need option for specifying read append mode */
194: source = XtStringSourceCreate (textString, textLength, editMode);
195: return (AsciiTextCreate (dpy, parent, args, argCount, names, classes, source));
196: }
197:
198: XtTextStringDestroy(dpy, w)
199: Display *dpy;
200: Window w;
201: {
202: XDestroyWindow(dpy, w);
203: (void) XtSendDestroyNotify(dpy, w);
204: }
205:
206: Window XtTextSourceCreate(dpy, parent, args, argCount, passedSource)
207: Display *dpy;
208: Window parent;
209: ArgList args;
210: int argCount;
211: int *passedSource; /* ||| NOTE: should be in args */
212: {
213: XrmNameList names;
214: XrmClassList classes;
215:
216: if (!initialized) TextKindsInitialize(dpy);
217: XtGetResources (dpy, rawResources, XtNumber(rawResources), args, argCount, parent,
218: "text", "Text", &names, &classes);
219: return (AsciiTextCreate (dpy, parent, args, argCount, names, classes,
220: passedSource));
221: }
222:
223: XtTextSourceDestroy(dpy, w)
224: Display *dpy;
225: Window w;
226: {
227: XDestroyWindow(dpy, w);
228: (void) XtSendDestroyNotify(dpy, w);
229: }
230:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.