char *yytext;
#line 1 “my6.l”
#line 3 “my6.l”
#include “string.h”
#include “stdio.h”
typedef enum
{
ENDFILE, ERROR,
PROGRAM,PROCEDURE,TYPE,VAR,IF,THEN, ELSE,FI,WHILE,DO,ENDWH,BEGIN1,END1,READ,
WRITE,ARRAY,OF,RECORD,RETURN1,
INTEGER, CHAR1,
ID, INTC, CHARC,
ASSIGN,EQ,LT,PLUS,MINUS,TIMES,OVER,LPAREN,RPAREN,DOT,COLON,SEMI,COMMA,LMIDPAREN,
RMIDPAREN,UNDERANGE
} LexType;
#define MAXRESERVED 21
static struct
{char* str;
LexType tok;
} reservedWords[MAXRESERVED]
={ {“program”,PROGRAM}, {“type”,TYPE}, {“var”,VAR},
{“procedure”,PROCEDURE}, {“begin”,BEGIN1}, {“end”,END1},
{“array”,ARRAY}, {“of”,OF}, {“record”,RECORD}, {“if”,IF}, {“then”,THEN},
{“else”,ELSE}, {“fi”,FI}, {“while”,WHILE}, {“do”,DO}, {“endwh”,ENDWH},
{“read”,READ}, {“write”,WRITE}, {“return”,RETURN1},
{“integer”,INTEGER}, {“char”,CHAR1} };
LexType reservedLookup (char * s);
char yylval[20];
int flag=0;
#line 525 “lex.yy.c”
#define INITIAL 0
#ifndef YY_NO_UNISTD_H
/* Special case for “unistd.h”, since it is non-ANSI. We include it way
* down here because we want the user’s section 1 to have been scanned first.
* The user has a chance to override it with an option.
*/
#include <unistd.h>
#endif
#ifndef YY_EXTRA_TYPE
#define YY_EXTRA_TYPE void *
#endif
static int yy_init_globals (void );
/* Accessor methods to globals.
These are made visible to non-reentrant scanners for convenience. */
int yylex_destroy (void );
int yyget_debug (void );
void yyset_debug (int debug_flag );
YY_EXTRA_TYPE yyget_extra (void );
void yyset_extra (YY_EXTRA_TYPE user_defined );
FILE *yyget_in (void );
void yyset_in (FILE * in_str );
FILE *yyget_out (void );
void yyset_out (FILE * out_str );
yy_size_t yyget_leng (void );
char *yyget_text (void );
int yyget_lineno (void );
void yyset_lineno (int line_number );
/* Macros after this point can all be overridden by user definitions in
* section 1.
*/
#ifndef YY_SKIP_YYWRAP
#ifdef __cplusplus
extern “C” int yywrap (void );
#else
extern int yywrap (void );
#endif
#endif
static void yyunput (int c,char \*buf_ptr );
#ifndef yytext_ptr
static void yy_flex_strncpy (char *,yyconst char *,int );
#endif
#ifdef YY_NEED_STRLEN
static int yy_flex_strlen (yyconst char * );
#endif
#ifndef YY_NO_INPUT
#ifdef __cplusplus
static int yyinput (void );
#else
static int input (void );
#endif
#endif
/* Amount of stuff to slurp up with each read. */
#ifndef YY_READ_BUF_SIZE
#define YY_READ_BUF_SIZE 8192
#endif
/* Copy whatever the last rule matched to the standard output. */
#ifndef ECHO
/* This used to be an fputs(), but since the string might contain NUL’s,
* we now use fwrite().
*/
#define ECHO do { if (fwrite( yytext, yyleng, 1, yyout )) {} } while (0)
#endif
/* Gets input and stuffs it into “buf”. number of characters read, or YY_NULL,
* is returned in “result”.
*/
#ifndef YY_INPUT
#define YY_INPUT(buf,result,max_size)
if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive )
{
int c = ‘*’;
size_t n;
for ( n = 0; n < max_size &&
(c = getc( yyin )) != EOF && c != ‘\n’; ++n )
buf[n] = (char) c;
if ( c == ‘\n’ )
buf[n++] = (char) c;
if ( c == EOF && ferror( yyin ) )
YY_FATAL_ERROR( “input in flex scanner failed” );
result = n;
}
else
{
errno=0;
while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin))
{
if( errno != EINTR)
{
YY_FATAL_ERROR( “input in flex scanner failed” );
break;
}
errno=0;
clearerr(yyin);
}
}
\
#endif
/* No semi-colon after return; correct usage is to write “yyterminate();” -
* we don’t want an extra ‘;’ after the “return” because that will cause
* some compilers to complain about unreachable statements.
*/
#ifndef yyterminate
#define yyterminate() return YY_NULL
#endif
/* Number of entries by which start-condition stack grows. */
#ifndef YY_START_STACK_INCR
#define YY_START_STACK_INCR 25
#endif
/* Report a fatal error. */
#ifndef YY_FATAL_ERROR
#define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
#endif
/* end tables serialization structures and prototypes */
/* Default declaration of generated scanner - a define so the user can
* easily add parameters.
*/
#ifndef YY_DECL
#define YY_DECL_IS_OURS 1
extern int yylex (void);
#define YY_DECL int yylex (void)
#endif /* !YY_DECL */
/* Code executed at the beginning of each rule, after yytext and yyleng
* have been set up.
*/
#ifndef YY_USER_ACTION
#define YY_USER_ACTION
#endif
/* Code executed at the end of each rule. */
#ifndef YY_BREAK
#define YY_BREAK break;
#endif
#define YY_RULE_SETUP
YY_USER_ACTION
/** The main scanner function which does all the work.
*/
YY_DECL
{
register yy_state_type yy_current_state;
register char *yy_cp, *yy_bp;
register int yy_act;
#line 35 “my6.l”
#line 709 “lex.yy.c”
if ( !(yy_init) )
{
(yy_init) = 1;
#ifdef YY_USER_INIT
YY_USER_INIT;
#endif
if ( ! (yy_start) )
(yy_start) = 1; /\* first start state \*/
if ( ! yyin )
yyin = stdin;
if ( ! yyout )
yyout = stdout;
if ( ! YY_CURRENT_BUFFER ) {
yyensure\_buffer\_stack ();
YY_CURRENT_BUFFER_LVALUE =
yy\_create\_buffer(yyin,YY_BUF_SIZE );
}
yy\_load\_buffer\_state( );
}
while ( 1 ) /\* loops until end-of-file is reached \*/
{
yy_cp = (yy_c_buf_p);
/\* Support of yytext. \*/
\*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_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 >= 36 )
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_base[yy_current_state] != 41 );
yy_find_action:
yy_act = yy_accept[yy_current_state];
if ( yy_act == 0 )
{ /* have to back up */
yy_cp = (yy_last_accepting_cpos);
yy_current_state = (yy_last_accepting_state);
yy_act = yy_accept[yy_current_state];
}
YY_DO_BEFORE_ACTION;
if ( yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act] )
{
yy_size_t yyl;
for ( yyl = 0; yyl < yyleng; ++yyl )
if ( yytext[yyl] == '\n' )
yylineno++;
;
}
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 36 “my6.l”
if (flag == 0) {yylval[0] = ‘\0’;strcpy(yylval,yytext);return INTC;}
YY_BREAK
case 2:
YY_RULE_SETUP
#line 38 “my6.l”
if (flag == 0) {yylval[0] = ‘\0’;strcpy(yylval,yytext);return (reservedLookup(yytext));}
YY_BREAK
case 3:
YY_RULE_SETUP
#line 40 “my6.l”
if (flag == 0) {yylval[0] = ‘\0’;strcpy(yylval,yytext);return CHARC;}
YY_BREAK
case 4:
YY_RULE_SETUP
#line 41 “my6.l”
if (flag == 0) return PLUS;
YY_BREAK
case 5:
YY_RULE_SETUP
#line 42 “my6.l”
if (flag == 0) return MINUS;
YY_BREAK
case 6:
YY_RULE_SETUP
#line 43 “my6.l”
if (flag == 0) return TIMES;
YY_BREAK
case 7:
YY_RULE_SETUP
#line 44 “my6.l”
if (flag == 0) return OVER;
YY_BREAK
case 8:
YY_RULE_SETUP
#line 45 “my6.l”
if (flag == 0) return LPAREN;
YY_BREAK
case 9:
YY_RULE_SETUP
#line 46 “my6.l”
if (flag == 0) return RPAREN;
YY_BREAK
case 10:
YY_RULE_SETUP
#line 47 “my6.l”
if (flag == 0) return DOT;
YY_BREAK
case 11:
YY_RULE_SETUP
#line 48 “my6.l”
if (flag == 0) return LMIDPAREN;
YY_BREAK
case 12:
YY_RULE_SETUP
#line 49 “my6.l”
if (flag == 0) return RMIDPAREN;
YY_BREAK
case 13:
YY_RULE_SETUP
#line 50 “my6.l”
if (flag == 0) return COMMA;
YY_BREAK
case 14:
YY_RULE_SETUP
#line 51 “my6.l”
if (flag == 0) return SEMI;
YY_BREAK
case 15:
YY_RULE_SETUP
#line 52 “my6.l”
if (flag == 0) return COLON;
YY_BREAK
case 16:
YY_RULE_SETUP
#line 53 “my6.l”
if (flag == 0) return LT;
YY_BREAK
case 17:
YY_RULE_SETUP
#line 54 “my6.l”
if (flag == 0) return EQ;
YY_BREAK
case 18:
YY_RULE_SETUP
#line 55 “my6.l”
if (flag == 0) return ASSIGN;
YY_BREAK
case 19:
YY_RULE_SETUP
#line 56 “my6.l”
if (flag == 0) return UNDERANGE;
YY_BREAK
case 20:
YY_RULE_SETUP
#line 57 “my6.l”
if (flag == 0) return ENDFILE;
YY_BREAK
case 21:
YY_RULE_SETUP
#line 58 “my6.l”
flag = 1;
YY_BREAK
case 22:
YY_RULE_SETUP
#line 59 “my6.l”
flag = 0;
YY_BREAK
case 23:
/* rule 23 can match eol */
YY_RULE_SETUP
#line 60 “my6.l”
;
YY_BREAK
case 24:
YY_RULE_SETUP
#line 61 “my6.l”
if (flag == 0) {yylval[0] = ‘\0’;strcpy(yylval,yytext);return ERROR;}
YY_BREAK
case 25:
YY_RULE_SETUP
#line 62 “my6.l”
ECHO;
YY_BREAK
#line 928 “lex.yy.c”
case YY_STATE_EOF(INITIAL):
yyterminate();
case YY_END_OF_BUFFER:
{
/\* Amount of text matched not including the EOB char. \*/
int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
/\* Undo the effects of YY\_DO\_BEFORE\_ACTION. \*/
\*yy_cp = (yy_hold_char);
YY_RESTORE_YY_MORE_OFFSET
if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
{
/\* We're scanning a new file or input source. It's
* possible that this happened because the user
* just pointed yyin at a new source and called
* yylex(). If so, then we have to assure
* consistency between YY_CURRENT_BUFFER and our
* globals. Here is the right place to do so, because
* this is the first action (other than possibly a
* back-up) that will match for the new input source.
*/
(yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin;
YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
}
/\* Note that here we test for yy\_c\_buf\_p "<=" to the position
* of the first EOB in the buffer, since yy_c_buf_p will
* already have been incremented past the NUL character
* (since all states make transitions on EOB to the
* end-of-buffer state). Contrast this with the test
* in input().
*/
if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
{ /* This was really a NUL. */
yy_state_type yy_next_state;
(yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
yy_current_state = yy\_get\_previous\_state( );
/\* Okay, we're now positioned to make the NUL
* transition. We couldn’t have
* yy_get_previous_state() go ahead and do it
* for us because it doesn’t know how to deal
* with the possibility of jamming (and we don’t
* want to build jamming into it because then it
* will run more slowly).
*/
yy_next_state = yy\_try\_NUL\_trans( yy_current_state );
yy_bp = (yytext_ptr) + YY_MORE_ADJ;
if ( yy_next_state )
{
/\* Consume the NUL. \*/
yy_cp = ++(yy_c_buf_p);
yy_current_state = yy_next_state;
goto yy_match;
}
else
{
yy_cp = (yy_c_buf_p);
goto yy_find_action;
}
}
else switch ( yy\_get\_next\_buffer( ) )
{
case EOB_ACT_END_OF_FILE:
{
(yy_did_buffer_switch_on_eof) = 0;
if ( yywrap( ) )
{
/\* Note: because we've taken care in
* yy_get_next_buffer() to have set up
* yytext, we can now set up
* yy_c_buf_p so that if some total
* hoser (like flex itself) wants to
* call the scanner after we return the
* YY_NULL, it’ll still work - another
* YY_NULL will get returned.
*/
(yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
yy_act = YY\_STATE\_EOF(YY_START);
goto do_action;
}
else
{
if ( ! (yy_did_buffer_switch_on_eof) )
YY_NEW_FILE;
}
break;
}
case EOB_ACT_CONTINUE_SCAN:
(yy_c_buf_p) =
(yytext_ptr) + yy_amount_of_matched_text;
yy_current_state = yy\_get\_previous\_state( );
yy_cp = (yy_c_buf_p);
yy_bp = (yytext_ptr) + YY_MORE_ADJ;
goto yy_match;
case EOB_ACT_LAST_MATCH:
(yy_c_buf_p) =
&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
yy_current_state = yy\_get\_previous\_state( );
yy_cp = (yy_c_buf_p);
yy_bp = (yytext_ptr) + YY_MORE_ADJ;
goto yy_find_action;
}
break;
}
default:
YY\_FATAL\_ERROR(
"fatal flex scanner internal error--no action found" );
} /\* end of action switch \*/
} /\* end of scanning one token \*/
} /* end of yylex */
/* yy_get_next_buffer - try to read in a new buffer
*
* Returns a code representing an action:
* EOB_ACT_LAST_MATCH -
* EOB_ACT_CONTINUE_SCAN - continue scanning from current position
* EOB_ACT_END_OF_FILE - end of file
*/
static int yy_get_next_buffer (void)
{
register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
register char *source = (yytext_ptr);
register int number_to_move, i;
int ret_val;
if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] )
YY\_FATAL\_ERROR(
"fatal flex scanner internal error--end of buffer missed" );
if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
{ /\* Don't try to fill the buffer, so this is an EOF. \*/
if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 )
{
/\* We matched a single character, the EOB, so
* treat this as a final EOF.
*/
return EOB_ACT_END_OF_FILE;
}
else
{
/\* We matched some text prior to the EOB, first
* process it.
*/
return EOB_ACT_LAST_MATCH;
}
}
/\* Try to read more data. \*/
/\* First move last chars to start of buffer. \*/
number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1;
for ( i = 0; i < number_to_move; ++i )
\*(dest++) = \*(source++);
if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
/\* don't do the read, it's not guaranteed to return an EOF,
* just force an EOF
*/
YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0;
else
{
yy_size_t num_to_read =
YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
while ( num_to_read <= 0 )
{ /\* Not enough room in the buffer - grow it. \*/
/\* just a shorter name for the current buffer \*/
YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE;
int yy_c_buf_p_offset =
(int) ((yy_c_buf_p) - b->yy_ch_buf);
if ( b->yy_is_our_buffer )
{
yy_size_t new_size = b->yy_buf_size \* 2;
if ( new_size <= 0 )
b->yy_buf_size += b->yy_buf_size / 8;
else
b->yy_buf_size \*= 2;
b->yy_ch_buf = (char \*)
/\* Include room in for 2 EOB chars. \*/
yyrealloc((void \*) b->yy_ch_buf,b->yy_buf_size + 2 );
}
else
/\* Can't grow it, we don't own it. \*/
b->yy_ch_buf = 0;
if ( ! b->yy_ch_buf )
YY\_FATAL\_ERROR(
"fatal error - scanner input buffer overflow" );
(yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset];
num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
number_to_move - 1;
}
if ( num_to_read > YY_READ_BUF_SIZE )
num_to_read = YY_READ_BUF_SIZE;
/\* Read in more data. \*/
YY\_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
(yy_n_chars), num_to_read );
YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
}
if ( (yy_n_chars) == 0 )
{
if ( number_to_move == YY_MORE_ADJ )
{
ret_val = EOB_ACT_END_OF_FILE;
yyrestart(yyin );
}
else
{
ret_val = EOB_ACT_LAST_MATCH;
YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
YY_BUFFER_EOF_PENDING;
}
}
else
ret_val = EOB_ACT_CONTINUE_SCAN;
if ((yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
/\* Extend the array by 50%, plus the number we really need. \*/
yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1);
YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char \*) yyrealloc((void \*) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size );
if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
YY\_FATAL\_ERROR( "out of dynamic memory in yy\_get\_next\_buffer()" );
}
(yy_n_chars) += number_to_move;
YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
(yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
return ret_val;
}
/* yy_get_previous_state - get the state just before the EOB char was reached */
static yy_state_type yy\_get\_previous\_state (void)
{
register yy_state_type yy_current_state;
register char *yy_cp;
yy_current_state = (yy_start);
for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp )
{
register YY_CHAR yy_c = (\*yy_cp ? yy_ec[YY\_SC\_TO\_UI(\*yy_cp)] : 1);
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 >= 36 )
yy_c = yy_meta[(unsigned int) yy_c];
}
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
}
return yy_current_state;
}
/* yy_try_NUL_trans - try to make a transition on the NUL character
*
* synopsis
* next_state = yy_try_NUL_trans( current_state );
*/
static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state )
{
register int yy_is_jam;
register char *yy_cp = (yy_c_buf_p);
register YY_CHAR yy_c = 1;
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 >= 36 )
yy_c = yy_meta[(unsigned int) yy_c];
}
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
yy_is_jam = (yy_current_state == 35);
return yy_is_jam ? 0 : yy_current_state;
}
static void yyunput (int c, register char \* yy_bp )
{
register char *yy_cp;
yy_cp = (yy_c_buf_p);
/\* undo effects of setting up yytext \*/
\*yy_cp = (yy_hold_char);
if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
{ /\* need to shift things up to make room \*/
/\* +2 for EOB chars. \*/
register yy_size_t number_to_move = (yy_n_chars) + 2;
register char \*dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[
YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2];
register char \*source =
&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move];
while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
\*--dest = \*--source;
yy_cp += (int) (dest - source);
yy_bp += (int) (dest - source);
YY_CURRENT_BUFFER_LVALUE->yy_n_chars =
(yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size;
if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
YY\_FATAL\_ERROR( "flex scanner push-back overflow" );
}
\*--yy_cp = (char) c;
if ( c == '\n' ){
--yylineno;
}
(yytext_ptr) = yy_bp;
(yy_hold_char) = \*yy_cp;
(yy_c_buf_p) = yy_cp;
}
#ifndef YY_NO_INPUT
#ifdef __cplusplus
static int yyinput (void)
#else
static int input (void)
#endif
{
int c;
\*(yy_c_buf_p) = (yy_hold_char);
if ( \*(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR )
{
/\* yy\_c\_buf\_p now points to the character we want to return.
* If this occurs *before* the EOB characters, then it’s a
* valid NUL; if not, then we’ve hit the end of the buffer.
*/
if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
/* This was really a NUL. */
*(yy_c_buf_p) = ‘\0’;
else
{ /\* need more input \*/
yy_size_t offset = (yy_c_buf_p) - (yytext_ptr);
++(yy_c_buf_p);
switch ( yy\_get\_next\_buffer( ) )
{
case EOB_ACT_LAST_MATCH:
/\* This happens because yy\_g\_n\_b()
* sees that we’ve accumulated a
* token and flags that we need to
* try matching the token before
* proceeding. But for input(),
* there’s no matching to consider.
* So convert the EOB_ACT_LAST_MATCH
* to EOB_ACT_END_OF_FILE.
*/
/\* Reset buffer status. \*/
yyrestart(yyin );
/\*FALLTHROUGH\*/
case EOB_ACT_END_OF_FILE:
{
if ( yywrap( ) )
return EOF;
if ( ! (yy_did_buffer_switch_on_eof) )
YY_NEW_FILE;
#ifdef __cplusplus
return yyinput();
#else
return input();
#endif
}
case EOB_ACT_CONTINUE_SCAN:
(yy_c_buf_p) = (yytext_ptr) + offset;
break;
}
}
}
c = \*(unsigned char \*) (yy_c_buf_p); /\* cast for 8-bit char's \*/
\*(yy_c_buf_p) = '\0'; /\* preserve yytext \*/
(yy_hold_char) = \*++(yy_c_buf_p);
if ( c == '\n' )
yylineno++;
;
return c;
}
#endif /* ifndef YY_NO_INPUT */
/** Immediately switch to a different input stream.
* @param input_file A readable stream.
*
* @note This function does not reset the start condition to @c INITIAL .
*/
void yyrestart (FILE * input_file )
{
if ( ! YY_CURRENT_BUFFER ){
yyensure\_buffer\_stack ();
YY_CURRENT_BUFFER_LVALUE =
yy\_create\_buffer(yyin,YY_BUF_SIZE );
}
yy\_init\_buffer(YY_CURRENT_BUFFER,input_file );
yy\_load\_buffer\_state( );
}
/** Switch to a different input buffer.
* @param new_buffer The new input buffer.
*
*/
void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer )
{
/\* TODO. We should be able to replace this entire function body
* with
* yypop_buffer_state();
* yypush_buffer_state(new_buffer);
*/
yyensure_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;
yy\_load\_buffer\_state( );
/\* We don't actually know whether we did this switch during
* EOF (yywrap()) processing, but the only time this flag
* is looked at is after yywrap() is called, so it’s safe
* to go ahead and always set it.
*/
(yy_did_buffer_switch_on_eof) = 1;
}
static void yy_load_buffer_state (void)
{
(yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
(yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
(yy_hold_char) = *(yy_c_buf_p);
}
/** Allocate and initialize an input buffer state.
* @param file A readable stream.
* @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
*
* @return the allocated buffer state.
*/
YY_BUFFER_STATE yy_create_buffer (FILE * file, int size )
{
YY_BUFFER_STATE b;
b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy\_buffer\_state ) );
if ( ! b )
YY\_FATAL\_ERROR( "out of dynamic memory in yy\_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 *) yyalloc(b->yy_buf_size + 2 );
if ( ! b->yy_ch_buf )
YY_FATAL_ERROR( “out of dynamic memory in yy_create_buffer()” );
b->yy_is_our_buffer = 1;
yy\_init\_buffer(b,file );
return b;
}
/** Destroy the buffer.
* @param b a buffer created with yy_create_buffer()
*
*/
void yy_delete_buffer (YY_BUFFER_STATE b )
{
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 )
yyfree((void \*) b->yy_ch_buf );
yyfree((void \*) b );
}
/* Initializes or reinitializes a buffer.
* This function is sometimes called more than once on the same buffer,
* such as during a yyrestart() or at EOF.
*/
static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file )
{
int oerrno = errno;
yy\_flush\_buffer(b );
b->yy_input_file = file;
b->yy_fill_buffer = 1;
/\* If b is the current buffer, then yy\_init\_buffer was \_probably\_
* called from yyrestart() 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 = file ? (isatty( fileno(file) ) > 0) : 0;
errno = oerrno;
}
/** Discard all buffered characters. On the next scan, YY_INPUT will be called.
* @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
*
*/
void yy_flush_buffer (YY_BUFFER_STATE b )
{
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 )
yy\_load\_buffer\_state( );
}
/** Pushes the new state onto the stack. The new state becomes
* the current state. This function will allocate the stack
* if necessary.
* @param new_buffer The new state.
*
*/
void yypush_buffer_state (YY_BUFFER_STATE new_buffer )
{
if (new_buffer == NULL)
return;
yyensure\_buffer\_stack();
/\* This block is copied from yy\_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 yy\_switch\_to\_buffer. \*/
yy\_load\_buffer\_state( );
(yy_did_buffer_switch_on_eof) = 1;
}
/** Removes and deletes the top of the stack, if present.
* The next element becomes the new top.
*
*/
void yypop_buffer_state (void)
{
if (!YY_CURRENT_BUFFER)
return;
yy\_delete\_buffer(YY_CURRENT_BUFFER );
YY_CURRENT_BUFFER_LVALUE = NULL;
if ((yy_buffer_stack_top) > 0)
--(yy_buffer_stack_top);
if (YY_CURRENT_BUFFER) {
yy\_load\_buffer\_state( );
(yy_did_buffer_switch_on_eof) = 1;
}
}
/* Allocates the stack if it does not exist.
* Guarantees space for at least one push.
*/
static void yyensure_buffer_stack (void)
{
yy_size_t 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**)yyalloc
(num_to_alloc * sizeof(struct yy_buffer_state*)
);
if ( ! (yy_buffer_stack) )
YY_FATAL_ERROR( “out of dynamic memory in yyensure_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\*\*)yyrealloc
((yy_buffer_stack),
num_to_alloc \* sizeof(struct yy\_buffer\_state\*)
);
if ( ! (yy_buffer_stack) )
YY\_FATAL\_ERROR( "out of dynamic memory in yyensure\_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;
}
}
/** Setup the input buffer state to scan directly from a user-specified character buffer.
* @param base the character buffer
* @param size the size in bytes of the character buffer
*
* @return the newly allocated buffer state object.
*/
YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size )
{
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) yyalloc(sizeof( struct yy\_buffer\_state ) );
if ( ! b )
YY\_FATAL\_ERROR( "out of dynamic memory in yy\_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;
yy\_switch\_to\_buffer(b );
return b;
}
/** Setup the input buffer state to scan a string. The next call to yylex() will
* scan from a @e copy of @a str.
* @param yystr a NUL-terminated string to scan
*
* @return the newly allocated buffer state object.
* @note If you want to scan bytes that may contain NUL values, then use
* yy_scan_bytes() instead.
*/
YY_BUFFER_STATE yy_scan_string (yyconst char * yystr )
{
return yy\_scan\_bytes(yystr,strlen(yystr) );
}
/** Setup the input buffer state to scan the given bytes. The next call to yylex() will
* scan from a @e copy of @a bytes.
* @param yybytes the byte buffer to scan
* @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
*
* @return the newly allocated buffer state object.
*/
YY_BUFFER_STATE yy_scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len )
{
YY_BUFFER_STATE b;
char *buf;
yy_size_t n;
yy_size_t i;
/\* Get memory for full buffer, including space for trailing EOB's. \*/
n = _yybytes_len + 2;
buf = (char \*) yyalloc(n );
if ( ! buf )
YY\_FATAL\_ERROR( "out of dynamic memory in yy\_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 = yy\_scan\_buffer(buf,n );
if ( ! b )
YY\_FATAL\_ERROR( "bad buffer in yy\_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;
}
#ifndef YY_EXIT_FAILURE
#define YY_EXIT_FAILURE 2
#endif
static void yy_fatal_error (yyconst char* msg )
{
(void) fprintf( stderr, “%s\n”, msg );
exit( YY_EXIT_FAILURE );
}
/* Redefine yyless() so it works in section 3 code. */
#undef yyless
#define yyless(n)
do
{
/* Undo effects of setting up yytext. */
int yyless_macro_arg = (n);
YY_LESS_LINENO(yyless_macro_arg);
yytext[yyleng] = (yy_hold_char);
(yy_c_buf_p) = yytext + yyless_macro_arg;
(yy_hold_char) = *(yy_c_buf_p);
*(yy_c_buf_p) = ‘\0’;
yyleng = yyless_macro_arg;
}
while ( 0 )
/* Accessor methods (get/set functions) to struct members. */
/** Get the current line number.
*
*/
int yyget_lineno (void)
{
return yylineno;
}
/** Get the input stream.
*
最后的话
最近很多小伙伴找我要Linux学习资料,于是我翻箱倒柜,整理了一些优质资源,涵盖视频、电子书、PPT等共享给大家!
资料预览
给大家整理的视频资料:
给大家整理的电子书资料:
如果本文对你有帮助,欢迎点赞、收藏、转发给朋友,让我有持续创作的动力!
网上学习资料一大堆,但如果学到的知识不成体系,遇到问题时只是浅尝辄止,不再深入研究,那么很难做到真正的技术提升。
一个人可以走的很快,但一群人才能走的更远!不论你是正从事IT行业的老鸟或是对IT行业感兴趣的新人,都欢迎加入我们的的圈子(技术交流、学习资源、职场吐槽、大厂内推、面试辅导),让我们一起学习成长!
static void yy_fatal_error (yyconst char* msg )
{
(void) fprintf( stderr, “%s\n”, msg );
exit( YY_EXIT_FAILURE );
}
/* Redefine yyless() so it works in section 3 code. */
#undef yyless
#define yyless(n)
do
{
/* Undo effects of setting up yytext. */
int yyless_macro_arg = (n);
YY_LESS_LINENO(yyless_macro_arg);
yytext[yyleng] = (yy_hold_char);
(yy_c_buf_p) = yytext + yyless_macro_arg;
(yy_hold_char) = *(yy_c_buf_p);
*(yy_c_buf_p) = ‘\0’;
yyleng = yyless_macro_arg;
}
while ( 0 )
/* Accessor methods (get/set functions) to struct members. */
/** Get the current line number.
*
*/
int yyget_lineno (void)
{
return yylineno;
}
/** Get the input stream.
*
最后的话
最近很多小伙伴找我要Linux学习资料,于是我翻箱倒柜,整理了一些优质资源,涵盖视频、电子书、PPT等共享给大家!
资料预览
给大家整理的视频资料:
[外链图片转存中…(img-1UE6tMmQ-1714335590443)]
给大家整理的电子书资料:
[外链图片转存中…(img-zygUDkMn-1714335590444)]
如果本文对你有帮助,欢迎点赞、收藏、转发给朋友,让我有持续创作的动力!
网上学习资料一大堆,但如果学到的知识不成体系,遇到问题时只是浅尝辄止,不再深入研究,那么很难做到真正的技术提升。
一个人可以走的很快,但一群人才能走的更远!不论你是正从事IT行业的老鸟或是对IT行业感兴趣的新人,都欢迎加入我们的的圈子(技术交流、学习资源、职场吐槽、大厂内推、面试辅导),让我们一起学习成长!