X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmidi-walker.cc;h=70d3e31fd611d2c7c75327ae25652c7e3013bcdf;hb=51eff44c691a77454e01ffef7a444c42a287e37c;hp=4a1674c7f7a043feb802f2e9058b679997bb8865;hpb=4bdf5f822b18b10b48f619c116641e6aee1968ac;p=lilypond.git diff --git a/lily/midi-walker.cc b/lily/midi-walker.cc index 4a1674c7f7..70d3e31fd6 100644 --- a/lily/midi-walker.cc +++ b/lily/midi-walker.cc @@ -1,95 +1,195 @@ /* midi-walker.cc -- implement Midi_walker - source file of the LilyPond music typesetter + source file of the GNU LilyPond music typesetter - (c) 1997 Han-Wen Nienhuys , Jan Nieuwenhuizen + (c) 1997--2009 Han-Wen Nienhuys + Jan Nieuwenhuizen */ -#include "musicalrequest.hh" -#include "pscore.hh" -#include "staff.hh" #include "midi-walker.hh" + +#include "audio-column.hh" +#include "audio-staff.hh" #include "midi-item.hh" +#include "midi-chunk.hh" #include "midi-stream.hh" -#include "debug.hh" -#include "staff-column.hh" +#include "warn.hh" -Midi_walker::Midi_walker(Staff *st_l, Midi_track* track_l) - : PCursor(st_l->cols_) +Midi_note_event::Midi_note_event () { - track_l_ = track_l; - last_moment_= 0; + ignore_ = false; +} + +int +compare (Midi_note_event const &left, Midi_note_event const &right) +{ + Moment m = (left.key - right.key); + + if (m < 0) + return -1; + else if (m > 0) + return 1; + else + return 0; +} + +bool +audio_item_less (Audio_item * const a, + Audio_item * const b) +{ + return a->get_column ()->when_ < b->get_column ()->when_; +} + +Midi_walker::Midi_walker (Audio_staff *audio_staff, Midi_track *track, + int channel) +{ + channel_ = channel; + track_ = track; + index_ = 0; + items_ = audio_staff->audio_items_; + vector_sort (items_, audio_item_less); + last_tick_ = 0; +} + +Midi_walker::~Midi_walker () +{ + junk_pointers (midi_events_); } -/** - output notestop events for all notes which end before #max_moment# - */ void -Midi_walker::do_stop_notes(Moment max_moment) +Midi_walker::finalize () { - while (stop_notes.size() && stop_notes.front_idx() <= max_moment) { - Moment stop_moment = stop_notes.front_idx(); - Melodic_req * req_l = stop_notes.get(); - - Midi_note note(req_l, track_l_->number_i_, false); - output_event(note, stop_moment); - } + do_stop_notes (INT_MAX); } + /** - Find out if start_note event is needed, and do it if needed. - */ -void -Midi_walker::do_start_note(Note_req*note_l) + Find out if start_note event is needed, and do it if needed. +*/ +void +Midi_walker::do_start_note (Midi_note *note) { - Moment stop=note_l->duration() + ptr()->when(); - for(int i=0; i < stop_notes.size(); i++) - if (stop_notes.value_arr_[i]->melodic()->pitch() == - note_l->pitch()) { - if ( stop_notes.indices_arr_[i] < stop){ - - stop_notes.del(i); - return ; // removing this gives a feature ( ${c2 c4}$ output correctly) - } - else - return; // skip the stop note - break;// do the stop note + Audio_item *ptr = items_[index_]; + assert (note->audio_ == ptr); + int stop_ticks = int (moment_to_real (note->audio_->length_mom_) * Real (384 * 4)) + + ptr->audio_column_->ticks (); + + bool play_start = true; + for (vsize i = 0; i < stop_note_queue.size (); i++) + { + /* if this pith already in queue */ + if (stop_note_queue[i].val->get_semitone_pitch () + == note->get_semitone_pitch ()) + { + if (stop_note_queue[i].key < stop_ticks) + { + /* let stopnote in queue be ignored, + new stop note wins */ + stop_note_queue[i].ignore_ = true; + + /* don't replay start note, */ + play_start = false; + break; + } + else + { + /* skip this stopnote, + don't play the start note */ + note = 0; + break; + } } - - stop_notes.enter(note_l, stop); - Midi_note note(note_l, track_l_->number_i_, true); - output_event(note, ptr()->when()); + } + + if (note) + { + Midi_note_event e; + e.val = new Midi_note_off (note); + + midi_events_.push_back (e.val); + e.key = int (stop_ticks); + stop_note_queue.insert (e); + + if (play_start) + output_event (ptr->audio_column_->ticks (), note); + } } +void +Midi_walker::do_stop_notes (int max_ticks) +{ + while (stop_note_queue.size () && stop_note_queue.front ().key <= max_ticks) + { + Midi_note_event e = stop_note_queue.get (); + 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(Midi_item &i, Moment now) +Midi_walker::output_event (int now_ticks, Midi_item *l) { - Moment delta_t = now - last_moment_ ; - last_moment_ += delta_t; - track_l_->add(delta_t, &i ); + 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_ticks < 0) + { + programming_error ("Going back in MIDI time."); + delta_ticks = 0; + } + + track_->add (delta_ticks, l); } void -Midi_walker::process_requests() +Midi_walker::process () { - do_stop_notes(ptr()->when()); - for ( int i = 0; i < ptr()->musicalreq_l_arr_.size(); i++ ) { - - Rhythmic_req *n = ptr()->musicalreq_l_arr_[i]->rhythmic(); - if ( !n) - continue; - Note_req * note_l = n->note(); - if (!note_l) - continue; - do_start_note(note_l); - + Audio_item *audio = items_[index_]; + do_stop_notes (audio->audio_column_->ticks ()); + + if (Midi_item *midi = get_midi (audio)) + { + if (Midi_channel_item *mci = dynamic_cast (midi)) + mci->channel_ = channel_; + + if (Midi_note *note = dynamic_cast (midi)) + { + if (note->audio_->length_mom_.to_bool ()) + do_start_note (note); + } + else + output_event (audio->audio_column_->ticks (), midi); } } -Midi_walker::~Midi_walker() +Midi_item* +Midi_walker::get_midi (Audio_item *i) +{ + Midi_item *mi = Midi_item::get_midi (i); + midi_events_.push_back (mi); + return mi; +} + +bool +Midi_walker::ok () const +{ + return index_ < items_.size (); +} + +void +Midi_walker::operator ++ (int) { - do_stop_notes( last_moment_ + Moment(10,1)); // ugh + assert (ok ()); + index_++; }