]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/mac/carbon/sound.cpp
fixed fatal bug when moving the control after itself in tab order
[wxWidgets.git] / src / mac / carbon / sound.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: sound.cpp
3// Purpose: wxSound class implementation: optional
4// Author: Ryan Norton
5// Modified by: Stefan Csomor
6// Created: 1998-01-01
7// RCS-ID: $Id$
8// Copyright: (c) Ryan Norton
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "sound.h"
14#endif
15
16#include "wx/object.h"
17#include "wx/string.h"
18#include "wx/log.h"
19#include "wx/file.h"
20#include "wx/sound.h"
21#include "wx/timer.h"
22#include "wx/intl.h"
23
24#if wxUSE_SOUND
25
26// Carbon QT Implementation Details -
27//
28// Memory:
29// 1) OpenDefaultComponent(MovieImportType, kQTFileTypeWave);
30// 2) NewMovie(0);
31// 3) MovieImportDataRef() //Pass Memory Location to this
32// 4) PlayMovie();
33// 5) IsMovieDone(), MoviesTask() //2nd param is minimum wait time to allocate to quicktime
34//
35// File:
36// 1) Obtain FSSpec
37// 2) Call OpenMovieFile
38// 3) Call NewMovieFromFile
39// 4) Call CloseMovieFile
40// 4) PlayMovie();
41// 5) IsMovieDone(), MoviesTask() //2nd param is minimum wait time to allocate to quicktime
42//
43
44#ifdef __WXMAC__
45#include "wx/mac/uma.h"
46#include <Movies.h>
47#include <Gestalt.h>
48#endif
49
50#if defined __WXMAC__ && defined __DARWIN__/*TARGET_CARBON*/
51#ifdef __APPLE_CC__
52#include <Carbon/Carbon.h>
53#else
54#include <Carbon.h>
55#endif
56#else
57#include <Sound.h>
58#endif
59
60//quicktime media layer only required for mac emulation on pc
61#ifndef __WXMAC__
62#include <qtml.h>
63#endif
64
65#include <QuickTimeComponents.h>
66
67//Time between timer calls
68#define MOVIE_DELAY 100
69
70static wxTimer* lastSoundTimer=NULL;
71static bool lastSoundIsPlaying=false;
72
73// ------------------------------------------------------------------
74// wxQTTimer - Handle Asyncronous Playing
75// ------------------------------------------------------------------
76class wxQTTimer : public wxTimer
77{
78public:
79 wxQTTimer(Movie movie, bool bLoop, bool* playing) :
80 m_movie(movie), m_bLoop(bLoop), m_pbPlaying(playing)
81 {
82 }
83
84 ~wxQTTimer()
85 {
86 if(m_pbPlaying)
87 *m_pbPlaying = false;
88
89 StopMovie(m_movie);
90 DisposeMovie(m_movie);
91 Stop();
92
93 //Note that ExitMovies() is not neccessary, but
94 //the docs are fuzzy on whether or not TerminateQTML is
95 ExitMovies();
96
97#ifndef __WXMAC__
98 TerminateQTML();
99#endif
100 }
101
102 void Shutdown()
103 {
104 delete this;
105 }
106
107 void Notify()
108 {
109 if (m_pbPlaying && !*m_pbPlaying)
110 {
111 Shutdown();
112 }
113
114 if(IsMovieDone(m_movie))
115 {
116 if (!m_bLoop)
117 Shutdown();
118 else
119 {
120 StopMovie(m_movie);
121 GoToBeginningOfMovie(m_movie);
122 StartMovie(m_movie);
123 }
124 }
125 else
126 MoviesTask(m_movie, MOVIE_DELAY); //Give QT time to play movie
127 }
128
129
130 Movie& GetMovie() {return m_movie;}
131
132protected:
133 Movie m_movie;
134 bool m_bLoop;
135
136public:
137 bool* m_pbPlaying;
138
139};
140
141
142class wxSMTimer : public wxTimer
143{
144public:
145 wxSMTimer(void* hSnd, void* pSndChannel, bool bLoop, bool* playing)
146 : m_hSnd(hSnd), m_pSndChannel(pSndChannel), m_bLoop(bLoop), m_pbPlaying(playing)
147 {
148 }
149
150 ~wxSMTimer()
151 {
152 if(m_pbPlaying)
153 *m_pbPlaying = false;
154 SndDisposeChannel((SndChannelPtr)m_pSndChannel, TRUE);
155 Stop();
156 }
157
158 void Notify()
159 {
160 if (m_pbPlaying && !*m_pbPlaying)
161 {
162 Shutdown();
163 }
164
165 SCStatus stat;
166
167 if (SndChannelStatus((SndChannelPtr)m_pSndChannel, sizeof(SCStatus), &stat) != 0)
168 Shutdown();
169
170 //if the sound isn't playing anymore, see if it's looped,
171 //and if so play it again, otherwise close things up
172 if (stat.scChannelBusy == FALSE)
173 {
174 if (m_bLoop)
175 {
176 if(SndPlay((SndChannelPtr)m_pSndChannel, (SndListHandle) m_hSnd, true) != noErr)
177 Shutdown();
178 }
179 else
180 Shutdown();
181 }
182 }
183
184 void Shutdown()
185 {
186 delete this;
187 }
188
189 void* GetChannel() {return m_pSndChannel;}
190
191protected:
192 void* m_hSnd;
193 void* m_pSndChannel;
194 bool m_bLoop;
195
196public:
197 bool* m_pbPlaying;
198};
199
200// ------------------------------------------------------------------
201// wxSound
202// ------------------------------------------------------------------
203
204//Determines whether version 4 of QT is installed
205Boolean wxIsQuickTime4Installed (void)
206{
207#ifdef __WXMAC__
208 short error;
209 long result;
210
211 error = Gestalt (gestaltQuickTime, &result);
212 return (error == noErr) && (((result >> 16) & 0xffff) >= 0x0400);
213#else
214 return true;
215#endif
216}
217
218inline bool wxInitQT ()
219{
220 if (wxIsQuickTime4Installed())
221 {
222 #ifndef __WXMAC__
223 int nError;
224 //-2093 no dll
225 if ((nError = InitializeQTML(0)) != noErr)
226 wxLogSysError(wxString::Format(wxT("Couldn't Initialize Quicktime-%i"), nError));
227 #endif
228 EnterMovies();
229 return true;
230 }
231 else
232 {
233 wxLogSysError(wxT("Quicktime is not installed, or Your Version of Quicktime is <= 4."));
234 return false;
235 }
236}
237
238wxSound::wxSound()
239: m_hSnd(NULL), m_waveLength(0), m_pTimer(NULL), m_type(wxSound_NONE)
240{
241}
242
243wxSound::wxSound(const wxString& sFileName, bool isResource)
244: m_hSnd(NULL), m_waveLength(0), m_pTimer(NULL), m_type(wxSound_NONE)
245{
246 Create(sFileName, isResource);
247}
248
249wxSound::wxSound(int size, const wxByte* data)
250: m_hSnd((char*)data), m_waveLength(size), m_pTimer(NULL), m_type(wxSound_MEMORY)
251{
252}
253
254wxSound::~wxSound()
255{
256}
257
258bool wxSound::Create(const wxString& fileName, bool isResource)
259{
260 Stop();
261
262 if (isResource)
263 {
264#ifdef __WXMAC__
265 m_type = wxSound_RESOURCE;
266
267 Str255 lpSnd ;
268
269 wxMacStringToPascal( fileName , lpSnd ) ;
270
271 m_sndname = fileName;
272 m_hSnd = (char*) GetNamedResource('snd ', (const unsigned char *) lpSnd);
273#else
274 return false;
275#endif
276 }
277 else
278 {
279 m_type = wxSound_FILE;
280 m_sndname = fileName;
281 }
282
283 return true;
284}
285
286bool wxSound::DoPlay(unsigned flags) const
287{
288 Stop();
289
290 Movie movie;
291
292 switch(m_type)
293 {
294 case wxSound_MEMORY:
295 {
296 if (!wxInitQT())
297 return false;
298 Handle myHandle, dataRef = nil;
299 MovieImportComponent miComponent;
300 Track targetTrack = nil;
301 TimeValue addedDuration = 0;
302 long outFlags = 0;
303 OSErr err;
304 ComponentResult result;
305
306 myHandle = NewHandleClear((Size)m_waveLength);
307
308 BlockMove(m_hSnd, *myHandle, m_waveLength);
309
310 err = PtrToHand(&myHandle, &dataRef, sizeof(Handle));
311
312 if (memcmp(&m_hSnd[8], "WAVE", 4) == 0)
313 miComponent = OpenDefaultComponent(MovieImportType, kQTFileTypeWave);
314 else if (memcmp(&m_hSnd[8], "AIFF", 4) == 0)
315 miComponent = OpenDefaultComponent(MovieImportType, kQTFileTypeAIFF);
316 else if (memcmp(&m_hSnd[8], "AIFC", 4) == 0)
317 miComponent = OpenDefaultComponent(MovieImportType, kQTFileTypeAIFC);
318 else
319 {
320 wxLogSysError(wxT("wxSound - Location in memory does not contain valid data"));
321 return false;
322 }
323
324 movie = NewMovie(0);
325
326 result = MovieImportDataRef(miComponent, dataRef,
327 HandleDataHandlerSubType, movie,
328 nil, &targetTrack,
329 nil, &addedDuration,
330 movieImportCreateTrack, &outFlags);
331
332 if (result != noErr)
333 {
334 wxLogSysError(wxString::Format(wxT("Couldn't import movie data\nError:%i"), (int)result));
335 }
336
337 SetMovieVolume(movie, kFullVolume);
338 GoToBeginningOfMovie(movie);
339
340 DisposeHandle(myHandle);
341 }
342 break;
343 case wxSound_RESOURCE:
344 {
345 SoundComponentData data;
346 unsigned long numframes, offset;
347
348 ParseSndHeader((SndListHandle)m_hSnd, &data, &numframes, &offset);
349 //m_waveLength = numFrames * data.numChannels;
350
351 SndChannelPtr pSndChannel;
352 SndNewChannel(&pSndChannel, sampledSynth,
353 initNoInterp
354 + (data.numChannels == 1 ? initMono : initStereo), NULL);
355
356 if(SndPlay(pSndChannel, (SndListHandle) m_hSnd, flags & wxSOUND_ASYNC ? 1 : 0) != noErr)
357 return false;
358
359 if (flags & wxSOUND_ASYNC)
360 {
361 lastSoundTimer = ((wxSMTimer*&)m_pTimer)
362 = new wxSMTimer(pSndChannel, m_hSnd, flags & wxSOUND_LOOP ? 1 : 0,
363 &lastSoundIsPlaying);
364 lastSoundIsPlaying = true;
365
366 ((wxTimer*)m_pTimer)->Start(MOVIE_DELAY, wxTIMER_CONTINUOUS);
367 }
368 else
369 SndDisposeChannel(pSndChannel, TRUE);
370
371 return true;
372 }
373 break;
374 case wxSound_FILE:
375 {
376 if (!wxInitQT())
377 return false;
378
379 OSErr err = noErr ;
380//NB: RN: Stefan - I think the 10.3 path functions are broken if kQTNativeDefaultPathStyle is
381//going to trigger a warning every time it is used - where its _supposed to be used_!!
382//(kQTNativePathStyle is negative but the function argument is unsigned!)
383//../src/mac/carbon/sound.cpp: In member function `virtual bool
384// wxSound::DoPlay(unsigned int) const':
385//../src/mac/carbon/sound.cpp:387: warning: passing negative value `
386// kQTNativeDefaultPathStyle' for argument passing 2 of `OSErr
387// QTNewDataReferenceFromFullPathCFString(const __CFString*, long unsigned int,
388// long unsigned int, char***, OSType*)'
389//../src/mac/carbon/sound.cpp:387: warning: argument of negative value `
390// kQTNativeDefaultPathStyle' to `long unsigned int'
391#if defined( __WXMAC__ ) && TARGET_API_MAC_OSX && ( MAC_OS_X_VERSION_MAX_ALLOWED > MAC_OS_X_VERSION_10_2 )
392 if ( UMAGetSystemVersion() >= 0x1030 )
393 {
394 Handle dataRef = NULL;
395 OSType dataRefType;
396
397 err = QTNewDataReferenceFromFullPathCFString(wxMacCFStringHolder(m_sndname,wxLocale::GetSystemEncoding()),
398 //FIXME: Why does this have to be casted?
399 (unsigned int)kQTNativeDefaultPathStyle,
400 //FIXME: End
401 0, &dataRef, &dataRefType);
402
403 wxASSERT(err == noErr);
404
405 if (NULL != dataRef || err != noErr)
406 {
407 err = NewMovieFromDataRef( &movie, newMovieDontAskUnresolvedDataRefs , NULL, dataRef, dataRefType );
408 wxASSERT(err == noErr);
409 DisposeHandle(dataRef);
410 }
411 }
412 else
413#endif
414 {
415 short movieResFile;
416 FSSpec sfFile;
417#ifdef __WXMAC__
418 wxMacFilename2FSSpec( m_sndname , &sfFile ) ;
419#else
420 int nError;
421 if ((nError = NativePathNameToFSSpec ((char*) m_sndname.c_str(), &sfFile, 0)) != noErr)
422 {
423 wxLogSysError(wxString::Format(wxT("File:%s does not exist\nError:%i"),
424 m_sndname.c_str(), nError));
425 return false;
426 }
427#endif
428 if (OpenMovieFile (&sfFile, &movieResFile, fsRdPerm) != noErr)
429 {
430 wxLogSysError(wxT("Quicktime couldn't open the file"));
431 return false;
432 }
433 short movieResID = 0;
434 Str255 movieName;
435
436 err = NewMovieFromFile (
437 &movie,
438 movieResFile,
439 &movieResID,
440 movieName,
441 newMovieActive,
442 NULL); //wasChanged
443
444 CloseMovieFile (movieResFile);
445 }
446
447 if (err != noErr)
448 {
449 wxLogSysError(
450 wxString::Format(wxT("wxSound - Could not open file: %s\nError:%i"), m_sndname.c_str(), err )
451 );
452 return false;
453 }
454 }
455 break;
456 default:
457 return false;
458 }//end switch(m_type)
459
460 //Start the movie!
461 StartMovie(movie);
462
463 if (flags & wxSOUND_ASYNC)
464 {
465 //Start timer and play movie asyncronously
466 lastSoundTimer = ((wxQTTimer*&)m_pTimer) =
467 new wxQTTimer(movie, flags & wxSOUND_LOOP ? 1 : 0,
468 &lastSoundIsPlaying);
469 lastSoundIsPlaying = true;
470 ((wxQTTimer*)m_pTimer)->Start(MOVIE_DELAY, wxTIMER_CONTINUOUS);
471 }
472 else
473 {
474 wxASSERT_MSG(!(flags & wxSOUND_LOOP), wxT("Can't loop and play syncronously at the same time"));
475
476 //Play movie until it ends, then exit
477 //Note that due to quicktime caching this may not always
478 //work 100% correctly
479 while (!IsMovieDone(movie))
480 MoviesTask(movie, 1);
481
482 DisposeMovie(movie);
483 }
484
485 return true;
486}
487
488bool wxSound::IsPlaying()
489{
490 return lastSoundIsPlaying;
491}
492
493void wxSound::Stop()
494{
495 if (lastSoundIsPlaying)
496 {
497 delete (wxTimer*&) lastSoundTimer;
498 lastSoundIsPlaying = false;
499 lastSoundTimer = NULL;
500 }
501}
502
503void* wxSound::GetHandle()
504{
505 if(m_type == wxSound_RESOURCE)
506 return (void*) ((wxSMTimer*)m_pTimer)->GetChannel();
507
508 return (void*) ((wxQTTimer*) m_pTimer)->GetMovie();
509}
510
511#endif //wxUSE_SOUND