ppl.yy.c File Reference

#include "config.h"
#include "wine/port.h"
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>
#include <ctype.h>
#include <assert.h>
#include <limits.h>
#include "wine/wpp.h"
#include "wpp_private.h"
#include "ppy.tab.h"

Include dependency graph for ppl.yy.c:

Go to the source code of this file.

Classes
struct	yy_buffer_state
struct	yy_trans_info
struct	bufferstackentry
struct	macexpstackentry

Macros
#define	YY_INT_ALIGNED   short int
#define	yy_create_buffer   ppy__create_buffer
#define	yy_delete_buffer   ppy__delete_buffer
#define	yy_flex_debug   ppy__flex_debug
#define	yy_init_buffer   ppy__init_buffer
#define	yy_flush_buffer   ppy__flush_buffer
#define	yy_load_buffer_state   ppy__load_buffer_state
#define	yy_switch_to_buffer   ppy__switch_to_buffer
#define	yyin   ppy_in
#define	yyleng   ppy_leng
#define	yylex   ppy_lex
#define	yylineno   ppy_lineno
#define	yyout   ppy_out
#define	yyrestart   ppy_restart
#define	yytext   ppy_text
#define	yywrap   ppy_wrap
#define	yyalloc   ppy_alloc
#define	yyrealloc   ppy_realloc
#define	yyfree   ppy_free
#define	FLEX_SCANNER
#define	YY_FLEX_MAJOR_VERSION   2
#define	YY_FLEX_MINOR_VERSION   5
#define	YY_FLEX_SUBMINOR_VERSION   35
#define	FLEX_BETA
#define	FLEXINT_H
#define	INT8_MIN   (-128)
#define	INT16_MIN   (-32767-1)
#define	INT32_MIN   (-2147483647-1)
#define	INT8_MAX   (127)
#define	INT16_MAX   (32767)
#define	INT32_MAX   (2147483647)
#define	UINT8_MAX   (255U)
#define	UINT16_MAX   (65535U)
#define	UINT32_MAX   (4294967295U)
#define	yyconst
#define	YY_NULL   0
#define	YY_SC_TO_UI(c)   ((unsigned int) (unsigned char) c)
#define	BEGIN   (yy_start) = 1 + 2 *
#define	YY_START   (((yy_start) - 1) / 2)
#define	YYSTATE   YY_START
#define	YY_STATE_EOF(state)   (YY_END_OF_BUFFER + state + 1)
#define	YY_NEW_FILE   ppy_restart(ppy_in )
#define	YY_END_OF_BUFFER_CHAR   0
#define	YY_BUF_SIZE   16384
#define	YY_STATE_BUF_SIZE   ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
#define	YY_TYPEDEF_YY_BUFFER_STATE
#define	EOB_ACT_CONTINUE_SCAN   0
#define	EOB_ACT_END_OF_FILE   1
#define	EOB_ACT_LAST_MATCH   2
#define	YY_LESS_LINENO(n)
#define	yyless(n)
#define	unput(c)   yyunput( c, (yytext_ptr) )
#define	YY_TYPEDEF_YY_SIZE_T
#define	YY_STRUCT_YY_BUFFER_STATE
#define	YY_BUFFER_NEW   0
#define	YY_BUFFER_NORMAL   1
#define	YY_BUFFER_EOF_PENDING   2
#define	YY_CURRENT_BUFFER
#define	YY_CURRENT_BUFFER_LVALUE   (yy_buffer_stack)[(yy_buffer_stack_top)]
#define	YY_FLUSH_BUFFER   ppy__flush_buffer(YY_CURRENT_BUFFER )
#define	yy_new_buffer   ppy__create_buffer
#define	yy_set_interactive(is_interactive)
#define	yy_set_bol(at_bol)
#define	YY_AT_BOL()   (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
#define	yytext_ptr   ppy_text
#define	YY_DO_BEFORE_ACTION
#define	YY_NUM_RULES   143
#define	YY_END_OF_BUFFER   144
#define	REJECT   reject_used_but_not_detected
#define	yymore()   yymore_used_but_not_detected
#define	YY_MORE_ADJ   0
#define	YY_RESTORE_YY_MORE_OFFSET
#define	YY_NO_INPUT   1
#define	LLONG_MAX   ((long long)0x7fffffff << 32 | 0xffffffff)
#define	LLONG_MIN   (-LLONG_MAX - 1)
#define	ULLONG_MAX   ((long long)0xffffffff << 32 | 0xffffffff)
#define	YY_NO_UNISTD_H
#define	YY_READ_BUF_SIZE   65536 /* So we read most of a file at once */
#define	yy_current_state()   YY_START
#define	yy_pp_state(x)   yy_pop_state(); yy_push_state(x)
#define	YY_USER_ACTION   pp_status.char_number+=ppy_leng;
#define	MAXBUFFERSTACK   128 /* Nesting more than 128 includes or macro expansion textss is insane */
#define	ALLOCBLOCKSIZE   (1 << 10) /* Allocate these chunks at a time for string-buffers */
#define	MAXMACEXPSTACK   128 /* Nesting more than 128 macro expansions is insane */
#define	MACROPARENTHESES()   (top_macro()->parentheses)
#define	YY_INPUT(buf, result, max_size)
#define	BUFFERINITIALCAPACITY   256
#define	INITIAL   0
#define	pp_pp   1
#define	pp_eol   2
#define	pp_inc   3
#define	pp_dqs   4
#define	pp_sqs   5
#define	pp_iqs   6
#define	pp_comment   7
#define	pp_def   8
#define	pp_define   9
#define	pp_macro   10
#define	pp_mbody   11
#define	pp_macign   12
#define	pp_macscan   13
#define	pp_macexp   14
#define	pp_if   15
#define	pp_ifd   16
#define	pp_endif   17
#define	pp_line   18
#define	pp_defined   19
#define	pp_ignore   20
#define	RCINCL   21
#define	YY_EXTRA_TYPE   void *
#define	ECHO   do { if (fwrite( ppy_text, ppy_leng, 1, ppy_out )) {} } while (0)
#define	yyterminate()   return YY_NULL
#define	YY_START_STACK_INCR   25
#define	YY_FATAL_ERROR(msg)   yy_fatal_error( msg )
#define	YY_DECL_IS_OURS   1
#define	YY_DECL   int ppy_lex (void)
#define	YY_BREAK   break;
#define	YY_RULE_SETUP
#define	YY_EXIT_FAILURE   2
#define	yyless(n)
#define	YYTABLES_NAME   "yytables"

Typedefs
typedef signed char	flex_int8_t
typedef short int	flex_int16_t
typedef int	flex_int32_t
typedef unsigned char	flex_uint8_t
typedef unsigned short int	flex_uint16_t
typedef unsigned int	flex_uint32_t
typedef struct yy_buffer_state *	YY_BUFFER_STATE
typedef size_t	yy_size_t
typedef unsigned char	YY_CHAR
typedef int	yy_state_type
typedef struct bufferstackentry	bufferstackentry_t
typedef struct macexpstackentry	macexpstackentry_t

Functions
void	ppy_restart (FILE *input_file)
void	ppy__switch_to_buffer (YY_BUFFER_STATE new_buffer)
YY_BUFFER_STATE	ppy__create_buffer (FILE *file, int size)
void	ppy__delete_buffer (YY_BUFFER_STATE b)
void	ppy__flush_buffer (YY_BUFFER_STATE b)
void	ppy_push_buffer_state (YY_BUFFER_STATE new_buffer)
void	ppy_pop_buffer_state (void)
static void	ppy_ensure_buffer_stack (void)
static void	ppy__load_buffer_state (void)
static void	ppy__init_buffer (YY_BUFFER_STATE b, FILE *file)
YY_BUFFER_STATE	ppy__scan_buffer (char *base, yy_size_t size)
YY_BUFFER_STATE	ppy__scan_string (yyconst char *yy_str)
YY_BUFFER_STATE	ppy__scan_bytes (yyconst char *bytes, int len)
void *	ppy_alloc (yy_size_t)
void *	ppy_realloc (void *, yy_size_t)
void	ppy_free (void *)
static yy_state_type	yy_get_previous_state (void)
static yy_state_type	yy_try_NUL_trans (yy_state_type current_state)
static int	yy_get_next_buffer (void)
static void	yy_fatal_error (yyconst char msg[])
static void	newline (int)
static int	make_number (int radix, YYSTYPE *val, const char *str, int len)
static void	put_buffer (const char *s, int len)
static void	push_buffer (pp_entry_t *ppp, char *filename, char *incname, int pop)
static bufferstackentry_t *	pop_buffer (void)
static void	new_string (void)
static void	add_string (const char *str, int len)
static char *	get_string (void)
static void	put_string (void)
static int	string_start (void)
static void	push_macro (pp_entry_t *ppp)
static macexpstackentry_t *	top_macro (void)
static macexpstackentry_t *	pop_macro (void)
static void	free_macro (macexpstackentry_t *mep)
static void	add_text_to_macro (const char *text, int len)
static void	macro_add_arg (int last)
static void	macro_add_expansion (void)
static void	expand_special (pp_entry_t *ppp)
static void	expand_define (pp_entry_t *ppp)
static void	expand_macro (macexpstackentry_t *mep)
void	pp_writestring (const char *format,...)
static int	yy_init_globals (void)
int	ppy_lex_destroy (void)
int	ppy_get_debug (void)
void	ppy_set_debug (int debug_flag)
YY_EXTRA_TYPE	ppy_get_extra (void)
void	ppy_set_extra (YY_EXTRA_TYPE user_defined)
FILE *	ppy_get_in (void)
void	ppy_set_in (FILE *in_str)
FILE *	ppy_get_out (void)
void	ppy_set_out (FILE *out_str)
int	ppy_get_leng (void)
char *	ppy_get_text (void)
int	ppy_get_lineno (void)
void	ppy_set_lineno (int line_number)
int	ppy_wrap (void)
static void	yy_push_state (int new_state)
static void	yy_pop_state (void)
static int	yy_top_state (void)
int	ppy_lex (void)
	if (!(yy_init))
	while (1)
static void	yy_fatal_error (yyconst char *msg)
static void	add_text (const char *str, int len)
static mtext_t *	add_expand_text (mtext_t *mtp, macexpstackentry_t *mep, int *nnl)
void	pp_do_include (char *fname, int type)
void	pp_push_ignore_state (void)
void	pp_pop_ignore_state (void)

Variables
int	ppy_leng
FILE *	ppy_in = (FILE *) 0
FILE *	ppy_out = (FILE *) 0
static size_t	yy_buffer_stack_top = 0
static size_t	yy_buffer_stack_max = 0
static YY_BUFFER_STATE *	yy_buffer_stack = 0
static char	yy_hold_char
static int	yy_n_chars
static char *	yy_c_buf_p = (char *) 0
static int	yy_init = 0
static int	yy_start = 0
static int	yy_did_buffer_switch_on_eof
int	ppy_lineno = 1
char *	ppy_text
static yyconst flex_int16_t	yy_accept [416]
static yyconst flex_int32_t	yy_ec [256]
static yyconst flex_int32_t	yy_meta [50]
static yyconst flex_int16_t	yy_base [460]
static yyconst flex_int16_t	yy_def [460]
static yyconst flex_int16_t	yy_nxt [1936]
static yyconst flex_int16_t	yy_chk [1936]
static yy_state_type	yy_last_accepting_state
static char *	yy_last_accepting_cpos
int	ppy__flex_debug = 0
static int	ncontinuations
static int	strbuf_idx = 0
static int	strbuf_alloc = 0
static char *	strbuffer = NULL
static int	str_startline
static macexpstackentry_t *	macexpstack [MAXMACEXPSTACK]
static int	macexpstackidx = 0
static bufferstackentry_t	bufferstack [MAXBUFFERSTACK]
static int	bufferstackidx = 0
include_state_t	pp_incl_state
includelogicentry_t *	pp_includelogiclist = NULL
static int	yy_start_stack_ptr = 0
static int	yy_start_stack_depth = 0
static int *	yy_start_stack = NULL
	YY_DECL
register char *	yy_cp
register char *	yy_bp
register int	yy_act
static int	curdef_idx = 0
static int	curdef_alloc = 0
static char *	curdef_text = NULL

Macro Definition Documentation

ALLOCBLOCKSIZE

#define ALLOCBLOCKSIZE   (1 << 10) /* Allocate these chunks at a time for string-buffers */

Definition at line 1263 of file ppl.yy.c.

BEGIN

#define BEGIN   (yy_start) = 1 + 2 *

Definition at line 150 of file ppl.yy.c.

BUFFERINITIALCAPACITY

#define BUFFERINITIALCAPACITY   256

Definition at line 1349 of file ppl.yy.c.

ECHO

