1 /* Author: Toby Dickenson <htrd90@zepler.org>
3 * Copyright (c) 1999 Toby Dickenson
5 * Permission to use this software in any way is granted without
6 * fee, provided that the copyright notice above appears in all
7 * copies. This software is provided "as is" without any warranty.
10 /* Modified by Guido van Rossum */
11 /* Beep added by Mark Hammond */
12 /* Win9X Beep and platform identification added by Uncle Timmy */
20 winsound.PlaySound('c:/windows/media/Chord.wav', winsound.SND_FILENAME)
22 # Play sound from control panel settings
23 winsound.PlaySound('SystemQuestion', winsound.SND_ALIAS)
25 # Play wav file from memory
26 data=open('c:/windows/media/Chimes.wav',"rb").read()
27 winsound.PlaySound(data, winsound.SND_MEMORY)
29 # Start playing the first bit of wav file asynchronously
30 winsound.PlaySound('c:/windows/media/Chord.wav',
31 winsound.SND_FILENAME|winsound.SND_ASYNC)
32 # But dont let it go for too long...
34 # ...Before stopping it
35 winsound.PlaySound(None, 0)
41 #include <conio.h> /* port functions on Win9x */
45 PyDoc_STRVAR(sound_playsound_doc
,
46 "PlaySound(sound, flags) - a wrapper around the Windows PlaySound API\n"
48 "The sound argument can be a filename, data, or None.\n"
49 "For flag values, ored together, see module documentation.");
51 PyDoc_STRVAR(sound_beep_doc
,
52 "Beep(frequency, duration) - a wrapper around the Windows Beep API\n"
54 "The frequency argument specifies frequency, in hertz, of the sound.\n"
55 "This parameter must be in the range 37 through 32,767.\n"
56 "The duration argument specifies the number of milliseconds.\n"
57 "On WinNT and 2000, the platform Beep API is used directly. Else funky\n"
58 "code doing direct port manipulation is used; it's unknown whether that\n"
59 "will work on all systems.");
61 PyDoc_STRVAR(sound_msgbeep_doc
,
62 "MessageBeep(x) - call Windows MessageBeep(x). x defaults to MB_OK.");
64 PyDoc_STRVAR(sound_module_doc
,
65 "PlaySound(sound, flags) - play a sound\n"
66 "SND_FILENAME - sound is a wav file name\n"
67 "SND_ALIAS - sound is a registry sound association name\n"
68 "SND_LOOP - Play the sound repeatedly; must also specify SND_ASYNC\n"
69 "SND_MEMORY - sound is a memory image of a wav file\n"
70 "SND_PURGE - stop all instances of the specified sound\n"
71 "SND_ASYNC - PlaySound returns immediately\n"
72 "SND_NODEFAULT - Do not play a default beep if the sound can not be found\n"
73 "SND_NOSTOP - Do not interrupt any sounds currently playing\n" // Raising RuntimeError if needed
74 "SND_NOWAIT - Return immediately if the sound driver is busy\n" // Without any errors
76 "Beep(frequency, duration) - Make a beep through the PC speaker.");
79 sound_playsound(PyObject
*s
, PyObject
*args
)
86 if(!PyArg_ParseTuple(args
,"z#i:PlaySound",&sound
,&length
,&flags
)) {
90 if(flags
&SND_ASYNC
&& flags
&SND_MEMORY
) {
91 /* Sidestep reference counting headache; unfortunately this also
92 prevent SND_LOOP from memory. */
93 PyErr_SetString(PyExc_RuntimeError
,"Cannot play asynchronously from memory");
97 Py_BEGIN_ALLOW_THREADS
98 ok
= PlaySound(sound
,NULL
,flags
);
102 PyErr_SetString(PyExc_RuntimeError
,"Failed to play sound");
110 enum OSType
{Win9X
, WinNT2000
};
111 static enum OSType whichOS
; /* set by module init */
114 sound_beep(PyObject
*self
, PyObject
*args
)
119 if (!PyArg_ParseTuple(args
, "ii:Beep", &freq
, &dur
))
122 if (freq
< 37 || freq
> 32767) {
123 PyErr_SetString(PyExc_ValueError
,
124 "frequency must be in 37 thru 32767");
128 /* On NT and 2000, the SDK Beep() function does the whole job.
129 * But while Beep() exists before NT, it ignores its arguments and
130 * plays the system default sound. Sheesh ...
131 * The Win9X code is mondo bizarre. I (Tim) pieced it together from
132 * crap all over the web. The original IBM PC used some particular
133 * pieces of hardware (Intel 8255 and 8254 chips) hardwired to
134 * particular port addresses and running at particular clock speeds,
135 * and the poor sound card folks have been forced to emulate that in
136 * all particulars ever since. But NT and 2000 don't support port
137 * manipulation. Don't know about WinME; guessing it's like 98.
140 if (whichOS
== WinNT2000
) {
142 Py_BEGIN_ALLOW_THREADS
143 ok
= Beep(freq
, dur
);
146 PyErr_SetString(PyExc_RuntimeError
,"Failed to beep");
151 else if (whichOS
== Win9X
) {
153 /* Force timer into oscillator mode via timer control port. */
155 /* Compute ratio of ancient hardcoded timer frequency to
156 * frequency we want. Then feed that ratio (lowest byte
157 * first) into timer data port.
159 freq
= 1193180 / freq
;
160 _outp(0x42, freq
& 0xff);
161 _outp(0x42, (freq
>> 8) & 0xff);
162 /* Get speaker control state. */
163 speaker_state
= _inp(0x61);
164 /* Turn the speaker on (bit 1)
165 * and drive speaker from timer (bit 0).
167 _outp(0x61, speaker_state
| 0x3);
168 /* Let it blast in peace for the duration. */
169 Py_BEGIN_ALLOW_THREADS
172 /* Restore speaker control to original state. */
173 _outp(0x61, speaker_state
);
177 assert(!"winsound's whichOS has insane value");
184 sound_msgbeep(PyObject
*self
, PyObject
*args
)
187 if (!PyArg_ParseTuple(args
, "|i:MessageBeep", &x
))
194 static struct PyMethodDef sound_methods
[] =
196 {"PlaySound", sound_playsound
, METH_VARARGS
, sound_playsound_doc
},
197 {"Beep", sound_beep
, METH_VARARGS
, sound_beep_doc
},
198 {"MessageBeep", sound_msgbeep
, METH_VARARGS
, sound_msgbeep_doc
},
203 add_define(PyObject
*dict
, const char *key
, long value
)
205 PyObject
*k
=PyString_FromString(key
);
206 PyObject
*v
=PyLong_FromLong(value
);
209 PyDict_SetItem(dict
,k
,v
);
215 #define ADD_DEFINE(tok) add_define(dict,#tok,tok)
220 OSVERSIONINFO version
;
223 PyObject
*module
= Py_InitModule3("winsound",
228 dict
= PyModule_GetDict(module
);
230 ADD_DEFINE(SND_ASYNC
);
231 ADD_DEFINE(SND_NODEFAULT
);
232 ADD_DEFINE(SND_NOSTOP
);
233 ADD_DEFINE(SND_NOWAIT
);
234 ADD_DEFINE(SND_ALIAS
);
235 ADD_DEFINE(SND_FILENAME
);
236 ADD_DEFINE(SND_MEMORY
);
237 ADD_DEFINE(SND_PURGE
);
238 ADD_DEFINE(SND_LOOP
);
239 ADD_DEFINE(SND_APPLICATION
);
242 ADD_DEFINE(MB_ICONASTERISK
);
243 ADD_DEFINE(MB_ICONEXCLAMATION
);
244 ADD_DEFINE(MB_ICONHAND
);
245 ADD_DEFINE(MB_ICONQUESTION
);
247 version
.dwOSVersionInfoSize
= sizeof(OSVERSIONINFO
);
248 GetVersionEx(&version
);
250 if (version
.dwPlatformId
!= VER_PLATFORM_WIN32s
&&
251 version
.dwPlatformId
!= VER_PLATFORM_WIN32_WINDOWS
)