#!/bin/ksh
#----------------------
# format_label
# Automatic labeling of previously unlabeled disks
# 2006.08.31 ken.wachtler
#----------------------

# Enter a list of disks, as format's banner would report them
Disks="
c2t50060163446024C0d0
c2t50060163446024C0d1
c2t50060163446024C0d2
c2t50060163446024C0d3
c2t50060163446024C0d4
c2t50060163446024C0d5
c2t50060163446024C0d6
c2t50060163446024C0d7
c2t50060163446024C0d8
c2t50060163446024C0d9
c2t50060163446024C0d10
c2t50060163446024C0d11
c2t50060163446024C0d12
c2t50060163446024C0d13
c2t50060163446024C0d14
c2t50060163446024C0d15
"

for d in $Disks ; do

  # write label
    printf "label\nyes\nquit\n" | format -d $d

  # check label
    printf "\n\n${d}\n\n"
    prtvtoc /dev/dsk/${d}s0 | egrep '^P  |^  '
  #echo "<cr> to cont: "
  #read a

done