lily/multi-measure-rest-engraver.cc

   1 /*
   2   multi_measure_rest-engraver.cc -- implement Multi_measure_rest_engraver
   3
   4   (c) 1998--1999 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 "multi-measure-rest-engraver.hh"
  12 #include "paper-column.hh"
  13 #include "engraver-group-engraver.hh"
  14 #include "timing-translator.hh"
  15 #include "bar.hh"
  16 #include "staff-symbol-referencer.hh"
  17
  18 ADD_THIS_TRANSLATOR (Multi_measure_rest_engraver);
  19
  20 Multi_measure_rest_engraver::Multi_measure_rest_engraver ()
  21 {
  22   start_measure_i_ = 0;
  23   rest_moments_[START] =
  24     rest_moments_[STOP] =0;
  25   multi_measure_req_l_ = 0;
  26
  27   lastrest_p_ =0;
  28   mmrest_p_ = 0;
  29 }
  30
  31 void
  32 Multi_measure_rest_engraver::acknowledge_element (Score_element_info i)
  33 {
  34   if (Bar *c = dynamic_cast<Bar*> (i.elem_l_))
  35     {
  36       if (mmrest_p_)
  37         mmrest_p_->add_column (c);
  38       if (lastrest_p_)
  39         lastrest_p_->add_column (c);
  40     }
  41 }
  42
  43 bool
  44 Multi_measure_rest_engraver::do_try_music (Music* req_l)
  45 {
  46   Rhythmic_req *r=0;
  47   if (Multi_measure_rest_req *mr =
  48       dynamic_cast<Multi_measure_rest_req *> (req_l))
  49     r=mr;
  50   else if (Repetitions_req *rr =
  51            dynamic_cast<Repetitions_req *> (req_l))
  52     r=rr;
  53   if (r)
  54     {
  55       if (multi_measure_req_l_)
  56         if (!multi_measure_req_l_->equal_b (r)
  57             || rest_moments_[START] != now_mom ())
  58           return false;
  59
  60       multi_measure_req_l_ = r;
  61       rest_moments_[START] = now_mom ();
  62
  63       rest_moments_[STOP] = rest_moments_[START] +
  64         multi_measure_req_l_->duration_.length_mom ();
  65       return true;
  66     }
  67   return false;
  68 }
  69
  70 void
  71 Multi_measure_rest_engraver::do_process_requests ()
  72 {
  73   if (multi_measure_req_l_ && !mmrest_p_)
  74     {
  75
  76       Translator * tr = daddy_grav_l()->get_simple_translator ("Timing_engraver");      // ugh
  77       Timing_translator * time = dynamic_cast<Timing_translator*> (tr);
  78
  79       mmrest_p_ = new Multi_measure_rest;
  80       Staff_symbol_referencer_interface si (mmrest_p_);
  81       si.set_interface ();
  82
  83
  84       if(dynamic_cast<Repetitions_req *> (multi_measure_req_l_))
  85         mmrest_p_->set_elt_property ("alt-symbol",
  86                                      ly_str02scm ("scripts-repeatsign"));
  87       announce_element (Score_element_info (mmrest_p_, multi_measure_req_l_));
  88       start_measure_i_
  89         = gh_scm2int (time->get_property ("currentBarNumber", 0));
  90     }
  91 }
  92
  93 void
  94 Multi_measure_rest_engraver::do_pre_move_processing ()
  95 {
  96   Moment now (now_mom ());
  97   Translator * tr = daddy_grav_l()->get_simple_translator ("Timing_engraver");  // ugh
  98   Timing_translator * time  = dynamic_cast<Timing_translator*> (tr);
  99
 100
 101   if (mmrest_p_ && (now >= rest_moments_[START])
 102     && !time->measure_position ()
 103     && (scm_ilength (mmrest_p_->get_elt_property ("columns")) >= 2))
 104     {
 105       typeset_element (mmrest_p_);
 106       /*
 107         must keep mmrest_p_ around to set measures_i_
 108        */
 109     }
 110   if (lastrest_p_)
 111     {
 112       typeset_element (lastrest_p_);
 113       lastrest_p_ = 0;
 114     }
 115 }
 116
 117 void
 118 Multi_measure_rest_engraver::do_post_move_processing ()
 119 {
 120   Translator * tr = daddy_grav_l()->get_simple_translator ("Timing_engraver");  // ugh
 121   Timing_translator * time  = dynamic_cast<Timing_translator*> (tr);
 122
 123   Moment now (now_mom ());
 124
 125   if (mmrest_p_ && !time->measure_position ())
 126     {
 127       lastrest_p_ = mmrest_p_;
 128       lastrest_p_->measures_i_
 129         = gh_scm2int (time->get_property ("currentBarNumber", 0)) - start_measure_i_;
 130       mmrest_p_ = 0;
 131     }
 132
 133   if (now >= rest_moments_[STOP])
 134     {
 135       multi_measure_req_l_ = 0;
 136       mmrest_p_ = 0;
 137     }
 138 }
 139
 140