lily/timing-grav.cc

   1 /*
   2   timing-grav.cc -- implement Timing_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8 #include "score-grav.hh"
   9 #include "timing-grav.hh"
  10 #include "command-request.hh"
  11
  12
  13 Timing_engraver::Timing_engraver()
  14 {
  15   default_grouping_ = Rhythmic_grouping (MInterval (0,4),4); // ugh
  16 }
  17
  18 void
  19 Timing_engraver::fill_staff_info (Staff_info &inf)
  20 {
  21   inf.time_C_ = &time_;
  22   inf.rhythmic_C_ = &default_grouping_;
  23 }
  24
  25 bool
  26 Timing_engraver::do_try_request(Request*r)
  27 {
  28   Command_req * c = r->command();
  29   if (!(c && c->timing()))
  30     return false;
  31   for (int i=0; i < timing_req_l_arr_.size (); i++)
  32     {
  33       if (timing_req_l_arr_[i]->equal_b(r))
  34         return true;
  35       if (timing_req_l_arr_[i]->name() == r->name())
  36         {
  37           r->warning ("conflicting timing request");
  38           return false;
  39         }
  40     }
  41
  42   timing_req_l_arr_.push(c->timing());
  43   return true;
  44 }
  45
  46 Meter_change_req*
  47 Timing_engraver::meter_req_l() const
  48 {
  49   Meter_change_req *m_l=0;
  50   for (int i=0; !m_l && i < timing_req_l_arr_.size (); i++)
  51     {
  52       m_l=timing_req_l_arr_[i]->meterchange();
  53     }
  54   return m_l;
  55 }
  56
  57 void
  58 Timing_engraver::do_process_requests()
  59 {
  60   for (int i=0; i < timing_req_l_arr_.size (); i++)
  61     {
  62       Timing_req * tr_l = timing_req_l_arr_[i];
  63       Meter_change_req *m_l = tr_l->meterchange();
  64       if (m_l)
  65         {
  66           int b_i= m_l->beats_i_;
  67           int o_i = m_l->one_beat_i_;
  68           if (! time_.allow_meter_change_b())
  69             tr_l->warning ("Meter change not allowed here");
  70           else
  71             {
  72               time_.set_meter (b_i, o_i);
  73               default_grouping_ =
  74                 Rhythmic_grouping (MInterval (0,Moment (b_i, o_i)), b_i);
  75             }
  76         }
  77       else if (tr_l->partial())
  78         {
  79           Moment m = tr_l->partial()->duration_;
  80           String error = time_.try_set_partial_str (m);
  81           if (error != "")
  82             {
  83               tr_l->warning (error);
  84             }
  85           else
  86             time_.setpartial (m);
  87         }
  88       else if (tr_l->barcheck())
  89         {
  90           if (time_.whole_in_measure_)
  91             {
  92               tr_l ->warning ("Barcheck failed");
  93
  94               time_.whole_in_measure_ = 0; // resync
  95               time_.error_b_ = true;
  96             }
  97
  98         }
  99       else if (tr_l->cadenza())
 100         {
 101           time_.set_cadenza (tr_l->cadenza()->on_b_);
 102
 103         }
 104       else if (tr_l->measuregrouping())
 105         {
 106           default_grouping_ =
 107             parse_grouping (tr_l->measuregrouping()->beat_i_arr_,
 108                             tr_l->measuregrouping()->elt_length_arr_);
 109
 110         }
 111     }
 112 }
 113
 114
 115 void
 116 Timing_engraver::do_pre_move_processing()
 117 {
 118   timing_req_l_arr_.set_size (0);
 119   Engraver_group_engraver * grav_l = daddy_grav_l_;
 120   while (grav_l->daddy_grav_l_)
 121     {
 122       grav_l = grav_l->daddy_grav_l_;
 123     }
 124
 125   assert (grav_l->name() == Score_engraver::static_name ());
 126   if (!time_.cadenza_b_)
 127     ((Score_engraver*)grav_l)->add_moment_to_process (time_.next_bar_moment());
 128 }
 129
 130 IMPLEMENT_IS_TYPE_B1(Timing_engraver, Engraver);
 131 ADD_THIS_ENGRAVER(Timing_engraver);
 132
 133 void
 134 Timing_engraver::do_creation_processing()
 135 {
 136   time_.when_ = get_staff_info().when ();
 137 }
 138
 139 void
 140 Timing_engraver::do_post_move_processing()
 141 {
 142   time_.add (get_staff_info().when ()  - time_.when_);
 143 }
 144