;
; Install SRI/TGV MultiNet 2.0(46)
;
:MULTINET
noexpect
expect "$ " send "dismount/unload duc0:\r"; detach RQC0; continue
expect "$ " attach TU0 -er testing/sri_multinet_2.0_890123.tap; send "@sys$update:vmsinstal multinet020 mta0:\r"; continue
expect "* Do you want to continue anyway [NO]? " send "yes\r"; continue
expect "* Are you satisfied with the backup of your system disk [YES]? " send "yes\r"; continue
expect "* Are you ready? " send "yes\r"; continue
expect "* Do you want to purge files replaced by this installation [YES]? " send "yes\r"; continue
expect "* Configure MultiNet [NO]? " send "yes\r"; continue
expect "* Enter your Internet host name: " send "%HOSTNAME%\r"; continue
expect "* Enter the Internet (IP) Address for interface XEA0: " send "%HOSTADDR%\r"; continue
expect "* Enter the Subnet mask for interface XEA0 (optional): " send "%NETMASK%\r"; continue
expect "* Enter the Internet (IP) Address of your default route (optional): " send "%GATEWAYADDR%\r"; continue
expect "* Use Domain Nameservice instead of host tables [YES]? " send "\r"; continue
expect "* Enter your local timezone: " send "GMT\r"; continue
expect "VMSINSTAL procedure done at " goto MULTINET
goto EOS




;
; Install VAX Rdb/VMS V2.3-0
;
:RDB
noexpect
expect "$ " attach TS0 -er dist/media/16mt9/RDBVMS023.tap; send "@sys$update:vmsinstal rdbvmsdev023 msa0:\r"; continue
expect "* Are you satisfied with the backup of your system disk [YES]? " send "\r"; continue
expect "* Are you ready? " send "yes\r"; continue
expect "* Do you want to proceed [NO]: " send "yes\r"; continue
expect "* Please enter UIC to be used for RDB$REMOTE account (e.g. [ggg,mmm]):" send "[376,370]\r"; continue
expect "* Please enter PASSWORD to be used for RDB$REMOTE account: " send "%RDBPWD%\r"; continue
expect "* Please verify the PASSWORD entered for RDB$REMOTE: " send "%RDBPWD%\r"; continue
expect "* Do you want to run the IVP after the installation [YES]? " send "\r"; continue
expect "* Do you want to purge files replaced by this installation [YES]? " send "\r"; continue
expect "* Please enter UIC to be used for RDB$REMOTE account: " send "[376,370]\r"; continue
expect "* Please enter PASSWORD to be used for RDB$REMOTE account: " send "%RDBPWD%\r"; continue
expect "* Please verify the PASSWORD entered for RDB$REMOTE: " send "%RDBPWD%\r"; continue
expect "VMSINSTAL procedure done at " goto DTR
goto EOS




;
; Install VAX DATATRIEVE v4.1
;
:DTR
expect "$ " send "@sys$manager:fmstartup\r"; continue
expect "$ " send "@sys$manager:rmonstart\r"; continue
expect "$ " send "@sys$manager:cddstrtup\r"; continue
expect "$ " attach TS0 -er dist/media/16mt9/BB-L786L-BE.tap; send "@sys$update:vmsinstal dtr041 msa0:\r"; continue
expect "* Are you satisfied with the backup of your system disk [YES]? " send "\r"; continue
expect "* Are you ready? " send "yes\r"; continue
expect "* Do you want to use default answers for all questions [NO]? " send "\r"; continue
expect "* Do you want to continue the installation [NO]? " send "yes\r"; continue
expect "* Do you want support for this product in VAX DATATRIEVE [YES]? " send "\r"; continue
expect "* Do you wish to continue with the installation [YES]? " send "\r"; continue
expect "* Do you plan to install this version more than once [NO]? " send "\r"; continue
expect "* Do you wish to leave the DATATRIEVE library online [NO]? " send "yes\r"; continue
expect "* Do you want to replace the NEWUSER file [NO]? " send "yes\r"; continue
expect "* Do you want NEWUSER to create CDD directories for new users [YES]? " send "\r"; continue
expect "* What would you like the parent dictionary directory to be [CDD$TOP.DTR$USERS]: " send "\r"; continue
expect "* Do you want DTRSHR.EXE and DTRMSGS.EXE to be installed SHARED [YES]? " send "\r"; continue
expect "* Do you want DTR32.EXE to be installed SHARED [YES]? " send "\r"; continue
expect "* Do you want DDMF.EXE to be installed SHARED [YES]? " send "\r"; continue
expect "* Do you wish to have the plot definitions [YES]? " send "\r"; continue
expect "* Do you want the optional material [NO]? " send "yes\r"; continue
expect "* Do you want ALL the obsolete files deleted [YES]? " send "\r"; continue
expect "* Do you want to purge files replaced by this installation [YES]? " send "\r"; continue
expect "VMSINSTAL procedure done at " goto DBMS
goto EOS