lily/extender-engraver.cc

   1 /*
   2   extender-engraver.cc -- implement Extender_engraver
   3
   4   (c) 1999 Glen Prideaux <glenprideaux@iname.com>,
   5   Han-Wen Nienhuys, Jan Nieuwenhuizen.
   6
   7 */
   8
   9 #include "proto.hh"
  10 #include "musical-request.hh"
  11 #include "extender-engraver.hh"
  12 #include "extender-spanner.hh"
  13 #include "paper-column.hh"
  14 #include "text-item.hh"
  15 #include "extender-engraver.hh"
  16
  17 ADD_THIS_TRANSLATOR (Extender_engraver);
  18
  19 Extender_engraver::Extender_engraver ()
  20 {
  21   current_lyric_l_ = 0;
  22   last_lyric_l_ = 0;
  23   extender_spanner_p_ = 0;
  24   req_l_ = 0;
  25 }
  26
  27 void
  28 Extender_engraver::acknowledge_element (Score_element_info i)
  29 {
  30   if (Text_item* t = dynamic_cast<Text_item*> (i.elem_l_))
  31     {
  32       current_lyric_l_ = t;
  33       if (extender_spanner_p_
  34           && !extender_spanner_p_->get_bound (RIGHT)
  35             )
  36           {
  37             extender_spanner_p_->set_textitem (RIGHT, t);
  38           }
  39     }
  40 }
  41
  42
  43 bool
  44 Extender_engraver::do_try_music (Music* r)
  45 {
  46   if (Extender_req* p = dynamic_cast <Extender_req *> (r))
  47     {
  48       if (req_l_)
  49         return false;
  50
  51       req_l_ = p;
  52       return true;
  53     }
  54   return false;
  55 }
  56
  57 void
  58 Extender_engraver::do_removal_processing ()
  59 {
  60   if (extender_spanner_p_)
  61     {
  62       req_l_->warning (_ ("unterminated extender"));
  63       extender_spanner_p_->set_bound(RIGHT, get_staff_info ().command_pcol_l ());
  64     }
  65 }
  66
  67 void
  68 Extender_engraver::do_process_music ()
  69 {
  70   if (req_l_)
  71     {
  72       if (!last_lyric_l_)
  73         {
  74           req_l_->warning (_ ("Nothing to connect extender to on the left.  Ignoring extender request."));
  75           return;
  76         }
  77
  78       extender_spanner_p_ = new Extender_spanner (SCM_EOL);
  79       extender_spanner_p_->set_textitem  (LEFT, last_lyric_l_);
  80       announce_element (Score_element_info (extender_spanner_p_, req_l_));
  81     }
  82 }
  83
  84
  85 void
  86 Extender_engraver::do_pre_move_processing ()
  87 {
  88   if (extender_spanner_p_)
  89     {
  90       typeset_element (extender_spanner_p_);
  91       extender_spanner_p_ = 0;
  92     }
  93
  94   if (current_lyric_l_)
  95     {
  96       last_lyric_l_ = current_lyric_l_;
  97       current_lyric_l_ =0;
  98     }
  99 }
 100
 101 void
 102 Extender_engraver::do_post_move_processing ()
 103 {
 104   req_l_ = 0;
 105 }
 106
 107