libs/ardour/session.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 <algorithm>
  22 #include <string>
  23 #include <vector>
  24 #include <sstream>
  25 #include <fstream>
  26 #include <cstdio> /* sprintf(3) ... grrr */
  27 #include <cmath>
  28 #include <cerrno>
  29 #include <unistd.h>
  30 #include <limits.h>
  31
  32 #include <sigc++/bind.h>
  33 #include <sigc++/retype.h>
  34
  35 #include <glibmm/thread.h>
  36 #include <glibmm/miscutils.h>
  37
  38 #include <pbd/error.h>
  39 #include <glibmm/thread.h>
  40 #include <pbd/pathscanner.h>
  41 #include <pbd/stl_delete.h>
  42 #include <pbd/basename.h>
  43
  44 #include <ardour/audioengine.h>
  45 #include <ardour/configuration.h>
  46 #include <ardour/session.h>
  47 #include <ardour/audio_diskstream.h>
  48 #include <ardour/utils.h>
  49 #include <ardour/audioplaylist.h>
  50 #include <ardour/audioregion.h>
  51 #include <ardour/audiofilesource.h>
  52 #include <ardour/destructive_filesource.h>
  53 #include <ardour/auditioner.h>
  54 #include <ardour/recent_sessions.h>
  55 #include <ardour/redirect.h>
  56 #include <ardour/send.h>
  57 #include <ardour/insert.h>
  58 #include <ardour/connection.h>
  59 #include <ardour/slave.h>
  60 #include <ardour/tempo.h>
  61 #include <ardour/audio_track.h>
  62 #include <ardour/cycle_timer.h>
  63 #include <ardour/named_selection.h>
  64 #include <ardour/crossfade.h>
  65 #include <ardour/playlist.h>
  66 #include <ardour/click.h>
  67 #include <ardour/data_type.h>
  68 #include <ardour/source_factory.h>
  69 #include <ardour/region_factory.h>
  70
  71 #ifdef HAVE_LIBLO
  72 #include <ardour/osc.h>
  73 #endif
  74
  75 #include "i18n.h"
  76
  77 using namespace std;
  78 using namespace ARDOUR;
  79 using namespace PBD;
  80 using boost::shared_ptr;
  81
  82 const char* Session::_template_suffix = X_(".template");
  83 const char* Session::_statefile_suffix = X_(".ardour");
  84 const char* Session::_pending_suffix = X_(".pending");
  85 const char* Session::old_sound_dir_name = X_("sounds");
  86 const char* Session::sound_dir_name = X_("audiofiles");
  87 const char* Session::peak_dir_name = X_("peaks");
  88 const char* Session::dead_sound_dir_name = X_("dead_sounds");
  89 const char* Session::interchange_dir_name = X_("interchange");
  90
  91 Session::compute_peak_t                         Session::compute_peak                   = 0;
  92 Session::apply_gain_to_buffer_t         Session::apply_gain_to_buffer   = 0;
  93 Session::mix_buffers_with_gain_t        Session::mix_buffers_with_gain  = 0;
  94 Session::mix_buffers_no_gain_t          Session::mix_buffers_no_gain    = 0;
  95
  96 sigc::signal<int> Session::AskAboutPendingState;
  97 sigc::signal<void> Session::SendFeedback;
  98
  99 sigc::signal<void> Session::SMPTEOffsetChanged;
 100 sigc::signal<void> Session::StartTimeChanged;
 101 sigc::signal<void> Session::EndTimeChanged;
 102
 103 int
 104 Session::find_session (string str, string& path, string& snapshot, bool& isnew)
 105 {
 106         struct stat statbuf;
 107         char buf[PATH_MAX+1];
 108
 109         isnew = false;
 110
 111         if (!realpath (str.c_str(), buf) && (errno != ENOENT && errno != ENOTDIR)) {
 112                 error << string_compose (_("Could not resolve path: %1 (%2)"), buf, strerror(errno)) << endmsg;
 113                 return -1;
 114         }
 115
 116         str = buf;
 117
 118         /* check to see if it exists, and what it is */
 119
 120         if (stat (str.c_str(), &statbuf)) {
 121                 if (errno == ENOENT) {
 122                         isnew = true;
 123                 } else {
 124                         error << string_compose (_("cannot check session path %1 (%2)"), str, strerror (errno))
 125                               << endmsg;
 126                         return -1;
 127                 }
 128         }
 129
 130         if (!isnew) {
 131
 132                 /* it exists, so it must either be the name
 133                    of the directory, or the name of the statefile
 134                    within it.
 135                 */
 136
 137                 if (S_ISDIR (statbuf.st_mode)) {
 138
 139                         string::size_type slash = str.find_last_of ('/');
 140
 141                         if (slash == string::npos) {
 142
 143                                 /* a subdirectory of cwd, so statefile should be ... */
 144
 145                                 string tmp;
 146                                 tmp = str;
 147                                 tmp += '/';
 148                                 tmp += str;
 149                                 tmp += _statefile_suffix;
 150
 151                                 /* is it there ? */
 152
 153                                 if (stat (tmp.c_str(), &statbuf)) {
 154                                         error << string_compose (_("cannot check statefile %1 (%2)"), tmp, strerror (errno))
 155                                               << endmsg;
 156                                         return -1;
 157                                 }
 158
 159                                 path = str;
 160                                 snapshot = str;
 161
 162                         } else {
 163
 164                                 /* some directory someplace in the filesystem.
 165                                    the snapshot name is the directory name
 166                                    itself.
 167                                 */
 168
 169                                 path = str;
 170                                 snapshot = str.substr (slash+1);
 171
 172                         }
 173
 174                 } else if (S_ISREG (statbuf.st_mode)) {
 175
 176                         string::size_type slash = str.find_last_of ('/');
 177                         string::size_type suffix;
 178
 179                         /* remove the suffix */
 180
 181                         if (slash != string::npos) {
 182                                 snapshot = str.substr (slash+1);
 183                         } else {
 184                                 snapshot = str;
 185                         }
 186
 187                         suffix = snapshot.find (_statefile_suffix);
 188
 189                         if (suffix == string::npos) {
 190                                 error << string_compose (_("%1 is not an Ardour snapshot file"), str) << endmsg;
 191                                 return -1;
 192                         }
 193
 194                         /* remove suffix */
 195
 196                         snapshot = snapshot.substr (0, suffix);
 197
 198                         if (slash == string::npos) {
 199
 200                                 /* we must be in the directory where the
 201                                    statefile lives. get it using cwd().
 202                                 */
 203
 204                                 char cwd[PATH_MAX+1];
 205
 206                                 if (getcwd (cwd, sizeof (cwd)) == 0) {
 207                                         error << string_compose (_("cannot determine current working directory (%1)"), strerror (errno))
 208                                               << endmsg;
 209                                         return -1;
 210                                 }
 211
 212                                 path = cwd;
 213
 214                         } else {
 215
 216                                 /* full path to the statefile */
 217
 218                                 path = str.substr (0, slash);
 219                         }
 220
 221                 } else {
 222
 223                         /* what type of file is it? */
 224                         error << string_compose (_("unknown file type for session %1"), str) << endmsg;
 225                         return -1;
 226                 }
 227
 228         } else {
 229
 230                 /* its the name of a new directory. get the name
 231                    as "dirname" does.
 232                 */
 233
 234                 string::size_type slash = str.find_last_of ('/');
 235
 236                 if (slash == string::npos) {
 237
 238                         /* no slash, just use the name, but clean it up */
 239
 240                         path = legalize_for_path (str);
 241                         snapshot = path;
 242
 243                 } else {
 244
 245                         path = str;
 246                         snapshot = str.substr (slash+1);
 247                 }
 248         }
 249
 250         return 0;
 251 }
 252
 253 Session::Session (AudioEngine &eng,
 254                   string fullpath,
 255                   string snapshot_name,
 256                   string* mix_template)
 257
 258         : _engine (eng),
 259           _mmc_port (default_mmc_port),
 260           _mtc_port (default_mtc_port),
 261           _midi_port (default_midi_port),
 262           pending_events (2048),
 263           midi_requests (128), // the size of this should match the midi request pool size
 264           diskstreams (new DiskstreamList),
 265           routes (new RouteList),
 266           auditioner ((Auditioner*) 0),
 267           _click_io ((IO*) 0),
 268           main_outs (0)
 269 {
 270         bool new_session;
 271
 272         cerr << "Loading session " << fullpath << " using snapshot " << snapshot_name << " (1)" << endl;
 273
 274         n_physical_outputs = _engine.n_physical_outputs();
 275         n_physical_inputs =  _engine.n_physical_inputs();
 276
 277         first_stage_init (fullpath, snapshot_name);
 278
 279         new_session = !g_file_test (_path.c_str(), GFileTest (G_FILE_TEST_EXISTS | G_FILE_TEST_IS_DIR));
 280         if (new_session) {
 281                 if (create (new_session, mix_template, compute_initial_length())) {
 282                         cerr << "create failed\n";
 283                         throw failed_constructor ();
 284                 }
 285         }
 286
 287         if (second_stage_init (new_session)) {
 288                 cerr << "2nd state failed\n";
 289                 throw failed_constructor ();
 290         }
 291
 292         store_recent_sessions(_name, _path);
 293
 294         bool was_dirty = dirty();
 295
 296         _state_of_the_state = StateOfTheState (_state_of_the_state & ~Dirty);
 297
 298         Config->ParameterChanged.connect (mem_fun (*this, &Session::config_changed));
 299
 300         if (was_dirty) {
 301                 DirtyChanged (); /* EMIT SIGNAL */
 302         }
 303 }
 304
 305 Session::Session (AudioEngine &eng,
 306                   string fullpath,
 307                   string snapshot_name,
 308                   AutoConnectOption input_ac,
 309                   AutoConnectOption output_ac,
 310                   uint32_t control_out_channels,
 311                   uint32_t master_out_channels,
 312                   uint32_t requested_physical_in,
 313                   uint32_t requested_physical_out,
 314                   nframes_t initial_length)
 315
 316         : _engine (eng),
 317           _mmc_port (default_mmc_port),
 318           _mtc_port (default_mtc_port),
 319           _midi_port (default_midi_port),
 320           pending_events (2048),
 321           midi_requests (16),
 322           diskstreams (new DiskstreamList),
 323           routes (new RouteList),
 324           main_outs (0)
 325
 326 {
 327         bool new_session;
 328
 329         cerr << "Loading session " << fullpath << " using snapshot " << snapshot_name << " (2)" << endl;
 330
 331         n_physical_outputs = max (requested_physical_out, _engine.n_physical_outputs());
 332         n_physical_inputs = max (requested_physical_in, _engine.n_physical_inputs());
 333
 334         first_stage_init (fullpath, snapshot_name);
 335
 336         new_session = !g_file_test (_path.c_str(), GFileTest (G_FILE_TEST_EXISTS | G_FILE_TEST_IS_DIR));
 337
 338         if (new_session) {
 339                 if (create (new_session, 0, initial_length)) {
 340                         throw failed_constructor ();
 341                 }
 342         }
 343
 344         if (control_out_channels) {
 345                 shared_ptr<Route> r (new Route (*this, _("monitor"), -1, control_out_channels, -1, control_out_channels, Route::ControlOut));
 346                 RouteList rl;
 347                 rl.push_back (r);
 348                 add_routes (rl);
 349                 _control_out = r;
 350         }
 351
 352         if (master_out_channels) {
 353                 shared_ptr<Route> r (new Route (*this, _("master"), -1, master_out_channels, -1, master_out_channels, Route::MasterOut));
 354                 RouteList rl;
 355                 rl.push_back (r);
 356                 add_routes (rl);
 357                 _master_out = r;
 358         } else {
 359                 /* prohibit auto-connect to master, because there isn't one */
 360                 output_ac = AutoConnectOption (output_ac & ~AutoConnectMaster);
 361         }
 362
 363         Config->set_input_auto_connect (input_ac);
 364         Config->set_output_auto_connect (output_ac);
 365
 366         if (second_stage_init (new_session)) {
 367                 throw failed_constructor ();
 368         }
 369
 370         store_recent_sessions(_name, _path);
 371
 372         bool was_dirty = dirty ();
 373
 374         _state_of_the_state = StateOfTheState (_state_of_the_state & ~Dirty);
 375
 376         if (was_dirty) {
 377                 DirtyChanged (); /* EMIT SIGNAL */
 378         }
 379 }
 380
 381 Session::~Session ()
 382 {
 383         /* if we got to here, leaving pending capture state around
 384            is a mistake.
 385         */
 386
 387         remove_pending_capture_state ();
 388
 389         _state_of_the_state = StateOfTheState (CannotSave|Deletion);
 390         _engine.remove_session ();
 391
 392         GoingAway (); /* EMIT SIGNAL */
 393
 394         /* do this */
 395
 396         notify_callbacks ();
 397
 398         /* clear history so that no references to objects are held any more */
 399
 400         history.clear ();
 401
 402         /* clear state tree so that no references to objects are held any more */
 403
 404         if (state_tree) {
 405                 delete state_tree;
 406         }
 407
 408         terminate_butler_thread ();
 409         terminate_midi_thread ();
 410
 411         if (click_data && click_data != default_click) {
 412                 delete [] click_data;
 413         }
 414
 415         if (click_emphasis_data && click_emphasis_data != default_click_emphasis) {
 416                 delete [] click_emphasis_data;
 417         }
 418
 419         clear_clicks ();
 420
 421         for (vector<Sample*>::iterator i = _passthru_buffers.begin(); i != _passthru_buffers.end(); ++i) {
 422                 free(*i);
 423         }
 424
 425         for (vector<Sample*>::iterator i = _silent_buffers.begin(); i != _silent_buffers.end(); ++i) {
 426                 free(*i);
 427         }
 428
 429         for (vector<Sample*>::iterator i = _send_buffers.begin(); i != _send_buffers.end(); ++i) {
 430                 free(*i);
 431         }
 432
 433         AudioDiskstream::free_working_buffers();
 434
 435         /* this should cause deletion of the auditioner */
 436
 437         // auditioner.reset ();
 438
 439 #undef TRACK_DESTRUCTION
 440 #ifdef TRACK_DESTRUCTION
 441         cerr << "delete named selections\n";
 442 #endif /* TRACK_DESTRUCTION */
 443         for (NamedSelectionList::iterator i = named_selections.begin(); i != named_selections.end(); ) {
 444                 NamedSelectionList::iterator tmp;
 445
 446                 tmp = i;
 447                 ++tmp;
 448
 449                 delete *i;
 450                 i = tmp;
 451         }
 452
 453 #ifdef TRACK_DESTRUCTION
 454         cerr << "delete playlists\n";
 455 #endif /* TRACK_DESTRUCTION */
 456         for (PlaylistList::iterator i = playlists.begin(); i != playlists.end(); ) {
 457                 PlaylistList::iterator tmp;
 458
 459                 tmp = i;
 460                 ++tmp;
 461
 462                 delete *i;
 463
 464                 i = tmp;
 465         }
 466
 467 #ifdef TRACK_DESTRUCTION
 468         cerr << "delete audio regions\n";
 469 #endif /* TRACK_DESTRUCTION */
 470
 471         for (AudioRegionList::iterator i = audio_regions.begin(); i != audio_regions.end(); ) {
 472                 AudioRegionList::iterator tmp;
 473
 474                 tmp = i;
 475                 ++tmp;
 476
 477                 i->second->drop_references ();
 478
 479                 i = tmp;
 480         }
 481
 482         audio_regions.clear ();
 483
 484 #ifdef TRACK_DESTRUCTION
 485         cerr << "delete routes\n";
 486 #endif /* TRACK_DESTRUCTION */
 487         {
 488                 RCUWriter<RouteList> writer (routes);
 489                 boost::shared_ptr<RouteList> r = writer.get_copy ();
 490                 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
 491                         (*i)->drop_references ();
 492                 }
 493                 r->clear ();
 494                 /* writer goes out of scope and updates master */
 495         }
 496
 497         routes.flush ();
 498
 499 #ifdef TRACK_DESTRUCTION
 500         cerr << "delete diskstreams\n";
 501 #endif /* TRACK_DESTRUCTION */
 502        {
 503                RCUWriter<DiskstreamList> dwriter (diskstreams);
 504                boost::shared_ptr<DiskstreamList> dsl = dwriter.get_copy();
 505                for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
 506                        (*i)->drop_references ();
 507                }
 508                dsl->clear ();
 509        }
 510        diskstreams.flush ();
 511
 512 #ifdef TRACK_DESTRUCTION
 513         cerr << "delete audio sources\n";
 514 #endif /* TRACK_DESTRUCTION */
 515         for (AudioSourceList::iterator i = audio_sources.begin(); i != audio_sources.end(); ) {
 516                 AudioSourceList::iterator tmp;
 517
 518                 tmp = i;
 519                 ++tmp;
 520
 521                 i->second->drop_references ();
 522
 523                 i = tmp;
 524         }
 525
 526         audio_sources.clear ();
 527
 528 #ifdef TRACK_DESTRUCTION
 529         cerr << "delete mix groups\n";
 530 #endif /* TRACK_DESTRUCTION */
 531         for (list<RouteGroup *>::iterator i = mix_groups.begin(); i != mix_groups.end(); ) {
 532                 list<RouteGroup*>::iterator tmp;
 533
 534                 tmp = i;
 535                 ++tmp;
 536
 537                 delete *i;
 538
 539                 i = tmp;
 540         }
 541
 542 #ifdef TRACK_DESTRUCTION
 543         cerr << "delete edit groups\n";
 544 #endif /* TRACK_DESTRUCTION */
 545         for (list<RouteGroup *>::iterator i = edit_groups.begin(); i != edit_groups.end(); ) {
 546                 list<RouteGroup*>::iterator tmp;
 547
 548                 tmp = i;
 549                 ++tmp;
 550
 551                 delete *i;
 552
 553                 i = tmp;
 554         }
 555
 556 #ifdef TRACK_DESTRUCTION
 557         cerr << "delete connections\n";
 558 #endif /* TRACK_DESTRUCTION */
 559         for (ConnectionList::iterator i = _connections.begin(); i != _connections.end(); ) {
 560                 ConnectionList::iterator tmp;
 561
 562                 tmp = i;
 563                 ++tmp;
 564
 565                 delete *i;
 566
 567                 i = tmp;
 568         }
 569
 570         if (butler_mixdown_buffer) {
 571                 delete [] butler_mixdown_buffer;
 572         }
 573
 574         if (butler_gain_buffer) {
 575                 delete [] butler_gain_buffer;
 576         }
 577
 578         Crossfade::set_buffer_size (0);
 579
 580         if (mmc) {
 581                 delete mmc;
 582         }
 583 }
 584
 585 void
 586 Session::set_worst_io_latencies ()
 587 {
 588         _worst_output_latency = 0;
 589         _worst_input_latency = 0;
 590
 591         if (!_engine.connected()) {
 592                 return;
 593         }
 594
 595         boost::shared_ptr<RouteList> r = routes.reader ();
 596
 597         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
 598                 _worst_output_latency = max (_worst_output_latency, (*i)->output_latency());
 599                 _worst_input_latency = max (_worst_input_latency, (*i)->input_latency());
 600         }
 601 }
 602
 603 void
 604 Session::when_engine_running ()
 605 {
 606         string first_physical_output;
 607
 608         /* we don't want to run execute this again */
 609
 610         first_time_running.disconnect ();
 611
 612         set_block_size (_engine.frames_per_cycle());
 613         set_frame_rate (_engine.frame_rate());
 614
 615         Config->map_parameters (mem_fun (*this, &Session::config_changed));
 616
 617         /* every time we reconnect, recompute worst case output latencies */
 618
 619         _engine.Running.connect (mem_fun (*this, &Session::set_worst_io_latencies));
 620
 621         if (synced_to_jack()) {
 622                 _engine.transport_stop ();
 623         }
 624
 625         if (Config->get_jack_time_master()) {
 626                 _engine.transport_locate (_transport_frame);
 627         }
 628
 629         _clicking = false;
 630
 631         try {
 632                 XMLNode* child = 0;
 633
 634                 _click_io.reset (new ClickIO (*this, "click", 0, 0, -1, -1));
 635
 636                 if (state_tree && (child = find_named_node (*state_tree->root(), "Click")) != 0) {
 637
 638                         /* existing state for Click */
 639
 640                         if (_click_io->set_state (*child->children().front()) == 0) {
 641
 642                                 _clicking = Config->get_clicking ();
 643
 644                         } else {
 645
 646                                 error << _("could not setup Click I/O") << endmsg;
 647                                 _clicking = false;
 648                         }
 649
 650                 } else {
 651
 652                         /* default state for Click */
 653
 654                         first_physical_output = _engine.get_nth_physical_output (0);
 655
 656                         if (first_physical_output.length()) {
 657                                 if (_click_io->add_output_port (first_physical_output, this)) {
 658                                         // relax, even though its an error
 659                                 } else {
 660                                         _clicking = Config->get_clicking ();
 661                                 }
 662                         }
 663                 }
 664         }
 665
 666         catch (failed_constructor& err) {
 667                 error << _("cannot setup Click I/O") << endmsg;
 668         }
 669
 670         set_worst_io_latencies ();
 671
 672         if (_clicking) {
 673                 // XXX HOW TO ALERT UI TO THIS ? DO WE NEED TO?
 674         }
 675
 676         if (auditioner == 0) {
 677
 678                 /* we delay creating the auditioner till now because
 679                    it makes its own connections to ports named
 680                    in the ARDOUR_RC config file. the engine has
 681                    to be running for this to work.
 682                 */
 683
 684                 try {
 685                         auditioner.reset (new Auditioner (*this));
 686                 }
 687
 688                 catch (failed_constructor& err) {
 689                         warning << _("cannot create Auditioner: no auditioning of regions possible") << endmsg;
 690                 }
 691         }
 692
 693         /* Create a set of Connection objects that map
 694            to the physical outputs currently available
 695         */
 696
 697         /* ONE: MONO */
 698
 699         for (uint32_t np = 0; np < n_physical_outputs; ++np) {
 700                 char buf[32];
 701                 snprintf (buf, sizeof (buf), _("out %" PRIu32), np+1);
 702
 703                 Connection* c = new OutputConnection (buf, true);
 704
 705                 c->add_port ();
 706                 c->add_connection (0, _engine.get_nth_physical_output (np));
 707
 708                 add_connection (c);
 709         }
 710
 711         for (uint32_t np = 0; np < n_physical_inputs; ++np) {
 712                 char buf[32];
 713                 snprintf (buf, sizeof (buf), _("in %" PRIu32), np+1);
 714
 715                 Connection* c = new InputConnection (buf, true);
 716
 717                 c->add_port ();
 718                 c->add_connection (0, _engine.get_nth_physical_input (np));
 719
 720                 add_connection (c);
 721         }
 722
 723         /* TWO: STEREO */
 724
 725         for (uint32_t np = 0; np < n_physical_outputs; np +=2) {
 726                 char buf[32];
 727                 snprintf (buf, sizeof (buf), _("out %" PRIu32 "+%" PRIu32), np+1, np+2);
 728
 729                 Connection* c = new OutputConnection (buf, true);
 730
 731                 c->add_port ();
 732                 c->add_port ();
 733                 c->add_connection (0, _engine.get_nth_physical_output (np));
 734                 c->add_connection (1, _engine.get_nth_physical_output (np+1));
 735
 736                 add_connection (c);
 737         }
 738
 739         for (uint32_t np = 0; np < n_physical_inputs; np +=2) {
 740                 char buf[32];
 741                 snprintf (buf, sizeof (buf), _("in %" PRIu32 "+%" PRIu32), np+1, np+2);
 742
 743                 Connection* c = new InputConnection (buf, true);
 744
 745                 c->add_port ();
 746                 c->add_port ();
 747                 c->add_connection (0, _engine.get_nth_physical_input (np));
 748                 c->add_connection (1, _engine.get_nth_physical_input (np+1));
 749
 750                 add_connection (c);
 751         }
 752
 753         /* THREE MASTER */
 754
 755         if (_master_out) {
 756
 757                 /* create master/control ports */
 758
 759                 if (_master_out) {
 760                         uint32_t n;
 761
 762                         /* force the master to ignore any later call to this */
 763
 764                         if (_master_out->pending_state_node) {
 765                                 _master_out->ports_became_legal();
 766                         }
 767
 768                         /* no panner resets till we are through */
 769
 770                         _master_out->defer_pan_reset ();
 771
 772                         while ((int) _master_out->n_inputs() < _master_out->input_maximum()) {
 773                                 if (_master_out->add_input_port ("", this)) {
 774                                         error << _("cannot setup master inputs")
 775                                               << endmsg;
 776                                         break;
 777                                 }
 778                         }
 779                         n = 0;
 780                         while ((int) _master_out->n_outputs() < _master_out->output_maximum()) {
 781                                 if (_master_out->add_output_port (_engine.get_nth_physical_output (n), this)) {
 782                                         error << _("cannot setup master outputs")
 783                                               << endmsg;
 784                                         break;
 785                                 }
 786                                 n++;
 787                         }
 788
 789                         _master_out->allow_pan_reset ();
 790
 791                 }
 792
 793                 Connection* c = new OutputConnection (_("Master Out"), true);
 794
 795                 for (uint32_t n = 0; n < _master_out->n_inputs (); ++n) {
 796                         c->add_port ();
 797                         c->add_connection ((int) n, _master_out->input(n)->name());
 798                 }
 799                 add_connection (c);
 800         }
 801
 802         hookup_io ();
 803
 804         /* catch up on send+insert cnts */
 805
 806         insert_cnt = 0;
 807
 808         for (list<PortInsert*>::iterator i = _port_inserts.begin(); i != _port_inserts.end(); ++i) {
 809                 uint32_t id;
 810
 811                 if (sscanf ((*i)->name().c_str(), "%*s %u", &id) == 1) {
 812                         if (id > insert_cnt) {
 813                                 insert_cnt = id;
 814                         }
 815                 }
 816         }
 817
 818         send_cnt = 0;
 819
 820         for (list<Send*>::iterator i = _sends.begin(); i != _sends.end(); ++i) {
 821                 uint32_t id;
 822
 823                 if (sscanf ((*i)->name().c_str(), "%*s %u", &id) == 1) {
 824                         if (id > send_cnt) {
 825                                 send_cnt = id;
 826                         }
 827                 }
 828         }
 829
 830         _state_of_the_state = StateOfTheState (_state_of_the_state & ~(CannotSave|Dirty));
 831
 832         /* hook us up to the engine */
 833
 834         _engine.set_session (this);
 835
 836 #ifdef HAVE_LIBLO
 837         /* and to OSC */
 838
 839         osc->set_session (*this);
 840 #endif
 841
 842         _state_of_the_state = Clean;
 843
 844         DirtyChanged (); /* EMIT SIGNAL */
 845 }
 846
 847 void
 848 Session::hookup_io ()
 849 {
 850         /* stop graph reordering notifications from
 851            causing resorts, etc.
 852         */
 853
 854         _state_of_the_state = StateOfTheState (_state_of_the_state | InitialConnecting);
 855
 856         /* Tell all IO objects to create their ports */
 857
 858         IO::enable_ports ();
 859
 860         if (_control_out) {
 861                 uint32_t n;
 862
 863                 while ((int) _control_out->n_inputs() < _control_out->input_maximum()) {
 864                         if (_control_out->add_input_port ("", this)) {
 865                                 error << _("cannot setup control inputs")
 866                                       << endmsg;
 867                                 break;
 868                         }
 869                 }
 870                 n = 0;
 871                 while ((int) _control_out->n_outputs() < _control_out->output_maximum()) {
 872                         if (_control_out->add_output_port (_engine.get_nth_physical_output (n), this)) {
 873                                 error << _("cannot set up master outputs")
 874                                       << endmsg;
 875                                 break;
 876                         }
 877                         n++;
 878                 }
 879         }
 880
 881         /* Tell all IO objects to connect themselves together */
 882
 883         IO::enable_connecting ();
 884
 885         /* Now reset all panners */
 886
 887         IO::reset_panners ();
 888
 889         /* Anyone who cares about input state, wake up and do something */
 890
 891         IOConnectionsComplete (); /* EMIT SIGNAL */
 892
 893         _state_of_the_state = StateOfTheState (_state_of_the_state & ~InitialConnecting);
 894
 895         /* now handle the whole enchilada as if it was one
 896            graph reorder event.
 897         */
 898
 899         graph_reordered ();
 900
 901         /* update mixer solo state */
 902
 903         catch_up_on_solo();
 904 }
 905
 906 void
 907 Session::playlist_length_changed (Playlist* pl)
 908 {
 909         /* we can't just increase end_location->end() if pl->get_maximum_extent()
 910            if larger. if the playlist used to be the longest playlist,
 911            and its now shorter, we have to decrease end_location->end(). hence,
 912            we have to iterate over all diskstreams and check the
 913            playlists currently in use.
 914         */
 915         find_current_end ();
 916 }
 917
 918 void
 919 Session::diskstream_playlist_changed (boost::shared_ptr<Diskstream> dstream)
 920 {
 921         Playlist *playlist;
 922
 923         if ((playlist = dstream->playlist()) != 0) {
 924           playlist->LengthChanged.connect (sigc::bind (mem_fun (this, &Session::playlist_length_changed), playlist));
 925         }
 926
 927         /* see comment in playlist_length_changed () */
 928         find_current_end ();
 929 }
 930
 931 bool
 932 Session::record_enabling_legal () const
 933 {
 934         /* this used to be in here, but survey says.... we don't need to restrict it */
 935         // if (record_status() == Recording) {
 936         //      return false;
 937         // }
 938
 939         if (Config->get_all_safe()) {
 940                 return false;
 941         }
 942         return true;
 943 }
 944
 945 void
 946 Session::reset_input_monitor_state ()
 947 {
 948         if (transport_rolling()) {
 949
 950                 boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
 951
 952                 for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
 953                         if ((*i)->record_enabled ()) {
 954                                 //cerr << "switching to input = " << !auto_input << __FILE__ << __LINE__ << endl << endl;
 955                                 (*i)->monitor_input (Config->get_monitoring_model() == HardwareMonitoring && !Config->get_auto_input());
 956                         }
 957                 }
 958         } else {
 959                 boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
 960
 961                 for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
 962                         if ((*i)->record_enabled ()) {
 963                                 //cerr << "switching to input = " << !Config->get_auto_input() << __FILE__ << __LINE__ << endl << endl;
 964                                 (*i)->monitor_input (Config->get_monitoring_model() == HardwareMonitoring);
 965                         }
 966                 }
 967         }
 968 }
 969
 970 void
 971 Session::auto_punch_start_changed (Location* location)
 972 {
 973         replace_event (Event::PunchIn, location->start());
 974
 975         if (get_record_enabled() && Config->get_punch_in()) {
 976                 /* capture start has been changed, so save new pending state */
 977                 save_state ("", true);
 978         }
 979 }
 980
 981 void
 982 Session::auto_punch_end_changed (Location* location)
 983 {
 984         nframes_t when_to_stop = location->end();
 985         // when_to_stop += _worst_output_latency + _worst_input_latency;
 986         replace_event (Event::PunchOut, when_to_stop);
 987 }
 988
 989 void
 990 Session::auto_punch_changed (Location* location)
 991 {
 992         nframes_t when_to_stop = location->end();
 993
 994         replace_event (Event::PunchIn, location->start());
 995         //when_to_stop += _worst_output_latency + _worst_input_latency;
 996         replace_event (Event::PunchOut, when_to_stop);
 997 }
 998
 999 void
