indent_globs.h revision 85632
1/*
2 * Copyright (c) 1985 Sun Microsystems, Inc.
3 * Copyright (c) 1980, 1993
4 *	The Regents of the University of California.  All rights reserved.
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 * 3. All advertising materials mentioning features or use of this software
16 *    must display the following acknowledgement:
17 *	This product includes software developed by the University of
18 *	California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 *    may be used to endorse or promote products derived from this software
21 *    without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 *
35 *	@(#)indent_globs.h	8.1 (Berkeley) 6/6/93
36 * $FreeBSD: head/usr.bin/indent/indent_globs.h 85632 2001-10-28 18:35:32Z schweikh $
37 */
38
39#define BACKSLASH '\\'
40#define bufsize 200		/* size of internal buffers */
41#define sc_size 5000		/* size of save_com buffer */
42#define label_offset 2		/* number of levels a label is placed to left
43				 * of code */
44
45#define tabsize 8		/* the size of a tab */
46#define tabmask 0177770		/* mask used when figuring length of lines
47				 * with tabs */
48
49
50#define false 0
51#define true  1
52
53
54FILE       *input;		/* the fid for the input file */
55FILE       *output;		/* the output file */
56
57#define CHECK_SIZE_CODE \
58	if (e_code >= l_code) { \
59	    register int nsize = l_code-s_code+400; \
60	    codebuf = (char *) realloc(codebuf, nsize); \
61	    e_code = codebuf + (e_code-s_code) + 1; \
62	    l_code = codebuf + nsize - 5; \
63	    s_code = codebuf + 1; \
64	}
65#define CHECK_SIZE_COM \
66	if (e_com >= l_com) { \
67	    register int nsize = l_com-s_com+400; \
68	    combuf = (char *) realloc(combuf, nsize); \
69	    e_com = combuf + (e_com-s_com) + 1; \
70	    l_com = combuf + nsize - 5; \
71	    s_com = combuf + 1; \
72	}
73#define CHECK_SIZE_LAB \
74	if (e_lab >= l_lab) { \
75	    register int nsize = l_lab-s_lab+400; \
76	    labbuf = (char *) realloc(labbuf, nsize); \
77	    e_lab = labbuf + (e_lab-s_lab) + 1; \
78	    l_lab = labbuf + nsize - 5; \
79	    s_lab = labbuf + 1; \
80	}
81#define CHECK_SIZE_TOKEN \
82	if (e_token >= l_token) { \
83	    register int nsize = l_token-s_token+400; \
84	    tokenbuf = (char *) realloc(tokenbuf, nsize); \
85	    e_token = tokenbuf + (e_token-s_token) + 1; \
86	    l_token = tokenbuf + nsize - 5; \
87	    s_token = tokenbuf + 1; \
88	}
89
90char       *labbuf;		/* buffer for label */
91char       *s_lab;		/* start ... */
92char       *e_lab;		/* .. and end of stored label */
93char       *l_lab;		/* limit of label buffer */
94
95char       *codebuf;		/* buffer for code section */
96char       *s_code;		/* start ... */
97char       *e_code;		/* .. and end of stored code */
98char       *l_code;		/* limit of code section */
99
100char       *combuf;		/* buffer for comments */
101char       *s_com;		/* start ... */
102char       *e_com;		/* ... and end of stored comments */
103char       *l_com;		/* limit of comment buffer */
104
105#define token s_token
106char       *tokenbuf;		/* the last token scanned */
107char	   *s_token;
108char       *e_token;
109char	   *l_token;
110
111char       *in_buffer;		/* input buffer */
112char	   *in_buffer_limit;	/* the end of the input buffer */
113char       *buf_ptr;		/* ptr to next character to be taken from
114				 * in_buffer */
115char       *buf_end;		/* ptr to first after last char in in_buffer */
116
117char        save_com[sc_size];	/* input text is saved here when looking for
118				 * the brace after an if, while, etc */
119char       *sc_end;		/* pointer into save_com buffer */
120
121char       *bp_save;		/* saved value of buf_ptr when taking input
122				 * from save_com */
123char       *be_save;		/* similarly saved value of buf_end */
124
125
126int         pointer_as_binop;
127int         blanklines_after_declarations;
128int         blanklines_before_blockcomments;
129int         blanklines_after_procs;
130int         blanklines_around_conditional_compilation;
131int         swallow_optional_blanklines;
132int         n_real_blanklines;
133int         prefix_blankline_requested;
134int         postfix_blankline_requested;
135int         break_comma;	/* when true and not in parens, break after a
136				 * comma */
137int         btype_2;		/* when true, brace should be on same line as
138				 * if, while, etc */
139float       case_ind;		/* indentation level to be used for a "case
140				 * n:" */
141int         code_lines;		/* count of lines with code */
142int         had_eof;		/* set to true when input is exhausted */
143int         line_no;		/* the current line number. */
144int         max_col;		/* the maximum allowable line length */
145int         verbose;		/* when true, non-essential error messages are
146				 * printed */
147int         cuddle_else;	/* true if else should cuddle up to '}' */
148int         star_comment_cont;	/* true iff comment continuation lines should
149				 * have stars at the beginning of each line. */
150int         comment_delimiter_on_blankline;
151int         troff;		/* true iff were generating troff input */
152int         procnames_start_line;	/* if true, the names of procedures
153					 * being defined get placed in column
154					 * 1 (ie. a newline is placed between
155					 * the type of the procedure and its
156					 * name) */
157int         proc_calls_space;	/* If true, procedure calls look like:
158				 * foo(bar) rather than foo (bar) */
159int         format_block_comments;	/* true if comments beginning with
160					 * `/ * \n' are to be reformatted */
161int         format_col1_comments;	/* If comments which start in column 1
162					 * are to be magically reformatted
163					 * (just like comments that begin in
164					 * later columns) */
165int         inhibit_formatting;	/* true if INDENT OFF is in effect */
166int         suppress_blanklines;/* set iff following blanklines should be
167				 * suppressed */
168int         continuation_indent;/* set to the indentation between the edge of
169				 * code and continuation lines */
170int         lineup_to_parens;	/* if true, continued code within parens will
171				 * be lined up to the open paren */
172int         Bill_Shannon;	/* true iff a blank should always be inserted
173				 * after sizeof */
174int         blanklines_after_declarations_at_proctop;	/* This is vaguely
175							 * similar to
176							 * blanklines_after_decla
177							 * rations except that
178							 * it only applies to
179							 * the first set of
180							 * declarations in a
181							 * procedure (just after
182							 * the first '{') and it
183							 * causes a blank line
184							 * to be generated even
185							 * if there are no
186							 * declarations */
187int         block_comment_max_col;
188int         extra_expression_indent;	/* True if continuation lines from the
189					 * expression part of "if(e)",
190					 * "while(e)", "for(e;e;e)" should be
191					 * indented an extra tab stop so that
192					 * they don't conflict with the code
193					 * that follows */
194
195/* -troff font state information */
196
197struct fstate {
198    char        font[4];
199    char        size;
200    int         allcaps:1;
201};
202char       *chfont();
203
204struct fstate
205            keywordf,		/* keyword font */
206            stringf,		/* string font */
207            boxcomf,		/* Box comment font */
208            blkcomf,		/* Block comment font */
209            scomf,		/* Same line comment font */
210            bodyf;		/* major body font */
211
212
213#define STACKSIZE 150
214
215struct parser_state {
216    int         last_token;
217    struct fstate cfont;	/* Current font */
218    int         p_stack[STACKSIZE];	/* this is the parsers stack */
219    int         il[STACKSIZE];	/* this stack stores indentation levels */
220    float       cstk[STACKSIZE];/* used to store case stmt indentation levels */
221    int         box_com;	/* set to true when we are in a "boxed"
222				 * comment. In that case, the first non-blank
223				 * char should be lined up with the / in / followed by * */
224    int         comment_delta,
225                n_comment_delta;
226    int         cast_mask;	/* indicates which close parens close off
227				 * casts */
228    int         sizeof_mask;	/* indicates which close parens close off
229				 * sizeof''s */
230    int         block_init;	/* true iff inside a block initialization */
231    int         block_init_level;	/* The level of brace nesting in an
232					 * initialization */
233    int         last_nl;	/* this is true if the last thing scanned was
234				 * a newline */
235    int         in_or_st;	/* Will be true iff there has been a
236				 * declarator (e.g. int or char) and no left
237				 * paren since the last semicolon. When true,
238				 * a '{' is starting a structure definition or
239				 * an initialization list */
240    int         bl_line;	/* set to 1 by dump_line if the line is blank */
241    int         col_1;		/* set to true if the last token started in
242				 * column 1 */
243    int         com_col;	/* this is the column in which the current
244				 * coment should start */
245    int         com_ind;	/* the column in which comments to the right
246				 * of code should start */
247    int         com_lines;	/* the number of lines with comments, set by
248				 * dump_line */
249    int         dec_nest;	/* current nesting level for structure or init */
250    int         decl_com_ind;	/* the column in which comments after
251				 * declarations should be put */
252    int         decl_on_line;	/* set to true if this line of code has part
253				 * of a declaration on it */
254    int         i_l_follow;	/* the level to which ind_level should be set
255				 * after the current line is printed */
256    int         in_decl;	/* set to true when we are in a declaration
257				 * stmt.  The processing of braces is then
258				 * slightly different */
259    int         in_stmt;	/* set to 1 while in a stmt */
260    int         ind_level;	/* the current indentation level */
261    int         ind_size;	/* the size of one indentation level */
262    int         ind_stmt;	/* set to 1 if next line should have an extra
263				 * indentation level because we are in the
264				 * middle of a stmt */
265    int         last_u_d;	/* set to true after scanning a token which
266				 * forces a following operator to be unary */
267    int         leave_comma;	/* if true, never break declarations after
268				 * commas */
269    int         ljust_decl;	/* true if declarations should be left
270				 * justified */
271    int         out_coms;	/* the number of comments processed, set by
272				 * pr_comment */
273    int         out_lines;	/* the number of lines written, set by
274				 * dump_line */
275    int         p_l_follow;	/* used to remember how to indent following
276				 * statement */
277    int         paren_level;	/* parenthesization level. used to indent
278				 * within stmts */
279    short       paren_indents[20];	/* column positions of each paren */
280    int         pcase;		/* set to 1 if the current line label is a
281				 * case.  It is printed differently from a
282				 * regular label */
283    int         search_brace;	/* set to true by parse when it is necessary
284				 * to buffer up all info up to the start of a
285				 * stmt after an if, while, etc */
286    int         unindent_displace;	/* comments not to the right of code
287					 * will be placed this many
288					 * indentation levels to the left of
289					 * code */
290    int         use_ff;		/* set to one if the current line should be
291				 * terminated with a form feed */
292    int         want_blank;	/* set to true when the following token should
293				 * be prefixed by a blank. (Said prefixing is
294				 * ignored in some cases.) */
295    int         else_if;	/* True iff else if pairs should be handled
296				 * specially */
297    int         decl_indent;	/* column to indent declared identifiers to */
298    int         its_a_keyword;
299    int         sizeof_keyword;
300    int         dumped_decl_indent;
301    float       case_indent;	/* The distance to indent case labels from the
302				 * switch statement */
303    int         in_parameter_declaration;
304    int         indent_parameters;
305    int         tos;		/* pointer to top of stack */
306    char        procname[100];	/* The name of the current procedure */
307    int         just_saw_decl;
308}           ps;
309
310int         ifdef_level;
311int	    rparen_count;
312struct parser_state state_stack[5];
313struct parser_state match_state[5];
314