X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmidi-walker.cc;h=b97630b0d147ed8ebc05d63c111b8928c3667cad;hb=f3359a43fe1cec979090721f07af6c7cbc7f8e0c;hp=8cf348d9f7d7e45c6416b62bbea69d04db2b4f23;hpb=06808d259c01da500d09bef741ec99a7cadf95f9;p=lilypond.git diff --git a/lily/midi-walker.cc b/lily/midi-walker.cc index 8cf348d9f7..b97630b0d1 100644 --- a/lily/midi-walker.cc +++ b/lily/midi-walker.cc @@ -1,137 +1,220 @@ /* - 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--2012 Han-Wen Nienhuys + Jan Nieuwenhuizen - (c) 1997 Han-Wen Nienhuys , Jan Nieuwenhuizen - - TODO + 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. - Ideally this should also use a register system, to process slurs, - dynamics, etc. - -*/ + 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. -/* reincluded for code jatting */ -#if 0 + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . +*/ -#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) +{ + track_ = track; + index_ = 0; + items_ = audio_staff->audio_items_; + vector_sort (items_, audio_item_less); + last_tick_ = 0; + percussion_ = audio_staff->percussion_; + merge_unisons_ = audio_staff->merge_unisons_; +} + +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; - } - else - return; // skip the stop 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 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; + } + } } - 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 = stop_ticks; + stop_note_queue.insert (e); + + output_event (now_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++ ) { - Musical_req *m = ptr()->musicalreq_l_arr_[i]->musical(); - if (!m) - return; - Rhythmic_req *n = m->rhythmic(); - if ( !n) - continue; - Note_req * note_l = n->note(); - if (!note_l) - continue; - do_start_note(note_l); - } + track_->add (delta_ticks, l); } -Midi_walker::~Midi_walker() +void +Midi_walker::process () { - do_stop_notes( last_moment_ + Moment(10,1)); // ugh + Audio_item *audio = items_[index_]; + Audio_column *col = audio->get_column (); + do_stop_notes (col->ticks ()); + + if (Midi_item *midi = get_midi (audio)) + { + 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_item * +Midi_walker::get_midi (Audio_item *i) +{ + Midi_item *mi = Midi_item::get_midi (i); -int -compare(Note_event const&e1, Note_event const&e2) + 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 sign(e1.key - e2.key); + return index_ < items_.size (); } -#endif +void +Midi_walker::operator ++(int) +{ + assert (ok ()); + index_++; +}