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)
40 #include <conio.h> /* port functions on Win9x */
43 PyDoc_STRVAR(sound_playsound_doc
,
44 "PlaySound(sound, flags) - a wrapper around the Windows PlaySound API\n"
46 "The sound argument can be a filename, data, or None.\n"
47 "For flag values, ored together, see module documentation.");
49 PyDoc_STRVAR(sound_beep_doc
,
50 "Beep(frequency, duration) - a wrapper around the Windows Beep API\n"
52 "The frequency argument specifies frequency, in hertz, of the sound.\n"
53 "This parameter must be in the range 37 through 32,767.\n"
54 "The duration argument specifies the number of milliseconds.\n"
55 "On WinNT and 2000, the platform Beep API is used directly. Else funky\n"
56 "code doing direct port manipulation is used; it's unknown whether that\n"
57 "will work on all systems.");
59 PyDoc_STRVAR(sound_msgbeep_doc
,
60 "MessageBeep(x) - call Windows MessageBeep(x). x defaults to MB_OK.");
62 PyDoc_STRVAR(sound_module_doc
,
63 "PlaySound(sound, flags) - play a sound\n"
64 "SND_FILENAME - sound is a wav file name\n"
65 "SND_ALIAS - sound is a registry sound association name\n"
66 "SND_LOOP - Play the sound repeatedly; must also specify SND_ASYNC\n"
67 "SND_MEMORY - sound is a memory image of a wav file\n"
68 "SND_PURGE - stop all instances of the specified sound\n"
69 "SND_ASYNC - PlaySound returns immediately\n"
70 "SND_NODEFAULT - Do not play a default beep if the sound can not be found\n"
71 "SND_NOSTOP - Do not interrupt any sounds currently playing\n" // Raising RuntimeError if needed
72 "SND_NOWAIT - Return immediately if the sound driver is busy\n" // Without any errors
74 "Beep(frequency, duration) - Make a beep through the PC speaker.");
77 sound_playsound(PyObject
*s
, PyObject
*args
)
84 if(!PyArg_ParseTuple(args
,"z#i:PlaySound",&sound
,&length
,&flags
)) {
88 if(flags
&SND_ASYNC
&& flags
&SND_MEMORY
) {
89 /* Sidestep reference counting headache; unfortunately this also
90 prevent SND_LOOP from memory. */
91 PyErr_SetString(PyExc_RuntimeError
,"Cannot play asynchronously from memory");
95 Py_BEGIN_ALLOW_THREADS
96 ok
= PlaySound(sound
,NULL
,flags
);
100 PyErr_SetString(PyExc_RuntimeError
,"Failed to play sound");
108 enum OSType
{Win9X
, WinNT2000
};
109 static enum OSType whichOS
; /* set by module init */
112 sound_beep(PyObject
*self
, PyObject
*args
)
117 if (!PyArg_ParseTuple(args
, "ii:Beep", &freq
, &dur
))
120 if (freq
< 37 || freq
> 32767) {
121 PyErr_SetString(PyExc_ValueError
,
122 "frequency must be in 37 thru 32767");
126 /* On NT and 2000, the SDK Beep() function does the whole job.
127 * But while Beep() exists before NT, it ignores its arguments and
128 * plays the system default sound. Sheesh ...
129 * The Win9X code is mondo bizarre. I (Tim) pieced it together from
130 * crap all over the web. The original IBM PC used some particular
131 * pieces of hardware (Intel 8255 and 8254 chips) hardwired to
132 * particular port addresses and running at particular clock speeds,
133 * and the poor sound card folks have been forced to emulate that in
134 * all particulars ever since. But NT and 2000 don't support port
135 * manipulation. Don't know about WinME; guessing it's like 98.
138 if (whichOS
== WinNT2000
) {
140 Py_BEGIN_ALLOW_THREADS
141 ok
= Beep(freq
, dur
);
144 PyErr_SetString(PyExc_RuntimeError
,"Failed to beep");
149 else if (whichOS
== Win9X
) {
151 /* Force timer into oscillator mode via timer control port. */
153 /* Compute ratio of ancient hardcoded timer frequency to
154 * frequency we want. Then feed that ratio (lowest byte
155 * first) into timer data port.
157 freq
= 1193180 / freq
;
158 _outp(0x42, freq
& 0xff);
159 _outp(0x42, (freq
>> 8) & 0xff);
160 /* Get speaker control state. */
161 speaker_state
= _inp(0x61);
162 /* Turn the speaker on (bit 1)
163 * and drive speaker from timer (bit 0).
165 _outp(0x61, speaker_state
| 0x3);
166 /* Let it blast in peace for the duration. */
167 Py_BEGIN_ALLOW_THREADS
170 /* Restore speaker control to original state. */
171 _outp(0x61, speaker_state
);
175 assert(!"winsound's whichOS has insane value");
182 sound_msgbeep(PyObject
*self
, PyObject
*args
)
185 if (!PyArg_ParseTuple(args
, "|i:MessageBeep", &x
))
192 static struct PyMethodDef sound_methods
[] =
194 {"PlaySound", sound_playsound
, METH_VARARGS
, sound_playsound_doc
},
195 {"Beep", sound_beep
, METH_VARARGS
, sound_beep_doc
},
196 {"MessageBeep", sound_msgbeep
, METH_VARARGS
, sound_msgbeep_doc
},
201 add_define(PyObject
*dict
, const char *key
, long value
)
203 PyObject
*k
=PyString_FromString(key
);
204 PyObject
*v
=PyLong_FromLong(value
);
207 PyDict_SetItem(dict
,k
,v
);
213 #define ADD_DEFINE(tok) add_define(dict,#tok,tok)
218 OSVERSIONINFO version
;
221 PyObject
*module
= Py_InitModule3("winsound",
226 dict
= PyModule_GetDict(module
);
228 ADD_DEFINE(SND_ASYNC
);
229 ADD_DEFINE(SND_NODEFAULT
);
230 ADD_DEFINE(SND_NOSTOP
);
231 ADD_DEFINE(SND_NOWAIT
);
232 ADD_DEFINE(SND_ALIAS
);
233 ADD_DEFINE(SND_FILENAME
);
234 ADD_DEFINE(SND_MEMORY
);
235 ADD_DEFINE(SND_PURGE
);
236 ADD_DEFINE(SND_LOOP
);
237 ADD_DEFINE(SND_APPLICATION
);
240 ADD_DEFINE(MB_ICONASTERISK
);
241 ADD_DEFINE(MB_ICONEXCLAMATION
);
242 ADD_DEFINE(MB_ICONHAND
);
243 ADD_DEFINE(MB_ICONQUESTION
);
245 version
.dwOSVersionInfoSize
= sizeof(OSVERSIONINFO
);
246 GetVersionEx(&version
);
248 if (version
.dwPlatformId
!= VER_PLATFORM_WIN32s
&&
249 version
.dwPlatformId
!= VER_PLATFORM_WIN32_WINDOWS
)