lily/dimension-cache.cc

   1 /*
   2   dimension-cache.cc --  implement Dimension_cache
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7  */
   8
   9 #include "dimension-cache.hh"
  10 #include "parray.hh"
  11 #include "score-element.hh"
  12
  13
  14 Dimension_cache::Dimension_cache (Dimension_cache const &d)
  15 {
  16   init();
  17   callback_l_ = d.callback_l_;
  18   basic_offset_ = d.basic_offset_;
  19   extra_offset_ = d.extra_offset_;
  20   off_valid_b_ = d.off_valid_b_;
  21   off_callbacks_ = d.off_callbacks_;
  22   parent_l_ = d.parent_l_;
  23 }
  24
  25 Dimension_cache::Dimension_cache ()
  26 {
  27   init();
  28 }
  29
  30 void
  31 Dimension_cache::init()
  32 {
  33   callback_l_ =0;
  34
  35   basic_offset_ =0.0;
  36   extra_offset_ =0.0;
  37
  38   elt_l_ = 0;
  39   dim_.set_empty ();
  40   parent_l_ =0;
  41   valid_b_ = false;
  42   off_valid_b_ = false;
  43 }
  44
  45
  46 void
  47 Dimension_cache::invalidate ()
  48 {
  49   /*  off_valid_b_ =false;
  50       valid_b_ = false;*/
  51 }
  52
  53
  54 void
  55 Dimension_cache::set_offset (Real x)
  56 {
  57   // ugh!
  58   /*
  59
  60     UGH ! UGH !
  61
  62    */
  63
  64   extra_offset_ = x;
  65 }
  66
  67 void
  68 Dimension_cache::translate (Real x)
  69 {
  70   extra_offset_ += x;
  71 }
  72
  73 Real
  74 Dimension_cache::relative_coordinate (Dimension_cache *refp) const
  75 {
  76   if (refp == this)
  77     return 0.0;
  78
  79   /*
  80     We catch PARENT_L_ == nil case with this, but we crash if we did
  81     not ask for the absolute coordinate (ie. REFP == nil.)
  82
  83    */
  84   if (refp == parent_l_)
  85     return get_offset ();
  86   else
  87     return get_offset () + parent_l_->relative_coordinate (refp);
  88 }
  89
  90 Axis
  91 Dimension_cache::axis () const
  92 {
  93   if (elt_l_-> dim_cache_[X_AXIS] == this)
  94     return X_AXIS;
  95   else
  96     return Y_AXIS;
  97 }
  98
  99 Real
 100 Dimension_cache::get_offset () const
 101 {
 102   Dimension_cache *me = (Dimension_cache*) this;
 103   while (off_callbacks_.size ())
 104     {
 105       Offset_cache_callback c = me->off_callbacks_[0];
 106       me->off_callbacks_.del (0);
 107       me->basic_offset_ += (*c) (me);
 108     }
 109   return basic_offset_ + extra_offset_;
 110 }
 111
 112 Dimension_cache *
 113 Dimension_cache::common_refpoint (Dimension_cache const* s) const
 114 {
 115   Link_array<Dimension_cache> my_groups;
 116   for (Dimension_cache const *c = this; c ; c = c->parent_l_)
 117     my_groups.push ((Dimension_cache*)c);
 118
 119   Dimension_cache const *common=0;
 120
 121   for (Dimension_cache const * d = s; !common && d; d = d->parent_l_)
 122     common = (Dimension_cache const*)my_groups.find_l (d);
 123
 124   return (Dimension_cache*) common;
 125 }
 126
 127 Interval
 128 Dimension_cache::point_dimension_callback (Dimension_cache const* )
 129 {
 130   return Interval (0,0);
 131 }
 132
 133 Interval
 134 Dimension_cache::get_dim () const
 135 {
 136   Interval r;
 137   Dimension_cache *nc = ((Dimension_cache*)this);
 138   if (!callback_l_)
 139     {
 140       nc->dim_.set_empty ();
 141     }
 142   else if (!valid_b_)
 143     {
 144
 145       nc->dim_= (*callback_l_ ) (nc);
 146       nc->valid_b_ = true;
 147     }
 148
 149   r=dim_;
 150   return r;
 151 }
 152
 153 void
 154 Dimension_cache::set_callback (Dim_cache_callback c)
 155 {
 156   callback_l_ =c;
 157 }
 158
 159