588 lines
15 KiB
C++
588 lines
15 KiB
C++
|
#ifndef lint
|
||
|
|
static char yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93";
|
||
|
|
#endif
|
||
|
|
#define YYBYACC 1
|
||
|
|
#define YYMAJOR 1
|
||
|
|
#define YYMINOR 9
|
||
|
|
#define yyclearin (yychar=(-1))
|
||
|
|
#define yyerrok (yyerrflag=0)
|
||
|
|
#define YYRECOVERING (yyerrflag!=0)
|
||
|
|
#define YYPREFIX "yy"
|
||
|
|
/*++
|
||
|
|
|
||
|
|
Copyright (c) 2000 Microsoft Corporation
|
||
|
|
|
||
|
|
Module Name:
|
||
|
|
|
||
|
|
adl.y/adlparser.cpp
|
||
|
|
|
||
|
|
Abstract:
|
||
|
|
|
||
|
|
YACC parser definition for the ADL language
|
||
|
|
AdlParser::ParseAdl() function
|
||
|
|
|
||
|
|
Author:
|
||
|
|
|
||
|
|
t-eugenz - August 2000
|
||
|
|
|
||
|
|
Environment:
|
||
|
|
|
||
|
|
User mode only.
|
||
|
|
|
||
|
|
Revision History:
|
||
|
|
|
||
|
|
Created - August 2000
|
||
|
|
|
||
|
|
--*/
|
||
|
|
|
||
|
|
#include "pch.h"
|
||
|
|
#include "adl.h"
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* YACC generates some long->short automatic conversion, disable the warning*/
|
||
|
|
/**/
|
||
|
|
#pragma warning(disable : 4242)
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* ISSUE-2000/08/28-t-eugenz*/
|
||
|
|
/* This is a private netlib function. */
|
||
|
|
/**/
|
||
|
|
|
||
|
|
extern "C" NET_API_STATUS
|
||
|
|
NetpwNameValidate(
|
||
|
|
IN LPTSTR Name,
|
||
|
|
IN DWORD NameType,
|
||
|
|
IN DWORD Flags
|
||
|
|
);
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* Name types for I_NetName* and I_NetListCanonicalize*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
#define NAMETYPE_USER 1
|
||
|
|
#define NAMETYPE_PASSWORD 2
|
||
|
|
#define NAMETYPE_GROUP 3
|
||
|
|
#define NAMETYPE_COMPUTER 4
|
||
|
|
#define NAMETYPE_EVENT 5
|
||
|
|
#define NAMETYPE_DOMAIN 6
|
||
|
|
#define NAMETYPE_SERVICE 7
|
||
|
|
#define NAMETYPE_NET 8
|
||
|
|
#define NAMETYPE_SHARE 9
|
||
|
|
#define NAMETYPE_MESSAGE 10
|
||
|
|
#define NAMETYPE_MESSAGEDEST 11
|
||
|
|
#define NAMETYPE_SHAREPASSWORD 12
|
||
|
|
#define NAMETYPE_WORKGROUP 13
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* Validate various tokens, with error handling*/
|
||
|
|
/* have to cast away const, since NetpNameValidate takes a non-const for some*/
|
||
|
|
/* reason*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
#define VALIDATE_USERNAME(TOK) \
|
||
|
|
if( NetpwNameValidate( \
|
||
|
|
(WCHAR *)(TOK)->GetValue(), \
|
||
|
|
NAMETYPE_USER, \
|
||
|
|
0) != ERROR_SUCCESS) \
|
||
|
|
{ \
|
||
|
|
this->SetErrorToken( TOK ); \
|
||
|
|
throw AdlStatement::ERROR_INVALID_USERNAME; \
|
||
|
|
}
|
||
|
|
|
||
|
|
#define VALIDATE_DOMAIN(TOK) \
|
||
|
|
if( NetpwNameValidate( \
|
||
|
|
(WCHAR *)(TOK)->GetValue(), \
|
||
|
|
NAMETYPE_DOMAIN, \
|
||
|
|
0) != ERROR_SUCCESS) \
|
||
|
|
{ \
|
||
|
|
this->SetErrorToken( TOK ); \
|
||
|
|
throw AdlStatement::ERROR_INVALID_DOMAIN; \
|
||
|
|
}
|
||
|
|
|
||
|
|
#define VALIDATE_PERMISSION(TOK) \
|
||
|
|
{ \
|
||
|
|
for(DWORD i = 0;; i++) \
|
||
|
|
{ \
|
||
|
|
if( (_pControl->pPermissions)[i].str == NULL ) \
|
||
|
|
{ \
|
||
|
|
this->SetErrorToken( TOK ); \
|
||
|
|
throw AdlStatement::ERROR_UNKNOWN_PERMISSION; \
|
||
|
|
} \
|
||
|
|
if(!_wcsicmp(TOK->GetValue(), \
|
||
|
|
(_pControl->pPermissions)[i].str)) \
|
||
|
|
{ \
|
||
|
|
break; \
|
||
|
|
} \
|
||
|
|
} \
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* YACC value type*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
#define YYSTYPE AdlToken *
|
||
|
|
|
||
|
|
/**/
|
||
|
|
/* YACC error handler: raise an exception*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
void yyerror(char *szErr)
|
||
|
|
{
|
||
|
|
throw AdlStatement::ERROR_NOT_IN_LANGUAGE;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
#define TK_ERROR 257
|
||
|
|
#define TK_IDENT 258
|
||
|
|
#define TK_AT 259
|
||
|
|
#define TK_SLASH 260
|
||
|
|
#define TK_PERIOD 261
|
||
|
|
#define TK_COMMA 262
|
||
|
|
#define TK_OPENPAREN 263
|
||
|
|
#define TK_CLOSEPAREN 264
|
||
|
|
#define TK_SEMICOLON 265
|
||
|
|
#define TK_EXCEPT 266
|
||
|
|
#define TK_ON 267
|
||
|
|
#define TK_ALLOWED 268
|
||
|
|
#define TK_AND 269
|
||
|
|
#define TK_AS 270
|
||
|
|
#define TK_THIS_OBJECT 271
|
||
|
|
#define TK_CONTAINERS 272
|
||
|
|
#define TK_OBJECTS 273
|
||
|
|
#define TK_CONTAINERS_OBJECTS 274
|
||
|
|
#define TK_NO_PROPAGATE 275
|
||
|
|
#define TK_LANG_ENGLISH 276
|
||
|
|
#define TK_LANG_REVERSE 277
|
||
|
|
#define YYERRCODE 256
|
||
|
|
short yylhs[] = { -1,
|
||
|
|
0, 0, 1, 1, 3, 3, 2, 2, 8, 8,
|
||
|
|
4, 4, 4, 5, 5, 5, 6, 6, 6, 10,
|
||
|
|
7, 7, 7, 9, 9, 13, 13, 13, 14, 14,
|
||
|
|
12, 12, 12, 12, 12, 11, 11, 11, 11, 11,
|
||
|
|
11, 11,
|
||
|
|
};
|
||
|
|
short yylen[] = { 2,
|
||
|
|
2, 2, 1, 2, 10, 6, 1, 2, 10, 6,
|
||
|
|
1, 3, 3, 1, 3, 3, 1, 3, 3, 1,
|
||
|
|
1, 3, 3, 1, 3, 3, 3, 1, 1, 3,
|
||
|
|
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
|
||
|
|
1, 1,
|
||
|
|
};
|
||
|
|
short yydefred[] = { 0,
|
||
|
|
0, 0, 0, 42, 36, 40, 41, 37, 38, 39,
|
||
|
|
0, 3, 0, 11, 0, 0, 0, 0, 0, 0,
|
||
|
|
7, 4, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 8, 0, 12, 0, 0, 17, 20, 13, 29,
|
||
|
|
0, 25, 27, 30, 0, 14, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 19, 31, 32, 33,
|
||
|
|
34, 35, 0, 21, 18, 15, 0, 16, 0, 0,
|
||
|
|
0, 6, 0, 0, 10, 0, 23, 22, 0, 0,
|
||
|
|
0, 0, 0, 5, 9,
|
||
|
|
};
|
||
|
|
short yydgoto[] = { 3,
|
||
|
|
11, 19, 12, 13, 45, 36, 63, 21, 14, 37,
|
||
|
|
15, 64, 16, 17,
|
||
|
|
};
|
||
|
|
short yysindex[] = { -222,
|
||
|
|
-238, -210, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
-238, 0, -184, 0, -249, -257, -136, -248, -210, -254,
|
||
|
|
0, 0, -238, -240, -238, -238, -238, -238, -238, -238,
|
||
|
|
-238, 0, -238, 0, -238, -179, 0, 0, 0, 0,
|
||
|
|
-227, 0, 0, 0, -224, 0, -176, -220, -238, -152,
|
||
|
|
-238, -238, -238, -238, -152, -216, 0, 0, 0, 0,
|
||
|
|
0, 0, -173, 0, 0, 0, -168, 0, -167, -238,
|
||
|
|
-152, 0, -152, -238, 0, -163, 0, 0, -159, -152,
|
||
|
|
-152, -153, -151, 0, 0,
|
||
|
|
};
|
||
|
|
short yyrindex[] = { 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
41, 0, 0, 0, -199, -187, 0, 0, 80, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
-196, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
||
|
|
0, 0, 0, 0, 0,
|
||
|
|
};
|
||
|
|
short yygindex[] = { 0,
|
||
|
|
0, 0, 76, -2, 62, -31, -44, 86, -19, -28,
|
||
|
|
-24, -49, 79, 88,
|
||
|
|
};
|
||
|
|
#define YYTABLESIZE 125
|
||
|
|
short yytable[] = { 20,
|
||
|
|
38, 47, 40, 34, 43, 44, 39, 23, 38, 27,
|
||
|
|
69, 46, 28, 33, 26, 46, 20, 31, 4, 5,
|
||
|
|
57, 77, 65, 78, 38, 35, 38, 6, 7, 8,
|
||
|
|
9, 10, 66, 30, 68, 82, 83, 52, 76, 53,
|
||
|
|
1, 52, 79, 56, 54, 38, 4, 5, 54, 38,
|
||
|
|
67, 70, 18, 1, 2, 6, 7, 8, 9, 10,
|
||
|
|
29, 29, 28, 28, 28, 26, 26, 26, 28, 28,
|
||
|
|
28, 26, 26, 26, 24, 24, 24, 23, 24, 2,
|
||
|
|
24, 24, 49, 25, 26, 49, 22, 50, 71, 51,
|
||
|
|
55, 72, 51, 23, 71, 73, 48, 75, 49, 74,
|
||
|
|
26, 73, 49, 80, 32, 51, 42, 81, 71, 51,
|
||
|
|
71, 84, 0, 85, 41, 73, 0, 73, 58, 59,
|
||
|
|
60, 61, 62, 29, 30,
|
||
|
|
};
|
||
|
|
short yycheck[] = { 2,
|
||
|
|
25, 33, 27, 23, 29, 30, 26, 262, 33, 259,
|
||
|
|
55, 31, 270, 268, 269, 35, 19, 266, 257, 258,
|
||
|
|
49, 71, 51, 73, 49, 266, 51, 266, 267, 268,
|
||
|
|
269, 270, 52, 261, 54, 80, 81, 262, 70, 264,
|
||
|
|
0, 262, 74, 264, 269, 70, 257, 258, 269, 74,
|
||
|
|
53, 268, 263, 276, 277, 266, 267, 268, 269, 270,
|
||
|
|
260, 261, 262, 263, 264, 262, 263, 264, 268, 269,
|
||
|
|
270, 268, 269, 270, 262, 263, 264, 262, 263, 0,
|
||
|
|
268, 269, 262, 268, 269, 262, 11, 267, 262, 269,
|
||
|
|
267, 265, 269, 262, 262, 269, 35, 265, 262, 268,
|
||
|
|
269, 269, 262, 267, 19, 269, 28, 267, 262, 269,
|
||
|
|
262, 265, -1, 265, 27, 269, -1, 269, 271, 272,
|
||
|
|
273, 274, 275, 260, 261,
|
||
|
|
};
|
||
|
|
#define YYFINAL 3
|
||
|
|
#ifndef YYDEBUG
|
||
|
|
#define YYDEBUG 0
|
||
|
|
#endif
|
||
|
|
#define YYMAXTOKEN 277
|
||
|
|
#ifndef YYSTYPE
|
||
|
|
typedef int YYSTYPE;
|
||
|
|
#endif
|
||
|
|
#ifdef YYSTACKSIZE
|
||
|
|
#undef YYMAXDEPTH
|
||
|
|
#define YYMAXDEPTH YYSTACKSIZE
|
||
|
|
#else
|
||
|
|
#ifdef YYMAXDEPTH
|
||
|
|
#define YYSTACKSIZE YYMAXDEPTH
|
||
|
|
#else
|
||
|
|
#define YYSTACKSIZE 500
|
||
|
|
#define YYMAXDEPTH 500
|
||
|
|
#endif
|
||
|
|
#endif
|
||
|
|
#define yystacksize YYSTACKSIZE
|
||
|
|
#define YYABORT goto yyabort
|
||
|
|
#define YYREJECT goto yyabort
|
||
|
|
#define YYACCEPT goto yyaccept
|
||
|
|
#define YYERROR goto yyerrlab
|
||
|
|
int
|
||
|
|
AdlStatement::ParseAdl(const WCHAR *szInput)
|
||
|
|
{
|
||
|
|
register int yym, yyn, yystate;
|
||
|
|
|
||
|
|
int yydebug = 0;
|
||
|
|
int yynerrs;
|
||
|
|
int yyerrflag;
|
||
|
|
int yychar;
|
||
|
|
short *yyssp;
|
||
|
|
YYSTYPE *yyvsp;
|
||
|
|
YYSTYPE yyval;
|
||
|
|
YYSTYPE yylval;
|
||
|
|
short yyss[YYSTACKSIZE];
|
||
|
|
YYSTYPE yyvs[YYSTACKSIZE];
|
||
|
|
AdlLexer Lexer(szInput, this, _pControl->pLang);
|
||
|
|
|
||
|
|
|
||
|
|
yynerrs = 0;
|
||
|
|
yyerrflag = 0;
|
||
|
|
yychar = (-1);
|
||
|
|
|
||
|
|
yyssp = yyss;
|
||
|
|
yyvsp = yyvs;
|
||
|
|
*yyssp = yystate = 0;
|
||
|
|
|
||
|
|
yyloop:
|
||
|
|
if (yyn = yydefred[yystate]) goto yyreduce;
|
||
|
|
if (yychar < 0)
|
||
|
|
{
|
||
|
|
if ((yychar = Lexer.NextToken(&yylval)) < 0) yychar = 0;
|
||
|
|
}
|
||
|
|
if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
|
||
|
|
yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
|
||
|
|
{
|
||
|
|
if (yyssp >= yyss + yystacksize - 1)
|
||
|
|
{
|
||
|
|
goto yyoverflow;
|
||
|
|
}
|
||
|
|
*++yyssp = yystate = yytable[yyn];
|
||
|
|
*++yyvsp = yylval;
|
||
|
|
yychar = (-1);
|
||
|
|
if (yyerrflag > 0) --yyerrflag;
|
||
|
|
goto yyloop;
|
||
|
|
}
|
||
|
|
if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
|
||
|
|
yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
|
||
|
|
{
|
||
|
|
yyn = yytable[yyn];
|
||
|
|
goto yyreduce;
|
||
|
|
}
|
||
|
|
if (yyerrflag) goto yyinrecovery;
|
||
|
|
#ifdef lint
|
||
|
|
goto yynewerror;
|
||
|
|
#endif
|
||
|
|
yyerror("syntax error");
|
||
|
|
#ifdef lint
|
||
|
|
goto yyerrlab;
|
||
|
|
#endif
|
||
|
|
yyinrecovery:
|
||
|
|
if (yyerrflag < 3)
|
||
|
|
{
|
||
|
|
yyerrflag = 3;
|
||
|
|
for (;;)
|
||
|
|
{
|
||
|
|
if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
|
||
|
|
yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
|
||
|
|
{
|
||
|
|
if (yyssp >= yyss + yystacksize - 1)
|
||
|
|
{
|
||
|
|
goto yyoverflow;
|
||
|
|
}
|
||
|
|
*++yyssp = yystate = yytable[yyn];
|
||
|
|
*++yyvsp = yylval;
|
||
|
|
goto yyloop;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (yyssp <= yyss) goto yyabort;
|
||
|
|
--yyssp;
|
||
|
|
--yyvsp;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (yychar == 0) goto yyabort;
|
||
|
|
yychar = (-1);
|
||
|
|
goto yyloop;
|
||
|
|
}
|
||
|
|
yyreduce:
|
||
|
|
yym = yylen[yyn];
|
||
|
|
yyval = yyvsp[1-yym];
|
||
|
|
switch (yyn)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
{
|
||
|
|
/**/
|
||
|
|
/* At the end of all ADL_STATEMENT's*/
|
||
|
|
/* pop the extra AdlTree that was pushed*/
|
||
|
|
/* on when the last ADL_STATEMENT*/
|
||
|
|
/* was completed*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
this->PopEmpty();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
{
|
||
|
|
/**/
|
||
|
|
/* At the end of all ADL_STATEMENT's*/
|
||
|
|
/* pop the extra AdlTree that was pushed*/
|
||
|
|
/* on when the last ADL_STATEMENT*/
|
||
|
|
/* was completed*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
this->PopEmpty();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
{
|
||
|
|
this->Next();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
{
|
||
|
|
this->Next();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
{
|
||
|
|
this->Next();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
{
|
||
|
|
this->Next();
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 11:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 12:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 13:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 14:
|
||
|
|
{
|
||
|
|
this->Cur()->AddExPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 15:
|
||
|
|
{
|
||
|
|
this->Cur()->AddExPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 16:
|
||
|
|
{
|
||
|
|
this->Cur()->AddExPrincipal( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 17:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPermission( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 18:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPermission( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 19:
|
||
|
|
{
|
||
|
|
this->Cur()->AddPermission( yyvsp[0] );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 20:
|
||
|
|
{
|
||
|
|
VALIDATE_PERMISSION(yyvsp[0]);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 25:
|
||
|
|
{
|
||
|
|
/**/
|
||
|
|
/* For now, impersonation is not supported*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
throw AdlStatement::ERROR_IMPERSONATION_UNSUPPORTED;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 26:
|
||
|
|
{
|
||
|
|
VALIDATE_USERNAME(yyvsp[-2]);
|
||
|
|
VALIDATE_DOMAIN(yyvsp[0]);
|
||
|
|
AdlToken *newTok = new AdlToken(yyvsp[-2]->GetValue(),
|
||
|
|
yyvsp[0]->GetValue(),
|
||
|
|
yyvsp[-2]->GetStart(),
|
||
|
|
yyvsp[0]->GetEnd());
|
||
|
|
this->AddToken(newTok);
|
||
|
|
yyval = newTok;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 27:
|
||
|
|
{
|
||
|
|
|
||
|
|
VALIDATE_USERNAME(yyvsp[0]);
|
||
|
|
VALIDATE_DOMAIN(yyvsp[-2]);
|
||
|
|
AdlToken *newTok = new AdlToken(yyvsp[0]->GetValue(),
|
||
|
|
yyvsp[-2]->GetValue(),
|
||
|
|
yyvsp[-2]->GetStart(),
|
||
|
|
yyvsp[0]->GetEnd());
|
||
|
|
this->AddToken(newTok);
|
||
|
|
yyval = newTok;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 28:
|
||
|
|
{
|
||
|
|
VALIDATE_USERNAME(yyvsp[0]);
|
||
|
|
yyval = yyvsp[0];
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 30:
|
||
|
|
{
|
||
|
|
/**/
|
||
|
|
/* Concatenate into single domain string*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
wstring newStr;
|
||
|
|
newStr.append(yyvsp[-2]->GetValue());
|
||
|
|
newStr.append(yyvsp[-1]->GetValue());
|
||
|
|
newStr.append(yyvsp[0]->GetValue());
|
||
|
|
AdlToken *newTok = new AdlToken(newStr.c_str(),
|
||
|
|
yyvsp[-2]->GetStart(),
|
||
|
|
yyvsp[-2]->GetEnd());
|
||
|
|
this->AddToken(newTok);
|
||
|
|
yyval = newTok;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 31:
|
||
|
|
{
|
||
|
|
this->Cur()->UnsetFlags(INHERIT_ONLY_ACE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 32:
|
||
|
|
{
|
||
|
|
this->Cur()->SetFlags(CONTAINER_INHERIT_ACE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 33:
|
||
|
|
{
|
||
|
|
this->Cur()->SetFlags(OBJECT_INHERIT_ACE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 34:
|
||
|
|
{
|
||
|
|
this->Cur()->SetFlags(CONTAINER_INHERIT_ACE);
|
||
|
|
this->Cur()->SetFlags(OBJECT_INHERIT_ACE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 35:
|
||
|
|
{
|
||
|
|
this->Cur()->SetFlags(NO_PROPAGATE_INHERIT_ACE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case 42:
|
||
|
|
{
|
||
|
|
/**/
|
||
|
|
/* This should never happen*/
|
||
|
|
/**/
|
||
|
|
|
||
|
|
throw AdlStatement::ERROR_FATAL_LEXER_ERROR;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
yyssp -= yym;
|
||
|
|
yystate = *yyssp;
|
||
|
|
yyvsp -= yym;
|
||
|
|
yym = yylhs[yyn];
|
||
|
|
if (yystate == 0 && yym == 0)
|
||
|
|
{
|
||
|
|
yystate = YYFINAL;
|
||
|
|
*++yyssp = YYFINAL;
|
||
|
|
*++yyvsp = yyval;
|
||
|
|
if (yychar < 0)
|
||
|
|
{
|
||
|
|
if ((yychar = Lexer.NextToken(&yylval)) < 0) yychar = 0;
|
||
|
|
}
|
||
|
|
if (yychar == 0) goto yyaccept;
|
||
|
|
goto yyloop;
|
||
|
|
}
|
||
|
|
if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
|
||
|
|
yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
|
||
|
|
yystate = yytable[yyn];
|
||
|
|
else
|
||
|
|
yystate = yydgoto[yym];
|
||
|
|
if (yyssp >= yyss + yystacksize - 1)
|
||
|
|
{
|
||
|
|
goto yyoverflow;
|
||
|
|
}
|
||
|
|
*++yyssp = yystate;
|
||
|
|
*++yyvsp = yyval;
|
||
|
|
goto yyloop;
|
||
|
|
yyoverflow:
|
||
|
|
yyerror("yacc stack overflow");
|
||
|
|
yyabort:
|
||
|
|
return (1);
|
||
|
|
yyaccept:
|
||
|
|
return (0);
|
||
|
|
}
|