lily/base-span-bar-engraver.cc

   1 /*
   2   span-bar-grav.cc -- implement Base_span_bar_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 #include "dimension-cache.hh"
  10 #include "lily-guile.hh"
  11 #include "span-bar.hh"
  12 #include "base-span-bar-engraver.hh"
  13 #include "axis-align-spanner.hh"
  14
  15 ADD_THIS_TRANSLATOR (Base_span_bar_engraver);
  16
  17 Base_span_bar_engraver::Base_span_bar_engraver()
  18 {
  19   spanbar_p_ =0;
  20   use_priority_b_ = true;
  21 }
  22
  23 Span_bar*
  24 Base_span_bar_engraver::get_span_bar_p() const
  25 {
  26   return new Span_bar;
  27 }
  28
  29
  30 void
  31 Base_span_bar_engraver::acknowledge_element (Score_element_info i)
  32 {
  33   int depth = i.origin_trans_l_arr_.size();
  34   if (depth > 1
  35       && dynamic_cast<Bar *> (i.elem_l_))
  36     {
  37       bar_l_arr_.push (dynamic_cast<Bar *> (i.elem_l_));
  38
  39       if (bar_l_arr_.size() >= 2 && !spanbar_p_)
  40         /*
  41           hmm, i do want a bracket with one staff some times, but not always
  42           if (bar_l_arr_.size() >= 1 && !spanbar_p_)
  43
  44           --jcn
  45         */
  46
  47         /*
  48
  49           use a property?  get_property ("singleStaffBracket", 0) ?
  50
  51           --hwn
  52          */
  53         {
  54           spanbar_p_ = get_span_bar_p();
  55           spanbar_p_->set_parent (bar_l_arr_[0], Y_AXIS);
  56           String visnam =  String(name()) + "-visibility";
  57
  58           spanbar_p_->set_elt_property ("visibility-lambda",
  59                                         ly_eval_str (visnam.ch_C()));
  60
  61           if (use_priority_b_)
  62             {
  63               spanbar_p_->set_elt_property ("break-aligned", SCM_BOOL_T);
  64             }
  65           else
  66             {
  67               spanbar_p_->set_parent (bar_l_arr_[0], X_AXIS);
  68             }
  69
  70           announce_element (Score_element_info (spanbar_p_,0));
  71           if (!gh_string_p (spanbar_p_->get_elt_property ("glyph")))
  72             spanbar_p_-> set_elt_property ("glyph",
  73                                            bar_l_arr_[0]->get_elt_property ("glyph"));
  74         }
  75     }
  76 }
  77
  78 void
  79 Base_span_bar_engraver::do_pre_move_processing()
  80 {
  81   if (spanbar_p_)
  82     {
  83       for (int i=0; i < bar_l_arr_.size() ; i++)
  84         spanbar_p_->add_bar (bar_l_arr_[i]);
  85       typeset_element (spanbar_p_);
  86       spanbar_p_ =0;
  87     }
  88   bar_l_arr_.set_size (0);
  89 }
  90
  91