mirror of
https://github.com/nmap/nmap.git
synced 2025-12-06 04:31:29 +00:00
7f5ec526fe
Lua 5.3 adds several awesome features of particular interest to nmap including bitwise operators and integers, a utf8 library, and standard binary pack/unpack functions. In addition to adding Lua 5.3, this branch changes: o Complete removal of the NSE bit library (in C), It has been replaced with a new Lua library wrapping Lua 5.3's bit-wise operators. o Complete removal of the NSE bin library (in C). It has been replaced with a new Lua library wrapping Lua 5.3's string.pack|unpack functions. o The bin.pack "B" format specifier (which has never worked correctly) is unimplemented. All scripts/libraries which use it have been updated. Most usage of this option was to allow string based bit-wise operations which are no longer necessary now that Lua 5.3 provides integers and bit-wise operators. o The base32/base64 libraries have been reimplemented using Lua 5.3's new bitwise operators. (This library was the main user of the bin.pack "B" format specifier.) o A new "bits" library has been added for common bit hacks. Currently only has a reverse function. Thanks to David Fifield, Daniel Miller, Jacek Wielemborek, and Paulino Calderon for testing this branch.
86 lines
2.2 KiB
C
86 lines
2.2 KiB
C
/*
|
|
** $Id: llex.h,v 1.79 2016/05/02 14:02:12 roberto Exp $
|
|
** Lexical Analyzer
|
|
** See Copyright Notice in lua.h
|
|
*/
|
|
|
|
#ifndef llex_h
|
|
#define llex_h
|
|
|
|
#include "lobject.h"
|
|
#include "lzio.h"
|
|
|
|
|
|
#define FIRST_RESERVED 257
|
|
|
|
|
|
#if !defined(LUA_ENV)
|
|
#define LUA_ENV "_ENV"
|
|
#endif
|
|
|
|
|
|
/*
|
|
* WARNING: if you change the order of this enumeration,
|
|
* grep "ORDER RESERVED"
|
|
*/
|
|
enum RESERVED {
|
|
/* terminal symbols denoted by reserved words */
|
|
TK_AND = FIRST_RESERVED, TK_BREAK,
|
|
TK_DO, TK_ELSE, TK_ELSEIF, TK_END, TK_FALSE, TK_FOR, TK_FUNCTION,
|
|
TK_GOTO, TK_IF, TK_IN, TK_LOCAL, TK_NIL, TK_NOT, TK_OR, TK_REPEAT,
|
|
TK_RETURN, TK_THEN, TK_TRUE, TK_UNTIL, TK_WHILE,
|
|
/* other terminal symbols */
|
|
TK_IDIV, TK_CONCAT, TK_DOTS, TK_EQ, TK_GE, TK_LE, TK_NE,
|
|
TK_SHL, TK_SHR,
|
|
TK_DBCOLON, TK_EOS,
|
|
TK_FLT, TK_INT, TK_NAME, TK_STRING
|
|
};
|
|
|
|
/* number of reserved words */
|
|
#define NUM_RESERVED (cast(int, TK_WHILE-FIRST_RESERVED+1))
|
|
|
|
|
|
typedef union {
|
|
lua_Number r;
|
|
lua_Integer i;
|
|
TString *ts;
|
|
} SemInfo; /* semantics information */
|
|
|
|
|
|
typedef struct Token {
|
|
int token;
|
|
SemInfo seminfo;
|
|
} Token;
|
|
|
|
|
|
/* state of the lexer plus state of the parser when shared by all
|
|
functions */
|
|
typedef struct LexState {
|
|
int current; /* current character (charint) */
|
|
int linenumber; /* input line counter */
|
|
int lastline; /* line of last token 'consumed' */
|
|
Token t; /* current token */
|
|
Token lookahead; /* look ahead token */
|
|
struct FuncState *fs; /* current function (parser) */
|
|
struct lua_State *L;
|
|
ZIO *z; /* input stream */
|
|
Mbuffer *buff; /* buffer for tokens */
|
|
Table *h; /* to avoid collection/reuse strings */
|
|
struct Dyndata *dyd; /* dynamic structures used by the parser */
|
|
TString *source; /* current source name */
|
|
TString *envn; /* environment variable name */
|
|
} LexState;
|
|
|
|
|
|
LUAI_FUNC void luaX_init (lua_State *L);
|
|
LUAI_FUNC void luaX_setinput (lua_State *L, LexState *ls, ZIO *z,
|
|
TString *source, int firstchar);
|
|
LUAI_FUNC TString *luaX_newstring (LexState *ls, const char *str, size_t l);
|
|
LUAI_FUNC void luaX_next (LexState *ls);
|
|
LUAI_FUNC int luaX_lookahead (LexState *ls);
|
|
LUAI_FUNC l_noret luaX_syntaxerror (LexState *ls, const char *s);
|
|
LUAI_FUNC const char *luaX_token2str (LexState *ls, int token);
|
|
|
|
|
|
#endif
|