X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmidi-walker.cc;h=97a70252b385fb33fd69511088ba18ff78d4513c;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=f8b3de1738690b7e107c76924ba72c116ab62dbd;hpb=04f01c7e890bd4f1b358378e5911fb7c117c3802;p=lilypond.git diff --git a/lily/midi-walker.cc b/lily/midi-walker.cc index f8b3de1738..97a70252b3 100644 --- a/lily/midi-walker.cc +++ b/lily/midi-walker.cc @@ -3,127 +3,193 @@ source file of the GNU LilyPond music typesetter - (c) 1997 Han-Wen Nienhuys , Jan Nieuwenhuizen - - TODO - - Ideally this should also use a register system, to process slurs, - dynamics, etc. - + (c) 1997--2008 Han-Wen Nienhuys + Jan Nieuwenhuizen */ -#include "command-request.hh" -#include "musical-request.hh" -#include "p-score.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().key <= max_moment) { - Note_event ent=stop_notes.get(); - if (ent.ignore_b_) - continue; - - Moment stop_moment = ent.key; - Melodic_req * req_l = ent.val; - - 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[i].val->melodic()->pitch() == - note_l->pitch()) { - if ( stop_notes[i].key < stop){ - stop_notes[i].ignore_b_=true; + 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; } - else - return; // skip the stop note } } - Note_event e; - e.val = note_l; - e.key = stop; - - stop_notes.insert(e); - - 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); + } +} -/** advance the track to #now#, output the item, and adjust current - "moment". */ void -Midi_walker::output_event(Midi_item &i, Moment now) +Midi_walker::do_stop_notes (int max_ticks) { - Moment delta_t = now - last_moment_ ; - last_moment_ += delta_t; - track_l_->add(delta_t, &i ); + 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); + } } void -Midi_walker::process_requests() +Midi_walker::output_event (int now_ticks, Midi_item *l) { - do_stop_notes(ptr()->when()); - - for ( int i = 0; i < ptr()->commandreq_l_arr_.size(); i++ ) { - Command_req *c_l = ptr()->commandreq_l_arr_[i]->command(); - Meter_change_req* meter_l = c_l->meterchange(); - if ( meter_l ) - output_event( Midi_time( meter_l->beats_i_, meter_l->one_beat_i_, 18 ), ptr()->when() ); - Key_change_req* key_l = c_l->keychange(); - if ( key_l ) { - int sharps_i = key_l->sharps_i(); - int flats_i = key_l->flats_i(); - // midi cannot handle non-conventional keys - if ( !( flats_i && sharps_i ) ) - output_event( Midi_key( sharps_i - flats_i, key_l->minor_b() ), ptr()->when() ); - } + 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; } - 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); + track_->add (delta_ticks, l); +} + +void +Midi_walker::process () +{ + 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) { - do_stop_notes( last_moment_ + Moment(10,1)); // ugh + Midi_item *mi = Midi_item::get_midi (i); + midi_events_.push_back (mi); + return mi; } +bool +Midi_walker::ok () const +{ + return index_ < items_.size (); +} -int -compare(Note_event const&e1, Note_event const&e2) +void +Midi_walker::operator ++ (int) { - return sign(e1.key - e2.key); + assert (ok ()); + index_++; }