lily/extender-spanner.cc

   1 /*
   2   extender-spanner.cc -- implement Extender_spanner
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 /*
  10   TODO: too complicated implementation.  Why the dx_drul?.
  11  */
  12
  13 #
  14 #include "dimension-cache.hh"
  15 #include "box.hh"
  16 #include "debug.hh"
  17 #include "lookup.hh"
  18 #include "molecule.hh"
  19 #include "paper-column.hh"
  20 #include "paper-def.hh"
  21 #include "extender-spanner.hh"
  22
  23 Extender_spanner::Extender_spanner (SCM s)
  24   : Spanner (s)
  25
  26 {
  27   dx_f_drul_[LEFT] = dx_f_drul_[RIGHT] = 0.0;
  28   set_extent_callback (Score_element::point_dimension_callback, Y_AXIS);
  29 }
  30
  31
  32
  33
  34 Molecule
  35 Extender_spanner::do_brew_molecule () const
  36 {
  37   Molecule  mol;
  38
  39   Real w = spanner_length ();
  40
  41   w += (dx_f_drul_[RIGHT] - dx_f_drul_[LEFT]);
  42   Real h = paper_l ()->get_var ("extender_height");
  43   Molecule a = lookup_l ()->filledbox ( Box (Interval (0,w), Interval (0,h)));
  44   a.translate (Offset (dx_f_drul_[LEFT], 0));
  45
  46   mol.add_molecule (a);
  47
  48   return mol;
  49 }
  50
  51
  52
  53 void
  54 Extender_spanner::after_line_breaking ()
  55 {
  56   // UGH
  57   Real gap = paper_l ()->get_var ("interline");
  58
  59   Direction d = LEFT;
  60   do
  61     {
  62       Item* t = get_bound (d)
  63         ? get_bound (d) : get_bound ((Direction)-d);
  64       if (d == LEFT)
  65         dx_f_drul_[d] += t->extent (X_AXIS).length ();
  66       else
  67         dx_f_drul_[d] -= d * gap / 2;
  68     }
  69   while (flip(&d) != LEFT);
  70 }
  71
  72
  73 void
  74 Extender_spanner::set_textitem (Direction d, Item* textitem_l)
  75 {
  76   set_bound (d, textitem_l);
  77   add_dependency (textitem_l);
  78 }
  79
  80