MyFavMirrors/owntone-server
1
0
Fork 0
mirror of https://github.com/owntone/owntone-server.git synced 2025-03-29 08:43:42 -04:00
Code Issues Packages Projects Releases Wiki Activity

node

Browse Source
This commit is contained in:
Ron Pedde 2005-10-18 22:35:10 +00:00
parent 7e5535d9bd
commit 939db9fcf9
1 changed files with 67 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

119
src/smart-parser.c
View File

@ -24,6 +24,21 @@ typedef struct tag_token {
} data; } data;
} SP_TOKEN; } SP_TOKEN;
typedef struct tag_sp_node {
union {
struct tag_sp_node *node;
char *field;
} left;
int op;
union {
struct tag_sp_node *node;
int ivalue;
char *cvalue;
} right;
} SP_NODE;
/* /*
#define T_ID 0x00 #define T_ID 0x00
#define T_PATH 0x01 #define T_PATH 0x01
@ -64,15 +79,15 @@ typedef struct tag_token {
#define T_IDX 0x21 #define T_IDX 0x21
*/ */
/** /**
* high 4 bits: * high 4 bits:
* *
* 0x8000 - * 0x8000 -
* 0x4000 - * 0x4000 -
* 0x2000 - data is string * 0x2000 - data is string
* 0x1000 - data is int * 0x1000 - data is int
* *
* 0x0800 - * 0x0800 -
* 0x0400 - * 0x0400 -
* 0x0200 - * 0x0200 -
* 0x0100 - * 0x0100 -
@ -153,16 +168,16 @@ FIELDLOOKUP sp_fields[] = {
{ T_INT_FIELD, "datakind" }, { T_INT_FIELD, "datakind" },
{ T_INT_FIELD, "itemkind" }, { T_INT_FIELD, "itemkind" },
{ T_STRING_FIELD, "description" }, { T_STRING_FIELD, "description" },
/* end of db fields */ /* end of db fields */
{ T_OR, "or" }, { T_OR, "or" },
{ T_AND, "and" }, { T_AND, "and" },
/* end */ /* end */
{ 0, NULL }, { 0, NULL },
}; };
typedef struct tag_parsetree { typedef struct tag_parsetree {
char *term; char *term;
char *current; char *current;
SP_TOKEN token; SP_TOKEN token;
@ -209,13 +224,13 @@ int sp_scan(PARSETREE tree) {
/* keep advancing until we have a token */ /* keep advancing until we have a token */
while(*(tree->current) && strchr(" \t\n\r",*(tree->current))) while(*(tree->current) && strchr(" \t\n\r",*(tree->current)))
tree->current++; tree->current++;
if(!*(tree->current)) { if(!*(tree->current)) {
tree->next_token.token_id = T_EOF; tree->next_token.token_id = T_EOF;
DPRINTF(E_SPAM,L_PARSE,"Returning token %04x\n",tree->token.token_id); DPRINTF(E_SPAM,L_PARSE,"Returning token %04x\n",tree->token.token_id);
return tree->token.token_id; return tree->token.token_id;
} }
DPRINTF(E_SPAM,L_PARSE,"Current offset: %d, char: %c\n", DPRINTF(E_SPAM,L_PARSE,"Current offset: %d, char: %c\n",
tree->current - tree->term, *(tree->current)); tree->current - tree->term, *(tree->current));
@ -239,7 +254,7 @@ int sp_scan(PARSETREE tree) {
advance=1; advance=1;
tree->next_token.token_id = T_EQUAL; tree->next_token.token_id = T_EQUAL;
break; break;
case '<': case '<':
if((*(tree->current + 1)) == '=') { if((*(tree->current + 1)) == '=') {
advance = 2; advance = 2;
@ -249,7 +264,7 @@ int sp_scan(PARSETREE tree) {
tree->next_token.token_id = T_LESS; tree->next_token.token_id = T_LESS;
} }
break; break;
case '>': case '>':
if((*(tree->current + 1)) == '=') { if((*(tree->current + 1)) == '=') {
advance = 2; advance = 2;
@ -280,16 +295,16 @@ int sp_scan(PARSETREE tree) {
tree->current += advance; tree->current += advance;
} else { /* either a keyword token or a quoted string */ } else { /* either a keyword token or a quoted string */
DPRINTF(E_SPAM,L_PARSE,"keyword or string!\n"); DPRINTF(E_SPAM,L_PARSE,"keyword or string!\n");
/* walk to a terminator */ /* walk to a terminator */
tail = tree->current; tail = tree->current;
terminator = " \t\n\r\"<>=()|&"; terminator = " \t\n\r\"<>=()|&";
if(tree->token.token_id == T_QUOTE) { if(tree->token.token_id == T_QUOTE) {
is_string=1; is_string=1;
terminator="\""; terminator="\"";
} }
while((*tail) && (!strchr(terminator,*tail))) { while((*tail) && (!strchr(terminator,*tail))) {
tail++; tail++;
} }
@ -311,7 +326,7 @@ int sp_scan(PARSETREE tree) {
pfield++; pfield++;
} }
} }
if(found) { if(found) {
tree->next_token.token_id = pfield->type; tree->next_token.token_id = pfield->type;
} else { } else {
@ -327,32 +342,32 @@ int sp_scan(PARSETREE tree) {
strncpy(tree->next_token.data.cvalue,tree->current,len); strncpy(tree->next_token.data.cvalue,tree->current,len);
tree->next_token.data.cvalue[len] = '\x0'; tree->next_token.data.cvalue[len] = '\x0';
} }
/* check for numberic? */ /* check for numberic? */
tree->current=tail; tree->current=tail;
} }
DPRINTF(E_SPAM,L_PARSE,"Returning token %04x\n",tree->token.token_id); DPRINTF(E_SPAM,L_PARSE,"Returning token %04x\n",tree->token.token_id);
if(tree->token.token_id & 0x2000) if(tree->token.token_id & 0x2000)
DPRINTF(E_SPAM,L_PARSE,"String val: %s\n",tree->token.data.cvalue); DPRINTF(E_SPAM,L_PARSE,"String val: %s\n",tree->token.data.cvalue);
if(tree->token.token_id & 0x1000) if(tree->token.token_id & 0x1000)
DPRINTF(E_SPAM,L_PARSE,"Int val: %d\n",tree->token.data.ivalue); DPRINTF(E_SPAM,L_PARSE,"Int val: %d\n",tree->token.data.ivalue);
return tree->token.token_id; return tree->token.token_id;
} }
/** /**
* set up the initial parse tree * set up the initial parse tree
* *
* @returns opaque parsetree struct * @returns opaque parsetree struct
*/ */
PARSETREE sp_init(void) { PARSETREE sp_init(void) {
PARSETREE ptree; PARSETREE ptree;
ptree = (PARSETREE)malloc(sizeof(PARSESTRUCT)); ptree = (PARSETREE)malloc(sizeof(PARSESTRUCT));
if(!ptree) if(!ptree)
DPRINTF(E_FATAL,L_PARSE,"Alloc error\n"); DPRINTF(E_FATAL,L_PARSE,"Alloc error\n");
memset(ptree,0,sizeof(PARSESTRUCT)); memset(ptree,0,sizeof(PARSESTRUCT));
@ -367,7 +382,7 @@ PARSETREE sp_init(void) {
* *
* phrase -> aexpr T_EOF * phrase -> aexpr T_EOF
* aexpr -> oexpr { T_AND oexpr } * aexpr -> oexpr { T_AND oexpr }
* oexpr -> expr { T_OR expr } * oexpr -> expr { T_OR expr }
* expr -> T_OPENPAREN aexpr T_CLOSEPAREN | criterion * expr -> T_OPENPAREN aexpr T_CLOSEPAREN | criterion
* criterion -> field op value * criterion -> field op value
* *
@ -386,7 +401,7 @@ int sp_parse(PARSETREE tree, char *term) {
tree->next_token.token_id=T_BOF; tree->next_token.token_id=T_BOF;
sp_scan(tree); sp_scan(tree);
sp_scan(tree); sp_scan(tree);
if(sp_parse_phrase(tree)) { if(sp_parse_phrase(tree)) {
DPRINTF(E_SPAM,L_PARSE,"Parsed successfully\n"); DPRINTF(E_SPAM,L_PARSE,"Parsed successfully\n");
} else { } else {
@ -405,21 +420,21 @@ int sp_parse(PARSETREE tree, char *term) {
* @param tree tree we are parsing (and building) * @param tree tree we are parsing (and building)
* @returns 1 if successful, 0 otherwise * @returns 1 if successful, 0 otherwise
*/ */
int sp_parse_phrase(PARSETREE tree) { int sp_parse_phrase(PARSETREE tree) {
int result=0; int result=0;
DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_phrase\n"); DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_phrase\n");
if(sp_parse_aexpr(tree) && (tree->token.token_id == T_EOF)) if(sp_parse_aexpr(tree) && (tree->token.token_id == T_EOF))
result=1; result=1;
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_phrase: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_phrase: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
/** /**
* parse for an ANDed expression * parse for an ANDed expression
* *
@ -430,9 +445,9 @@ int sp_parse_phrase(PARSETREE tree) {
*/ */
int sp_parse_aexpr(PARSETREE tree) { int sp_parse_aexpr(PARSETREE tree) {
int result=0; int result=0;
DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_aexpr\n"); DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_aexpr\n");
while(1) { while(1) {
result = sp_parse_oexpr(tree); result = sp_parse_oexpr(tree);
if((!result) || (tree->token.token_id != T_AND)) break; if((!result) || (tree->token.token_id != T_AND)) break;
@ -440,7 +455,7 @@ int sp_parse_aexpr(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_aexpr: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_aexpr: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
@ -454,9 +469,9 @@ int sp_parse_aexpr(PARSETREE tree) {
*/ */
int sp_parse_oexpr(PARSETREE tree) { int sp_parse_oexpr(PARSETREE tree) {
int result=0; int result=0;
DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_oexpr\n"); DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_oexpr\n");
while(1) { while(1) {
result = sp_parse_expr(tree); result = sp_parse_expr(tree);
if((!result) || (tree->token.token_id != T_OR)) break; if((!result) || (tree->token.token_id != T_OR)) break;
@ -464,7 +479,7 @@ int sp_parse_oexpr(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_oexpr: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_oexpr: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
@ -472,13 +487,13 @@ int sp_parse_oexpr(PARSETREE tree) {
* parse for an expression * parse for an expression
* *
* expr -> T_OPENPAREN aexpr T_CLOSEPAREN | criteria * expr -> T_OPENPAREN aexpr T_CLOSEPAREN | criteria
* *
* @param tree tree we are building * @param tree tree we are building
* @returns 1 if successful, 0 otherwise * @returns 1 if successful, 0 otherwise
*/ */
int sp_parse_expr(PARSETREE tree) { int sp_parse_expr(PARSETREE tree) {
int result=0; int result=0;
DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_expr\n"); DPRINTF(E_SPAM,L_PARSE,"Entering sp_parse_expr\n");
if(tree->token.token_id == T_OPENPAREN) { if(tree->token.token_id == T_OPENPAREN) {
sp_scan(tree); sp_scan(tree);
@ -492,13 +507,13 @@ int sp_parse_expr(PARSETREE tree) {
} else { } else {
result = sp_parse_criterion(tree); result = sp_parse_criterion(tree);
} }
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_expr: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_expr: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
/** /**
* parse for a criterion * parse for a criterion
* *
@ -516,15 +531,15 @@ int sp_parse_criterion(PARSETREE tree) {
case T_STRING_FIELD: case T_STRING_FIELD:
result = sp_parse_string_criterion(tree); result = sp_parse_string_criterion(tree);
break; break;
case T_INT_FIELD: case T_INT_FIELD:
result = sp_parse_int_criterion(tree); result = sp_parse_int_criterion(tree);
break; break;
case T_DATE_FIELD: case T_DATE_FIELD:
result = sp_parse_date_criterion(tree); result = sp_parse_date_criterion(tree);
break; break;
default: default:
/* Error: expecting field */ /* Error: expecting field */
result = 0; result = 0;
@ -533,7 +548,7 @@ int sp_parse_criterion(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_criterion: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_criterion: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
@ -558,7 +573,7 @@ int sp_parse_criterion(PARSETREE tree) {
/* Error: expecting legal string comparison operator */ /* Error: expecting legal string comparison operator */
break; break;
} }
if(result) { if(result) {
sp_scan(tree); sp_scan(tree);
/* should be sitting on quote literal string quote */ /* should be sitting on quote literal string quote */
@ -583,10 +598,10 @@ int sp_parse_criterion(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_string_criterion: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_string_criterion: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
/** /**
* parse for an int criterion * parse for an int criterion
* *
@ -614,7 +629,7 @@ int sp_parse_criterion(PARSETREE tree) {
tree->token.token_id); tree->token.token_id);
break; break;
} }
if(result) { if(result) {
sp_scan(tree); sp_scan(tree);
/* should be sitting on a literal string */ /* should be sitting on a literal string */
@ -632,7 +647,7 @@ int sp_parse_criterion(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_int_criterion: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_int_criterion: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
@ -650,11 +665,11 @@ int sp_parse_criterion(PARSETREE tree) {
DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_date_criterion: %s\n",result ? DPRINTF(E_SPAM,L_PARSE,"Exiting sp_parse_date_criterion: %s\n",result ?
"success" : "fail"); "success" : "fail");
return result; return result;
} }
/** /**
* dispose of an initialized tree * dispose of an initialized tree
* *
@ -672,7 +687,7 @@ int sp_dispose(PARSETREE tree) {
/** /**
* if there was an error in a previous action (parsing?) * if there was an error in a previous action (parsing?)
* then return that error to the client. This does not * then return that error to the client. This does not
* clear the error condition -- multiple calls to sp_geterror * clear the error condition -- multiple calls to sp_geterror
* will return the same value. * will return the same value.
* *