enough with umpteen "i18n.h" files. Consolidate on pbd/i18n.h
[ardour.git] / gtk2_ardour / midi_tracer.cc
index e40fbca5909ced28a71d9010aa8fc1e999224ed4..2f97e5b6d5076a59136a78ce420bf794fc692ae0 100644 (file)
 
 */
 
-#define __STDC_FORMAT_MACROS 1
 #include <stdint.h>
 
 #include <sstream>
 #include <sys/time.h>
 #include <time.h>
 
+#include "pbd/localtime_r.h"
+#include "pbd/timersub.h"
+
 #include "midi++/parser.h"
-#include "midi++/manager.h"
+
+#include "ardour/async_midi_port.h"
+#include "ardour/midi_port.h"
+#include "ardour/audioengine.h"
 
 #include "midi_tracer.h"
 #include "gui_thread.h"
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 using namespace Gtk;
 using namespace std;
@@ -37,37 +42,43 @@ using namespace MIDI;
 using namespace Glib;
 
 MidiTracer::MidiTracer ()
-       : ArdourDialog (_("MIDI Tracer"))
-       , parser (0)
+       : ArdourWindow (_("MIDI Tracer"))
        , line_count_adjustment (200, 1, 2000, 1, 10)
        , line_count_spinner (line_count_adjustment)
-       , line_count_label (_("Store this many lines: "))
+       , line_count_label (_("Line history: "))
        , autoscroll (true)
        , show_hex (true)
-       , collect (true)
+       , show_delta_time (false)
        , _update_queued (0)
        , fifo (1024)
        , buffer_pool ("miditracer", buffer_size, 1024) // 1024 256 byte buffers
        , autoscroll_button (_("Auto-Scroll"))
        , base_button (_("Decimal"))
        , collect_button (_("Enabled"))
