libs/ardour/session_events.cc

   1 /*
   2     Copyright (C) 1999-2004 Paul Davis
   3
   4     This program is free software; you can redistribute it and/or modify
   5     it under the terms of the GNU General Public License as published by
   6     the Free Software Foundation; either version 2 of the License, or
   7     (at your option) any later version.
   8
   9     This program is distributed in the hope that it will be useful,
  10     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12     GNU General Public License for more details.
  13
  14     You should have received a copy of the GNU General Public License
  15     along with this program; if not, write to the Free Software
  16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17
  18     $Id$
  19 */
  20
  21 #include <cmath>
  22 #include <unistd.h>
  23
  24 #include <ardour/timestamps.h>
  25
  26 #include <pbd/error.h>
  27 #include <glibmm/thread.h>
  28
  29 #include <ardour/ardour.h>
  30 #include <ardour/session.h>
  31 #include <ardour/audio_diskstream.h>
  32
  33 #include "i18n.h"
  34
  35 using namespace ARDOUR;
  36 using namespace PBD;
  37
  38 MultiAllocSingleReleasePool Session::Event::pool ("event", sizeof (Session::Event), 512);
  39
  40 static const char* event_names[] = {
  41         "SetTransportSpeed",
  42         "SetDiskstreamSpeed",
  43         "Locate",
  44         "LocateRoll",
  45         "SetLoop",
  46         "PunchIn",
  47         "PunchOut",
  48         "RangeStop",
  49         "RangeLocate",
  50         "Overwrite",
  51         "SetSlaveSource",
  52         "Audition",
  53         "InputConfigurationChange",
  54         "SetAudioRange",
  55         "SetMusicRange",
  56         "SetPlayRange",
  57         "StopOnce",
  58         "AutoLoop"
  59 };
  60
  61 void
  62 Session::add_event (jack_nframes_t frame, Event::Type type, jack_nframes_t target_frame)
  63 {
  64         Event* ev = new Event (type, Event::Add, frame, target_frame, 0);
  65         queue_event (ev);
  66 }
  67
  68 void
  69 Session::remove_event (jack_nframes_t frame, Event::Type type)
  70 {
  71         Event* ev = new Event (type, Event::Remove, frame, 0, 0);
  72         queue_event (ev);
  73 }
  74
  75 void
  76 Session::replace_event (Event::Type type, jack_nframes_t frame, jack_nframes_t target)
  77 {
  78         Event* ev = new Event (type, Event::Replace, frame, target, 0);
  79         queue_event (ev);
  80 }
  81
  82 void
  83 Session::clear_events (Event::Type type)
  84 {
  85         Event* ev = new Event (type, Event::Clear, 0, 0, 0);
  86         queue_event (ev);
  87 }
  88
  89
  90 void
  91 Session::dump_events () const
  92 {
  93         cerr << "EVENT DUMP" << endl;
  94         for (Events::const_iterator i = events.begin(); i != events.end(); ++i) {
  95                 cerr << "\tat " << (*i)->action_frame << ' ' << (*i)->type << " target = " << (*i)->target_frame << endl;
  96         }
  97         cerr << "Next event: ";
  98
  99         if ((Events::const_iterator) next_event == events.end()) {
 100                 cerr << "none" << endl;
 101         } else {
 102                 cerr << "at " << (*next_event)->action_frame << ' '
 103                      << (*next_event)->type << " target = "
 104                      << (*next_event)->target_frame << endl;
 105         }
 106         cerr << "Immediate events pending:\n";
 107         for (Events::const_iterator i = immediate_events.begin(); i != immediate_events.end(); ++i) {
 108                 cerr << "\tat " << (*i)->action_frame << ' ' << (*i)->type << " target = " << (*i)->target_frame << endl;
 109         }
 110         cerr << "END EVENT_DUMP" << endl;
 111 }
 112
 113 void
 114 Session::queue_event (Event* ev)
 115 {
 116         if (_state_of_the_state & Loading) {
 117                 merge_event (ev);
 118         } else {
 119                 pending_events.write (&ev, 1);
 120         }
 121 }
 122
 123 void
 124 Session::merge_event (Event* ev)
 125 {
 126         switch (ev->action) {
 127         case Event::Remove:
 128                 _remove_event (ev);
 129                 delete ev;
 130                 return;
 131
 132         case Event::Replace:
 133                 _replace_event (ev);
 134                 return;
 135
 136         case Event::Clear:
 137                 _clear_event_type (ev->type);
 138                 delete ev;
 139                 return;
 140
 141         case Event::Add:
 142                 break;
 143         }
 144
 145         /* try to handle immediate events right here */
 146
 147         if (ev->action_frame == 0) {
 148                 process_event (ev);
 149                 return;
 150         }
 151
 152         switch (ev->type) {
 153         case Event::AutoLoop:
 154         case Event::StopOnce:
 155                 _clear_event_type (ev->type);
 156                 break;
 157
 158         default:
 159                 for (Events::iterator i = events.begin(); i != events.end(); ++i) {
 160                         if ((*i)->type == ev->type && (*i)->action_frame == ev->action_frame) {
 161                           error << string_compose(_("Session: cannot have two events of type %1 at the same frame (%2)."),
 162                                                  event_names[ev->type], ev->action_frame) << endmsg;
 163                                 return;
 164                         }
 165                 }
 166         }
 167
 168         events.insert (events.begin(), ev);
 169         events.sort (Event::compare);
 170         next_event = events.begin();
 171         set_next_event ();
 172 }
 173
 174 bool
 175 Session::_replace_event (Event* ev)
 176 {
 177         // returns true when we deleted the passed in event
 178         bool ret = false;
 179         Events::iterator i;
 180
 181         /* private, used only for events that can only exist once in the queue */
 182
 183         for (i = events.begin(); i != events.end(); ++i) {
 184                 if ((*i)->type == ev->type) {
 185                         (*i)->action_frame = ev->action_frame;
 186                         (*i)->target_frame = ev->target_frame;
 187                         if ((*i) == ev) {
 188                                 ret = true;
 189                         }
 190                         delete ev;
 191                         break;
 192                 }
 193         }
 194
 195         if (i == events.end()) {
 196                 events.insert (events.begin(), ev);
 197         }
 198
 199         events.sort (Event::compare);
 200         next_event = events.end();
 201         set_next_event ();
 202
 203         return ret;
 204 }
 205
 206 bool
 207 Session::_remove_event (Session::Event* ev)
 208 {
 209         // returns true when we deleted the passed in event
 210         bool ret = false;
 211         Events::iterator i;
 212
 213         for (i = events.begin(); i != events.end(); ++i) {
 214                 if ((*i)->type == ev->type && (*i)->action_frame == ev->action_frame) {
 215                         if ((*i) == ev) {
 216                                 ret = true;
 217                         }
 218
 219                         delete *i;
 220                         if (i == next_event) {
 221                                 ++next_event;
 222                         }
 223                         events.erase (i);
 224                         break;
 225                 }
 226         }
 227
 228         if (i != events.end()) {
 229                 set_next_event ();
 230         }
 231
 232         return ret;
 233 }
 234
 235 void
 236 Session::_clear_event_type (Event::Type type)
 237 {
 238         Events::iterator i, tmp;
 239
 240         for (i = events.begin(); i != events.end(); ) {
 241
 242                 tmp = i;
 243                 ++tmp;
 244
 245                 if ((*i)->type == type) {
 246                         delete *i;
 247                         if (i == next_event) {
 248                                 ++next_event;
 249                         }
 250                         events.erase (i);
 251                 }
 252
 253                 i = tmp;
 254         }
 255
 256         for (i = immediate_events.begin(); i != immediate_events.end(); ) {
 257
 258                 tmp = i;
 259                 ++tmp;
 260
 261                 if ((*i)->type == type) {
 262                         delete *i;
 263                         immediate_events.erase (i);
 264                 }
 265
 266                 i = tmp;
 267         }
 268
 269         set_next_event ();
 270 }
 271
 272 void
 273 Session::set_next_event ()
 274 {
 275         if (events.empty()) {
 276                 next_event = events.end();
 277                 return;
 278         }
 279
 280         if (next_event == events.end()) {
 281                 next_event = events.begin();
 282         }
 283
 284         if ((*next_event)->action_frame > _transport_frame) {
 285                 next_event = events.begin();
 286         }
 287
 288         for (; next_event != events.end(); ++next_event) {
 289                 if ((*next_event)->action_frame >= _transport_frame) {
 290                         break;
 291                 }
 292         }
 293 }
 294
 295 void
 296 Session::process_event (Event* ev)
 297 {
 298         bool remove = true;
 299         bool del = true;
 300
 301         /* if we're in the middle of a state change (i.e. waiting
 302            for the butler thread to complete the non-realtime
 303            part of the change), we'll just have to queue this
 304            event for a time when the change is complete.
 305         */
 306
 307         if (non_realtime_work_pending()) {
 308                 immediate_events.insert (immediate_events.end(), ev);
 309                 _remove_event (ev);
 310                 return;
 311         }
 312
 313         switch (ev->type) {
 314         case Event::SetLoop:
 315                 set_play_loop (ev->yes_or_no);
 316                 break;
 317
 318         case Event::AutoLoop:
 319                 if (play_loop) {
 320                         start_locate (ev->target_frame, true, false, Config->get_seamless_loop());
 321                 }
 322                 remove = false;
 323                 del = false;
 324                 break;
 325
 326         case Event::Locate:
 327                 if (ev->yes_or_no) {
 328                         // cerr << "forced locate to " << ev->target_frame << endl;
 329                         locate (ev->target_frame, false, true, false);
 330                 } else {
 331                         // cerr << "soft locate to " << ev->target_frame << endl;
 332                         start_locate (ev->target_frame, false, true, false);
 333                 }
 334                 break;
 335
 336         case Event::LocateRoll:
 337                 if (ev->yes_or_no) {
 338                         // cerr << "forced locate to+roll " << ev->target_frame << endl;
 339                         locate (ev->target_frame, true, true, false);
 340                 } else {
 341                         // cerr << "soft locate to+roll " << ev->target_frame << endl;
 342                         start_locate (ev->target_frame, true, true, false);
 343                 }
 344                 break;
 345
 346         case Event::SetTransportSpeed:
 347                 set_transport_speed (ev->speed, ev->yes_or_no);
 348                 break;
 349
 350         case Event::PunchIn:
 351                 // cerr << "PunchIN at " << transport_frame() << endl;
 352                 if (Config->get_punch_in() && record_status() == Enabled) {
 353                         enable_record ();
 354                 }
 355                 remove = false;
 356                 del = false;
 357                 break;
 358
 359         case Event::PunchOut:
 360                 // cerr << "PunchOUT at " << transport_frame() << endl;
 361                 if (Config->get_punch_out()) {
 362                         step_back_from_record ();
 363                 }
 364                 remove = false;
 365                 del = false;
 366                 break;
 367
 368         case Event::StopOnce:
 369                 if (!non_realtime_work_pending()) {
 370                         stop_transport (ev->yes_or_no);
 371                         _clear_event_type (Event::StopOnce);
 372                 }
 373                 remove = false;
 374                 del = false;
 375                 break;
 376
 377         case Event::RangeStop:
 378                 if (!non_realtime_work_pending()) {
 379                         stop_transport (ev->yes_or_no);
 380                 }
 381                 remove = false;
 382                 del = false;
 383                 break;
 384
 385         case Event::RangeLocate:
 386                 start_locate (ev->target_frame, true, true, false);
 387                 remove = false;
 388                 del = false;
 389                 break;
 390
 391         case Event::Overwrite:
 392                 overwrite_some_buffers (static_cast<AudioDiskstream*>(ev->ptr));
 393                 break;
 394
 395         case Event::SetDiskstreamSpeed:
 396                 set_diskstream_speed (static_cast<AudioDiskstream*> (ev->ptr), ev->speed);
 397                 break;
 398
 399         case Event::SetSlaveSource:
 400                 set_slave_source (ev->slave);
 401                 break;
 402
 403         case Event::Audition:
 404                 set_audition (ev->region);
 405                 break;
 406
 407         case Event::InputConfigurationChange:
 408                 post_transport_work = PostTransportWork (post_transport_work | PostTransportInputChange);
 409                 schedule_butler_transport_work ();
 410                 break;
 411
 412         case Event::SetAudioRange:
 413                 current_audio_range = ev->audio_range;
 414                 setup_auto_play ();
 415                 break;
 416
 417         case Event::SetPlayRange:
 418                 set_play_range (ev->yes_or_no);
 419                 break;
 420
 421         default:
 422           fatal << string_compose(_("Programming error: illegal event type in process_event (%1)"), ev->type) << endmsg;
 423                 /*NOTREACHED*/
 424                 break;
 425         };
 426
 427         if (remove) {
 428                 del = del && !_remove_event (ev);
 429         }
 430
 431         if (del) {
 432                 delete ev;
 433         }
 434 }