hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan
2006-10-22 11:34:53 +00:00
parent 0a73b2562a
commit 8666a05126
29 changed files with 7983 additions and 7983 deletions
Download Patch File Download Diff File Expand all files Collapse all files

502
ase/awk/awk.h
View File

@@ -1,34 +1,34 @@
/*
* $Id: awk.h,v 1.129 2006-10-16 14:38:43 bacon Exp $
* $Id: awk.h,v 1.130 2006-10-22 11:34:52 bacon Exp $
*/
#ifndef _XP_AWK_AWK_H_
#define _XP_AWK_AWK_H_
#ifndef _SSE_AWK_AWK_H_
#define _SSE_AWK_AWK_H_
#include <xp/types.h>
#include <xp/macros.h>
#include <sse/types.h>
#include <sse/macros.h>
typedef struct xp_awk_t xp_awk_t;
typedef struct xp_awk_run_t xp_awk_run_t;
typedef struct xp_awk_val_t xp_awk_val_t;
typedef struct xp_awk_extio_t xp_awk_extio_t;
typedef struct sse_awk_t sse_awk_t;
typedef struct sse_awk_run_t sse_awk_run_t;
typedef struct sse_awk_val_t sse_awk_val_t;
typedef struct sse_awk_extio_t sse_awk_extio_t;
typedef struct xp_awk_syscas_t xp_awk_syscas_t;
typedef struct xp_awk_srcios_t xp_awk_srcios_t;
typedef struct xp_awk_runios_t xp_awk_runios_t;
typedef struct xp_awk_runcbs_t xp_awk_runcbs_t;
typedef struct xp_awk_runarg_t xp_awk_runarg_t;
typedef struct sse_awk_syscas_t sse_awk_syscas_t;
typedef struct sse_awk_srcios_t sse_awk_srcios_t;
typedef struct sse_awk_runios_t sse_awk_runios_t;
typedef struct sse_awk_runcbs_t sse_awk_runcbs_t;
typedef struct sse_awk_runarg_t sse_awk_runarg_t;
typedef void (*xp_awk_lk_t) (xp_awk_t* awk, void* arg);
typedef xp_ssize_t (*xp_awk_io_t) (
int cmd, void* arg, xp_char_t* data, xp_size_t count);
typedef void (*sse_awk_lk_t) (sse_awk_t* awk, void* arg);
typedef sse_ssize_t (*sse_awk_io_t) (
int cmd, void* arg, sse_char_t* data, sse_size_t count);
struct xp_awk_extio_t
struct sse_awk_extio_t
{
xp_awk_run_t* run; /* [IN] */
sse_awk_run_t* run; /* [IN] */
int type; /* [IN] console, file, coproc, pipe */
int mode; /* [IN] read, write, etc */
xp_char_t* name; /* [IN] */
sse_char_t* name; /* [IN] */
void* custom_data; /* [IN] */
void* handle; /* [OUT] */
@@ -36,150 +36,150 @@ struct xp_awk_extio_t
/* input buffer */
struct
{
xp_char_t buf[2048];
xp_size_t pos;
xp_size_t len;
xp_bool_t eof;
sse_char_t buf[2048];
sse_size_t pos;
sse_size_t len;
sse_bool_t eof;
} in;
xp_awk_extio_t* next;
sse_awk_extio_t* next;
};
struct xp_awk_syscas_t
struct sse_awk_syscas_t
{
/* memory */
void* (*malloc) (xp_size_t n, void* custom_data);
void* (*realloc) (void* ptr, xp_size_t n, void* custom_data);
void* (*malloc) (sse_size_t n, void* custom_data);
void* (*realloc) (void* ptr, sse_size_t n, void* custom_data);
void (*free) (void* ptr, void* custom_data);
/* thread lock */
xp_awk_lk_t lock;
xp_awk_lk_t unlock;
sse_awk_lk_t lock;
sse_awk_lk_t unlock;
/* character class */
xp_bool_t (*is_upper) (xp_cint_t c);
xp_bool_t (*is_lower) (xp_cint_t c);
xp_bool_t (*is_alpha) (xp_cint_t c);
xp_bool_t (*is_digit) (xp_cint_t c);
xp_bool_t (*is_xdigit) (xp_cint_t c);
xp_bool_t (*is_alnum) (xp_cint_t c);
xp_bool_t (*is_space) (xp_cint_t c);
xp_bool_t (*is_print) (xp_cint_t c);
xp_bool_t (*is_graph) (xp_cint_t c);
xp_bool_t (*is_cntrl) (xp_cint_t c);
xp_bool_t (*is_punct) (xp_cint_t c);
xp_cint_t (*to_upper) (xp_cint_t c);
xp_cint_t (*to_lower) (xp_cint_t c);
sse_bool_t (*is_upper) (sse_cint_t c);
sse_bool_t (*is_lower) (sse_cint_t c);
sse_bool_t (*is_alpha) (sse_cint_t c);
sse_bool_t (*is_digit) (sse_cint_t c);
sse_bool_t (*is_xdigit) (sse_cint_t c);
sse_bool_t (*is_alnum) (sse_cint_t c);
sse_bool_t (*is_space) (sse_cint_t c);
sse_bool_t (*is_print) (sse_cint_t c);
sse_bool_t (*is_graph) (sse_cint_t c);
sse_bool_t (*is_cntrl) (sse_cint_t c);
sse_bool_t (*is_punct) (sse_cint_t c);
sse_cint_t (*to_upper) (sse_cint_t c);
sse_cint_t (*to_lower) (sse_cint_t c);
/* utilities */
void* (*memcpy) (void* dst, const void* src, xp_size_t n);
void* (*memset) (void* dst, int val, xp_size_t n);
void* (*memcpy) (void* dst, const void* src, sse_size_t n);
void* (*memset) (void* dst, int val, sse_size_t n);
int (*sprintf) (xp_char_t* buf, xp_size_t size, xp_char_t* fmt, ...);
int (*dprintf) (xp_char_t* fmt, ...);
int (*sprintf) (sse_char_t* buf, sse_size_t size, sse_char_t* fmt, ...);
int (*dprintf) (sse_char_t* fmt, ...);
void (*abort) (void);
void* custom_data;
};
struct xp_awk_srcios_t
struct sse_awk_srcios_t
{
xp_awk_io_t in;
xp_awk_io_t out;
sse_awk_io_t in;
sse_awk_io_t out;
void* custom_data;
};
struct xp_awk_runios_t
struct sse_awk_runios_t
{
xp_awk_io_t pipe;
xp_awk_io_t coproc;
xp_awk_io_t file;
xp_awk_io_t console;
sse_awk_io_t pipe;
sse_awk_io_t coproc;
sse_awk_io_t file;
sse_awk_io_t console;
void* custom_data;
};
struct xp_awk_runcbs_t
struct sse_awk_runcbs_t
{
void (*on_start) (xp_awk_t* awk, void* handle, void* arg);
void (*on_end) (xp_awk_t* awk, void* handle, int errnum, void* arg);
void (*on_start) (sse_awk_t* awk, void* handle, void* arg);
void (*on_end) (sse_awk_t* awk, void* handle, int errnum, void* arg);
void* custom_data;
};
struct xp_awk_runarg_t
struct sse_awk_runarg_t
{
const xp_char_t* ptr;
xp_size_t len;
const sse_char_t* ptr;
sse_size_t len;
};
/* io function commands */
enum
{
XP_AWK_IO_OPEN = 0,
XP_AWK_IO_CLOSE = 1,
XP_AWK_IO_READ = 2,
XP_AWK_IO_WRITE = 3,
XP_AWK_IO_FLUSH = 4,
XP_AWK_IO_NEXT = 5
SSE_AWK_IO_OPEN = 0,
SSE_AWK_IO_CLOSE = 1,
SSE_AWK_IO_READ = 2,
SSE_AWK_IO_WRITE = 3,
SSE_AWK_IO_FLUSH = 4,
SSE_AWK_IO_NEXT = 5
};
enum
{
XP_AWK_IO_PIPE_READ = 0,
XP_AWK_IO_PIPE_WRITE = 1,
SSE_AWK_IO_PIPE_READ = 0,
SSE_AWK_IO_PIPE_WRITE = 1,
XP_AWK_IO_FILE_READ = 0,
XP_AWK_IO_FILE_WRITE = 1,
XP_AWK_IO_FILE_APPEND = 2,
SSE_AWK_IO_FILE_READ = 0,
SSE_AWK_IO_FILE_WRITE = 1,
SSE_AWK_IO_FILE_APPEND = 2,
XP_AWK_IO_CONSOLE_READ = 0,
XP_AWK_IO_CONSOLE_WRITE = 1
SSE_AWK_IO_CONSOLE_READ = 0,
SSE_AWK_IO_CONSOLE_WRITE = 1
};
/* various options */
enum xp_awk_option_t
enum sse_awk_option_t
{
/* allow undeclared variables */
XP_AWK_IMPLICIT = (1 << 0),
SSE_AWK_IMPLICIT = (1 << 0),
/* variable requires explicit declaration */
XP_AWK_EXPLICIT = (1 << 1),
/* variable requires esselicit declaration */
SSE_AWK_ESSELICIT = (1 << 1),
/* a function name should not coincide to be a variable name */
XP_AWK_UNIQUE = (1 << 2),
SSE_AWK_UNIQUE = (1 << 2),
/* allow variable shading */
XP_AWK_SHADING = (1 << 3),
SSE_AWK_SHADING = (1 << 3),
/* support shift operators */
XP_AWK_SHIFT = (1 << 4),
SSE_AWK_SHIFT = (1 << 4),
/* support comments by a hash sign */
XP_AWK_HASHSIGN = (1 << 5),
SSE_AWK_HASHSIGN = (1 << 5),
/* support comments by double slashes */
XP_AWK_DBLSLASHES = (1 << 6),
SSE_AWK_DBLSLASHES = (1 << 6),
/* support string concatenation in tokenization.
* this option can change the behavior of a certain construct.
* getline < "abc" ".def" is treated as if it is getline < "abc.def"
* when this option is on. If this option is off, the same expression
* when this option is on. If this option is off, the same esseression
* is treated as if it is (getline < "abc") ".def". */
XP_AWK_STRCONCAT = (1 << 7),
SSE_AWK_STRCONCAT = (1 << 7),
/* support getline and print */
XP_AWK_EXTIO = (1 << 8),
SSE_AWK_EXTIO = (1 << 8),
/* support blockless patterns */
XP_AWK_BLOCKLESS = (1 << 9),
SSE_AWK_BLOCKLESS = (1 << 9),
/* execution starts from main */
XP_AWK_RUNMAIN = (1 << 10),
SSE_AWK_RUNMAIN = (1 << 10),
/* use 1 as the start index for string operations */
XP_AWK_STRINDEXONE = (1 << 11),
SSE_AWK_STRINDEXONE = (1 << 11),
/* strip off leading and trailing spaces when splitting a record
* into fields with a regular expression.
* into fields with a regular esseression.
*
* Consider the following program.
* BEGIN { FS="[:[:space:]]+"; }
@@ -191,228 +191,228 @@ enum xp_awk_option_t
* The program splits " a b c " into [a], [b], [c] when this
* option is on while into [], [a], [b], [c], [] when it is off.
*/
XP_AWK_STRIPSPACES = (1 << 12),
SSE_AWK_STRIPSPACES = (1 << 12),
/* a newline terminates a statement */
XP_AWK_NEWLINE = (1 << 13)
SSE_AWK_NEWLINE = (1 << 13)
};
/* error code */
enum ant_awk_errnum_t
{
XP_AWK_ENOERR, /* no error */
XP_AWK_ENOMEM, /* out of memory */
XP_AWK_EINVAL, /* invalid parameter */
XP_AWK_ERUNTIME, /* run-time error */
XP_AWK_ERUNNING, /* there are running instances */
XP_AWK_ETOOMANYRUNS, /* too many running instances */
XP_AWK_ERECURSION, /* recursion too deep */
SSE_AWK_ENOERR, /* no error */
SSE_AWK_ENOMEM, /* out of memory */
SSE_AWK_EINVAL, /* invalid parameter */
SSE_AWK_ERUNTIME, /* run-time error */
SSE_AWK_ERUNNING, /* there are running instances */
SSE_AWK_ETOOMANYRUNS, /* too many running instances */
SSE_AWK_ERECURSION, /* recursion too deep */
XP_AWK_ESRCINOPEN,
XP_AWK_ESRCINCLOSE,
XP_AWK_ESRCINREAD,
SSE_AWK_ESRCINOPEN,
SSE_AWK_ESRCINCLOSE,
SSE_AWK_ESRCINREAD,
XP_AWK_ESRCOUTOPEN,
XP_AWK_ESRCOUTCLOSE,
XP_AWK_ESRCOUTWRITE,
SSE_AWK_ESRCOUTOPEN,
SSE_AWK_ESRCOUTCLOSE,
SSE_AWK_ESRCOUTWRITE,
XP_AWK_ECONINOPEN,
XP_AWK_ECONINCLOSE,
XP_AWK_ECONINNEXT,
XP_AWK_ECONINDATA,
SSE_AWK_ECONINOPEN,
SSE_AWK_ECONINCLOSE,
SSE_AWK_ECONINNEXT,
SSE_AWK_ECONINDATA,
XP_AWK_ECONOUTOPEN,
XP_AWK_ECONOUTCLOSE,
XP_AWK_ECONOUTNEXT,
XP_AWK_ECONOUTDATA,
SSE_AWK_ECONOUTOPEN,
SSE_AWK_ECONOUTCLOSE,
SSE_AWK_ECONOUTNEXT,
SSE_AWK_ECONOUTDATA,
XP_AWK_ELXCHR, /* lexer came accross an wrong character */
XP_AWK_ELXUNG, /* lexer failed to unget a character */
SSE_AWK_ELXCHR, /* lexer came accross an wrong character */
SSE_AWK_ELXUNG, /* lexer failed to unget a character */
XP_AWK_EENDSRC, /* unexpected end of source */
XP_AWK_EENDCOMMENT, /* unexpected end of a comment */
XP_AWK_EENDSTR, /* unexpected end of a string */
XP_AWK_EENDREX, /* unexpected end of a regular expression */
XP_AWK_ELBRACE, /* left brace expected */
XP_AWK_ELPAREN, /* left parenthesis expected */
XP_AWK_ERPAREN, /* right parenthesis expected */
XP_AWK_ERBRACK, /* right bracket expected */
XP_AWK_ECOMMA, /* comma expected */
XP_AWK_ESEMICOLON, /* semicolon expected */
XP_AWK_ECOLON, /* colon expected */
XP_AWK_EIN, /* keyword 'in' is expected */
XP_AWK_ENOTVAR, /* not a variable name after 'in' */
XP_AWK_EEXPRESSION, /* expression expected */
SSE_AWK_EENDSRC, /* unesseected end of source */
SSE_AWK_EENDCOMMENT, /* unesseected end of a comment */
SSE_AWK_EENDSTR, /* unesseected end of a string */
SSE_AWK_EENDREX, /* unesseected end of a regular esseression */
SSE_AWK_ELBRACE, /* left brace esseected */
SSE_AWK_ELPAREN, /* left parenthesis esseected */
SSE_AWK_ERPAREN, /* right parenthesis esseected */
SSE_AWK_ERBRACK, /* right bracket esseected */
SSE_AWK_ECOMMA, /* comma esseected */
SSE_AWK_ESEMICOLON, /* semicolon esseected */
SSE_AWK_ECOLON, /* colon esseected */
SSE_AWK_EIN, /* keyword 'in' is esseected */
SSE_AWK_ENOTVAR, /* not a variable name after 'in' */
SSE_AWK_EESSERESSION, /* esseression esseected */
XP_AWK_EWHILE, /* keyword 'while' is expected */
XP_AWK_EASSIGNMENT, /* assignment statement expected */
XP_AWK_EIDENT, /* identifier expected */
XP_AWK_EBEGINBLOCK, /* BEGIN requires an action block */
XP_AWK_EENDBLOCK, /* END requires an action block */
XP_AWK_EDUPBEGIN, /* duplicate BEGIN */
XP_AWK_EDUPEND, /* duplicate END */
XP_AWK_EDUPFUNC, /* duplicate function name */
XP_AWK_EDUPPARAM, /* duplicate parameter name */
XP_AWK_EDUPVAR, /* duplicate variable name */
XP_AWK_EDUPNAME, /* duplicate name - function, variable, etc */
XP_AWK_EUNDEF, /* undefined identifier */
XP_AWK_ELVALUE, /* l-value required */
XP_AWK_ETOOFEWARGS, /* too few arguments */
XP_AWK_ETOOMANYARGS, /* too many arguments */
XP_AWK_ETOOMANYGLOBALS, /* too many global variables */
XP_AWK_ETOOMANYLOCALS, /* too many local variables */
XP_AWK_ETOOMANYPARAMS, /* too many parameters */
XP_AWK_EBREAK, /* break outside a loop */
XP_AWK_ECONTINUE, /* continue outside a loop */
XP_AWK_ENEXT, /* next illegal in BEGIN or END block */
XP_AWK_ENEXTFILE, /* nextfile illegal in BEGIN or END block */
XP_AWK_EGETLINE, /* getline expected */
SSE_AWK_EWHILE, /* keyword 'while' is esseected */
SSE_AWK_EASSIGNMENT, /* assignment statement esseected */
SSE_AWK_EIDENT, /* identifier esseected */
SSE_AWK_EBEGINBLOCK, /* BEGIN requires an action block */
SSE_AWK_EENDBLOCK, /* END requires an action block */
SSE_AWK_EDUPBEGIN, /* duplicate BEGIN */
SSE_AWK_EDUPEND, /* duplicate END */
SSE_AWK_EDUPFUNC, /* duplicate function name */
SSE_AWK_EDUPPARAM, /* duplicate parameter name */
SSE_AWK_EDUPVAR, /* duplicate variable name */
SSE_AWK_EDUPNAME, /* duplicate name - function, variable, etc */
SSE_AWK_EUNDEF, /* undefined identifier */
SSE_AWK_ELVALUE, /* l-value required */
SSE_AWK_ETOOFEWARGS, /* too few arguments */
SSE_AWK_ETOOMANYARGS, /* too many arguments */
SSE_AWK_ETOOMANYGLOBALS, /* too many global variables */
SSE_AWK_ETOOMANYLOCALS, /* too many local variables */
SSE_AWK_ETOOMANYPARAMS, /* too many parameters */
SSE_AWK_EBREAK, /* break outside a loop */
SSE_AWK_ECONTINUE, /* continue outside a loop */
SSE_AWK_ENEXT, /* next illegal in BEGIN or END block */
SSE_AWK_ENEXTFILE, /* nextfile illegal in BEGIN or END block */
SSE_AWK_EGETLINE, /* getline esseected */
/* run time error */
XP_AWK_EDIVBYZERO, /* divide by zero */
XP_AWK_EOPERAND, /* invalid operand */
XP_AWK_EPOSIDX, /* wrong position index */
XP_AWK_ENOSUCHFUNC, /* no such function */
XP_AWK_ENOTASSIGNABLE, /* value not assignable */
XP_AWK_ENOTINDEXABLE, /* not indexable variable */
XP_AWK_ENOTDELETABLE, /* not deletable variable */
XP_AWK_ENOTREFERENCEABLE, /* not referenceable value */
XP_AWK_EIDXVALASSMAP, /* indexed value cannot be assigned a map */
XP_AWK_EPOSVALASSMAP, /* a positional cannot be assigned a map */
XP_AWK_EMAPTOSCALAR, /* cannot change a map to a scalar value */
XP_AWK_ESCALARTOMAP, /* cannot change a scalar value to a map */
XP_AWK_EMAPNOTALLOWED, /* a map is not allowed */
XP_AWK_EVALTYPE, /* wrong value type */
XP_AWK_EPIPE, /* pipe operation error */
XP_AWK_ENEXTCALL, /* next called from BEGIN or END */
XP_AWK_ENEXTFILECALL, /* nextfile called from BEGIN or END */
XP_AWK_EIOIMPL, /* wrong implementation of user io handler */
XP_AWK_ENOSUCHIO, /* no such io name found */
XP_AWK_EIOHANDLER, /* io handler has returned an error */
XP_AWK_EINTERNAL, /* internal error */
SSE_AWK_EDIVBYZERO, /* divide by zero */
SSE_AWK_EOPERAND, /* invalid operand */
SSE_AWK_EPOSIDX, /* wrong position index */
SSE_AWK_ENOSUCHFUNC, /* no such function */
SSE_AWK_ENOTASSIGNABLE, /* value not assignable */
SSE_AWK_ENOTINDEXABLE, /* not indexable variable */
SSE_AWK_ENOTDELETABLE, /* not deletable variable */
SSE_AWK_ENOTREFERENCEABLE, /* not referenceable value */
SSE_AWK_EIDXVALASSMAP, /* indexed value cannot be assigned a map */
SSE_AWK_EPOSVALASSMAP, /* a positional cannot be assigned a map */
SSE_AWK_EMAPTOSCALAR, /* cannot change a map to a scalar value */
SSE_AWK_ESCALARTOMAP, /* cannot change a scalar value to a map */
SSE_AWK_EMAPNOTALLOWED, /* a map is not allowed */
SSE_AWK_EVALTYPE, /* wrong value type */
SSE_AWK_EPIPE, /* pipe operation error */
SSE_AWK_ENEXTCALL, /* next called from BEGIN or END */
SSE_AWK_ENEXTFILECALL, /* nextfile called from BEGIN or END */
SSE_AWK_EIOIMPL, /* wrong implementation of user io handler */
SSE_AWK_ENOSUCHIO, /* no such io name found */
SSE_AWK_EIOHANDLER, /* io handler has returned an error */
SSE_AWK_EINTERNAL, /* internal error */
/* regular expression error */
XP_AWK_EREXRPAREN, /* a right parenthesis is expected */
XP_AWK_EREXRBRACKET, /* a right bracket is expected */
XP_AWK_EREXRBRACE, /* a right brace is expected */
XP_AWK_EREXCOLON, /* a colon is expected */
XP_AWK_EREXCRANGE, /* invalid character range */
XP_AWK_EREXCCLASS, /* invalid character class */
XP_AWK_EREXBRANGE, /* invalid boundary range */
XP_AWK_EREXEND, /* unexpected end of the pattern */
XP_AWK_EREXGARBAGE /* garbage after the pattern */
/* regular esseression error */
SSE_AWK_EREXRPAREN, /* a right parenthesis is esseected */
SSE_AWK_EREXRBRACKET, /* a right bracket is esseected */
SSE_AWK_EREXRBRACE, /* a right brace is esseected */
SSE_AWK_EREXCOLON, /* a colon is esseected */
SSE_AWK_EREXCRANGE, /* invalid character range */
SSE_AWK_EREXCCLASS, /* invalid character class */
SSE_AWK_EREXBRANGE, /* invalid boundary range */
SSE_AWK_EREXEND, /* unesseected end of the pattern */
SSE_AWK_EREXGARBAGE /* garbage after the pattern */
};
/* extio types */
enum
{
/* extio types available */
XP_AWK_EXTIO_PIPE,
XP_AWK_EXTIO_COPROC,
XP_AWK_EXTIO_FILE,
XP_AWK_EXTIO_CONSOLE,
SSE_AWK_EXTIO_PIPE,
SSE_AWK_EXTIO_COPROC,
SSE_AWK_EXTIO_FILE,
SSE_AWK_EXTIO_CONSOLE,
/* reserved for internal use only */
XP_AWK_EXTIO_NUM
SSE_AWK_EXTIO_NUM
};
#ifdef __cplusplus
extern "C" {
#endif
xp_awk_t* xp_awk_open (xp_awk_syscas_t* syscas);
int xp_awk_close (xp_awk_t* awk);
int xp_awk_clear (xp_awk_t* awk);
sse_awk_t* sse_awk_open (sse_awk_syscas_t* syscas);
int sse_awk_close (sse_awk_t* awk);
int sse_awk_clear (sse_awk_t* awk);
int xp_awk_geterrnum (xp_awk_t* awk);
xp_size_t xp_awk_getsrcline (xp_awk_t* awk);
int sse_awk_geterrnum (sse_awk_t* awk);
sse_size_t sse_awk_getsrcline (sse_awk_t* awk);
int xp_awk_getopt (xp_awk_t* awk);
void xp_awk_setopt (xp_awk_t* awk, int opt);
int sse_awk_getopt (sse_awk_t* awk);
void sse_awk_setopt (sse_awk_t* awk, int opt);
int xp_awk_parse (xp_awk_t* awk, xp_awk_srcios_t* srcios);
int sse_awk_parse (sse_awk_t* awk, sse_awk_srcios_t* srcios);
/*
* xp_awk_run return 0 on success and -1 on failure, generally speaking.
* sse_awk_run return 0 on success and -1 on failure, generally speaking.
* A runtime context is required for it to start running the program.
* Once the runtime context is created, the program starts to run.
* The context creation failure is reported by the return value -1 of
* this function. however, the runtime error after the context creation
* is reported differently depending on the use of the callback.
* When no callback is specified (i.e. runcbs is XP_NULL), xp_awk_run
* When no callback is specified (i.e. runcbs is SSE_NULL), sse_awk_run
* returns -1 on an error and awk->errnum is set accordingly.
* However, if a callback is specified (i.e. runcbs is not XP_NULL),
* xp_awk_run returns 0 on both success and failure. Instead, the
* However, if a callback is specified (i.e. runcbs is not SSE_NULL),
* sse_awk_run returns 0 on both success and failure. Instead, the
* on_end handler of the callback is triggered with the relevant
* error number. The third parameter to on_end denotes this error number.
*/
int xp_awk_run (xp_awk_t* awk,
xp_awk_runios_t* runios,
xp_awk_runcbs_t* runcbs,
xp_awk_runarg_t* runarg);
int sse_awk_run (sse_awk_t* awk,
sse_awk_runios_t* runios,
sse_awk_runcbs_t* runcbs,
sse_awk_runarg_t* runarg);
int xp_awk_stop (xp_awk_t* awk, xp_awk_run_t* run);
void xp_awk_stopall (xp_awk_t* awk);
int sse_awk_stop (sse_awk_t* awk, sse_awk_run_t* run);
void sse_awk_stopall (sse_awk_t* awk);
/* functions to access internal stack structure */
xp_size_t xp_awk_getnargs (xp_awk_run_t* run);
xp_awk_val_t* xp_awk_getarg (xp_awk_run_t* run, xp_size_t idx);
xp_awk_val_t* xp_awk_getglobal (xp_awk_run_t* run, xp_size_t idx);
int xp_awk_setglobal (xp_awk_run_t* run, xp_size_t idx, xp_awk_val_t* val);
void xp_awk_setretval (xp_awk_run_t* run, xp_awk_val_t* val);
sse_size_t sse_awk_getnargs (sse_awk_run_t* run);
sse_awk_val_t* sse_awk_getarg (sse_awk_run_t* run, sse_size_t idx);
sse_awk_val_t* sse_awk_getglobal (sse_awk_run_t* run, sse_size_t idx);
int sse_awk_setglobal (sse_awk_run_t* run, sse_size_t idx, sse_awk_val_t* val);
void sse_awk_setretval (sse_awk_run_t* run, sse_awk_val_t* val);
int xp_awk_setconsolename (
xp_awk_run_t* run, const xp_char_t* name, xp_size_t len);
int sse_awk_setconsolename (
sse_awk_run_t* run, const sse_char_t* name, sse_size_t len);
int xp_awk_getrunerrnum (xp_awk_run_t* run);
void xp_awk_setrunerrnum (xp_awk_run_t* run, int errnum);
int sse_awk_getrunerrnum (sse_awk_run_t* run);
void sse_awk_setrunerrnum (sse_awk_run_t* run, int errnum);
/* record and field functions */
int xp_awk_clrrec (xp_awk_run_t* run, xp_bool_t skip_inrec_line);
int xp_awk_setrec (xp_awk_run_t* run, xp_size_t idx, const xp_char_t* str, xp_size_t len);
int sse_awk_clrrec (sse_awk_run_t* run, sse_bool_t skip_inrec_line);
int sse_awk_setrec (sse_awk_run_t* run, sse_size_t idx, const sse_char_t* str, sse_size_t len);
/* utility functions exported by awk.h */
xp_long_t xp_awk_strxtolong (
xp_awk_t* awk, const xp_char_t* str, xp_size_t len,
int base, const xp_char_t** endptr);
xp_real_t xp_awk_strxtoreal (
xp_awk_t* awk, const xp_char_t* str, xp_size_t len,
const xp_char_t** endptr);
/* utility functions esseorted by awk.h */
sse_long_t sse_awk_strxtolong (
sse_awk_t* awk, const sse_char_t* str, sse_size_t len,
int base, const sse_char_t** endptr);
sse_real_t sse_awk_strxtoreal (
sse_awk_t* awk, const sse_char_t* str, sse_size_t len,
const sse_char_t** endptr);
xp_size_t xp_awk_longtostr (
xp_long_t value, int radix, const xp_char_t* prefix,
xp_char_t* buf, xp_size_t size);
sse_size_t sse_awk_longtostr (
sse_long_t value, int radix, const sse_char_t* prefix,
sse_char_t* buf, sse_size_t size);
/* string functions exported by awk.h */
xp_char_t* xp_awk_strdup (
xp_awk_t* awk, const xp_char_t* str);
xp_char_t* xp_awk_strxdup (
xp_awk_t* awk, const xp_char_t* str, xp_size_t len);
xp_char_t* xp_awk_strxdup2 (
xp_awk_t* awk,
const xp_char_t* str1, xp_size_t len1,
const xp_char_t* str2, xp_size_t len2);
/* string functions esseorted by awk.h */
sse_char_t* sse_awk_strdup (
sse_awk_t* awk, const sse_char_t* str);
sse_char_t* sse_awk_strxdup (
sse_awk_t* awk, const sse_char_t* str, sse_size_t len);
sse_char_t* sse_awk_strxdup2 (
sse_awk_t* awk,
const sse_char_t* str1, sse_size_t len1,
const sse_char_t* str2, sse_size_t len2);
xp_size_t xp_awk_strlen (const xp_char_t* str);
xp_size_t xp_awk_strcpy (xp_char_t* buf, const xp_char_t* str);
xp_size_t xp_awk_strncpy (xp_char_t* buf, const xp_char_t* str, xp_size_t len);
int xp_awk_strcmp (const xp_char_t* s1, const xp_char_t* s2);
sse_size_t sse_awk_strlen (const sse_char_t* str);
sse_size_t sse_awk_strcpy (sse_char_t* buf, const sse_char_t* str);
sse_size_t sse_awk_strncpy (sse_char_t* buf, const sse_char_t* str, sse_size_t len);
int sse_awk_strcmp (const sse_char_t* s1, const sse_char_t* s2);
int xp_awk_strxncmp (
const xp_char_t* s1, xp_size_t len1,
const xp_char_t* s2, xp_size_t len2);
int sse_awk_strxncmp (
const sse_char_t* s1, sse_size_t len1,
const sse_char_t* s2, sse_size_t len2);
int xp_awk_strxncasecmp (
xp_awk_t* awk,
const xp_char_t* s1, xp_size_t len1,
const xp_char_t* s2, xp_size_t len2);
int sse_awk_strxncasecmp (
sse_awk_t* awk,
const sse_char_t* s1, sse_size_t len1,
const sse_char_t* s2, sse_size_t len2);
xp_char_t* xp_awk_strxnstr (
const xp_char_t* str, xp_size_t strsz,
const xp_char_t* sub, xp_size_t subsz);
sse_char_t* sse_awk_strxnstr (
const sse_char_t* str, sse_size_t strsz,
const sse_char_t* sub, sse_size_t subsz);
/* utility functions to convert an error number ot a string */
const xp_char_t* xp_awk_geterrstr (int errnum);
const sse_char_t* sse_awk_geterrstr (int errnum);
#ifdef __cplusplus
}