xref: /NextBSD/contrib/groff/src/devices/xditview/lex.c (revision eb1a5f8de9f7ea602c373a710f531abbf81141c4)
1 #include <X11/Xos.h>
2 #include <X11/IntrinsicP.h>
3 #include <X11/StringDefs.h>
4 #include <stdio.h>
5 #include "DviP.h"
6 
7 int
DviGetAndPut(DviWidget dw,int * cp)8 DviGetAndPut(DviWidget dw, int *cp)
9 {
10 	if (dw->dvi.ungot) {
11 		dw->dvi.ungot =	0;
12 		*cp = getc (dw->dvi.file);
13 	}
14 	else {
15 		*cp = getc (dw->dvi.file);
16 		if (*cp != EOF)
17 			putc (*cp, dw->dvi.tmpFile);
18 	}
19 	return *cp;
20 }
21 
22 char *
GetLine(DviWidget dw,char * Buffer,int Length)23 GetLine(DviWidget dw, char *Buffer, int Length)
24 {
25 	int 	i = 0, c;
26 
27 	Length--;		     /* Save room for final '\0' */
28 
29 	while (DviGetC (dw, &c) != EOF) {
30 		if (Buffer && i < Length)
31 			Buffer[i++] = c;
32 		if (c == '\n') {
33 			DviUngetC(dw, c);
34 			break;
35 		}
36 	}
37 	if (Buffer)
38 		Buffer[i] = '\0';
39 	return Buffer;
40 }
41 
42 char *
GetWord(DviWidget dw,char * Buffer,int Length)43 GetWord(DviWidget dw, char *Buffer, int Length)
44 {
45 	int 	i = 0, c;
46 
47 	Length--;			    /* Save room for final '\0' */
48 	while (DviGetC(dw, &c) == ' ' || c == '\n')
49 		;
50 	while (c != EOF) {
51 		if (Buffer && i < Length)
52 			Buffer[i++] = c;
53 		if (DviGetC(dw, &c) == ' ' || c == '\n') {
54 			DviUngetC(dw, c);
55 			break;
56 		}
57 	}
58 	if (Buffer)
59 		Buffer[i] = '\0';
60 	return Buffer;
61 }
62 
63 int
GetNumber(DviWidget dw)64 GetNumber(DviWidget dw)
65 {
66 	int	i = 0,  c;
67 	int	negative = 0;
68 
69 	while (DviGetC(dw, &c) == ' ' || c == '\n')
70 		;
71 	if (c == '-') {
72 		negative = 1;
73 		DviGetC(dw, &c);
74 	}
75 
76 	for (; c >= '0' && c <= '9'; DviGetC(dw, &c)) {
77 		if (negative)
78 			i = i*10 - (c - '0');
79 		else
80 			i = i*10 + c - '0';
81 	}
82 	if (c != EOF)
83 		DviUngetC(dw, c);
84 	return i;
85 }
86 
87 /*
88 Local Variables:
89 c-indent-level: 8
90 c-continued-statement-offset: 8
91 c-brace-offset: -8
92 c-argdecl-indent: 8
93 c-label-offset: -8
94 c-tab-always-indent: nil
95 End:
96 */
97