lily/multi-measure-rest-engraver.cc

   1 /*
   2   multi_measure_rest-engraver.cc -- implement Multi_measure_rest_engraver
   3
   4   (c) 1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
   5        Han-Wen Nienhuys <hanwen@cs.uu.nl>
   6 */
   7
   8 #include "proto.hh"
   9 #include "musical-request.hh"
  10 #include "multi-measure-rest.hh"
  11 #include "paper-column.hh"
  12 #include "engraver-group-engraver.hh"
  13 #include "bar.hh"
  14 #include "staff-symbol-referencer.hh"
  15 #include "engraver.hh"
  16 #include "moment.hh"
  17
  18 /**
  19    The name says it all: make multi measure rests
  20  */
  21 class Multi_measure_rest_engraver : public Engraver
  22 {
  23 public:
  24   VIRTUAL_COPY_CONS(Translator);
  25   Multi_measure_rest_engraver ();
  26
  27 protected:
  28   virtual void acknowledge_element (Score_element_info i);
  29   virtual void do_process_music ();
  30   virtual bool do_try_music (Music*);
  31   virtual void do_pre_move_processing ();
  32   virtual void do_post_move_processing ();
  33   virtual void do_removal_processing ();
  34 private:
  35   Span_req * new_req_l_;
  36   Span_req * busy_span_req_l_;
  37   Span_req * stop_req_l_;
  38   int start_measure_i_;
  39   Moment start_moment_;
  40
  41   Multi_measure_rest *mmrest_p_;
  42   Multi_measure_rest *lastrest_p_;
  43 };
  44
  45 ADD_THIS_TRANSLATOR (Multi_measure_rest_engraver);
  46
  47 Multi_measure_rest_engraver::Multi_measure_rest_engraver ()
  48 {
  49   start_measure_i_ = 0;
  50   mmrest_p_  = lastrest_p_ =0;
  51   new_req_l_ = busy_span_req_l_ = stop_req_l_ =0;
  52 }
  53
  54 void
  55 Multi_measure_rest_engraver::acknowledge_element (Score_element_info i)
  56 {
  57   if (Bar *c = dynamic_cast<Bar*> (i.elem_l_))
  58     {
  59       if (mmrest_p_)
  60         Multi_measure_rest::add_column (mmrest_p_,c);
  61       if (lastrest_p_)
  62         Multi_measure_rest::add_column (mmrest_p_,c);
  63     }
  64 }
  65
  66 bool
  67 Multi_measure_rest_engraver::do_try_music (Music* req_l)
  68 {
  69   if (Span_req * sp = dynamic_cast<Span_req*> (req_l))
  70     {
  71       if (sp->span_type_str_ == "rest")
  72         {
  73           if (sp->span_dir_ == STOP)
  74             {
  75               stop_req_l_ = sp;
  76             }
  77           else if (sp->span_dir_ == START && !new_req_l_)
  78             {
  79               new_req_l_ = sp;
  80             }
  81           return true;
  82         }
  83     }
  84   return false;
  85 }
  86
  87
  88
  89 void
  90 Multi_measure_rest_engraver::do_process_music ()
  91 {
  92   if (new_req_l_ && stop_req_l_)
  93     stop_req_l_ = 0;
  94
  95   if (new_req_l_)
  96     start_moment_ = now_mom ();
  97
  98   if (stop_req_l_)
  99     {
 100       busy_span_req_l_ =0;
 101       stop_req_l_ = 0;
 102     }
 103
 104   if (new_req_l_)
 105     {
 106       busy_span_req_l_ = new_req_l_;
 107       new_req_l_ =0;
 108     }
 109
 110   if (busy_span_req_l_ && !mmrest_p_)
 111     {
 112       mmrest_p_ = new Multi_measure_rest (get_property ("basicMultiMeasureRestProperties"));
 113       Multi_measure_rest::set_interface (mmrest_p_);
 114       Staff_symbol_referencer_interface::set_interface (mmrest_p_);
 115
 116       announce_element (Score_element_info (mmrest_p_, busy_span_req_l_));
 117       start_measure_i_
 118         = gh_scm2int (get_property ("currentBarNumber"));
 119     }
 120 }
 121
 122 void
 123 Multi_measure_rest_engraver::do_pre_move_processing ()
 124 {
 125   SCM smp = get_property ("measurePosition");
 126   Moment mp =  (unsmob_moment (smp)) ? *unsmob_moment (smp) : Moment (0);
 127
 128   if (mmrest_p_ && (now_mom () >= start_moment_)
 129     && !mp
 130     && (scm_ilength (mmrest_p_->get_elt_pointer ("columns")) >= 2))
 131     {
 132       typeset_element (mmrest_p_);
 133       /*
 134         must keep mmrest_p_ around to set measures_i_
 135        */
 136     }
 137   if (lastrest_p_)
 138     {
 139       typeset_element (lastrest_p_);
 140       lastrest_p_ = 0;
 141     }
 142
 143   if (new_req_l_)
 144     {
 145       busy_span_req_l_ = new_req_l_;
 146       new_req_l_ =0;
 147     }
 148
 149 }
 150
 151 void
 152 Multi_measure_rest_engraver::do_post_move_processing ()
 153 {
 154   Moment now (now_mom ());
 155
 156
 157   SCM smp = get_property ("measurePosition");
 158   Moment mp =  (unsmob_moment (smp)) ? *unsmob_moment (smp) : Moment (0);
 159
 160   if (mmrest_p_ && !mp)
 161     {
 162       lastrest_p_ = mmrest_p_;
 163       int cur = gh_scm2int (get_property ("currentBarNumber"));
 164       lastrest_p_->set_elt_property ("measure-count",
 165                                      gh_int2scm (cur - start_measure_i_));
 166       mmrest_p_ = 0;
 167     }
 168 }
 169
 170
 171 void
 172 Multi_measure_rest_engraver::do_removal_processing ()
 173 {
 174   if (mmrest_p_)
 175     typeset_element (mmrest_p_);
 176   if (lastrest_p_)
 177     typeset_element (lastrest_p_);
 178 }