lily/extender-engraver.cc

   1 /*
   2   extender-engraver.cc -- implement Extender_engraver
   3
   4   (c) 1998--1999 Jan Nieuwenhuizen <janneke@gnu.org>
   5 */
   6
   7 #include "proto.hh"
   8 #include "musical-request.hh"
   9 #include "extender-engraver.hh"
  10 #include "extender-spanner.hh"
  11 #include "text-def.hh"
  12 #include "score-column.hh"
  13 #include "g-text-item.hh"
  14
  15 ADD_THIS_TRANSLATOR (Extender_engraver);
  16
  17 Extender_engraver::Extender_engraver ()
  18 {
  19   extender_spanner_p_ = 0;
  20   req_l_ = 0;
  21 }
  22
  23 void
  24 Extender_engraver::acknowledge_element (Score_element_info i)
  25 {
  26   if (G_text_item* t = dynamic_cast<G_text_item*> (i.elem_l_))
  27     {
  28       Rhythmic_req * rh = dynamic_cast<Rhythmic_req*>  (i.req_l_);
  29       if (!rh)
  30         return;
  31
  32       now_lyrics_.push (Text_lyric_tuple (t, rh, now_mom () + rh->length_mom ()));
  33       /*
  34         UGH.  What do we do in case of multiple alternatives?
  35        */
  36       if (extender_spanner_p_
  37           && !extender_spanner_p_->spanned_drul_[RIGHT]
  38             )
  39           {
  40             extender_spanner_p_->set_textitem (RIGHT, t);
  41           }
  42     }
  43 }
  44
  45
  46 bool
  47 Extender_engraver::do_try_music (Music* req_l)
  48 {
  49   if (Extender_req* p = dynamic_cast <Extender_req *> (req_l))
  50     {
  51       if (req_l_)
  52         return false;
  53
  54       req_l_ = p;
  55       return true;
  56     }
  57   return false;
  58 }
  59
  60 void
  61 Extender_engraver::do_removal_processing ()
  62 {
  63   if (extender_spanner_p_)
  64     {
  65       req_l_->warning (_ ("unterminated extender"));
  66       extender_spanner_p_->set_bounds(RIGHT, get_staff_info ().command_l ());
  67     }
  68 }
  69
  70 void
  71 Extender_engraver::do_process_requests ()
  72 {
  73   Array<Text_lyric_tuple> stopped_texts;
  74   Moment now = now_mom ();
  75
  76   stopped_texts.clear ();
  77   while (past_lyrics_pq_.size ()
  78          && past_lyrics_pq_.front ().end_ == now)
  79     stopped_texts.push (past_lyrics_pq_.get ());
  80
  81   if (req_l_)
  82     {
  83       if (!stopped_texts.size ())
  84         {
  85           req_l_->warning ("Nothing to connect extender to on the left. Ignoring extender request");
  86           return;
  87         }
  88
  89       extender_spanner_p_ = new Extender_spanner;
  90       extender_spanner_p_->set_textitem  (LEFT, stopped_texts[0].text_l_);
  91       announce_element (Score_element_info (extender_spanner_p_, req_l_));
  92     }
  93 }
  94
  95
  96 void
  97 Extender_engraver::do_pre_move_processing ()
  98 {
  99   for (int i=0; i < now_lyrics_.size (); i++)
 100     {
 101       past_lyrics_pq_.insert (now_lyrics_[i]);
 102     }
 103   now_lyrics_.clear ();
 104
 105   if (extender_spanner_p_)
 106     {
 107       typeset_element (extender_spanner_p_);
 108       extender_spanner_p_ = 0;
 109     }
 110 }
 111 void
 112 Extender_engraver::do_post_move_processing ()
 113 {
 114   Moment now = now_mom ();
 115   while (past_lyrics_pq_.size () && past_lyrics_pq_.front ().end_ < now)
 116     past_lyrics_pq_.delmin ();
 117
 118   req_l_ =0;
 119 }
 120
 121 /**********************************************************************/
 122 Text_lyric_tuple::Text_lyric_tuple ()
 123 {
 124   text_l_ =0;
 125   req_l_ =0;
 126   end_ = 0;
 127 }
 128
 129 Text_lyric_tuple::Text_lyric_tuple (G_text_item *h, Rhythmic_req*m, Moment mom)
 130 {
 131   text_l_ = h;
 132   req_l_ = m;
 133   end_ = mom;
 134 }
 135
 136
 137 int
 138 Text_lyric_tuple::time_compare (Text_lyric_tuple const&h1,
 139                              Text_lyric_tuple const &h2)
 140 {
 141   return (h1.end_ - h2.end_ ).sign ();
 142 }