Type ASSEMBLE
Source Lines : 707
Fixes Applied : 0
Most Recent Version : Thursday, December 14, 1978
Last Fix ID : [Unmodified]
Module
DMKIMG (GENIMAGE)
Function
TO PROVIDE A CMS INTERFACE FOR THE VS-BASED IEBIMAGE PROGRAM.
THIS IS DONE BY HANDLING CERTAIN SVC'S ISSUED BY IEBIMAGE AND
TRANSLATING THEM INTO CMS TERMS.
Attributes
DISK RESIDENT, LOADED INTO CMS USER AREA, CALLED VIA SVC 202,
SERIALLY REUSABLE
Operation
1. VALIDATE THE INPUT PARAMETERS AND DETERMINE IF THE
INPUT CONTROL FILE EXISTS. IF NOT, EXIT WITH ERROR
MESSAGE DMSIMG002W AND RETURN CODE 4 IN R15.
OTHERWISE, CONTINUE.
2. ISSUE A GETMAIN FOR A 73000-BYTE AREA FOR SIMULATING
OS LOAD MACROS.
ISSUE A FILEDEF COMMAND FOR A DUMMY SYS1.IMAGELIB FILE
WITH THE AUXPROC OPTION FOR FIELDING ALL READ/WRITE
OPERATIONS ON THAT DATASET.
ISSUE ALL OTHER REQUIRED FILEDEFS.
3. ISSUE THE HNDSVC MACRO TO HANDLE THE FOLLOWING SVC'S:
SVC 8 (LOAD)
SVC 18 (BLDL)
SVC 21 (STOW)
4. CALL IEBIMAGE. THIS IMPLICITLY LOADS, IN ADDITION TO
'IEBIMAGE TEXT', 'IEBIMSGS TEXT' AND 'IEBISCAN TEXT'.
THIS FILES ARE THE SAME AS THOSE SUPPLIED WITH VS AND
MUST BE AVAILABLE WHEN GENMOD'ING THIS MODULE.
5. SAVE THE RETURN CODE FROM IEBIMAGE AND FREEMAIN THE
PREVIOUSLY GOTTEN STORAGE. CLEAR ANY FILEDEFS THAT MAY
HAVE BEEN ISSUED AND RETURN TO THE CALLER WITH
THE RETURN CODE PASSED BY IEBIMAGE.
SVC SIMULATION ROUTINES -
BLDL SVC
ISSUE FSSTATE FOR TEXT FILE BEING SEARCHED FOR AND
SET THE APPROPRIATE RETURN CODES IN THE SVC
SAVE AREA.
OS LOAD SVC -
A CMS LOAD IS ISSUED TO GET THE MODULE INTO THE
AREA JUST AFTER THE CURRENT MODULE LOAD.
THIS ADDRESS IS THEN PASSED BACK THE ISSUER OF
THE LOAD SVC IN REGISTER 1.
READ/WRITE ROUTINE -
IF THIS IS A WRITE OPERATION, TREAT IT AS A NOP.
THE ACTUAL WRITE WILL BE DONE AT STOW TIME.
IF THIS IS A READ, USE CMS LOAD TO GET THE MODULE
INTO THE LOAD AREA. THEN MOVE THE DATA INTO THE
USER-SUPPLIED BUFFER FOR THE READ.
STOW SVC -
TAKING AS INPUT THE 'LIBBUF' AREA OF THE IEBIMAGE WORK
AREA, CREATE A TEXT FILE FROM THAT IMAGE WITH FILENAME
AS STORED IN THE 'BNAME' FIELD IN THE IEBIMAGE WORK
AREA AND FILETYPE 'TEXT' AND FILEMODE 'A1'.
THIS IS DONE BY USING THE 'MODCNT' FIELD IN 'LIBBUF'
AND CREATING AN 'ESD' CARD, A SERIES OF 'TXT' CARDS
AND AN 'END' CARD.
Calls to Other Routines
FSSTATE - SEE IF CONTROL FILE EXISTS
HNDSVC - TRAP CERTAIN SVC'S ISSUED BY IEBIMAGE
GETMAIN - GET AREA FOR SIMULATING OS LOAD SVC
FREEMAIN - RELEASE OS LOAD AREA
FILEDEF - ISSUE FILEDEF'S NEEDED BY IEBIMAGE
LOAD - SIMULATE OS LOAD AND QSAM READ
FSWRITE - CREATE A NEW TEXT FILE (STOW SIMULATION)