.C.Y.HCHECKSUMING FILES
.X.W
- Undocumented utility to checksum 
  image or other files.

$CHECKSUM [/IMAGE [/OUTPUT=fname]] -
  FILENAME.EXTENSION
     
              EXAMPLE

$checksum slides.exe
$show symbol checksum$checksum
  CHECKSUM$CHECKSUM = "1446427374"

- checksum returned in symbol
  CHECKSUM$CHECKSUM
.S
.C.Y.HCHECKSUMING IMAGE FILES
.X.W

$CHECKSUM/IMAGE [/OUTPUT=fname] -
  FILENAME.EXE
     
              EXAMPLE

$checksum/image slides.exe
file DBC5:[ART.SLIDES]SLIDES.EXE;14
image section %D'1' checksum is %X'00..
image section %D'2' checksum is %X'E4..
image section %D'3' checksum is %X'77..
image header checksum is %X'4B1F124A'
checksum of all image sections is %X'9..
$show symbol checksum$checksum
  CHECKSUM$CHECKSUM = "2481290855"
.S
.C.Y.HCHECKSUMING IMAGE FILES
.X.W
$open/write chk checkfile.sum
$loop:
$next = F$search("sys$system:*.*")
$if next .eqs. "" then goto check
$if F$LOCATE(".EXE",next) .ne. -
 F$LENGTH(next) then $GOTO EXEC
$checksum 'next'
$write chk next+" "+checksum$checksum
$goto loop
$EXEC:
$checksum/image/output=nl: 'next'
$write chk next+" "+checksum$checksum
$goto loop
$check: close chk
$diff/parallel checkfile.sum
.S