]> git.mxchange.org Git - simgear.git/blob - simgear/sound/soundmgr_openal.cxx
Reset: allow re-init of Nasal Ghosts.
[simgear.git] / simgear / sound / soundmgr_openal.cxx
1 // soundmgr.cxx -- Sound effect management class
2 //
3 // Sound manager initially written by David Findlay
4 // <david_j_findlay@yahoo.com.au> 2001
5 //
6 // C++-ified by Curtis Olson, started March 2001.
7 // Modified for the new SoundSystem by Erik Hofman, October 2009
8 //
9 // Copyright (C) 2001  Curtis L. Olson - http://www.flightgear.org/~curt
10 // Copyright (C) 2009 Erik Hofman <erik@ehofman.com>
11 //
12 // This program is free software; you can redistribute it and/or
13 // modify it under the terms of the GNU General Public License as
14 // published by the Free Software Foundation; either version 2 of the
15 // License, or (at your option) any later version.
16 //
17 // This program is distributed in the hope that it will be useful, but
18 // WITHOUT ANY WARRANTY; without even the implied warranty of
19 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
20 // General Public License for more details.
21 //
22 // You should have received a copy of the GNU General Public License
23 // along with this program; if not, write to the Free Software Foundation,
24 // Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
25 //
26 // $Id$
27
28 #ifdef HAVE_CONFIG_H
29 #  include <simgear_config.h>
30 #endif
31
32 #include <iostream>
33 #include <algorithm>
34 #include <cstring>
35
36 #include <boost/foreach.hpp>
37
38 #include "soundmgr_openal.hxx"
39 #include "readwav.hxx"
40 #include "soundmgr_openal_private.hxx"
41 #include "sample_group.hxx"
42
43 #include <simgear/sg_inlines.h>
44 #include <simgear/structure/exception.hxx>
45 #include <simgear/debug/logstream.hxx>
46 #include <simgear/misc/sg_path.hxx>
47
48 using std::string;
49 using std::vector;
50
51
52 #define MAX_SOURCES     128
53
54
55 #ifndef ALC_ALL_DEVICES_SPECIFIER
56 # define ALC_ALL_DEVICES_SPECIFIER      0x1013
57 #endif
58
59 class SGSoundMgr::SoundManagerPrivate
60 {
61 public:
62     SoundManagerPrivate() :
63         _device(NULL),
64         _context(NULL),
65         _absolute_pos(SGVec3d::zeros()),
66         _base_pos(SGVec3d::zeros()),
67         _orientation(SGQuatd::zeros())
68     {
69         
70         
71     }
72     
73     void init()
74     {
75         _at_up_vec[0] = 0.0; _at_up_vec[1] = 0.0; _at_up_vec[2] = -1.0;
76         _at_up_vec[3] = 0.0; _at_up_vec[4] = 1.0; _at_up_vec[5] = 0.0;
77     }
78     
79     void update_pos_and_orientation()
80     {
81         /**
82          * Description: ORIENTATION is a pair of 3-tuples representing the
83          * 'at' direction vector and 'up' direction of the Object in
84          * Cartesian space. AL expects two vectors that are orthogonal to
85          * each other. These vectors are not expected to be normalized. If
86          * one or more vectors have zero length, implementation behavior
87          * is undefined. If the two vectors are linearly dependent,
88          * behavior is undefined.
89          *
90          * This is in the same coordinate system as OpenGL; y=up, z=back, x=right.
91          */
92         SGVec3d sgv_at = _orientation.backTransform(-SGVec3d::e3());
93         SGVec3d sgv_up = _orientation.backTransform(SGVec3d::e2());
94         _at_up_vec[0] = sgv_at[0];
95         _at_up_vec[1] = sgv_at[1];
96         _at_up_vec[2] = sgv_at[2];
97         _at_up_vec[3] = sgv_up[0];
98         _at_up_vec[4] = sgv_up[1];
99         _at_up_vec[5] = sgv_up[2];
100
101         _absolute_pos = _base_pos;
102     }
103         
104     ALCdevice *_device;
105     ALCcontext *_context;
106     
107     std::vector<ALuint> _free_sources;
108     std::vector<ALuint> _sources_in_use;
109     
110     SGVec3d _absolute_pos;
111     SGVec3d _base_pos;
112     SGQuatd _orientation;
113     // Orientation of the listener. 
114     // first 3 elements are "at" vector, second 3 are "up" vector
115     ALfloat _at_up_vec[6];
116     
117     sample_group_map _sample_groups;
118     buffer_map _buffers;
119 };
120
121
122 //
123 // Sound Manager
124 //
125
126 // constructor
127 SGSoundMgr::SGSoundMgr() :
128     _active(false),
129     _changed(true),
130     _volume(0.0),
131     _offset_pos(SGVec3d::zeros()),
132     _velocity(SGVec3d::zeros()),
133     _bad_doppler(false),
134     _renderer("unknown"),
135     _vendor("unknown")
136 {
137     d.reset(new SoundManagerPrivate);
138     d->_base_pos = SGVec3d::fromGeod(_geod_pos);
139 }
140
141 // destructor
142
143 SGSoundMgr::~SGSoundMgr() {
144
145     if (is_working())
146         stop();
147     d->_sample_groups.clear();
148 }
149
150 // initialize the sound manager
151 void SGSoundMgr::init()
152 {
153 #ifdef ENABLE_SOUND
154     if (is_working())
155     {
156         SG_LOG( SG_SOUND, SG_ALERT, "Oops, OpenAL sound manager is already initialized." );
157         return;
158     }
159
160     SG_LOG( SG_SOUND, SG_INFO, "Initializing OpenAL sound manager" );
161
162     d->_free_sources.clear();
163     d->_free_sources.reserve( MAX_SOURCES );
164     d->_sources_in_use.clear();
165     d->_sources_in_use.reserve( MAX_SOURCES );
166
167     ALCdevice *device = NULL;
168     const char* devname = _device_name.c_str();
169     if (_device_name == "")
170         devname = NULL; // use default device
171     else
172     {
173         // try non-default device
174         device = alcOpenDevice(devname);
175     }
176
177     if ((!devname)||(testForError(device, "Audio device not available, trying default.")) ) {
178         device = alcOpenDevice(NULL);
179         if (testForError(device, "Default audio device not available.") ) {
180            return;
181         }
182     }
183
184     ALCcontext *context = alcCreateContext(device, NULL);
185     testForALCError("context creation.");
186     if ( testForError(context, "Unable to create a valid context.") ) {
187         alcCloseDevice (device);
188         return;
189     }
190
191     if ( !alcMakeContextCurrent(context) ) {
192         testForALCError("context initialization");
193         alcDestroyContext (context);
194         alcCloseDevice (device);
195         return;
196     }
197
198     if (d->_context != NULL)
199     {
200         SG_LOG(SG_SOUND, SG_ALERT, "context is already assigned");
201     }
202     
203     d->_context = context;
204     d->_device = device;
205     d->init();
206
207     alListenerf( AL_GAIN, 0.0f );
208     alListenerfv( AL_ORIENTATION, d->_at_up_vec );
209     alListenerfv( AL_POSITION, SGVec3f::zeros().data() );
210     alListenerfv( AL_VELOCITY, SGVec3f::zeros().data() );
211
212     alDopplerFactor(1.0);
213     alDopplerVelocity(340.3);   // speed of sound in meters per second.
214
215     // gain = AL_REFERENCE_DISTANCE / (AL_REFERENCE_DISTANCE +
216     //        AL_ROLLOFF_FACTOR * (distance - AL_REFERENCE_DISTANCE));
217     alDistanceModel(AL_INVERSE_DISTANCE_CLAMPED);
218
219     testForALError("listener initialization");
220
221     // get a free source one at a time
222     // if an error is returned no more (hardware) sources are available
223     for (unsigned int i=0; i<MAX_SOURCES; i++) {
224         ALuint source;
225         ALenum error;
226
227         alGetError();
228         alGenSources(1, &source);
229         error = alGetError();
230         if ( error == AL_NO_ERROR ) {
231             d->_free_sources.push_back( source );
232         } else {
233             SG_LOG(SG_SOUND, SG_INFO, "allocating source failed:" << i);
234             break;
235         }
236     }
237
238     _vendor = (const char *)alGetString(AL_VENDOR);
239     _renderer = (const char *)alGetString(AL_RENDERER);
240
241     if (_vendor == "Creative Labs Inc.") {
242        _bad_doppler = true;
243
244     } else if (_vendor == "OpenAL Community" && _renderer == "OpenAL Soft") {
245        _bad_doppler = true;
246     }
247
248     if (d->_free_sources.empty()) {
249         SG_LOG(SG_SOUND, SG_ALERT, "Unable to grab any OpenAL sources!");
250     }
251 #endif
252 }
253
254 void SGSoundMgr::reinit()
255 {
256     bool was_active = _active;
257
258     if (was_active)
259     {
260         suspend();
261     }
262
263     SGSoundMgr::stop();
264     SGSoundMgr::init();
265
266     if (was_active)
267         resume();
268 }
269
270 void SGSoundMgr::activate()
271 {
272 #ifdef ENABLE_SOUND
273     if ( is_working() ) {
274         _active = true;
275                 
276         sample_group_map_iterator sample_grp_current = d->_sample_groups.begin();
277         sample_group_map_iterator sample_grp_end = d->_sample_groups.end();
278         for ( ; sample_grp_current != sample_grp_end; ++sample_grp_current ) {
279             SGSampleGroup *sgrp = sample_grp_current->second;
280             sgrp->activate();
281         }
282     }
283 #endif
284 }
285
286 // stop the sound manager
287 void SGSoundMgr::stop()
288 {
289 #ifdef ENABLE_SOUND
290     // first stop all sample groups
291     sample_group_map_iterator sample_grp_current = d->_sample_groups.begin();
292     sample_group_map_iterator sample_grp_end = d->_sample_groups.end();
293     for ( ; sample_grp_current != sample_grp_end; ++sample_grp_current ) {
294         SGSampleGroup *sgrp = sample_grp_current->second;
295         sgrp->stop();
296     }
297
298     // clear all OpenAL sources
299     BOOST_FOREACH(ALuint source, d->_free_sources) {
300         alDeleteSources( 1 , &source );
301         testForALError("SGSoundMgr::stop: delete sources");
302     }
303     d->_free_sources.clear();
304
305     // clear any OpenAL buffers before shutting down
306     buffer_map_iterator buffers_current = d->_buffers.begin();
307     buffer_map_iterator buffers_end = d->_buffers.end();
308     for ( ; buffers_current != buffers_end; ++buffers_current ) {
309         refUint ref = buffers_current->second;
310         ALuint buffer = ref.id;
311         alDeleteBuffers(1, &buffer);
312         testForALError("SGSoundMgr::stop: delete buffers");
313     }
314     
315     d->_buffers.clear();
316     d->_sources_in_use.clear();
317
318     if (is_working()) {
319         _active = false;
320         alcDestroyContext(d->_context);
321         alcCloseDevice(d->_device);
322         d->_context = NULL;
323         d->_device = NULL;
324
325         _renderer = "unknown";
326         _vendor = "unknown";
327     }
328 #endif
329 }
330
331 void SGSoundMgr::suspend()
332 {
333 #ifdef ENABLE_SOUND
334     if (is_working()) {
335         sample_group_map_iterator sample_grp_current = d->_sample_groups.begin();
336         sample_group_map_iterator sample_grp_end = d->_sample_groups.end();
337         for ( ; sample_grp_current != sample_grp_end; ++sample_grp_current ) {
338             SGSampleGroup *sgrp = sample_grp_current->second;
339             sgrp->stop();
340         }
341         _active = false;
342     }
343 #endif
344 }
345
346 void SGSoundMgr::resume()
347 {
348 #ifdef ENABLE_SOUND
349     if (is_working()) {
350         sample_group_map_iterator sample_grp_current = d->_sample_groups.begin();
351         sample_group_map_iterator sample_grp_end = d->_sample_groups.end();
352         for ( ; sample_grp_current != sample_grp_end; ++sample_grp_current ) {
353             SGSampleGroup *sgrp = sample_grp_current->second;
354             sgrp->resume();
355         }
356         _active = true;
357     }
358 #endif
359 }
360
361 // run the audio scheduler
362 void SGSoundMgr::update( double dt )
363 {
364 #ifdef ENABLE_SOUND
365     if (_active) {
366         alcSuspendContext(d->_context);
367
368         if (_changed) {
369             d->update_pos_and_orientation();
370         }
371
372         sample_group_map_iterator sample_grp_current = d->_sample_groups.begin();
373         sample_group_map_iterator sample_grp_end = d->_sample_groups.end();
374         for ( ; sample_grp_current != sample_grp_end; ++sample_grp_current ) {
375             SGSampleGroup *sgrp = sample_grp_current->second;
376             sgrp->update(dt);
377         }
378
379         if (_changed) {
380 #if 0
381 if (isNaN(_at_up_vec)) printf("NaN in listener orientation\n");
382 if (isNaN(toVec3f(_absolute_pos).data())) printf("NaN in listener position\n");
383 if (isNaN(_velocity.data())) printf("NaN in listener velocity\n");
384 #endif
385             alListenerf( AL_GAIN, _volume );
386             alListenerfv( AL_ORIENTATION, d->_at_up_vec );
387             // alListenerfv( AL_POSITION, toVec3f(_absolute_pos).data() );
388
389             SGQuatd hlOr = SGQuatd::fromLonLat( _geod_pos );
390             SGVec3d velocity = SGVec3d::zeros();
391             if ( _velocity[0] || _velocity[1] || _velocity[2] ) {
392                 velocity = hlOr.backTransform(_velocity*SG_FEET_TO_METER);
393             }
394
395             if ( _bad_doppler ) {
396                 velocity *= 100.0f;
397             }
398
399             alListenerfv( AL_VELOCITY, toVec3f(velocity).data() );
400             // alDopplerVelocity(340.3);        // TODO: altitude dependent
401             testForALError("update");
402             _changed = false;
403         }
404
405         alcProcessContext(d->_context);
406     }
407 #endif
408 }
409
410 // add a sample group, return true if successful
411 bool SGSoundMgr::add( SGSampleGroup *sgrp, const string& refname )
412 {
413     sample_group_map_iterator sample_grp_it = d->_sample_groups.find( refname );
414     if ( sample_grp_it != d->_sample_groups.end() ) {
415         // sample group already exists
416         return false;
417     }
418
419     if (_active) sgrp->activate();
420     d->_sample_groups[refname] = sgrp;
421
422     return true;
423 }
424
425
426 // remove a sound effect, return true if successful
427 bool SGSoundMgr::remove( const string &refname )
428 {
429     sample_group_map_iterator sample_grp_it = d->_sample_groups.find( refname );
430     if ( sample_grp_it == d->_sample_groups.end() ) {
431         // sample group was not found.
432         return false;
433     }
434
435     d->_sample_groups.erase( sample_grp_it );
436
437     return true;
438 }
439
440
441 // return true of the specified sound exists in the sound manager system
442 bool SGSoundMgr::exists( const string &refname ) {
443     sample_group_map_iterator sample_grp_it = d->_sample_groups.find( refname );
444     return ( sample_grp_it != d->_sample_groups.end() );
445 }
446
447
448 // return a pointer to the SGSampleGroup if the specified sound exists
449 // in the sound manager system, otherwise return NULL
450 SGSampleGroup *SGSoundMgr::find( const string &refname, bool create ) {
451     sample_group_map_iterator sample_grp_it = d->_sample_groups.find( refname );
452     if ( sample_grp_it == d->_sample_groups.end() ) {
453         // sample group was not found.
454         if (create) {
455             SGSampleGroup* sgrp = new SGSampleGroup(this, refname);
456             add( sgrp, refname );
457             return sgrp;
458         }
459         else 
460             return NULL;
461     }
462
463     return sample_grp_it->second;
464 }
465
466
467 void SGSoundMgr::set_volume( float v )
468 {
469     _volume = v;
470     SG_CLAMP_RANGE(_volume, 0.0f, 1.0f);
471     _changed = true;
472 }
473
474 // Get an unused source id
475 //
476 // The Sound Manager should keep track of the sources in use, the distance
477 // of these sources to the listener and the volume (also based on audio cone
478 // and hence orientation) of the sources.
479 //
480 // The Sound Manager is (and should be) the only one knowing about source
481 // management. Sources further away should be suspended to free resources for
482 // newly added sounds close by.
483 unsigned int SGSoundMgr::request_source()
484 {
485     unsigned int source = NO_SOURCE;
486
487     if (!d->_free_sources.empty()) {
488        source = d->_free_sources.back();
489        d->_free_sources.pop_back();
490        d->_sources_in_use.push_back(source);
491     }
492     else
493        SG_LOG( SG_SOUND, SG_BULK, "Sound manager: No more free sources available!\n");
494
495     return source;
496 }
497
498 // Free up a source id for further use
499 void SGSoundMgr::release_source( unsigned int source )
500 {
501     vector<ALuint>::iterator it;
502
503     it = std::find(d->_sources_in_use.begin(), d->_sources_in_use.end(), source);
504     if ( it != d->_sources_in_use.end() ) {
505   #ifdef ENABLE_SOUND
506         ALint result;
507
508         alGetSourcei( source, AL_SOURCE_STATE, &result );
509         if ( result == AL_PLAYING || result == AL_PAUSED ) {
510             alSourceStop( source );
511         }
512
513         alSourcei( source, AL_BUFFER, 0 );      // detach the associated buffer
514         testForALError("release_source");
515   #endif
516         d->_free_sources.push_back( source );
517         d->_sources_in_use.erase( it );
518     }
519 }
520
521 unsigned int SGSoundMgr::request_buffer(SGSoundSample *sample)
522 {
523     ALuint buffer = NO_BUFFER;
524 #ifdef ENABLE_SOUND
525     if ( !sample->is_valid_buffer() ) {
526         // sample was not yet loaded or removed again
527         string sample_name = sample->get_sample_name();
528         void *sample_data = NULL;
529
530         // see if the sample name is already cached
531         buffer_map_iterator buffer_it = d->_buffers.find( sample_name );
532         if ( buffer_it != d->_buffers.end() ) {
533             buffer_it->second.refctr++;
534             buffer = buffer_it->second.id;
535             sample->set_buffer( buffer );
536             return buffer;
537         }
538
539         // sample name was not found in the buffer cache.
540         if ( sample->is_file() ) {
541             int freq, format;
542             size_t size;
543
544             try {
545               bool res = load(sample_name, &sample_data, &format, &size, &freq);
546               if (res == false) return NO_BUFFER;
547             } catch (sg_exception& e) {
548               SG_LOG(SG_SOUND, SG_ALERT,
549                     "failed to load sound buffer: " << e.getFormattedMessage());
550               sample->set_buffer( SGSoundMgr::FAILED_BUFFER );
551               return FAILED_BUFFER;
552             }
553             
554             sample->set_frequency( freq );
555             sample->set_format( format );
556             sample->set_size( size );
557
558         } else {
559             sample_data = sample->get_data();
560         }
561
562         // create an OpenAL buffer handle
563         alGenBuffers(1, &buffer);
564         if ( !testForALError("generate buffer") ) {
565             // Copy data to the internal OpenAL buffer
566
567             ALenum format = sample->get_format();
568             ALsizei size = sample->get_size();
569             ALsizei freq = sample->get_frequency();
570             alBufferData( buffer, format, sample_data, size, freq );
571
572             if ( !testForALError("buffer add data") ) {
573                 sample->set_buffer(buffer);
574                 d->_buffers[sample_name] = refUint(buffer);
575             }
576         }
577
578         if ( sample->is_file() ) free(sample_data);
579     }
580     else {
581         buffer = sample->get_buffer();
582     }
583 #endif
584     return buffer;
585 }
586
587 void SGSoundMgr::release_buffer(SGSoundSample *sample)
588 {
589     if ( !sample->is_queue() )
590     {
591         string sample_name = sample->get_sample_name();
592         buffer_map_iterator buffer_it = d->_buffers.find( sample_name );
593         if ( buffer_it == d->_buffers.end() ) {
594             // buffer was not found
595             return;
596         }
597
598         sample->no_valid_buffer();
599         buffer_it->second.refctr--;
600         if (buffer_it->second.refctr == 0) {
601 #ifdef ENABLE_SOUND
602             ALuint buffer = buffer_it->second.id;
603             alDeleteBuffers(1, &buffer);
604 #endif
605             d->_buffers.erase( buffer_it );
606             testForALError("release buffer");
607         }
608     }
609 }
610
611 bool SGSoundMgr::load(const string &samplepath, void **dbuf, int *fmt,
612                                           size_t *sz, int *frq )
613 {
614     if ( !is_working() )
615         return false;
616
617     ALenum format;
618     ALsizei size;
619     ALsizei freq;
620     ALvoid *data;
621
622     ALfloat freqf;
623
624     data = simgear::loadWAVFromFile(samplepath, format, size, freqf );
625     freq = (ALsizei)freqf;
626     if (data == NULL) {
627         throw sg_io_exception("Failed to load wav file", sg_location(samplepath));
628     }
629
630     if (format == AL_FORMAT_STEREO8 || format == AL_FORMAT_STEREO16) {
631         free(data);
632         throw sg_io_exception("Warning: STEREO files are not supported for 3D audio effects: " + samplepath);
633     }
634
635     *dbuf = (void *)data;
636     *fmt = (int)format;
637     *sz = (size_t)size;
638     *frq = (int)freq;
639
640     return true;
641 }
642
643 vector<const char*> SGSoundMgr::get_available_devices()
644 {
645     vector<const char*> devices;
646 #ifdef ENABLE_SOUND
647     const ALCchar *s;
648
649     if (alcIsExtensionPresent(NULL, "ALC_enumerate_all_EXT") == AL_TRUE) {
650         s = alcGetString(NULL, ALC_ALL_DEVICES_SPECIFIER);
651     } else {
652         s = alcGetString(NULL, ALC_DEVICE_SPECIFIER);
653     }
654
655     if (s) {
656         ALCchar *nptr, *ptr = (ALCchar *)s;
657
658         nptr = ptr;
659         while (*(nptr += strlen(ptr)+1) != 0)
660         {
661             devices.push_back(ptr);
662             ptr = nptr;
663         }
664         devices.push_back(ptr);
665     }
666 #endif
667     return devices;
668 }
669
670
671 bool SGSoundMgr::testForError(void *p, string s)
672 {
673    if (p == NULL) {
674       SG_LOG( SG_SOUND, SG_ALERT, "Error: " << s);
675       return true;
676    }
677    return false;
678 }
679
680
681 bool SGSoundMgr::testForALError(string s)
682 {
683 #ifdef ENABLE_SOUND
684     ALenum error = alGetError();
685     if (error != AL_NO_ERROR)  {
686        SG_LOG( SG_SOUND, SG_ALERT, "AL Error (sound manager): "
687                                       << alGetString(error) << " at " << s);
688        return true;
689     }
690 #endif
691     return false;
692 }
693
694 bool SGSoundMgr::testForALCError(string s)
695 {
696 #ifdef ENABLE_SOUND
697     ALCenum error;
698     error = alcGetError(d->_device);
699     if (error != ALC_NO_ERROR) {
700         SG_LOG( SG_SOUND, SG_ALERT, "ALC Error (sound manager): "
701                                        << alcGetString(d->_device, error) << " at "
702                                        << s);
703         return true;
704     }
705 #endif
706     return false;
707 }
708
709 bool SGSoundMgr::is_working() const 
710 {
711     return (d->_device != NULL);
712 }
713
714 const SGQuatd& SGSoundMgr::get_orientation() const
715 {
716     return d->_orientation;
717 }
718
719 void SGSoundMgr::set_orientation( const SGQuatd& ori )
720 {
721     d->_orientation = ori;
722     _changed = true;
723 }
724
725 const SGVec3d& SGSoundMgr::get_position() const
726
727     return d->_absolute_pos;
728 }
729
730 void SGSoundMgr::set_position( const SGVec3d& pos, const SGGeod& pos_geod )
731 {
732     d->_base_pos = pos; _geod_pos = pos_geod; _changed = true;
733 }
734
735 SGVec3f SGSoundMgr::get_direction() const
736 {
737     return SGVec3f(d->_at_up_vec[0], d->_at_up_vec[1], d->_at_up_vec[2]);
738 }