]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/musical-request.cc
release: 1.1.0
[lilypond.git] / lily / musical-request.cc
index a4e114684447252f1eb32fcb471205ec553ec4ac..6c72cb538ada9bff71a691b52f1d3454d72d7105 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #include "musical-request.hh"
 
 
 
-IMPLEMENT_IS_TYPE_B1(Musical_req,Request);
+IMPLEMENT_IS_TYPE_B1 (Musical_req,Request);
 void
-Musical_req::do_print() const{}
+Musical_req::do_print () const{}
 void
-Tie_req::do_print() const{}
+Tie_req::do_print () const{}
 
 
-/* *************** */
 
+IMPLEMENT_IS_TYPE_B1(Span_req,Request);
 
+IMPLEMENT_IS_TYPE_B2(Musical_span_req, Span_req, Musical_span_req);
 
-
-IMPLEMENT_IS_TYPE_B1(Span_req,Musical_req);
+void
+Musical_span_req::do_print () const
+{
+  Span_req::do_print ();
+}
+            
 
 void
-Span_req::do_print() const
+Span_req::do_print () const
 {
 #ifndef NPRINT
-  DOUT << spantype ;
+  DOUT << spantype;
 #endif
 }
 
-IMPLEMENT_IS_TYPE_B1(Spacing_req,Request);
+IMPLEMENT_IS_TYPE_B1 (Spacing_req,Request);
 
-Spacing_req::Spacing_req()
+Spacing_req::Spacing_req ()
 {
   next = 0;
   distance = 0;
@@ -47,7 +52,7 @@ Spacing_req::Spacing_req()
 }
 
 void
-Spacing_req::do_print() const
+Spacing_req::do_print () const
 {
 #ifndef NPRINT
   DOUT << "next " << next << "dist " << distance << "strength\n";
@@ -62,166 +67,114 @@ Abbreviation_req::Abbreviation_req ()
 }
 
 void
-Abbreviation_req::do_print() const
+Abbreviation_req::do_print () const
 {
 #ifndef NPRINT
-  DOUT << "type " << type_i_ << "\n";
+  DOUT << "type " << type_i_ << '\n';
 #endif
 }
 
 
-IMPLEMENT_IS_TYPE_B2(Blank_req,Spacing_req,Rhythmic_req);
+IMPLEMENT_IS_TYPE_B2 (Blank_req,Spacing_req,Rhythmic_req);
 
 void
-Blank_req::do_print() const
+Blank_req::do_print () const
 {
-  Spacing_req::do_print();
+  Spacing_req::do_print ();
 }
-/* *************** */
 
-Melodic_req::Melodic_req()
+Melodic_req::Melodic_req ()
 {
-  notename_i_ = 0;
-  octave_i_ = 0;
-  accidental_i_ = 0;
 }
 
 void
-Melodic_req::transpose (Melodic_req const * delta)
+Melodic_req::transpose (Musical_pitch delta)
 {
-  int old_pitch = pitch();
-  int delta_pitch = delta->pitch();
-  octave_i_ += delta->octave_i_;
-  notename_i_ += delta->notename_i_;
-  while  (notename_i_ >= 7)
+  pitch_.transpose (delta);
+  
+  if (abs (pitch_.accidental_i_) > 2)
     {
-       notename_i_ -= 7;
-       octave_i_ ++;
-    }
-
-  int new_pitch = pitch();
-  int delta_acc = new_pitch - old_pitch - delta_pitch;
-
-  accidental_i_ -= delta_acc;
-  if (abs (accidental_i_) > 2)
-    {
-       delta->warning (_("transposition makes accidental larger than 2"));
+       warning (_f ("transposition by %s makes accidental larger than two",
+         delta.str ()));
     }
 }
 
