2 This file is part of LilyPond, the GNU music typesetter.
4 Copyright (C) 2011 Mike Solomon <mike@apollinemike.com>
6 LilyPond is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation, either version 3 of the License, or
9 (at your option) any later version.
11 LilyPond is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
21 #include "engraver.hh"
23 #include "note-head.hh"
24 #include "pointer-group-interface.hh"
26 class Beam_collision_engraver : public Engraver
29 vector<Grob *> active_beams_;
30 vector<Grob *> signaled_beams_;
31 vector<Grob *> end_beams_;
32 vector<Grob *> covered_grobs_;
33 vector<Grob *> covered_interior_grobs_;
35 DECLARE_ACKNOWLEDGER (note_head);
36 DECLARE_ACKNOWLEDGER (accidental);
37 DECLARE_ACKNOWLEDGER (clef);
38 DECLARE_ACKNOWLEDGER (key_signature);
39 DECLARE_ACKNOWLEDGER (time_signature);
40 DECLARE_ACKNOWLEDGER (bar_line);
41 DECLARE_ACKNOWLEDGER (beam);
42 DECLARE_END_ACKNOWLEDGER (beam);
43 void stop_translation_timestep ();
45 TRANSLATOR_DECLARATIONS (Beam_collision_engraver);
49 Beam_collision_engraver::stop_translation_timestep ()
51 for (vsize i = 0; i < covered_interior_grobs_.size (); i++)
52 for (vsize j = 0; j < active_beams_.size (); j++)
53 Pointer_group_interface::add_grob (active_beams_[j], ly_symbol2scm ("covered-grobs"), covered_interior_grobs_[i]);
55 covered_interior_grobs_.clear ();
57 for (vsize i = 0; i < active_beams_.size (); i++)
58 for (vsize j = 0; j < signaled_beams_.size (); j++)
59 if (active_beams_[i] == signaled_beams_[j])
61 signaled_beams_.erase (signaled_beams_.begin () + j);
67 in auto beaming, end beams are signaled with their beams at a later timestep.
68 we need to scrub these.
70 for (vsize i = 0; i < end_beams_.size (); i++)
71 for (vsize j = 0; j < signaled_beams_.size (); j++)
72 if (end_beams_[i] == signaled_beams_[j])
74 signaled_beams_.erase (signaled_beams_.begin () + j);
78 for (vsize i = 0; i < signaled_beams_.size (); i++)
79 active_beams_.push_back (signaled_beams_[i]);
81 signaled_beams_.clear ();
83 for (vsize i = 0; i < covered_grobs_.size (); i++)
84 for (vsize j = 0; j < active_beams_.size (); j++)
86 Grob *g = covered_grobs_[i];
87 if (Grob *stem = unsmob_grob (g->get_object ("stem")))
88 if (Grob *beam = unsmob_grob (stem->get_object ("beam")))
89 if (beam == active_beams_[j])
92 Pointer_group_interface::add_grob (active_beams_[j], ly_symbol2scm ("covered-grobs"), g);
95 covered_grobs_.clear ();
97 for (vsize i = 0; i < end_beams_.size (); i++)
98 for (vsize j = 0; j < active_beams_.size (); j++)
99 if (end_beams_[i] == active_beams_[j])
101 active_beams_.erase (active_beams_.begin () + j);
108 Beam_collision_engraver::Beam_collision_engraver () {}
111 Beam_collision_engraver::acknowledge_note_head (Grob_info i)
113 covered_grobs_.push_back (i.grob ());
117 Beam_collision_engraver::acknowledge_accidental (Grob_info i)
119 covered_grobs_.push_back (i.grob ());
123 Beam_collision_engraver::acknowledge_bar_line (Grob_info i)
125 covered_interior_grobs_.push_back (i.grob ());
129 Beam_collision_engraver::acknowledge_clef (Grob_info i)
131 covered_interior_grobs_.push_back (i.grob ());
135 Beam_collision_engraver::acknowledge_key_signature (Grob_info i)
137 covered_interior_grobs_.push_back (i.grob ());
141 Beam_collision_engraver::acknowledge_time_signature (Grob_info i)
143 covered_interior_grobs_.push_back (i.grob ());
147 Beam_collision_engraver::acknowledge_beam (Grob_info i)
149 signaled_beams_.push_back (i.grob ());
153 Beam_collision_engraver::acknowledge_end_beam (Grob_info i)
155 end_beams_.push_back (i.grob ());
158 #include "translator.icc"
160 ADD_ACKNOWLEDGER (Beam_collision_engraver, note_head);
161 ADD_ACKNOWLEDGER (Beam_collision_engraver, accidental);
162 ADD_ACKNOWLEDGER (Beam_collision_engraver, clef);
163 ADD_ACKNOWLEDGER (Beam_collision_engraver, key_signature);
164 ADD_ACKNOWLEDGER (Beam_collision_engraver, time_signature);
165 ADD_ACKNOWLEDGER (Beam_collision_engraver, beam);
166 ADD_ACKNOWLEDGER (Beam_collision_engraver, bar_line);
167 ADD_END_ACKNOWLEDGER (Beam_collision_engraver, beam);
169 ADD_TRANSLATOR (Beam_collision_engraver,
171 "Help beams avoid colliding with notes and clefs in other voices.",