lily/timing-translator.cc

   1 /*
   2   timing-translator.cc -- implement Timing_translator
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 #include "timing-translator.hh"
  10 #include "command-request.hh"
  11 #include "translator-group.hh"
  12 #include "global-translator.hh"
  13 #include "multi-measure-rest.hh"
  14
  15 Timing_translator::Timing_translator ()
  16 {
  17   default_grouping_ = Rhythmic_grouping (MInterval (0, 1), 4); // ugh
  18 }
  19
  20 bool
  21 Timing_translator::do_try_music (Music*r)
  22 {
  23   if (Timing_req *t =  dynamic_cast <Timing_req *> (r))
  24     {
  25       for (int i=0; i < timing_req_l_arr_.size (); i++)
  26         {
  27           if (timing_req_l_arr_[i]->equal_b(t))
  28             return true;
  29           if (String (classname (timing_req_l_arr_[i])) == classname (r))
  30             {
  31               r->warning (_ ("conflicting timing request"));
  32               return false;
  33             }
  34         }
  35
  36       timing_req_l_arr_.push(t);
  37       return true;
  38     }
  39   return false;
  40 }
  41
  42 /*ugh.
  43  */
  44 Time_signature_change_req*
  45 Timing_translator::time_signature_req_l() const
  46 {
  47   Time_signature_change_req *m_l=0;
  48   for (int i=0; !m_l && i < timing_req_l_arr_.size (); i++)
  49     {
  50       m_l=dynamic_cast<Time_signature_change_req*> (timing_req_l_arr_[i]);
  51     }
  52   return m_l;
  53 }
  54
  55 void
  56 Timing_translator::do_process_requests()
  57 {
  58   for (int i=0; i < timing_req_l_arr_.size (); i++)
  59     {
  60       Timing_req * tr_l = timing_req_l_arr_[i];
  61
  62       if (Time_signature_change_req *m_l = dynamic_cast <Time_signature_change_req *> (tr_l))
  63         {
  64           int b_i= m_l->beats_i_;
  65           int o_i = m_l->one_beat_i_;
  66           if (! time_.allow_time_signature_change_b())
  67             tr_l->warning (_ ("time signature change not allowed here"));
  68           else
  69             {
  70               time_.set_time_signature (b_i, o_i);
  71               default_grouping_ =
  72                 Rhythmic_grouping (MInterval (0,Moment (b_i, o_i)), b_i);
  73             }
  74         }
  75       else if (Partial_measure_req *pm = dynamic_cast <Partial_measure_req *> (tr_l))
  76         {
  77           Moment m = pm->duration_;
  78           String error = time_.try_set_partial_str (m);
  79           if (error.length_i ())
  80             {
  81               tr_l->warning (error);
  82             }
  83           else
  84             time_.setpartial (m);
  85         }
  86       else if (dynamic_cast <Barcheck_req *> (tr_l))
  87         {
  88           if (time_.whole_in_measure_)
  89             {
  90               tr_l ->warning (_f ("barcheck failed by: %s",
  91                 time_.whole_in_measure_.str ()));
  92
  93               time_.whole_in_measure_ = 0; // resync
  94               time_.error_b_ = true;
  95             }
  96
  97         }
  98       else if (Cadenza_req *cr = dynamic_cast <Cadenza_req *> (tr_l))
  99         {
 100           time_.set_cadenza (cr->on_b_);
 101         }
 102       else if (Measure_grouping_req *mg=dynamic_cast <Measure_grouping_req *> (tr_l))
 103         {
 104           default_grouping_ =
 105             parse_grouping (mg->beat_i_arr_,
 106                             mg->elt_length_arr_);
 107
 108         }
 109     }
 110 }
 111
 112
 113 void
 114 Timing_translator::do_pre_move_processing()
 115 {
 116   timing_req_l_arr_.set_size (0);
 117   Global_translator *global_l =
 118     dynamic_cast<Global_translator*> (daddy_trans_l_->ancestor_l (100)); // ugh 100.
 119
 120
 121   /* allbars == ! skipbars */
 122   bool allbars = ! get_property ("SkipBars").to_bool ();
 123
 124
 125   if (!time_.cadenza_b_ && allbars)
 126     global_l->add_moment_to_process (time_.next_bar_moment ());
 127 }
 128
 129
 130 ADD_THIS_TRANSLATOR(Timing_translator);
 131
 132 void
 133 Timing_translator::do_creation_processing()
 134 {
 135   time_.when_ = now_moment ();
 136 }
 137
 138 void
 139 Timing_translator::do_post_move_processing()
 140 {
 141   time_.add (now_moment ()  - time_.when_);
 142 }
 143
 144 void
 145 Timing_translator::do_print () const
 146 {
 147 #ifndef NPRINT
 148   time_.print ();
 149   default_grouping_.print ();
 150 #endif
 151 }