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