#!/bin/rc # keep environment and namespace cleanrfork en # read fresh disk../$O.qcowfs -n 4294967296 /tmp/qcow.$piddd -ibs 389120 -skip 1 -obs 8192 -count 1 < /mnt/qcow/data >/dev/nullrm -f /tmp/qcow.$pid../$O.qcowfs -n 4294967296 /tmp/qcow.$piddd -ibs 389120 -skip 1 -obs 15473 -count 1 < /mnt/qcow/data >/dev/null # writerm -f /tmp/qcow.$pid../$O.qcowfs -n 4294967296 /tmp/qcow.$piddd -ibs 389120 -skip 1 -obs 8192 -count 1 -if /dev/random -of /mnt/qcow/data # start, power of twodd -ibs 389120 -skip 1 -obs 15473 -count 1 -if /dev/random -of /mnt/qcow/data # random primedd -ibs 389120 -skip 1 -obs 8192 -seek 524287 -count 1 -if /dev/random -of /mnt/qcow/data  # end # read written diskdd -ibs 389120 -skip 1 -obs 8192 -count 1 < /mnt/qcow/data >/dev/nulldd -ibs 389120 -skip 1 -obs 15473 -count 1 < /mnt/qcow/data >/dev/null # read and write some datacat /bin/cat > /mnt/qcow/datasz = `{walk -es /bin/cat}xhash=`{cat /bin/cat | sha1sum}rhash=`{read -c $sz /mnt/qcow/data | sha1sum}if(! ~ $xhash $rhash){	>[1=2] echo mismatched data	exit mishash}rm -f /tmp/qcow.$pidexit ''