- char c = ButlerRequest::Run;
- ::write (butler_request_pipe[1], &c, 1);
-}
-
-void
-Session::stop_butler ()
-{
- Glib::Mutex::Lock lm (butler_request_lock);
- char c = ButlerRequest::Pause;
- ::write (butler_request_pipe[1], &c, 1);
- butler_paused.wait(butler_request_lock);
-}
-
-void
-Session::wait_till_butler_finished ()
-{
- Glib::Mutex::Lock lm (butler_request_lock);
- char c = ButlerRequest::Wake;
- ::write (butler_request_pipe[1], &c, 1);
- butler_paused.wait(butler_request_lock);
-}
-
-void *
-Session::_butler_thread_work (void* arg)
-{
- PBD::ThreadCreated (pthread_self(), X_("Butler"));
- return ((Session *) arg)->butler_thread_work ();
- return 0;
-}
-
-#define transport_work_requested() g_atomic_int_get(&butler_should_do_transport_work)
-
-void *
-Session::butler_thread_work ()
-{
- uint32_t err = 0;
- int32_t bytes;
- bool compute_io;
- struct timeval begin, end;
- struct pollfd pfd[1];
- bool disk_work_outstanding = false;
- DiskstreamList::iterator i;
-
- while (true) {
- pfd[0].fd = butler_request_pipe[0];
- pfd[0].events = POLLIN|POLLERR|POLLHUP;
-
- if (poll (pfd, 1, (disk_work_outstanding ? 0 : -1)) < 0) {
-
- if (errno == EINTR) {
- continue;
- }
-
- error << string_compose (_("poll on butler request pipe failed (%1)"),
- strerror (errno))
- << endmsg;
- break;
- }
-
- if (pfd[0].revents & ~POLLIN) {
- error << string_compose (_("Error on butler thread request pipe: fd=%1 err=%2"), pfd[0].fd, pfd[0].revents) << endmsg;
- break;
- }
-
- if (pfd[0].revents & POLLIN) {
-
- char req;
-
- /* empty the pipe of all current requests */
-
- while (1) {
- size_t nread = ::read (butler_request_pipe[0], &req, sizeof (req));
- if (nread == 1) {
-
- switch ((ButlerRequest::Type) req) {
-
- case ButlerRequest::Wake:
- break;
-
- case ButlerRequest::Run:
- butler_should_run = true;
- break;
-
- case ButlerRequest::Pause:
- butler_should_run = false;
- break;
-
- case ButlerRequest::Quit:
- pthread_exit_pbd (0);
- /*NOTREACHED*/
- break;
-
- default:
- break;
- }
-
- } else if (nread == 0) {
- break;
- } else if (errno == EAGAIN) {
- break;
- } else {
- fatal << _("Error reading from butler request pipe") << endmsg;
- /*NOTREACHED*/
- }
- }
- }
-
- //for (i = diskstreams.begin(); i != diskstreams.end(); ++i) {
- // cerr << "BEFORE " << (*i)->name() << ": pb = " << (*i)->playback_buffer_load() << " cp = " << (*i)->capture_buffer_load() << endl;
- //}
-
- if (transport_work_requested()) {
- butler_transport_work ();
- }
-
- disk_work_outstanding = false;
- bytes = 0;
- compute_io = true;
-
- gettimeofday (&begin, 0);
-
- boost::shared_ptr<DiskstreamList> dsl = diskstreams.reader ();
-
- for (i = dsl->begin(); !transport_work_requested() && butler_should_run && i != dsl->end(); ++i) {
-
- boost::shared_ptr<Diskstream> ds = *i;
-
- switch (ds->do_refill ()) {
- case 0:
- bytes += ds->read_data_count();
- break;
- case 1:
- bytes += ds->read_data_count();
- disk_work_outstanding = true;
- break;
-
- default:
- compute_io = false;
- error << string_compose(_("Butler read ahead failure on dstream %1"), (*i)->name()) << endmsg;
- break;
- }
-
- }
-
- if (i != dsl->end()) {
- /* we didn't get to all the streams */
- disk_work_outstanding = true;
- }
-
- if (!err && transport_work_requested()) {
- continue;
- }
-
- if (compute_io) {
- gettimeofday (&end, 0);
-
- double b = begin.tv_sec + (begin.tv_usec/1000000.0);
- double e = end.tv_sec + (end.tv_usec / 1000000.0);
-
- _read_data_rate = bytes / (e - b);
- }
-
- bytes = 0;
- compute_io = true;
- gettimeofday (&begin, 0);
-
- for (i = dsl->begin(); !transport_work_requested() && butler_should_run && i != dsl->end(); ++i) {
- // cerr << "write behind for " << (*i)->name () << endl;
-
- switch ((*i)->do_flush (Session::ButlerContext)) {
- case 0:
- bytes += (*i)->write_data_count();
- break;
- case 1:
- bytes += (*i)->write_data_count();
- disk_work_outstanding = true;
- break;
-
- default:
- err++;
- compute_io = false;
- error << string_compose(_("Butler write-behind failure on dstream %1"), (*i)->name()) << endmsg;
- /* don't break - try to flush all streams in case they
- are split across disks.
- */
- }
- }
-
- if (err && actively_recording()) {
- /* stop the transport and try to catch as much possible
- captured state as we can.
- */
- request_stop ();
- }
-
- if (i != dsl->end()) {
- /* we didn't get to all the streams */
- disk_work_outstanding = true;
- }
-
- if (!err && transport_work_requested()) {
- continue;
- }
-
- if (compute_io) {
- gettimeofday (&end, 0);
-
- double b = begin.tv_sec + (begin.tv_usec/1000000.0);
- double e = end.tv_sec + (end.tv_usec / 1000000.0);
-
- _write_data_rate = bytes / (e - b);
- }
-
- if (!disk_work_outstanding) {
- refresh_disk_space ();
- }
-
-
- {
- Glib::Mutex::Lock lm (butler_request_lock);
-
- if (butler_should_run && (disk_work_outstanding || transport_work_requested())) {
-// for (DiskstreamList::iterator i = dsl->begin(); i != dsl->end(); ++i) {
-// cerr << "AFTER " << (*i)->name() << ": pb = " << (*i)->playback_buffer_load() << " cp = " << (*i)->capture_buffer_load() << endl;
-// }
-
- continue;
- }
-
- butler_paused.signal();
- }
- }
-
- pthread_exit_pbd (0);
- /*NOTREACHED*/
- return (0);
-}
-
-
-void
-Session::request_overwrite_buffer (Diskstream* stream)
-{
- Event *ev = new Event (Event::Overwrite, Event::Add, Event::Immediate, 0, 0, 0.0);
- ev->set_ptr (stream);