Fix include statements so they match all other files in gtk2_ardour
[ardour.git] / libs / ardour / session_midi.cc
index e1fab1ccfe11238e0e53330ce6ebc2efa2368395..2076f5d25f21a0f38e8caf324340305e4098cb19 100644 (file)
@@ -16,7 +16,6 @@
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 
-  $Id$
 */
 
 #include <string>
@@ -47,7 +46,7 @@
 
 using namespace std;
 using namespace ARDOUR;
-//using namespace sigc;
+using namespace PBD;
 using namespace MIDI;
 
 MachineControl::CommandSignature MMC_CommandSignature;
@@ -86,118 +85,6 @@ Session::use_config_midi_ports ()
  MTC, MMC, etc.
 **********************************************************************/
 
-void
-Session::set_mmc_control (bool yn)
-{
-#if 0
-       if (mmc_control == yn) {
-               return;
-       }
-       
-       mmc_control = yn;
-       set_dirty();
-       poke_midi_thread ();
-#endif
-       ControlChanged (MMCControl); /* EMIT SIGNAL */
-}
-
-void
-Session::set_midi_control (bool yn)
-{
-#if 0
-       if (midi_control == yn) {
-               return;
-       }
-
-       midi_control = yn;
-       set_dirty();
-       poke_midi_thread ();
-
-       if (_midi_port) {
-               Glib::RWLock::ReaderLock guard (route_lock);
-               for (RouteList::iterator i = routes.begin(); i != routes.end(); ++i) {
-                       (*i)->reset_midi_control (_midi_port, midi_control);
-               }
-       }
-#endif
-       ControlChanged (MidiControl); /* EMIT SIGNAL */
-}
-
-void
-Session::set_send_mtc (bool yn)
-{
-       /* set the persistent option value regardless */
-
-       send_midi_timecode = yn;
-       set_dirty();
-
-       /* only set the internal flag if we have
-          a port.
-       */
-
-       if (_mtc_port == 0 || send_mtc == yn) {
-               return;
-       }
-
-       send_mtc = yn;
-       ControlChanged (SendMTC); /* EMIT SIGNAL */
-}
-
-void
-Session::set_send_mmc (bool yn)
-{
-       cerr << "set send mmc " << yn << endl;
-
-       if (_mmc_port == 0) {
-               cerr << "\tno 1\n";
-               return;
-       }
-
-       if (send_midi_machine_control == yn) {
-               cerr << "\tno 2\n";
-               return;
-       }
-
-       /* only set the internal flag if we have
-          a port.
-       */
-
-       if (_mmc_port) {
-               cerr << "\tyes\n";
-               send_mmc = yn;
-       }
-
-       /* set the persistent option value regardless */
-
-       send_midi_machine_control = yn;
-       set_dirty();
-
-       ControlChanged (SendMMC); /* EMIT SIGNAL */
-}
-
-void
-Session::set_midi_feedback (bool yn)
-{
-}
-
-bool
-Session::get_midi_feedback () const
-{
-       return false;
-}
-
-bool
-Session::get_send_mtc () const
-{
-       return send_mtc;
-}
-
-bool
-Session::get_send_mmc () const
-{
-       return send_mmc;
-}
-
 int
 Session::set_mtc_port (string port_tag)
 {
@@ -240,9 +127,29 @@ Session::set_mtc_port (string port_tag)
        return 0;
 }
 
