]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/gourlay-breaking.cc
release: 1.1.58
[lilypond.git] / lily / gourlay-breaking.cc
index 6a0d2376a458eb306ef66a44be190ac5dd3e39b7..284f1e83b308063b72ff938cf8c31a5ead2d1d04 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 "gourlay-breaking.hh"
 #include "colhpos.hh"
 #include "spring-spacer.hh"
 #include "debug.hh"
-#include "p-col.hh"
-#include "p-score.hh"
+#include "paper-column.hh"
+#include "paper-score.hh"
 #include "paper-def.hh"
 
+#include "killing-cons.tcc"
 
-const HAPPY_DOTS_I = 3;
+/// How often to print operator pacification marks?
+const int HAPPY_DOTS_I = 3;
 
 /**
   Helper to trace back an optimal path 
  */
 struct Break_node {
-    /** this was the previous. If negative, this break should not be
-      considered: this path has infinite energy
-      
-     */
-    int prev_break_i_;
-    Real energy_f_;
-    Col_hpositions line_config_;
-    Break_node() {
-       prev_break_i_ = -1;
-    }
+  /** this was the previous. If negative, this break should not be
+    considered: this path has infinite energy
+    
+    */
+  int prev_break_i_;
+  int line_i_;
+  Real energy_f_;
+  Column_x_positions line_config_;
+  Break_node () 
+  {
+    prev_break_i_ = -1;
+    line_i_ = 0;
+  }
 };
 
 /**
-  This algorithms is adapted from 
+  This algorithms is adapted from the OSU Tech report on breaking lines.
+  
  */
 
