Home | History | Annotate | Line # | Download | only in ctags 
      1 /*	$NetBSD: yacc.c,v 1.12 2009/07/13 19:05:40 roy Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1987, 1993, 1994
      5  *	The Regents of the University of California.  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. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #if HAVE_NBTOOL_CONFIG_H
     33 #include "nbtool_config.h"
     34 #endif
     35 
     36 #include <sys/cdefs.h>
     37 #if defined(__RCSID) && !defined(lint)
     38 #if 0
     39 static char sccsid[] = "@(#)yacc.c	8.3 (Berkeley) 4/2/94";
     40 #else
     41 __RCSID("$NetBSD: yacc.c,v 1.12 2009/07/13 19:05:40 roy Exp $");
     42 #endif
     43 #endif /* not lint */
     44 
     45 #include <ctype.h>
     46 #include <limits.h>
     47 #include <stdio.h>
     48 #include <string.h>
     49 
     50 #include "ctags.h"
     51 
     52 /*
     53  * y_entries:
     54  *	find the yacc tags and put them in.
     55  */
     56 void
     57 y_entries(void)
     58 {
     59 	int	c;
     60 	char	*sp;
     61 	bool	in_rule;
     62 	char	tok[MAXTOKEN];
     63 
     64 	in_rule = NO;
     65 
     66 	while (GETC(!=, EOF))
     67 		switch (c) {
     68 		case '\n':
     69 			SETLINE;
     70 			/* FALLTHROUGH */
     71 		case ' ':
     72 		case '\f':
     73 		case '\r':
     74 		case '\t':
     75 			break;
     76 		case '{':
     77 			if (skip_key('}'))
     78 				in_rule = NO;
     79 			break;
     80 		case '\'':
     81 		case '"':
     82 			if (skip_key(c))
     83 				in_rule = NO;
     84 			break;
     85 		case '%':
     86 			if (GETC(==, '%'))
     87 				return;
     88 			(void)ungetc(c, inf);
     89 			break;
     90 		case '/':
     91 			if (GETC(==, '*'))
     92 				skip_comment('*');
     93 			else
     94 				(void)ungetc(c, inf);
     95 			break;
     96 		case '|':
     97 		case ';':
     98 			in_rule = NO;
     99 			break;
    100 		default:
    101 			if (in_rule || (!isalpha(c) && c != '.' && c != '_'))
    102 				break;
    103 			sp = tok;
    104 			*sp++ = c;
    105 			while (GETC(!=, EOF) && (intoken(c) || c == '.'))
    106 				*sp++ = c;
    107 			*sp = EOS;
    108 			get_line();		/* may change before ':' */
    109 			if (c == EOF)
    110 				return;
    111 			while (iswhite(c)) {
    112 				if (c == '\n')
    113 					SETLINE;
    114 				if (GETC(==, EOF))
    115 					return;
    116 			}
    117 			if (c == ':') {
    118 				pfnote(tok, lineno);
    119 				in_rule = YES;
    120 			}
    121 			else
    122 				(void)ungetc(c, inf);
    123 		}
    124 }
    125 
    126 /*
    127  * toss_yysec --
    128  *	throw away lines up to the next "\n%%\n"
    129  */
    130 void
    131 toss_yysec(void)
    132 {
    133 	int	c;			/* read character */
    134 	int	state;
    135 
    136 	/*
    137 	 * state == 0 : waiting
    138 	 * state == 1 : received a newline
    139 	 * state == 2 : received first %
    140 	 * state == 3 : received second %
    141 	 */
    142 	lineftell = ftell(inf);
    143 	for (state = 0; GETC(!=, EOF);)
    144 		switch (c) {
    145 		case '\n':
    146 			++lineno;
    147 			lineftell = ftell(inf);
    148 			if (state == 3)		/* done! */
    149 				return;
    150 			state = 1;		/* start over */
    151 			break;
    152 		case '%':
    153 			if (state)		/* if 1 or 2 */
    154 				++state;	/* goto 3 */
    155 			break;
    156 		default:
    157 			state = 0;		/* reset */
    158 			break;
    159 		}
    160 }
    161