]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/bezier.cc
Merge branch 'master' into lilypond/translation
[lilypond.git] / lily / bezier.cc
index 18d7836cbfe1d37762ccf8ce4d5134affe8f949e..ce84ce8da89c7623c68548539c49112c67b4c481 100644 (file)
@@ -1,16 +1,28 @@
 /*
-  bezier.cc -- implement Bezier and Bezier_bow
+  This file is part of LilyPond, the GNU music typesetter.
 
-  source file of the GNU LilyPond music typesetter
+  Copyright (C) 1998--2011 Jan Nieuwenhuizen <janneke@gnu.org>
 
-  (c) 1998--2008 Jan Nieuwenhuizen <janneke@gnu.org>
+  LilyPond is free software: you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation, either version 3 of the License, or
+  (at your option) any later version.
+
+  LilyPond is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "bezier.hh"
 #include "warn.hh"
 #include "libc-extension.hh"
 
-Real binomial_coefficient_3[] = {
+Real binomial_coefficient_3[] =
+{
   1, 3, 3, 1
 };
 
@@ -51,7 +63,7 @@ translate (vector<Offset> *array, Offset o)
 Real
 Bezier::get_other_coordinate (Axis a, Real x) const
 {
-  Axis other = Axis ((a +1) % NO_AXES);
+  Axis other = Axis ((a + 1) % NO_AXES);
   vector<Real> ts = solve_point (a, x);
 
   if (ts.size () == 0)
@@ -69,6 +81,17 @@ Bezier::get_other_coordinate (Axis a, Real x) const
   return curve_coordinate (ts[0], other);
 }
 
+vector<Real>
+Bezier::get_other_coordinates (Axis a, Real x) const
+{
+  Axis other = other_axis (a);
+  vector<Real> ts = solve_point (a, x);
+  vector<Real> sols;
+  for (vsize i = 0; i < ts.size (); i++)
+    sols.push_back (curve_coordinate (ts[i], other));
+  return sols;
+}
+
 Real
 Bezier::curve_coordinate (Real t, Axis a) const
 {
@@ -82,7 +105,7 @@ Bezier::curve_coordinate (Real t, Axis a) const
   for (int j = 0; j < 4; j++)
     {
       r += control_[j][a] * binomial_coefficient_3[j]
-       * tj * one_min_tj[3 - j];
+           * tj * one_min_tj[3 - j];
 
       tj *= t;
     }
@@ -103,7 +126,7 @@ Bezier::curve_point (Real t) const
   for (int j = 0; j < 4; j++)
     {
       o += control_[j] * binomial_coefficient_3[j]
-       * tj * one_min_tj[3 - j];
+           * tj * one_min_tj[3 - j];
 
       tj *= t;
     }
@@ -119,15 +142,16 @@ Bezier::curve_point (Real t) const
 /*
   Cache binom (3, j) t^j (1-t)^{3-j}
 */
-struct Polynomial_cache {
+struct Polynomial_cache
+{
   Polynomial terms_[4];
   Polynomial_cache ()
   {
     for (int j = 0; j <= 3; j++)
       terms_[j]
-       = binomial_coefficient_3[j]
-       * Polynomial::power (j, Polynomial (0, 1))
-       * Polynomial::power (3 - j, Polynomial (1, -1));
+        = binomial_coefficient_3[j]
+          * Polynomial::power (j, Polynomial (0, 1))
+          * Polynomial::power (3 - j, Polynomial (1, -1));
   }
 };
 
@@ -189,13 +213,58 @@ Bezier::solve_point (Axis ax, Real coordinate) const
   return filter_solutions (sol);
 }
 
