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