lily/text-spanner.cc

   1 /*
   2   text-spanner.cc -- implement Text_spanner
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "molecule.hh"
  10 #include "boxes.hh"
  11 #include "text-spanner.hh"
  12 #include "text-def.hh"
  13 #include "debug.hh"
  14 #include "paper-def.hh"
  15 #include "symbol.hh"
  16
  17
  18 void
  19 Text_spanner::set_support(Directional_spanner*d)
  20 {
  21     if (support)
  22         remove_dependency(support);
  23
  24     support =d;
  25     add_dependency(d);
  26 }
  27
  28 Text_spanner::Text_spanner()
  29 {
  30     spec_p_ = 0;
  31     support = 0;
  32 }
  33
  34 IMPLEMENT_STATIC_NAME(Text_spanner);
  35 IMPLEMENT_IS_TYPE_B1(Text_spanner,Spanner);
  36
  37 void
  38 Text_spanner::do_print() const
  39 {
  40     spec_p_->print();
  41 }
  42
  43 void
  44 Text_spanner::do_post_processing()
  45 {
  46     text_off_ = support->center() +
  47         Offset(0,support->dir_i_ * paper()->internote_f() * 4); // todo
  48 }
  49
  50 Molecule*
  51 Text_spanner::brew_molecule_p() const
  52 {
  53     Atom tsym (spec_p_->get_atom(paper(),0));
  54     tsym.translate(text_off_);
  55
  56     Molecule*output = new Molecule;
  57     output->add( tsym );
  58     return output;
  59 }
  60
  61 void
  62 Text_spanner::do_pre_processing()
  63 {
  64     right_col_l_ = support->right_col_l_;
  65     left_col_l_ = support->left_col_l_;
  66     assert(left_col_l_ && right_col_l_);
  67 }
  68
  69 Interval
  70 Text_spanner::height()const
  71 {
  72     return brew_molecule_p()->extent().y;
  73 }
  74
  75 void
  76 Text_spanner::do_substitute_dependency(Score_elem* o, Score_elem*n)
  77 {
  78     Directional_spanner * old = (Directional_spanner*)o->spanner();
  79     if (support == old)
  80         support = (Directional_spanner*) n->spanner();
  81 }
  82
  83
  84 Text_spanner::~Text_spanner()
  85 {
  86     delete spec_p_;
  87 }