-Array<Col_hpositions>
-Gourlay_breaking::do_solve()const
+Array<Column_x_positions>
+Gourlay_breaking::do_solve () const
 {
+  Array<Break_node> optimal_paths;
+  Line_of_cols all = pscore_l_->col_l_arr_ ;
+  Array<int> breaks = find_break_indices ();
+  
+  optimal_paths.set_size (breaks.size ());
 
-    Array<Break_node> optimal_paths;
-    Line_of_cols all = all_cols();
-    Array<int> breaks = find_break_indices();
-    
-    optimal_paths.set_size(breaks.size());
-
-    Break_node first_node ;
-    first_node.prev_break_i_ = -1;
-    first_node.line_config_.energy_f_ = 0;
-    
-    optimal_paths[0] = first_node; 
-    int break_idx=1;
+  Break_node first_node ;
+  first_node.prev_break_i_ = -1;
+  first_node.line_config_.energy_f_ = 0;
+  first_node.line_i_ = 0;
+  
+  optimal_paths[0] = first_node; 
+  int break_idx=1;
 
   
-    for (; break_idx< breaks.size(); break_idx++) {
-       Array<int> candidates;
-       Array<Col_hpositions> candidate_lines;
-       Pointer_list<Line_spacer*> spacer_p_list;
+  for (; break_idx< breaks.size (); break_idx++) 
+    {
+      Array<int> candidates;
+      Array<Column_x_positions> candidate_lines;
+      Cons_list<Line_spacer> spacer_p_list;
        
-       /*
-         start with a short line, add measures. At some point 
-         the line becomes infeasible. Then we don't try to add more 
-        */
-       for (int start_idx = break_idx; start_idx--; ){
-           if  (break_idx - start_idx > max_measures_i_) 
-               break;
-
-           if (optimal_paths[start_idx].prev_break_i_ < 0
-               && optimal_paths[start_idx].line_config_.energy_f_)
+      /*
+       start with a short line, add measures. At some point 
+       the line becomes infeasible. Then we don't try to add more 
+       */
+      for (int start_idx = break_idx; start_idx--;)
+       {
+         if  (break_idx - start_idx > max_measures_i_) 
+           break;
+
+         if (optimal_paths[start_idx].prev_break_i_ < 0
+             && optimal_paths[start_idx].line_config_.energy_f_)
                
-               continue;
+           continue;
            
-           Line_of_cols line = all.slice(breaks[start_idx], breaks[break_idx]+1);
-           
-           line[0] = line[0]->postbreak_p_;
-           line.top() = line.top()->prebreak_p_;
+         Line_of_cols line = all.slice (breaks[start_idx], breaks[break_idx]+1);
+  
+         line[0] = dynamic_cast<Paper_column*>(line[0]->find_prebroken_piece (RIGHT));
+         line.top () =  dynamic_cast<Paper_column*>(line.top ()->find_prebroken_piece (LEFT));
            
-           if (!feasible(line))
-               break;
+         if (!feasible (line))
+           break;
            
-           Col_hpositions approx;
-           approx.cols = line;
+         Column_x_positions approx;
+         approx.cols = line;
            
-           approx.spacer_l_ = generate_spacing_problem( line );
-           spacer_p_list.bottom().add(approx.spacer_l_);
+         approx.spacer_l_ = generate_spacing_problem (line, 
+           pscore_l_->paper_l_->line_dimensions_int (optimal_paths[start_idx].line_i_));
+         spacer_p_list.append (new Killing_cons<Line_spacer> (approx.spacer_l_,0));
 
-           ((Break_algorithm*)this)->approx_stats_.add( approx.cols );
-           approx.approximate_solve_line(  );
+         ( (Break_algorithm*)this)->approx_stats_.add (approx.cols);
+         approx.approximate_solve_line ();
            
-           if  (approx.energy_f_  > energy_bound_f_ ){ 
-               continue;
+         if  (approx.energy_f_  > energy_bound_f_)
+           {
+             continue;
            }
 
            
-           // this is a likely candidate. Store it.
-           candidate_lines.push( approx );
-           candidates.push( start_idx );
+         // this is a likely candidate. Store it.
+         candidate_lines.push (approx);
+         candidates.push (start_idx);
        }
 
            
-       int minimal_j = -1;
-       Real minimal_energy = infinity_f;
-       for (int j=0; j < candidates.size(); j++) {
-           int start = candidates[j];
-           if ( optimal_paths[start].line_config_.energy_f_
-                + candidate_lines[j].energy_f_  > minimal_energy)
+      int minimal_j = -1;
+      Real minimal_energy = infinity_f;
+      for (int j=0; j < candidates.size (); j++) 
+       {
+         int start = candidates[j];
+         if (optimal_paths[start].line_config_.energy_f_
+              + candidate_lines[j].energy_f_  > minimal_energy)
                
-               continue;
+           continue;
 
-           if ( !candidate_lines[j].satisfies_constraints_b_) {
-                candidate_lines[j].solve_line( );
-                ((Break_algorithm*)this)->exact_stats_.add ( candidate_lines[j].cols );
+         if (!candidate_lines[j].satisfies_constraints_b_) 
+           {
+             candidate_lines[j].solve_line ();
+             ( (Break_algorithm*)this)->exact_stats_.add (candidate_lines[j].cols);
            }
            
-           Real this_energy 
-               = optimal_paths[start].line_config_.energy_f_ 
-               + candidate_lines[j].energy_f_ ;
+         Real this_energy 
+           = optimal_paths[start].line_config_.energy_f_ 
+           + candidate_lines[j].energy_f_ ;
            
-           if ( this_energy < minimal_energy ) {
-               minimal_j = j;
-               minimal_energy = this_energy;
+         if (this_energy < minimal_energy) 
+           {
+             minimal_j = j;
+             minimal_energy = this_energy;
            }
        }
 
-       if (minimal_j < 0) {
-           optimal_paths[break_idx].prev_break_i_ = -1;
-           optimal_paths[break_idx].line_config_.energy_f_ = infinity_f;
-       } else {
-           optimal_paths[break_idx].prev_break_i_ = candidates[minimal_j];
-           optimal_paths[break_idx].line_config_ = candidate_lines[minimal_j];
+      if (minimal_j < 0) 
+       {
+         optimal_paths[break_idx].prev_break_i_ = -1;
+         optimal_paths[break_idx].line_config_.energy_f_ = infinity_f;
        }
+      else 
+       {
+         optimal_paths[break_idx].prev_break_i_ = candidates[minimal_j];
+         optimal_paths[break_idx].line_config_ = candidate_lines[minimal_j];
+         optimal_paths[break_idx].line_i_ = 
+           optimal_paths[optimal_paths[break_idx].prev_break_i_].line_i_ + 1;
+       }
+
+      if (! (break_idx % HAPPY_DOTS_I))
+       *mlog << "[" << break_idx << "]" << flush;
 
-       if ( !(break_idx % HAPPY_DOTS_I) )
-           *mlog << "[" << break_idx << "]"<<flush;
+      spacer_p_list.junk ();
     }
 
-    if  ( break_idx % HAPPY_DOTS_I) 
-       *mlog << "[" << break_idx << "]"<<flush;
-    print_stats();
+  if  (break_idx % HAPPY_DOTS_I) 
+    *mlog << "[" << break_idx << "]" << flush;
 
-    
+  Array<int> final_breaks;
 
-    Array<int> final_breaks;
+  Array<Column_x_positions> lines;
 
-    Array<Col_hpositions> lines;
-    /* skip 0-th element, since it is a "dummy" elt*/
-    for (int i = optimal_paths.size()-1; i> 0; ) {
-       final_breaks.push ( i );
-       assert ( i > optimal_paths[i].prev_break_i_);
+  /* skip 0-th element, since it is a "dummy" elt*/
+  for (int i = optimal_paths.size ()-1; i> 0;) 
+    {
+      final_breaks.push (i);
+      assert (i > optimal_paths[i].prev_break_i_);
 
-       // there was no "feasible path"
-       if (!optimal_paths[i].line_config_.config.size() )
-          return lines; 
-       i = optimal_paths[i].prev_break_i_;
+      // there was no "feasible path"
+      if (!optimal_paths[i].line_config_.config.size ()) {
+       final_breaks.set_size (0);
+       break;
+      }
+      i = optimal_paths[i].prev_break_i_;
     }
 
-    for (int i= final_breaks.size(); i--; ) 
-       lines.push ( optimal_paths[final_breaks[i]].line_config_ );
 
-    
-    return lines;
+  for (int i= final_breaks.size (); i--;) 
+    lines.push (optimal_paths[final_breaks[i]].line_config_);
+  
+  return lines;
 }
 
 
-Gourlay_breaking::Gourlay_breaking()
+Gourlay_breaking::Gourlay_breaking ()
 {
-    get_line_spacer = Spring_spacer::constructor;
-    energy_bound_f_ = infinity_f;
-    max_measures_i_ = INT_MAX;
+  get_line_spacer = Spring_spacer::constructor;
+  energy_bound_f_ = infinity_f;
+  max_measures_i_ = INT_MAX;
 }
 
 void
-Gourlay_breaking::do_set_pscore()
+Gourlay_breaking::do_set_pscore ()
 {
-    energy_bound_f_ = pscore_l_->paper_l_->get_var(  "gourlay_energybound");
-    max_measures_i_ =int (rint( pscore_l_->paper_l_->get_var(  "gourlay_maxmeasures")));
+  energy_bound_f_ = pscore_l_->paper_l_->get_var ("gourlay_energybound");
+  max_measures_i_ =int (rint (pscore_l_->paper_l_->get_var ("gourlay_maxmeasures")));
 }