#!/bin/sh

progname=`basename $0`
syntax="syntax: $progname device"
die(){
        echo "$progname: $*" 1>&2
        exit 1
}

case $# in
        1)      device="$1" ;;
        *)      die "$syntax" ;;
esac

follow(){
        [ $# -eq 1 ] || die "fn follow: syntax: follow dirname"
        cd `dirname $1`
        f=`basename $1`
        (
            while [ -h "$f" ] ; do
                cd `dirname "$f"`
                f=`ls -l "$f" | sed 's/^.* -> //'`
            done
            echo `pwd`/`basename $f`
        )
}

f=`follow $1`
[ -b $f ] || die "I only know about block devices"
id=`ls -l $f | awk '{print $5 " " $6}' | tr -d '        '`
case "$id" in
        '2,28') secs=18;;
        '2,29') secs=18;;
        '2,8')  secs=15;;
        '2,9')  secs=15;;
        *)      die "I don't know that device, sorry."
esac

count=$[ $secs * 80 * 1024 ]

while catbytes $count | cat >"$device" ; do
        echo -n 'Insert another floppy: ' >/dev/tty
        read ans </dev/tty >/dev/null
done
