lily/beam-collision-engraver.cc

   1 /*
   2   This file is part of LilyPond, the GNU music typesetter.
   3
   4   Copyright (C) 2011 Mike Solomon <mike@apollinemike.com>
   5
   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.
  10
  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.
  15
  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/>.
  18 */
  19
  20 #include "beam.hh"
  21 #include "engraver.hh"
  22 #include "item.hh"
  23 #include "note-head.hh"
  24 #include "pointer-group-interface.hh"
  25
  26 class Beam_collision_engraver : public Engraver
  27 {
  28 protected:
  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_;
  34
  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 (beam);
  41   DECLARE_END_ACKNOWLEDGER (beam);
  42   void stop_translation_timestep ();
  43 public:
  44   TRANSLATOR_DECLARATIONS (Beam_collision_engraver);
  45 };
  46
  47 void
  48 Beam_collision_engraver::stop_translation_timestep ()
  49 {
  50   for (vsize i = 0; i < covered_interior_grobs_.size (); i++)
  51     for (vsize j = 0; j < active_beams_.size (); j++)
  52       Pointer_group_interface::add_grob (active_beams_[j], ly_symbol2scm ("covered-grobs"), covered_interior_grobs_[i]);
  53
  54   covered_interior_grobs_.clear ();
  55
  56   for (vsize i = 0; i < active_beams_.size (); i++)
  57     for (vsize j = 0; j < signaled_beams_.size (); j++)
  58       if (active_beams_[i] == signaled_beams_[j])
  59         {
  60           signaled_beams_.erase (signaled_beams_.begin () + j);
  61           break;
  62         }
  63
  64   /*
  65     hack.
  66     in auto beaming, end beams are signaled with their beams at a later timestep.
  67     we need to scrub these.
  68   */
  69   for (vsize i = 0; i < end_beams_.size (); i++)
  70     for (vsize j = 0; j < signaled_beams_.size (); j++)
  71       if (end_beams_[i] == signaled_beams_[j])
  72         {
  73           signaled_beams_.erase (signaled_beams_.begin () + j);
  74           break;
  75         }
  76
  77   for (vsize i=0; i < signaled_beams_.size (); i++)
  78     active_beams_.push_back (signaled_beams_[i]);
  79
  80   for (vsize i = 0; i < covered_grobs_.size (); i++)
  81     for (vsize j = 0; j < active_beams_.size (); j++)
  82       {
  83         bool my_beam = false;
  84         if (Grob *stem = unsmob_grob (covered_grobs_[i]->get_object ("stem")))
  85           if (Grob *beam = unsmob_grob (stem->get_object ("beam")))
  86             if (beam == active_beams_.at (j))
  87               my_beam = true;
  88         if (!my_beam)
  89           Pointer_group_interface::add_grob (active_beams_.at (j), ly_symbol2scm ("covered-grobs"), covered_grobs_[i]);
  90       }
  91
  92   covered_grobs_.clear ();
  93
  94   for (vsize i = 0; i < signaled_beams_.size (); i++)
  95     for (vsize j = 0; j < active_beams_.size (); j++)
  96       {
  97         Grob *g = signaled_beams_[i];
  98         if (g == active_beams_[j])
  99           continue;
 100
 101         Pointer_group_interface::add_grob (active_beams_[j], ly_symbol2scm ("covered-grobs"), g);
 102       }
 103
 104   signaled_beams_.clear ();
 105
 106   for (vsize i = 0; i < end_beams_.size (); i++)
 107     for (vsize j = 0; j < active_beams_.size (); j++)
 108       if (end_beams_[i] == active_beams_[j])
 109         {
 110           active_beams_.erase (active_beams_.begin () + j);
 111           break;
 112         }
 113
 114   end_beams_.clear ();
 115 }
 116
 117 Beam_collision_engraver::Beam_collision_engraver () {}
 118
 119 void
 120 Beam_collision_engraver::acknowledge_note_head (Grob_info i)
 121 {
 122   covered_grobs_.push_back (i.grob ());
 123 }
 124
 125 void
 126 Beam_collision_engraver::acknowledge_accidental (Grob_info i)
 127 {
 128   covered_grobs_.push_back (i.grob ());
 129 }
 130
 131 void
 132 Beam_collision_engraver::acknowledge_clef (Grob_info i)
 133 {
 134   covered_interior_grobs_.push_back (i.grob ());
 135 }
 136
 137 void
 138 Beam_collision_engraver::acknowledge_key_signature (Grob_info i)
 139 {
 140   covered_interior_grobs_.push_back (i.grob ());
 141 }
 142
 143 void
 144 Beam_collision_engraver::acknowledge_time_signature (Grob_info i)
 145 {
 146   covered_interior_grobs_.push_back (i.grob ());
 147 }
 148
 149 void
 150 Beam_collision_engraver::acknowledge_beam (Grob_info i)
 151 {
 152   signaled_beams_.push_back (i.grob ());
 153 }
 154
 155 void
 156 Beam_collision_engraver::acknowledge_end_beam (Grob_info i)
 157 {
 158   end_beams_.push_back (i.grob ());
 159 }
 160
 161 #include "translator.icc"
 162
 163 ADD_ACKNOWLEDGER (Beam_collision_engraver, note_head);
 164 ADD_ACKNOWLEDGER (Beam_collision_engraver, accidental);
 165 ADD_ACKNOWLEDGER (Beam_collision_engraver, clef);
 166 ADD_ACKNOWLEDGER (Beam_collision_engraver, key_signature);
 167 ADD_ACKNOWLEDGER (Beam_collision_engraver, time_signature);
 168 ADD_ACKNOWLEDGER (Beam_collision_engraver, beam);
 169 ADD_END_ACKNOWLEDGER (Beam_collision_engraver, beam);
 170
 171 ADD_TRANSLATOR (Beam_collision_engraver,
 172                 /* doc */
 173                 "Help beams avoid colliding with notes and clefs in other voices.",
 174
 175                 /* create */
 176                 "",
 177
 178                 /* read */
 179                 "",
 180
 181                 /* write */
 182                 ""
 183                 );