Type ASSEMBLE
Source Lines : 6,694
Fixes Applied : 3
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [R15210DS]
Module
DMSDLK (DOSLKED)
Function
TRANSLATORS INTO EXECUTABLE PROGRAMS. THE CORE IMAGE PHASES ARE ADDED TO THE END OF THE SPECIFIED DOSLIB.
Attributes
NON-REUSABLE NON-RESIDENT
Operation
CONTROL ENTERS DMSDLK AT THE DLKINL
CSECT. THE COMMAND LINE IS SCANNED FOR ERRORS AND
ADCONS ARE RELOCATED. THEN SYSRES IS LOCATED AND, IF
THE DISK OPTION IS DESIRED, THE OLD MAP FILE IS
ERASED IF IT EXISTS AND A NEW ONE CREATED.
A CHECK IS MADE TO SEE IF OLD TEMPORARY FILES WITH
A FILENAME OF 'FN' ARE PRESENT AND, IF SO, TO ERASE
THEM. THE PRIVATE RELOCATABLE LIBRARY, IF
SPECIFIED, IS LOCATED AND ADDRESSES ARE CALCULATED.
DOSLIB IS THEN FILEDEFED AND OPENED. A CHECK IS
MADE FOR DOSLNK AND, IF NOT AVAILABLE, A DUMMY
INCLUDE CARD IS SET UP AND CONTROL PASSES TO
NORMAL PROCESSING. IF DOSLNK IS AVAILABLE, THE
FILE IS READ AND ACTION CARDS ARE PROCESSED.
WHEN THE FIRST NON-ACTION CARD IS LOCATED, THE
OPTIONS SPECIFIED ON THE ACTION CARDS (IF ANY)
ARE PROCESSED AND CONTROL PASSES TO NORMAL
PROCESSING. WHEN THE CSECT HAS COMPLETED ITS
PROCESSING, IT WILL BE OVERLAID WITH WORK TABLES
AND BUFFER AREAS BY SUBSEQUENT PROCESSING.
PHASES FORMED FROM LANGUAGE TRANSLATOR RELOCATABLE MODULES
ARE ASSIGNED AREAS OF MAIN STORAGE.
WHEN ACTION REL IS SPECIFIED OR DEFAULT AND ACCEPTED FOR
A PHASE, A RELOCATABLE PHASE WILL RESULT.
WHEN ACTION NOREL IS SPECIFIED OR DEFAULT OR ACTION REL
NOT ACCEPTED FOR A PHASE THE RESULTING PHASE WILL BE
NOT RELOCATABLE.
THE FOLLOWING CONTROL CARDS ARE PROCESSED DURING
NORMAL PROCESSING:
PHASE - AS EACH PHASE IS BUILT, THE INFORMATION FOR
THE PHASE IS SET UP IN CPHENT. THE NAME IS
CHECKED FOR DUPLICATES AND THE ORIGIN IS
DETERMINED. IF THIS IS NOT THE FIRST PHASE
THE PREVIOUS PHASE IS INSERTED IN THE CONTROL
DICTIONARY TABLE AND THE NUMBER OF BLOCKS ON
SYSUT2 CONTAINING BOTH TEXT AND RLD INFORMATION ARE
DETERMINED. IF THE PHASE IS RELOCATABLE, A SWITCH
IS SET AND PASS 3 OF RLD RECORDS IS INDICATED.
INCLUDE - IF AN UNNAMED SUB-MODULE, CARD IS IGNORED.
OTHERWISE, THE NAME IS COMPARED AGAINST THE
PRIVATE RELOCATABLE DIRECTORY, CMS TEXT FILES
AND SYSTEM RELOCATABLE DIRECTORY. IF NOT FOUND
AN ERROR MESSAGE IS ISSUED AND PROCESSING
CONTINUES. IF FOUND, THE PREVIOUS FILE'S
ADDRESSES ARE STORED AND THE NEW FILE IS READ AND
PROCESSED. WHEN AN END CARD IS READ THE
PREVIOUS FILE'S ADDRESSES ARE RESTORED AND ITS
PROCESSING CONTINUES.
ENTRY - IF NOAUTO HAS NOT BEEN SET EXTERNAL REFERENCES,
IF ANY, ARE RESOLVED, IF POSSIBLE, BY AUTOLINKING
THE REQUIRED MODULES INTO THE PHASE. CONTROL
IS THEN PASSED TO END PROCESSING. THE TRANSFER
ADDRESS, IF SPECIFIED, IS OBTAINED AND THE
NUMBER OF TEXT BLOCKS AND RLD BLOCKS IS CALCULATED.
IF NOMAP WAS NO SPECIFIED, THE MAP IS PRINTED,
TYPED, OR WRITTEN ONTO DISK AS SPECIFIED BY THE
OPTION LIST OF THE COMMAND LINE. THE RLD
RECORDS ARE THEN PROCESSED AND WRITTEN ONTO
SYSUT2. THE STOW TABLE ENTRY IS THEN COMPUTED
AND WRITTEN ONTO DOSLIB AS THE FIRST RECORD.
THEN SYSUT2 IS READ AND WRITTEN ONTO DOSLIB IN
1024 BYTE BLOCKS WITH THE EXCEPTION OF THE LAST
RECORD, WHICH CAN BE ANY LENGTH. A STOW IS
THEN ISSUED TO INSERT THE NAME OF THE PHASE IN
THE DIRECTORY. THE SYSUT1 AND SYSUT2 FILES ARE
THEN ERASED, DOSLNK AND DOSLIB FILES ARE
CLOSED, AND CONTROL RETURNS TO CMS.
Calls to Other Routines
DMSERS, DMSFNS, DMSPRT, DMSBRD, DMSSTT, DMSERR,
DMSBWR