]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/rest-collision.cc
release: 1.1.39
[lilypond.git] / lily / rest-collision.cc
index d5b4217f7eceabfc2ac45061fcb9bed79deb1fb0..0103302408e7d727a8e4ecf64026782ccedb4727 100644 (file)
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
-
+#include "beam.hh"
 #include "debug.hh"
 #include "rest-collision.hh"
-#include "rest-column.hh"
 #include "note-column.hh"
 #include "stem.hh"
 #include "note-head.hh"
 #include "collision.hh"
 #include "paper-def.hh"
-
-
-IMPLEMENT_IS_TYPE_B1(Rest_collision,Item);
+#include "rest.hh"
 
 void
-Rest_collision::add (Note_column *nc_l)
+Rest_collision::add_column (Note_column *nc_l)
 {
   add_dependency (nc_l);
-  ncol_l_arr_.push (nc_l);
-}
-
-void
-Rest_collision::add (Rest_column *rc_l)
-{
-  add_dependency (rc_l);
-  rest_l_arr_.push (rc_l);
-}
-
-void
-Rest_collision::do_post_processing()
-{
-  /*
-    handle rest under beam (do_post: beams are calculated now)
-
-    [todo]
-    i-d like to have access to the beam itself, 
-    iso only the (half-initialised?) stem
-
-    what about combination of collisions and rest under beam
-   */
-
-  // no rests to collide
-  if (!rest_l_arr_.size())
-       return;
-  // can this happen?
-  Stem* stem_l = rest_l_arr_[0]->stem_l_;
-  if (!stem_l)
-       return;
-  // no beam
-  if (!(stem_l->beams_left_i_ || stem_l->beams_right_i_))
-       return;
-
-  int dir_i = rest_l_arr_[0]->dir_i_;
-  int midpos = 4;
-#if 1
-  // ugh
-  int stem_length_i = 7 - 2;
-  // ugh, Stem::stem_start vs Stem::stem_end
-  int pos = (stem_l->stem_end_f() - midpos) - dir_i * stem_length_i;
-#else // nogo: stem_start not set for rests?
-  int pos = (stem_l->stem_start_f() - midpos) + dir_i * 2;
-#endif
-  rest_l_arr_[0]->translate_heads (pos);       
+  if (nc_l->rest_b ())
+    rest_l_arr_.push (nc_l);
+  else
+    ncol_l_arr_.push (nc_l);
 }
 
 void
 Rest_collision::do_pre_processing()
 {
   /* 
-    handle rest-rest and rest-note collisions
+     handle rest-rest and rest-note collisions
 
-    [todo]
-    decide not to print rest if too crowded?
+     [todo]
+     * decide not to print rest if too crowded?
+
+     * ignore rests under beams.
    */
 
   // no rests to collide
   if (!rest_l_arr_.size())
-       return;
+    return;
 
   // no partners to collide with
   if (rest_l_arr_.size() + ncol_l_arr_.size () < 2)
-       return;
+    return;
 
   // meisjes met meisjes
   if (!ncol_l_arr_.size()) 
     {
-       int dy = rest_l_arr_.size() > 2 ? 6 : 4;
+      /*
+       UGH.  Should get dims from table.  Should have minimum dist.
+       */
+      int dy = rest_l_arr_.size() > 2 ? 6 : 4;
        
-       rest_l_arr_[0]->translate_heads (rest_l_arr_[0]->dir_i_ *dy);   
-       // top is last element...
-       rest_l_arr_.top()->translate_heads (rest_l_arr_.top ()->dir_i_* dy);    
+      rest_l_arr_[0]->translate_rests (rest_l_arr_[0]->dir () *dy);    
+      rest_l_arr_.top()->translate_rests (rest_l_arr_.top ()->dir ()* dy);
     }
   // meisjes met jongetjes
   else 
     {
-#if 0 // breendet: rests go always under
-       // geen gemug, trug op je rug
-       int dir_i = -1;
-       rest_l_arr_[0]->translate_heads (dir_i * 3);    
-#else
-       // int dir_i = - ncol_l_arr_[0]->dir_i_;
-       int dir_i = rest_l_arr_[0]->dir_i_;
-       // hope it's 4: if it works->doco
-       int midpos = 4;
-       
-      // minimum move
-       int minpos = 4;
-       
-       // quart rest height
-       // UGH Should get dims from table!
-       int size_i = 6;
-       
-       int sep_i = 3 + size_i / 2;
-       for (int i = 0; i < ncol_l_arr_.size(); i++) 
-         {
-           // how to know whether to sort?
-           ncol_l_arr_[i]->sort();
-           for ( int j = 0; j < ncol_l_arr_[i]->head_l_arr_.size(); j++)
-               minpos = minpos >? dir_i * 
-                   (ncol_l_arr_[i]->head_l_arr_[j]->position_i_ -midpos) + sep_i;
-         }
-       rest_l_arr_[0]->translate_heads (dir_i * minpos);       
-#endif
+      if (rest_l_arr_.size () > 1)
+       {
+         warning (_("Too many colliding rests."));
+       }
+      if (ncol_l_arr_.size () > 1)
+       {
+         warning (_("Too many notes for rest collision."));
+       }
+      Note_column * rcol = rest_l_arr_[0];
+
+      // try to be opposite of noteheads. 
+      Direction dir = - ncol_l_arr_[0]->dir();
+
+      Interval restdim;
+      for (int i=0; i < rcol->rest_l_arr_.size(); i++)
+       restdim.unite (rcol->rest_l_arr_[i]->extent (Y_AXIS));
+
+      if (restdim.empty_b ())
+       return;
+      
+      // staff ref'd?
+      Real staff_space = rcol->rest_l_arr_[0]->staff_line_leading_f ();      
+      Real internote_f = staff_space/2;
+      Real minimum_dist = paper_l ()->get_var ("restcollision_minimum_dist")
+       * internote_f;
+      
+      /*
+       assumption: ref points are the same. 
+       */
+      Interval notedim;
+      for (int i = 0; i < ncol_l_arr_.size(); i++) 
+       {
+         notedim.unite (ncol_l_arr_[i]->extent (Y_AXIS));
+       }
+
+      Interval inter (notedim);
+      inter.intersect (restdim);
+
+      Real dist =
+       minimum_dist +  dir * (notedim[dir] - restdim[-dir]) >? 0;
+
+
+      int stafflines = rcol->rest_l_arr_[0]->lines_i ();
+
+      
+      // move discretely by half spaces.
+      int discrete_dist = int (ceil (dist / (0.5 *staff_space)));
+
+      // move by whole spaces inside the staff.
+      if (discrete_dist < stafflines+1)
+       discrete_dist = int (ceil (discrete_dist / 2.0)* 2.0);
+      
+      rcol->translate_rests (dir * discrete_dist);
     }
 }
 
@@ -140,17 +125,18 @@ Rest_collision::do_print() const
 }
 
 void
-Rest_collision::do_substitute_dependency (Score_elem*o,Score_elem*n)
+Rest_collision::do_substitute_element_pointer (Score_element*o,Score_element*n)
 {
-  Item*o_l = o->item();
-  Item*n_l = n?n->item():0;
-  
-  rest_l_arr_.substitute ((Rest_column*)o_l,(Rest_column*)n_l);
-  ncol_l_arr_.substitute ((Note_column*)o_l,(Note_column*)n_l);
+  if (Note_column *onl = dynamic_cast<Note_column *> (o))
+    {
+      Note_column *n_l = n?dynamic_cast<Note_column *> (n):0;
+      rest_l_arr_.substitute (onl, n_l);
+      ncol_l_arr_.substitute (onl, n_l);
+    }
 }
 
 Rest_collision::Rest_collision()
 {
-  transparent_b_ = true;
-  empty_b_ = true;
+  set_elt_property (transparent_scm_sym, SCM_BOOL_T);
+  set_empty (true);
 }