Quick Search:

View

Revision:
Expand:  
Changeset: MAIN:ragge:20120728202003

Diff

Diff from 1.57 to:

Annotations

Annotate by Age | Author | Mixed | None
/fisheye/browse/pcc/pcc/cc/cpp/cpp.h

Annotated File View

ragge
1.57
1 /*      $Id: cpp.h,v 1.57 2012/07/28 20:20:03 ragge Exp $       */
ragge
1.1
2
3 /*
ragge
1.44
4  * Copyright (c) 2004,2010 Anders Magnusson (ragge@ludd.luth.se).
ragge
1.1
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  */
27
ragge
1.3
28 #include <stdio.h> /* for obuf */
gmcgarry
1.35
29 #include <stdlib.h>
ragge
1.3
30
ragge
1.32
31 #include "config.h"
ragge
1.12
32
ragge
1.3
33 typedef unsigned char usch;
ragge
1.46
34 extern usch yytext[];
ragge
1.3
35 extern usch *stringbuf;
36
37 extern  int     trulvl;
38 extern  int     flslvl;
39 extern  int     elflvl;
40 extern  int     elslvl;
plunky
1.49
41 extern  int     dflag;
gmcgarry
1.37
42 extern  int     tflagCflagPflag;
ragge
1.27
43 extern  int     MflagdMflag;
ragge
1.24
44 extern  usch    *Mfile;
45 extern  int     ofd;
ragge
1.3
46
47 /* args for lookup() */
48 #define FIND    0
49 #define ENTER   1
50
ragge
1.20
51 /* buffer used internally */
52 #ifndef CPPBUF
plunky
1.55
53 #if defined(mach_pdp11)
ragge
1.20
54 #define CPPBUF  BUFSIZ
ragge
1.48
55 #define BUF_STACK
plunky
1.54
56 #elif defined(os_win32)
gmcgarry
1.38
57 /* winxp seems to fail > 26608 bytes */
58 #define CPPBUF  16384
ragge
1.25
59 #else
ragge
1.48
60 #define CPPBUF  (65536*2)
ragge
1.25
61 #endif
ragge
1.20
62 #endif
63
plunky
1.52
64 #define MAXARGS 128     /* Max # of args to a macro. Should be enough */
ragge
1.44
65
ragge
1.39
66 #define NAMEMAX CPPBUF  /* currently pushbackbuffer */
ragge
1.48
67 #define BBUFSZ  (NAMEMAX+CPPBUF+1)
ragge
1.20
68
ragge
1.44
69 #define GCCARG  0xfd    /* has gcc varargs that may be replaced with 0 */
70 #define VARG    0xfe    /* has varargs */
71 #define OBJCT   0xff
72 #define WARN    1       /* SOH, not legal char */
73 #define CONC    2       /* STX, not legal char */
74 #define SNUFF   3       /* ETX, not legal char */
ragge
1.46
75 #define EBLOCK  4       /* EOT, not legal char */
ragge
1.57
76 #define PHOLD   5       /* ENQ, not legal char */
ragge
1.44
77
78 /* Used in macro expansion */
ragge
1.47
79 #define RECMAX  10000                   /* max # of recursive macros */
ragge
1.44
80 extern struct symtab *norep[RECMAX];
81 extern int norepptr;
ragge
1.47
82 extern unsigned short bptr[RECMAX];
ragge
1.44
83 extern int bidx;
ragge
1.47
84 #define MKB(l,h)        (l+((h)<<8))
ragge
1.44
85
86 /* quick checks for some characters */
87 #define C_SPEC  001
88 #define C_EP    002
89 #define C_ID    004
90 #define C_I     (C_SPEC|C_ID)           
91 #define C_2     010             /* for yylex() tokenizing */
92 #define C_WSNL  020             /* ' ','\t','\r','\n' */
93 #define iswsnl(x) (spechr[x] & C_WSNL)
94 extern char spechr[];
95
ragge
1.20
96 /* definition for include file info */
97 struct includ {
98         struct includ *next;
ragge
1.43
99         const usch *fname;      /* current fn, changed if #line found */
100         const usch *orgfn;      /* current fn, not changed */
ragge
1.20
101         int lineno;
102         int infil;
103         usch *curptr;
104         usch *maxread;
gmcgarry
1.35
105         usch *ostr;
ragge
1.20
106         usch *buffer;
ragge
1.42
107         int idx;
108         void *incs;
ragge
1.43
109         const usch *fn;
ragge
1.48
110 #ifdef BUF_STACK
111         usch bbuf[BBUFSZ];
112 #else
113         usch *bbuf;
114 #endif
ragge
1.20
115 } *ifiles;
ragge
1.56
116 #define INCINC 0
117 #define SYSINC 1
118
ragge
1.20
119
ragge
1.4
120 /* Symbol table entry  */
ragge
1.3
121 struct symtab {
ragge
1.43
122         const usch *namep;    
123         const usch *value;    
124         const usch *file;
ragge
1.26
125         int line;
126 };
127
128 struct initar {
129         struct initar *next;
130         int type;
131         char *str;
ragge
1.3
132 };
133
ragge
1.31
134 /*
135  * Struct used in parse tree evaluation.
136  * op is one of:
137  *      - number type (NUMBER, UNUMBER)
138  *      - zero (0) if divided by zero.
139  */
140 struct nd {
141         int op;
otto
1.28
142         union {
143                 long long val;
144                 unsigned long long uval;
145         } n;
146 };
147
ragge
1.31
148 #define nd_val n.val
149 #define nd_uval n.uval
otto
1.28
150
ragge
1.43
151 struct symtab *lookup(const usch *namepint enterf);
ragge
1.20
152 usch *gotident(struct symtab *nl);
ragge
1.19
153 int slow;       /* scan slowly for new tokens */
ragge
1.50
154 int defining;
ragge
1.44
155 int submac(struct symtab *nlint);
156 int kfind(struct symtab *nl);
157 int doexp(void);
158 int donex(void);
ragge
1.51
159 void ppdir(void);
ragge
1.1
160
plunky
1.53
161 void define(void);
162 void include(void);
163 void include_next(void);
164 void line(void);
165
ragge
1.43
166 int pushfile(const usch *fnameconst usch *fnint idxvoid *incs);
ragge
1.1
167 void popfile(void);
168 void prtline(void);
169 int yylex(void);
ragge
1.40
170 int sloscan(void);
ragge
1.1
171 void cunput(int);
172 int curline(void);
173 char *curfile(void);
ragge
1.2
174 void setline(int);
175 void setfile(char *);
ragge
1.3
176 int yyparse(void);
ragge
1.43
177 void yyerror(const char *);
178 void unpstr(const usch *);
179 usch *savstr(const usch *str);
ragge
1.11
180 void savch(int c);
ragge
1.12
181 void mainscan(void);
ragge
1.13
182 void putch(int);
ragge
1.43
183 void putstr(const usch *s);
ragge
1.20
184 void line(void);
ragge
1.43
185 usch *sheap(const char *fmt, ...);
stefan
1.30
186 void xwarning(usch *);
ragge
1.20
187 void xerror(usch *);
gmcgarry
1.35
188 #ifdef HAVE_CPP_VARARG_MACRO_GCC
stefan
1.30
189 #define warning(...) xwarning(sheap(__VA_ARGS__))
ragge
1.20
190 #define error(...) xerror(sheap(__VA_ARGS__))
gmcgarry
1.35
191 #else
gmcgarry
1.36
192 #define warning printf
193 #define error printf
gmcgarry
1.35
194 #endif
ragge
1.33
195 int cinput(void);
ragge
1.34
196 void getcmnt(void);
FishEye: Open Source License registered to PCC.
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-12-26 13:54 +0100