From fbe341f59a4f2201115db313feb126e75cc873c3 Mon Sep 17 00:00:00 2001
From: Damien Zammit <damien@zamaudio.com>
Date: Fri, 17 Feb 2017 20:03:21 +1100
Subject: PT import: Add MIDI import functionality

This change adds support for importing all MIDI regions
from a PT session onto a single track.

Unfortunately, currently we don't know how to set the start
offset of MIDI regions reliably, therefore all midi regions
get dumped at the beginning of the Ardour session.

Signed-off-by: Damien Zammit <damien@zamaudio.com>
---
 gtk2_ardour/editor_pt_import.cc | 53 ++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 52 insertions(+), 1 deletion(-)

diff --git a/gtk2_ardour/editor_pt_import.cc b/gtk2_ardour/editor_pt_import.cc
index 2b659e0369..cb3054a62b 100644
--- a/gtk2_ardour/editor_pt_import.cc
+++ b/gtk2_ardour/editor_pt_import.cc
@@ -36,6 +36,7 @@
 #include "ardour/audioregion.h"
 #include "ardour/midi_region.h"
 #include "ardour/midi_track.h"
+#include "ardour/midi_model.h"
 #include "ardour/operations.h"
 #include "ardour/region_factory.h"
 #include "ardour/smf_source.h"
@@ -179,11 +180,25 @@ Editor::do_ptimport (std::string ptpath,
 		msg.run ();
 	}
 
+	// Create a dummy midi track first to get a midi Source
+	list<boost::shared_ptr<MidiTrack> > mt (
+		_session->new_midi_track (ChanCount (DataType::MIDI, 1),
+		                          ChanCount (DataType::MIDI, 1),
+		                          true,
+		                          instrument, (Plugin::PresetRecord*) 0,
+		                          (RouteGroup*) 0,
+		                          1,
+		                          string(),
+		                          PresentationInfo::max_order));
+	if (mt.empty()) {
+		return;
+	}
+
 	for (vector<PTFFormat::region_t>::iterator a = ptf.regions.begin();
 			a != ptf.regions.end(); ++a) {
 		for (vector<ptflookup_t>::iterator p = ptfwavpair.begin();
 				p != ptfwavpair.end(); ++p) {
-			if (p->index1 == a->wave.index) {
+			if ((p->index1 == a->wave.index) && (strcmp(a->wave.filename.c_str(), "") != 0)) {
 				for (SourceList::iterator x = imported.begin();
 						x != imported.end(); ++x) {
 					if ((*x)->id() == p->id) {
@@ -212,6 +227,42 @@ Editor::do_ptimport (std::string ptpath,
 				}
 			}
 		}
+		if (strcmp(a->wave.filename.c_str(), "") == 0) {
+			/* Empty wave - assume MIDI region */
+			boost::shared_ptr<MidiTrack> midi_track = mt.back();
+			boost::shared_ptr<Playlist> playlist = midi_track->playlist();
+			framepos_t f = (framepos_t)a->startpos;
+			framecnt_t length = (framecnt_t)a->length;
+			MusicFrame pos (f, 0);
+			boost::shared_ptr<Source> src = _session->create_midi_source_by_stealing_name (midi_track);
+			PropertyList plist;
+			plist.add (ARDOUR::Properties::start, 0);
+			plist.add (ARDOUR::Properties::length, length);
+			plist.add (ARDOUR::Properties::name, PBD::basename_nosuffix(src->name()));
+			boost::shared_ptr<Region> region = (RegionFactory::create (src, plist));
+			/* sets beat position */
+			region->set_position (pos.frame, pos.division);
+			midi_track->playlist()->add_region (region, pos.frame, 1.0, false, pos.division);
+
+			boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(region);
+			boost::shared_ptr<MidiModel> mm = mr->midi_source(0)->model();
+			MidiModel::NoteDiffCommand *midicmd;
+			midicmd = mm->new_note_diff_command ("Import ProTools MIDI");
+
+			for (vector<PTFFormat::midi_ev_t>::iterator
+					j = a->midi.begin();
+					j != a->midi.end(); ++j) {
+				Evoral::Beats start = (Evoral::Beats)(j->pos/960000.);
+				Evoral::Beats len = (Evoral::Beats)(j->length/960000.);
+				// PT C-2 = 0, Ardour C-1 = 0, subtract twelve to convert...
+				midicmd->add(boost::shared_ptr<Evoral::Note<Evoral::Beats> >
+					(new Evoral::Note<Evoral::Beats>( (uint8_t)1, start, len, j->note - 12, j->velocity )));
+			}
+			mm->apply_command (_session, midicmd);
+			boost::shared_ptr<Region> copy (RegionFactory::create (mr, true));
+			playlist->clear_changes ();
+			playlist->add_region (copy, a->startpos);
+		}
 	}
 
 	boost::shared_ptr<AudioTrack> existing_track;
-- 
cgit v1.2.3