#define ECHO   do { if (fwrite( ppy_text, ppy_leng, 1, ppy_out )) {} } while (0)

Definition at line 1524 of file ppl.yy.c.

EOB_ACT_CONTINUE_SCAN

#define EOB_ACT_CONTINUE_SCAN   0

Definition at line 193 of file ppl.yy.c.

EOB_ACT_END_OF_FILE

#define EOB_ACT_END_OF_FILE   1

Definition at line 194 of file ppl.yy.c.

EOB_ACT_LAST_MATCH

#define EOB_ACT_LAST_MATCH   2

Definition at line 195 of file ppl.yy.c.

FLEX_BETA

#define FLEX_BETA

Definition at line 38 of file ppl.yy.c.

FLEX_SCANNER

#define FLEX_SCANNER

Definition at line 33 of file ppl.yy.c.

FLEXINT_H

#define FLEXINT_H

Definition at line 54 of file ppl.yy.c.

INITIAL

#define INITIAL   0

Definition at line 1403 of file ppl.yy.c.

INT16_MAX

#define INT16_MAX   (32767)

Definition at line 96 of file ppl.yy.c.

INT16_MIN

#define INT16_MIN   (-32767-1)

Definition at line 87 of file ppl.yy.c.

INT32_MAX

#define INT32_MAX   (2147483647)

Definition at line 99 of file ppl.yy.c.

INT32_MIN

#define INT32_MIN   (-2147483647-1)

Definition at line 90 of file ppl.yy.c.

INT8_MAX

#define INT8_MAX   (127)

Definition at line 93 of file ppl.yy.c.

INT8_MIN

#define INT8_MIN   (-128)

Definition at line 84 of file ppl.yy.c.

LLONG_MAX

#define LLONG_MAX   ((long long)0x7fffffff << 32 | 0xffffffff)

Definition at line 1211 of file ppl.yy.c.

LLONG_MIN

#define LLONG_MIN   (-LLONG_MAX - 1)

Definition at line 1212 of file ppl.yy.c.

MACROPARENTHESES

#define MACROPARENTHESES

(

)

(top_macro()->parentheses)

Definition at line 1285 of file ppl.yy.c.

MAXBUFFERSTACK

#define MAXBUFFERSTACK   128 /* Nesting more than 128 includes or macro expansion textss is insane */

Definition at line 1246 of file ppl.yy.c.

MAXMACEXPSTACK

#define MAXMACEXPSTACK   128 /* Nesting more than 128 macro expansions is insane */

Definition at line 1271 of file ppl.yy.c.

pp_comment

#define pp_comment   7

Definition at line 1410 of file ppl.yy.c.

pp_def

#define pp_def   8

Definition at line 1411 of file ppl.yy.c.

pp_define

#define pp_define   9

Definition at line 1412 of file ppl.yy.c.

pp_defined

#define pp_defined   19

Definition at line 1422 of file ppl.yy.c.

pp_dqs

#define pp_dqs   4

Definition at line 1407 of file ppl.yy.c.

pp_endif

#define pp_endif   17

Definition at line 1420 of file ppl.yy.c.

pp_eol

#define pp_eol   2

Definition at line 1405 of file ppl.yy.c.

pp_if

#define pp_if   15

Definition at line 1418 of file ppl.yy.c.

pp_ifd

#define pp_ifd   16

Definition at line 1419 of file ppl.yy.c.

pp_ignore

#define pp_ignore   20

Definition at line 1423 of file ppl.yy.c.

pp_inc

#define pp_inc   3

Definition at line 1406 of file ppl.yy.c.

pp_iqs

#define pp_iqs   6

Definition at line 1409 of file ppl.yy.c.

pp_line

#define pp_line   18

Definition at line 1421 of file ppl.yy.c.

pp_macexp

#define pp_macexp   14

Definition at line 1417 of file ppl.yy.c.

pp_macign

#define pp_macign   12

Definition at line 1415 of file ppl.yy.c.

pp_macro

#define pp_macro   10

Definition at line 1413 of file ppl.yy.c.

pp_macscan

#define pp_macscan   13

Definition at line 1416 of file ppl.yy.c.

pp_mbody

#define pp_mbody   11

Definition at line 1414 of file ppl.yy.c.

pp_pp

#define pp_pp   1

Definition at line 1404 of file ppl.yy.c.

pp_sqs

#define pp_sqs   5

Definition at line 1408 of file ppl.yy.c.

RCINCL

#define RCINCL   21

Definition at line 1424 of file ppl.yy.c.

REJECT

#define REJECT   reject_used_but_not_detected

Definition at line 1047 of file ppl.yy.c.

UINT16_MAX

#define UINT16_MAX   (65535U)

Definition at line 105 of file ppl.yy.c.

UINT32_MAX

#define UINT32_MAX   (4294967295U)

Definition at line 108 of file ppl.yy.c.

UINT8_MAX

#define UINT8_MAX   (255U)

Definition at line 102 of file ppl.yy.c.

ULLONG_MAX

#define ULLONG_MAX   ((long long)0xffffffff << 32 | 0xffffffff)

Definition at line 1215 of file ppl.yy.c.

unput

#define unput

(

c

)

yyunput( c, (yytext_ptr) )

Definition at line 213 of file ppl.yy.c.

YY_AT_BOL

#define YY_AT_BOL

(

)

(YY_CURRENT_BUFFER_LVALUE->yy_at_bol)

Definition at line 364 of file ppl.yy.c.

YY_BREAK

#define YY_BREAK   break;

Definition at line 1603 of file ppl.yy.c.

YY_BUF_SIZE

#define YY_BUF_SIZE   16384

Definition at line 176 of file ppl.yy.c.

YY_BUFFER_EOF_PENDING

#define YY_BUFFER_EOF_PENDING   2

Definition at line 280 of file ppl.yy.c.

YY_BUFFER_NEW

#define YY_BUFFER_NEW   0

Definition at line 268 of file ppl.yy.c.

YY_BUFFER_NORMAL

#define YY_BUFFER_NORMAL   1

Definition at line 269 of file ppl.yy.c.

yy_create_buffer

#define yy_create_buffer   ppy__create_buffer

Definition at line 14 of file ppl.yy.c.

YY_CURRENT_BUFFER

#define YY_CURRENT_BUFFER

Value:

( (yy_buffer_stack) \
                          ? (yy_buffer_stack)[(yy_buffer_stack_top)] \
                          : NULL)

Definition at line 296 of file ppl.yy.c.

YY_CURRENT_BUFFER_LVALUE

#define YY_CURRENT_BUFFER_LVALUE   (yy_buffer_stack)[(yy_buffer_stack_top)]

Definition at line 303 of file ppl.yy.c.

yy_current_state

#define yy_current_state

(

)

YY_START

Definition at line 1235 of file ppl.yy.c.

YY_DECL

#define YY_DECL   int ppy_lex (void)

Definition at line 1591 of file ppl.yy.c.

YY_DECL_IS_OURS

#define YY_DECL_IS_OURS   1

Definition at line 1587 of file ppl.yy.c.

yy_delete_buffer

#define yy_delete_buffer   ppy__delete_buffer

Definition at line 15 of file ppl.yy.c.

YY_DO_BEFORE_ACTION

#define YY_DO_BEFORE_ACTION

Value:

(yytext_ptr) = yy_bp; \
    ppy_leng = (size_t) (yy_cp - yy_bp); \
    (yy_hold_char) = *yy_cp; \
    *yy_cp = '\0'; \
    (yy_c_buf_p) = yy_cp;

Definition at line 389 of file ppl.yy.c.

YY_END_OF_BUFFER

#define YY_END_OF_BUFFER   144

Definition at line 397 of file ppl.yy.c.

YY_END_OF_BUFFER_CHAR

#define YY_END_OF_BUFFER_CHAR   0

Definition at line 165 of file ppl.yy.c.

YY_EXIT_FAILURE

#define YY_EXIT_FAILURE   2

Definition at line 3530 of file ppl.yy.c.

YY_EXTRA_TYPE

#define YY_EXTRA_TYPE   void *

Definition at line 1435 of file ppl.yy.c.

YY_FATAL_ERROR

#define YY_FATAL_ERROR

(

msg

)

yy_fatal_error( msg )

Definition at line 1578 of file ppl.yy.c.

yy_flex_debug

#define yy_flex_debug   ppy__flex_debug

Definition at line 16 of file ppl.yy.c.

YY_FLEX_MAJOR_VERSION

#define YY_FLEX_MAJOR_VERSION   2

Definition at line 34 of file ppl.yy.c.

YY_FLEX_MINOR_VERSION

#define YY_FLEX_MINOR_VERSION   5

Definition at line 35 of file ppl.yy.c.

YY_FLEX_SUBMINOR_VERSION

#define YY_FLEX_SUBMINOR_VERSION   35

Definition at line 36 of file ppl.yy.c.

yy_flush_buffer

#define yy_flush_buffer   ppy__flush_buffer

Definition at line 18 of file ppl.yy.c.

YY_FLUSH_BUFFER

#define YY_FLUSH_BUFFER   ppy__flush_buffer(YY_CURRENT_BUFFER )

Definition at line 332 of file ppl.yy.c.

yy_init_buffer

#define yy_init_buffer   ppy__init_buffer

Definition at line 17 of file ppl.yy.c.

YY_INPUT

#define YY_INPUT	(		buf,
			result,
			max_size
	)

Value:

{                                    \
        result = wpp_callbacks->read(pp_status.file, buf, max_size); \
    }

Definition at line 1344 of file ppl.yy.c.

YY_INT_ALIGNED

#define YY_INT_ALIGNED   short int

Definition at line 10 of file ppl.yy.c.

YY_LESS_LINENO

#define YY_LESS_LINENO

(

n

)

Definition at line 197 of file ppl.yy.c.

yy_load_buffer_state

#define yy_load_buffer_state   ppy__load_buffer_state

Definition at line 19 of file ppl.yy.c.

YY_MORE_ADJ

#define YY_MORE_ADJ   0

Definition at line 1049 of file ppl.yy.c.

yy_new_buffer

#define yy_new_buffer   ppy__create_buffer

Definition at line 342 of file ppl.yy.c.

YY_NEW_FILE

#define YY_NEW_FILE   ppy_restart(ppy_in )

Definition at line 163 of file ppl.yy.c.

YY_NO_INPUT

#define YY_NO_INPUT   1

Definition at line 1179 of file ppl.yy.c.

YY_NO_UNISTD_H

#define YY_NO_UNISTD_H

Definition at line 1219 of file ppl.yy.c.

YY_NULL

#define YY_NULL   0

Definition at line 137 of file ppl.yy.c.

YY_NUM_RULES

#define YY_NUM_RULES   143

Definition at line 396 of file ppl.yy.c.

yy_pp_state

#define yy_pp_state

(

x

)

yy_pop_state(); yy_push_state(x)

Definition at line 1236 of file ppl.yy.c.

YY_READ_BUF_SIZE

#define YY_READ_BUF_SIZE   65536 /* So we read most of a file at once */

Definition at line 1233 of file ppl.yy.c.

YY_RESTORE_YY_MORE_OFFSET

#define YY_RESTORE_YY_MORE_OFFSET

Definition at line 1050 of file ppl.yy.c.

YY_RULE_SETUP

#define YY_RULE_SETUP

Value:

if ( ppy_leng > 0 ) \
        YY_CURRENT_BUFFER_LVALUE->yy_at_bol = \
                (ppy_text[ppy_leng - 1] == '\n'); \
    YY_USER_ACTION

Definition at line 1606 of file ppl.yy.c.

YY_SC_TO_UI

#define YY_SC_TO_UI

(

c

)

((unsigned int) (unsigned char) c)

Definition at line 144 of file ppl.yy.c.

yy_set_bol

#define yy_set_bol

(

at_bol

)

Value:

{ \
    if ( ! YY_CURRENT_BUFFER ){\
        ppy_ensure_buffer_stack (); \
        YY_CURRENT_BUFFER_LVALUE =    \
            ppy__create_buffer(ppy_in,YY_BUF_SIZE ); \
    } \
    YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
    }

Definition at line 354 of file ppl.yy.c.

yy_set_interactive

#define yy_set_interactive

(

is_interactive

)

Value:

{ \
    if ( ! YY_CURRENT_BUFFER ){ \
        ppy_ensure_buffer_stack (); \
        YY_CURRENT_BUFFER_LVALUE =    \
            ppy__create_buffer(ppy_in,YY_BUF_SIZE ); \
    } \
    YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
    }

Definition at line 344 of file ppl.yy.c.

YY_START

#define YY_START   (((yy_start) - 1) / 2)

Definition at line 156 of file ppl.yy.c.

YY_START_STACK_INCR

#define YY_START_STACK_INCR   25

Definition at line 1573 of file ppl.yy.c.