+void
+Session::set_mmc_receive_device_id (uint32_t device_id)
+{
+       if (mmc) {
+               mmc->set_receive_device_id (device_id);
+       }
+}
+
+void
+Session::set_mmc_send_device_id (uint32_t device_id)
+{
+       if (mmc) {
+               mmc->set_send_device_id (device_id);
+       }
+}
+
 int
 Session::set_mmc_port (string port_tag)
 {
+       MIDI::byte old_recv_device_id = 0;
+       MIDI::byte old_send_device_id = 0;
+       bool reset_id = false;
+
        if (port_tag.length() == 0) {
                if (_mmc_port == 0) {
                        return 0;
@@ -260,6 +167,9 @@ Session::set_mmc_port (string port_tag)
        _mmc_port = port;
 
        if (mmc) {
+               old_recv_device_id = mmc->receive_device_id();
+               old_recv_device_id = mmc->send_device_id();
+               reset_id = true;
                delete mmc;
        }
 
@@ -267,6 +177,10 @@ Session::set_mmc_port (string port_tag)
                                        MMC_CommandSignature,
                                        MMC_ResponseSignature);
 
+       if (reset_id) {
+               mmc->set_receive_device_id (old_recv_device_id);
+               mmc->set_send_device_id (old_send_device_id);
+       }
 
        mmc->Play.connect 
                (mem_fun (*this, &Session::mmc_deferred_play));
@@ -295,6 +209,7 @@ Session::set_mmc_port (string port_tag)
        mmc->TrackRecordStatusChange.connect
                (mem_fun (*this, &Session::mmc_record_enable));
 
+
        /* also handle MIDI SPP because its so common */
 
        _mmc_port->input()->start.connect (mem_fun (*this, &Session::spp_start));
@@ -313,6 +228,7 @@ Session::set_mmc_port (string port_tag)
 int
 Session::set_midi_port (string port_tag)
 {
+#if 0
        if (port_tag.length() == 0) {
                if (_midi_port == 0) {
                        return 0;
@@ -336,6 +252,7 @@ Session::set_midi_port (string port_tag)
        Config->set_midi_port_name (port_tag);
 
   out:
+#endif
        MIDI_PortChanged(); /* EMIT SIGNAL */
        change_midi_ports ();
        set_dirty();
@@ -345,6 +262,7 @@ Session::set_midi_port (string port_tag)
 void
 Session::set_trace_midi_input (bool yn, MIDI::Port* port)
 {
+#if 0
        MIDI::Parser* input_parser;
 
        if (port) {
@@ -371,6 +289,7 @@ Session::set_trace_midi_input (bool yn, MIDI::Port* port)
                        }
                }
        }
+#endif
 
        Config->set_trace_midi_input (yn);
 }
@@ -378,6 +297,7 @@ Session::set_trace_midi_input (bool yn, MIDI::Port* port)
 void
 Session::set_trace_midi_output (bool yn, MIDI::Port* port)
 {
+#if 0
        MIDI::Parser* output_parser;
 
        if (port) {
@@ -404,6 +324,7 @@ Session::set_trace_midi_output (bool yn, MIDI::Port* port)
                }
 
        }
+#endif
 
        Config->set_trace_midi_output (yn);
 }
@@ -411,6 +332,7 @@ Session::set_trace_midi_output (bool yn, MIDI::Port* port)
 bool
 Session::get_trace_midi_input(MIDI::Port *port)
 {
+#if 0
        MIDI::Parser* input_parser;
        if (port) {
                if ((input_parser = port->input()) != 0) {
@@ -436,6 +358,7 @@ Session::get_trace_midi_input(MIDI::Port *port)
                        }
                }
        }
+#endif
 
        return false;
 }
@@ -443,6 +366,7 @@ Session::get_trace_midi_input(MIDI::Port *port)
 bool
 Session::get_trace_midi_output(MIDI::Port *port)
 {
+#if 0
        MIDI::Parser* output_parser;
        if (port) {
                if ((output_parser = port->output()) != 0) {
@@ -468,6 +392,7 @@ Session::get_trace_midi_output(MIDI::Port *port)
                        }
                }
        }
+#endif
 
        return false;
 
@@ -483,7 +408,7 @@ Session::setup_midi_control ()
        
        mmc_buffer[0] = 0xf0; // SysEx
        mmc_buffer[1] = 0x7f; // Real Time SysEx ID for MMC
-       mmc_buffer[2] = 0x7f; // "broadcast" device ID
+       mmc_buffer[2] = (mmc ? mmc->send_device_id() : 0x7f);
        mmc_buffer[3] = 0x6;  // MCC
 
        /* Set up the qtr frame message */
@@ -496,25 +421,6 @@ Session::setup_midi_control ()
        mtc_msg[10] = 0xf1;
        mtc_msg[12] = 0xf1;
        mtc_msg[14] = 0xf1;
-
-       if (_mmc_port != 0) {
-
-               send_mmc = send_midi_machine_control;
-
-       } else {
-
-               mmc = 0;
-               send_mmc = false;
-       }
-
-       if (_mtc_port != 0) {
-
-               send_mtc = send_midi_timecode;
-
-       } else {
-
-               send_mtc = false;
-       }
 }
 
 #if 0