1000 Session::auto_loop_changed (Location* location)
1001 {
1002         replace_event (Event::AutoLoop, location->end(), location->start());
1003
1004         if (transport_rolling() && play_loop) {
1005
1006                 //if (_transport_frame < location->start() || _transport_frame > location->end()) {
1007
1008                 if (_transport_frame > location->end()) {
1009                         // relocate to beginning of loop
1010                         clear_events (Event::LocateRoll);
1011
1012                         request_locate (location->start(), true);
1013
1014                 }
1015                 else if (Config->get_seamless_loop() && !loop_changing) {
1016
1017                         // schedule a locate-roll to refill the diskstreams at the
1018                         // previous loop end
1019                         loop_changing = true;
1020
1021                         if (location->end() > last_loopend) {
1022                                 clear_events (Event::LocateRoll);
1023                                 Event *ev = new Event (Event::LocateRoll, Event::Add, last_loopend, last_loopend, 0, true);
1024                                 queue_event (ev);
1025                         }
1026
1027                 }
1028         }
1029
1030         last_loopend = location->end();
1031
1032 }
1033
1034 void
1035 Session::set_auto_punch_location (Location* location)
1036 {
1037         Location* existing;
1038
1039         if ((existing = _locations.auto_punch_location()) != 0 && existing != location) {
1040                 auto_punch_start_changed_connection.disconnect();
1041                 auto_punch_end_changed_connection.disconnect();
1042                 auto_punch_changed_connection.disconnect();
1043                 existing->set_auto_punch (false, this);
1044                 remove_event (existing->start(), Event::PunchIn);
1045                 clear_events (Event::PunchOut);
1046                 auto_punch_location_changed (0);
1047         }
1048
1049         set_dirty();
1050
1051         if (location == 0) {
1052                 return;
1053         }
1054
1055         if (location->end() <= location->start()) {
1056                 error << _("Session: you can't use that location for auto punch (start <= end)") << endmsg;
1057                 return;
1058         }
1059
1060         auto_punch_start_changed_connection.disconnect();
1061         auto_punch_end_changed_connection.disconnect();
1062         auto_punch_changed_connection.disconnect();
1063
1064         auto_punch_start_changed_connection = location->start_changed.connect (mem_fun (this, &Session::auto_punch_start_changed));
1065         auto_punch_end_changed_connection = location->end_changed.connect (mem_fun (this, &Session::auto_punch_end_changed));
1066         auto_punch_changed_connection = location->changed.connect (mem_fun (this, &Session::auto_punch_changed));
1067
1068         location->set_auto_punch (true, this);
1069         auto_punch_location_changed (location);
1070 }
1071
1072 void
1073 Session::set_auto_loop_location (Location* location)
1074 {
1075         Location* existing;
1076
1077         if ((existing = _locations.auto_loop_location()) != 0 && existing != location) {
1078                 auto_loop_start_changed_connection.disconnect();
1079                 auto_loop_end_changed_connection.disconnect();
1080                 auto_loop_changed_connection.disconnect();
1081                 existing->set_auto_loop (false, this);
1082                 remove_event (existing->end(), Event::AutoLoop);
1083                 auto_loop_location_changed (0);
1084         }
1085
1086         set_dirty();
1087
1088         if (location == 0) {
1089                 return;
1090         }
1091
1092         if (location->end() <= location->start()) {
1093                 error << _("Session: you can't use a mark for auto loop") << endmsg;
1094                 return;
1095         }
1096
1097         last_loopend = location->end();
1098
1099         auto_loop_start_changed_connection.disconnect();
1100         auto_loop_end_changed_connection.disconnect();
1101         auto_loop_changed_connection.disconnect();
1102
1103         auto_loop_start_changed_connection = location->start_changed.connect (mem_fun (this, &Session::auto_loop_changed));
1104         auto_loop_end_changed_connection = location->end_changed.connect (mem_fun (this, &Session::auto_loop_changed));
1105         auto_loop_changed_connection = location->changed.connect (mem_fun (this, &Session::auto_loop_changed));
1106
1107         location->set_auto_loop (true, this);
1108         auto_loop_location_changed (location);
1109 }
1110
1111 void
1112 Session::locations_added (Location* ignored)
1113 {
1114         set_dirty ();
1115 }
1116
1117 void
1118 Session::locations_changed ()
1119 {
1120         _locations.apply (*this, &Session::handle_locations_changed);
1121 }
1122
1123 void
1124 Session::handle_locations_changed (Locations::LocationList& locations)
1125 {
1126         Locations::LocationList::iterator i;
1127         Location* location;
1128         bool set_loop = false;
1129         bool set_punch = false;
1130
1131         for (i = locations.begin(); i != locations.end(); ++i) {
1132
1133                 location =* i;
1134
1135                 if (location->is_auto_punch()) {
1136                         set_auto_punch_location (location);
1137                         set_punch = true;
1138                 }
1139                 if (location->is_auto_loop()) {
1140                         set_auto_loop_location (location);
1141                         set_loop = true;
1142                 }
1143
1144         }
1145
1146         if (!set_loop) {
1147                 set_auto_loop_location (0);
1148         }
1149         if (!set_punch) {
1150                 set_auto_punch_location (0);
1151         }
1152
1153         set_dirty();
1154 }
1155
1156 void
1157 Session::enable_record ()
1158 {
1159         /* XXX really atomic compare+swap here */
1160         if (g_atomic_int_get (&_record_status) != Recording) {
1161                 g_atomic_int_set (&_record_status, Recording);
1162                 _last_record_location = _transport_frame;
1163                 send_mmc_in_another_thread (MIDI::MachineControl::cmdRecordStrobe);
1164
1165                 if (Config->get_monitoring_model() == HardwareMonitoring && Config->get_auto_input()) {
1166                         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
1167                         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
1168                                 if ((*i)->record_enabled ()) {
1169                                         (*i)->monitor_input (true);
1170                                 }
1171                         }
1172                 }
1173
1174                 RecordStateChanged ();
1175         }
1176 }
1177
1178 void
1179 Session::disable_record (bool rt_context, bool force)
1180 {
1181         RecordState rs;
1182
1183         if ((rs = (RecordState) g_atomic_int_get (&_record_status)) != Disabled) {
1184
1185                 if (!Config->get_latched_record_enable () || force) {
1186                         g_atomic_int_set (&_record_status, Disabled);
1187                 } else {
1188                         if (rs == Recording) {
1189                                 g_atomic_int_set (&_record_status, Enabled);
1190                         }
1191                 }
1192
1193                 send_mmc_in_another_thread (MIDI::MachineControl::cmdRecordExit);
1194
1195                 if (Config->get_monitoring_model() == HardwareMonitoring && Config->get_auto_input()) {
1196                         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
1197
1198                         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
1199                                 if ((*i)->record_enabled ()) {
1200                                         (*i)->monitor_input (false);
1201                                 }
1202                         }
1203                 }
1204
1205                 RecordStateChanged (); /* emit signal */
1206
1207                 if (!rt_context) {
1208                         remove_pending_capture_state ();
1209                 }
1210         }
1211 }
1212
1213 void
1214 Session::step_back_from_record ()
1215 {
1216         g_atomic_int_set (&_record_status, Enabled);
1217
1218         if (Config->get_monitoring_model() == HardwareMonitoring) {
1219                 boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
1220
1221                 for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
1222                         if (Config->get_auto_input() && (*i)->record_enabled ()) {
1223                                 //cerr << "switching from input" << __FILE__ << __LINE__ << endl << endl;
1224                                 (*i)->monitor_input (false);
1225                         }
1226                 }
1227         }
1228 }
1229
1230 void
1231 Session::maybe_enable_record ()
1232 {
1233         g_atomic_int_set (&_record_status, Enabled);
1234
1235         /* this function is currently called from somewhere other than an RT thread.
1236            this save_state() call therefore doesn't impact anything.
1237         */
1238
1239         save_state ("", true);
1240
1241         if (_transport_speed) {
1242                 if (!Config->get_punch_in()) {
1243                         enable_record ();
1244                 }
1245         } else {
1246                 send_mmc_in_another_thread (MIDI::MachineControl::cmdRecordPause);
1247                 RecordStateChanged (); /* EMIT SIGNAL */
1248         }
1249
1250         set_dirty();
1251 }
1252
1253 nframes_t
1254 Session::audible_frame () const
1255 {
1256         nframes_t ret;
1257         nframes_t offset;
1258         nframes_t tf;
1259
1260         /* the first of these two possible settings for "offset"
1261            mean that the audible frame is stationary until
1262            audio emerges from the latency compensation
1263            "pseudo-pipeline".
1264
1265            the second means that the audible frame is stationary
1266            until audio would emerge from a physical port
1267            in the absence of any plugin latency compensation
1268         */
1269
1270         offset = _worst_output_latency;
1271
1272         if (offset > current_block_size) {
1273                 offset -= current_block_size;
1274         } else {
1275                 /* XXX is this correct? if we have no external
1276                    physical connections and everything is internal
1277                    then surely this is zero? still, how
1278                    likely is that anyway?
1279                 */
1280                 offset = current_block_size;
1281         }
1282
1283         if (synced_to_jack()) {
1284                 tf = _engine.transport_frame();
1285         } else {
1286                 tf = _transport_frame;
1287         }
1288
1289         if (_transport_speed == 0) {
1290                 return tf;
1291         }
1292
1293         if (tf < offset) {
1294                 return 0;
1295         }
1296
1297         ret = tf;
1298
1299         if (!non_realtime_work_pending()) {
1300
1301                 /* MOVING */
1302
1303                 /* take latency into account */
1304
1305                 ret -= offset;
1306         }
1307
1308         return ret;
1309 }
1310
1311 void
1312 Session::set_frame_rate (nframes_t frames_per_second)
1313 {
1314         /** \fn void Session::set_frame_size(nframes_t)
1315                 the AudioEngine object that calls this guarantees
1316                 that it will not be called while we are also in
1317                 ::process(). Its fine to do things that block
1318                 here.
1319         */
1320
1321         _base_frame_rate = frames_per_second;
1322
1323         sync_time_vars();
1324
1325         Route::set_automation_interval ((jack_nframes_t) ceil ((double) frames_per_second * 0.25));
1326
1327         // XXX we need some equivalent to this, somehow
1328         // SndFileSource::setup_standard_crossfades (frames_per_second);
1329
1330         set_dirty();
1331
1332         /* XXX need to reset/reinstantiate all LADSPA plugins */
1333 }
1334
1335 void
1336 Session::set_block_size (nframes_t nframes)
1337 {
1338         /* the AudioEngine guarantees
1339            that it will not be called while we are also in
1340            ::process(). It is therefore fine to do things that block
1341            here.
1342         */
1343
1344         {
1345                 vector<Sample*>::iterator i;
1346                 uint32_t np;
1347
1348                 current_block_size = nframes;
1349
1350                 for (np = 0, i = _passthru_buffers.begin(); i != _passthru_buffers.end(); ++i, ++np) {
1351                         free (*i);
1352                 }
1353
1354                 for (vector<Sample*>::iterator i = _silent_buffers.begin(); i != _silent_buffers.end(); ++i) {
1355                         free (*i);
1356                 }
1357
1358                 _passthru_buffers.clear ();
1359                 _silent_buffers.clear ();
1360
1361                 ensure_passthru_buffers (np);
1362
1363                 for (vector<Sample*>::iterator i = _send_buffers.begin(); i != _send_buffers.end(); ++i) {
1364                         free(*i);
1365
1366                         Sample *buf;
1367 #ifdef NO_POSIX_MEMALIGN
1368                         buf = (Sample *) malloc(current_block_size * sizeof(Sample));
1369 #else
1370                         posix_memalign((void **)&buf,16,current_block_size * 4);
1371 #endif
1372                         *i = buf;
1373
1374                         memset (*i, 0, sizeof (Sample) * current_block_size);
1375                 }
1376
1377
1378                 if (_gain_automation_buffer) {
1379                         delete [] _gain_automation_buffer;
1380                 }
1381                 _gain_automation_buffer = new gain_t[nframes];
1382
1383                 allocate_pan_automation_buffers (nframes, _npan_buffers, true);
1384
1385                 boost::shared_ptr<RouteList> r = routes.reader ();
1386
1387                 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
1388                         (*i)->set_block_size (nframes);
1389                 }
1390
1391                 boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
1392                 for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
1393                         (*i)->set_block_size (nframes);
1394                 }
1395
1396                 set_worst_io_latencies ();
1397         }
1398 }
1399
1400 void
1401 Session::set_default_fade (float steepness, float fade_msecs)
1402 {
1403 #if 0
1404         nframes_t fade_frames;
1405
1406         /* Don't allow fade of less 1 frame */
1407
1408         if (fade_msecs < (1000.0 * (1.0/_current_frame_rate))) {
1409
1410                 fade_msecs = 0;
1411                 fade_frames = 0;
1412
1413         } else {
1414
1415                 fade_frames = (nframes_t) floor (fade_msecs * _current_frame_rate * 0.001);
1416
1417         }
1418
1419         default_fade_msecs = fade_msecs;
1420         default_fade_steepness = steepness;
1421
1422         {
1423                 // jlc, WTF is this!
1424                 Glib::RWLock::ReaderLock lm (route_lock);
1425                 AudioRegion::set_default_fade (steepness, fade_frames);
1426         }
1427
1428         set_dirty();
1429
1430         /* XXX have to do this at some point */
1431         /* foreach region using default fade, reset, then
1432            refill_all_diskstream_buffers ();
1433         */
1434 #endif
1435 }
1436
1437 struct RouteSorter {
1438     bool operator() (boost::shared_ptr<Route> r1, boost::shared_ptr<Route> r2) {
1439             if (r1->fed_by.find (r2) != r1->fed_by.end()) {
1440                     return false;
1441             } else if (r2->fed_by.find (r1) != r2->fed_by.end()) {
1442                     return true;
1443             } else {
1444                     if (r1->fed_by.empty()) {
1445                             if (r2->fed_by.empty()) {
1446                                     /* no ardour-based connections inbound to either route. just use signal order */
1447                                     return r1->order_key(N_("signal")) < r2->order_key(N_("signal"));
1448                             } else {
1449                                     /* r2 has connections, r1 does not; run r1 early */
1450                                     return true;
1451                             }
1452                     } else {
1453                             return r1->order_key(N_("signal")) < r2->order_key(N_("signal"));
1454                     }
1455             }
1456     }
1457 };
1458
1459 static void
1460 trace_terminal (shared_ptr<Route> r1, shared_ptr<Route> rbase)
1461 {
1462         shared_ptr<Route> r2;
1463
1464         if ((r1->fed_by.find (rbase) != r1->fed_by.end()) && (rbase->fed_by.find (r1) != rbase->fed_by.end())) {
1465                 info << string_compose(_("feedback loop setup between %1 and %2"), r1->name(), rbase->name()) << endmsg;
1466                 return;
1467         }
1468
1469         /* make a copy of the existing list of routes that feed r1 */
1470
1471         set<shared_ptr<Route> > existing = r1->fed_by;
1472
1473         /* for each route that feeds r1, recurse, marking it as feeding
1474            rbase as well.
1475         */
1476
1477         for (set<shared_ptr<Route> >::iterator i = existing.begin(); i != existing.end(); ++i) {
1478                 r2 =* i;
1479
1480                 /* r2 is a route that feeds r1 which somehow feeds base. mark
1481                    base as being fed by r2
1482                 */
1483
1484                 rbase->fed_by.insert (r2);
1485
1486                 if (r2 != rbase) {
1487
1488                         /* 2nd level feedback loop detection. if r1 feeds or is fed by r2,
1489                            stop here.
1490                          */
1491
1492                         if ((r1->fed_by.find (r2) != r1->fed_by.end()) && (r2->fed_by.find (r1) != r2->fed_by.end())) {
1493                                 continue;
1494                         }
1495
1496                         /* now recurse, so that we can mark base as being fed by
1497                            all routes that feed r2
1498                         */
1499
1500                         trace_terminal (r2, rbase);
1501                 }
1502
1503         }
1504 }
1505
1506 void
1507 Session::resort_routes ()
1508 {
1509         /* don't do anything here with signals emitted
1510            by Routes while we are being destroyed.
1511         */
1512
1513         if (_state_of_the_state & Deletion) {
1514                 return;
1515         }
1516
1517
1518         {
1519
1520                 RCUWriter<RouteList> writer (routes);
1521                 shared_ptr<RouteList> r = writer.get_copy ();
1522                 resort_routes_using (r);
1523                 /* writer goes out of scope and forces update */
1524         }
1525
1526 }
1527 void
1528 Session::resort_routes_using (shared_ptr<RouteList> r)
1529 {
1530         RouteList::iterator i, j;
1531
1532         for (i = r->begin(); i != r->end(); ++i) {
1533
1534                 (*i)->fed_by.clear ();
1535
1536                 for (j = r->begin(); j != r->end(); ++j) {
1537
1538                         /* although routes can feed themselves, it will
1539                            cause an endless recursive descent if we
1540                            detect it. so don't bother checking for
1541                            self-feeding.
1542                         */
1543
1544                         if (*j == *i) {
1545                                 continue;
1546                         }
1547
1548                         if ((*j)->feeds (*i)) {
1549                                 (*i)->fed_by.insert (*j);
1550                         }
1551                 }
1552         }
1553
1554         for (i = r->begin(); i != r->end(); ++i) {
1555                 trace_terminal (*i, *i);
1556         }
1557
1558         RouteSorter cmp;
1559         r->sort (cmp);
1560
1561         /* don't leave dangling references to routes in Route::fed_by */
1562
1563         for (i = r->begin(); i != r->end(); ++i) {
1564                 (*i)->fed_by.clear ();
1565         }
1566
1567 #if 0
1568         cerr << "finished route resort\n";
1569
1570         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
1571                 cerr << " " << (*i)->name() << " signal order = " << (*i)->order_key ("signal") << endl;
1572         }
1573         cerr << endl;
1574 #endif
1575
1576 }
1577
1578 list<boost::shared_ptr<AudioTrack> >
1579 Session::new_audio_track (int input_channels, int output_channels, TrackMode mode, uint32_t how_many)
1580 {
1581         char track_name[32];
1582         uint32_t track_id = 0;
1583         uint32_t n = 0;
1584         uint32_t channels_used = 0;
1585         string port;
1586         RouteList new_routes;
1587         list<boost::shared_ptr<AudioTrack> > ret;
1588
1589         /* count existing audio tracks */
1590
1591         {
1592                 shared_ptr<RouteList> r = routes.reader ();
1593
1594                 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
1595                         if (dynamic_cast<AudioTrack*>((*i).get()) != 0) {
1596                                 if (!(*i)->hidden()) {
1597                                         n++;
1598                                         channels_used += (*i)->n_inputs();
1599                                 }
1600                         }
1601                 }
1602         }
1603
1604         vector<string> physinputs;
1605         vector<string> physoutputs;
1606         uint32_t nphysical_in;
1607         uint32_t nphysical_out;
1608
1609         _engine.get_physical_outputs (physoutputs);
1610         _engine.get_physical_inputs (physinputs);
1611
1612         while (how_many) {
1613
1614                 /* check for duplicate route names, since we might have pre-existing
1615                    routes with this name (e.g. create Audio1, Audio2, delete Audio1,
1616                    save, close,restart,add new route - first named route is now
1617                    Audio2)
1618                 */
1619
1620
1621                 do {
1622                         ++track_id;
1623
1624                         snprintf (track_name, sizeof(track_name), "Audio %" PRIu32, track_id);
1625
1626                         if (route_by_name (track_name) == 0) {
1627                                 break;
1628                         }
1629
1630                 } while (track_id < (UINT_MAX-1));
1631
1632                 if (Config->get_input_auto_connect() & AutoConnectPhysical) {
1633                         nphysical_in = min (n_physical_inputs, (uint32_t) physinputs.size());
1634                 } else {
1635                         nphysical_in = 0;
1636                 }
1637
1638                 if (Config->get_output_auto_connect() & AutoConnectPhysical) {
1639                         nphysical_out = min (n_physical_outputs, (uint32_t) physinputs.size());
1640                 } else {
1641                         nphysical_out = 0;
1642                 }
1643
1644                 try {
1645                         shared_ptr<AudioTrack> track (new AudioTrack (*this, track_name, Route::Flag (0), mode));
1646
1647                         if (track->ensure_io (input_channels, output_channels, false, this)) {
1648                                 error << string_compose (_("cannot configure %1 in/%2 out configuration for new audio track"),
1649                                                          input_channels, output_channels)
1650                                       << endmsg;
1651                         }
1652
1653                         if (nphysical_in) {
1654                                 for (uint32_t x = 0; x < track->n_inputs() && x < nphysical_in; ++x) {
1655
1656                                         port = "";
1657
1658                                         if (Config->get_input_auto_connect() & AutoConnectPhysical) {
1659                                                 port = physinputs[(channels_used+x)%nphysical_in];
1660                                         }
1661
1662                                         if (port.length() && track->connect_input (track->input (x), port, this)) {
1663                                                 break;
1664                                         }
1665                                 }
1666                         }
1667
1668                         for (uint32_t x = 0; x < track->n_outputs(); ++x) {
1669
1670                                 port = "";
1671
1672                                 if (nphysical_out && (Config->get_output_auto_connect() & AutoConnectPhysical)) {
1673                                         port = physoutputs[(channels_used+x)%nphysical_out];
1674                                 } else if (Config->get_output_auto_connect() & AutoConnectMaster) {
1675                                         if (_master_out) {
1676                                                 port = _master_out->input (x%_master_out->n_inputs())->name();
1677                                         }
1678                                 }
1679
1680                                 if (port.length() && track->connect_output (track->output (x), port, this)) {
1681                                         break;
1682                                 }
1683                         }
1684
1685                         channels_used += track->n_inputs ();
1686
1687                         if (_control_out) {
1688                                 vector<string> cports;
1689                                 uint32_t ni = _control_out->n_inputs();
1690
1691                                 for (n = 0; n < ni; ++n) {
1692                                         cports.push_back (_control_out->input(n)->name());
1693                                 }
1694
1695                                 track->set_control_outs (cports);
1696                         }
1697
1698                         track->DiskstreamChanged.connect (mem_fun (this, &Session::resort_routes));
1699                         track->set_remote_control_id (ntracks());
1700
1701                         new_routes.push_back (track);
1702                         ret.push_back (track);
1703                 }
1704
1705                 catch (failed_constructor &err) {
1706                         error << _("Session: could not create new audio track.") << endmsg;
1707                         // XXX should we delete the tracks already created?
1708                         ret.clear ();
1709                         return ret;
1710                 }
1711
1712                 --how_many;
1713         }
1714
1715         if (!new_routes.empty()) {
1716                 add_routes (new_routes, false);
1717                 save_state (_current_snapshot_name);
1718         }
1719
1720         return ret;
1721 }
1722
1723 Session::RouteList
1724 Session::new_audio_route (int input_channels, int output_channels, uint32_t how_many)
1725 {
1726         char bus_name[32];
1727         uint32_t bus_id = 1;
1728         uint32_t n = 0;
1729         string port;
1730         RouteList ret;
1731
1732         /* count existing audio busses */
1733
1734         {
1735                 shared_ptr<RouteList> r = routes.reader ();
1736
1737                 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
1738                         if (dynamic_cast<AudioTrack*>((*i).get()) == 0) {
1739                                 if (!(*i)->hidden()) {
1740                                         bus_id++;
1741                                 }
1742                         }
1743                 }
1744         }
1745
1746         vector<string> physinputs;
1747         vector<string> physoutputs;
1748
1749         _engine.get_physical_outputs (physoutputs);
1750         _engine.get_physical_inputs (physinputs);
1751
1752         while (how_many) {
1753
1754                 do {
1755                         ++bus_id;
1756
1757                         snprintf (bus_name, sizeof(bus_name), "Bus %" PRIu32, bus_id);
1758
1759                         if (route_by_name (bus_name) == 0) {
1760                                 break;
1761                         }
1762
1763                 } while (bus_id < (UINT_MAX-1));
1764
1765                 try {
1766                         shared_ptr<Route> bus (new Route (*this, bus_name, -1, -1, -1, -1, Route::Flag(0), DataType::AUDIO));
1767
1768                         if (bus->ensure_io (input_channels, output_channels, false, this)) {
1769                                 error << string_compose (_("cannot configure %1 in/%2 out configuration for new audio track"),
1770                                                          input_channels, output_channels)
1771                                       << endmsg;
1772                         }
1773
1774                         for (uint32_t x = 0; x < bus->n_inputs(); ++x) {
1775
1776                                 port = "";
1777
1778                                 if (Config->get_input_auto_connect() & AutoConnectPhysical) {
1779                                         port = physinputs[((n+x)%n_physical_inputs)];
1780                                 }
1781
1782                                 if (port.length() && bus->connect_input (bus->input (x), port, this)) {
1783                                         break;
1784                                 }
1785                         }
1786
1787                         for (uint32_t x = 0; x < bus->n_outputs(); ++x) {
1788
1789                                 port = "";
1790
1791                                 if (Config->get_output_auto_connect() & AutoConnectPhysical) {
1792                                         port = physoutputs[((n+x)%n_physical_outputs)];
1793                                 } else if (Config->get_output_auto_connect() & AutoConnectMaster) {
1794                                         if (_master_out) {
1795                                                 port = _master_out->input (x%_master_out->n_inputs())->name();
1796                                         }
1797                                 }
1798
1799                                 if (port.length() && bus->connect_output (bus->output (x), port, this)) {
1800                                         break;
1801                                 }
1802                         }
1803
1804                         if (_control_out) {
1805                                 vector<string> cports;
1806                                 uint32_t ni = _control_out->n_inputs();
1807
1808                                 for (uint32_t n = 0; n < ni; ++n) {
1809                                         cports.push_back (_control_out->input(n)->name());
1810                                 }
1811                                 bus->set_control_outs (cports);
1812                         }
1813
1814                         ret.push_back (bus);
1815                 }
1816
1817
1818                 catch (failed_constructor &err) {
1819                         error << _("Session: could not create new audio route.") << endmsg;
1820                         ret.clear ();
1821                         return ret;
1822                 }
1823
1824                 --how_many;
1825         }
1826
1827         if (!ret.empty()) {
1828                 add_routes (ret, false);
1829                 save_state (_current_snapshot_name);
1830         }
1831
1832         return ret;
1833
1834 }
1835
1836 void
1837 Session::add_routes (RouteList& new_routes, bool save)
1838 {
1839         {
1840                 RCUWriter<RouteList> writer (routes);
1841                 shared_ptr<RouteList> r = writer.get_copy ();
1842                 r->insert (r->end(), new_routes.begin(), new_routes.end());
1843                 resort_routes_using (r);
1844         }
1845
1846         for (RouteList::iterator x = new_routes.begin(); x != new_routes.end(); ++x) {
1847
1848                 boost::weak_ptr<Route> wpr (*x);
1849
1850                 (*x)->solo_changed.connect (sigc::bind (mem_fun (*this, &Session::route_solo_changed), wpr));
1851                 (*x)->mute_changed.connect (mem_fun (*this, &Session::route_mute_changed));
1852                 (*x)->output_changed.connect (mem_fun (*this, &Session::set_worst_io_latencies_x));
1853                 (*x)->redirects_changed.connect (mem_fun (*this, &Session::update_latency_compensation_proxy));
1854
1855                 if ((*x)->master()) {
1856                         _master_out = (*x);
1857                 }
1858
1859                 if ((*x)->control()) {
1860                         _control_out = (*x);
1861                 }
1862         }
1863
1864         set_dirty();
1865
1866         if (save) {
1867                 save_state (_current_snapshot_name);
1868         }
1869
1870         RouteAdded (new_routes); /* EMIT SIGNAL */
1871 }
1872
1873 void
1874 Session::add_diskstream (boost::shared_ptr<Diskstream> dstream)
1875 {
1876         /* need to do this in case we're rolling at the time, to prevent false underruns */
1877         dstream->do_refill_with_alloc();
1878
1879         {
1880                 RCUWriter<DiskstreamList> writer (diskstreams);
1881                 boost::shared_ptr<DiskstreamList> ds = writer.get_copy();
1882                 ds->push_back (dstream);
1883         }
1884
1885         dstream->set_block_size (current_block_size);
1886
1887         dstream->PlaylistChanged.connect (sigc::bind (mem_fun (*this, &Session::diskstream_playlist_changed), dstream));
1888         /* this will connect to future changes, and check the current length */
1889         diskstream_playlist_changed (dstream);
1890
1891         dstream->prepare ();
1892 }
1893
1894 void
1895 Session::remove_route (shared_ptr<Route> route)
1896 {
1897         {
1898                 RCUWriter<RouteList> writer (routes);
1899                 shared_ptr<RouteList> rs = writer.get_copy ();
1900
1901                 rs->remove (route);
1902
1903                 /* deleting the master out seems like a dumb
1904                    idea, but its more of a UI policy issue
1905                    than our concern.
1906                 */
1907
1908                 if (route == _master_out) {
1909                         _master_out = shared_ptr<Route> ();
1910                 }
1911
1912                 if (route == _control_out) {
1913                         _control_out = shared_ptr<Route> ();
1914
1915                         /* cancel control outs for all routes */
1916
1917                         vector<string> empty;
1918
1919                         for (RouteList::iterator r = rs->begin(); r != rs->end(); ++r) {
1920                                 (*r)->set_control_outs (empty);
1921                         }
1922                 }
1923
1924                 update_route_solo_state ();
1925
1926                 /* writer goes out of scope, forces route list update */
1927         }
1928
1929         // FIXME: audio specific
1930         AudioTrack* at;
1931         boost::shared_ptr<AudioDiskstream> ds;
1932
1933         if ((at = dynamic_cast<AudioTrack*>(route.get())) != 0) {
1934                 ds = at->audio_diskstream();
1935         }
1936
1937         if (ds) {
1938
1939                 {
1940                         RCUWriter<DiskstreamList> dsl (diskstreams);
1941                         boost::shared_ptr<DiskstreamList> d = dsl.get_copy();
1942                         d->remove (ds);
1943                 }
1944         }
1945
1946         find_current_end ();
1947
1948         update_latency_compensation (false, false);
1949         set_dirty();
1950
1951         // We need to disconnect the routes inputs and outputs
1952         route->disconnect_inputs(NULL);
1953         route->disconnect_outputs(NULL);
1954
1955         /* get rid of it from the dead wood collection in the route list manager */
1956
1957         /* XXX i think this is unsafe as it currently stands, but i am not sure. (pd, october 2nd, 2006) */
1958
1959         routes.flush ();
1960
1961         /* try to cause everyone to drop their references */
1962
1963         route->drop_references ();
1964
1965         /* save the new state of the world */
1966
1967         if (save_state (_current_snapshot_name)) {
1968                 save_history (_current_snapshot_name);
1969         }
1970 }
1971
1972 void
1973 Session::route_mute_changed (void* src)
1974 {
1975         set_dirty ();
1976 }
1977
1978 void
1979 Session::route_solo_changed (void* src, boost::weak_ptr<Route> wpr)
1980 {
1981         if (solo_update_disabled) {
1982                 // We know already
1983                 return;
1984         }
1985
1986         bool is_track;
1987         boost::shared_ptr<Route> route = wpr.lock ();
1988
1989         if (!route) {
1990                 /* should not happen */
1991                 error << string_compose (_("programming error: %1"), X_("invalid route weak ptr passed to route_solo_changed")) << endmsg;
1992                 return;
1993         }
1994
1995         is_track = (boost::dynamic_pointer_cast<AudioTrack>(route) != 0);
1996
1997         shared_ptr<RouteList> r = routes.reader ();
1998
1999         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2000
2001                 /* soloing a track mutes all other tracks, soloing a bus mutes all other busses */
2002
2003                 if (is_track) {
2004
2005                         /* don't mess with busses */
2006
2007                         if (dynamic_cast<AudioTrack*>((*i).get()) == 0) {
2008                                 continue;
2009                         }
2010
2011                 } else {
2012
2013                         /* don't mess with tracks */
2014
2015                         if (dynamic_cast<AudioTrack*>((*i).get()) != 0) {
2016                                 continue;
2017                         }
2018                 }
2019
2020                 if ((*i) != route &&
2021                     ((*i)->mix_group () == 0 ||
2022                      (*i)->mix_group () != route->mix_group () ||
2023                      !route->mix_group ()->is_active())) {
2024
2025                         if ((*i)->soloed()) {
2026
2027                                 /* if its already soloed, and solo latching is enabled,
2028                                    then leave it as it is.
2029                                 */
2030
2031                                 if (Config->get_solo_latched()) {
2032                                         continue;
2033                                 }
2034                         }
2035
2036                         /* do it */
2037
2038                         solo_update_disabled = true;
2039                         (*i)->set_solo (false, src);
2040                         solo_update_disabled = false;
2041                 }
2042         }
2043
2044         bool something_soloed = false;
2045         bool same_thing_soloed = false;
2046         bool signal = false;
2047
2048         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2049                 if ((*i)->soloed()) {
2050                         something_soloed = true;
2051                         if (dynamic_cast<AudioTrack*>((*i).get())) {
2052                                 if (is_track) {
2053                                         same_thing_soloed = true;
2054                                         break;
2055                                 }
2056                         } else {
2057                                 if (!is_track) {
2058                                         same_thing_soloed = true;
2059                                         break;
2060                                 }
2061                         }
2062                         break;
2063                 }
2064         }
2065
2066         if (something_soloed != currently_soloing) {
2067                 signal = true;
2068                 currently_soloing = something_soloed;
2069         }
2070
2071         modify_solo_mute (is_track, same_thing_soloed);
2072
2073         if (signal) {
2074                 SoloActive (currently_soloing);
2075         }
2076
2077         set_dirty();
2078 }
2079
2080 void
2081 Session::update_route_solo_state ()
2082 {
2083         bool mute = false;
2084         bool is_track = false;
2085         bool signal = false;
2086
2087         /* caller must hold RouteLock */
2088
2089         /* this is where we actually implement solo by changing
2090            the solo mute setting of each track.
2091         */
2092
2093         shared_ptr<RouteList> r = routes.reader ();
2094
2095         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2096                 if ((*i)->soloed()) {
2097                         mute = true;
2098                         if (dynamic_cast<AudioTrack*>((*i).get())) {
2099                                 is_track = true;
2100                         }
2101                         break;
2102                 }
2103         }
2104
2105         if (mute != currently_soloing) {
2106                 signal = true;
2107                 currently_soloing = mute;
2108         }
2109
2110         if (!is_track && !mute) {
2111
2112                 /* nothing is soloed */
2113
2114                 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2115                         (*i)->set_solo_mute (false);
2116                 }
2117
2118                 if (signal) {
2119                         SoloActive (false);
2120                 }
2121
2122                 return;
2123         }
2124
2125         modify_solo_mute (is_track, mute);
2126
2127         if (signal) {
2128                 SoloActive (currently_soloing);
2129         }
2130 }
2131
2132 void
2133 Session::modify_solo_mute (bool is_track, bool mute)
2134 {
2135         shared_ptr<RouteList> r = routes.reader ();
2136
2137         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2138
2139                 if (is_track) {
2140
2141                         /* only alter track solo mute */
2142
2143                         if (dynamic_cast<AudioTrack*>((*i).get())) {
2144                                 if ((*i)->soloed()) {
2145                                         (*i)->set_solo_mute (!mute);
2146                                 } else {
2147                                         (*i)->set_solo_mute (mute);
2148                                 }
2149                         }
2150
2151                 } else {
2152
2153                         /* only alter bus solo mute */
2154
2155                         if (!dynamic_cast<AudioTrack*>((*i).get())) {
2156
2157                                 if ((*i)->soloed()) {
2158
2159                                         (*i)->set_solo_mute (false);
2160
2161                                 } else {
2162
2163                                         /* don't mute master or control outs
2164                                            in response to another bus solo
2165                                         */
2166
2167                                         if ((*i) != _master_out &&
2168                                             (*i) != _control_out) {
2169                                                 (*i)->set_solo_mute (mute);
2170                                         }
2171                                 }
2172                         }
2173
2174                 }
2175         }
2176 }
2177
2178
2179 void
2180 Session::catch_up_on_solo ()
2181 {
2182         /* this is called after set_state() to catch the full solo
2183            state, which can't be correctly determined on a per-route
2184            basis, but needs the global overview that only the session
2185            has.
2186         */
2187         update_route_solo_state();
2188 }
2189
2190 shared_ptr<Route>
2191 Session::route_by_name (string name)
2192 {
2193         shared_ptr<RouteList> r = routes.reader ();
2194
2195         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2196                 if ((*i)->name() == name) {
2197                         return *i;
2198                 }
2199         }
2200
2201         return shared_ptr<Route> ((Route*) 0);
2202 }
2203
2204 shared_ptr<Route>
2205 Session::route_by_id (PBD::ID id)
2206 {
2207         shared_ptr<RouteList> r = routes.reader ();
2208
2209         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2210                 if ((*i)->id() == id) {
2211                         return *i;
2212                 }
2213         }
2214
2215         return shared_ptr<Route> ((Route*) 0);
2216 }
2217
2218 shared_ptr<Route>
2219 Session::route_by_remote_id (uint32_t id)
2220 {
2221         shared_ptr<RouteList> r = routes.reader ();
2222
2223         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
2224                 if ((*i)->remote_control_id() == id) {
2225                         return *i;
2226                 }
2227         }
2228
2229         return shared_ptr<Route> ((Route*) 0);
2230 }
2231
2232 void
2233 Session::find_current_end ()
2234 {
2235         if (_state_of_the_state & Loading) {
2236                 return;
2237         }
2238
2239         nframes_t max = get_maximum_extent ();
2240
2241         if (max > end_location->end()) {
2242                 end_location->set_end (max);
2243                 set_dirty();
2244                 DurationChanged(); /* EMIT SIGNAL */
2245         }
2246 }
2247
2248 nframes_t
2249 Session::get_maximum_extent () const
2250 {
2251         nframes_t max = 0;
2252         nframes_t me;
2253
2254         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
2255
2256         for (DiskstreamList::const_iterator i = dsl->begin(); i != dsl->end(); ++i) {
2257                 Playlist* pl = (*i)->playlist();
2258                 if ((me = pl->get_maximum_extent()) > max) {
2259                         max = me;
2260                 }
2261         }
2262
2263         return max;
2264 }
2265
2266 boost::shared_ptr<Diskstream>
2267 Session::diskstream_by_name (string name)
2268 {
2269         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
2270
2271         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
2272                 if ((*i)->name() == name) {
2273                         return *i;
2274                 }
2275         }
2276
2277         return boost::shared_ptr<Diskstream>((Diskstream*) 0);
2278 }
2279
2280 boost::shared_ptr<Diskstream>
2281 Session::diskstream_by_id (const PBD::ID& id)
2282 {
2283         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
2284
2285         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
2286                 if ((*i)->id() == id) {
2287                         return *i;
2288                 }
2289         }
2290
2291         return boost::shared_ptr<Diskstream>((Diskstream*) 0);
2292 }
2293
2294 /* AudioRegion management */
2295
2296 string
2297 Session::new_region_name (string old)
2298 {
2299         string::size_type last_period;
2300         uint32_t number;
2301         string::size_type len = old.length() + 64;
2302         char buf[len];
2303
2304         if ((last_period = old.find_last_of ('.')) == string::npos) {
2305
2306                 /* no period present - add one explicitly */
2307
2308                 old += '.';
2309                 last_period = old.length() - 1;
2310                 number = 0;
2311
2312         } else {
2313
2314                 number = atoi (old.substr (last_period+1).c_str());
2315
2316         }
2317
2318         while (number < (UINT_MAX-1)) {
2319
2320                 AudioRegionList::const_iterator i;
2321                 string sbuf;
2322
2323                 number++;
2324
2325                 snprintf (buf, len, "%s%" PRIu32, old.substr (0, last_period + 1).c_str(), number);
2326                 sbuf = buf;
2327
2328                 for (i = audio_regions.begin(); i != audio_regions.end(); ++i) {
2329                         if (i->second->name() == sbuf) {
2330                                 break;
2331                         }
2332                 }
2333
2334                 if (i == audio_regions.end()) {
2335                         break;
2336                 }
2337         }
2338
2339         if (number != (UINT_MAX-1)) {
2340                 return buf;
2341         }
2342
2343         error << string_compose (_("cannot create new name for region \"%1\""), old) << endmsg;
2344         return old;
2345 }
2346
2347 int
2348 Session::region_name (string& result, string base, bool newlevel) const
2349 {
2350         char buf[16];
2351         string subbase;
2352
2353         if (base == "") {
2354
2355                 Glib::Mutex::Lock lm (region_lock);
2356
2357                 snprintf (buf, sizeof (buf), "%d", (int)audio_regions.size() + 1);
2358
2359
2360                 result = "region.";
2361                 result += buf;
2362
2363         } else {
2364
2365                 /* XXX this is going to be slow. optimize me later */
2366
2367                 if (newlevel) {
2368                         subbase = base;
2369                 } else {
2370                         string::size_type pos;
2371
2372                         pos = base.find_last_of ('.');
2373
2374                         /* pos may be npos, but then we just use entire base */
2375
2376                         subbase = base.substr (0, pos);
2377
2378                 }
2379
2380                 bool name_taken = true;
2381
2382                 {
2383                         Glib::Mutex::Lock lm (region_lock);
2384
2385                         for (int n = 1; n < 5000; ++n) {
2386
2387                                 result = subbase;
2388                                 snprintf (buf, sizeof (buf), ".%d", n);
2389                                 result += buf;
2390
2391                                 name_taken = false;
2392
2393                                 for (AudioRegionList::const_iterator i = audio_regions.begin(); i != audio_regions.end(); ++i) {
2394                                         if (i->second->name() == result) {
2395                                                 name_taken = true;
2396                                                 break;
2397                                         }
2398                                 }
2399
2400                                 if (!name_taken) {
2401                                         break;
2402                                 }
2403                         }
2404                 }
2405
2406                 if (name_taken) {
2407                         fatal << string_compose(_("too many regions with names like %1"), base) << endmsg;
2408                         /*NOTREACHED*/
2409                 }
2410         }
2411         return 0;
2412 }
2413
2414 void
2415 Session::add_region (boost::shared_ptr<Region> region)
2416 {
2417         boost::shared_ptr<AudioRegion> ar;
2418         boost::shared_ptr<AudioRegion> oar;
2419         bool added = false;
2420
2421         {
2422                 Glib::Mutex::Lock lm (region_lock);
2423
2424                 if ((ar = boost::dynamic_pointer_cast<AudioRegion> (region)) != 0) {
2425
2426                         AudioRegionList::iterator x;
2427
2428                         for (x = audio_regions.begin(); x != audio_regions.end(); ++x) {
2429
2430                                 oar = boost::dynamic_pointer_cast<AudioRegion> (x->second);
2431
2432                                 if (ar->region_list_equivalent (oar)) {
2433                                         break;
2434                                 }
2435                         }
2436
2437                         if (x == audio_regions.end()) {
2438
2439                                 pair<AudioRegionList::key_type,AudioRegionList::mapped_type> entry;
2440
2441                                 entry.first = region->id();
2442                                 entry.second = ar;
2443
2444                                 pair<AudioRegionList::iterator,bool> x = audio_regions.insert (entry);
2445
2446
2447                                 if (!x.second) {
2448                                         return;
2449                                 }
2450
2451                                 added = true;
2452                         }
2453
2454                 } else {
2455
2456                         fatal << _("programming error: ")
2457                               << X_("unknown region type passed to Session::add_region()")
2458                               << endmsg;
2459                         /*NOTREACHED*/
2460
2461                 }
2462         }
2463
2464         /* mark dirty because something has changed even if we didn't
2465            add the region to the region list.
2466         */
2467
2468         set_dirty();
2469
2470         if (added) {
2471                 region->GoingAway.connect (sigc::bind (mem_fun (*this, &Session::remove_region), boost::weak_ptr<Region>(region)));
2472                 region->StateChanged.connect (sigc::bind (mem_fun (*this, &Session::region_changed), boost::weak_ptr<Region>(region)));
2473                 AudioRegionAdded (ar); /* EMIT SIGNAL */
2474         }
2475 }
2476
2477 void
2478 Session::region_changed (Change what_changed, boost::weak_ptr<Region> weak_region)
2479 {
2480         boost::shared_ptr<Region> region (weak_region.lock ());
2481
2482         if (!region) {
2483                 return;
2484         }
2485
2486         if (what_changed & Region::HiddenChanged) {
2487                 /* relay hidden changes */
2488                 RegionHiddenChange (region);
2489         }
2490 }
2491
2492 void
2493 Session::remove_region (boost::weak_ptr<Region> weak_region)
2494 {
2495         AudioRegionList::iterator i;
2496         boost::shared_ptr<Region> region (weak_region.lock ());
2497
2498         if (!region) {
2499                 return;
2500         }
2501
2502         boost::shared_ptr<AudioRegion> ar;
2503         bool removed = false;
2504
2505         {
2506                 Glib::Mutex::Lock lm (region_lock);
2507
2508                 if ((ar = boost::dynamic_pointer_cast<AudioRegion> (region)) != 0) {
2509                         if ((i = audio_regions.find (region->id())) != audio_regions.end()) {
2510                                 audio_regions.erase (i);
2511                                 removed = true;
2512                         }
2513
2514                 } else {
2515
2516                         fatal << _("programming error: ")
2517                               << X_("unknown region type passed to Session::remove_region()")
2518                               << endmsg;
2519                         /*NOTREACHED*/
2520                 }
2521         }
2522
2523         /* mark dirty because something has changed even if we didn't
2524            remove the region from the region list.
2525         */
2526
2527         set_dirty();
2528
2529         if (removed) {
2530                  AudioRegionRemoved(ar); /* EMIT SIGNAL */
2531         }
2532 }
2533
2534 boost::shared_ptr<AudioRegion>
2535 Session::find_whole_file_parent (boost::shared_ptr<AudioRegion> child)
2536 {
2537         AudioRegionList::iterator i;
2538         boost::shared_ptr<AudioRegion> region;
2539         Glib::Mutex::Lock lm (region_lock);
2540
2541         for (i = audio_regions.begin(); i != audio_regions.end(); ++i) {
2542
2543                 region = i->second;
2544
2545                 if (region->whole_file()) {
2546
2547                         if (child->source_equivalent (region)) {
2548                                 return region;
2549                         }
2550                 }
2551         }
2552
2553         return boost::shared_ptr<AudioRegion> ();
2554 }
2555
2556 void
2557 Session::find_equivalent_playlist_regions (boost::shared_ptr<Region> region, vector<boost::shared_ptr<Region> >& result)
2558 {
2559         for (PlaylistList::iterator i = playlists.begin(); i != playlists.end(); ++i)
2560                 (*i)->get_region_list_equivalent_regions (region, result);
2561 }
2562
2563 int
2564 Session::destroy_region (boost::shared_ptr<Region> region)
2565 {
2566         boost::shared_ptr<AudioRegion> aregion;
2567
2568         if ((aregion = boost::dynamic_pointer_cast<AudioRegion> (region)) == 0) {
2569                 return 0;
2570         }
2571
2572         if (aregion->playlist()) {
2573                 aregion->playlist()->destroy_region (region);
2574         }
2575
2576         vector<boost::shared_ptr<Source> > srcs;
2577
2578         for (uint32_t n = 0; n < aregion->n_channels(); ++n) {
2579                 srcs.push_back (aregion->source (n));
2580         }
2581
2582         for (vector<boost::shared_ptr<Source> >::iterator i = srcs.begin(); i != srcs.end(); ++i) {
2583
2584                 if ((*i).use_count() == 1) {
2585                         boost::shared_ptr<AudioFileSource> afs = boost::dynamic_pointer_cast<AudioFileSource>(*i);
2586
2587                         if (afs) {
2588                                 (afs)->mark_for_remove ();
2589                         }
2590
2591                         (*i)->drop_references ();
2592                 }
2593         }
2594
2595         return 0;
2596 }
2597
2598 int
2599 Session::destroy_regions (list<boost::shared_ptr<Region> > regions)
2600 {
2601         for (list<boost::shared_ptr<Region> >::iterator i = regions.begin(); i != regions.end(); ++i) {
2602                 destroy_region (*i);
2603         }
2604         return 0;
2605 }
2606
2607 int
2608 Session::remove_last_capture ()
2609 {
2610         list<boost::shared_ptr<Region> > r;
2611
2612         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
2613
2614         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
2615                 list<boost::shared_ptr<Region> >& l = (*i)->last_capture_regions();
2616
2617                 if (!l.empty()) {
2618                         r.insert (r.end(), l.begin(), l.end());
2619                         l.clear ();
2620                 }
2621         }
2622
2623         destroy_regions (r);
2624         return 0;
2625 }
2626
2627 int
2628 Session::remove_region_from_region_list (boost::shared_ptr<Region> r)
2629 {
2630         remove_region (r);
2631         return 0;
2632 }
2633
2634 /* Source Management */
2635
2636 void
2637 Session::add_source (boost::shared_ptr<Source> source)
2638 {
2639         boost::shared_ptr<AudioFileSource> afs;
2640
2641         if ((afs = boost::dynamic_pointer_cast<AudioFileSource>(source)) != 0) {
2642
2643                 pair<AudioSourceList::key_type, AudioSourceList::mapped_type> entry;
2644                 pair<AudioSourceList::iterator,bool> result;
2645
2646                 entry.first = source->id();
2647                 entry.second = afs;
2648
2649                 {
2650                         Glib::Mutex::Lock lm (audio_source_lock);
2651                         result = audio_sources.insert (entry);
2652                 }
2653
2654                 if (!result.second) {
2655                         cerr << "\tNOT inserted ? " << result.second << endl;
2656                 }
2657
2658                 source->GoingAway.connect (sigc::bind (mem_fun (this, &Session::remove_source), boost::weak_ptr<Source> (source)));
2659                 set_dirty();
2660
2661                 SourceAdded (source); /* EMIT SIGNAL */
2662         } else {
2663                 cerr << "\tNOT AUDIO FILE\n";
2664         }
2665 }
2666
2667 void
2668 Session::remove_source (boost::weak_ptr<Source> src)
2669 {
2670         AudioSourceList::iterator i;
2671         boost::shared_ptr<Source> source = src.lock();
2672
2673         if (!source) {
2674                 return;
2675         }
2676
2677         {
2678                 Glib::Mutex::Lock lm (audio_source_lock);
2679
2680                 if ((i = audio_sources.find (source->id())) != audio_sources.end()) {
2681                         audio_sources.erase (i);
2682                 }
2683         }
2684
2685         if (!_state_of_the_state & InCleanup) {
2686
2687                 /* save state so we don't end up with a session file
2688                    referring to non-existent sources.
2689                 */
2690
2691                 save_state (_current_snapshot_name);
2692         }
2693
2694         SourceRemoved(source); /* EMIT SIGNAL */
2695 }
2696
2697 boost::shared_ptr<Source>
2698 Session::source_by_id (const PBD::ID& id)
2699 {
2700         Glib::Mutex::Lock lm (audio_source_lock);
2701         AudioSourceList::iterator i;
2702         boost::shared_ptr<Source> source;
2703
2704         if ((i = audio_sources.find (id)) != audio_sources.end()) {
2705                 source = i->second;
2706         }
2707
2708         /* XXX search MIDI or other searches here */
2709
2710         return source;
2711 }
2712
2713 string
2714 Session::peak_path_from_audio_path (string audio_path) const
2715 {
2716         string res;
2717
2718         res = peak_dir ();
2719         res += PBD::basename_nosuffix (audio_path);
2720         res += ".peak";
2721
2722         return res;
2723 }
2724
2725 string
2726 Session::change_audio_path_by_name (string path, string oldname, string newname, bool destructive)
2727 {
2728         string look_for;
2729         string old_basename = PBD::basename_nosuffix (oldname);
2730         string new_legalized = legalize_for_path (newname);
2731
2732         /* note: we know (or assume) the old path is already valid */
2733
2734         if (destructive) {
2735
2736                 /* destructive file sources have a name of the form:
2737
2738                     /path/to/Tnnnn-NAME(%[LR])?.wav
2739
2740                     the task here is to replace NAME with the new name.
2741                 */
2742
2743                 /* find last slash */
2744
2745                 string dir;
2746                 string prefix;
2747                 string::size_type slash;
2748                 string::size_type dash;
2749
2750                 if ((slash = path.find_last_of ('/')) == string::npos) {
2751                         return "";
2752                 }
2753
2754                 dir = path.substr (0, slash+1);
2755
2756                 /* '-' is not a legal character for the NAME part of the path */
2757
2758                 if ((dash = path.find_last_of ('-')) == string::npos) {
2759                         return "";
2760                 }
2761
2762                 prefix = path.substr (slash+1, dash-(slash+1));
2763
2764                 path = dir;
2765                 path += prefix;
2766                 path += '-';
2767                 path += new_legalized;
2768                 path += ".wav";  /* XXX gag me with a spoon */
2769
2770         } else {
2771
2772                 /* non-destructive file sources have a name of the form:
2773
2774                     /path/to/NAME-nnnnn(%[LR])?.wav
2775
2776                     the task here is to replace NAME with the new name.
2777                 */
2778
2779                 string dir;
2780                 string suffix;
2781                 string::size_type slash;
2782                 string::size_type dash;
2783                 string::size_type postfix;
2784
2785                 /* find last slash */
2786
2787                 if ((slash = path.find_last_of ('/')) == string::npos) {
2788                         return "";
2789                 }
2790
2791                 dir = path.substr (0, slash+1);
2792
2793                 /* '-' is not a legal character for the NAME part of the path */
2794
2795                 if ((dash = path.find_last_of ('-')) == string::npos) {
2796                         return "";
2797                 }
2798
2799                 suffix = path.substr (dash+1);
2800
2801                 // Suffix is now everything after the dash. Now we need to eliminate
2802                 // the nnnnn part, which is done by either finding a '%' or a '.'
2803
2804                 postfix = suffix.find_last_of ("%");
2805                 if (postfix == string::npos) {
2806                         postfix = suffix.find_last_of ('.');
2807                 }
2808
2809                 if (postfix != string::npos) {
2810                         suffix = suffix.substr (postfix);
2811                 } else {
2812                         error << "Logic error in Session::change_audio_path_by_name(), please report to the developers" << endl;
2813                         return "";
2814                 }
2815
2816                 const uint32_t limit = 10000;
2817                 char buf[PATH_MAX+1];
2818
2819                 for (uint32_t cnt = 1; cnt <= limit; ++cnt) {
2820
2821                         snprintf (buf, sizeof(buf), "%s%s-%u%s", dir.c_str(), newname.c_str(), cnt, suffix.c_str());
2822
2823                         if (access (buf, F_OK) != 0) {
2824                                 path = buf;
2825                                 break;
2826                         }
2827                         path = "";
2828                 }
2829
2830                 if (path == "") {
2831                         error << "FATAL ERROR! Could not find a " << endl;
2832                 }
2833
2834         }
2835
2836         return path;
2837 }
2838
2839 string
2840 Session::audio_path_from_name (string name, uint32_t nchan, uint32_t chan, bool destructive)
2841 {
2842         string spath;
2843         uint32_t cnt;
2844         char buf[PATH_MAX+1];
2845         const uint32_t limit = 10000;
2846         string legalized;
2847
2848         buf[0] = '\0';
2849         legalized = legalize_for_path (name);
2850
2851         /* find a "version" of the file name that doesn't exist in
2852            any of the possible directories.
2853         */
2854
2855         for (cnt = (destructive ? ++destructive_index : 1); cnt <= limit; ++cnt) {
2856
2857                 vector<space_and_path>::iterator i;
2858                 uint32_t existing = 0;
2859
2860                 for (i = session_dirs.begin(); i != session_dirs.end(); ++i) {
2861
2862                         spath = (*i).path;
2863
2864                         spath += sound_dir (false);
2865
2866                         if (destructive) {
2867                                 if (nchan < 2) {
2868                                         snprintf (buf, sizeof(buf), "%s/T%04d-%s.wav", spath.c_str(), cnt, legalized.c_str());
2869                                 } else if (nchan == 2) {
2870                                         if (chan == 0) {
2871                                                 snprintf (buf, sizeof(buf), "%s/T%04d-%s%%L.wav", spath.c_str(), cnt, legalized.c_str());
2872                                         } else {
2873                                                 snprintf (buf, sizeof(buf), "%s/T%04d-%s%%R.wav", spath.c_str(), cnt, legalized.c_str());
2874                                         }
2875                                 } else if (nchan < 26) {
2876                                         snprintf (buf, sizeof(buf), "%s/T%04d-%s%%%c.wav", spath.c_str(), cnt, legalized.c_str(), 'a' + chan);
2877                                 } else {
2878                                         snprintf (buf, sizeof(buf), "%s/T%04d-%s.wav", spath.c_str(), cnt, legalized.c_str());
2879                                 }
2880                         } else {
2881
2882                                 spath += '/';
2883                                 spath += legalized;
2884
2885                                 if (nchan < 2) {
2886                                         snprintf (buf, sizeof(buf), "%s-%u.wav", spath.c_str(), cnt);
2887                                 } else if (nchan == 2) {
2888                                         if (chan == 0) {
2889                                                 snprintf (buf, sizeof(buf), "%s-%u%%L.wav", spath.c_str(), cnt);
2890                                         } else {
2891                                                 snprintf (buf, sizeof(buf), "%s-%u%%R.wav", spath.c_str(), cnt);
2892                                         }
2893                                 } else if (nchan < 26) {
2894                                         snprintf (buf, sizeof(buf), "%s-%u%%%c.wav", spath.c_str(), cnt, 'a' + chan);
2895                                 } else {
2896                                         snprintf (buf, sizeof(buf), "%s-%u.wav", spath.c_str(), cnt);
2897                                 }
2898                         }
2899
2900                         if (g_file_test (buf, G_FILE_TEST_EXISTS)) {
2901                                 existing++;
2902                         }
2903
2904                 }
2905
2906                 if (existing == 0) {
2907                         break;
2908                 }
2909
2910                 if (cnt > limit) {
2911                         error << string_compose(_("There are already %1 recordings for %2, which I consider too many."), limit, name) << endmsg;
2912                         throw failed_constructor();
2913                 }
2914         }
2915
2916         /* we now have a unique name for the file, but figure out where to
2917            actually put it.
2918         */
2919
2920         string foo = buf;
2921
2922         spath = discover_best_sound_dir ();
2923
2924         string::size_type pos = foo.find_last_of ('/');
2925
2926         if (pos == string::npos) {
2927                 spath += foo;
2928         } else {
2929                 spath += foo.substr (pos + 1);
2930         }
2931
2932         return spath;
2933 }
2934
2935 boost::shared_ptr<AudioFileSource>
2936 Session::create_audio_source_for_session (AudioDiskstream& ds, uint32_t chan, bool destructive)
2937 {
2938         string spath = audio_path_from_name (ds.name(), ds.n_channels(), chan, destructive);
2939         return boost::dynamic_pointer_cast<AudioFileSource> (SourceFactory::createWritable (*this, spath, destructive, frame_rate()));
2940 }
2941
2942 /* Playlist management */
2943
2944 Playlist *
2945 Session::playlist_by_name (string name)
2946 {
2947         Glib::Mutex::Lock lm (playlist_lock);
2948         for (PlaylistList::iterator i = playlists.begin(); i != playlists.end(); ++i) {
2949                 if ((*i)->name() == name) {
2950                         return* i;
2951                 }
2952         }
2953         for (PlaylistList::iterator i = unused_playlists.begin(); i != unused_playlists.end(); ++i) {
2954                 if ((*i)->name() == name) {
2955                         return* i;
2956                 }
2957         }
2958         return 0;
2959 }
2960
2961 void
2962 Session::add_playlist (Playlist* playlist)
2963 {
2964         if (playlist->hidden()) {
2965                 return;
2966         }
2967
2968         {
2969                 Glib::Mutex::Lock lm (playlist_lock);
2970                 if (find (playlists.begin(), playlists.end(), playlist) == playlists.end()) {
2971                         playlists.insert (playlists.begin(), playlist);
2972                         // playlist->ref();
2973                         playlist->InUse.connect (mem_fun (*this, &Session::track_playlist));
2974                         playlist->GoingAway.connect (sigc::bind (mem_fun (*this, &Session::remove_playlist), playlist));
2975                 }
2976         }
2977
2978         set_dirty();
2979
2980         PlaylistAdded (playlist); /* EMIT SIGNAL */
2981 }
2982
2983 void
2984 Session::track_playlist (Playlist* pl, bool inuse)
2985 {
2986         PlaylistList::iterator x;
2987
2988         {
2989                 Glib::Mutex::Lock lm (playlist_lock);
2990
2991                 if (!inuse) {
2992                         //cerr << "shifting playlist to unused: " << pl->name() << endl;
2993
2994                         unused_playlists.insert (pl);
2995
2996                         if ((x = playlists.find (pl)) != playlists.end()) {
2997                                 playlists.erase (x);
2998                         }
2999
3000
3001                 } else {
3002                         //cerr << "shifting playlist to used: " << pl->name() << endl;
3003
3004                         playlists.insert (pl);
3005
3006                         if ((x = unused_playlists.find (pl)) != unused_playlists.end()) {
3007                                 unused_playlists.erase (x);
3008                         }
3009                 }
3010         }
3011 }
3012
3013 void
3014 Session::remove_playlist (Playlist* playlist)
3015 {
3016         if (_state_of_the_state & Deletion) {
3017                 return;
3018         }
3019
3020         {
3021                 Glib::Mutex::Lock lm (playlist_lock);
3022                 // cerr << "removing playlist: " << playlist->name() << endl;
3023
3024                 PlaylistList::iterator i;
3025
3026                 i = find (playlists.begin(), playlists.end(), playlist);
3027
3028                 if (i != playlists.end()) {
3029                         playlists.erase (i);
3030                 }
3031
3032                 i = find (unused_playlists.begin(), unused_playlists.end(), playlist);
3033                 if (i != unused_playlists.end()) {
3034                         unused_playlists.erase (i);
3035                 }
3036
3037         }
3038
3039         set_dirty();
3040
3041         PlaylistRemoved (playlist); /* EMIT SIGNAL */
3042 }
3043
3044 void
3045 Session::set_audition (boost::shared_ptr<Region> r)
3046 {
3047         pending_audition_region = r;
3048         post_transport_work = PostTransportWork (post_transport_work | PostTransportAudition);
3049         schedule_butler_transport_work ();
3050 }
3051
3052 void
3053 Session::audition_playlist ()
3054 {
3055         Event* ev = new Event (Event::Audition, Event::Add, Event::Immediate, 0, 0.0);
3056         ev->region.reset ();
3057         queue_event (ev);
3058 }
3059
3060 void
3061 Session::non_realtime_set_audition ()
3062 {
3063         if (!pending_audition_region) {
3064                 auditioner->audition_current_playlist ();
3065         } else {
3066                 auditioner->audition_region (pending_audition_region);
3067                 pending_audition_region.reset ();
3068         }
3069         AuditionActive (true); /* EMIT SIGNAL */
3070 }
3071
3072 void
3073 Session::audition_region (boost::shared_ptr<Region> r)
3074 {
3075         Event* ev = new Event (Event::Audition, Event::Add, Event::Immediate, 0, 0.0);
3076         ev->region = r;
3077         queue_event (ev);
3078 }
3079
3080 void
3081 Session::cancel_audition ()
3082 {
3083         if (auditioner->active()) {
3084                 auditioner->cancel_audition ();
3085                 AuditionActive (false); /* EMIT SIGNAL */
3086         }
3087 }
3088
3089 bool
3090 Session::RoutePublicOrderSorter::operator() (boost::shared_ptr<Route> a, boost::shared_ptr<Route> b)
3091 {
3092         return a->order_key(N_("signal")) < b->order_key(N_("signal"));
3093 }
3094
3095 void
3096 Session::remove_empty_sounds ()
3097 {
3098         PathScanner scanner;
3099
3100         vector<string *>* possible_audiofiles = scanner (sound_dir(), "\\.(wav|aiff|caf|w64)$", false, true);
3101
3102         Glib::Mutex::Lock lm (audio_source_lock);
3103
3104         regex_t compiled_tape_track_pattern;
3105         int err;
3106
3107         if ((err = regcomp (&compiled_tape_track_pattern, "/T[0-9][0-9][0-9][0-9]-", REG_EXTENDED|REG_NOSUB))) {
3108
3109                 char msg[256];
3110
3111                 regerror (err, &compiled_tape_track_pattern, msg, sizeof (msg));
3112
3113                 error << string_compose (_("Cannot compile tape track regexp for use (%1)"), msg) << endmsg;
3114                 return;
3115         }
3116
3117         for (vector<string *>::iterator i = possible_audiofiles->begin(); i != possible_audiofiles->end(); ++i) {
3118
3119                 /* never remove files that appear to be a tape track */
3120
3121                 if (regexec (&compiled_tape_track_pattern, (*i)->c_str(), 0, 0, 0) == 0) {
3122                         delete *i;
3123                         continue;
3124                 }
3125
3126                 if (AudioFileSource::is_empty (*this, *(*i))) {
3127
3128                         unlink ((*i)->c_str());
3129
3130                         string peak_path = peak_path_from_audio_path (**i);
3131                         unlink (peak_path.c_str());
3132                 }
3133
3134                 delete* i;
3135         }
3136
3137         delete possible_audiofiles;
3138 }
3139
3140 bool
3141 Session::is_auditioning () const
3142 {
3143         /* can be called before we have an auditioner object */
3144         if (auditioner) {
3145                 return auditioner->active();
3146         } else {
3147                 return false;
3148         }
3149 }
3150
3151 void
3152 Session::set_all_solo (bool yn)
3153 {
3154         shared_ptr<RouteList> r = routes.reader ();
3155
3156         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
3157                 if (!(*i)->hidden()) {
3158                         (*i)->set_solo (yn, this);
3159                 }
3160         }
3161
3162         set_dirty();
3163 }
3164
3165 void
3166 Session::set_all_mute (bool yn)
3167 {
3168         shared_ptr<RouteList> r = routes.reader ();
3169
3170         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
3171                 if (!(*i)->hidden()) {
3172                         (*i)->set_mute (yn, this);
3173                 }
3174         }
3175
3176         set_dirty();
3177 }
3178
3179 uint32_t
3180 Session::n_diskstreams () const
3181 {
3182         uint32_t n = 0;
3183
3184         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
3185
3186         for (DiskstreamList::const_iterator i = dsl->begin(); i != dsl->end(); ++i) {
3187                 if (!(*i)->hidden()) {
3188                         n++;
3189                 }
3190         }
3191         return n;
3192 }
3193
3194 void
3195 Session::graph_reordered ()
3196 {
3197         /* don't do this stuff if we are setting up connections
3198            from a set_state() call.
3199         */
3200
3201         if (_state_of_the_state & InitialConnecting) {
3202                 return;
3203         }
3204
3205         resort_routes ();
3206
3207         /* force all diskstreams to update their capture offset values to
3208            reflect any changes in latencies within the graph.
3209         */
3210
3211         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
3212
3213         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
3214                 (*i)->set_capture_offset ();
3215         }
3216 }
3217
3218 void
3219 Session::record_disenable_all ()
3220 {
3221         record_enable_change_all (false);
3222 }
3223
3224 void
3225 Session::record_enable_all ()
3226 {
3227         record_enable_change_all (true);
3228 }
3229
3230 void
3231 Session::record_enable_change_all (bool yn)
3232 {
3233         shared_ptr<RouteList> r = routes.reader ();
3234
3235         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
3236                 AudioTrack* at;
3237
3238                 if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
3239                         at->set_record_enable (yn, this);
3240                 }
3241         }
3242
3243         /* since we don't keep rec-enable state, don't mark session dirty */
3244 }
3245
3246 void
3247 Session::add_redirect (Redirect* redirect)
3248 {
3249         Send* send;
3250         Insert* insert;
3251         PortInsert* port_insert;
3252         PluginInsert* plugin_insert;
3253
3254         if ((insert = dynamic_cast<Insert *> (redirect)) != 0) {
3255                 if ((port_insert = dynamic_cast<PortInsert *> (insert)) != 0) {
3256                         _port_inserts.insert (_port_inserts.begin(), port_insert);
3257                 } else if ((plugin_insert = dynamic_cast<PluginInsert *> (insert)) != 0) {
3258                         _plugin_inserts.insert (_plugin_inserts.begin(), plugin_insert);
3259                 } else {
3260                         fatal << _("programming error: unknown type of Insert created!") << endmsg;
3261                         /*NOTREACHED*/
3262                 }
3263         } else if ((send = dynamic_cast<Send *> (redirect)) != 0) {
3264                 _sends.insert (_sends.begin(), send);
3265         } else {
3266                 fatal << _("programming error: unknown type of Redirect created!") << endmsg;
3267                 /*NOTREACHED*/
3268         }
3269
3270         redirect->GoingAway.connect (sigc::bind (mem_fun (*this, &Session::remove_redirect), redirect));
3271
3272         set_dirty();
3273 }
3274
3275 void
3276 Session::remove_redirect (Redirect* redirect)
3277 {
3278         Send* send;
3279         Insert* insert;
3280         PortInsert* port_insert;
3281         PluginInsert* plugin_insert;
3282
3283         if ((insert = dynamic_cast<Insert *> (redirect)) != 0) {
3284                 if ((port_insert = dynamic_cast<PortInsert *> (insert)) != 0) {
3285                         _port_inserts.remove (port_insert);
3286                 } else if ((plugin_insert = dynamic_cast<PluginInsert *> (insert)) != 0) {
3287                         _plugin_inserts.remove (plugin_insert);
3288                 } else {
3289                         fatal << _("programming error: unknown type of Insert deleted!") << endmsg;
3290                         /*NOTREACHED*/
3291                 }
3292         } else if ((send = dynamic_cast<Send *> (redirect)) != 0) {
3293                 _sends.remove (send);
3294         } else {
3295                 fatal << _("programming error: unknown type of Redirect deleted!") << endmsg;
3296                 /*NOTREACHED*/
3297         }
3298
3299         set_dirty();
3300 }
3301
3302 nframes_t
3303 Session::available_capture_duration ()
3304 {
3305         float sample_bytes_on_disk;
3306
3307         switch (Config->get_native_file_data_format()) {
3308         case FormatFloat:
3309                 sample_bytes_on_disk = 4;
3310                 break;
3311
3312         case FormatInt24:
3313                 sample_bytes_on_disk = 3;
3314                 break;
3315         }
3316
3317         double scale = 4096.0 / sample_bytes_on_disk;
3318
3319         if (_total_free_4k_blocks * scale > (double) max_frames) {
3320                 return max_frames;
3321         }
3322
3323         return (nframes_t) floor (_total_free_4k_blocks * scale);
3324 }
3325
3326 void
3327 Session::add_connection (ARDOUR::Connection* connection)
3328 {
3329         {
3330                 Glib::Mutex::Lock guard (connection_lock);
3331                 _connections.push_back (connection);
3332         }
3333
3334         ConnectionAdded (connection); /* EMIT SIGNAL */
3335
3336         set_dirty();
3337 }
3338
3339 void
3340 Session::remove_connection (ARDOUR::Connection* connection)
3341 {
3342         bool removed = false;
3343
3344         {
3345                 Glib::Mutex::Lock guard (connection_lock);
3346                 ConnectionList::iterator i = find (_connections.begin(), _connections.end(), connection);
3347
3348                 if (i != _connections.end()) {
3349                         _connections.erase (i);
3350                         removed = true;
3351                 }
3352         }
3353
3354         if (removed) {
3355                  ConnectionRemoved (connection); /* EMIT SIGNAL */
3356         }
3357
3358         set_dirty();
3359 }
3360
3361 ARDOUR::Connection *
3362 Session::connection_by_name (string name) const
3363 {
3364         Glib::Mutex::Lock lm (connection_lock);
3365
3366         for (ConnectionList::const_iterator i = _connections.begin(); i != _connections.end(); ++i) {
3367                 if ((*i)->name() == name) {
3368                         return* i;
3369                 }
3370         }
3371
3372         return 0;
3373 }
3374
3375 void
3376 Session::tempo_map_changed (Change ignored)
3377 {
3378         clear_clicks ();
3379         set_dirty ();
3380 }
3381
3382 void
3383 Session::ensure_passthru_buffers (uint32_t howmany)
3384 {
3385         while (howmany > _passthru_buffers.size()) {
3386                 Sample *p;
3387 #ifdef NO_POSIX_MEMALIGN
3388                 p =  (Sample *) malloc(current_block_size * sizeof(Sample));
3389 #else
3390                 posix_memalign((void **)&p,16,current_block_size * 4);
3391 #endif
3392                 _passthru_buffers.push_back (p);
3393
3394                 *p = 0;
3395
3396 #ifdef NO_POSIX_MEMALIGN
3397                 p =  (Sample *) malloc(current_block_size * sizeof(Sample));
3398 #else
3399                 posix_memalign((void **)&p,16,current_block_size * 4);
3400 #endif
3401                 memset (p, 0, sizeof (Sample) * current_block_size);
3402                 _silent_buffers.push_back (p);
3403
3404                 *p = 0;
3405
3406 #ifdef NO_POSIX_MEMALIGN
3407                 p =  (Sample *) malloc(current_block_size * sizeof(Sample));
3408 #else
3409                 posix_memalign((void **)&p,16,current_block_size * 4);
3410 #endif
3411                 memset (p, 0, sizeof (Sample) * current_block_size);
3412                 _send_buffers.push_back (p);
3413
3414         }
3415         allocate_pan_automation_buffers (current_block_size, howmany, false);
3416 }
3417
3418 string
3419 Session::next_send_name ()
3420 {
3421         char buf[32];
3422         snprintf (buf, sizeof (buf), "send %" PRIu32, ++send_cnt);
3423         return buf;
3424 }
3425
3426 string
3427 Session::next_insert_name ()
3428 {
3429         char buf[32];
3430         snprintf (buf, sizeof (buf), "insert %" PRIu32, ++insert_cnt);
3431         return buf;
3432 }
3433
3434 /* Named Selection management */
3435
3436 NamedSelection *
3437 Session::named_selection_by_name (string name)
3438 {
3439         Glib::Mutex::Lock lm (named_selection_lock);
3440         for (NamedSelectionList::iterator i = named_selections.begin(); i != named_selections.end(); ++i) {
3441                 if ((*i)->name == name) {
3442                         return* i;
3443                 }
3444         }
3445         return 0;
3446 }
3447
3448 void
3449 Session::add_named_selection (NamedSelection* named_selection)
3450 {
3451         {
3452                 Glib::Mutex::Lock lm (named_selection_lock);
3453                 named_selections.insert (named_selections.begin(), named_selection);
3454         }
3455
3456         set_dirty();
3457
3458          NamedSelectionAdded (); /* EMIT SIGNAL */
3459 }
3460
3461 void
3462 Session::remove_named_selection (NamedSelection* named_selection)
3463 {
3464         bool removed = false;
3465
3466         {
3467                 Glib::Mutex::Lock lm (named_selection_lock);
3468
3469                 NamedSelectionList::iterator i = find (named_selections.begin(), named_selections.end(), named_selection);
3470
3471                 if (i != named_selections.end()) {
3472                         delete (*i);
3473                         named_selections.erase (i);
3474                         set_dirty();
3475                         removed = true;
3476                 }
3477         }
3478
3479         if (removed) {
3480                  NamedSelectionRemoved (); /* EMIT SIGNAL */
3481         }
3482 }
3483
3484 void
3485 Session::reset_native_file_format ()
3486 {
3487         boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader();
3488
3489         for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
3490                 (*i)->reset_write_sources (false);
3491         }
3492 }
3493
3494 bool
3495 Session::route_name_unique (string n) const
3496 {
3497         shared_ptr<RouteList> r = routes.reader ();
3498
3499         for (RouteList::const_iterator i = r->begin(); i != r->end(); ++i) {
3500                 if ((*i)->name() == n) {
3501                         return false;
3502                 }
3503         }
3504
3505         return true;
3506 }
3507
3508 int
3509 Session::cleanup_audio_file_source (boost::shared_ptr<AudioFileSource> fs)
3510 {
3511         return fs->move_to_trash (dead_sound_dir_name);
3512 }
3513
3514 uint32_t
3515 Session::n_playlists () const
3516 {
3517         Glib::Mutex::Lock lm (playlist_lock);
3518         return playlists.size();
3519 }
3520
3521 void
3522 Session::allocate_pan_automation_buffers (nframes_t nframes, uint32_t howmany, bool force)
3523 {
3524         if (!force && howmany <= _npan_buffers) {
3525                 return;
3526         }
3527
3528         if (_pan_automation_buffer) {
3529
3530                 for (uint32_t i = 0; i < _npan_buffers; ++i) {
3531                         delete [] _pan_automation_buffer[i];
3532                 }
3533
3534                 delete [] _pan_automation_buffer;
3535         }
3536
3537         _pan_automation_buffer = new pan_t*[howmany];
3538
3539         for (uint32_t i = 0; i < howmany; ++i) {
3540                 _pan_automation_buffer[i] = new pan_t[nframes];
3541         }
3542
3543         _npan_buffers = howmany;
3544 }
3545
3546 int
3547 Session::freeze (InterThreadInfo& itt)
3548 {
3549         shared_ptr<RouteList> r = routes.reader ();
3550
3551         for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
3552
3553                 AudioTrack *at;
3554
3555                 if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
3556                         /* XXX this is wrong because itt.progress will keep returning to zero at the start
3557                            of every track.
3558                         */
3559                         at->freeze (itt);
3560                 }
3561         }
3562
3563         return 0;
3564 }
3565
3566 int
3567 Session::write_one_audio_track (AudioTrack& track, nframes_t start, nframes_t len,
3568                                bool overwrite, vector<boost::shared_ptr<AudioSource> >& srcs, InterThreadInfo& itt)
3569 {
3570         int ret = -1;
3571         Playlist* playlist;
3572         boost::shared_ptr<AudioFileSource> fsource;
3573         uint32_t x;
3574         char buf[PATH_MAX+1];
3575         string dir;
3576         uint32_t nchans;
3577         nframes_t position;
3578         nframes_t this_chunk;
3579         nframes_t to_do;
3580         vector<Sample*> buffers;
3581
3582         // any bigger than this seems to cause stack overflows in called functions
3583         const nframes_t chunk_size = (128 * 1024)/4;
3584
3585         g_atomic_int_set (&processing_prohibited, 1);
3586
3587         /* call tree *MUST* hold route_lock */
3588
3589         if ((playlist = track.diskstream()->playlist()) == 0) {
3590                 goto out;
3591         }
3592
3593         /* external redirects will be a problem */
3594
3595         if (track.has_external_redirects()) {
3596                 goto out;
3597         }
3598
3599         nchans = track.audio_diskstream()->n_channels();
3600
3601         dir = discover_best_sound_dir ();
3602
3603         for (uint32_t chan_n=0; chan_n < nchans; ++chan_n) {
3604
3605                 for (x = 0; x < 99999; ++x) {
3606                         snprintf (buf, sizeof(buf), "%s/%s-%d-bounce-%" PRIu32 ".wav", dir.c_str(), playlist->name().c_str(), chan_n, x+1);
3607                         if (access (buf, F_OK) != 0) {
3608                                 break;
3609                         }
3610                 }
3611
3612                 if (x == 99999) {
3613                         error << string_compose (_("too many bounced versions of playlist \"%1\""), playlist->name()) << endmsg;
3614                         goto out;
3615                 }
3616
3617                 try {
3618                         fsource = boost::dynamic_pointer_cast<AudioFileSource> (SourceFactory::createWritable (*this, buf, false, frame_rate()));
3619                 }
3620
3621                 catch (failed_constructor& err) {
3622                         error << string_compose (_("cannot create new audio file \"%1\" for %2"), buf, track.name()) << endmsg;
3623                         goto out;
3624                 }
3625
3626                 srcs.push_back (fsource);
3627         }
3628
3629         /* XXX need to flush all redirects */
3630
3631         position = start;
3632         to_do = len;
3633
3634         /* create a set of reasonably-sized buffers */
3635
3636         for (vector<Sample*>::iterator i = _passthru_buffers.begin(); i != _passthru_buffers.end(); ++i) {
3637                 Sample* b;
3638 #ifdef NO_POSIX_MEMALIGN
3639                 b =  (Sample *) malloc(chunk_size * sizeof(Sample));
3640 #else
3641                 posix_memalign((void **)&b,16,chunk_size * 4);
3642 #endif
3643                 buffers.push_back (b);
3644         }
3645
3646         while (to_do && !itt.cancel) {
3647
3648                 this_chunk = min (to_do, chunk_size);
3649
3650                 if (track.export_stuff (buffers, nchans, start, this_chunk)) {
3651                         goto out;
3652                 }
3653
3654                 uint32_t n = 0;
3655                 for (vector<boost::shared_ptr<AudioSource> >::iterator src=srcs.begin(); src != srcs.end(); ++src, ++n) {
3656                         boost::shared_ptr<AudioFileSource> afs = boost::dynamic_pointer_cast<AudioFileSource>(*src);
3657
3658                         if (afs) {
3659                                 if (afs->write (buffers[n], this_chunk) != this_chunk) {
3660                                         goto out;
3661                                 }
3662                         }
3663                 }
3664
3665                 start += this_chunk;
3666                 to_do -= this_chunk;
3667
3668                 itt.progress = (float) (1.0 - ((double) to_do / len));
3669
3670         }
3671
3672         if (!itt.cancel) {
3673
3674                 time_t now;
3675                 struct tm* xnow;
3676                 time (&now);
3677                 xnow = localtime (&now);
3678
3679                 for (vector<boost::shared_ptr<AudioSource> >::iterator src=srcs.begin(); src != srcs.end(); ++src) {
3680                         boost::shared_ptr<AudioFileSource> afs = boost::dynamic_pointer_cast<AudioFileSource>(*src);
3681
3682                         if (afs) {
3683                                 afs->update_header (position, *xnow, now);
3684                         }
3685                 }
3686
3687                 /* build peakfile for new source */
3688
3689                 for (vector<boost::shared_ptr<AudioSource> >::iterator src=srcs.begin(); src != srcs.end(); ++src) {
3690                         boost::shared_ptr<AudioFileSource> afs = boost::dynamic_pointer_cast<AudioFileSource>(*src);
3691                         if (afs) {
3692                                 afs->build_peaks ();
3693                         }
3694                 }
3695
3696                 /* construct a region to represent the bounced material */
3697
3698                 boost::shared_ptr<Region> aregion = RegionFactory::create (srcs, 0, srcs.front()->length(),
3699                                                                            region_name_from_path (srcs.front()->name()));
3700
3701                 ret = 0;
3702         }
3703
3704   out:
3705         if (ret) {
3706                 for (vector<boost::shared_ptr<AudioSource> >::iterator src = srcs.begin(); src != srcs.end(); ++src) {
3707                         boost::shared_ptr<AudioFileSource> afs = boost::dynamic_pointer_cast<AudioFileSource>(*src);
3708
3709                         if (afs) {
3710                                 afs->mark_for_remove ();
3711                         }
3712
3713                         (*src)->drop_references ();
3714                 }
3715         }
3716
3717         for (vector<Sample*>::iterator i = buffers.begin(); i != buffers.end(); ++i) {
3718                 free(*i);
3719         }
3720
3721         g_atomic_int_set (&processing_prohibited, 0);
3722
3723         itt.done = true;
3724
3725         return ret;
3726 }
3727
3728 vector<Sample*>&
3729 Session::get_silent_buffers (uint32_t howmany)
3730 {
3731         for (uint32_t i = 0; i < howmany; ++i) {
3732                 memset (_silent_buffers[i], 0, sizeof (Sample) * current_block_size);
3733         }
3734         return _silent_buffers;
3735 }
3736
3737 uint32_t
3738 Session::ntracks () const
3739 {
3740         uint32_t n = 0;
3741         shared_ptr<RouteList> r = routes.reader ();
3742
3743         for (RouteList::const_iterator i = r->begin(); i != r->end(); ++i) {
3744                 if (dynamic_cast<AudioTrack*> ((*i).get())) {
3745                         ++n;
3746                 }
3747         }
3748
3749         return n;
3750 }
3751
3752 uint32_t
3753 Session::nbusses () const
3754 {
3755         uint32_t n = 0;
3756         shared_ptr<RouteList> r = routes.reader ();
3757
3758         for (RouteList::const_iterator i = r->begin(); i != r->end(); ++i) {
3759                 if (dynamic_cast<AudioTrack*> ((*i).get()) == 0) {
3760                         ++n;
3761                 }
3762         }
3763
3764         return n;
3765 }
3766
3767 void
3768 Session::add_automation_list(AutomationList *al)
3769 {
3770         automation_lists[al->id()] = al;
3771 }
3772
3773 nframes_t
3774 Session::compute_initial_length ()
3775 {
3776         return _engine.frame_rate() * 60 * 5;
3777 }
3778