-IMPLEMENT_IS_TYPE_B1(Melodic_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Melodic_req,Musical_req);
 
 bool
 Melodic_req::do_equal_b (Request*r) const
 {
-  Melodic_req* m= r->musical()->melodic ();
+  Melodic_req* m= dynamic_cast <Melodic_req *> (r);
   return !compare (*m, *this);
 }
 
 int
 Melodic_req::compare (Melodic_req const &m1 , Melodic_req const&m2)
 {
-  int o=  m1.octave_i_ - m2.octave_i_;
-  int n = m1.notename_i_ - m2.notename_i_;
-  int a = m1.accidental_i_ - m2.accidental_i_;
-
-  if (o)
-       return o;
-  if (n)
-       return n;
-  if (a)
-       return a;
-  return 0;
+  return Musical_pitch::compare (m1.pitch_, m2.pitch_);
 }
 
 void
-Melodic_req::do_print() const
-{
-#ifndef NPRINT
-  DOUT << "notename: " << notename_i_
-        << " acc: " <<accidental_i_<<" oct: "<< octave_i_;
-#endif
-}
-
-int
-Melodic_req::height() const
-{
-  return  notename_i_ + octave_i_*7;
-}
-
-/*
-  should be settable from input to allow "viola"-mode
- */
-static Byte pitch_byte_a[  ] = { 0, 2, 4, 5, 7, 9, 11 };
-
-int
-Melodic_req::pitch() const
+Melodic_req::do_print () const
 {
-  return  pitch_byte_a[ notename_i_ % 7 ] + accidental_i_ + octave_i_ * 12;
+pitch_.print ();
 }
 
-/* *************** */
 int
 Rhythmic_req::compare (Rhythmic_req const &r1, Rhythmic_req const &r2)
 {
-  return (r1.duration() - r2.duration ());
+  return (r1.duration () - r2.duration ());
 }
 
 bool
 Rhythmic_req::do_equal_b (Request*r) const
 {
-  Rhythmic_req* rh = r->musical()->rhythmic ();
+  Rhythmic_req* rh = dynamic_cast <Rhythmic_req *> (r);
 
   return !compare (*this, *rh);
 }
 
-void
-Rhythmic_req::set_duration (Duration d)
-{
-  duration_ = d;
-}
 
-Rhythmic_req::Rhythmic_req()
+Rhythmic_req::Rhythmic_req ()
 {
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Rhythmic_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Rhythmic_req,Musical_req);
 
 void
-Rhythmic_req::do_print() const
+Rhythmic_req::do_print () const
 {
 #ifndef NPRINT
-  DOUT << "duration { " <<duration_.str() << "}";
+  DOUT << "duration { " <<duration_.str () << "}";
 #endif
 }
 
 
 Moment
-Rhythmic_req::duration() const
+Rhythmic_req::duration () const
 {
-  return duration_.length();
+  return duration_.length ();
 }
-/* *************** */
 
-Lyric_req::Lyric_req (Text_def* def_p)
-  :Text_req (0, def_p)
+void
+Rhythmic_req::compress (Moment m)
 {
-  def_p->align_i_ = CENTER;    // centre
-  dir_ = DOWN;         // lyrics below (invisible) staff
+  duration_.compress (m);
 }
+  
+
 
 
-IMPLEMENT_IS_TYPE_B2(Lyric_req,Musical_req,Rhythmic_req);
+IMPLEMENT_IS_TYPE_B1 (Lyric_req,Rhythmic_req);
 
 void
-Lyric_req::do_print() const
+Lyric_req::do_print () const
 {
-  Rhythmic_req::do_print();
-  Text_req::do_print();
+  Rhythmic_req::do_print ();
 }
 
-/* *************** */
+
 bool
 Note_req::do_equal_b (Request*r) const
 {
@@ -229,49 +182,58 @@ Note_req::do_equal_b (Request*r) const
 }
 
 
-Note_req::Note_req()
+Note_req::Note_req ()
 {
   forceacc_b_ = false;
 }
 
-IMPLEMENT_IS_TYPE_B2(Note_req,Melodic_req,Rhythmic_req);
+IMPLEMENT_IS_TYPE_B2 (Note_req,Melodic_req,Rhythmic_req);
 
 void
-Note_req::do_print() const
+Note_req::do_print () const
 {
 #ifndef NPRINT
-  Melodic_req::do_print();
+  Melodic_req::do_print ();
   if (forceacc_b_)
     {
        DOUT << " force accidental\n";
     }
-  Rhythmic_req::do_print();
+  Rhythmic_req::do_print ();
 #endif
 }
