X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmidi-walker.cc;h=59a2c387239290c2d399d16d41aece2c1814e421;hb=9e781b7dc83b60a543ce218aa1a5f139f74c760f;hp=6a568b43fce3a393d1edd0ac72e0c7011355dcc4;hpb=8e300d9598c6f54cb18d8bc8cd0458fa1028d8b9;p=lilypond.git diff --git a/lily/midi-walker.cc b/lily/midi-walker.cc index 6a568b43fc..59a2c38723 100644 --- a/lily/midi-walker.cc +++ b/lily/midi-walker.cc @@ -1,31 +1,43 @@ /* - midi-walker.cc -- implement Midi_walker + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2014 Han-Wen Nienhuys + Jan Nieuwenhuizen - (c) 1997--2001 Han-Wen Nienhuys - Jan Nieuwenhuizen - */ + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . +*/ #include "midi-walker.hh" + #include "audio-column.hh" -#include "audio-item.hh" #include "audio-staff.hh" #include "midi-item.hh" +#include "midi-chunk.hh" #include "midi-stream.hh" -#include "debug.hh" +#include "warn.hh" -Midi_note_event::Midi_note_event () -{ - ignore_b_ = false; +Midi_note_event::Midi_note_event () +{ + ignore_ = false; } int -compare (Midi_note_event const& left, Midi_note_event const& right) +compare (Midi_note_event const &left, Midi_note_event const &right) { - Moment m = (left.key - right.key); + Moment m = (left.key - right.key); - if (m<0) + if (m < 0) return -1; else if (m > 0) return 1; @@ -33,140 +45,177 @@ compare (Midi_note_event const& left, Midi_note_event const& right) return 0; } -Midi_walker::Midi_walker (Audio_staff* audio_staff_l, Midi_track* track_l) +bool +audio_item_less (Audio_item *const a, + Audio_item *const b) { - track_l_ = track_l; - index_= 0; - item_l_arr_l_ = &audio_staff_l->audio_item_l_arr_; + return a->get_column ()->when_ < b->get_column ()->when_; +} - last_mom_ = 0; +Midi_walker::Midi_walker (Audio_staff *audio_staff, Midi_track *track) +{ + track_ = track; + index_ = 0; + items_ = audio_staff->audio_items_; + vector_sort (items_, audio_item_less); + //Pieces that begin with grace notes start at negative times. This + //is OK - MIDI output doesn't use absolute ticks, only differences. + last_tick_ = items_.empty () ? 0 : items_[0]->audio_column_->ticks (); + percussion_ = audio_staff->percussion_; + merge_unisons_ = audio_staff->merge_unisons_; } Midi_walker::~Midi_walker () -{ - // ugh - do_stop_notes (last_mom_ + Moment (Rational (10, 1))); +{ + junk_pointers (midi_events_); } -/** - Find out if start_note event is needed, and do it if needed. - */ -void -Midi_walker::do_start_note (Midi_note* note_p) +void +Midi_walker::finalize () { - Audio_item* ptr = (*item_l_arr_l_)[index_]; - Moment stop_mom = note_p->length_mom () + ptr->audio_column_l_->at_mom (); + do_stop_notes (INT_MAX); +} - bool play_start = true; - for (int i=0; i < stop_note_queue.size (); i++) +/** + Find out if start_note event is needed, and do it if needed. +*/ +void +Midi_walker::do_start_note (Midi_note *note) +{ + Audio_item *ptr = items_[index_]; + assert (note->audio_ == ptr); + int now_ticks = ptr->audio_column_->ticks (); + int stop_ticks = int (moment_to_real (note->audio_->length_mom_) * + Real (384 * 4)) + now_ticks; + for (vsize i = 0; i < stop_note_queue.size (); i++) { - /* if this pith already in queue */ - if (stop_note_queue[i].val->pitch_i () == note_p->pitch_i ()) - { - if (stop_note_queue[i].key < stop_mom) - { - /* let stopnote in queue be ignored, - new stop note wins */ - stop_note_queue[i].ignore_b_ = true; - /* don't replay start note, */ - play_start = false; - break; - } - else - { - /* skip this stopnote, - don't play the start note */ - delete note_p; - note_p = 0; - break; - } - } + /* if this pitch already in queue */ + if (stop_note_queue[i].val->get_semitone_pitch () + == note->get_semitone_pitch ()) + { + int queued_ticks + = stop_note_queue[i].val->audio_->audio_column_->ticks (); + // If the two notes started at the same time, or option is set, + if (now_ticks == queued_ticks || merge_unisons_) + { + // merge them. + if (stop_note_queue[i].key < stop_ticks) + { + Midi_note_event e; + e.val = stop_note_queue[i].val; + e.key = stop_ticks; + stop_note_queue[i].ignore_ = true; + stop_note_queue.insert (e); + } + note = 0; + break; + } + else + { + // A note was played that interruped a played note. + // Stop the old note, and continue to the greatest moment + // between the two. + if (stop_note_queue[i].key > stop_ticks) + { + stop_ticks = stop_note_queue[i].key; + } + output_event (now_ticks, stop_note_queue[i].val); + stop_note_queue[i].ignore_ = true; + break; + } + } } - if (note_p) + if (note) { Midi_note_event e; - e.val = new Midi_note_off (note_p); - e.key = stop_mom; + e.val = new Midi_note_off (note); + + midi_events_.push_back (e.val); + e.key = stop_ticks; stop_note_queue.insert (e); - if (play_start) - output_event (ptr->audio_column_l_->at_mom (), note_p); + output_event (now_ticks, note); } } -/** - Output note events for all notes which end before #max_mom# - */ void -Midi_walker::do_stop_notes (Moment max_mom) +Midi_walker::do_stop_notes (int max_ticks) { - while (stop_note_queue.size () && stop_note_queue.front ().key <= max_mom) + while (stop_note_queue.size () && stop_note_queue.front ().key <= max_ticks) { Midi_note_event e = stop_note_queue.get (); - if (e.ignore_b_) - { - delete e.val; - continue; - } - - Moment stop_mom = e.key; - Midi_note* note_p = e.val; - - output_event (stop_mom, note_p); + if (e.ignore_) + { + continue; + } + + int stop_ticks = e.key; + Midi_note *note = e.val; + + output_event (stop_ticks, note); } } -/** - Advance the track to #now#, output the item, and adjust current "moment". - */ void -Midi_walker::output_event (Moment now_mom, Midi_item* l) +Midi_walker::output_event (int now_ticks, Midi_item *l) { - Moment delta_t = now_mom - last_mom_ ; - last_mom_ = now_mom; + int delta_ticks = now_ticks - last_tick_; + last_tick_ = now_ticks; /* this is not correct, but at least it doesn't crash when you start with graces - */ - if (delta_t < Moment(0)) + */ + if (delta_ticks < 0) { - delta_t = Moment (0); + programming_error ("Going back in MIDI time."); + delta_ticks = 0; } - - track_l_->add (delta_t, l); + track_->add (delta_ticks, l); } void Midi_walker::process () { - Audio_item* audio_p = (*item_l_arr_l_)[index_]; - do_stop_notes (audio_p->audio_column_l_->at_mom ()); + Audio_item *audio = items_[index_]; + Audio_column *col = audio->get_column (); + do_stop_notes (col->ticks ()); - if (Midi_item* midi_p = Midi_item::midi_p (audio_p)) + if (Midi_item *midi = get_midi (audio)) { - midi_p->channel_i_ = track_l_->channel_i_; - //midi_p->channel_i_ = track_l_->number_i_; - if (Midi_note* note_p = dynamic_cast (midi_p)) - { - if (note_p->length_mom ().to_bool ()) - do_start_note (note_p); - } + if (Midi_note *note = dynamic_cast (midi)) + { + if (note->audio_->length_mom_.to_bool ()) + do_start_note (note); + } else - output_event (audio_p->audio_column_l_->at_mom (), midi_p); + output_event (audio->audio_column_->ticks (), midi); } } +Midi_item * +Midi_walker::get_midi (Audio_item *i) +{ + Midi_item *mi = Midi_item::get_midi (i); + + if (percussion_) + if (Midi_channel_item *mci = dynamic_cast (mi)) + mci->channel_ = 9; + + midi_events_.push_back (mi); + return mi; +} + bool Midi_walker::ok () const { - return index_ size (); + return index_ < items_.size (); } void -Midi_walker::operator ++ (int) +Midi_walker::operator ++(int) { assert (ok ()); index_++;