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--2000 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
  14 Base_span_bar_engraver::Base_span_bar_engraver()
  15 {
  16   spanbar_p_ =0;
  17   use_priority_b_ = true;
  18 }
  19
  20 Span_bar*
  21 Base_span_bar_engraver::get_span_bar_p() const
  22 {
  23   return new Span_bar;
  24 }
  25
  26
  27 void
  28 Base_span_bar_engraver::acknowledge_element (Score_element_info i)
  29 {
  30   int depth = i.origin_trans_l_arr (this).size();
  31   if (depth > 1
  32       && dynamic_cast<Bar *> (i.elem_l_))
  33     {
  34       bar_l_arr_.push (dynamic_cast<Bar *> (i.elem_l_));
  35
  36       if (bar_l_arr_.size() >= 2 && !spanbar_p_)
  37         /*
  38           hmm, i do want a bracket with one staff some times, but not always
  39           if (bar_l_arr_.size() >= 1 && !spanbar_p_)
  40
  41           --jcn
  42         */
  43
  44         /*
  45
  46           use a property?  get_property ("singleStaffBracket"); ?
  47
  48           --hwn
  49          */
  50         {
  51           spanbar_p_ = get_span_bar_p();
  52           spanbar_p_->set_parent (bar_l_arr_[0], Y_AXIS);
  53
  54           /*
  55             UGH. UGH UUHGK GUHG G
  56             (ly_eval_str ??)
  57            */
  58           String visnam =  String(name()) + "-visibility";
  59
  60           spanbar_p_->set_elt_property ("visibility-lambda",
  61                                         ly_eval_str (visnam.ch_C()));
  62
  63           if (use_priority_b_)
  64             {
  65               spanbar_p_->set_elt_property ("break-aligned", SCM_BOOL_T);
  66             }
  67           else
  68             {
  69               spanbar_p_->set_parent (bar_l_arr_[0], X_AXIS);
  70             }
  71
  72           announce_element (Score_element_info (spanbar_p_,0));
  73           if (!gh_string_p (spanbar_p_->get_elt_property ("glyph")))
  74             spanbar_p_-> set_elt_property ("glyph",
  75                                            bar_l_arr_[0]->get_elt_property ("glyph"));
  76         }
  77     }
  78 }
  79
  80 void
  81 Base_span_bar_engraver::do_pre_move_processing()
  82 {
  83   if (spanbar_p_)
  84     {
  85       for (int i=0; i < bar_l_arr_.size() ; i++)
  86         spanbar_p_->add_bar (bar_l_arr_[i]);
  87       typeset_element (spanbar_p_);
  88       spanbar_p_ =0;
  89     }
  90   bar_l_arr_.set_size (0);
  91 }
  92
  93
  94
  95 ADD_THIS_TRANSLATOR(Base_span_bar_engraver);
  96