libs/ardour/midi_source.cc

   1 /*
   2     Copyright (C) 2006 Paul Davis
   3         Written by Dave Robillard, 2006
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program; if not, write to the Free Software
  17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18 */
  19
  20 #include <sys/stat.h>
  21 #include <unistd.h>
  22 #include <fcntl.h>
  23 #include <poll.h>
  24 #include <float.h>
  25 #include <cerrno>
  26 #include <ctime>
  27 #include <cmath>
  28 #include <iomanip>
  29 #include <algorithm>
  30
  31 #include <pbd/xml++.h>
  32 #include <pbd/pthread_utils.h>
  33 #include <pbd/basename.h>
  34
  35 #include <ardour/midi_source.h>
  36 #include <ardour/midi_ring_buffer.h>
  37 #include <ardour/session.h>
  38 #include <ardour/session_directory.h>
  39 #include <ardour/source_factory.h>
  40
  41 #include "i18n.h"
  42
  43 using namespace std;
  44 using namespace ARDOUR;
  45 using namespace PBD;
  46
  47 sigc::signal<void,MidiSource *> MidiSource::MidiSourceCreated;
  48
  49 MidiSource::MidiSource (Session& s, string name)
  50         : Source (s, name, DataType::MIDI)
  51         , _timeline_position(0)
  52         , _model(new MidiModel(this))
  53         , _writing (false)
  54         , _model_iter(*_model.get(), 0.0)
  55         , _last_read_end(0)
  56 {
  57         _read_data_count = 0;
  58         _write_data_count = 0;
  59 }
  60
  61 MidiSource::MidiSource (Session& s, const XMLNode& node)
  62         : Source (s, node)
  63         , _timeline_position(0)
  64         , _model(new MidiModel(this))
  65         , _writing (false)
  66         , _model_iter(*_model.get(), 0.0)
  67         , _last_read_end(0)
  68 {
  69         _read_data_count = 0;
  70         _write_data_count = 0;
  71
  72         if (set_state (node)) {
  73                 throw failed_constructor();
  74         }
  75 }
  76
  77 MidiSource::~MidiSource ()
  78 {
  79 }
  80
  81 XMLNode&
  82 MidiSource::get_state ()
  83 {
  84         XMLNode& node (Source::get_state());
  85
  86         if (_captured_for.length()) {
  87                 node.add_property ("captured-for", _captured_for);
  88         }
  89
  90         return node;
  91 }
  92
  93 int
  94 MidiSource::set_state (const XMLNode& node)
  95 {
  96         const XMLProperty* prop;
  97
  98         Source::set_state (node);
  99
 100         if ((prop = node.property ("captured-for")) != 0) {
 101                 _captured_for = prop->value();
 102         }
 103
 104         return 0;
 105 }
 106
 107 nframes_t
 108 MidiSource::midi_read (MidiRingBuffer<nframes_t>& dst, nframes_t start, nframes_t cnt, nframes_t stamp_offset, nframes_t negative_stamp_offset) const
 109 {
 110         Glib::Mutex::Lock lm (_lock);
 111         if (_model) {
 112                 Evoral::Sequence<double>::const_iterator& i = _model_iter;
 113
 114                 if (_last_read_end == 0 || start != _last_read_end) {
 115                         i = _model->begin();
 116                         cerr << "MidiSource::midi_read seeking to " << start << endl;
 117                         while (i != _model->end() && i->time() < start)
 118                                 ++i;
 119                 }
 120
 121                 _last_read_end = start + cnt;
 122
 123                 if (i == _model->end()) {
 124                         return cnt;
 125                 }
 126
 127                 while (i->time() < start + cnt && i != _model->end()) {
 128                         dst.write(i->time(), i->event_type(), i->size(), i->buffer());
 129                         ++i;
 130                 }
 131                 return cnt;
 132         } else {
 133                 return read_unlocked (dst, start, cnt, stamp_offset, negative_stamp_offset);
 134         }
 135 }
 136
 137 nframes_t
 138 MidiSource::midi_write (MidiRingBuffer<nframes_t>& dst, nframes_t cnt)
 139 {
 140         Glib::Mutex::Lock lm (_lock);
 141         return write_unlocked (dst, cnt);
 142 }
 143
 144 bool
 145 MidiSource::file_changed (string path)
 146 {
 147         struct stat stat_file;
 148
 149         int e1 = stat (path.c_str(), &stat_file);
 150
 151         return ( !e1 );
 152 }
 153
 154 void
 155 MidiSource::mark_streaming_midi_write_started (NoteMode mode, nframes_t start_frame)
 156 {
 157         set_timeline_position(start_frame); // why do I have a feeling this can break somehow...
 158
 159         if (_model) {
 160                 _model->set_note_mode(mode);
 161                 _model->start_write();
 162         }
 163
 164         _writing = true;
 165 }
 166
 167 void
 168 MidiSource::mark_streaming_write_started ()
 169 {
 170         if (_model) {
 171                 _model->start_write();
 172         }
 173
 174         _writing = true;
 175 }
 176
 177 void
 178 MidiSource::mark_streaming_write_completed ()
 179 {
 180         if (_model) {
 181                 _model->end_write(false); // FIXME: param?
 182         }
 183
 184         _writing = false;
 185 }
 186
 187 void
 188 MidiSource::session_saved()
 189 {
 190         flush_midi();
 191
 192         if (_model && _model->edited()) {
 193                 string newname;
 194                 const string basename = PBD::basename_nosuffix(_name);
 195                 string::size_type last_dash = basename.find_last_of("-");
 196                 if (last_dash == string::npos || last_dash == basename.find_first_of("-")) {
 197                         newname = basename + "-1";
 198                 } else {
 199                         stringstream ss(basename.substr(last_dash+1));
 200                         unsigned write_count = 0;
 201                         ss >> write_count;
 202                         cerr << "WRITE COUNT: " << write_count << endl;
 203                         ++write_count; // start at 1
 204                         ss.clear();
 205                         ss << basename.substr(0, last_dash) << "-" << write_count;
 206                         newname = ss.str();
 207                 }
 208
 209                 string newpath = _session.session_directory().midi_path().to_string() +"/"+ newname + ".mid";
 210
 211                 boost::shared_ptr<MidiSource> newsrc = boost::dynamic_pointer_cast<MidiSource>(
 212                                 SourceFactory::createWritable(DataType::MIDI, _session, newpath, 1, 0, true));
 213
 214                 newsrc->set_timeline_position(_timeline_position);
 215                 _model->write_to(newsrc);
 216
 217                 // cyclic dependency here, ugly :(
 218                 newsrc->set_model(_model);
 219                 _model->set_midi_source(newsrc.get());
 220
 221                 newsrc->flush_midi();
 222
 223                 Switched.emit(newsrc);
 224         }
 225 }
 226