2 This file is part of LilyPond, the GNU music typesetter.
4 Copyright (C) 1997--2011 Han-Wen Nienhuys <hanwen@xs4all.nl>
5 Jan Nieuwenhuizen <janneke@gnu.org>
7 LilyPond is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
12 LilyPond is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
21 #include "midi-walker.hh"
23 #include "audio-column.hh"
24 #include "audio-staff.hh"
25 #include "midi-item.hh"
26 #include "midi-chunk.hh"
27 #include "midi-stream.hh"
30 Midi_note_event::Midi_note_event ()
36 compare (Midi_note_event
const &left
, Midi_note_event
const &right
)
38 Moment m
= (left
.key
- right
.key
);
49 audio_item_less (Audio_item
* const a
,
52 return a
->get_column ()->when_
< b
->get_column ()->when_
;
55 Midi_walker::Midi_walker (Audio_staff
*audio_staff
, Midi_track
*track
)
59 items_
= audio_staff
->audio_items_
;
60 vector_sort (items_
, audio_item_less
);
62 percussion_
= audio_staff
->percussion_
;
65 Midi_walker::~Midi_walker ()
67 junk_pointers (midi_events_
);
71 Midi_walker::finalize ()
73 do_stop_notes (INT_MAX
);
77 Find out if start_note event is needed, and do it if needed.
80 Midi_walker::do_start_note (Midi_note
*note
)
82 Audio_item
*ptr
= items_
[index_
];
83 assert (note
->audio_
== ptr
);
84 int stop_ticks
= int (moment_to_real (note
->audio_
->length_mom_
) * Real (384 * 4))
85 + ptr
->audio_column_
->ticks ();
87 bool play_start
= true;
88 for (vsize i
= 0; i
< stop_note_queue
.size (); i
++)
90 /* if this pith already in queue */
91 if (stop_note_queue
[i
].val
->get_semitone_pitch ()
92 == note
->get_semitone_pitch ())
94 if (stop_note_queue
[i
].key
< stop_ticks
)
96 /* let stopnote in queue be ignored,
98 stop_note_queue
[i
].ignore_
= true;
100 /* don't replay start note, */
106 /* skip this stopnote,
107 don't play the start note */
117 e
.val
= new Midi_note_off (note
);
119 midi_events_
.push_back (e
.val
);
120 e
.key
= int (stop_ticks
);
121 stop_note_queue
.insert (e
);
124 output_event (ptr
->audio_column_
->ticks (), note
);
129 Midi_walker::do_stop_notes (int max_ticks
)
131 while (stop_note_queue
.size () && stop_note_queue
.front ().key
<= max_ticks
)
133 Midi_note_event e
= stop_note_queue
.get ();
139 int stop_ticks
= e
.key
;
140 Midi_note
*note
= e
.val
;
142 output_event (stop_ticks
, note
);
147 Midi_walker::output_event (int now_ticks
, Midi_item
*l
)
149 int delta_ticks
= now_ticks
- last_tick_
;
150 last_tick_
= now_ticks
;
153 this is not correct, but at least it doesn't crash when you
158 programming_error ("Going back in MIDI time.");
162 track_
->add (delta_ticks
, l
);
166 Midi_walker::process ()
168 Audio_item
*audio
= items_
[index_
];
169 do_stop_notes (audio
->audio_column_
->ticks ());
171 if (Midi_item
*midi
= get_midi (audio
))
173 if (Midi_note
*note
= dynamic_cast<Midi_note
*> (midi
))
175 if (note
->audio_
->length_mom_
.to_bool ())
176 do_start_note (note
);
179 output_event (audio
->audio_column_
->ticks (), midi
);
184 Midi_walker::get_midi (Audio_item
*i
)
186 Midi_item
*mi
= Midi_item::get_midi (i
);
189 if (Midi_channel_item
*mci
= dynamic_cast<Midi_channel_item
*> (mi
))
192 midi_events_
.push_back (mi
);
197 Midi_walker::ok () const
199 return index_
< items_
.size ();
203 Midi_walker::operator ++ (int)