simgear/sound/sound.cxx

   1 // sound.cxx -- Sound class implementation
   2 //
   3 // Started by Erik Hofman, February 2002
   4 // (Reuses some code from  fg_fx.cxx created by David Megginson)
   5 //
   6 // Copyright (C) 2002  Curtis L. Olson - curt@flightgear.org
   7 //
   8 // This program is free software; you can redistribute it and/or
   9 // modify it under the terms of the GNU General Public License as
  10 // published by the Free Software Foundation; either version 2 of the
  11 // License, or (at your option) any later version.
  12 //
  13 // This program is distributed in the hope that it will be useful, but
  14 // WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 // General Public License for more details.
  17 //
  18 // You should have received a copy of the GNU General Public License
  19 // along with this program; if not, write to the Free Software
  20 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21 //
  22 // $Id$
  23
  24 #include <simgear/compiler.h>
  25
  26 #ifdef SG_HAVE_STD_INCLUDES
  27 #  include <cmath>
  28 #else
  29 #  include <math.h>
  30 #endif
  31 #include <string.h>
  32
  33 #include <simgear/debug/logstream.hxx>
  34 #include <simgear/props/condition.hxx>
  35 #include <simgear/math/fastmath.hxx>
  36
  37
  38 #include "sound.hxx"
  39
  40
  41 // static double _snd_lin(double v)   { return v; }
  42 static double _snd_inv(double v)   { return (v == 0) ? 1e99 : 1/v; }
  43 static double _snd_abs(double v)   { return (v >= 0) ? v : -v; }
  44 static double _snd_sqrt(double v)  { return (v < 0) ? sqrt(-v) : sqrt(v); }
  45 static double _snd_log10(double v) { return (v < 1) ? 0 : fast_log10(v); }
  46 static double _snd_log(double v)   { return (v < 1) ? 0 : fast_log(v); }
  47 // static double _snd_sqr(double v)   { return v*v; }
  48 // static double _snd_pow3(double v)  { return v*v*v; }
  49
  50 static const struct {
  51         char *name;
  52         double (*fn)(double);
  53 } __sound_fn[] = {
  54 //      {"lin", _snd_lin},
  55         {"inv", _snd_inv},
  56         {"abs", _snd_abs},
  57         {"sqrt", _snd_sqrt},
  58         {"log", _snd_log10},
  59         {"ln", _snd_log},
  60 //      {"sqr", _snd_sqr},
  61 //      {"pow3", _snd_pow3},
  62         {"", NULL}
  63 };
  64
  65 SGSound::SGSound()
  66   : _sample(NULL),
  67     _condition(NULL),
  68     _property(NULL),
  69     _active(false),
  70     _name(""),
  71     _mode(SGSound::ONCE),
  72     _prev_value(0),
  73     _dt_play(0.0),
  74     _dt_stop(0.0),
  75     _stopping(0.0)
  76 {
  77 }
  78
  79 SGSound::~SGSound()
  80 {
  81    _mgr->get_scheduler()->stopSample(_sample->get_sample());
  82
  83    if (_property)
  84       delete _property;
  85
  86    if (_condition)
  87       delete _condition;
  88
  89    _volume.clear();
  90    _pitch.clear();
  91    delete _sample;
  92 }
  93
  94 void
  95 SGSound::init(SGPropertyNode *root, SGPropertyNode *node, SGSoundMgr *sndmgr,
  96               const string &path)
  97 {
  98
  99    //
 100    // set global sound properties
 101    //
 102
 103    _name = node->getStringValue("name", "");
 104    SG_LOG(SG_GENERAL, SG_INFO, "Loading sound information for: " << _name );
 105
 106    const char *mode_str = node->getStringValue("mode", "");
 107    if ( !strcmp(mode_str, "looped") ) {
 108        _mode = SGSound::LOOPED;
 109
 110    } else if ( !strcmp(mode_str, "in-transit") ) {
 111        _mode = SGSound::IN_TRANSIT;
 112
 113    } else {
 114       _mode = SGSound::ONCE;
 115
 116       if ( strcmp(mode_str, "") )
 117          SG_LOG(SG_GENERAL,SG_INFO, "  Unknown sound mode, default to 'once'");
 118    }
 119
 120    _property = root->getNode(node->getStringValue("property", ""), true);
 121    SGPropertyNode *condition = node->getChild("condition");
 122    if (condition != NULL)
 123       _condition = sgReadCondition(root, condition);
 124
 125    if (!_property && !_condition)
 126       SG_LOG(SG_GENERAL, SG_WARN,
 127              "  Neither a condition nor a property specified");
 128
 129    //
 130    // set volume properties
 131    //
 132    unsigned int i;
 133    float v = 0.0;
 134    vector<SGPropertyNode_ptr> kids = node->getChildren("volume");
 135    for (i = 0; (i < kids.size()) && (i < SGSound::MAXPROP); i++) {
 136       _snd_prop volume = {NULL, NULL, NULL, 1.0, 0.0, 0.0, 0.0, false};
 137
 138       if (strcmp(kids[i]->getStringValue("property"), ""))
 139          volume.prop = root->getNode(kids[i]->getStringValue("property", ""), true);
 140
 141       const char *intern_str = kids[i]->getStringValue("internal", "");
 142       if (!strcmp(intern_str, "dt_play"))
 143          volume.intern = &_dt_play;
 144       else if (!strcmp(intern_str, "dt_stop"))
 145          volume.intern = &_dt_stop;
 146
 147       if ((volume.factor = kids[i]->getDoubleValue("factor", 1.0)) != 0.0)
 148          if (volume.factor < 0.0) {
 149             volume.factor = -volume.factor;
 150             volume.subtract = true;
 151          }
 152
 153       const char *type_str = kids[i]->getStringValue("type", "");
 154       if ( strcmp(type_str, "") ) {
 155
 156          for (int j=0; __sound_fn[j].fn; j++)
 157            if ( !strcmp(type_str, __sound_fn[j].name) ) {
 158                volume.fn = __sound_fn[j].fn;
 159                break;
 160             }
 161
 162          if (!volume.fn)
 163             SG_LOG(SG_GENERAL,SG_INFO,
 164                    "  Unknown volume type, default to 'lin'");
 165       }
 166
 167       volume.offset = kids[i]->getDoubleValue("offset", 0.0);
 168
 169       if ((volume.min = kids[i]->getDoubleValue("min", 0.0)) < 0.0)
 170          SG_LOG( SG_GENERAL, SG_WARN,
 171           "Volume minimum value below 0. Forced to 0.");
 172
 173       volume.max = kids[i]->getDoubleValue("max", 0.0);
 174       if (volume.max && (volume.max < volume.min) )
 175          SG_LOG(SG_GENERAL,SG_ALERT,
 176                 "  Volume maximum below minimum. Neglected.");
 177
 178       _volume.push_back(volume);
 179       v += volume.offset;
 180
 181    }
 182
 183
 184    //
 185    // set pitch properties
 186    //
 187    float p = 0.0;
 188    kids = node->getChildren("pitch");
 189    for (i = 0; (i < kids.size()) && (i < SGSound::MAXPROP); i++) {
 190       _snd_prop pitch = {NULL, NULL, NULL, 1.0, 1.0, 0.0, 0.0, false};
 191
 192       if (strcmp(kids[i]->getStringValue("property", ""), ""))
 193          pitch.prop = root->getNode(kids[i]->getStringValue("property", ""), true);
 194
 195       const char *intern_str = kids[i]->getStringValue("internal", "");
 196       if (!strcmp(intern_str, "dt_play"))
 197          pitch.intern = &_dt_play;
 198       else if (!strcmp(intern_str, "dt_stop"))
 199          pitch.intern = &_dt_stop;
 200
 201       if ((pitch.factor = kids[i]->getDoubleValue("factor", 1.0)) != 0.0)
 202          if (pitch.factor < 0.0) {
 203             pitch.factor = -pitch.factor;
 204             pitch.subtract = true;
 205          }
 206
 207       const char *type_str = kids[i]->getStringValue("type", "");
 208       if ( strcmp(type_str, "") ) {
 209
 210          for (int j=0; __sound_fn[j].fn; j++)
 211             if ( !strcmp(type_str, __sound_fn[j].name) ) {
 212                pitch.fn = __sound_fn[j].fn;
 213                break;
 214             }
 215
 216          if (!pitch.fn)
 217             SG_LOG(SG_GENERAL,SG_INFO,
 218                    "  Unknown pitch type, default to 'lin'");
 219       }
 220
 221       pitch.offset = kids[i]->getDoubleValue("offset", 1.0);
 222
 223       if ((pitch.min = kids[i]->getDoubleValue("min", 0.0)) < 0.0)
 224          SG_LOG(SG_GENERAL,SG_WARN,
 225                 "  Pitch minimum value below 0. Forced to 0.");
 226
 227       pitch.max = kids[i]->getDoubleValue("max", 0.0);
 228       if (pitch.max && (pitch.max < pitch.min) )
 229          SG_LOG(SG_GENERAL,SG_ALERT,
 230                 "  Pitch maximum below minimum. Neglected");
 231
 232       _pitch.push_back(pitch);
 233       p += pitch.offset;
 234    }
 235
 236    //
 237    // Initialize the sample
 238    //
 239    _mgr = sndmgr;
 240    if ((_sample = _mgr->find(_name)) == NULL)
 241       _sample = _mgr->add(_name, path.c_str(), node->getStringValue("path", ""));
 242
 243    _sample->set_volume(v);
 244    _sample->set_pitch(p);
 245 }
 246
 247 void
 248 SGSound::update (double dt)
 249 {
 250    double curr_value = 0.0;
 251
 252    //
 253    // If the state changes to false, stop playing.
 254    //
 255    if (_property)
 256        curr_value = _property->getDoubleValue();
 257
 258    if (                                                 // Lisp, anyone?
 259        (_condition && !_condition->test()) ||
 260        (!_condition && _property &&
 261         (
 262          !curr_value ||
 263          ( (_mode == SGSound::IN_TRANSIT) && (curr_value == _prev_value) )
 264          )
 265         )
 266        )
 267    {
 268        if ((_mode != SGSound::IN_TRANSIT) || (_stopping > MAX_TRANSIT_TIME)) {
 269            if (_sample->is_playing()) {
 270                SG_LOG(SG_GENERAL, SG_INFO, "Stopping audio after " << _dt_play
 271                       << " sec: " << _name );
 272
 273                _sample->stop( _mgr->get_scheduler() );
 274            }
 275
 276            _active = false;
 277            _dt_stop += dt;
 278            _dt_play = 0.0;
 279        } else {
 280            _stopping += dt;
 281        }
 282
 283        return;
 284    }
 285
 286    //
 287    // If the mode is ONCE and the sound is still playing,
 288    //  we have nothing to do anymore.
 289    //
 290    if (_active && (_mode == SGSound::ONCE)) {
 291
 292       if (!_sample->is_playing()) {
 293          _dt_stop += dt;
 294          _dt_play = 0.0;
 295       } else {
 296          _dt_play += dt;
 297       }
 298
 299       return;
 300    }
 301
 302    //
 303    // Update the playing time, cache the current value and
 304    // clear the delay timer.
 305    //
 306    _dt_play += dt;
 307    _prev_value = curr_value;
 308    _stopping = 0.0;
 309
 310    //
 311    // Update the volume
 312    //
 313    int i;
 314    int max = _volume.size();
 315    double volume = 1.0;
 316    double volume_offset = 0.0;
 317
 318    for(i = 0; i < max; i++) {
 319       double v = 1.0;
 320
 321       if (_volume[i].prop)
 322          v = _volume[i].prop->getDoubleValue();
 323
 324       else if (_volume[i].intern)
 325          v = *_volume[i].intern;
 326
 327       if (_volume[i].fn)
 328          v = _volume[i].fn(v);
 329
 330       v *= _volume[i].factor;
 331
 332       if (_volume[i].max && (v > _volume[i].max))
 333          v = _volume[i].max;
 334
 335       else if (v < _volume[i].min)
 336          v = _volume[i].min;
 337
 338       if (_volume[i].subtract)                          // Hack!
 339          volume = _volume[i].offset - v;
 340
 341       else {
 342          volume_offset += _volume[i].offset;
 343          volume *= v;
 344       }
 345    }
 346
 347    //
 348    // Update the pitch
 349    //
 350    max = _pitch.size();
 351    double pitch = 1.0;
 352    double pitch_offset = 0.0;
 353
 354    for(i = 0; i < max; i++) {
 355       double p = 1.0;
 356
 357       if (_pitch[i].prop)
 358          p = _pitch[i].prop->getDoubleValue();
 359
 360       else if (_pitch[i].intern)
 361          p = *_pitch[i].intern;
 362
 363       if (_pitch[i].fn)
 364          p = _pitch[i].fn(p);
 365
 366       p *= _pitch[i].factor;
 367
 368       if (_pitch[i].max && (p > _pitch[i].max))
 369          p = _pitch[i].max;
 370
 371       else if (p < _pitch[i].min)
 372          p = _pitch[i].min;
 373
 374       if (_pitch[i].subtract)                           // Hack!
 375          pitch = _pitch[i].offset - p;
 376
 377       else {
 378          pitch_offset += _pitch[i].offset;
 379          pitch *= p;
 380       }
 381    }
 382
 383    //
 384    // Change sample state
 385    //
 386    _sample->set_pitch( pitch_offset + pitch );
 387    _sample->set_volume( volume_offset + volume );
 388
 389
 390    //
 391    // Do we need to start playing the sample?
 392    //
 393    if (!_active) {
 394
 395       if (_mode == SGSound::ONCE)
 396          _sample->play(_mgr->get_scheduler(), false);
 397
 398       else
 399          _sample->play(_mgr->get_scheduler(), true);
 400
 401       SG_LOG(SG_GENERAL, SG_INFO, "Playing audio after " << _dt_stop
 402                                    << " sec: " << _name);
 403       SG_LOG(SG_GENERAL, SG_BULK,
 404                          "Playing " << ((_mode == ONCE) ? "once" : "looped"));
 405
 406       _active = true;
 407       _dt_stop = 0.0;
 408    }
 409 }