📄 language.c
字号:
#define yy_create_buffer watt_create_buffer
#define yy_delete_buffer watt_delete_buffer
#define yy_scan_buffer watt_scan_buffer
#define yy_scan_string watt_scan_string
#define yy_scan_bytes watt_scan_bytes
#define yy_flex_debug watt_flex_debug
#define yy_init_buffer watt_init_buffer
#define yy_flush_buffer watt_flush_buffer
#define yy_load_buffer_state watt_load_buffer_state
#define yy_switch_to_buffer watt_switch_to_buffer
#define yyin wattin
#define yyleng wattleng
#define yylex wattlex
#define yyout wattout
#define yyrestart wattrestart
#define yytext watttext
#define yywrap wattwrap
#line 20 "language.c"
/* A lexical scanner generated by flex */
/* Scanner skeleton version:
* $Header: /home/daffy/u0/vern/flex/RCS/flex.skl,v 2.91 96/09/10 16:58:48 vern Exp $
*/
#define FLEX_SCANNER
#define YY_FLEX_MAJOR_VERSION 2
#define YY_FLEX_MINOR_VERSION 5
#include <stdio.h>
/* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */
#ifdef c_plusplus
#ifndef __cplusplus
#define __cplusplus
#endif
#endif
#ifdef __cplusplus
#include <stdlib.h>
#include <unistd.h>
/* Use prototypes in function declarations. */
#define YY_USE_PROTOS
/* The "const" storage-class-modifier is valid. */
#define YY_USE_CONST
#else /* ! __cplusplus */
#if __STDC__
#define YY_USE_PROTOS
#define YY_USE_CONST
#endif /* __STDC__ */
#endif /* ! __cplusplus */
#ifdef __TURBOC__
#pragma warn -rch
#pragma warn -use
#include <io.h>
#include <stdlib.h>
#define YY_USE_CONST
#define YY_USE_PROTOS
#endif
#ifdef YY_USE_CONST
#define yyconst const
#else
#define yyconst
#endif
#ifdef YY_USE_PROTOS
#define YY_PROTO(proto) proto
#else
#define YY_PROTO(proto) ()
#endif
/* Returned upon end-of-file. */
#define YY_NULL 0
/* Promotes a possibly negative, possibly signed char to an unsigned
* integer for use as an array index. If the signed char is negative,
* we want to instead treat it as an 8-bit unsigned char, hence the
* double cast.
*/
#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
/* Enter a start condition. This macro really ought to take a parameter,
* but we do it the disgusting crufty way forced on us by the ()-less
* definition of BEGIN.
*/
#define BEGIN yy_start = 1 + 2 *
/* Translate the current start state into a value that can be later handed
* to BEGIN to return to the state. The YYSTATE alias is for lex
* compatibility.
*/
#define YY_START ((yy_start - 1) / 2)
#define YYSTATE YY_START
/* Action number for EOF rule of a given start state. */
#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
/* Special action meaning "start processing a new file". */
#define YY_NEW_FILE yyrestart( yyin )
#define YY_END_OF_BUFFER_CHAR 0
/* Size of default input buffer. */
#define YY_BUF_SIZE 16384
typedef struct yy_buffer_state *YY_BUFFER_STATE;
extern int yyleng;
extern FILE *yyin, *yyout;
#define EOB_ACT_CONTINUE_SCAN 0
#define EOB_ACT_END_OF_FILE 1
#define EOB_ACT_LAST_MATCH 2
/* The funky do-while in the following #define is used to turn the definition
* int a single C statement (which needs a semi-colon terminator). This
* avoids problems with code like:
*
* if ( condition_holds )
* yyless( 5 );
* else
* do_something_else();
*
* Prior to using the do-while the compiler would get upset at the
* "else" because it interpreted the "if" statement as being all
* done when it reached the ';' after the yyless() call.
*/
/* Return all but the first 'n' matched characters back to the input stream. */
#define yyless(n) \
do \
{ \
/* Undo effects of setting up yytext. */ \
*yy_cp = yy_hold_char; \
YY_RESTORE_YY_MORE_OFFSET \
yy_c_buf_p = yy_cp = yy_bp + n - YY_MORE_ADJ; \
YY_DO_BEFORE_ACTION; /* set up yytext again */ \
} \
while ( 0 )
#define unput(c) yyunput( c, yytext_ptr )
/* The following is because we cannot portably get our hands on size_t
* (without autoconf's help, which isn't available because we want
* flex-generated scanners to compile on their own).
*/
typedef unsigned int yy_size_t;
struct yy_buffer_state
{
FILE *yy_input_file;
char *yy_ch_buf; /* input buffer */
char *yy_buf_pos; /* current position in input buffer */
/* Size of input buffer in bytes, not including room for EOB
* characters.
*/
yy_size_t yy_buf_size;
/* Number of characters read into yy_ch_buf, not including EOB
* characters.
*/
int yy_n_chars;
/* Whether we "own" the buffer - i.e., we know we created it,
* and can realloc() it to grow it, and should free() it to
* delete it.
*/
int yy_is_our_buffer;
/* Whether this is an "interactive" input source; if so, and
* if we're using stdio for input, then we want to use getc()
* instead of fread(), to make sure we stop fetching input after
* each newline.
*/
int yy_is_interactive;
/* Whether we're considered to be at the beginning of a line.
* If so, '^' rules will be active on the next match, otherwise
* not.
*/
int yy_at_bol;
/* Whether to try to fill the input buffer when we reach the
* end of it.
*/
int yy_fill_buffer;
int yy_buffer_status;
#define YY_BUFFER_NEW 0
#define YY_BUFFER_NORMAL 1
/* When an EOF's been seen but there's still some text to process
* then we mark the buffer as YY_EOF_PENDING, to indicate that we
* shouldn't try reading from the input source any more. We might
* still have a bunch of tokens to match, though, because of
* possible backing-up.
*
* When we actually see the EOF, we change the status to "new"
* (via yyrestart()), so that the user can continue scanning by
* just pointing yyin at a new input file.
*/
#define YY_BUFFER_EOF_PENDING 2
};
static YY_BUFFER_STATE yy_current_buffer = 0;
/* We provide macros for accessing buffer states in case in the
* future we want to put the buffer states in a more general
* "scanner state".
*/
#define YY_CURRENT_BUFFER yy_current_buffer
/* yy_hold_char holds the character lost when yytext is formed. */
static char yy_hold_char;
static int yy_n_chars; /* number of characters read into yy_ch_buf */
int yyleng;
/* Points to current character in buffer. */
static char *yy_c_buf_p = (char *) 0;
static int yy_init = 1; /* whether we need to initialize */
static int yy_start = 0; /* start state number */
/* Flag which is used to allow yywrap()'s to do buffer switches
* instead of setting up a fresh yyin. A bit of a hack ...
*/
static int yy_did_buffer_switch_on_eof;
void yyrestart YY_PROTO(( FILE *input_file ));
void yy_switch_to_buffer YY_PROTO(( YY_BUFFER_STATE new_buffer ));
void yy_load_buffer_state YY_PROTO(( void ));
YY_BUFFER_STATE yy_create_buffer YY_PROTO(( FILE *file, int size ));
void yy_delete_buffer YY_PROTO(( YY_BUFFER_STATE b ));
void yy_init_buffer YY_PROTO(( YY_BUFFER_STATE b, FILE *file ));
void yy_flush_buffer YY_PROTO(( YY_BUFFER_STATE b ));
#define YY_FLUSH_BUFFER yy_flush_buffer( yy_current_buffer )
YY_BUFFER_STATE yy_scan_buffer YY_PROTO(( char *base, yy_size_t size ));
YY_BUFFER_STATE yy_scan_string YY_PROTO(( yyconst char *yy_str ));
YY_BUFFER_STATE yy_scan_bytes YY_PROTO(( yyconst char *bytes, int len ));
static void *yy_flex_alloc YY_PROTO(( yy_size_t ));
static void *yy_flex_realloc YY_PROTO(( void *, yy_size_t ));
static void yy_flex_free YY_PROTO(( void * ));
#define yy_new_buffer yy_create_buffer
#define yy_set_interactive(is_interactive) \
{ \
if ( ! yy_current_buffer ) \
yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \
yy_current_buffer->yy_is_interactive = is_interactive; \
}
#define yy_set_bol(at_bol) \
{ \
if ( ! yy_current_buffer ) \
yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \
yy_current_buffer->yy_at_bol = at_bol; \
}
#define YY_AT_BOL() (yy_current_buffer->yy_at_bol)
typedef unsigned char YY_CHAR;
FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0;
typedef int yy_state_type;
extern char *yytext;
#define yytext_ptr yytext
static yy_state_type yy_get_previous_state YY_PROTO(( void ));
static yy_state_type yy_try_NUL_trans YY_PROTO(( yy_state_type current_state ));
static int yy_get_next_buffer YY_PROTO(( void ));
static void yy_fatal_error YY_PROTO(( yyconst char msg[] ));
/* Done after the current pattern has been matched and before the
* corresponding action - sets up yytext.
*/
#define YY_DO_BEFORE_ACTION \
yytext_ptr = yy_bp; \
yyleng = (int) (yy_cp - yy_bp); \
yy_hold_char = *yy_cp; \
*yy_cp = '\0'; \
yy_c_buf_p = yy_cp;
#define YY_NUM_RULES 29
#define YY_END_OF_BUFFER 30
static yyconst short int yy_accept[67] =
{ 0,
0, 0, 0, 0, 0, 0, 0, 0, 30, 5,
1, 3, 5, 4, 5, 21, 20, 21, 6, 21,
24, 23, 24, 24, 28, 27, 28, 28, 28, 28,
28, 1, 3, 0, 2, 0, 20, 19, 15, 18,
18, 14, 7, 8, 11, 10, 13, 12, 9, 19,
23, 22, 27, 0, 26, 0, 0, 17, 18, 16,
25, 17, 18, 16, 17, 0
} ;
static yyconst int yy_ec[256] =
{ 0,
1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
1, 1, 4, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 2, 1, 5, 6, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 7, 8, 8,
8, 8, 8, 8, 8, 9, 9, 10, 6, 1,
1, 1, 1, 1, 11, 11, 11, 11, 11, 11,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 12, 1, 1, 1, 1, 13, 14, 11, 15,
16, 17, 1, 1, 1, 1, 1, 1, 1, 18,
19, 1, 1, 20, 21, 22, 1, 23, 1, 24,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1
} ;
static yyconst int yy_meta[25] =
{ 0,
1, 1, 1, 1, 1, 1, 2, 2, 2, 1,
2, 1, 2, 2, 2, 2, 2, 1, 1, 1,
1, 1, 1, 1
} ;
static yyconst short int yy_base[75] =
{ 0,
0, 5, 9, 19, 13, 15, 29, 48, 112, 113,
70, 113, 65, 113, 25, 113, 113, 64, 113, 69,
113, 113, 62, 52, 113, 113, 59, 33, 45, 34,
11, 28, 113, 35, 113, 37, 113, 113, 113, 48,
51, 113, 113, 113, 113, 113, 113, 113, 113, 0,
113, 113, 113, 39, 113, 42, 16, 87, 90, 0,
113, 41, 113, 113, 113, 113, 99, 101, 103, 105,
107, 109, 18, 13
} ;
static yyconst short int yy_def[75] =
{ 0,
67, 67, 68, 68, 69, 69, 70, 70, 66, 66,
66, 66, 66, 66, 71, 66, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66, 72, 66, 66,
66, 66, 66, 71, 66, 71, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66, 66, 66, 73,
66, 66, 66, 72, 66, 72, 66, 66, 66, 74,
66, 66, 66, 66, 66, 0, 66, 66, 66, 66,
66, 66, 66, 66
} ;
static yyconst short int yy_nxt[138] =
{ 0,
66, 11, 12, 13, 14, 15, 11, 12, 13, 14,
15, 17, 18, 19, 64, 22, 23, 22, 23, 60,
20, 17, 18, 19, 24, 61, 24, 35, 36, 32,
20, 26, 27, 57, 28, 55, 56, 35, 36, 35,
36, 55, 56, 29, 55, 56, 30, 65, 65, 31,
26, 27, 57, 28, 58, 58, 59, 59, 59, 59,
57, 53, 29, 52, 51, 30, 37, 33, 31, 38,
38, 32, 38, 39, 38, 40, 41, 41, 38, 38,
42, 43, 44, 38, 45, 46, 47, 38, 48, 38,
49, 38, 50, 62, 62, 63, 63, 63, 63, 10,
10, 16, 16, 21, 21, 25, 25, 34, 34, 54,
54, 66, 9, 66, 66, 66, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66
} ;
static yyconst short int yy_chk[138] =
{ 0,
0, 1, 1, 1, 1, 1, 2, 2, 2, 2,
2, 3, 3, 3, 74, 5, 5, 6, 6, 73,
3, 4, 4, 4, 5, 57, 6, 15, 15, 32,
4, 7, 7, 31, 7, 28, 28, 34, 34, 36,
36, 54, 54, 7, 56, 56, 7, 62, 62, 7,
8, 8, 30, 8, 40, 40, 40, 41, 41, 41,
29, 27, 8, 24, 23, 8, 18, 13, 8, 20,
20, 11, 20, 20, 20, 20, 20, 20, 20, 20,
20, 20, 20, 20, 20, 20, 20, 20, 20, 20,
20, 20, 20, 58, 58, 58, 59, 59, 59, 67,
67, 68, 68, 69, 69, 70, 70, 71, 71, 72,
72, 9, 66, 66, 66, 66, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66, 66, 66, 66,
66, 66, 66, 66, 66, 66, 66
} ;
static yy_state_type yy_last_accepting_state;
static char *yy_last_accepting_cpos;
/* The intent behind this definition is that it'll catch
* any uses of REJECT which flex missed.
*/
#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
char *yytext;
#line 1 "language.l"
#define INITIAL 0
#line 2 "language.l"
/*
* lang_scan.l - Foreign language lexical scanner for Waterloo TCP/IP
*
* Gisle Vanem 1997
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <setjmp.h>
#include "wattcp.h"
#include "strings.h"
#include "sock_ini.h"
#include "misc.h"
#include "crc.h"
#if defined(USE_LANGUAGE)
#if defined(TEST_PROG)
#include <conio.h>
#define INCLINE() fprintf (stderr, "<line %lu>\n", lang.line++)
#define DEBUG(s,a) fprintf (stderr, s, a)
#else
#define INCLINE() lang.line++
#define DEBUG(s,a) ((void)0)
#endif
#define BUF_SIZE 500
static int yylex (void);
static void AddChar (int ch);
static void AddDecimal (const char *buf);
static void AddHexcode (const char *buf);
static void AddOctal (const char *buf);
static void AddEntry (void);
static void Abort (const char *s1, const char *s2);
static void error (const char *err);
static char buf [BUF_SIZE];
static char *ptr = NULL;
static char *end = buf+BUF_SIZE;
static int line_cont = 0;
static DWORD crc_ref = 0;
static DWORD do_ref = 1;
static jmp_buf bail_out;
struct Node {
DWORD crc;
char *string;
struct Node *next;
};
struct Elem {
DWORD crc;
char *string;
};
static struct Language {
struct Node *list;
struct Elem *array;
char prefix[4]; /* "en:" */
DWORD entries;
DWORD line;
} lang = {
NULL, NULL, "en",
0L, 0L
};
/*---------------------------------------------------------------------*/
/*
* Remap normal yacc parser interface names (yyparse, yylex, yyerror, etc),
* as well as gratuitiously global symbol names, so we can have multiple
* yacc generated parsers in the same program. Note that these are only
* the variables produced by yacc. If other parser generators (bison,
* byacc, etc) produce additional global names that conflict at link time,
* then those parser generators need to be fixed instead of adding those
* names to this list.
*/
#define STRING 1
#define EO_LINE 2
#define PREFIX 3
/*
* Possible LANG codes are according to ISO 3166
*
* Ref. ftp://ftp.informatik.uni-erlangen.de/pub/doc/ISO/
*
* aa Afar ba Bashkir ca Catalan
* ab Abkhazian be Byelorussian co Corsican
* af Afrikaans bg Bulgarian cs Czech
* am Amharic bh Bihari cy Welsh
* ar Arabic bi Bislama
* as Assamese bn Bengali; Bangla da Danish
* ay Aymara bo Tibetan de German
* az Azerbaijani br Breton dz Bhutani
*
* el Greek fa Persian ga Irish
* en English fi Finnish gd Scots Gaelic
* eo Esperanto fj Fiji gl Galician
* es Spanish fo Faroese gn Guarani
* et Estonian fr French gu Gujarati
* eu Basque fy Frisian
*
* ha Hausa ia Interlingua ja Japanese
* he Hebrew id Indonesian jw Javanese
* hi Hindi ie Interlingue
* hr Croatian ik Inupiak
* hu Hungarian is Icelandic
* hy Armenian it Italian
* iu Inuktitut
* ka Georgian mg Malagasy
* kk Kazakh la Latin mi Maori
* kl Greenlandic ln Lingala mk Macedonian
* km Cambodian lo Laothian ml Malayalam
* kn Kannada lt Lithuanian mn Mongolian
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -