/
[LITERALS]
[ATTRIBUTES]
1 PROTID/0
ACCESSMODE/1
TRANSCODE/2
TEXTFORM/3
MAXREC/5
TRANSLIM/6
INITM/11
TIMEOUT/13
FACILITIES/14
TRANSSTATE/15
DATATYPE/32
FILENAME/64
USERNAME/66
USERPASS/68
FILEPASS/69
ACCOUNT/74
ACCPASS/75
FILESIZE/96
INFO/113
[COMMANDS]
STOPC/0
GOC/1
RPOSC/2
RNEGC/3
SFTC/4
STOPACKC/5
[TRANSFER COMMANDS]
SS/64
CS/66
ES/67
ER/71
ZERO/0
[QUALIFIERS]
VEQ/34
SEQ/50
VCOMP/32(4)
SCOMP/48(4)
[ACTIONS]
[ANALYSIS CONTROL]
INIT/0(8)
TERM/0(9)
[TRANSFER]
DATA''/0(15)
[COUNTERS]
RCB/0(6)
PCOUNT/1(5)
PARAM/1(7)
SCOUNT/2(5)
STEST/2(7)
[OTHER INPUTS]
CHAR/0(2)[APPEND CHAR]
DISCARD/0(3)[DISCARD CHAR]
MODE0/0(16)[READ EVERYTHING MODE]
MODE1/1(16)[READ RECORDS MODE]
PINIT/0(17)[INIT PARAM COUNTER IN AR]
[ATTRIBUTE VALUES]
TST0/0(7)
TST1/0(23)
TST2/1(34)[EQ 1]
TST3/128(34)[EQ 128]
TST4/0(34)[EQ ZERO]
[TEST ATTRIBUTES]
DROP3/3(18)
DROP4/4(18)
UNKNOWN/TST0(19)[ATTRIBUTE UNKNOWN]
TESTANY/TST1(19)[ANY]
TEST1/TST2(19)[EQ MAKE OR IA5 OR TEXT]
TEST128/TST3(19)[EQ FREE]
TESTZERO/TST4(19)[EQ ZERO]
SETFNAME/1(20)
OPEN/0(21)
CLOSE/0(22)
[OUTPUTS]
[LITERAL]
ZERO'/0(11)
ER'/71(11)
RPOSC'/2(11)
RNEGC'/3(11)
STOPACKC'/5(11)
[ACTIONS]
AR'/0(14)
RCB'/0(10)
EOR'/0(12)
PUSH'/0(13)
[PHRASES]
FTP
SFT
NOTSFT
RPOS'
RNEG'
GO[DISCARD* AT END IS TO GET ROUND A BRIAN BUG]
STOP
STOPACK'
SS0
CSN
ES0
ER0'
INTEGER
STRING
SDISCARD
/
FTP -> INIT (SFT RPOS' GO OPEN SS0 CSN? (RCB DATA''*)* ES0 ER0' STOP CLOSE STOPACK',
       NOTSFT RNEG' STOP STOPACK')

SFT -> RCB SFTC PCOUNT PINIT (PARAM (PROTID VEQ INTEGER DROP4,
         ACCESSMODE VCOMP INTEGER TEST1,
         TRANSCODE VCOMP INTEGER TEST1,
         TEXTFORM VCOMP INTEGER TEST128,
         MAXREC VCOMP INTEGER TESTANY,
         TRANSLIM VCOMP INTEGER TESTANY,
         INITM VCOMP INTEGER TESTZERO,
         TIMEOUT VCOMP INTEGER TESTANY,
         FACILITIES VCOMP INTEGER TESTZERO,
         DATATYPE VCOMP INTEGER TEST1,
         FILENAME SEQ STRING SETFNAME,
         USERNAME SEQ SDISCARD DROP3,
         USERPASS SEQ SDISCARD DROP3,
         FILEPASS SEQ SDISCARD DROP3,
         ACCOUNT SEQ SDISCARD DROP3,
         ACCPASS SEQ SDISCARD DROP3,
         FILESIZE VCOMP INTEGER TESTANY,
         INFO SEQ SDISCARD DROP3,
         CHAR (VCOMP INTEGER, SCOMP SDISCARD) UNKNOWN))*

NOTSFT -> DISCARD*

INTEGER -> CHAR CHAR

STRING -> SCOUNT (STEST CHAR)*

SDISCARD -> SCOUNT (STEST DISCARD)*

GO -> RCB GOC ZERO DISCARD*

SS0 -> MODE0 ZERO SS ZERO

CSN -> MODE0 ZERO CS CHAR

ES0 -> MODE0 ZERO ES ZERO

ER0' -> ZERO' ER' ZERO' PUSH'

STOP -> RCB STOPC (ZERO, PCOUNT (PARAM (TRANSSTATE VEQ INTEGER DROP4,
         INFO SEQ SDISCARD DROP3))*)

RPOS' -> RCB' RPOSC' AR'* EOR'

RNEG' -> RCB' RNEGC' ZERO' EOR'

STOPACK' -> RCB' STOPACKC' ZERO' EOR'

/