-/* *************** */
 
-IMPLEMENT_IS_TYPE_B1(Rest_req,Rhythmic_req);
+IMPLEMENT_IS_TYPE_B1 (Rest_req, Rhythmic_req);
 
 void
-Rest_req::do_print() const
+Rest_req::do_print () const
 {
-      Rhythmic_req::do_print();
+      Rhythmic_req::do_print ();
 }
 
-/* *************** */
 
-IMPLEMENT_IS_TYPE_B1(Beam_req,Span_req);
 
-Beam_req::Beam_req()
+
+IMPLEMENT_IS_TYPE_B1 (Multi_measure_rest_req, Rhythmic_req);
+
+void
+Multi_measure_rest_req::do_print () const
+{
+      Rhythmic_req::do_print ();
+}
+
+
+
+IMPLEMENT_IS_TYPE_B1 (Beam_req,Span_req);
+
+Beam_req::Beam_req ()
 {
 }
 
 void
-Beam_req::do_print() const
+Beam_req::do_print () const
 {
 }
 
-/* *************** */
 
 IMPLEMENT_IS_TYPE_B1 (Abbreviation_beam_req, Span_req);
 
@@ -285,13 +247,13 @@ Abbreviation_beam_req::do_print () const
 {
 }
 
-IMPLEMENT_IS_TYPE_B1(Slur_req,Span_req);
+IMPLEMENT_IS_TYPE_B1 (Slur_req,Span_req);
 void
-Slur_req::do_print() const
+Slur_req::do_print () const
 {
 }
 
