Here is more information on the CBTTape.Org file 900 which may provide more information for the OP and others:
//***FILE 900 is a set of programs which run under either old MVS //* or z/OS to calculate MD5 checksums. Please see the //* member called @FILEMD5, which contains descriptions //* of all the MD5** pds members found in this file. //* //* support: [email protected] or //* [email protected] //* //* SHA-1 and SHA-2 support added, May 2016. //* //* SHA-384 and SHA-512 support added, Aug 2016. //* //* Fixed for 8-character TSO prefixes in z/OS 2.3. //* //* SHA1SUM - Assembler source for SHA-1 generating command //* (Fix. DS1LSTAR is always 0 for a PDSE, //* so always read the dataset even if //* DS1LSTAR is 0.) //* //* SHA2SUM - Assembler source for SHA-2 generating command //* (Fix. DS1LSTAR is always 0 for a PDSE, //* so always read the dataset even if //* DS1LSTAR is 0.) //* //* SHA3SUM - Assembler source for SHA-384 generating command //* (Fix. DS1LSTAR is always 0 for a PDSE, //* so always read the dataset even if //* DS1LSTAR is 0.) //* //* SHA5SUM - Assembler source for SHA-512 generating command //* (Fix. DS1LSTAR is always 0 for a PDSE, //* so always read the dataset even if //* DS1LSTAR is 0.) //* //* MD5 - Assembler source for MD5 subprogram, which //* is a modification of the MD5 program for //* REXX. This must be linked with the MD5SUM //* TSO command. //* //* MD5A - Assembler source for same MD5 subprogram, //* with inline macros changed for IFOX00 //* assembler. Intended for MVS370 systems. //* //* MD5R - Assembler source for same MD5 subprogram, //* with 8 STCM instructions replaced with 2 //* STRV. STRV is comparatively new, from circa //* 2002. STRV is like ST but the bytes are //* stored in reverse order, as in hex 12345678 //* being stored as hex 78563412. The MVS 3.8 //* assembler IFOX00 does not support the STRV //* op code. //* //* MD5COB$ - JCL to compile and run an Enterprise Cobol //* program that calls the MD5 subroutine. //* //* MD5DATA - JCL to create test data for MD5SUM, the same //* test data used in MD5REXX //* //* MD5FORT$ - JCL to compile and run a Fortran G program //* that calls the MD5 subroutine. //* //* MD5PLI$ - JCL to compile and run an Enterprise PL/I //* program that calls the MD5 subroutine. //* //* MD5REXX - A copy of the source code for the MD5 for //* REXX by Leland Lucius, which was the base //* from which member MD5 was created. //* //* MD5SUM - assembler source for the 31-bit MD5SUM TSO //* command. It calls the MD5 subprogram. //* (Fix. DS1LSTAR is always 0 for a PDSE, //* so always read the dataset even if //* DS1LSTAR is 0.) //* //* MD5SUM$ - JCL to assemble MD5SUM and the MD5 //* subprogram. //* //* MD5SUM# - TSO HELP text for the MD5SUM TSO command. //* //* MD5SUMA$ - JCL to assemble MD5SUM24 and MD5A using //* IFOX00. Intended for MVS370 systems. //* //* MD5SUM2$ - JCL to assemble MD5SUM24 and MD5 using //* ASMA90. //* //* MD5SUM24 - Assembler source for the 24-bit MD5SUM TSO //* command, which is the base from which the //* 31-bit version was converted. Much of this //* code was borrowed from the COUNT TSO command //* in File 300. Intended for MVS 3.8 systems. //* //* MD5URL - Information about testing Leland Lucius's code //* in MD5REXX //* -------------------------------------------------------------------------- Lionel B. Dyck (Contractor) <sdg>< Mainframe Systems Programmer – RavenTek Solution Partners ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
