blob: e68bdf3e87c6cb304b75324755fed15491f294d1 (
plain)
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
|
/* gramble - grammar ramble
*
* team teso
*
* main grammar parser driver functions
*/
#include <setjmp.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "input.h"
extern int yydebug;
extern FILE * yyout;
extern int yyparse (void);
void * in_grammar = NULL; /* parser return */
char * in_input_ptr;
int in_input_lim;
jmp_buf in_yy_error_jmp; /* to catch errors in parser */
/* overridden yacc functions
*/
int
yyerror (char *str)
{
longjmp (in_yy_error_jmp, 1);
exit (EXIT_FAILURE);
}
int
yywrap (void)
{
return (1);
}
/*** driver interface
*/
/* in_parse
*
* parse a grammar from buffer pointed to by 'buf', which is 'buf_len' bytes
* long.
*
* return NULL on failure
* return pointer to grammar on success
*/
void * /* FIXME: real pointer */
in_parse (char *buf, int buf_len)
{
in_grammar = NULL;
in_input_ptr = buf;
in_input_lim = buf_len;
if (setjmp (in_yy_error_jmp) != 0) {
if (in_grammar != NULL)
return (NULL);
/* FIXME: free all associated memory */
/* freebla (in_grammar) */
return (NULL);
}
yyparse ();
return (in_grammar);
}
/* in_yyinput
*
* override yyinput functionality to allow more flexible parsing. internally
* used, never called by outsiders.
*
* return number of bytes read
*/
int
in_yyinput (char *buf, int size_max)
{
int n = 0;
n = (size_max >= in_input_lim) ? in_input_lim : size_max;
if (n > 0) {
memmove (buf, in_input_ptr, n);
in_input_ptr += n;
in_input_lim -= n;
}
return (n);
}
|
