.; .MODULE IVP,VERSION=31,COMMENT= .; .; Copyright (c) 1998 by Mentec, Inc., Nashua, NH. .; All rights reserved .; .; This software is furnished under a license for use only on a .; single computer system and may be copied only with the .; inclusion of the above copyright notice. This software, or .; any other copies thereof, may not be provided or otherwise .; made available to any other person except for use on such .; system and to one who agrees to these license terms. Title .; to and ownership of the software shall at all times remain .; in Mentec, Inc. .; .; The information in this document is subject to change without .; notice and should not be construed as a commitment by Digital .; Equipment Corporation, or Mentec, Inc. .; .; Digital and Mentec assume no responsibility for the use or .; reliability of its software on equipment which is not supplied .; by Digital or Mentec, and listed in the Software Product .; Description. .; .;*********************************************************************** .; IVP.COM .; RT-11 VERSION 5.6 INSTALLATION VERIFICATION PROGRAM .;*********************************************************************** .DISABLE SUFFIX,PREFIX .ENABLE GLOBAL .IF EQ 10 .GOTO IVP01 ; ; The IVP must be run using the Foreground/Background monitor. ; Reboot the system under FB and restart the IVP. .STOP .IVP01: DEASSIGN .DISABLE QUIET .IFDF $OTHER .GOTO IVP0 ; The Installation Verification Procedure must be run indirectly ; through VERIFY.COM .EXIT .IVP0: ; ; ; INSTALLATION VERIFICATION PROGRAM ; ; ; The Installation Verification Program (IVP) verifies that RT-11 has ; been installed correctly on your hardware configuration. ; ; The program will: ; ; o Print the RT-11 V5.6 Release Notes addenda (if a serial or line ; printer is available) ; ; o Build and run the terminal identification program (IVP.MAC) ; ; o Print the program listing and link map for IVP.MAC (If a serial ; or line printer is available) ; .ASK CONTIN Press the "RETURN" key when ready to continue .IVP22: .SETF LP .SETF LS .SETS LPTYP "line" .TESTDEVICE LP .PARSE "," PRIDEV REST .IF PRIDEV EQ "LP0" .SETS PRIDEV "LP" .IF PRIDEV EQ "LP" .SETT LP .IFT LP .GOTO IVP29 .SETS LPTYP "serial" .SETS PRIDEV "LS" .TESTDEVICE LS .PARSE "," PRIDEV REST .IF PRIDEV EQ "LS0" .SETS PRIDEV "LS" .IF PRIDEV EQ "LS" .SETT LP .IFF LP .GOTO IVP29 ; ASSIGN LS LP .IF EQ .GOTO IVP29 ; ;Error ASSIGNing LS LP .GOTO FAIL .IVP29: .IFT LP .GOTO IVP25 .SETS PRIDEV "" ; ; Your configuration does not contain a line or serial printer. ; .ASK TT Do you want the RT-11 release notes addenda typed at your terminal? .IFF TT .GOTO IVP60 ; ;***********RT11 V5.6 RELEASE NOTES ADDENDA ; TYPE '$OTHER'V5NOTE.TXT ; ;***********END OF RT11 V5.6 RELEASE NOTES ADDENDA ; .IF EQ .GOTO IVP60 ; ;Error TYPEing '$OTHER'V5NOTE.TXT .GOTO FAIL .IVP25: ; ; Please ensure that your 'LPTYP' printer is set On Line ; .ASK CONTIN Press the "RETURN" key when ready to continue. ; .SETS HOW "queued" .IF EQ "DW" .SETS HOW "spooled" ; The RT-11 Version 5.6 release notes addenda will now be ; 'HOW' to this printer. ; LOAD 'PRIDEV' .IF EQ .GOTO IVP30 ; ;Error LOADing 'PRIDEV' .GOTO FAIL .IVP30: .IF EQ "DW" .GOTO IVP35 ; RUN '$OTHER'QUEMAN /A ; FRUN '$OTHER'QUEUE .IF EQ .GOTO IVP50 ; ;Error FRUNing '$OTHER'QUEUE .GOTO FAIL .IVP35: .IFF SET USR NOSWAP .IFF FRUN SY:SPOOL/BUF:256. .IFT FRUN SY:SPOOL.SAV .IF EQ .GOTO IVP38 ; ;Error FRUNing SY:SPOOL .GOTO FAIL .IVP38: ; ASSIGN SP0 LP ; ASSIGN SP0 LP0 .IF EQ .GOTO IVP50 ; ;Error assigning spooler handler (SP) to LP .GOTO FAIL .IVP50: .IF EQ "DW" .GOTO IVP55 ; RUN '$OTHER'QUEMAN 'PRIDEV':='$OTHER'V5NOTE.TXT .IF EQ .GOTO IVP60 ; ;Error QUEUEING '$OTHER'V5NOTE.TXT .GOTO FAIL .IVP55: ; SET SP FLAG=0 ; SETUP PRINTER LETTER .IF EQ .GOTO IVP58 ; ;Error setting printer to letter mode .GOTO FAIL .IVP58: ; PRINT V5NOTE.TXT .IF EQ .GOTO IVP60 ; ;Error printing '$OTHER'V5NOTE.TXT .GOTO FAIL .IVP60: ; ; The console terminal identification program will now be built and run. .IFF LP .GOTO IVP65 ; ; The assembly listing and link map from this program will be printed. .IVP65: .SETS LIST "" .SETS LST $OTHER .IF NE "DY" .SETS LST "SY:" .IFT LP .SETS LIST "/LIST:'LST'IVP/CROSSREF" .IF EQ "DY" ASSIGN '$OTHER' WF ; MACRO'LIST' '$OTHER'IVP .IF EQ .GOTO IVP70 ; ;Error assembling IVP.MAC .GOTO FAIL .IVP70: .IFT LP .SETS LIST "/MAP:'LST'IVP" ; LINK'LIST' IVP .IF EQ .GOTO IVP80 ; ;Error linking IVP.OBJ .GOTO FAIL .IVP80: .IFF LP .GOTO IVP85 .IF EQ "DW" .GOTO IVP82 ; RUN '$OTHER'QUEMAN 'PRIDEV':='LST'IVP.LST/D,'LST'IVP.MAP/D .IF EQ .GOTO IVP85 ; ;Error QUEUEing 'LST'IVP.LST,'LST'IVP.MAP .GOTO FAIL .IVP82: ; SET SP FLAG=1 ; SETUP PRINTER LISTING ; PRINT/DELETE 'LST'IVP.LST,'LST'IVP.MAP .IF EQ .GOTO IVP84 ; ;Error Printing 'LST'IVP.LST,'LST'IVP.MAP .GOTO FAIL .IVP84: ; SET SP FLAG=0 ; SETUP PRINTER HORIZ:10 ; SHOW QUEUE .IVP85: ; RUN IVP /R .IF EQ .OR .IF EQ .GOTO IVP90 ; ;Error running IVP.SAV .GOTO FAIL .IVP90: ; DELETE IVP.(SAV,OBJ) .IF EQ .GOTO IVP100 ; ;Error deleting IVP.(SAV,OBJ) .GOTO FAIL .IVP100: .IFF LP .GOTO IVP115 .IF EQ "DW" .GOTO IVP115 .TESTFILE 'LST'IVP.MAP .IF NE .GOTO IVP102 ; RUN '$OTHER'QUEMAN /L ; ; ...Waiting for listing to finish printing. .IVP101: .TESTFILE 'LST'IVP.MAP .IF EQ .GOTO IVP101 .IVP102: ; RUN '$OTHER'QUEMAN /A .IF EQ .GOTO IVP110 ; ;Error ABORTing Foreground .GOTO FAIL .IVP110: .IFF LP .GOTO IVP111 ; UNLOAD 'PRIDEV' .IF EQ .GOTO IVP111 ; ;Error UNLOADing 'PRIDEV' .GOTO FAIL .IVP111: .IFT .GOTO IVP112 ; SET USR SWAP .IVP112: ; UNLOAD F .IF EQ .GOTO IVP115 ; ;Error UNLOADing Foreground .GOTO FAIL .IVP115: ; ; Your installation has been verified and appears to be correctly ins- ; talled. To obtain information on the various RT-11 commands, enter: ; ; HELP ; ; In addition, the operating system is thoroughly documented: refer ; to the GUIDE TO RT-11 DOCUMENTATION and the RT-11 FOR BEGINNERS. ; These manuals help you become familiar with the system. If you will ; be installing any optional languages or utility software, follow ; the installation instructions packaged with those products. ; ; Digital suggests you now edit the provided startup command file(s) ; (STRTXM.COM and/or STRTFB.COM) to select the run-time options ap- ; propriate for your configuration. ; UNPROTECT SY:STRT*.COM/NOLOG .IF NE "DW" .GOTO CON .IFF LP .GOTO CON ; ; The spooler has been left running for your convenience, however, if ; you wish to rerun this procedure, you must abort the foreground job ; with the ABORT F command and deassign LP and LP0 before doing so. .GOTO CON .FAIL: ; ; The Installation Verification Program has failed due to the ; error specified above. .CON: ; .ASK CONTIN Press the "RETURN" key when ready to continue. .EXIT