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 2007-02-28 14:46:08 +00:00
parent e087a7043c
commit 53e48d3c59
1 changed files with 48 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

81
ase/awk/rex.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: rex.c,v 1.72 2007-02-28 11:23:57 bacon Exp $ * $Id: rex.c,v 1.73 2007-02-28 14:46:08 bacon Exp $
* *
* {License} * {License}
*/ */
@ -55,7 +55,8 @@ enum
typedef struct builder_t builder_t; typedef struct builder_t builder_t;
typedef struct matcher_t matcher_t; typedef struct matcher_t matcher_t;
typedef struct __match_t __match_t; typedef struct match_t match_t;
typedef struct cshdr_t cshdr_t;
#include <ase/pack.h> #include <ase/pack.h>
@ -120,7 +121,7 @@ ASE_BEGIN_PACKED_STRUCT (matcher_t)
int errnum; int errnum;
ASE_END_PACKED_STRUCT () ASE_END_PACKED_STRUCT ()
ASE_BEGIN_PACKED_STRUCT (__match_t) ASE_BEGIN_PACKED_STRUCT (match_t)
const ase_char_t* match_ptr; const ase_char_t* match_ptr;
ase_bool_t matched; ase_bool_t matched;
@ -130,10 +131,15 @@ ASE_BEGIN_PACKED_STRUCT (__match_t)
const ase_byte_t* branch_end; const ase_byte_t* branch_end;
ASE_END_PACKED_STRUCT () ASE_END_PACKED_STRUCT ()
ASE_BEGIN_PACKED_STRUCT (cshdr_t)
ase_size_t csc;
ase_size_t csl;
ASE_END_PACKED_STRUCT ()
#include <ase/unpack.h> #include <ase/unpack.h>
typedef const ase_byte_t* (*atom_matcher_t) ( typedef const ase_byte_t* (*atom_matcher_t) (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
#define NCHARS_REMAINING(rex) ((rex)->ptn.end - (rex)->ptn.curp) #define NCHARS_REMAINING(rex) ((rex)->ptn.end - (rex)->ptn.curp)
@ -187,31 +193,31 @@ static ase_bool_t __begin_with (
const ase_char_t* str, ase_size_t len, const ase_char_t* what); const ase_char_t* str, ase_size_t len, const ase_char_t* what);
static const ase_byte_t* __match_pattern ( static const ase_byte_t* __match_pattern (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_branch ( static const ase_byte_t* __match_branch (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_branch_body ( static const ase_byte_t* __match_branch_body (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_branch_body0 ( static const ase_byte_t* __match_branch_body0 (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_atom ( static const ase_byte_t* __match_atom (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_bol ( static const ase_byte_t* __match_bol (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_eol ( static const ase_byte_t* __match_eol (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_any_char ( static const ase_byte_t* __match_any_char (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_ord_char ( static const ase_byte_t* __match_ord_char (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_charset ( static const ase_byte_t* __match_charset (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_group ( static const ase_byte_t* __match_group (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat); matcher_t* matcher, const ase_byte_t* base, match_t* mat);
static const ase_byte_t* __match_occurrences ( static const ase_byte_t* __match_occurrences (
matcher_t* matcher, ase_size_t si, const ase_byte_t* p, matcher_t* matcher, ase_size_t si, const ase_byte_t* p,
ase_size_t lbound, ase_size_t ubound, __match_t* mat); ase_size_t lbound, ase_size_t ubound, match_t* mat);
static ase_bool_t __test_charset ( static ase_bool_t __test_charset (
matcher_t* matcher, const ase_byte_t* p, ase_size_t csc, ase_char_t c); matcher_t* matcher, const ase_byte_t* p, ase_size_t csc, ase_char_t c);
@ -335,7 +341,7 @@ int ase_awk_matchrex (
const ase_char_t** match_ptr, ase_size_t* match_len, int* errnum) const ase_char_t** match_ptr, ase_size_t* match_len, int* errnum)
{ {
matcher_t matcher; matcher_t matcher;
__match_t mat; match_t mat;
ase_size_t offset = 0; ase_size_t offset = 0;
/*const ase_char_t* match_ptr_zero = ASE_NULL;*/ /*const ase_char_t* match_ptr_zero = ASE_NULL;*/
@ -1037,10 +1043,10 @@ static ase_bool_t __begin_with (
} }
static const ase_byte_t* __match_pattern ( static const ase_byte_t* __match_pattern (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p; const ase_byte_t* p;
__match_t mat2; match_t mat2;
ase_size_t nb, el, i; ase_size_t nb, el, i;
p = base; p = base;
@ -1086,7 +1092,7 @@ static const ase_byte_t* __match_pattern (
} }
static const ase_byte_t* __match_branch ( static const ase_byte_t* __match_branch (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
/* /*
* branch body (base+sizeof(NA)+sizeof(BL)---+ * branch body (base+sizeof(NA)+sizeof(BL)---+
@ -1103,7 +1109,7 @@ static const ase_byte_t* __match_branch (
} }
static const ase_byte_t* __match_branch_body ( static const ase_byte_t* __match_branch_body (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* n; const ase_byte_t* n;
@ -1121,10 +1127,10 @@ static const ase_byte_t* __match_branch_body (
} }
static const ase_byte_t* __match_branch_body0 ( static const ase_byte_t* __match_branch_body0 (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p; const ase_byte_t* p;
/* __match_t mat2;*/ /* match_t mat2;*/
ase_size_t match_len = 0; ase_size_t match_len = 0;
mat->matched = ase_false; mat->matched = ase_false;
@ -1170,7 +1176,7 @@ static const ase_byte_t* __match_branch_body0 (
} }
static const ase_byte_t* __match_atom ( static const ase_byte_t* __match_atom (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
static atom_matcher_t matchers[] = static atom_matcher_t matchers[] =
{ {
@ -1190,7 +1196,7 @@ static const ase_byte_t* __match_atom (
} }
static const ase_byte_t* __match_bol ( static const ase_byte_t* __match_bol (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
@ -1206,7 +1212,7 @@ static const ase_byte_t* __match_bol (
} }
static const ase_byte_t* __match_eol ( static const ase_byte_t* __match_eol (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
@ -1222,7 +1228,7 @@ static const ase_byte_t* __match_eol (
} }
static const ase_byte_t* __match_any_char ( static const ase_byte_t* __match_any_char (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
@ -1274,7 +1280,7 @@ static const ase_byte_t* __match_any_char (
} }
static const ase_byte_t* __match_ord_char ( static const ase_byte_t* __match_ord_char (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
@ -1373,7 +1379,7 @@ static const ase_byte_t* __match_ord_char (
} }
static const ase_byte_t* __match_charset ( static const ase_byte_t* __match_charset (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
@ -1381,12 +1387,20 @@ static const ase_byte_t* __match_charset (
ase_bool_t n; ase_bool_t n;
ase_char_t c; ase_char_t c;
cshdr_t* cshdr;
cp = (const struct code_t*)p; p += ASE_SIZEOF(*cp); cp = (const struct code_t*)p; p += ASE_SIZEOF(*cp);
ASE_AWK_ASSERT (matcher->awk, cp->cmd == CMD_CHARSET); ASE_AWK_ASSERT (matcher->awk, cp->cmd == CMD_CHARSET);
lbound = cp->lbound; lbound = cp->lbound;
ubound = cp->ubound; ubound = cp->ubound;
cshdr = (cshdr_t*)p;
csc = cshdr->csc;
csl = cshdr->csl;
p += ASE_SIZEOF(*cshdr);
/*
#if defined(__i386) || defined(__i386__) #if defined(__i386) || defined(__i386__)
csc = *(ase_size_t*)p; csc = *(ase_size_t*)p;
#else #else
@ -1400,6 +1414,7 @@ static const ase_byte_t* __match_charset (
ase_memcpy (&csl, p, ASE_SIZEOF(csl)); ase_memcpy (&csl, p, ASE_SIZEOF(csl));
#endif #endif
p += ASE_SIZEOF(csl); p += ASE_SIZEOF(csl);
*/
#ifdef DEBUG_REX #ifdef DEBUG_REX
ase_dprintf ( ase_dprintf (
@ -1440,11 +1455,11 @@ static const ase_byte_t* __match_charset (
} }
static const ase_byte_t* __match_group ( static const ase_byte_t* __match_group (
matcher_t* matcher, const ase_byte_t* base, __match_t* mat) matcher_t* matcher, const ase_byte_t* base, match_t* mat)
{ {
const ase_byte_t* p = base; const ase_byte_t* p = base;
const struct code_t* cp; const struct code_t* cp;
__match_t mat2; match_t mat2;
ase_size_t si = 0, grp_len_static[16], * grp_len; ase_size_t si = 0, grp_len_static[16], * grp_len;
cp = (const struct code_t*)p; p += ASE_SIZEOF(*cp); cp = (const struct code_t*)p; p += ASE_SIZEOF(*cp);
@ -1574,7 +1589,7 @@ static const ase_byte_t* __match_group (
static const ase_byte_t* __match_occurrences ( static const ase_byte_t* __match_occurrences (
matcher_t* matcher, ase_size_t si, const ase_byte_t* p, matcher_t* matcher, ase_size_t si, const ase_byte_t* p,
ase_size_t lbound, ase_size_t ubound, __match_t* mat) ase_size_t lbound, ase_size_t ubound, match_t* mat)
{ {
ASE_AWK_ASSERT (matcher->awk, si >= lbound && si <= ubound); ASE_AWK_ASSERT (matcher->awk, si >= lbound && si <= ubound);
/* the match has been found */ /* the match has been found */
@ -1633,7 +1648,7 @@ static const ase_byte_t* __match_occurrences (
do do
{ {
__match_t mat2; match_t mat2;
const ase_byte_t* tmp; const ase_byte_t* tmp;
mat2.match_ptr = &mat->match_ptr[si]; mat2.match_ptr = &mat->match_ptr[si];