Test of the sunaudiodev module -- it simply plays a sound if it can

find one and doesn't output any data that can be verified.  If it
can't find a sound file by looking in the standard Solaris locations
(which we can extend later), it raises an ImportError.

Lib/test/output/test_sunaudiodev

@@ -0,0 +1 @@
+test_sunaudiodev

Lib/test/test_sunaudiodev.py

@@ -0,0 +1,38 @@
+from test_support import verbose, TestFailed
+import sunaudiodev
+import os
+
+OS_AUDIO_DIRS = [
+    '/usr/demo/SOUND/sounds/',		# Solaris 2.x
+    ]
+
+
+def play_sound_file(path):
+    fp = open(path, 'r')
+    data = fp.read()
+    fp.close()
+    a = sunaudiodev.open('w')
+    a.write(data)
+    a.close()
+
+def test():
+    for d in OS_AUDIO_DIRS:
+	try:
+	    files = os.listdir(d)
+	    break
+	except os.error:
+	    pass
+    else:
+	# test couldn't be conducted on this platform
+	raise ImportError
+    for f in files:
+	path = os.path.join(d, f)
+	try:
+	    play_sound_file(path)
+	    break
+	except:
+	    pass
+    else:
+	raise TestFailed, "couldn't play any sounds"
+
+test()