+       , delta_time_button (_("Delta times"))
 {
-       get_vbox()->set_spacing (4);
+       ARDOUR::AudioEngine::instance()->PortRegisteredOrUnregistered.connect
+               (_manager_connection, invalidator (*this), boost::bind (&MidiTracer::ports_changed, this), gui_context());
+
+       _last_receipt.tv_sec = 0;
+       _last_receipt.tv_usec = 0;
+
+       VBox* vbox = manage (new VBox);
+       vbox->set_spacing (4);
 
-       Manager::instance()->PortsChanged.connect (_manager_connection, invalidator (*this), boost::bind (&MidiTracer::ports_changed, this), gui_context());
-       
        HBox* pbox = manage (new HBox);
+       pbox->set_spacing (6);
        pbox->pack_start (*manage (new Label (_("Port:"))), false, false);
 
        _port_combo.signal_changed().connect (sigc::mem_fun (*this, &MidiTracer::port_changed));
        pbox->pack_start (_port_combo);
        pbox->show_all ();
-       get_vbox()->pack_start (*pbox, false, false);
-       
+       vbox->pack_start (*pbox, false, false);
+
        scroller.add (text);
-       get_vbox()->set_border_width (12);
-       get_vbox()->pack_start (scroller, true, true);
-       
+       vbox->set_border_width (12);
+       vbox->pack_start (scroller, true, true);
+
        text.show ();
        text.set_name ("MidiTracerTextView");
        scroller.show ();
@@ -85,19 +96,22 @@ MidiTracer::MidiTracer ()
        line_count_label.show ();
        line_count_box.show ();
 
-       get_action_area()->add (line_count_box);
-
        HBox* bbox = manage (new HBox);
+       bbox->add (line_count_box);
+       bbox->add (delta_time_button);
        bbox->add (base_button);
        bbox->add (collect_button);
        bbox->add (autoscroll_button);
        bbox->show ();
-       
-       get_action_area()->add (*bbox);
+
+       vbox->pack_start (*bbox, false, false);
+
+       add (*vbox);
 
        base_button.signal_toggled().connect (sigc::mem_fun (*this, &MidiTracer::base_toggle));
        collect_button.signal_toggled().connect (sigc::mem_fun (*this, &MidiTracer::collect_toggle));
        autoscroll_button.signal_toggled().connect (sigc::mem_fun (*this, &MidiTracer::autoscroll_toggle));
+       delta_time_button.signal_toggled().connect (sigc::mem_fun (*this, &MidiTracer::delta_toggle));
 
        base_button.show ();
        collect_button.show ();
@@ -117,25 +131,60 @@ MidiTracer::ports_changed ()
 {
        string const c = _port_combo.get_active_text ();
        _port_combo.clear ();
-       
-       Manager::PortList const & p = Manager::instance()->get_midi_ports ();
-       for (Manager::PortList::const_iterator i = p.begin(); i != p.end(); ++i) {
+
+       ARDOUR::PortManager::PortList pl;
+       ARDOUR::AudioEngine::instance()->get_ports (ARDOUR::DataType::MIDI, pl);
+
+       if (pl.empty()) {
+               _port_combo.set_active_text ("");
+               return;
+       }
+
+       for (ARDOUR::PortManager::PortList::const_iterator i = pl.begin(); i != pl.end(); ++i) {
                _port_combo.append_text ((*i)->name());
        }
 
-       _port_combo.set_active_text (c);
+       if (c.empty()) {
+               _port_combo.set_active_text (pl.front()->name());
+       } else {
+               _port_combo.set_active_text (c);
+       }
 }
 
 void
 MidiTracer::port_changed ()
 {
+       using namespace ARDOUR;
+
        disconnect ();
 
-       Port* p = Manager::instance()->port (_port_combo.get_active_text());
+       boost::shared_ptr<ARDOUR::Port> p = AudioEngine::instance()->get_port_by_name (_port_combo.get_active_text());
+
+       if (!p) {
+               std::cerr << "port not found\n";
+               return;
+       }
+
+       /* The inheritance heirarchy makes this messy. AsyncMIDIPort has two
+        * available MIDI::Parsers what we could connect to, ::self_parser()
+        * (from ARDOUR::MidiPort) and ::parser() from MIDI::Port. One day,
+        * this mess will all go away ...
+        */
+
+       boost::shared_ptr<AsyncMIDIPort> async = boost::dynamic_pointer_cast<AsyncMIDIPort> (p);
+
+       if (!async) {
 
-       if (p) {
-               Parser* parser = p->input() ? p->input() : p->output();
-               parser->any.connect_same_thread (_parser_connection, boost::bind (&MidiTracer::tracer, this, _1, _2, _3));
+               boost::shared_ptr<ARDOUR::MidiPort> mp = boost::dynamic_pointer_cast<ARDOUR::MidiPort> (p);
+
+               if (mp) {
+                       mp->self_parser().any.connect_same_thread (_parser_connection, boost::bind (&MidiTracer::tracer, this, _1, _2, _3));
+                       mp->set_trace_on (true);
+                       traced_port = mp;
+               }
+
+       } else {
+               async->parser()->any.connect_same_thread (_parser_connection, boost::bind (&MidiTracer::tracer, this, _1, _2, _3));
        }
 }
 
@@ -143,6 +192,11 @@ void
 MidiTracer::disconnect ()
 {
        _parser_connection.disconnect ();
+
+       if (traced_port) {
+               traced_port->set_trace_on (false);
+               traced_port.reset ();
+       }
 }
 
 void
@@ -156,15 +210,24 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
        size_t s;
 
        gettimeofday (&tv, 0);
-       localtime_r (&tv.tv_sec, &now);
 
        buf = (char *) buffer_pool.alloc ();
        bufsize = buffer_size;
 
-       s = strftime (buf, bufsize, "%H:%M:%S", &now);
-       bufsize -= s;
-       s += snprintf (&buf[s], bufsize, ".%06" PRId64, (int64_t) tv.tv_usec);
-       bufsize -= s;
+       if (_last_receipt.tv_sec != 0 && show_delta_time) {
+               struct timeval delta;
+               timersub (&tv, &_last_receipt, &delta);
+               s = snprintf (buf, bufsize, "+%02" PRId64 ":%06" PRId64, (int64_t) delta.tv_sec, (int64_t) delta.tv_usec);
+               bufsize -= s;
+       } else {
+               localtime_r ((const time_t*)&tv.tv_sec, &now);
+               s = strftime (buf, bufsize, "%H:%M:%S", &now);
+               bufsize -= s;
+               s += snprintf (&buf[s], bufsize, ".%06" PRId64, (int64_t) tv.tv_usec);
+               bufsize -= s;
+       }
+
+       _last_receipt = tv;
 
        switch ((eventType) msg[0]&0xf0) {
        case off:
@@ -174,7 +237,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d %-3d\n", "NoteOff", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
                }
                break;
-               
+
        case on:
                if (show_hex) {
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x %02x\n", "NoteOn", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
@@ -182,7 +245,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d %-3d\n", "NoteOn", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
                }
                break;
-           
+
        case polypress:
                if (show_hex) {
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x\n", "PolyPressure", (msg[0]&0xf)+1, (int) msg[1]);
@@ -190,7 +253,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d\n", "PolyPressure", (msg[0]&0xf)+1, (int) msg[1]);
                }
                break;
-           
+
        case MIDI::controller:
                if (show_hex) {
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x %02x\n", "Controller", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
@@ -198,7 +261,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %2d %-3d\n", "Controller", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
                }
                break;
-               
+
        case program:
                if (show_hex) {
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x\n", "Program Change", (msg[0]&0xf)+1, (int) msg[1]);
@@ -206,7 +269,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d\n", "Program Change", (msg[0]&0xf)+1, (int) msg[1]);
                }
                break;
-               
+
        case chanpress:
                if (show_hex) {
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x/%-3d\n", "Channel Pressure", (msg[0]&0xf)+1, (int) msg[1], (int) msg[1]);
@@ -214,15 +277,15 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x/%-3d\n", "Channel Pressure", (msg[0]&0xf)+1, (int) msg[1], (int) msg[1]);
                }
                break;
-           
+
        case MIDI::pitchbend:
                if (show_hex) {
-                       s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x\n", "Pitch Bend", (msg[0]&0xf)+1, (int) msg[1]);
+                       s += snprintf (&buf[s], bufsize, "%16s chn %2d %02x %02x\n", "Pitch Bend", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
                } else {
-                       s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d\n", "Pitch Bend", (msg[0]&0xf)+1, (int) msg[1]);
+                       s += snprintf (&buf[s], bufsize, "%16s chn %2d %-3d %-3d\n", "Pitch Bend", (msg[0]&0xf)+1, (int) msg[1], (int) msg[2]);
                }
                break;
-           
+
        case MIDI::sysex:
                if (len == 1) {
                        switch (msg[0]) {
@@ -247,7 +310,7 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        default:
                                s += snprintf (&buf[s], bufsize, "%16s %02x\n", "Sysex", (int) msg[1]);
                                break;
-                       } 
+                       }
 
                } else if (len > 5 && msg[0] == 0xf0 && msg[1] == 0x7f && msg[3] == 0x06) {
                        /* MMC */
@@ -276,21 +339,25 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                                        s += snprintf (&buf[s], bufsize, " MMC command %02x\n", cmd);
                                }
                        }
-                       
+
                } else if (len == 10 && msg[0] == 0xf0 && msg[1] == 0x7f && msg[9] == 0xf7)  {
 
                        /* MTC full frame */
                        s += snprintf (
                                &buf[s], bufsize, " MTC full frame to %02d:%02d:%02d:%02d\n", msg[5] & 0x1f, msg[6], msg[7], msg[8]
                                );
+               } else if (len == 3 && msg[0] == MIDI::position) {
 
+                       /* MIDI Song Position */
+                       int midi_beats = (msg[2] << 7) | msg[1];
+                       s += snprintf (&buf[s], bufsize, "%16s %d\n", "Position", (int) midi_beats);
                } else {
-                       
+
                        /* other sys-ex */
-                       
+
                        s += snprintf (&buf[s], bufsize, "%16s (%d) = [", "Sysex", (int) len);
                        bufsize -= s;
-                       
+
                        for (unsigned int i = 0; i < len && bufsize > 3; ++i) {
                                if (i > 0) {
                                        s += snprintf (&buf[s], bufsize, " %02x", msg[i]);
@@ -302,39 +369,39 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
                        s += snprintf (&buf[s], bufsize, "]\n");
                }
                break;
-           
+
        case MIDI::song:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Song");
                break;
-           
+
        case MIDI::tune:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Tune");
                break;
-           
+
        case MIDI::eox:
                s += snprintf (&buf[s], bufsize, "%16s\n", "EOX");
                break;
-           
+
        case MIDI::timing:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Timing");
                break;
-           
+
        case MIDI::start:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Start");
                break;
-           
+
        case MIDI::stop:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Stop");
                break;
-           
+
        case MIDI::contineu:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Continue");
                break;
-           
+
        case active:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Active Sense");
                break;
-           
+
        default:
                s += snprintf (&buf[s], bufsize, "%16s\n", "Unknown");
                break;
@@ -343,11 +410,13 @@ MidiTracer::tracer (Parser&, byte* msg, size_t len)
        // If you want to append more to the line, uncomment this first
        // bufsize -= s;
 
+       assert(s <= buffer_size); // clang dead-assignment
+
        fifo.write (&buf, 1);
 
-       if (g_atomic_int_get (&_update_queued) == 0) {
+       if (g_atomic_int_get (const_cast<gint*> (&_update_queued)) == 0) {
                gui_context()->call_slot (invalidator (*this), boost::bind (&MidiTracer::update, this));
-               g_atomic_int_inc (&_update_queued);
+               g_atomic_int_inc (const_cast<gint*> (&_update_queued));
        }
 }
 
@@ -355,7 +424,7 @@ void
 MidiTracer::update ()
 {
        bool updated = false;
-       g_atomic_int_dec_and_test (&_update_queued);
+       g_atomic_int_dec_and_test (const_cast<gint*> (&_update_queued));
 
        RefPtr<TextBuffer> buf (text.get_buffer());
 
@@ -384,6 +453,12 @@ MidiTracer::base_toggle ()
        show_hex = !base_button.get_active();
 }
 
+void
+MidiTracer::delta_toggle ()
+{
+       show_delta_time = delta_time_button.get_active();
+}
+
 void
 MidiTracer::collect_toggle ()
 {