@@ -560,7 +466,7 @@ Session::midi_read (MIDI::Port* port)
 void
 Session::spp_start (Parser& ignored)
 {
-       if (mmc_control && (_slave_type != MTC)) {
+       if (Config->get_mmc_control() && (Config->get_slave_source() != MTC)) {
                request_transport_speed (1.0);
        }
 }
@@ -574,7 +480,7 @@ Session::spp_continue (Parser& ignored)
 void
 Session::spp_stop (Parser& ignored)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                request_stop ();
        }
 }
@@ -582,7 +488,7 @@ Session::spp_stop (Parser& ignored)
 void
 Session::mmc_deferred_play (MIDI::MachineControl &mmc)
 {
-       if (mmc_control && (_slave_type != MTC)) {
+       if (Config->get_mmc_control() && (Config->get_slave_source() != MTC)) {
                request_transport_speed (1.0);
        }
 }
@@ -590,7 +496,7 @@ Session::mmc_deferred_play (MIDI::MachineControl &mmc)
 void
 Session::mmc_record_pause (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                maybe_enable_record();
        }
 }
@@ -598,7 +504,7 @@ Session::mmc_record_pause (MIDI::MachineControl &mmc)
 void
 Session::mmc_record_strobe (MIDI::MachineControl &mmc)
 {
-       if (!mmc_control
+       if (!Config->get_mmc_control()
                return;
 
        /* record strobe does an implicit "Play" command */
@@ -626,7 +532,7 @@ Session::mmc_record_strobe (MIDI::MachineControl &mmc)
 void
 Session::mmc_record_exit (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                disable_record (false);
        }
 }
@@ -634,7 +540,7 @@ Session::mmc_record_exit (MIDI::MachineControl &mmc)
 void
 Session::mmc_stop (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                request_stop ();
        }
 }
@@ -642,7 +548,7 @@ Session::mmc_stop (MIDI::MachineControl &mmc)
 void
 Session::mmc_pause (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
 
                /* We support RECORD_PAUSE, so the spec says that
                   we must interpret PAUSE like RECORD_PAUSE if
@@ -660,10 +566,9 @@ Session::mmc_pause (MIDI::MachineControl &mmc)
 static bool step_queued = false;
 
 void
-
 Session::mmc_step (MIDI::MachineControl &mmc, int steps)
 {
-       if (!mmc_control) {
+       if (!Config->get_mmc_control()) {
                return;
        }
 
@@ -682,7 +587,7 @@ Session::mmc_step (MIDI::MachineControl &mmc, int steps)
        }
        
        double diff_secs = diff.tv_sec + (diff.tv_usec / 1000000.0);
-       double cur_speed = (((steps * 0.5) * smpte_frames_per_second) / diff_secs) / smpte_frames_per_second;
+       double cur_speed = (((steps * 0.5) * smpte_frames_per_second()) / diff_secs) / smpte_frames_per_second();
        
        if (_transport_speed == 0 || cur_speed * _transport_speed < 0) {
                /* change direction */
@@ -714,7 +619,7 @@ Session::mmc_step (MIDI::MachineControl &mmc, int steps)
 void
 Session::mmc_rewind (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                request_transport_speed(-8.0f);
        }
 }
@@ -722,7 +627,7 @@ Session::mmc_rewind (MIDI::MachineControl &mmc)
 void
 Session::mmc_fast_forward (MIDI::MachineControl &mmc)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
                request_transport_speed(8.0f);
        }
 }