YY_STATE_BUF_SIZE

#define YY_STATE_BUF_SIZE   ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))

Definition at line 182 of file ppl.yy.c.

YY_STATE_EOF

#define YY_STATE_EOF

(

state

)

(YY_END_OF_BUFFER + state + 1)

Definition at line 160 of file ppl.yy.c.

YY_STRUCT_YY_BUFFER_STATE

#define YY_STRUCT_YY_BUFFER_STATE

Definition at line 221 of file ppl.yy.c.

yy_switch_to_buffer

#define yy_switch_to_buffer   ppy__switch_to_buffer

Definition at line 20 of file ppl.yy.c.

YY_TYPEDEF_YY_BUFFER_STATE

#define YY_TYPEDEF_YY_BUFFER_STATE

Definition at line 185 of file ppl.yy.c.

YY_TYPEDEF_YY_SIZE_T

#define YY_TYPEDEF_YY_SIZE_T

Definition at line 216 of file ppl.yy.c.

YY_USER_ACTION

#define YY_USER_ACTION   pp_status.char_number+=ppy_leng;

Definition at line 1241 of file ppl.yy.c.

yyalloc

#define yyalloc   ppy_alloc

Definition at line 29 of file ppl.yy.c.

yyconst

#define yyconst

Definition at line 133 of file ppl.yy.c.

yyfree

#define yyfree   ppy_free

Definition at line 31 of file ppl.yy.c.

yyin

#define yyin   ppy_in

Definition at line 21 of file ppl.yy.c.

yyleng

#define yyleng   ppy_leng

Definition at line 22 of file ppl.yy.c.

yyless [1/2]

#define yyless

(

n

)

Value:

