lily/repeat-engraver.cc

   1 /*
   2   repeat-engraver.cc -- implement Repeat_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1998--1999 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "repeat-engraver.hh"
  10 #include "bar.hh"
  11 #include "bar-engraver.hh"
  12 #include "musical-request.hh"
  13 #include "multi-measure-rest.hh"
  14 #include "command-request.hh"
  15 #include "time-description.hh"
  16 #include "engraver-group.hh"
  17 #include "new-repeated-music.hh"
  18 #include "time-description.hh"
  19 #include "volta-spanner.hh"
  20 #include "note-column.hh"
  21 #include "paper-def.hh"
  22 #include "music-list.hh"
  23
  24 ADD_THIS_TRANSLATOR (Repeat_engraver);
  25
  26 /*
  27   Urg. Hairy.  Needs redesign?
  28  */
  29 bool
  30 Repeat_engraver::do_try_music (Music* m)
  31 {
  32   if (New_repeated_music* r = dynamic_cast<New_repeated_music *> (m))
  33     {
  34       Music_sequence* alt = r->alternatives_p_;
  35       Moment repeat_length_mom = r->repeat_body_p_->length_mom ();
  36       Moment stop_mom = now_mom () + repeat_length_mom;
  37       Moment alt_mom = now_mom () + repeat_length_mom;
  38       if (repeat_length_mom)
  39         {
  40           stop_mom += r->alternatives_length_mom ();
  41           repeated_music_arr_.push (r);
  42           stop_mom_arr_.push (stop_mom);
  43         }
  44
  45       /*
  46          Counting nested repeats, it seems safest to forbid
  47          two pieces of alternative music to start at the same time.
  48       */
  49       for (int i = 0; i < alternative_start_mom_arr_.size (); i++)
  50         if (alternative_start_mom_arr_[i] == alt_mom)
  51           return false;
  52
  53       /*
  54         Coda kludge: see input/test/coda-kludge.ly
  55        */
  56       Moment span_mom;
  57       Scalar prop = get_property ("voltaSpannerDuration", 0);
  58       if (prop.length_i ())
  59         span_mom = prop.to_rat ();
  60
  61       int alt_i = r->repeats_i_ + 1 - cons_list_size_i (alt->music_p_list_p_->head_ ) >? 1;
  62       for (Cons<Music> *i = alt->music_p_list_p_->head_; i ; i = i->next_)
  63         {
  64           alternative_music_arr_.push (i->car_);
  65           alternative_start_mom_arr_.push (alt_mom);
  66           if (span_mom)
  67             alternative_stop_mom_arr_.push (alt_mom + span_mom);
  68           else
  69             alternative_stop_mom_arr_.push (alt_mom + i->car_->length_mom ());
  70           String str;
  71           if ((alt_i != 1) && (alt_i != r->repeats_i_) && (i == alt->music_p_list_p_->head_))
  72             str = "1.-";
  73           str += to_str (alt_i) + ".";
  74           alt_i++;
  75           alternative_str_arr_.push (str);
  76           if (!dynamic_cast<Simultaneous_music *> (alt))
  77             alt_mom += i->car_->length_mom ();
  78         }
  79       return true;
  80     }
  81   return false;
  82 }
  83
  84 void
  85 Repeat_engraver::acknowledge_element (Score_element_info i)
  86 {
  87   Moment now = now_mom ();
  88   if (Note_column *c = dynamic_cast<Note_column *> (i.elem_l_))
  89     {
  90       for (int i = 0; i < volta_p_arr_.size (); i++)
  91         if (volta_p_arr_[i] && (now >= alternative_start_mom_arr_[i]))
  92           volta_p_arr_[i]->add_column (c);
  93     }
  94   if (Bar *c = dynamic_cast<Bar*> (i.elem_l_))
  95     {
  96       for (int i = 0; i < volta_p_arr_.size (); i++)
  97         if (volta_p_arr_[i] && (now >= alternative_start_mom_arr_[i]))
  98           volta_p_arr_[i]->add_column (c);
  99     }
 100 }
 101
 102 void
 103 Repeat_engraver::do_removal_processing ()
 104 {
 105   for (int i = 0; i < volta_p_arr_.size (); i++)
 106     if (volta_p_arr_[i])
 107       typeset_element (volta_p_arr_[i]);
 108 }
 109
 110 void
 111 Repeat_engraver::do_process_requests ()
 112 {
 113   Moment now = now_mom ();
 114   Bar_engraver* bar_engraver_l = dynamic_cast <Bar_engraver*>
 115     (daddy_grav_l ()->get_simple_translator ("Bar_engraver"));
 116   for (int i = bar_b_arr_.size (); i < repeated_music_arr_.size (); i++)
 117     {
 118       if (bar_engraver_l)
 119         bar_engraver_l->request_bar ("|:");
 120       bar_b_arr_.push (true);
 121     }
 122   for (int i = 0; i < bar_b_arr_.size (); i++)
 123     {
 124       if (!bar_b_arr_[i] && (now >= stop_mom_arr_[i]))
 125         {
 126           if (bar_engraver_l)
 127             bar_engraver_l->request_bar (":|");
 128         }
 129     }
 130   for (int i = volta_p_arr_.size (); i < alternative_music_arr_.size (); i++)
 131     {
 132       Volta_spanner* v = new Volta_spanner;
 133       Scalar prop = get_property ("voltaVisibility", 0);
 134       if (!prop.to_bool ())
 135         v->set_elt_property (transparent_scm_sym, SCM_BOOL_T);
 136       prop = get_property ("voltaSpannerDuration", 0);
 137       if ((i == alternative_music_arr_.size () - 1) || prop.length_i ())
 138         v->last_b_ = true;
 139
 140       v->number_str_ = alternative_str_arr_[i];
 141       volta_p_arr_.push (v);
 142       announce_element (Score_element_info (v, alternative_music_arr_[i]));
 143     }
 144 }
 145
 146 void
 147 Repeat_engraver::do_pre_move_processing ()
 148 {
 149   Moment now = now_mom ();
 150   for (int i = bar_b_arr_.size (); i--; )
 151     {
 152       if (bar_b_arr_[i])
 153         bar_b_arr_[i] = false;
 154       if (now >= stop_mom_arr_[i])
 155         {
 156           bar_b_arr_.del (i);
 157           stop_mom_arr_.del (i);
 158           repeated_music_arr_.del (i);
 159         }
 160     }
 161   for (int i = volta_p_arr_.size (); i--; )
 162     {
 163       if (volta_p_arr_[i] && (now >= alternative_stop_mom_arr_[i])
 164           && (volta_p_arr_[i]->column_arr_.size () >= 1))
 165         {
 166           typeset_element (volta_p_arr_[i]);
 167           volta_p_arr_[i] = 0;
 168           volta_p_arr_.del (i);
 169           alternative_music_arr_[i] = 0;
 170           alternative_music_arr_.del (i);
 171           alternative_start_mom_arr_.del (i);
 172           alternative_stop_mom_arr_.del (i);
 173           alternative_str_arr_.del (i);
 174         }
 175     }
 176 }