process-state - Factor Documentation

process-state

Vocabulary
checksums .process

Class description
This class represents the current state of a checksum-process checksum calculation. It has an associated external console application running until it is disposed. You may call add-checksum-bytes multiple times to pipe data to the external utility. When finished, call get-checksum to receive the result and terminate the process, or dispose to discard the result and terminate the process. After the first get-checksum call the returned value is stored in the result slot, and subsequent calls return the same value.

Notes
It is not possible to add more data to the checksum after the first get-checksum call.

Most code should use with-checksum-state to make sure the external process is disposed of. Higher level words like checksum-bytes and checksum-stream use it to perform the disposal.

Definition

USING: destructors ;

IN: checksums.process

TUPLE: process-state < disposable process result ;

Methods

USING: accessors checksums checksums.process io kernel ;

M: process-state add-checksum-bytes
over process>> stream-write ;

USING: accessors checksums.process destructors kernel ;

M: process-state dispose* process>> [ dispose ] when* ;

USING: accessors checksums checksums.process destructors
hex-strings io kernel ;

M: process-state get-checksum
dup result>> [
dup process>> [
[
[ out>> dispose ] keep
stream-contents trim-hash hex-string>bytes
] with-disposal
] [ B{ } ] if* [ >>result ] keep
] unless* nip ;