usr.sbin/spkrtest/spkrtest.sh

   1 :
   2 #
   3 # Test script for the speaker driver
   4 #
   5 # v1.0 by Eric S. Raymond (Feb 1990)
   6 # v1.1 rightstuff contributed by Eric S. Tiedemann (est@snark.thyrsus.com)
   7 #
   8 reveille="t255l8c.f.afc~c.f.afc~c.f.afc.f.a..f.~c.f.afc~c.f.afc~c.f.afc~c.f.."
   9 contact="<cd<a#~<a#>f"
  10 dance="t240<cfcfgagaa#b#>dc<a#a.~fg.gaa#.agagegc.~cfcfgagaa#b#>dc<a#a.~fg.gga.agfgfgf."
  11 loony="t255cf8f8edc<a>~cf8f8edd#e~ce8cdce8cd.<a>c8c8c#def8af8"
  12 sinister="mst200o2ola.l8bc.~a.~>l2d#"
  13 rightstuff="olcega.a8f>cd2bgc.c8dee2"
  14 toccata="msl16oldcd4mll8pcb-agf+4.g4p4<msl16dcd4mll8pa.a+f+4p16g4"
  15 startrek="l2b.f+.p16a.c+.p l4mn<b.>e8a2mspg+e8c+f+8b2"
  16
  17 case $1 in
  18 reveille) echo  $reveille >/dev/speaker;;
  19 contact)  echo  $contact >/dev/speaker;;
  20 dance)  echo  $dance >/dev/speaker;;
  21 loony)  echo  $loony >/dev/speaker;;
  22 sinister)  echo  $sinister >/dev/speaker;;
  23 rightstuff) echo  $rightstuff >/dev/speaker;;
  24 toccata) echo  $toccata >/dev/speaker;;
  25 startrek) echo  $startrek >/dev/speaker;;
  26 *)
  27         echo "No such tune. Available tunes are:"
  28         echo
  29         echo "reveille -- Reveille"
  30         echo "contact -- Contact theme from Close Encounters"
  31         echo "dance -- Lord of the Dance (aka Simple Gifts)"
  32         echo "loony -- Loony Toons theme"
  33         echo "sinister -- standard villain's entrance music"
  34         echo "rightstuff -- a trope from \"The Right Stuff\" score by Bill Conti"
  35         echo "toccata -- opening bars of Bach's Toccata and Fugue in D Minor"
  36         echo "startrek -- opening bars of the theme from Star Trek Classic"
  37         ;;
  38 esac