Directory of image this file is from
This file as a plain text file
/******* MULTI8 SPOOL FILE XFER TASK ******* /NAME: SP /LENGTH: 2 PAGES +2 PAGE BUFFER. /FUNCTION:THIS MODULE PERFORMS BLOCK TRANSFERS FROM A FILE- / ORIENTED MASS STORAGE DEVICE OR A CHARACTERORIENTED / INPUT DEVICE TO A CHARACTERORIENTED OUTPUT DEVICE. / SINCE THE FOREGROUND IS NOT ALLOWED TO WRITE ONTO / THE BACKGROUND DISK,THIS TASK CAN ONLY DRAIN INFOR- / MATION FROM THE DISK AND OTHER MASS STORAGE DEVICES. / IT IS CONTROLLED BY THE FOLLOWING TYPE-IN: / *PP:<PR: / *FILENA.ME,FILE2.AS,FILE3.LS....ETC. / *PP:<DK1:FILE.EX.........ETC / ALSO RECOGNISES UNIT NUMBERS. / *[OUTPUT MOD."<"][MASS INPUT MOD.][FILENAME][EXT] / THE COMMAND STRING *:FILENA.ME / TAKES DEFAULT DEVICES LP AND SY. / SPOOL RECOGNIZES THE FILE-ORIENTED DEVICE BY THE / FACT THAT A FILENAME HAS BEEN ENTERED. / WHEN A CR IS TYPED IMMEDIATELY BEHIND THE *,THEN / THE DEFAULT COMMAND: / *LP:<SY:1.LS,2.LS,3.LS,4.LS,5.LS / WILL BE EXECUTED. / WHEN A DIRECTORY SEARCH FAILS,I.E. A FILENAME DOES / NOT EXIST, THEN THE PROGRAM TRIES TO FIND THE NEXT / ONE SPECIFIED. /CONCEPT:LISTING FILES CAN BE PRINTED BY THE FOREGROUND. / THE MODULE READS A LINE FROM THE LINE INPUTTER, PER- / FORMS A DIRECTORY SEARCH ON THE MASS INPUT DEVICE, / AND TRANSFERS BLOCKS FROM INPUT TO OUTPUT DEVICE. / THE INTERMEDIATE BUFFER IS LOCATED WITHIN SPOOL. / THIS ENABLES ONE TO KILL SPOOL DURING EXECUTION. / THE MODULE BEHAVES SILENTLY AFTER THE TYPE-IN: ANY / ERROR CAUSES THE MODULE TO STOP. / /NOTE: ONE MUST BE CAREFUL IN TYPING THE COMMAND LINE, SIN- / CE NO CHECK IS IMPLEMENTED, WHETHER THE TYPED NAME / INDEED CORRESPONDS TO A BLOCKDRIVER. THIS CAN BLOW / UP THE SYSTEM ! / /ERRORS:1) LINE INPUTTER NOT THERE / 2) DIRECTORY SEARCHER NOT THERE / 3) ERRONEOUS COMMAND LINE / 4) CTRL/B TYPED IN COMMAND LINE / 5) MONITOR HAS NO ROOM FOR BUFFER / 6) I/O ERRORS /MODULES USED:DIRECTORY SEARCHER;LINE INPUTTER;COMMANDINPUT; / COMMAND OUTPUT(ECHO);OUTPUT MODULE;INPUT MODULE /USE: TAD ("K^100+"1&3777 /ENTRY DEVICE NAME IN AC / JMS MONITOR /OR AC=0: DEFAULT "K1","T1" / CALL / / "S^100+"P&3777 /SPOOL / ERROR RETURN /SPOOL NOT AVAILABLE; AC UNCHANGED / NORMAL RETURN /AC=0;DF=ANY VALUE
IDEV="K^100+"1&3777 /COMMAND INPUT DEVICE ODEV="L^100+"P&3777 /OUTPUT DEVICE MDEV="S^100+"Y&3777 /DEFAULT MASS DEVICE *200 SPNTR1, "S^100+"P&3777 /NAME SP 1000 /4 PAGES; NO CONNECTS SPI1, SPLINE /A NUMBER OF INDIRECT REFERENCES SPI2, SPFIL SPI3, SPDTV SPI4, SPMDEV SPI5, SPLINE+2 SPI6, SPDO SPI7, SPODEV SPI9, SPDEV SPI12, SPDTV+1 SPI14, SPSTALL SPI17, SPDTV+2 SPSWIT, 0 /END OF RELOCATORS SPNTR2=ZTEM2 SP, CDTOIF SZA /IF NO NAME, TAKE DEFAULTmzUm|42z.