lily/script-column-engraver.cc

   1 /*
   2   g-script-column-engraver.cc --  implement Script_column_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9
  10 #include "engraver.hh"
  11 #include "script-column.hh"
  12 #include "item.hh"
  13 #include "side-position-interface.hh"
  14
  15 /**
  16    Find potentially colliding scripts, and put them in a
  17    Script_column, that will fix the collisions.  */
  18 class Script_column_engraver : public Engraver
  19 {
  20   Score_element *scol_p_;
  21   Link_array<Item> script_l_arr_;
  22
  23 public:
  24   Script_column_engraver ();
  25   VIRTUAL_COPY_CONS(Translator);
  26 protected:
  27   virtual void acknowledge_element (Score_element_info);
  28   virtual void process_acknowledged ();
  29   virtual void  do_pre_move_processing ();
  30   virtual void  do_post_move_processing ();
  31 };
  32
  33
  34 Script_column_engraver::Script_column_engraver()
  35 {
  36   scol_p_ =0;
  37 }
  38
  39 void
  40 Script_column_engraver::do_pre_move_processing ()
  41 {
  42   if (scol_p_)
  43     {
  44       typeset_element (scol_p_);
  45       scol_p_ =0;
  46     }
  47 }
  48
  49 void
  50 Script_column_engraver::do_post_move_processing ()
  51 {
  52   script_l_arr_.clear ();
  53
  54 }
  55
  56 void
  57 Script_column_engraver::acknowledge_element( Score_element_info inf)
  58 {
  59   if (Side_position::has_interface (inf.elem_l_)) // ugh FIXME
  60     {
  61       Item *thing = dynamic_cast<Item*> (inf.elem_l_);
  62       if (thing
  63           && !Item::breakable_b (thing)
  64           && Side_position::get_axis (inf.elem_l_) == Y_AXIS)
  65         {
  66           script_l_arr_.push (thing);
  67         }
  68     }
  69 }
  70
  71 void
  72 Script_column_engraver::process_acknowledged ()
  73 {
  74   if (!scol_p_ && script_l_arr_.size () > 1)
  75     {
  76       scol_p_ = new Item (get_property ("basicScriptColumnProperties"));
  77       scol_p_->set_elt_property ("scripts", SCM_EOL);
  78
  79       announce_element (scol_p_, 0);
  80     }
  81
  82   if (scol_p_)
  83     {
  84       for (int i=0; i < script_l_arr_.size (); i++)
  85         Script_column::add_staff_sided (scol_p_, script_l_arr_[i]);
  86       script_l_arr_.clear ();
  87     }
  88 }
  89 ADD_THIS_TRANSLATOR(Script_column_engraver);