-IMPLEMENT_IS_TYPE_B1(Plet_req,Span_req);
+IMPLEMENT_IS_TYPE_B1 (Plet_req,Span_req);
 
 Plet_req::Plet_req ()
 {
@@ -303,25 +265,23 @@ Plet_req::do_print () const
 {
 }
 
-/* *************** */
 
 bool
 Span_req:: do_equal_b (Request*r) const
 {
-  Span_req * s = r->span();
+  Span_req * s = dynamic_cast <Span_req *> (r);
   return spantype == s->spantype;
 }
 
-Span_req::Span_req()
+Span_req::Span_req ()
 {
   spantype = NOSPAN;
 }
 
-/* *************** */
 Script_req::Script_req (Script_req const&s)
 {
   dir_ = s.dir_;
-  scriptdef_p_ = s.scriptdef_p_ ? s.scriptdef_p_->clone() : 0;
+  scriptdef_p_ = s.scriptdef_p_ ? s.scriptdef_p_->clone () : 0;
 }
 
 /*
@@ -332,47 +292,46 @@ Script_req::Script_req (Script_req const&s)
 bool
 Script_req::do_equal_b (Request*r) const
 {
-  Script_req * s = r->script();
+  Script_req * s = dynamic_cast <Script_req *> (r);
 
   return  scriptdef_p_->equal_b (*s->scriptdef_p_);
 }
 
-Script_req::Script_req()
+Script_req::Script_req ()
 {
   dir_ = CENTER;
   scriptdef_p_ = 0;
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Script_req,Request);
+IMPLEMENT_IS_TYPE_B1 (Script_req,Request);
 
 void
-Script_req::do_print() const
+Script_req::do_print () const
 {
 #ifndef NPRINT
-  DOUT << " dir " << dir_ ;
-  scriptdef_p_->print();
+  DOUT << " dir " << dir_;
+  scriptdef_p_->print ();
 #endif
 }
 
 void
-Musical_script_req::do_print() const
+Musical_script_req::do_print () const
 {
-  Script_req::do_print();
+  Script_req::do_print ();
 }
 
 
-IMPLEMENT_IS_TYPE_B2(Musical_script_req,Musical_req, Script_req);
+IMPLEMENT_IS_TYPE_B2 (Musical_script_req,Musical_req, Script_req);
 
 
-Script_req::~Script_req()
+Script_req::~Script_req ()
 {
   delete scriptdef_p_;
 }
-/* *************** */
 
 
-Text_req::~Text_req()
+Text_req::~Text_req ()
 {
   delete tdef_p_;
   tdef_p_ = 0;
@@ -386,54 +345,53 @@ Text_req::Text_req (Text_req const& src)
 
 Text_req::Text_req (int dir_i, Text_def* tdef_p)
 {
-  dir_ = Direction(dir_i);
+  dir_ = Direction (dir_i);
   tdef_p_ = tdef_p;
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Text_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Text_req,Musical_req);
 
 void
-Text_req::do_print() const
+Text_req::do_print () const
 {
 #ifndef NPRINT
-  DOUT << " dir " << dir_ ;
-  tdef_p_->print();
+  DOUT << " dir " << dir_;
+  tdef_p_->print ();
 #endif
 }
 
-/* *************** */
 
 
-IMPLEMENT_IS_TYPE_B1(Skip_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Skip_req,Musical_req);
 
 void
-Skip_req::do_print() const
+Skip_req::do_print () const
 {
 #ifndef NPRINT
 
-  DOUT << "duration: " << duration();
+  DOUT << "duration: " << duration ();
 #endif
 }
 
 
 
-IMPLEMENT_IS_TYPE_B1(Dynamic_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Dynamic_req,Musical_req);
 
 void
-Dynamic_req::do_print() const
+Dynamic_req::do_print () const
 {
-  Musical_req::do_print();
+  Musical_req::do_print ();
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Absolute_dynamic_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Absolute_dynamic_req,Musical_req);
 
 void
-Absolute_dynamic_req::do_print() const
+Absolute_dynamic_req::do_print () const
 {
 #ifndef NPRINT
-  Dynamic_req::do_print();
+  Dynamic_req::do_print ();
   DOUT << " loudness " <<loudness_str ();
 #endif
 }
@@ -442,7 +400,7 @@ Absolute_dynamic_req::do_print() const
 bool
 Absolute_dynamic_req::do_equal_b (Request *r) const
 {
-  Absolute_dynamic_req *a = r->musical ()->dynamic ()->absdynamic ();
+  Absolute_dynamic_req *a = dynamic_cast <Absolute_dynamic_req *> (r);
   return loudness_ == a->loudness_;
 }
 
@@ -469,39 +427,49 @@ Dynamic_req::loudness_static_str (Loudness l)
 String
 Absolute_dynamic_req::loudness_str () const
 {
-  String s = loudness_static_str (loudness_);
-  if (s.empty_b ())
+  String str = loudness_static_str (loudness_);
+  if (str.empty_b ())
     {
-      s = "mf";
-      warning (String (_("Never heard of dynamic scale "))
-              + loudness_ + _(" assuming mf"));
+      String s = "mf";
+      warning (_f ("never heard of dynamic scale `\%s\', assuming %s",
+       str, s));
+      str = s;
     }
-  return s;
+  return str;
 }
 
 
-Absolute_dynamic_req::Absolute_dynamic_req()
+Absolute_dynamic_req::Absolute_dynamic_req ()
 {
   loudness_ = MF;
 }
 
 
-Span_dynamic_req::Span_dynamic_req()
+
+bool
+Span_dynamic_req::do_equal_b (Request *req) const
+{
+  Span_dynamic_req * s = dynamic_cast <Span_dynamic_req *> (req);
+
+  return Span_req::do_equal_b (req) && s->dynamic_dir_ == dynamic_dir_;
+}
+
+Span_dynamic_req::Span_dynamic_req ()
 {
   dynamic_dir_  = CENTER;
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Span_dynamic_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Span_dynamic_req,Musical_req);
 
 void
-Span_dynamic_req::do_print() const
+Span_dynamic_req::do_print () const
 {
 #ifndef NPRINT
-  Span_req::do_print();
-  DOUT << "softer/louder: " <<dynamic_dir_;
+  Span_req::do_print ();
+  DOUT << "softer/louder: " << dynamic_dir_;
 #endif
 }
 
 
-IMPLEMENT_IS_TYPE_B1(Tie_req,Musical_req);
+IMPLEMENT_IS_TYPE_B1 (Tie_req,Musical_req);