do \
        { \
        /* Undo effects of setting up ppy_text. */ \
        int yyless_macro_arg = (n); \
        YY_LESS_LINENO(yyless_macro_arg);\
        *yy_cp = (yy_hold_char); \
        YY_RESTORE_YY_MORE_OFFSET \
        (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
        YY_DO_BEFORE_ACTION; /* set up ppy_text again */ \
        } \
    while ( 0 )

Definition at line 3542 of file ppl.yy.c.

yyless [2/2]

#define yyless

(

n

)

Value:

do \
        { \
        /* Undo effects of setting up ppy_text. */ \
        int yyless_macro_arg = (n); \
        YY_LESS_LINENO(yyless_macro_arg);\
        ppy_text[ppy_leng] = (yy_hold_char); \
        (yy_c_buf_p) = ppy_text + yyless_macro_arg; \
        (yy_hold_char) = *(yy_c_buf_p); \
        *(yy_c_buf_p) = '\0'; \
        ppy_leng = yyless_macro_arg; \
        } \
    while ( 0 )

Definition at line 3542 of file ppl.yy.c.

yylex

#define yylex   ppy_lex

Definition at line 23 of file ppl.yy.c.

yylineno

#define yylineno   ppy_lineno

Definition at line 24 of file ppl.yy.c.

yymore

#define yymore

(

)

yymore_used_but_not_detected

Definition at line 1048 of file ppl.yy.c.

yyout

#define yyout   ppy_out

Definition at line 25 of file ppl.yy.c.

yyrealloc

#define yyrealloc   ppy_realloc

Definition at line 30 of file ppl.yy.c.

yyrestart

#define yyrestart   ppy_restart

Definition at line 26 of file ppl.yy.c.

YYSTATE

#define YYSTATE   YY_START

Definition at line 157 of file ppl.yy.c.

YYTABLES_NAME

#define YYTABLES_NAME   "yytables"

Definition at line 3740 of file ppl.yy.c.

yyterminate

#define yyterminate

(

)

return YY_NULL

Definition at line 1568 of file ppl.yy.c.

yytext

#define yytext   ppy_text

Definition at line 27 of file ppl.yy.c.

yytext_ptr

#define yytext_ptr   ppy_text

Definition at line 379 of file ppl.yy.c.

yywrap

#define yywrap   ppy_wrap

Definition at line 28 of file ppl.yy.c.

Typedef Documentation

bufferstackentry_t

typedef struct bufferstackentry bufferstackentry_t

flex_int16_t

typedef short int flex_int16_t

Definition at line 76 of file ppl.yy.c.

flex_int32_t

typedef int flex_int32_t

Definition at line 77 of file ppl.yy.c.

flex_int8_t

typedef signed char flex_int8_t

Definition at line 75 of file ppl.yy.c.

flex_uint16_t

typedef unsigned short int flex_uint16_t

Definition at line 79 of file ppl.yy.c.

flex_uint32_t

typedef unsigned int flex_uint32_t

Definition at line 80 of file ppl.yy.c.

flex_uint8_t

typedef unsigned char flex_uint8_t

Definition at line 78 of file ppl.yy.c.

macexpstackentry_t

typedef struct macexpstackentry macexpstackentry_t

YY_BUFFER_STATE

typedef struct yy_buffer_state* YY_BUFFER_STATE

Definition at line 186 of file ppl.yy.c.

YY_CHAR

typedef unsigned char YY_CHAR

Definition at line 368 of file ppl.yy.c.

yy_size_t

typedef size_t yy_size_t

Definition at line 217 of file ppl.yy.c.

yy_state_type

typedef int yy_state_type

Definition at line 372 of file ppl.yy.c.

Function Documentation

add_expand_text()

static mtext_t* add_expand_text ( mtext_t *  mtp, macexpstackentry_t *  mep, int *  nnl  )

static

Definition at line 4004 of file ppl.yy.c.

{
    char *cptr;
    char *exp;
    int tag;
    int n;

    if(mtp == NULL)
        return NULL;

    switch(mtp->type)
    {
    case exp_text:
        if(pp_flex_debug)
            fprintf(stderr, "add_expand_text: exp_text: '%s'\n", mtp->subst.text);
        add_text(mtp->subst.text, strlen(mtp->subst.text));
        break;

    case exp_stringize:
        if(pp_flex_debug)
            fprintf(stderr, "add_expand_text: exp_stringize(%d): '%s'\n",
                mtp->subst.argidx,
                mep->args[mtp->subst.argidx]);
        cptr = mep->args[mtp->subst.argidx];
        add_text("\"", 1);
        while(*cptr)
        {
            if(*cptr == '"' || *cptr == '\\')
                add_text("\\", 1);
            add_text(cptr, 1);
            cptr++;
        }
        add_text("\"", 1);
        break;

    case exp_concat:
        if(pp_flex_debug)
            fprintf(stderr, "add_expand_text: exp_concat\n");
        /* Remove trailing whitespace from current expansion text */
        while(curdef_idx)
        {
            if(isspace(curdef_text[curdef_idx-1] & 0xff))
                curdef_idx--;
            else
                break;
        }
        /* tag current position and recursively expand the next part */
        tag = curdef_idx;
        mtp = add_expand_text(mtp->next, mep, nnl);

        /* Now get rid of the leading space of the expansion */
        cptr = &curdef_text[tag];
        n = curdef_idx - tag;
        while(n)
        {
            if(isspace(*cptr & 0xff))
            {
                cptr++;
                n--;
            }
            else
                break;
        }
        if(cptr != &curdef_text[tag])
        {
            memmove(&curdef_text[tag], cptr, n);
            curdef_idx -= (curdef_idx - tag) - n;
        }
        break;

    case exp_subst:
        if((mtp->next && mtp->next->type == exp_concat) || (mtp->prev && mtp->prev->type == exp_concat))
            exp = mep->args[mtp->subst.argidx];
        else
            exp = mep->ppargs[mtp->subst.argidx];
        if(exp)
        {
            add_text(exp, strlen(exp));
            *nnl -= mep->nnls[mtp->subst.argidx];
            cptr = strchr(exp, '\n');
            while(cptr)
            {
                *cptr = ' ';
                cptr = strchr(cptr+1, '\n');
            }
            mep->nnls[mtp->subst.argidx] = 0;
        }
        if(pp_flex_debug)
            fprintf(stderr, "add_expand_text: exp_subst(%d): '%s'\n", mtp->subst.argidx, exp);
        break;

    default:
        pp_internal_error(__FILE__, __LINE__, "Invalid expansion type (%d) in macro expansion\n", mtp->type);
    }
    return mtp;
}

Referenced by expand_macro().

add_string()

static void add_string ( const char *  str, int  len  )

static

Definition at line 4192 of file ppl.yy.c.

{
    int new_alloc;
    char *new_buffer;

    if(len == 0)
        return;
    if(strbuf_idx >= strbuf_alloc || strbuf_alloc - strbuf_idx < len)
    {
        new_alloc = strbuf_alloc + ((len + ALLOCBLOCKSIZE-1) & ~(ALLOCBLOCKSIZE-1));
        new_buffer = pp_xrealloc(strbuffer, new_alloc * sizeof(strbuffer[0]));
        if(!new_buffer)
            return;
        strbuffer = new_buffer;
        strbuf_alloc = new_alloc;
        if(strbuf_alloc > 65536)
            ppy_warning("Reallocating string buffer larger than 64kB");
    }
    memcpy(&strbuffer[strbuf_idx], str, len);
    strbuf_idx += len;
}

Referenced by while().

add_text()

static void add_text ( const char *  str, int  len  )

static

Definition at line 3982 of file ppl.yy.c.

{
    int new_alloc;
    char *new_text;

    if(len == 0)
        return;
    if(curdef_idx >= curdef_alloc || curdef_alloc - curdef_idx < len)
    {
        new_alloc = curdef_alloc + ((len + ALLOCBLOCKSIZE-1) & ~(ALLOCBLOCKSIZE-1));
        new_text = pp_xrealloc(curdef_text, new_alloc * sizeof(curdef_text[0]));
        if(!new_text)
            return;
        curdef_text = new_text;
        curdef_alloc = new_alloc;
        if(curdef_alloc > 65536)
            ppy_warning("Reallocating macro-expansion buffer larger than 64kB");
    }
    memcpy(&curdef_text[curdef_idx], str, len);
    curdef_idx += len;
}

Referenced by add_expand_text(), and expand_macro().

add_text_to_macro()

static void add_text_to_macro ( const char *  text, int  len  )

static

Definition at line 4413 of file ppl.yy.c.

{
    macexpstackentry_t *mep = top_macro();

    assert(mep->ppp->expanding == 0);

    if(mep->curargalloc - mep->curargsize <= len+1) /* +1 for '\0' */
    {
        char *new_curarg;
        int new_alloc = mep->curargalloc + ((ALLOCBLOCKSIZE > len+1) ? ALLOCBLOCKSIZE : len+1);
        new_curarg = pp_xrealloc(mep->curarg, new_alloc * sizeof(mep->curarg[0]));
        if(!new_curarg)
            return;
        mep->curarg = new_curarg;
        mep->curargalloc = new_alloc;
    }
    memcpy(mep->curarg + mep->curargsize, text, len);
    mep->curargsize += len;
    mep->curarg[mep->curargsize] = '\0';
}

Referenced by put_buffer(), and while().

expand_define()

static void expand_define ( pp_entry_t *  ppp )

static

Definition at line 3960 of file ppl.yy.c.

{
    assert(ppp->type == def_define);

    if(pp_flex_debug)
        fprintf(stderr, "expand_define(%d): %s:%d: '%s' -> '%s'\n",
            macexpstackidx,
            pp_status.input,
            pp_status.line_number,
            ppp->ident,
            ppp->subst.text);
    if(ppp->subst.text && ppp->subst.text[0])
    {
        push_buffer(ppp, NULL, NULL, 0);
        ppy__scan_string(ppp->subst.text);
    }
}

Referenced by while().

expand_macro()

static void expand_macro ( macexpstackentry_t *  mep )

static

Definition at line 4101 of file ppl.yy.c.

{
    mtext_t *mtp;
    int n, k;
    char *cptr;
    int nnl = 0;
    pp_entry_t *ppp = mep->ppp;
    int nargs = mep->nargs;

    assert(ppp->type == def_macro);
    assert(ppp->expanding == 0);

    if((ppp->nargs >= 0 && nargs != ppp->nargs) || (ppp->nargs < 0 && nargs < -ppp->nargs))
    {
        ppy_error("Too %s macro arguments (%d)", nargs < abs(ppp->nargs) ? "few" : "many", nargs);
        return;
    }

    for(n = 0; n < nargs; n++)
        nnl += mep->nnls[n];

    if(pp_flex_debug)
        fprintf(stderr, "expand_macro(%d): %s:%d: '%s'(%d,%d) -> ...\n",
            macexpstackidx,
            pp_status.input,
            pp_status.line_number,
            ppp->ident,
            mep->nargs,
            nnl);

    curdef_idx = 0;

    for(mtp = ppp->subst.mtext; mtp; mtp = mtp->next)
    {
        if(!(mtp = add_expand_text(mtp, mep, &nnl)))
            break;
    }

    for(n = 0; n < nnl; n++)
        add_text("\n", 1);

    /* To make sure there is room and termination (see below) */
    add_text(" \0", 2);

    /* Strip trailing whitespace from expansion */
    for(k = curdef_idx, cptr = &curdef_text[curdef_idx-1]; k > 0; k--, cptr--)
    {
        if(!isspace(*cptr & 0xff))
            break;
    }

    /*
     * We must add *one* whitespace to make sure that there
     * is a token-separation after the expansion.
     */
    *(++cptr) = ' ';
    *(++cptr) = '\0';
    k++;

    /* Strip leading whitespace from expansion */
    for(n = 0, cptr = curdef_text; n < k; n++, cptr++)
    {
        if(!isspace(*cptr & 0xff))
            break;
    }

    if(k - n > 0)
    {
        if(pp_flex_debug)
            fprintf(stderr, "expand_text: '%s'\n", curdef_text + n);
        push_buffer(ppp, NULL, NULL, 0);
        /*ppy__scan_bytes(curdef_text + n,k - n);*/
        ppy__scan_string(curdef_text + n);
    }
}

Referenced by while().

expand_special()

static void expand_special ( pp_entry_t *  ppp )

static

Definition at line 3919 of file ppl.yy.c.

{
    static char *buf = NULL;
    char *new_buf;

    assert(ppp->type == def_special);

    if(!strcmp(ppp->ident, "__LINE__"))
    {
        new_buf = pp_xrealloc(buf, 32);
        if(!new_buf)
            return;
        buf = new_buf;
        sprintf(buf, "%d", pp_status.line_number);
    }
    else if(!strcmp(ppp->ident, "__FILE__"))
    {
        new_buf = pp_xrealloc(buf, strlen(pp_status.input) + 3);
        if(!new_buf)
            return;
        buf = new_buf;
        sprintf(buf, "\"%s\"", pp_status.input);
    }
    else
        pp_internal_error(__FILE__, __LINE__, "Special macro '%s' not found...\n", ppp->ident);

    if(pp_flex_debug)
        fprintf(stderr, "expand_special(%d): %s:%d: '%s' -> '%s'\n",
            macexpstackidx,
            pp_status.input,
            pp_status.line_number,
            ppp->ident,
            buf ? buf : "");

    if(buf && buf[0])
    {
        push_buffer(ppp, NULL, NULL, 0);
        ppy__scan_string(buf);
    }
}

Referenced by while().

free_macro()

static void free_macro ( macexpstackentry_t *  mep )

static

Definition at line 4401 of file ppl.yy.c.

{
    int i;

    for(i = 0; i < mep->nargs; i++)
        free(mep->args[i]);
    free(mep->args);
    free(mep->nnls);
    free(mep->curarg);
    free(mep);
}

Referenced by while().

get_string()

static char * get_string ( void  )

static

Definition at line 4214 of file ppl.yy.c.

{
    char *str = pp_xmalloc(strbuf_idx + 1);
    if(!str)
        return NULL;
    memcpy(str, strbuffer, strbuf_idx);
    str[strbuf_idx] = '\0';
#ifdef DEBUG
    strbuf_idx = 0;
#endif
    return str;
}

Referenced by while().

if()

if

(

!

yy_init

)

Definition at line 1636 of file ppl.yy.c.

        {
        (yy_init) = 1;

#ifdef YY_USER_INIT
        YY_USER_INIT;
#endif

        if ( ! (yy_start) )
            (yy_start) = 1; /* first start state */

        if ( ! ppy_in )
            ppy_in = stdin;

        if ( ! ppy_out )
            ppy_out = stdout;

        if ( ! YY_CURRENT_BUFFER ) {
            ppy_ensure_buffer_stack ();
            YY_CURRENT_BUFFER_LVALUE =
                ppy__create_buffer(ppy_in,YY_BUF_SIZE );
        }

        ppy__load_buffer_state( );
        }

macro_add_arg()

static void macro_add_arg ( int  last )

static

Definition at line 4434 of file ppl.yy.c.

{
    int nnl = 0;
    char *cptr;
    char **new_args, **new_ppargs;
    int *new_nnls;
    macexpstackentry_t *mep = top_macro();

    assert(mep->ppp->expanding == 0);

    new_args = pp_xrealloc(mep->args, (mep->nargs+1) * sizeof(mep->args[0]));
    if(!new_args)
        return;
    mep->args = new_args;

    new_ppargs = pp_xrealloc(mep->ppargs, (mep->nargs+1) * sizeof(mep->ppargs[0]));
    if(!new_ppargs)
        return;
    mep->ppargs = new_ppargs;

    new_nnls = pp_xrealloc(mep->nnls, (mep->nargs+1) * sizeof(mep->nnls[0]));
    if(!new_nnls)
        return;
    mep->nnls = new_nnls;

    mep->args[mep->nargs] = pp_xstrdup(mep->curarg ? mep->curarg : "");
    if(!mep->args[mep->nargs])
        return;
    cptr = mep->args[mep->nargs]-1;
    while((cptr = strchr(cptr+1, '\n')))
    {
        nnl++;
    }
    mep->nnls[mep->nargs] = nnl;
    mep->nargs++;
    free(mep->curarg);
    mep->curargalloc = mep->curargsize = 0;
    mep->curarg = NULL;

    if(pp_flex_debug)
        fprintf(stderr, "macro_add_arg: %s:%d: %d -> '%s'\n",
            pp_status.input,
            pp_status.line_number,
            mep->nargs-1,
            mep->args[mep->nargs-1]);

    /* Each macro argument must be expanded to cope with stingize */
    if(last || mep->args[mep->nargs-1][0])
    {
        yy_push_state(pp_macexp);
        push_buffer(NULL, NULL, NULL, last ? 2 : 1);
        ppy__scan_string(mep->args[mep->nargs-1]);
        /*mep->bufferstackidx = bufferstackidx;  But not nested! */
    }
}

Referenced by while().

macro_add_expansion()

static void macro_add_expansion ( void  )

static

Definition at line 4490 of file ppl.yy.c.

{
    macexpstackentry_t *mep = top_macro();

    assert(mep->ppp->expanding == 0);

    mep->ppargs[mep->nargs-1] = pp_xstrdup(mep->curarg ? mep->curarg : "");
    free(mep->curarg);
    mep->curargalloc = mep->curargsize = 0;
    mep->curarg = NULL;

    if(pp_flex_debug)
        fprintf(stderr, "macro_add_expansion: %s:%d: %d -> '%s'\n",
            pp_status.input,
            pp_status.line_number,
            mep->nargs-1,
            mep->ppargs[mep->nargs-1] ? mep->ppargs[mep->nargs-1] : "");
}

Referenced by pop_buffer().

make_number()

static int make_number ( int  radix, YYSTYPE *  val, const char *  str, int  len  )

static

Definition at line 3809 of file ppl.yy.c.

{
    int is_l  = 0;
    int is_ll = 0;
    int is_u  = 0;
    char ext[4];
    long l;

    ext[3] = '\0';
    ext[2] = toupper(str[len-1]);
    ext[1] = len > 1 ? toupper(str[len-2]) : ' ';
    ext[0] = len > 2 ? toupper(str[len-3]) : ' ';

    if(!strcmp(ext, "LUL"))
    {
        ppy_error("Invalid constant suffix");
        return 0;
    }
    else if(!strcmp(ext, "LLU") || !strcmp(ext, "ULL"))
    {
        is_ll++;
        is_u++;
    }
    else if(!strcmp(ext+1, "LU") || !strcmp(ext+1, "UL"))
    {
        is_l++;
        is_u++;
    }
    else if(!strcmp(ext+1, "LL"))
    {
        is_ll++;
    }
    else if(!strcmp(ext+2, "L"))
    {
        is_l++;
    }
    else if(!strcmp(ext+2, "U"))
    {
        is_u++;
    }

    if(is_ll)
    {
/* Assume as in the declaration of wrc_ull_t and wrc_sll_t */
#ifdef HAVE_LONG_LONG
        if (is_u)
        {
            errno = 0;
            val->ull = strtoull(str, NULL, radix);
            if (val->ull == ULLONG_MAX && errno == ERANGE)
                ppy_error("integer constant %s is too large\n", str);
            return tULONGLONG;
        }
        else
        {
            errno = 0;
            val->sll = strtoll(str, NULL, radix);
            if ((val->sll == LLONG_MIN || val->sll == LLONG_MAX) && errno == ERANGE)
                ppy_error("integer constant %s is too large\n", str);
            return tSLONGLONG;
        }
#else
        pp_internal_error(__FILE__, __LINE__, "long long constants not supported on this platform");
#endif
    }
    else if(is_u && is_l)
    {
        errno = 0;
        val->ulong = strtoul(str, NULL, radix);
        if (val->ulong == ULONG_MAX && errno == ERANGE)
            ppy_error("integer constant %s is too large\n", str);
        return tULONG;
    }
    else if(!is_u && is_l)
    {
        errno = 0;
        val->slong = strtol(str, NULL, radix);
        if ((val->slong == LONG_MIN || val->slong == LONG_MAX) && errno == ERANGE)
            ppy_error("integer constant %s is too large\n", str);
        return tSLONG;
    }
    else if(is_u && !is_l)
    {
        unsigned long ul;
        errno = 0;
        ul = strtoul(str, NULL, radix);
        if ((ul == ULONG_MAX && errno == ERANGE) || (ul > UINT_MAX))
            ppy_error("integer constant %s is too large\n", str);
        val->uint = (unsigned int)ul;
        return tUINT;
    }

    /* Else it must be an int... */
    errno = 0;
    l = strtol(str, NULL, radix);
    if (((l == LONG_MIN || l == LONG_MAX) && errno == ERANGE) ||
        (l > INT_MAX) || (l < INT_MIN))
        ppy_error("integer constant %s is too large\n", str);
    val->sint = (int)l;
    return tSINT;
}

Referenced by while().

new_string()

static void new_string ( void  )

static

Definition at line 4182 of file ppl.yy.c.

{
#ifdef DEBUG
    if(strbuf_idx)
        ppy_warning("new_string: strbuf_idx != 0");
#endif
    strbuf_idx = 0;
    str_startline = pp_status.line_number;
}

Referenced by while().

newline()

static void newline ( int  dowrite )

static

Definition at line 3768 of file ppl.yy.c.

{
    pp_status.line_number++;
    pp_status.char_number = 1;

    if(dowrite == -1)
        return;

    ncontinuations++;
    if(dowrite)
    {
        for(;ncontinuations; ncontinuations--)
            put_buffer("\n", 1);
    }
}

Referenced by while().

pop_buffer()

static bufferstackentry_t * pop_buffer ( void  )

static

Definition at line 4281 of file ppl.yy.c.

{
    if(bufferstackidx < 0)
        pp_internal_error(__FILE__, __LINE__, "Bufferstack underflow?");

    if(bufferstackidx == 0)
        return NULL;

    bufferstackidx--;

    if(bufferstack[bufferstackidx].define)
        bufferstack[bufferstackidx].define->expanding = 0;
    else
    {
        includelogicentry_t *iep = NULL;

        if(!bufferstack[bufferstackidx].should_pop)
        {
            wpp_callbacks->close(pp_status.file);
            pp_writestring("# %d \"%s\" 2\n", bufferstack[bufferstackidx].line_number, bufferstack[bufferstackidx].filename);

            /* We have EOF, check the include logic */
            if(pp_incl_state.state == 2 && !pp_incl_state.seen_junk && pp_incl_state.ppp)
            {
                pp_entry_t *ppp = pplookup(pp_incl_state.ppp);
                if(ppp)
                {
                    iep = pp_xmalloc(sizeof(includelogicentry_t));
                    if (iep)
                    {
                        iep->ppp = ppp;
                        ppp->iep = iep;
                        iep->filename = bufferstack[bufferstackidx].include_filename;
                        iep->prev = NULL;
                        iep->next = pp_includelogiclist;
                        if(iep->next)
                            iep->next->prev = iep;
                        pp_includelogiclist = iep;
                        if(pp_status.debug)
                            fprintf(stderr, "pop_buffer: %s:%d: includelogic added, include_ppp='%s', file='%s'\n",
                                                                bufferstack[bufferstackidx].filename, bufferstack[bufferstackidx].line_number, pp_incl_state.ppp, iep->filename);
                    }
                }
            }
            free(pp_incl_state.ppp);
            pp_incl_state   = bufferstack[bufferstackidx].incl;

        }
        if (bufferstack[bufferstackidx].include_filename)
        {
            free(pp_status.input);
            pp_status.input = bufferstack[bufferstackidx].filename;
        }
        pp_status.line_number = bufferstack[bufferstackidx].line_number;
        pp_status.char_number = bufferstack[bufferstackidx].char_number;
        ncontinuations = bufferstack[bufferstackidx].ncontinuations;
        if (!iep)
            free(bufferstack[bufferstackidx].include_filename);
    }

    if(ppy_debug)
        printf("pop_buffer(%d): %p %p (%d, %d, %d) %p %d\n",
            bufferstackidx,
            bufferstack[bufferstackidx].bufferstate,
            bufferstack[bufferstackidx].define,
            bufferstack[bufferstackidx].line_number,
            bufferstack[bufferstackidx].char_number,
            bufferstack[bufferstackidx].if_depth,
            bufferstack[bufferstackidx].filename,
            bufferstack[bufferstackidx].should_pop);

    pp_status.file = bufferstack[bufferstackidx].filehandle;
    ppy__switch_to_buffer(bufferstack[bufferstackidx].bufferstate);

    if(bufferstack[bufferstackidx].should_pop)
    {
        if(yy_current_state() == pp_macexp)
            macro_add_expansion();
        else
            pp_internal_error(__FILE__, __LINE__, "Pop buffer and state without macro expansion state");
        yy_pop_state();
    }

    return &bufferstack[bufferstackidx];
}

Referenced by while().

pop_macro()

static macexpstackentry_t * pop_macro ( void  )

static

Definition at line 4394 of file ppl.yy.c.

{
    if(macexpstackidx <= 0)
        pp_internal_error(__FILE__, __LINE__, "Macro expansion stack underflow\n");
    return macexpstack[--macexpstackidx];
}

Referenced by while().

pp_do_include()

void pp_do_include	(	char *	fname,
		int	type
	)

Definition at line 4529 of file ppl.yy.c.

{
    char *newpath;
    int n;
    includelogicentry_t *iep;
    void *fp;

    if(!fname)
        return;

    for(iep = pp_includelogiclist; iep; iep = iep->next)
    {
        if(!strcmp(iep->filename, fname))
        {
            /*
             * We are done. The file was included before.
             * If the define was deleted, then this entry would have
             * been deleted too.
             */
            free(fname);
            return;
        }
    }

    n = strlen(fname);

    if(n <= 2)
    {
        ppy_error("Empty include filename");
        free(fname);
        return;
    }

    /* Undo the effect of the quotation */
    fname[n-1] = '\0';

    if((fp = pp_open_include(fname+1, type, pp_status.input, &newpath)) == NULL)
    {
        ppy_error("Unable to open include file %s", fname+1);
        free(fname);
        return;
    }

    fname[n-1] = *fname;    /* Redo the quotes */
    push_buffer(NULL, newpath, fname, 0);
    pp_incl_state.seen_junk = 0;
    pp_incl_state.state = 0;
    pp_incl_state.ppp = NULL;

    if(pp_status.debug)
        fprintf(stderr, "pp_do_include: %s:%d: include_state=%d, include_ppp='%s', include_ifdepth=%d\n",
                        pp_status.input, pp_status.line_number, pp_incl_state.state, pp_incl_state.ppp, pp_incl_state.ifdepth);
    pp_status.file = fp;
    ppy__switch_to_buffer(ppy__create_buffer(NULL, YY_BUF_SIZE));

    pp_writestring("# 1 \"%s\" 1%s\n", newpath, type ? "" : " 3");
}

pp_pop_ignore_state()

void pp_pop_ignore_state

(

void

)

Definition at line 4598 of file ppl.yy.c.

{
    yy_pop_state();
}

pp_push_ignore_state()

void pp_push_ignore_state

(

void

)

Definition at line 4593 of file ppl.yy.c.

{
    yy_push_state(pp_ignore);
}

pp_writestring()

void pp_writestring	(	const char *	format,
			...
	)

Definition at line 1351 of file ppl.yy.c.

{
    va_list valist;
    int len;
    static char *buffer;
    static int buffercapacity;
    char *new_buffer;

    if(buffercapacity == 0)
    {
        buffer = pp_xmalloc(BUFFERINITIALCAPACITY);
        if(buffer == NULL)
            return;
        buffercapacity = BUFFERINITIALCAPACITY;
    }

    va_start(valist, format);
    len = vsnprintf(buffer, buffercapacity,
            format, valist);
    va_end(valist);
        /* If the string is longer than buffersize, vsnprintf returns
         * the string length with glibc >= 2.1, -1 with glibc < 2.1 */
    while(len > buffercapacity || len < 0)
    {
        do
        {
            buffercapacity *= 2;
        } while(len > buffercapacity);

        new_buffer = pp_xrealloc(buffer, buffercapacity);
        if(new_buffer == NULL)
        {
            va_end(valist);
            return;
        }
        buffer = new_buffer;
        va_start(valist, format);
        len = vsnprintf(buffer, buffercapacity,
                format, valist);
        va_end(valist);
    }

    wpp_callbacks->write(buffer, len);
}

ppy__create_buffer()

YY_BUFFER_STATE ppy__create_buffer	(	FILE *	file,
		int	size
	)

Allocate and initialize an input buffer state.

Parameters

file	A readable stream.
size	The character buffer size in bytes. When in doubt, use YY_BUF_SIZE.

Returns

the allocated buffer state.

Definition at line 3210 of file ppl.yy.c.

{
    YY_BUFFER_STATE b;
    
    b = (YY_BUFFER_STATE) ppy_alloc(sizeof( struct yy_buffer_state )  );
    if ( ! b )
        YY_FATAL_ERROR( "out of dynamic memory in ppy__create_buffer()" );

    b->yy_buf_size = size;

    /* yy_ch_buf has to be 2 characters longer than the size given because
     * we need to put in 2 end-of-buffer characters.
     */
    b->yy_ch_buf = (char *) ppy_alloc(b->yy_buf_size + 2  );
    if ( ! b->yy_ch_buf )
        YY_FATAL_ERROR( "out of dynamic memory in ppy__create_buffer()" );

    b->yy_is_our_buffer = 1;

    ppy__init_buffer(b,file );

    return b;
}

Referenced by if(), pp_do_include(), and ppy_restart().

ppy__delete_buffer()

void ppy__delete_buffer

(

YY_BUFFER_STATE

b

)

Destroy the buffer.

Parameters

b	a buffer created with ppy__create_buffer()

Definition at line 3238 of file ppl.yy.c.

{
    
    if ( ! b )
        return;

    if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
        YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;

    if ( b->yy_is_our_buffer )
        ppy_free((void *) b->yy_ch_buf  );

    ppy_free((void *) b  );
}

Referenced by ppy_lex_destroy(), ppy_pop_buffer_state(), and while().

ppy__flush_buffer()

void ppy__flush_buffer

(

YY_BUFFER_STATE

b

)

Discard all buffered characters. On the next scan, YY_INPUT will be called.

Parameters

b	the buffer state to be flushed, usually YY_CURRENT_BUFFER.

Definition at line 3285 of file ppl.yy.c.

{
        if ( ! b )
        return;

    b->yy_n_chars = 0;

    /* We always need two end-of-buffer characters.  The first causes
     * a transition to the end-of-buffer state.  The second causes
     * a jam in that state.
     */
    b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
    b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;

    b->yy_buf_pos = &b->yy_ch_buf[0];

    b->yy_at_bol = 1;
    b->yy_buffer_status = YY_BUFFER_NEW;

    if ( b == YY_CURRENT_BUFFER )
        ppy__load_buffer_state( );
}

Referenced by ppy__init_buffer().

ppy__init_buffer()

static void ppy__init_buffer ( YY_BUFFER_STATE  b, FILE *  file  )

static

Definition at line 3257 of file ppl.yy.c.

{
    int oerrno = errno;
    
    ppy__flush_buffer(b );

    b->yy_input_file = file;
    b->yy_fill_buffer = 1;

    /* If b is the current buffer, then ppy__init_buffer was _probably_
     * called from ppy_restart() or through yy_get_next_buffer.
     * In that case, we don't want to reset the lineno or column.
     */
    if (b != YY_CURRENT_BUFFER){
        b->yy_bs_lineno = 1;
        b->yy_bs_column = 0;
    }

        b->yy_is_interactive = 0;
    
    errno = oerrno;
}

Referenced by ppy__create_buffer(), and ppy_restart().

ppy__load_buffer_state()

static void ppy__load_buffer_state ( void  )

static

Definition at line 3196 of file ppl.yy.c.

{
        (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
    (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
    ppy_in = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
    (yy_hold_char) = *(yy_c_buf_p);
}

Referenced by if(), ppy__flush_buffer(), ppy__switch_to_buffer(), ppy_pop_buffer_state(), ppy_push_buffer_state(), and ppy_restart().

ppy__scan_buffer()

YY_BUFFER_STATE ppy__scan_buffer	(	char *	base,
		yy_size_t	size
	)

Setup the input buffer state to scan directly from a user-specified character buffer.

Parameters

base	the character buffer
size	the size in bytes of the character buffer

Returns

the newly allocated buffer state object.

Definition at line 3412 of file ppl.yy.c.

{
    YY_BUFFER_STATE b;
    
    if ( size < 2 ||
         base[size-2] != YY_END_OF_BUFFER_CHAR ||
         base[size-1] != YY_END_OF_BUFFER_CHAR )
        /* They forgot to leave room for the EOB's. */
        return 0;

    b = (YY_BUFFER_STATE) ppy_alloc(sizeof( struct yy_buffer_state )  );
    if ( ! b )
        YY_FATAL_ERROR( "out of dynamic memory in ppy__scan_buffer()" );

    b->yy_buf_size = size - 2;  /* "- 2" to take care of EOB's */
    b->yy_buf_pos = b->yy_ch_buf = base;
    b->yy_is_our_buffer = 0;
    b->yy_input_file = 0;
    b->yy_n_chars = b->yy_buf_size;
    b->yy_is_interactive = 0;
    b->yy_at_bol = 1;
    b->yy_fill_buffer = 0;
    b->yy_buffer_status = YY_BUFFER_NEW;

    ppy__switch_to_buffer(b  );

    return b;
}

Referenced by ppy__scan_bytes().

ppy__scan_bytes()

YY_BUFFER_STATE ppy__scan_bytes	(	yyconst char *	yybytes,
		int	_yybytes_len
	)

Setup the input buffer state to scan the given bytes. The next call to ppy_lex() will scan from a copy of bytes.

Parameters

yybytes	the byte buffer to scan
_yybytes_len	the number of bytes in the buffer pointed to by bytes.

Returns

the newly allocated buffer state object.

Definition at line 3462 of file ppl.yy.c.

{
    YY_BUFFER_STATE b;
    char *buf;
    yy_size_t n;
    int i;
    
    /* Get memory for full buffer, including space for trailing EOB's. */
    n = _yybytes_len + 2;
    buf = (char *) ppy_alloc(n  );
    if ( ! buf )
        YY_FATAL_ERROR( "out of dynamic memory in ppy__scan_bytes()" );

    for ( i = 0; i < _yybytes_len; ++i )
        buf[i] = yybytes[i];

    buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;

    b = ppy__scan_buffer(buf,n );
    if ( ! b )
        YY_FATAL_ERROR( "bad buffer in ppy__scan_bytes()" );

    /* It's okay to grow etc. this buffer, and we should throw it
     * away when we're done.
     */
    b->yy_is_our_buffer = 1;

    return b;
}

Referenced by ppy__scan_string().

ppy__scan_string()

YY_BUFFER_STATE ppy__scan_string

(

yyconst char *

yystr

)

Setup the input buffer state to scan a string. The next call to ppy_lex() will scan from a copy of str.

Parameters

yystr

a NUL-terminated string to scan

Returns

the newly allocated buffer state object.

Note

If you want to scan bytes that may contain NUL values, then use ppy__scan_bytes() instead.

Definition at line 3449 of file ppl.yy.c.

{
    
    return ppy__scan_bytes(yystr,strlen(yystr) );
}

Referenced by expand_define(), expand_macro(), expand_special(), and macro_add_arg().

ppy__switch_to_buffer()

void ppy__switch_to_buffer

(

YY_BUFFER_STATE

new_buffer

)

Switch to a different input buffer.

Parameters

new_buffer

The new input buffer.

Definition at line 3165 of file ppl.yy.c.

{
    
    /* TODO. We should be able to replace this entire function body
     * with
     *      ppy_pop_buffer_state();
     *      ppy_push_buffer_state(new_buffer);
     */
    ppy_ensure_buffer_stack ();
    if ( YY_CURRENT_BUFFER == new_buffer )
        return;

    if ( YY_CURRENT_BUFFER )
        {
        /* Flush out information for old buffer. */
        *(yy_c_buf_p) = (yy_hold_char);
        YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
        YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
        }

    YY_CURRENT_BUFFER_LVALUE = new_buffer;
    ppy__load_buffer_state( );

    /* We don't actually know whether we did this switch during
     * EOF (ppy_wrap()) processing, but the only time this flag
     * is looked at is after ppy_wrap() is called, so it's safe
     * to go ahead and always set it.
     */
    (yy_did_buffer_switch_on_eof) = 1;
}

Referenced by pop_buffer(), pp_do_include(), and ppy__scan_buffer().

ppy_alloc()

void * ppy_alloc

(

yy_size_t

size

)

Definition at line 3718 of file ppl.yy.c.

{
    return (void *) malloc( size );
}

Referenced by ppy__create_buffer(), ppy__scan_buffer(), ppy__scan_bytes(), ppy_ensure_buffer_stack(), and yy_push_state().

ppy_ensure_buffer_stack()

static void ppy_ensure_buffer_stack ( void  )

static

Definition at line 3363 of file ppl.yy.c.

{
    int num_to_alloc;
    
    if (!(yy_buffer_stack)) {

        /* First allocation is just for 2 elements, since we don't know if this
         * scanner will even need a stack. We use 2 instead of 1 to avoid an
         * immediate realloc on the next call.
         */
        num_to_alloc = 1;
        (yy_buffer_stack) = (struct yy_buffer_state**)ppy_alloc
                                (num_to_alloc * sizeof(struct yy_buffer_state*)
                                );
        if ( ! (yy_buffer_stack) )
            YY_FATAL_ERROR( "out of dynamic memory in ppy_ensure_buffer_stack()" );
                                  
        memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
                
        (yy_buffer_stack_max) = num_to_alloc;
        (yy_buffer_stack_top) = 0;
        return;
    }

    if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){

        /* Increase the buffer to prepare for a possible push. */
        int grow_size = 8 /* arbitrary grow size */;

        num_to_alloc = (yy_buffer_stack_max) + grow_size;
        (yy_buffer_stack) = (struct yy_buffer_state**)ppy_realloc
                                ((yy_buffer_stack),
                                num_to_alloc * sizeof(struct yy_buffer_state*)
                                );
        if ( ! (yy_buffer_stack) )
            YY_FATAL_ERROR( "out of dynamic memory in ppy_ensure_buffer_stack()" );

        /* zero only the new slots.*/
        memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
        (yy_buffer_stack_max) = num_to_alloc;
    }
}

Referenced by if(), ppy__switch_to_buffer(), ppy_push_buffer_state(), and ppy_restart().

ppy_free()

void ppy_free

(

void *

ptr

)

Definition at line 3735 of file ppl.yy.c.

{
    free( (char *) ptr );   /* see ppy_realloc() for (char *) cast */
}

Referenced by ppy__delete_buffer(), and ppy_lex_destroy().

ppy_get_debug()

int ppy_get_debug

(

void

)

Definition at line 3626 of file ppl.yy.c.

{
        return ppy__flex_debug;
}

ppy_get_extra()

YY_EXTRA_TYPE ppy_get_extra

(

void

)

ppy_get_in()

FILE * ppy_get_in

(

void

)

Get the input stream.

Definition at line 3570 of file ppl.yy.c.

{
        return ppy_in;
}

ppy_get_leng()

int ppy_get_leng

(

void

)

Get the length of the current token.

Definition at line 3586 of file ppl.yy.c.

{
        return ppy_leng;
}

ppy_get_lineno()

int ppy_get_lineno

(

void

)

Get the current line number.

Definition at line 3561 of file ppl.yy.c.

{
        
    return ppy_lineno;
}

ppy_get_out()

FILE * ppy_get_out

(

void

)

Get the output stream.

Definition at line 3578 of file ppl.yy.c.

{
        return ppy_out;
}

ppy_get_text()

char * ppy_get_text

(

void

)

Get the current token.

Definition at line 3595 of file ppl.yy.c.

{
        return ppy_text;
}

ppy_lex()

int ppy_lex

(

void

)

ppy_lex_destroy()

int ppy_lex_destroy

(

void

)

Definition at line 3669 of file ppl.yy.c.

{
    
    /* Pop the buffer stack, destroying each element. */
    while(YY_CURRENT_BUFFER){
        ppy__delete_buffer(YY_CURRENT_BUFFER  );
        YY_CURRENT_BUFFER_LVALUE = NULL;
        ppy_pop_buffer_state();
    }

    /* Destroy the stack itself. */
    ppy_free((yy_buffer_stack) );
    (yy_buffer_stack) = NULL;

    /* Destroy the start condition stack. */
        ppy_free((yy_start_stack)  );
        (yy_start_stack) = NULL;

    /* Reset the globals. This is important in a non-reentrant scanner so the next time
     * ppy_lex() is called, initialization will occur. */
    yy_init_globals( );

    return 0;
}

ppy_pop_buffer_state()

void ppy_pop_buffer_state

(

void

)

Removes and deletes the top of the stack, if present. The next element becomes the new top.

Definition at line 3344 of file ppl.yy.c.

{
        if (!YY_CURRENT_BUFFER)
        return;

    ppy__delete_buffer(YY_CURRENT_BUFFER );
    YY_CURRENT_BUFFER_LVALUE = NULL;
    if ((yy_buffer_stack_top) > 0)
        --(yy_buffer_stack_top);

    if (YY_CURRENT_BUFFER) {
        ppy__load_buffer_state( );
        (yy_did_buffer_switch_on_eof) = 1;
    }
}

Referenced by ppy_lex_destroy().

ppy_push_buffer_state()

void ppy_push_buffer_state

(

YY_BUFFER_STATE

new_buffer

)

Pushes the new state onto the stack. The new state becomes the current state. This function will allocate the stack if necessary.

Parameters

new_buffer

The new state.

Definition at line 3314 of file ppl.yy.c.

{
        if (new_buffer == NULL)
        return;

    ppy_ensure_buffer_stack();

    /* This block is copied from ppy__switch_to_buffer. */
    if ( YY_CURRENT_BUFFER )
        {
        /* Flush out information for old buffer. */
        *(yy_c_buf_p) = (yy_hold_char);
        YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
        YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
        }

    /* Only push if top exists. Otherwise, replace top. */
    if (YY_CURRENT_BUFFER)
        (yy_buffer_stack_top)++;
    YY_CURRENT_BUFFER_LVALUE = new_buffer;

    /* copied from ppy__switch_to_buffer. */
    ppy__load_buffer_state( );
    (yy_did_buffer_switch_on_eof) = 1;
}

ppy_realloc()

void * ppy_realloc	(	void *	ptr,
		yy_size_t	size
	)

Definition at line 3723 of file ppl.yy.c.

{
    /* The cast to (char *) in the following accommodates both
     * implementations that use char* generic pointers, and those
     * that use void* generic pointers.  It works with the latter
     * because both ANSI C and C++ allow castless assignment from
     * any pointer type to void*, and deal with argument conversions
     * as though doing an assignment.
     */
    return (void *) realloc( (char *) ptr, size );
}

Referenced by ppy_ensure_buffer_stack(), yy_get_next_buffer(), and yy_push_state().

ppy_restart()

void ppy_restart

(

FILE *

input_file

)

Immediately switch to a different input stream.

Parameters

input_file

A readable stream.

Note

This function does not reset the start condition to INITIAL .

Definition at line 3148 of file ppl.yy.c.

{
    
    if ( ! YY_CURRENT_BUFFER ){
        ppy_ensure_buffer_stack ();
        YY_CURRENT_BUFFER_LVALUE =
            ppy__create_buffer(ppy_in,YY_BUF_SIZE );
    }

    ppy__init_buffer(YY_CURRENT_BUFFER,input_file );
    ppy__load_buffer_state( );
}

Referenced by yy_get_next_buffer().

ppy_set_debug()

void ppy_set_debug

(

int

debug_flag

)

Definition at line 3631 of file ppl.yy.c.

{
        ppy__flex_debug = bdebug ;
}

ppy_set_extra()

void ppy_set_extra

(

YY_EXTRA_TYPE

user_defined

)

ppy_set_in()

void ppy_set_in

(

FILE *

in_str

)

Set the input stream. This does not discard the current input buffer.

Parameters

in_str

A readable stream.

See also

ppy__switch_to_buffer

Definition at line 3616 of file ppl.yy.c.

{
        ppy_in = in_str ;
}

ppy_set_lineno()

void ppy_set_lineno

(

int

line_number

)

Set the current line number.

Parameters

line_number

Definition at line 3604 of file ppl.yy.c.

{
    
    ppy_lineno = line_number;
}

ppy_set_out()

void ppy_set_out

(

FILE *

out_str

)

Definition at line 3621 of file ppl.yy.c.

{
        ppy_out = out_str ;
}

ppy_wrap()

int ppy_wrap

(

void

)

Definition at line 3752 of file ppl.yy.c.

{
    return 1;
}

Referenced by while().

push_buffer()

static void push_buffer ( pp_entry_t *  ppp, char *  filename, char *  incname, int  pop  )

static

Definition at line 4246 of file ppl.yy.c.

{
    if(ppy_debug)
        printf("push_buffer(%d): %p %p %p %d\n", bufferstackidx, ppp, filename, incname, pop);
    if(bufferstackidx >= MAXBUFFERSTACK)
        pp_internal_error(__FILE__, __LINE__, "Buffer stack overflow");

    memset(&bufferstack[bufferstackidx], 0, sizeof(bufferstack[0]));
    bufferstack[bufferstackidx].bufferstate = YY_CURRENT_BUFFER;
    bufferstack[bufferstackidx].filehandle  = pp_status.file;
    bufferstack[bufferstackidx].define  = ppp;
    bufferstack[bufferstackidx].line_number = pp_status.line_number;
    bufferstack[bufferstackidx].char_number = pp_status.char_number;
    bufferstack[bufferstackidx].if_depth    = pp_get_if_depth();
    bufferstack[bufferstackidx].should_pop  = pop;
    bufferstack[bufferstackidx].filename    = pp_status.input;
    bufferstack[bufferstackidx].ncontinuations  = ncontinuations;
    bufferstack[bufferstackidx].incl        = pp_incl_state;
    bufferstack[bufferstackidx].include_filename    = incname;

    if(ppp)
        ppp->expanding = 1;
    else if(filename)
    {
        /* These will track the ppy_error to the correct file and line */
        pp_status.line_number = 1;
        pp_status.char_number = 1;
        pp_status.input  = filename;
        ncontinuations = 0;
    }
    else if(!pop)
        pp_internal_error(__FILE__, __LINE__, "Pushing buffer without knowing where to go to");
    bufferstackidx++;
}

Referenced by expand_define(), expand_macro(), expand_special(), macro_add_arg(), and pp_do_include().

push_macro()

static void push_macro ( pp_entry_t *  ppp )

static

Definition at line 4373 of file ppl.yy.c.

{
    if(macexpstackidx >= MAXMACEXPSTACK)
    {
        ppy_error("Too many nested macros");
        return;
    }

    macexpstack[macexpstackidx] = pp_xmalloc(sizeof(macexpstack[0][0]));
    if(!macexpstack[macexpstackidx])
        return;
        memset( macexpstack[macexpstackidx], 0, sizeof(macexpstack[0][0]));
    macexpstack[macexpstackidx]->ppp = ppp;
    macexpstackidx++;
}

Referenced by while().

put_buffer()

static void put_buffer ( const char *  s, int  len  )

static

Definition at line 4515 of file ppl.yy.c.

{
    if(top_macro())
        add_text_to_macro(s, len);
    else
        wpp_callbacks->write(s, len);
}

Referenced by newline(), put_string(), and while().

put_string()

static void put_string ( void  )

static

Definition at line 4227 of file ppl.yy.c.

{
    put_buffer(strbuffer, strbuf_idx);
#ifdef DEBUG
    strbuf_idx = 0;
#endif
}

Referenced by while().

string_start()

static int string_start ( void  )

static

Definition at line 4235 of file ppl.yy.c.

{
    return str_startline;
}

Referenced by while().

top_macro()

static macexpstackentry_t * top_macro ( void  )

static

Definition at line 4389 of file ppl.yy.c.

{
    return macexpstackidx > 0 ? macexpstack[macexpstackidx-1] : NULL;
}

Referenced by add_text_to_macro(), macro_add_arg(), macro_add_expansion(), and put_buffer().

while()

while

(

1

)

Definition at line 1662 of file ppl.yy.c.

        {
        yy_cp = (yy_c_buf_p);

        /* Support of ppy_text. */
        *yy_cp = (yy_hold_char);

        /* yy_bp points to the position in yy_ch_buf of the start of
         * the current run.
         */
        yy_bp = yy_cp;

        yy_current_state = (yy_start);
        yy_current_state += YY_AT_BOL();
yy_match:
        do
            {
            register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
            if ( yy_accept[yy_current_state] )
                {
                (yy_last_accepting_state) = yy_current_state;
                (yy_last_accepting_cpos) = yy_cp;
                }
            while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
                {
                yy_current_state = (int) yy_def[yy_current_state];
                if ( yy_current_state >= 416 )
                    yy_c = yy_meta[(unsigned int) yy_c];
                }
            yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
            ++yy_cp;
            }
        while ( yy_current_state != 415 );
        yy_cp = (yy_last_accepting_cpos);
        yy_current_state = (yy_last_accepting_state);

yy_find_action:
        yy_act = yy_accept[yy_current_state];

        YY_DO_BEFORE_ACTION;

do_action:  /* This label is used only to access EOF actions. */

        switch ( yy_act )
    { /* beginning of action switch */
            case 0: /* must back up */
            /* undo the effects of YY_DO_BEFORE_ACTION */
            *yy_cp = (yy_hold_char);
            yy_cp = (yy_last_accepting_cpos);
            yy_current_state = (yy_last_accepting_state);
            goto yy_find_action;

case 1:
YY_RULE_SETUP
#line 379 "ppl.l"
pp_incl_state.seen_junk++; yy_push_state(pp_pp);
    YY_BREAK
/*
     * Scan for the preprocessor directives
     */
case 2:
YY_RULE_SETUP
#line 384 "ppl.l"
if(yy_top_state() != pp_ignore) {yy_pp_state(pp_inc); return tINCLUDE;} else {yy_pp_state(pp_eol);}
    YY_BREAK
case 3:
YY_RULE_SETUP
#line 385 "ppl.l"
yy_pp_state(yy_current_state() != pp_ignore ? pp_def : pp_eol);
    YY_BREAK
case 4:
YY_RULE_SETUP
#line 386 "ppl.l"
yy_pp_state(pp_eol);    if(yy_top_state() != pp_ignore) return tERROR;
    YY_BREAK
case 5:
YY_RULE_SETUP
#line 387 "ppl.l"
yy_pp_state(pp_eol);    if(yy_top_state() != pp_ignore) return tWARNING;
    YY_BREAK
case 6:
YY_RULE_SETUP
#line 388 "ppl.l"
yy_pp_state(pp_eol);    if(yy_top_state() != pp_ignore) return tPRAGMA;
    YY_BREAK
case 7:
YY_RULE_SETUP
#line 389 "ppl.l"
yy_pp_state(pp_eol);    if(yy_top_state() != pp_ignore) return tPPIDENT;
    YY_BREAK
case 8:
YY_RULE_SETUP
#line 390 "ppl.l"
if(yy_top_state() != pp_ignore) {yy_pp_state(pp_ifd); return tUNDEF;} else {yy_pp_state(pp_eol);}
    YY_BREAK
case 9:
YY_RULE_SETUP
#line 391 "ppl.l"
yy_pp_state(pp_ifd);    return tIFDEF;
    YY_BREAK
case 10:
YY_RULE_SETUP
#line 392 "ppl.l"
pp_incl_state.seen_junk--; yy_pp_state(pp_ifd); return tIFNDEF;
    YY_BREAK
case 11:
YY_RULE_SETUP
#line 393 "ppl.l"
yy_pp_state(pp_if); return tIF;
    YY_BREAK
case 12:
YY_RULE_SETUP
#line 394 "ppl.l"
yy_pp_state(pp_if); return tELIF;
    YY_BREAK
case 13:
YY_RULE_SETUP
#line 395 "ppl.l"
yy_pp_state(pp_endif);  return tELSE;
    YY_BREAK
case 14:
YY_RULE_SETUP
#line 396 "ppl.l"
yy_pp_state(pp_endif);  return tENDIF;
    YY_BREAK
case 15:
YY_RULE_SETUP
#line 397 "ppl.l"
if(yy_top_state() != pp_ignore) {yy_pp_state(pp_line); return tLINE;} else {yy_pp_state(pp_eol);}
    YY_BREAK
case 16:
YY_RULE_SETUP
#line 398 "ppl.l"
if(yy_top_state() != pp_ignore) {yy_pp_state(pp_line); return tGCCLINE;} else {yy_pp_state(pp_eol);}
    YY_BREAK
case 17:
YY_RULE_SETUP
#line 399 "ppl.l"
ppy_error("Invalid preprocessor token '%s'", ppy_text);
    YY_BREAK
case 18:
/* rule 18 can match eol */
YY_RULE_SETUP
#line 400 "ppl.l"
newline(1); yy_pop_state(); return tNL; /* This could be the null-token */
    YY_BREAK
case 19:
/* rule 19 can match eol */
YY_RULE_SETUP
#line 401 "ppl.l"
newline(0);
    YY_BREAK
case 20:
YY_RULE_SETUP
#line 402 "ppl.l"
ppy_error("Preprocessor junk '%s'", ppy_text);
    YY_BREAK
case 21:
YY_RULE_SETUP
#line 403 "ppl.l"
return *ppy_text;
    YY_BREAK
/*
     * Handle #include and #line
     */
case 22:
YY_RULE_SETUP
#line 408 "ppl.l"
return make_number(10, &ppy_lval, ppy_text, ppy_leng);
    YY_BREAK
case 23:
YY_RULE_SETUP
#line 409 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_iqs);
    YY_BREAK
case 24:
YY_RULE_SETUP
#line 410 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_dqs);
    YY_BREAK
case 25:
YY_RULE_SETUP
#line 411 "ppl.l"
;
    YY_BREAK
case 26:
/* rule 26 can match eol */
YY_RULE_SETUP
#line 412 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 27:
/* rule 27 can match eol */
YY_RULE_SETUP
#line 413 "ppl.l"
newline(0);
    YY_BREAK
case 28:
YY_RULE_SETUP
#line 414 "ppl.l"
ppy_error(yy_current_state() == pp_inc ? "Trailing junk in #include" : "Trailing junk in #line");
    YY_BREAK
/*
     * Ignore all input when a false clause is parsed
     */
case 29:
YY_RULE_SETUP
#line 419 "ppl.l"
;
    YY_BREAK
case 30:
/* rule 30 can match eol */
YY_RULE_SETUP
#line 420 "ppl.l"
newline(1);
    YY_BREAK
case 31:
/* rule 31 can match eol */
YY_RULE_SETUP
#line 421 "ppl.l"
newline(0);
    YY_BREAK
case 32:
YY_RULE_SETUP
#line 422 "ppl.l"
;
    YY_BREAK
/*
     * Handle #if and #elif.
     * These require conditionals to be evaluated, but we do not
     * want to jam the scanner normally when we see these tokens.
     * Note: tIDENT is handled below.
     */
case 33:
YY_RULE_SETUP
#line 431 "ppl.l"
return make_number(8, &ppy_lval, ppy_text, ppy_leng);
    YY_BREAK
case 34:
YY_RULE_SETUP
#line 432 "ppl.l"
ppy_error("Invalid octal digit");
    YY_BREAK
case 35:
YY_RULE_SETUP
#line 433 "ppl.l"
return make_number(10, &ppy_lval, ppy_text, ppy_leng);
    YY_BREAK
case 36:
YY_RULE_SETUP
#line 434 "ppl.l"
return make_number(16, &ppy_lval, ppy_text, ppy_leng);
    YY_BREAK
case 37:
YY_RULE_SETUP
#line 435 "ppl.l"
ppy_error("Invalid hex number");
    YY_BREAK
case 38:
YY_RULE_SETUP
#line 436 "ppl.l"
yy_push_state(pp_defined); return tDEFINED;
    YY_BREAK
case 39:
YY_RULE_SETUP
#line 437 "ppl.l"
return tLSHIFT;
    YY_BREAK
case 40:
YY_RULE_SETUP
#line 438 "ppl.l"
return tRSHIFT;
    YY_BREAK
case 41:
YY_RULE_SETUP
#line 439 "ppl.l"
return tLOGAND;
    YY_BREAK
case 42:
YY_RULE_SETUP
#line 440 "ppl.l"
return tLOGOR;
    YY_BREAK
case 43:
YY_RULE_SETUP
#line 441 "ppl.l"
return tEQ;
    YY_BREAK
case 44:
YY_RULE_SETUP
#line 442 "ppl.l"
return tNE;
    YY_BREAK
case 45:
YY_RULE_SETUP
#line 443 "ppl.l"
return tLTE;
    YY_BREAK
case 46:
YY_RULE_SETUP
#line 444 "ppl.l"
return tGTE;
    YY_BREAK
case 47:
/* rule 47 can match eol */
YY_RULE_SETUP
#line 445 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 48:
/* rule 48 can match eol */
YY_RULE_SETUP
#line 446 "ppl.l"
newline(0);
    YY_BREAK
case 49:
YY_RULE_SETUP
#line 447 "ppl.l"
ppy_error("Junk in conditional expression");
    YY_BREAK
case 50:
YY_RULE_SETUP
#line 448 "ppl.l"
;
    YY_BREAK
case 51:
YY_RULE_SETUP
#line 449 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_sqs);
    YY_BREAK
case 52:
YY_RULE_SETUP
#line 450 "ppl.l"
ppy_error("String constants not allowed in conditionals");
    YY_BREAK
case 53:
YY_RULE_SETUP
#line 451 "ppl.l"
return *ppy_text;
    YY_BREAK
/*
     * Handle #ifdef, #ifndef and #undef
     * to get only an untranslated/unexpanded identifier
     */
case 54:
YY_RULE_SETUP
#line 457 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tIDENT;
    YY_BREAK
case 55:
YY_RULE_SETUP
#line 458 "ppl.l"
;
    YY_BREAK
case 56:
/* rule 56 can match eol */
YY_RULE_SETUP
#line 459 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 57:
/* rule 57 can match eol */
YY_RULE_SETUP
#line 460 "ppl.l"
newline(0);
    YY_BREAK
case 58:
YY_RULE_SETUP
#line 461 "ppl.l"
ppy_error("Identifier expected");
    YY_BREAK
/*
     * Handle #else and #endif.
     */
case 59:
YY_RULE_SETUP
#line 466 "ppl.l"
;
    YY_BREAK
case 60:
/* rule 60 can match eol */
YY_RULE_SETUP
#line 467 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 61:
/* rule 61 can match eol */
YY_RULE_SETUP
#line 468 "ppl.l"
newline(0);
    YY_BREAK
case 62:
YY_RULE_SETUP
#line 469 "ppl.l"
ppy_error("Garbage after #else or #endif.");
    YY_BREAK
/*
     * Handle the special 'defined' keyword.
     * This is necessary to get the identifier prior to any
     * substitutions.
     */
case 63:
YY_RULE_SETUP
#line 476 "ppl.l"
yy_pop_state(); ppy_lval.cptr = pp_xstrdup(ppy_text); return tIDENT;
    YY_BREAK
case 64:
YY_RULE_SETUP
#line 477 "ppl.l"
;
    YY_BREAK
case 65:
YY_RULE_SETUP
#line 478 "ppl.l"
return *ppy_text;
    YY_BREAK
case 66:
/* rule 66 can match eol */
YY_RULE_SETUP
#line 479 "ppl.l"
newline(0);
    YY_BREAK
case 67:
/* rule 67 can match eol */
YY_RULE_SETUP
#line 480 "ppl.l"
ppy_error("Identifier expected");
    YY_BREAK
/*
     * Handle #error, #warning, #pragma and #ident.
     * Pass everything literally to the parser, which
     * will act appropriately.
     * Comments are stripped from the literal text.
     */
case 68:
YY_RULE_SETUP
#line 488 "ppl.l"
if(yy_top_state() != pp_ignore) { ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL; }
    YY_BREAK
case 69:
YY_RULE_SETUP
#line 489 "ppl.l"
if(yy_top_state() != pp_ignore) { ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL; }
    YY_BREAK
case 70:
/* rule 70 can match eol */
YY_RULE_SETUP
#line 490 "ppl.l"
if(yy_top_state() != pp_ignore) { ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL; }
    YY_BREAK
case 71:
/* rule 71 can match eol */
YY_RULE_SETUP
#line 491 "ppl.l"
newline(1); yy_pop_state(); if(yy_current_state() != pp_ignore) { return tNL; }
    YY_BREAK
case 72:
/* rule 72 can match eol */
YY_RULE_SETUP
#line 492 "ppl.l"
newline(0);
    YY_BREAK
/*
     * Handle left side of #define
     */
case 73:
YY_RULE_SETUP
#line 497 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); if(ppy_lval.cptr) ppy_lval.cptr[ppy_leng-1] = '\0'; yy_pp_state(pp_macro);  return tMACRO;
    YY_BREAK
case 74:
YY_RULE_SETUP
#line 498 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); yy_pp_state(pp_define); return tDEFINE;
    YY_BREAK
case 75:
YY_RULE_SETUP
#line 499 "ppl.l"
;
    YY_BREAK
case 76:
/* rule 76 can match eol */
YY_RULE_SETUP
#line 500 "ppl.l"
newline(0);
    YY_BREAK
case 77:
/* rule 77 can match eol */
YY_RULE_SETUP
#line 501 "ppl.l"
perror("Identifier expected");
    YY_BREAK
/*
     * Scan the substitution of a define
     */
case 78:
YY_RULE_SETUP
#line 506 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL;
    YY_BREAK
case 79:
/* rule 79 can match eol */
YY_RULE_SETUP
#line 507 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL;
    YY_BREAK
case 80:
/* rule 80 can match eol */
YY_RULE_SETUP
#line 508 "ppl.l"
newline(0); ppy_lval.cptr = pp_xstrdup(" "); return tLITERAL;
    YY_BREAK
case 81:
/* rule 81 can match eol */
YY_RULE_SETUP
#line 509 "ppl.l"
newline(0);
    YY_BREAK
case 82:
/* rule 82 can match eol */
YY_RULE_SETUP
#line 510 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 83:
YY_RULE_SETUP
#line 511 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_sqs);
    YY_BREAK
case 84:
YY_RULE_SETUP
#line 512 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_dqs);
    YY_BREAK
/*
     * Scan the definition macro arguments
     */
case 85:
YY_RULE_SETUP
#line 517 "ppl.l"
yy_pp_state(pp_mbody); return tMACROEND;
    YY_BREAK
case 86:
YY_RULE_SETUP
#line 518 "ppl.l"
;
    YY_BREAK
case 87:
YY_RULE_SETUP
#line 519 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tIDENT;
    YY_BREAK
case 88:
YY_RULE_SETUP
#line 520 "ppl.l"
return ',';
    YY_BREAK
case 89:
YY_RULE_SETUP
#line 521 "ppl.l"
return tELIPSIS;
    YY_BREAK
case 90:
/* rule 90 can match eol */
YY_RULE_SETUP
#line 522 "ppl.l"
ppy_error("Argument identifier expected");
    YY_BREAK
case 91:
/* rule 91 can match eol */
YY_RULE_SETUP
#line 523 "ppl.l"
newline(0);
    YY_BREAK
/*
     * Scan the substitution of a macro
     */
case 92:
YY_RULE_SETUP
#line 528 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL;
    YY_BREAK
case 93:
YY_RULE_SETUP
#line 529 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tIDENT;
    YY_BREAK
case 94:
YY_RULE_SETUP
#line 530 "ppl.l"
return tCONCAT;
    YY_BREAK
case 95:
YY_RULE_SETUP
#line 531 "ppl.l"
return tSTRINGIZE;
    YY_BREAK
case 96:
YY_RULE_SETUP
#line 532 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL;
    YY_BREAK
case 97:
YY_RULE_SETUP
#line 533 "ppl.l"
ppy_lval.cptr = pp_xstrdup(ppy_text); return tLITERAL;
    YY_BREAK
case 98:
/* rule 98 can match eol */
YY_RULE_SETUP
#line 534 "ppl.l"
newline(0); ppy_lval.cptr = pp_xstrdup(" "); return tLITERAL;
    YY_BREAK
case 99:
/* rule 99 can match eol */
YY_RULE_SETUP
#line 535 "ppl.l"
newline(0);
    YY_BREAK
case 100:
/* rule 100 can match eol */
YY_RULE_SETUP
#line 536 "ppl.l"
newline(1); yy_pop_state(); return tNL;
    YY_BREAK
case 101:
YY_RULE_SETUP
#line 537 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_sqs);
    YY_BREAK
case 102:
YY_RULE_SETUP
#line 538 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_dqs);
    YY_BREAK
/*
     * Macro expansion text scanning.
     * This state is active just after the identifier is scanned
     * that triggers an expansion. We *must* delete the leading
     * whitespace before we can start scanning for arguments.
     *
     * If we do not see a '(' as next trailing token, then we have
     * a false alarm. We just continue with a nose-bleed...
     */
case 103:
*yy_cp = (yy_hold_char); /* undo effects of setting up ppy_text */
(yy_c_buf_p) = yy_cp -= 1;
YY_DO_BEFORE_ACTION; /* set up ppy_text again */
YY_RULE_SETUP
#line 549 "ppl.l"
yy_pp_state(pp_macscan);
    YY_BREAK
case 104:
/* rule 104 can match eol */
YY_RULE_SETUP
#line 550 "ppl.l"
{
        if(yy_top_state() != pp_macscan)
            newline(0);
    }
    YY_BREAK
case 105:
/* rule 105 can match eol */
YY_RULE_SETUP
#line 554 "ppl.l"
newline(0);
    YY_BREAK
case 106:
YY_RULE_SETUP
#line 555 "ppl.l"
{
        macexpstackentry_t *mac = pop_macro();
        yy_pop_state();
        put_buffer(mac->ppp->ident, strlen(mac->ppp->ident));
        put_buffer(ppy_text, ppy_leng);
        free_macro(mac);
    }
    YY_BREAK
/*
     * Macro expansion argument text scanning.
     * This state is active when a macro's arguments are being read for expansion.
     */
case 107:
YY_RULE_SETUP
#line 567 "ppl.l"
{
        if(++MACROPARENTHESES() > 1)
            add_text_to_macro(ppy_text, ppy_leng);
    }
    YY_BREAK
case 108:
YY_RULE_SETUP
#line 571 "ppl.l"
{
        if(--MACROPARENTHESES() == 0)
        {
            yy_pop_state();
            macro_add_arg(1);
        }
        else
            add_text_to_macro(ppy_text, ppy_leng);
    }
    YY_BREAK
case 109:
YY_RULE_SETUP
#line 580 "ppl.l"
{
        if(MACROPARENTHESES() > 1)
            add_text_to_macro(ppy_text, ppy_leng);
        else
            macro_add_arg(0);
    }
    YY_BREAK
case 110:
YY_RULE_SETUP
#line 586 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_dqs);
    YY_BREAK
case 111:
YY_RULE_SETUP
#line 587 "ppl.l"
new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_sqs);
    YY_BREAK
case 112:
YY_RULE_SETUP
#line 588 "ppl.l"
yy_push_state(pp_comment); add_text_to_macro(" ", 1);
    YY_BREAK
case 113:
/* rule 113 can match eol */
YY_RULE_SETUP
#line 589 "ppl.l"
pp_status.line_number++; pp_status.char_number = 1; add_text_to_macro(ppy_text, ppy_leng);
    YY_BREAK
case 114:
YY_RULE_SETUP
#line 590 "ppl.l"
add_text_to_macro(ppy_text, ppy_leng);
    YY_BREAK
case 115:
/* rule 115 can match eol */
YY_RULE_SETUP
#line 591 "ppl.l"
newline(0);
    YY_BREAK
/*
     * Comment handling (almost all start-conditions)
     */
case 116:
YY_RULE_SETUP
#line 596 "ppl.l"
yy_push_state(pp_comment);
    YY_BREAK
case 117:
YY_RULE_SETUP
#line 597 "ppl.l"
;
    YY_BREAK
case 118:
/* rule 118 can match eol */
YY_RULE_SETUP
#line 598 "ppl.l"
newline(0);
    YY_BREAK
case 119:
YY_RULE_SETUP
#line 599 "ppl.l"
yy_pop_state();
    YY_BREAK
/*
     * Remove C++ style comment (almost all start-conditions)
     */
case 120:
YY_RULE_SETUP
#line 604 "ppl.l"
{
        if(ppy_text[ppy_leng-1] == '\\')
            ppy_warning("C++ style comment ends with an escaped newline (escape ignored)");
    }
    YY_BREAK
/*
     * Single, double and <> quoted constants
     */
case 121:
YY_RULE_SETUP
#line 612 "ppl.l"
pp_incl_state.seen_junk++; new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_dqs);
    YY_BREAK
case 122:
YY_RULE_SETUP
#line 613 "ppl.l"
pp_incl_state.seen_junk++; new_string(); add_string(ppy_text, ppy_leng); yy_push_state(pp_sqs);
    YY_BREAK
case 123:
YY_RULE_SETUP
#line 614 "ppl.l"
add_string(ppy_text, ppy_leng);
    YY_BREAK
case 124:
YY_RULE_SETUP
#line 615 "ppl.l"
{
        add_string(ppy_text, ppy_leng);
        yy_pop_state();
        switch(yy_current_state())
        {
        case pp_pp:
        case pp_define:
        case pp_mbody:
        case pp_inc:
        case RCINCL:
            if (yy_current_state()==RCINCL) yy_pop_state();
            ppy_lval.cptr = get_string();
            return tDQSTRING;
        case pp_line:
            ppy_lval.cptr = get_string();
            return tDQSTRING;
        default:
            put_string();
        }
    }
    YY_BREAK
case 125:
YY_RULE_SETUP
#line 635 "ppl.l"
add_string(ppy_text, ppy_leng);
    YY_BREAK
case 126:
YY_RULE_SETUP
#line 636 "ppl.l"
{
        add_string(ppy_text, ppy_leng);
        yy_pop_state();
        switch(yy_current_state())
        {
        case pp_if:
        case pp_define:
        case pp_mbody:
            ppy_lval.cptr = get_string();
            return tSQSTRING;
        default:
            put_string();
        }
    }
    YY_BREAK
case 127:
YY_RULE_SETUP
#line 650 "ppl.l"
add_string(ppy_text, ppy_leng);
    YY_BREAK
case 128:
YY_RULE_SETUP
#line 651 "ppl.l"
{
        add_string(ppy_text, ppy_leng);
        yy_pop_state();
        ppy_lval.cptr = get_string();
        return tIQSTRING;
    }
    YY_BREAK
case 129:
/* rule 129 can match eol */
YY_RULE_SETUP
#line 657 "ppl.l"
{
        /*
         * This is tricky; we need to remove the line-continuation
         * from preprocessor strings, but OTOH retain them in all
         * other strings. This is because the resource grammar is
         * even more braindead than initially analysed and line-
         * continuations in strings introduce, sigh, newlines in
         * the output. There goes the concept of non-breaking, non-
         * spacing whitespace.
         */
        switch(yy_top_state())
        {
        case pp_pp:
        case pp_define:
        case pp_mbody:
        case pp_inc:
        case pp_line:
            newline(0);
            break;
        default:
            add_string(ppy_text, ppy_leng);
            newline(-1);
        }
    }
    YY_BREAK
case 130:
YY_RULE_SETUP
#line 681 "ppl.l"
add_string(ppy_text, ppy_leng);
    YY_BREAK
case 131:
/* rule 131 can match eol */
YY_RULE_SETUP
#line 682 "ppl.l"
{
        newline(1);
        add_string(ppy_text, ppy_leng);
        ppy_warning("Newline in string constant encountered (started line %d)", string_start());
    }
    YY_BREAK
/*
     * Identifier scanning
     */
case 132:
YY_RULE_SETUP
#line 691 "ppl.l"
{
        pp_entry_t *ppp;
        pp_incl_state.seen_junk++;
        if(!(ppp = pplookup(ppy_text)))
        {
            if(yy_current_state() == pp_inc)
                ppy_error("Expected include filename");

            else if(yy_current_state() == pp_if)
            {
                ppy_lval.cptr = pp_xstrdup(ppy_text);
                return tIDENT;
            }
            else {
                if((yy_current_state()==INITIAL) && (strcasecmp(ppy_text,"RCINCLUDE")==0)){
                    yy_push_state(RCINCL);
                    return tRCINCLUDE;
                }
                else put_buffer(ppy_text, ppy_leng);
            }
        }
        else if(!ppp->expanding)
        {
            switch(ppp->type)
            {
            case def_special:
                expand_special(ppp);
                break;
            case def_define:
                expand_define(ppp);
                break;
            case def_macro:
                yy_push_state(pp_macign);
                push_macro(ppp);
                break;
            default:
                pp_internal_error(__FILE__, __LINE__, "Invalid define type %d\n", ppp->type);
            }
        }
        else put_buffer(ppy_text, ppy_leng);
    }
    YY_BREAK
/*
     * Everything else that needs to be passed and
     * newline and continuation handling
     */
case 133:
YY_RULE_SETUP
#line 737 "ppl.l"
pp_incl_state.seen_junk++; put_buffer(ppy_text, ppy_leng);
    YY_BREAK
case 134:
YY_RULE_SETUP
#line 738 "ppl.l"
put_buffer(ppy_text, ppy_leng);
    YY_BREAK
case 135:
/* rule 135 can match eol */
YY_RULE_SETUP
#line 739 "ppl.l"
newline(1);
    YY_BREAK
case 136:
/* rule 136 can match eol */
YY_RULE_SETUP
#line 740 "ppl.l"
newline(0);
    YY_BREAK
case 137: