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.
 
 
 
 
 
 

99 lines
3.3 KiB

/*------------------------------------------------------------------
Copyright (c) 1998-1999 Microsoft Corporation
tnadmin.l generates tnadminl.c (using flex)
vikram ([email protected])
This lex file recognises tokens in the command line and passes it to the
command line parser.(tnadmin.y)
-----------------------------------------------------------------*/
%{
#include <string.h>
#include <stdlib.h>
#include "tnadminy.h"
#define YY_NEVER_INTERACTIVE 1
#define fileno _fileno
#define strdup _strdup
int nMoccur=-1;
char **filelist;
int currentfile=1;
//between yacc and lex
int g_fMessage=0;
int g_fComp=1;
int g_fNormal=1;
char * szCompname=NULL;
%}
%option noyywrap
delim [ \t]
ws {delim}+
letter [A-Za-z\"]
digit [0-9]
digit2 [0-5]
integer {digit}+
time (({integer}:)?[0-5]?[0-9]:)?[0-5]?[0-9]
num123 {digit}{digit}?{digit}?
string {letter}({letter}|{digit})*
message [A-Za-z0-9\\\|\}\{\]\[\+\=\-\_\(\)\*\&\^\%\$\@\!\~\`\;\:\"\'\<\,\>\.\?\/ ]+
ipno ((0|1)?[0-9]|2[0-4])?[0-9]|25[0-5]
ipaddr {ipno}\.{ipno}\.{ipno}\.{ipno}
comp [^ \t\n\r\.\=\+\/\\]*
cname ({comp}\.)*{comp}
computer (\\\\)?({cname}|{ipaddr})
%%
"#"/"\n" {return _ENDINPUT;}
"-?"|"/?" {if(g_fNormal==0)REJECT;return _HELP;}
<<EOF>> {return 0;}
"\n" {return(0);}
"tnadmin" {if(g_fNormal==0)REJECT;return(_TNADMIN);}
"-u"/[ \t] {if(g_fNormal==0)REJECT;return(_tU);}
"-p"/[ \t] {if(g_fNormal==0)REJECT;return(_tP);}
"start" {if(g_fNormal==0)REJECT;return(_START);}
"stop" {if(g_fNormal==0)REJECT;return( _STOP);}
"pause" {if(g_fNormal==0)REJECT;return(_PAUSE);}
"continue" {if(g_fNormal==0)REJECT;return(_CONTINUE);}
"-s"/[ \t] {if(g_fNormal==0)REJECT;return(_S);}
"-k"/[ \t] {if(g_fNormal==0)REJECT;return(_K);}
"-m"/[ \t] {if(g_fNormal==0)REJECT;nMoccur=0;return(_M);}
"config" {if(g_fNormal==0)REJECT;return(_CONFIG);}
"dom" {if(g_fNormal==0)REJECT;return(_DOM);}
"ctrlakeymap" {if(g_fNormal==0)REJECT;return(_CTRLKEYMAP);}
"no"|"n" {if(g_fNormal==0)REJECT;return(_N);}
"yes"|"y" {if(g_fNormal==0)REJECT;return(_Y);}
"timeout" {if(g_fNormal==0)REJECT;return(_TIMEOUT);}
"timeoutactive" {if(g_fNormal==0)REJECT;return(_TIMEOUTACTIVE);}
"maxfail" {if(g_fNormal==0)REJECT;return(_MAXFAIL);}
"maxconn" {if(g_fNormal==0)REJECT;return(_MAXCONN);}
"port" {if(g_fNormal==0)REJECT;return(_PORT);}
"killall" {if(g_fNormal==0)REJECT;return(_KILLALL);}
"sec" {if(g_fNormal==0)REJECT;return(_SEC);}
"-NTLM" {if(g_fNormal==0)REJECT;return _MINUSNTLM;}
[+]?"NTLM" {if(g_fNormal==0)REJECT;return _PLUSNTLM;}
"-PASSWD" {if(g_fNormal==0)REJECT;return _MINUSPASSWD;}
[+]?"PASSWD" {if(g_fNormal==0)REJECT;return _PLUSPASSWD;}
"mode" {if(g_fNormal==0)REJECT;return(_MODE);}
"console" {if(g_fNormal==0)REJECT;return(_CONSOLE);}
"stream" {if(g_fNormal==0)REJECT;return(_STREAM);}
"=" {if(g_fNormal==0)REJECT;return(_EQ);}
{integer} {if(g_fNormal==0)REJECT;return(_INTEGER);}
{time} {if(g_fNormal==0)REJECT;return(_TIME);}
"all" {if(g_fNormal==0)REJECT;return(_SESID);}
{computer}|\. {if(g_fComp==0)
REJECT;
szCompname=strdup(yytext);return(_COMPNAME);}
{ws} {}
. {return _DUNNO;}
%%