+Real
+Bezier::minmax (Axis ax, Real l, Real r, Direction d) const
+{
+  return minmax (ax, l, r, d, 0, 0);
+}
+
+Real
+Bezier::minmax (Axis axis, Real l, Real r, Direction d, vsize left_index, vsize right_index) const
+{
+  Axis other = other_axis (axis);
+  Interval lr (l, r);
+  Drul_array<vector<Real> > sol;
+  Direction dir = LEFT;
+  do
+    {
+      Polynomial p (polynomial (axis));
+      p.coefs_[0] -= lr[dir];
+
+      sol[dir] = filter_solutions (p.solve ());
+    }
+  while (flip (&dir) != LEFT);
+
+  if (!sol[LEFT].size () || !sol[RIGHT].size ())
+    {
+      programming_error ("no solution found for Bezier intersection");
+      return 0.0;
+    }
+
+  Polynomial p (polynomial (other));
+
+  Drul_array<vsize> indices(left_index, right_index);
+  do
+    {
+      vector_sort (sol[dir], less<Real> ());
+      if (!Interval (0, sol[LEFT].size () - 1).contains (indices[dir]))
+        {
+          programming_error ("requested bezier solution outside range of solutions.  defaulting to lowest solution.");
+          indices[dir] = 0;
+        }
+    }
+  while (flip (&dir) != LEFT);
+
+  return p.minmax (sol[LEFT][indices[LEFT]], sol[RIGHT][indices[RIGHT]], d != LEFT);
+}
+
 /**
    Compute the bounding box dimensions in direction of A.
 */
 Interval
 Bezier::extent (Axis a) const
 {
-  int o = (a + 1)%NO_AXES;
+  int o = (a + 1) % NO_AXES;
   Offset d;
   d[Axis (o)] = 1.0;
   Interval iv;
@@ -217,10 +286,9 @@ Bezier::control_point_extent (Axis a) const
   for (int i = CONTROL_COUNT; i--;)
     ext.add_point (control_[i][a]);
 
-  return ext;      
+  return ext;
 }
 
-
 /**
    Flip around axis A
 */
@@ -254,7 +322,7 @@ Bezier::assert_sanity () const
 {
   for (int i = 0; i < CONTROL_COUNT; i++)
     assert (!isnan (control_[i].length ())
-           && !isinf (control_[i].length ()));
+            && !isinf (control_[i].length ()));
 }
 
 void
@@ -265,3 +333,51 @@ Bezier::reverse ()
     b2.control_[CONTROL_COUNT - i - 1] = control_[i];
   *this = b2;
 }
+
+/*
+  Subdivide a bezier at T into LEFT_PART and RIGHT_PART
+  using deCasteljau's algorithm.
+*/
+void
+Bezier::subdivide (Real t, Bezier *left_part, Bezier *right_part) const
+{
+  Offset p[CONTROL_COUNT][CONTROL_COUNT];
+
+  for (int i = 0; i < CONTROL_COUNT; i++)
+    p[i][CONTROL_COUNT - 1 ] = control_[i];
+  for (int j = CONTROL_COUNT - 2; j >= 0; j--)
+    for (int i = 0; i < CONTROL_COUNT - 1; i++)
+      p[i][j] = p[i][j + 1] + t * (p[i + 1][j + 1] - p[i][j + 1]);
+  for (int i = 0; i < CONTROL_COUNT; i++)
+    {
+      left_part->control_[i] = p[0][CONTROL_COUNT - 1 - i];
+      right_part->control_[i] = p[i][i];
+    }
+}
+
+/*
+  Extract a portion of a bezier from T_MIN to T_MAX
+*/
+
+Bezier
+Bezier::extract (Real t_min, Real t_max) const
+{
+  if ((t_min < 0) || (t_max) > 1)
+    programming_error
+    ("bezier extract arguments outside of limits: curve may have bad shape");
+  if (t_min >= t_max)
+    programming_error
+    ("lower bezier extract value not less than upper value: curve may have bad shape");
+  Bezier bez1, bez2, bez3, bez4;
+  if (t_min == 0.0)
+    bez2 = *this;
+  else
+    subdivide (t_min, &bez1, &bez2);
+  if (t_max == 1.0)
+    return bez2;
+  else
+    {
+      bez2.subdivide ((t_max - t_min) / (1 - t_min), &bez3, &bez4);
+      return bez3;
+    }
+}