2 midi-walker.cc -- implement Midi_walker
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
7 Jan Nieuwenhuizen <janneke@gnu.org>
10 #include "midi-walker.hh"
12 #include "audio-column.hh"
13 #include "audio-staff.hh"
14 #include "midi-item.hh"
15 #include "midi-chunk.hh"
16 #include "midi-stream.hh"
19 Midi_note_event::Midi_note_event ()
25 compare (Midi_note_event const &left, Midi_note_event const &right)
27 Moment m = (left.key - right.key);
38 audio_item_less (Audio_item * const a,
41 return a->get_column ()->when_ < b->get_column ()->when_;
44 Midi_walker::Midi_walker (Audio_staff *audio_staff, Midi_track *track,
50 items_ = audio_staff->audio_items_;
51 vector_sort (items_, audio_item_less);
55 Midi_walker::~Midi_walker ()
57 junk_pointers (midi_events_);
61 Midi_walker::finalize ()
63 do_stop_notes (INT_MAX);
67 Find out if start_note event is needed, and do it if needed.
70 Midi_walker::do_start_note (Midi_note *note)
72 Audio_item *ptr = items_[index_];
73 int stop_ticks = int (moment_to_real (note->audio_->length_mom_) * Real (384 * 4))
74 + ptr->audio_column_->ticks ();
76 bool play_start = true;
77 for (vsize i = 0; i < stop_note_queue.size (); i++)
79 /* if this pith already in queue */
80 if (stop_note_queue[i].val->get_semitone_pitch ()
81 == note->get_semitone_pitch ())
83 if (stop_note_queue[i].key < stop_ticks)
85 /* let stopnote in queue be ignored,
87 stop_note_queue[i].ignore_ = true;
89 /* don't replay start note, */
95 /* skip this stopnote,
96 don't play the start note */
106 e.val = new Midi_note_off (note);
108 midi_events_.push_back (e.val);
109 e.key = int (stop_ticks);
110 stop_note_queue.insert (e);
113 output_event (ptr->audio_column_->ticks (), note);
118 Output note events for all notes which end before #max_mom#
121 Midi_walker::do_stop_notes (int max_ticks)
123 while (stop_note_queue.size () && stop_note_queue.front ().key <= max_ticks)
125 Midi_note_event e = stop_note_queue.get ();
131 int stop_ticks = e.key;
132 Midi_note *note = e.val;
134 output_event (stop_ticks, note);
139 Midi_walker::output_event (int now_ticks, Midi_item *l)
141 int delta_ticks = now_ticks - last_tick_;
142 last_tick_ = now_ticks;
145 this is not correct, but at least it doesn't crash when you
150 programming_error ("Going back in MIDI time.");
154 track_->add (delta_ticks, l);
158 Midi_walker::process ()
160 Audio_item *audio = items_[index_];
161 do_stop_notes (audio->audio_column_->ticks ());
163 if (Midi_item *midi = get_midi (audio))
165 if (Midi_channel_item *mci = dynamic_cast<Midi_channel_item*> (midi))
166 mci->channel_ = channel_;
168 if (Midi_note *note = dynamic_cast<Midi_note *> (midi))
170 if (note->audio_->length_mom_.to_bool ())
171 do_start_note (note);
174 output_event (audio->audio_column_->ticks (), midi);
179 Midi_walker::get_midi (Audio_item *i)
181 Midi_item *mi = Midi_item::get_midi (i);
182 midi_events_.push_back (mi);
187 Midi_walker::ok () const
189 return index_ < items_.size ();
193 Midi_walker::operator ++ (int)