@@ -730,17 +635,19 @@ Session::mmc_fast_forward (MIDI::MachineControl &mmc)
 void
 Session::mmc_locate (MIDI::MachineControl &mmc, const MIDI::byte* mmc_tc)
 {
-       if (!mmc_control) {
+       if (!Config->get_mmc_control()) {
                return;
        }
 
-       jack_nframes_t target_frame;
+       nframes_t target_frame;
        SMPTE::Time smpte;
 
        smpte.hours = mmc_tc[0] & 0xf;
        smpte.minutes = mmc_tc[1];
        smpte.seconds = mmc_tc[2];
        smpte.frames = mmc_tc[3];
+       smpte.rate = smpte_frames_per_second();
+       smpte.drop = smpte_drop_frames();
   
        // Also takes smpte offset into account:
        smpte_to_sample( smpte, target_frame, true /* use_offset */, false /* use_subframes */ );
@@ -769,18 +676,14 @@ Session::mmc_locate (MIDI::MachineControl &mmc, const MIDI::byte* mmc_tc)
 void
 Session::mmc_shuttle (MIDI::MachineControl &mmc, float speed, bool forw)
 {
-       cerr << "MMC shuttle, speed = " << speed << endl;
-
-       if (!mmc_control) {
+       if (!Config->get_mmc_control()) {
                return;
        }
 
-       if (shuttle_speed_threshold >= 0 && speed > shuttle_speed_threshold) {
-               speed *= shuttle_speed_factor;
+       if (Config->get_shuttle_speed_threshold() >= 0 && speed > Config->get_shuttle_speed_threshold()) {
+               speed *= Config->get_shuttle_speed_factor();
        }
 
-       cerr << "requested MMC control speed = " << speed << endl;
-       
        if (forw) {
                request_transport_speed (speed);
        } else {
@@ -791,15 +694,15 @@ Session::mmc_shuttle (MIDI::MachineControl &mmc, float speed, bool forw)
 void
 Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled)
 {
-       if (mmc_control) {
+       if (Config->get_mmc_control()) {
 
                RouteList::iterator i;
-               Glib::RWLock::ReaderLock guard (route_lock);
+               boost::shared_ptr<RouteList> r = routes.reader();
                
-               for (i = routes.begin(); i != routes.end(); ++i) {
+               for (i = r->begin(); i != r->end(); ++i) {
                        AudioTrack *at;
 
-                       if ((at = dynamic_cast<AudioTrack*>(*i)) != 0) {
+                       if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
                                if (trk == at->remote_control_id()) {
                                        at->set_record_enable (enabled, &mmc);
                                        break;
@@ -830,7 +733,7 @@ Session::change_midi_ports ()
  * have been called with the appropriate nframes parameter this cycle.
  */
 int
-Session::send_full_time_code(jack_nframes_t nframes)
+Session::send_full_time_code(nframes_t nframes)
 {
        /* This function could easily send at a given frame offset, but would
         * that be useful?  Does ardour do sub-block accurate locating? [DR] */
@@ -840,7 +743,7 @@ Session::send_full_time_code(jack_nframes_t nframes)
 
        _send_smpte_update = false;
 
-       if (_mtc_port == 0 || !send_mtc) {
+       if (_mtc_port == 0 || !session_send_mtc) {
                return 0;
        }
        
@@ -854,7 +757,7 @@ Session::send_full_time_code(jack_nframes_t nframes)
        if (((mtc_smpte_bits >> 5) != MIDI::MTC_25_FPS) && (transmitting_smpte_time.frames % 2)) {
                // start MTC quarter frame transmission on an even frame
                SMPTE::increment( transmitting_smpte_time );
-               outbound_mtc_smpte_frame += (jack_nframes_t) _frames_per_smpte_frame;
+               outbound_mtc_smpte_frame += (nframes_t) _frames_per_smpte_frame;
        }
 
        // Compensate for audio latency
@@ -895,7 +798,7 @@ Session::send_full_time_code(jack_nframes_t nframes)
  * earlier already this cycle by send_full_time_code)
  */
 int
-Session::send_midi_time_code_for_cycle(jack_nframes_t nframes)
+Session::send_midi_time_code_for_cycle(nframes_t nframes)
 {      
        assert (next_quarter_frame_to_send >= 0);
        assert (next_quarter_frame_to_send <= 7);
@@ -905,14 +808,14 @@ Session::send_midi_time_code_for_cycle(jack_nframes_t nframes)
                printf("Negative????\n");
        }
 
-       if (_mtc_port == 0 || !send_mtc || transmitting_smpte_time.negative
+       if (_mtc_port == 0 || !session_send_mtc || transmitting_smpte_time.negative
                        /*|| (next_quarter_frame_to_send < 0)*/ ) {
-               printf("(MTC) Not sending MTC\n");
+               //printf("(MTC) Not sending MTC\n");
                return 0;
        }
        
        /* Duration of one quarter frame */
-       jack_nframes_t quarter_frame_duration = ((long) _frames_per_smpte_frame) >> 2;
+       nframes_t quarter_frame_duration = ((long) _frames_per_smpte_frame) >> 2;
        
        //cerr << "(MTC) TR: " << _transport_frame << " - SF: " << outbound_mtc_smpte_frame
        //<< " - NQ: " << next_quarter_frame_to_send << " - FD" << quarter_frame_duration << endl;
@@ -955,14 +858,14 @@ Session::send_midi_time_code_for_cycle(jack_nframes_t nframes)
                                break;
                }                       
                
-               const jack_nframes_t msg_time = (outbound_mtc_smpte_frame
+               const nframes_t msg_time = (outbound_mtc_smpte_frame
                        + (quarter_frame_duration * next_quarter_frame_to_send));
        
                // This message must fall within this block or something is broken
                assert(msg_time >= _transport_frame);
                assert(msg_time < _transport_frame + nframes);
 
-               jack_nframes_t out_stamp = msg_time - _transport_frame;
+               nframes_t out_stamp = msg_time - _transport_frame;
                assert(out_stamp < nframes);
 
                if (!_mtc_port->midimsg (mtc_msg, 2, out_stamp)) {
@@ -1004,11 +907,11 @@ Session::send_midi_time_code_for_cycle(jack_nframes_t nframes)
 **********************************************************************/
 /*
 void
-Session::send_mmc_in_another_thread (MIDI::MachineControl::Command cmd, jack_nframes_t target_frame)
+Session::send_mmc_in_another_thread (MIDI::MachineControl::Command cmd, nframes_t target_frame)
 {
        MIDIRequest* request;
 
-       if (_mtc_port == 0 || !send_mmc) {
+       if (_mtc_port == 0 || !session_send_mmc) {
                return;
        }
 
@@ -1028,20 +931,20 @@ Session::send_mmc_in_another_thread (MIDI::MachineControl::Command cmd, jack_nfr
  * this process cycle or horrible things will happen.
  */
 void
-Session::deliver_mmc (MIDI::MachineControl::Command cmd, jack_nframes_t where)
+Session::deliver_mmc (MIDI::MachineControl::Command cmd, nframes_t where)
 {
        using namespace MIDI;
        int nbytes = 4;
        SMPTE::Time smpte;
 
-       if (_mmc_port == 0 || !send_mmc) {
-               cerr << "Not delivering MMC " << _mmc_port << " - " << send_mmc << endl;
+       if (_mmc_port == 0 || !session_send_mmc) {
+               //cerr << "Not delivering MMC " << _mmc_port << " - " << send_mmc << endl;
                return;
        }
 
        mmc_buffer[nbytes++] = cmd;
 
-       cerr << "delivering MMC, cmd = " << hex << (int) cmd << dec << endl;
+       //cerr << "delivering MMC, cmd = " << hex << (int) cmd << dec << endl;
        
        switch (cmd) {
        case MachineControl::cmdLocate:
@@ -1090,9 +993,9 @@ Session::deliver_mmc (MIDI::MachineControl::Command cmd, jack_nframes_t where)
                // FIXME: timestamp correct? [DR]
                if (!_mmc_port->midimsg (mmc_buffer, sizeof (mmc_buffer), where - _transport_frame)) {
                        error << string_compose(_("MMC: cannot send command %1%2%3"), &hex, cmd, &dec) << endmsg;
-               } else {
+               } /*else {
                        cerr << "Sending MMC\n";
-               }
+               }*/
        }
 }
 
@@ -1230,21 +1133,23 @@ Session::start_midi_thread ()
 void
 Session::terminate_midi_thread ()
 {
-       MIDIRequest* request = new MIDIRequest;
-       void* status;
-
-       request->type = MIDIRequest::Quit;
-
-       midi_requests.write (&request, 1);
-       poke_midi_thread ();
-
-       pthread_join (midi_thread, &status);
+       if (midi_thread) {
+               MIDIRequest* request = new MIDIRequest;
+               void* status;
+               
+               request->type = MIDIRequest::Quit;
+               
+               midi_requests.write (&request, 1);
+               poke_midi_thread ();
+               
+               pthread_join (midi_thread, &status);
+       }
 }
 
 void
 Session::poke_midi_thread ()
 {
-       char c;
+       static char c = 0;
 
        if (write (midi_request_pipe[1], &c, 1) != 1) {
                error << string_compose(_("cannot send signal to midi thread! (%1)"), strerror (errno)) << endmsg;
@@ -1302,7 +1207,7 @@ Session::midi_thread_work ()
                   on the appropriate port.
                */
 
-               if (mmc_control && _mmc_port && _mmc_port->selectable() >= 0) {
+               if (Config->get_mmc_control() && _mmc_port && _mmc_port->selectable() >= 0) {
                        pfd[nfds].fd = _mmc_port->selectable();
                        pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
                        ports[nfds] = _mmc_port;
@@ -1314,14 +1219,14 @@ Session::midi_thread_work ()
                   the relevant port.
                */
 
-               if (_mtc_port && (_mtc_port != _mmc_port || !mmc_control) && _mtc_port->selectable() >= 0) {
+               if (_mtc_port && (_mtc_port != _mmc_port || !Config->get_mmc_control()) && _mtc_port->selectable() >= 0) {
                        pfd[nfds].fd = _mtc_port->selectable();
                        pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
                        ports[nfds] = _mtc_port;
                        nfds++;
                }
 
-               if (_midi_port && (_midi_port != _mmc_port || !mmc_control) && (_midi_port != _mtc_port) && _midi_port->selectable() >= 0) {
+               if (_midi_port && (_midi_port != _mmc_port || !Config->get_mmc_control()) && (_midi_port != _mtc_port) && _midi_port->selectable() >= 0) {
                        pfd[nfds].fd = _midi_port->selectable();
                        pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
                        ports[nfds] = _midi_port;
@@ -1481,14 +1386,3 @@ Session::midi_thread_work ()
 }
 #endif
 
-bool
-Session::get_mmc_control () const
-{
-       return mmc_control;
-}
-
-bool
-Session::get_midi_control () const
-{
-       return midi_control;
-}