Type ASSEMBLE
Source Lines : 1,051
Fixes Applied : 3
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [HRC014DS]
Module
DMSINI
Function
TO READ OR WRITE A CMS NUCLEUS
Attributes
DISK RESIDENT
Operation
DMSINIR - READ A NUCLEUS INTO MAIN STORAGE 1. STORE THE DATA ADDRESS IN THE READ CCWS. 2. READ ONE TRACK OF THE NUCLEUS FROM THE IPL DEVICE. 3. IF THE NUCLEUS IS NOT COMPLETELY READ, GO TO STEP 1. 4. GO TO MODULE DMSINS TO CONTINUE WITH THE INITIALIZATION. DMSINIW - WRITE A NUCLEUS ONTO A DASD DEVICE 1. SEE IF A CONSOLE EXISTS AT ADDRESS 009. IF NOT, WAIT FOR AN INTERRUPT FROM A CONSOLE DEVICE. 2. ASK THE USER TO ENTER THE SYSTEM DISK ADDRESS. 2A. ASK USER TO ENTER Y-DISK ADDRESS. 3. ASK THE USER IF HE WANTS TO WRITE THE NUCLEUS ONTO A DASD DEVICE. IF HE DOES NOT, GO TO MODULE DMSINS. 4. ASK THE USER FOR THE IPL DEVICE ADDRESS AND VERIFY THAT IS A SUPPORTED DASD TYPE DEVICE. 5. INITIALIZE THE DEVICE TYPE DEPENDENT VALUES. 6. ASK THE USER FOR THE CYLINDER NUMBER ON WHICH TO WRITE THE NUCLEUS AND VERIFY THAT THE NUCLEUS WILL NOT OVERLAY ANY CMS FILES ON THE DISK. 7. ASK THE USER IF THE IPL TEXT IS ALSO TO BE WRITTEN ON CYLINDER 0 AND SET THE SWITCH ACCORDINGLY. 8. ASK THE USER TO ENTER THE VERSION IDENTIFICATION AND INSTALLATION HEADING. IF HE TYPES A NULL LINE, USE THE DEFAULT VALUES. 9. WRITE THE IPL TEXT ON THE NUCLEUS CYLINDER AND ON CYLINDER 0 IF REQUESTED. 10. STORE THE DATA ADDRESS IN THE WRITE CCWS AND THE CYLINDER NUMBER IN THE SEEK AND SEARCH ADDRESSES. 11. WRITE ONE TRACK OF THE NUCLEUS ONTO THE IPL DEVICE. 12. IF THE NUCLEUS IS NOT COMPLETELY WRITTEN, GO TO STEP 10. 13. GO TO MODULE DIMINS TO CONTINUE WITH THE INITIALIZATION.
Calls to Other Routines
NONE