Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

933 lines
43 KiB

/*
Copyright (c) 1995 Microsoft Corporation
Module Name:
sqlparse.cxx
Abstract:
Author:
Felix Wong [t-FelixW] 16-Dec-1996
++*/
#include "lexer.hxx"
#include "sqltree.hxx"
#include "sqlparse.hxx"
//#define DEBUG_DUMPSTACK
//#define DEBUG_DUMPRULE
#if (defined(DEBUG_DUMPSTACK) || defined (DEBUG_DUMPRULE))
#include "stdio.h"
#endif
#define BAIL_ON_FAILURE(hr) \
if (FAILED(hr)) { \
goto error; \
}\
// Action Table
typedef struct _action{
DWORD type;
DWORD dwState;
}action;
// Rule Table
typedef struct _rule{
DWORD dwNumber;
DWORD dwA;
}rule;
enum types {
N,
S,
R,
A
};
#define X 99
action g_action[59][28] = {
// ERROR ,EQ, STAR, LPARAN,RPARAN,INT, REAL, STR, UDN, COMMA, LT, GT, LE, GE, NE, SELECT,ALL, FROM, WHERE, BOOL, AND, OR, NOT, ORDER BY ASC DESC END
/*00*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,3 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*01*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,49},{N,X },{N,X },{N,X },{A,X } },
/*02*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*03*/ { {N,X },{N,X },{S,4 },{N,X },{N,X },{N,X },{N,X },{S,47},{S,5 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,11},{R,5 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*04*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,6 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*05*/ { {N,X },{R,10},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,10},{R,10},{R,10},{R,10},{R,10},{R,10},{N,X },{N,X },{R,10},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*06*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,4 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*07*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,7 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*08*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,9 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,8 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*09*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,47},{S,5 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*10*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,9 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*11*/ { {N,X },{N,X },{S,4 },{N,X },{N,X },{N,X },{N,X },{S,47},{S,5 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*12*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,13},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*13*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,14},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*14*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,11},{N,X },{N,X },{N,X },{N,X },{R,11},{N,X },{N,X },{N,X },{R,11} },
/*15*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,16},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,2 } },
/*16*/ { {N,X },{N,X },{N,X },{N,X },{S,23},{N,X },{N,X },{S,47},{S,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,21},{N,X },{N,X },{N,X },{N,X },{N,X } },
/*17*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,3 },{N,X },{N,X },{N,X },{R,3 } },
/*18*/ { {N,X },{N,X },{N,X },{N,X },{R,12},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,26},{N,X },{R,12},{N,X },{N,X },{N,X },{R,12} },
/*19*/ { {N,X },{N,X },{N,X },{N,X },{R,14},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,28},{R,14},{N,X },{R,14},{N,X },{N,X },{N,X },{R,14} },
/*20*/ { {N,X },{N,X },{N,X },{N,X },{R,16},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,16},{R,16},{S,21},{R,16},{N,X },{N,X },{N,X },{R,16} },
/*21*/ { {N,X },{N,X },{N,X },{S,23},{N,X },{N,X },{N,X },{S,47},{S,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*22*/ { {N,X },{N,X },{N,X },{N,X },{R,18},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,18},{R,18},{N,X },{R,18},{N,X },{N,X },{N,X },{R,18} },
/*23*/ { {N,X },{N,X },{N,X },{S,23},{N,X },{N,X },{N,X },{S,47},{S,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*24*/ { {N,X },{S,38},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,34},{S,35},{S,37},{S,36},{S,39},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*25*/ { {N,X },{R,10},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,10},{R,10},{R,10},{R,10},{R,10},{R,10},{N,X },{N,X },{R,10},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*26*/ { {N,X },{N,X },{N,X },{S,23},{N,X },{N,X },{N,X },{S,47},{S,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,21},{N,X },{N,X },{N,X },{N,X },{N,X } },
/*27*/ { {N,X },{N,X },{N,X },{N,X },{R,13},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,13},{N,X },{N,X },{N,X },{R,13} },
/*28*/ { {N,X },{N,X },{N,X },{S,23},{N,X },{N,X },{N,X },{S,47},{S,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,21},{N,X },{N,X },{N,X },{N,X },{N,X } },
/*29*/ { {N,X },{N,X },{N,X },{N,X },{R,15},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,15},{N,X },{R,15},{N,X },{N,X },{N,X },{R,15} },
/*30*/ { {N,X },{N,X },{N,X },{N,X },{R,17},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,17},{R,17},{N,X },{R,17},{N,X },{N,X },{N,X },{R,17} },
/*31*/ { {N,X },{N,X },{N,X },{N,X },{S,32},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*32*/ { {N,X },{N,X },{N,X },{N,X },{R,19},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,19},{R,19},{N,X },{R,19},{N,X },{N,X },{N,X },{R,19} },
/*33*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{S,44},{S,45},{S,41},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,43},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*34*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,21},{R,21},{R,21},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,21},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*35*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,22},{R,22},{R,22},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,22},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*36*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,23},{R,23},{R,23},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,23},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*37*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,24},{R,24},{R,24},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,24},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*38*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,25},{R,25},{R,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,25},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*39*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{R,26},{R,26},{R,26},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,26},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*40*/ { {N,X },{N,X },{N,X },{N,X },{R,20},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,20},{R,20},{N,X },{R,20},{N,X },{N,X },{N,X },{R,20} },
/*41*/ { {N,X },{N,X },{N,X },{N,X },{R,27},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,27},{R,27},{N,X },{R,27},{N,X },{N,X },{N,X },{R,27} },
/*42*/ { {N,X },{N,X },{N,X },{N,X },{R,28},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,28},{R,28},{N,X },{R,28},{N,X },{N,X },{N,X },{R,28} },
/*43*/ { {N,X },{N,X },{N,X },{N,X },{R,29},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,29},{R,29},{N,X },{R,29},{N,X },{N,X },{N,X },{R,29} },
/*44*/ { {N,X },{N,X },{N,X },{N,X },{R,30},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,30},{R,30},{N,X },{R,30},{N,X },{N,X },{N,X },{R,30} },
/*45*/ { {N,X },{N,X },{N,X },{N,X },{R,31},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,31},{R,31},{N,X },{R,31},{N,X },{N,X },{N,X },{R,31} },
/*46*/ { {N,X },{N,X },{N,X },{N,X },{N,X}, {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,5 },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X} },
/*47*/ { {N,X },{R,32},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,32},{R,32},{R,32},{R,32},{R,32},{R,32},{N,X },{N,X },{R,32},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,32} },
/*48*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{A,X } },
/*49*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,50},{N,X },{N,X },{N,X } },
/*50*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,55},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*51*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,34} },
/*52*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,53},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,35} },
/*53*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,55},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X } },
/*54*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,36} },
/*55*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,37},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{S,57},{S,58},{R,37} },
/*56*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,38},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,38} },
/*57*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,39},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,39} },
/*58*/ { {N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,40},{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{N,X },{R,40} },
};
enum non_terminals {
NONTERM_SEL_STMT,
NONTERM_SEL_LIST_ALL,
NONTERM_SEL_LIST,
NONTERM_SEL_SUBLIST,
NONTERM_COL_ID,
NONTERM_TBL_ID,
NONTERM_SRCH_COND,
NONTERM_BOOL_TERM,
NONTERM_BOOL_FACT,
NONTERM_BOOL_PRIM,
NONTERM_COMP,
NONTERM_COMP_OP,
NONTERM_LITERAL,
NONTERM_NUM,
NONTERM_STMT,
NONTERM_ORDER_BY,
NONTERM_SORT_SPEC_LIST,
NONTERM_SORT_COL_ID,
NONTERM_ORDER_SPEC
};
rule g_rule[] = {
// 1)No. of non-terminals and terminals on the right hand side
// 2)The Parent
/*00*/ {0, 0, },
/*01*/ {1, NONTERM_STMT },
/*02*/ {4, NONTERM_SEL_STMT },
/*03*/ {6, NONTERM_SEL_STMT },
/*04*/ {1, NONTERM_SEL_LIST_ALL },
/*05*/ {2, NONTERM_SEL_LIST_ALL },
/*06*/ {1, NONTERM_SEL_LIST },
/*07*/ {1, NONTERM_SEL_LIST },
/*08*/ {1, NONTERM_SEL_SUBLIST },
/*09*/ {3, NONTERM_SEL_SUBLIST },
/*10*/ {1, NONTERM_COL_ID },
/*11*/ {1, NONTERM_TBL_ID },
/*12*/ {1, NONTERM_SRCH_COND },
/*13*/ {3, NONTERM_SRCH_COND },
/*14*/ {1, NONTERM_BOOL_TERM, },
/*15*/ {3, NONTERM_BOOL_TERM },
/*16*/ {1, NONTERM_BOOL_FACT },
/*17*/ {2, NONTERM_BOOL_FACT },
/*18*/ {1, NONTERM_BOOL_PRIM },
/*19*/ {3, NONTERM_BOOL_PRIM },
/*20*/ {3, NONTERM_COMP },
/*21*/ {1, NONTERM_COMP_OP },
/*22*/ {1, NONTERM_COMP_OP },
/*23*/ {1, NONTERM_COMP_OP },
/*24*/ {1, NONTERM_COMP_OP },
/*25*/ {1, NONTERM_COMP_OP },
/*26*/ {1, NONTERM_COMP_OP },
/*27*/ {1, NONTERM_LITERAL },
/*28*/ {1, NONTERM_LITERAL },
/*29*/ {1, NONTERM_LITERAL },
/*30*/ {1, NONTERM_NUM },
/*31*/ {1, NONTERM_NUM },
/*32*/ {1, NONTERM_COL_ID },
/*33*/ {2, NONTERM_STMT },
/*34*/ {3, NONTERM_ORDER_BY },
/*35*/ {1, NONTERM_SORT_SPEC_LIST },
/*36*/ {3, NONTERM_SORT_SPEC_LIST },
/*37*/ {1, NONTERM_SORT_COL_ID },
/*38*/ {2, NONTERM_SORT_COL_ID },
/*39*/ {1, NONTERM_ORDER_SPEC },
/*40*/ {1, NONTERM_ORDER_SPEC },
};
#ifdef DEBUG_DUMPRULE
LPWSTR g_rgszRule[] = {
/*00*/ L"",
/*01*/ L"stmt -> sel_stmt",
/*02*/ L"sel_stmt -> T_SELECT sel_list_all T_FROM tbl_id",
/*03*/ L"sel_stmt -> T_SELECT sel_list_all T_FROM tbl_id T_WHERE srch_cond",
/*04*/ L"sel_list_all -> sel_list",
/*05*/ L"sel_list_all -> T_ALL sel_list",
/*06*/ L"sel_list -> T_STAR",
/*07*/ L" sel_list -> sel_sublist",
/*08*/ L" sel_sublist -> col_id",
/*09*/ L" sel_sublist -> col_id T_COMMA sel_sublist",
/*10*/ L" col_id -> T_UD_NAME",
/*11*/ L" tbl_id -> T_STRING",
/*12*/ L" srch_cond -> bool_term",
/*13*/ L" srch_cond -> bool_term T_OR srch_cond",
/*14*/ L" bool_term -> bool_fact",
/*15*/ L" bool_term -> bool_fact T_AND bool_term",
/*16*/ L" bool_fact -> bool_prim",
/*17*/ L" bool_fact -> T_NOT bool_prim",
/*18*/ L" bool_prim -> comp",
/*19*/ L" bool_prim -> T_LPARAN srch_cond T_RPARAN",
/*20*/ L" comp -> col_id comp_op literal",
/*21*/ L" comp_op -> T_LT",
/*22*/ L" comp_op -> T_GT",
/*23*/ L" comp_op -> T_GE",
/*24*/ L" comp_op -> T_LE",
/*25*/ L" comp_op -> T_EQ",
/*26*/ L" comp_op -> T_NE",
/*27*/ L" literal -> T_STRING",
/*28*/ L" literal -> num",
/*29*/ L" literal -> T_BOOL",
/*30*/ L" num -> T_INT",
/*31*/ L" num -> T_REAL",
/*32*/ L" col_id -> T_STRING",
/*33*/ L" stmt -> sel_stmt order_by_clause",
/*34*/ L" order_by_clause ::= T_ORDER T_BY sort_spec_list",
/*35*/ L" sort_spec_list ::= sort_col_id",
/*36*/ L" sort_spec_list ::= sort_col_id T_COMMA sort_spec_list",
/*37*/ L" sort_col_id ::= T_UD_NAME",
/*38*/ L" sort_col_id ::= T_UD_NAME order_spec",
/*39*/ L" order_spec ::= T_ASC",
/*40*/ L" order_spec ::= T_DESC"
};
#endif
DWORD g_goto[59][19] = {
// Sel sel sel sel col tbl srch bool bool bool comp comp lit num stmt order sort sort order
// stmt,lsta,lst, sub, id, id, cond,trm, fact,prim, ,op, , , by, spec, col , spec ,
/*00*/ {1, X, X, X, X, X, X, X, X, X, X, X, X, X, 2, X, X, X, X, },
/*01*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, 48, X, X, X, },
/*02*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*03*/ {X, 12, 6, 7, 8, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*04*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*05*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*06*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*07*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*08*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*09*/ {X, X, X, 10, 8, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*10*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*11*/ {X, X, 46, 7, 8, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*12*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*13*/ {X, X, X, X, X, 15, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*14*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*15*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*16*/ {X, X, X, X, 24, X, 17, 18, 19, 20, 22, X, X, X, X, X, X, X, X, },
/*17*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*18*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*19*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*20*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*21*/ {X, X, X, X, 24, X, X, X, X, 30, 22, X, X, X, X, X, X, X, X, },
/*22*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*23*/ {X, X, X, X, 24, X, 31, 18, 19, 20, 22, X, X, X, X, X, X, X, X, },
/*24*/ {X, X, X, X, X, X, X, X, X, X, X, 33, X, X, X, X, X, X, X, },
/*25*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*26*/ {X, X, X, X, 24, X, 27, 18, 19, 20, 22, X, X, X, X, X, X, X, X, },
/*27*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*28*/ {X, X, X, X, 24, X, X, 29, 19, 20, 22, X, X, X, X, X, X, X, X, },
/*29*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*30*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*31*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*32*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*33*/ {X, X, X, X, X, X, X, X, X, X, X, X, 40, 42, X, X, X, X, X, },
/*34*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*35*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*36*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*37*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*38*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*39*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*40*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*41*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*42*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*43*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*44*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*45*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*46*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*47*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*48*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*49*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*50*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, 51, 52, X, },
/*51*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*52*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*53*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, 54, 52, X, },
/*54*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*55*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, 56, },
/*56*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*57*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
/*58*/ {X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, X, },
};
HRESULT SQLParse(
LPWSTR szQuery,
LPWSTR *ppszLocation,
LPWSTR *ppszLDAPQuery,
LPWSTR *ppszSelect,
LPWSTR *ppszOrderList
)
{
//
// check input parameters
//
if (!ppszLocation || !ppszLDAPQuery || !ppszSelect || !ppszOrderList) {
return (E_INVALIDARG);
}
*ppszLocation = *ppszLDAPQuery = *ppszSelect = *ppszOrderList = NULL;
CStack Stack;
CLexer Query(szQuery);
LPWSTR lexeme;
DWORD dwToken;
DWORD dwState;
HRESULT hr = E_ADS_INVALID_FILTER;
CSyntaxNode *pSynNode;
CSQLNode *pNode1 = NULL;
CSQLNode *pNode2 = NULL;
CSQLNode *pNode3 = NULL;
CSQLString *pString = NULL, *pOrderString = NULL;
// Push in State 0
pSynNode = new CSyntaxNode;
if (!pSynNode) {
hr = E_OUTOFMEMORY;
goto error;
}
Stack.Push(pSynNode);
pSynNode = NULL;
#ifdef DEBUG_DUMPSTACK
Stack.Dump();
#endif
while (1) {
// Getting information for this iteration, dwToken and dwState
hr = Query.GetCurrentToken(
&lexeme,
&dwToken
);
BAIL_ON_FAILURE(hr);
hr = Stack.Current(&pSynNode);
BAIL_ON_FAILURE(hr);
dwState = pSynNode->_dwState;
pSynNode = NULL;
// Analysing and processing the data
if (g_action[dwState][dwToken].type == S) {
pSynNode = new CSyntaxNode;
if (!pSynNode) {
hr = E_OUTOFMEMORY;
goto error;
}
pSynNode->_dwState = g_action[dwState][dwToken].dwState;
pSynNode->_dwToken = dwToken;
switch (dwToken) {
case TOKEN_STRING_LITERAL:
case TOKEN_USER_DEFINED_NAME:
case TOKEN_INTEGER_LITERAL:
case TOKEN_REAL_LITERAL:
case TOKEN_BOOLEAN_LITERAL:
case TOKEN_ASC:
case TOKEN_DESC:
{
LPWSTR szValue = AllocADsStr(lexeme);
if (!szValue) {
hr = E_OUTOFMEMORY;
goto error;
}
pSynNode->SetNode(szValue);
break;
}
}
hr = Stack.Push(pSynNode);
BAIL_ON_FAILURE(hr);
pSynNode = NULL;
hr = Query.GetNextToken(
&lexeme,
&dwToken
);
BAIL_ON_FAILURE(hr);
#ifdef DUMP
Stack.Dump();
#endif
}
else if (g_action[dwState][dwToken].type == R) {
DWORD dwRule = g_action[dwState][dwToken].dwState;
DWORD dwNumber = g_rule[dwRule].dwNumber;
#ifdef DEBUG_DUMPRULE
wprintf(L"%s\n",g_rgszRule[dwRule]);
#endif
pSynNode = new CSyntaxNode;
if (NULL == pSynNode)
BAIL_ON_FAILURE(hr = E_OUTOFMEMORY);
CSyntaxNode *pSynNodeRed, *pSynNodeRed2;
switch (dwRule) {
case 20:
{
DWORD dwType;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
hr = MakeLeaf(
pSynNodeRed->_szValue,
&pNode2
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
dwType = pSynNodeRed->_dwFilterType;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
hr = MakeLeaf(
pSynNodeRed->_szValue,
&pNode1
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
// New node
hr = MakeNode(
dwType,
pNode1,
pNode2,
&pNode3
);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pNode3
);
pNode1 = NULL;
pNode2 = NULL;
pNode3 = NULL;
break;
}
case 13:
case 15:
// Reduction of AND OR
{
CSQLNode *pNode1;
CSQLNode *pNode2;
CSQLNode *pNode3;
DWORD dwType;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pNode2 = pSynNodeRed->_pSQLNode;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
dwType = pSynNodeRed->_dwToken;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pNode1 = pSynNodeRed->_pSQLNode;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
// New node
hr = MakeNode(
dwType,
pNode1,
pNode2,
&pNode3
);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pNode3
);
pNode1 = NULL;
pNode2 = NULL;
pNode3 = NULL;
break;
}
case 17: // Reduction of NOT
{
CSQLNode *pNode1;
CSQLNode *pNode2;
DWORD dwType;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pNode1 = pSynNodeRed->_pSQLNode;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
dwType = pSynNodeRed->_dwToken;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
// New node
hr = MakeNode(
dwType,
pNode1,
NULL,
&pNode2
);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pNode2
);
pNode1 = NULL;
pNode2 = NULL;
break;
}
case 3:
// save entry
{
CSQLNode* pNode;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pNode = pSynNodeRed->_pSQLNode;
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
for (DWORD i = 0;i<dwNumber-1;i++)
Stack.Pop();
CSQLString *pString = new CSQLString;
if (!pString) {
hr = E_OUTOFMEMORY;
goto error;
}
hr = pNode->GenerateLDAPString(
pString
);
BAIL_ON_FAILURE(hr);
delete pNode;
*ppszLDAPQuery = AllocADsStr(pString->_szString);
delete pString;
if (!*ppszLDAPQuery) {
hr = E_OUTOFMEMORY;
goto error;
}
break;
}
case 11:
{
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
*ppszLocation = AllocADsStr(pSynNodeRed->_szValue);
delete pSynNodeRed;
break;
}
case 21:
case 22:
case 23:
case 24:
case 25:
case 26:
{
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pSynNodeRed->_dwToken
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
break;
}
case 12:
case 14:
case 16:
case 18:
{
// we propogate the last entry
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pSynNodeRed->_pSQLNode
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
break;
}
case 10:
case 27:
case 29:
case 30:
case 31:
case 28:
case 32:
case 37:
case 39:
case 40:
{
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pSynNodeRed->_szValue
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
break;
}
case 19:
{
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pSynNode->SetNode(
pSynNodeRed->_pSQLNode
);
pSynNodeRed->_dwType = SNODE_NULL;
delete pSynNodeRed;
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
break;
}
case 8:
{
pString = new CSQLString;
if (NULL == pString)
BAIL_ON_FAILURE(hr = E_OUTOFMEMORY);
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
BAIL_ON_FAILURE(
hr = pString->Append(pSynNodeRed->_szValue));
delete pSynNodeRed;
break;
}
case 9:
{
CSQLNode *pNode;
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
BAIL_ON_FAILURE(
hr = pString->Append(L","));
BAIL_ON_FAILURE(
hr = pString->Append(pSynNodeRed->_szValue));
delete pSynNodeRed;
break;
}
case 35:
{
pOrderString = new CSQLString;
if (NULL == pOrderString)
BAIL_ON_FAILURE(hr = E_OUTOFMEMORY);
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
BAIL_ON_FAILURE(
hr = pOrderString->Append(pSynNodeRed->_szValue));
delete pSynNodeRed;
break;
}
case 36:
{
CSQLNode *pNode;
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
hr = Stack.Pop();
BAIL_ON_FAILURE(hr);
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
pOrderString->AppendAtBegin(L",");
pOrderString->AppendAtBegin(pSynNodeRed->_szValue);
delete pSynNodeRed;
break;
}
case 38:
{
CSQLNode *pNode;
LPWSTR pTemp = NULL;
hr = Stack.Pop(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
hr = Stack.Pop(&pSynNodeRed2);
BAIL_ON_FAILURE(hr);
pTemp = (LPWSTR) AllocADsMem((wcslen(pSynNodeRed2->_szValue) +
wcslen(pSynNodeRed->_szValue) +
wcslen(L" ") + 1) * sizeof(WCHAR));
if (!pTemp) {
BAIL_ON_FAILURE(hr = E_OUTOFMEMORY);
}
wsprintf(pTemp, L"%s %s",
pSynNodeRed2->_szValue,
pSynNodeRed->_szValue);
pSynNode->SetNode( pTemp );
//
// In all other cases the _dwType of the deleted nodes is
// set to SNODE_NULL before deletion because the data contained
// in the node is transferred to the new node.
// In this case, we have effectively copied the data (with the
// wsprintf statement) and so we should not alter the _dwType of
// the nodes before deletion because we do want the nodes to
// clean up their data.
//
//pSynNodeRed->_dwType = SNODE_NULL;
//pSynNodeRed2->_dwType = SNODE_NULL;
delete pSynNodeRed;
delete pSynNodeRed2;
break;
}
default:
{
for (DWORD i = 0;i<dwNumber;i++)
Stack.Pop();
break;
}
}
hr = Stack.Current(&pSynNodeRed);
BAIL_ON_FAILURE(hr);
dwState = pSynNodeRed->_dwState;
DWORD A = g_rule[dwRule].dwA;
pSynNode->_dwState = g_goto[dwState][A];
pSynNode->_dwToken = A;
hr = Stack.Push(pSynNode);
BAIL_ON_FAILURE(hr);
pSynNode = NULL;
#ifdef DEBUG_DUMPSTACK
Stack.Dump();
#endif
}
else if (g_action[dwState][dwToken].type == A){
if (pString == NULL) {
*ppszSelect = AllocADsStr(L"*");
}
else {
*ppszSelect = AllocADsStr(pString->_szString);
}
if (!*ppszSelect) {
hr = E_OUTOFMEMORY;
goto error;
}
delete pString;
if (pOrderString) {
*ppszOrderList = AllocADsStr(pOrderString->_szString);
if (!*ppszOrderList) {
hr = E_OUTOFMEMORY;
goto error;
}
delete pOrderString;
}
return S_OK;
}
else {
hr = E_ADS_INVALID_FILTER;
goto error;
}
}
error:
if (pSynNode)
delete pSynNode;
if (pNode1)
delete pNode1;
if (pNode2)
delete pNode2;
if (pNode3)
delete pNode3;
if (pString)
delete pString;
if (pOrderString)
delete pOrderString;
if (*ppszSelect)
{
FreeADsMem(*ppszSelect);
*ppszSelect = NULL;
}
if (*ppszLocation)
{
FreeADsMem(*ppszLocation);
*ppszLocation = NULL;
}
if (*ppszLDAPQuery)
{
FreeADsMem(*ppszLDAPQuery);
*ppszLDAPQuery = NULL;
}
if (*ppszOrderList)
{
FreeADsMem(*ppszOrderList);
*ppszOrderList = NULL;
}
return hr;
}
CStack::CStack()
{
_dwStackIndex = 0;
}
CStack::~CStack()
{
DWORD dwIndex = _dwStackIndex;
while (dwIndex > 0) {
CSyntaxNode *pNode;
pNode = _Stack[--dwIndex];
delete pNode;
}
}
#ifdef DEBUG_DUMPSTACK
void CStack::Dump()
{
DWORD dwIndex = _dwStackIndex;
printf("Stack:\n");
while (dwIndex > 0) {
CSyntaxNode *pNode;
pNode = _Stack[--dwIndex];
printf(
"State=%5.0d, Token=%5.0d\n",
pNode->_dwState,
pNode->_dwToken
);
}
}
#endif
HRESULT CStack::Push(CSyntaxNode* pNode)
{
if (_dwStackIndex < MAXVAL) {
_Stack[_dwStackIndex++] = pNode;
return S_OK;
}
else
return E_FAIL;
}
HRESULT CStack::Pop(CSyntaxNode** ppNode)
{
if (_dwStackIndex > 0) {
*ppNode = _Stack[--_dwStackIndex];
return S_OK;
}
else {
return E_FAIL;
}
}
HRESULT CStack::Pop()
{
if (_dwStackIndex > 0) {
CSyntaxNode *pNode;
pNode = _Stack[--_dwStackIndex];
delete pNode;
return S_OK;
}
else {
return E_FAIL;
}
}
HRESULT CStack::Current(CSyntaxNode **ppNode)
{
if (_dwStackIndex > 0) {
*ppNode = _Stack[_dwStackIndex-1];
return S_OK;
}
else {
return E_FAIL;
}
}
CSyntaxNode::CSyntaxNode()
{
_dwType = SNODE_NULL;
_dwToken = 0;
_dwState = 0;
_pSQLNode = 0;
}
CSyntaxNode::~CSyntaxNode()
{
switch (_dwType) {
case SNODE_SZ:
FreeADsStr(_szValue);
break;
case SNODE_SQLNODE:
delete _pSQLNode;
break;
default:
break;
}
}
void CSyntaxNode::SetNode(
CSQLNode *pSQLNode
)
{
_pSQLNode = pSQLNode;
_dwType = SNODE_SQLNODE;
}
void CSyntaxNode::SetNode(
LPWSTR szValue
)
{
_szValue = szValue;
_dwType = SNODE_SZ;
}
void CSyntaxNode::SetNode(
DWORD dwFilterType
)
{
_dwFilterType = dwFilterType;
_dwType = SNODE_FILTER;
}