Columbia Kermit/kermit.zip/archives/vmspascal.zip/vxinst.com

Text File | 1988-08-16 | 4KB | 100 lines

$    set noon
$    set nover
$ !
$ !    Command file to compile and install Kermit on a VAX/VMS system.
$ !    Note:  Please examine comments marked by *****, they will describe
$ !    modifications necessary to install kermit for your system.  After
$ !    running install, be sure to modify systartup.com, and sylogin.com.
$ !
$ !    Author: Bruce W. Pinn
$ !    Site:   University of Toronto Computing Services
$ !    Date:   May 31, 1983
$ !
$ !    Modified: Philip Murton
$ !    Date:   Sept. 18, 1984
$ !
$ !    Added 'hex' file.
$ !
$    on control_y then goto fini
$    sysdisk := f$logical("SYS$DISK")
$    kermitdirect := 'f$directory()
$    defuic := 'f$user()
$    write sys$output " "
$    write sys$output "        Kermit-VMS Install Procedure"
$    write sys$output " "
$    inquire answer " Rebuild from sources? (YES or no)"
$    if answer .eqs. "" then goto Build_Source
$    if answer then goto Build_Source
$    inquire answer " Build from HEX file? (YES or no)"
$    if answer .eqs. "" then goto HEX_file
$    if answer then goto HEX_file
$    goto Install
$ Build_Source:
$    inquire answer " Do you have a PASCAL Compiler? (YES or no)"
$    if answer .eqs. "" then goto Create_Kermit
$    if answer then goto Create_Kermit
$ HEX_file:
$    write sys$output " "
$    write sys$output " Creating Kermit.exe from Kermit.hex"
$    write sys$output "     (Fortran used for this)"
$    write sys$output " "
$    @hex
$    goto Install
$ Create_Kermit:
$    set prot=(s:rwed,g:rwed,o:rwed,w:re)/default
$    @pas
$    @fort
$    @link
$ Finished_Comp:
$    inquire answer " Install Kermit-VMS on the system? (YES or no)"
$    if answer .eqs. "" then goto install
$    if answer then goto install
$    goto Fini
$ Install:
$    set proc/priviledge=(cmk,sysprv,sysnam,log_io)
$    set uic [1,4]
$    write sys$output " Installing image, and defining system logical names."
$    copy kermit.exe sys$system:kermit.exe
$ !******
$ !    Modify terminal list for your site. (ie. replace terminal list with a
$ !    list of terminals that you will be using for out-dialing from your
$ !    VAX).  List should appear as follows:
$ !        assign/system "_TTA1: _TTA2: _TTA3:" kermit$rem0
$ !******
$    assign/system {terminal list} kermit$rem0
$ !******
$ !    Replicate the following line once for each terminal in your terminal
$ !    list.  Replace {AAAAA} with one terminal in list.  (ie. for above
$ !    example :
$ !    set terminal _TTA1:/PERM/NOMODEM/NOEIGHT/NOAUTOBAUD/ALTYPEAHD
$ !    set terminal _TTA2:/PERM/NOMODEM/NOEIGHT/NOAUTOBAUD/ALTYPEAHD
$ !    set terminal _TTA3:/PERM/NOMODEM/NOEIGHT/NOAUTOBAUD/ALTYPEAHD
$ !******
$    set terminal {AAAAAA} /PERM/NOMODEM/NOEIGHT/NOAUTOBAUD/HOST/TTSYNC -
                /ALTYPEAHD
$ !******
$ !    Modify kermit directory to reflect the locations where kermit source
$ !    is held.  For example :
$ !    assign/system DRA0:[KERMIT] kermdir:
$ !******
$    assign/system {kermit directory} kermdir:
$    assign/system kermdir:kermit.txt kermithlp:
$    mcr install
SYS$SYSTEM:KERMIT.EXE/PRIV=(SYSPRV,ALTPRI,PSWAPM)
$    write sys$output " Please insert the following lines into your system"
$    write sys$output " startup file (ie. SYSTARTUP.COM) :"
$    write sys$output "    $ assign/system ""{terminal list}"" kermit$rem0
$    write sys$output "    $ assign/system sys$help:kermit.hlp kermithlp:"
$    write sys$output "    $ mcr install
$    write sys$output "    SYS$SYSTEM:KERMIT.EXE/PRIV=(SYSPRIV,ALTPRI,PSAWPM)
$    write sys$output " "
$    write sys$output " Also insert the following lines in your system wide"
$    write sys$output " login file :"
$    write sys$output "    $ assign 'f$logical("SYS$OUTPUT")' kermit$local
$    write sys$output "    $ kermit := $sys$system:kermit.exe"
$ Fini:
$    if "''defuic'" .nes. "" then set uic 'defuic
$    set process/priv=(nocmk,nosysprv,nolog_io,nosysnam)
$    set on
$    exit