lily/local-key-engraver.cc

   1 /*
   2   local-key-engraver.cc -- implement Local_key_engraver
   3
   4   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   5 */
   6
   7 #include "musical-request.hh"
   8 #include "command-request.hh"
   9 #include "local-key-engraver.hh"
  10 #include "local-key-item.hh"
  11 #include "key-engraver.hh"
  12 #include "debug.hh"
  13 #include "key-item.hh"
  14 #include "tie.hh"
  15 #include "note-head.hh"
  16 #include "time-description.hh"
  17 #include "engraver-group-engraver.hh"
  18 #include "grace-align-item.hh"
  19
  20 Local_key_engraver::Local_key_engraver()
  21 {
  22   key_grav_l_ = 0;
  23   key_item_p_ =0;
  24   grace_align_l_ =0;
  25 }
  26
  27 void
  28 Local_key_engraver::do_creation_processing ()
  29 {
  30   /*
  31     UGHGUHGUH.
  32
  33     Breaks if Key_engraver is removed from under us.
  34    */
  35   Translator * result =
  36     daddy_grav_l()->get_simple_translator ("Key_engraver");
  37
  38   key_grav_l_ = dynamic_cast<Key_engraver *> (result);
  39
  40   if (!key_grav_l_)
  41     {
  42       warning (_ ("out of tune:"));
  43       warning (_f ("Can't find: `%s'", "Key_engraver"));
  44     }
  45   else
  46     {
  47       local_key_ = key_grav_l_->key_;
  48     }
  49
  50   /*
  51     TODO
  52     (if we are grace) get key info from parent Local_key_engraver
  53   */
  54 }
  55
  56 void
  57 Local_key_engraver::process_acknowledged ()
  58 {
  59   if (!key_item_p_ && mel_l_arr_.size())
  60     {
  61       SCM f = get_property ("forgetAccidentals",0);
  62       bool forget = gh_boolean_p (f) && gh_scm2bool(f);
  63       for (int i=0; i  < mel_l_arr_.size(); i++)
  64         {
  65           Item * support_l = support_l_arr_[i];
  66           Note_req * note_l = mel_l_arr_[i];
  67
  68           if (tied_l_arr_.find_l (support_l) && !forget)
  69             local_key_.set (note_l->pitch_);
  70
  71           if (!note_l->forceacc_b_
  72               && local_key_.different_acc (note_l->pitch_))
  73             continue;
  74           if (!key_item_p_)
  75             {
  76               key_item_p_ = new Local_key_item;
  77               announce_element (Score_element_info (key_item_p_, 0));
  78             }
  79
  80           key_item_p_->add_pitch (note_l->pitch_,
  81                                   note_l->cautionary_b_);
  82           key_item_p_->add_support (support_l);
  83
  84           if (!forget)
  85             local_key_.set (note_l->pitch_);
  86         }
  87     }
  88   if (key_item_p_ && grace_align_l_)
  89     {
  90       grace_align_l_->add_support (key_item_p_);
  91       grace_align_l_ =0;
  92     }
  93
  94 }
  95
  96 void
  97 Local_key_engraver::do_removal_processing ()
  98 {
  99   // TODO: signal accidentals to Local_key_engraver the
 100 }
 101
 102 void
 103 Local_key_engraver::do_pre_move_processing()
 104 {
 105   if (key_item_p_)
 106     {
 107       for (int i=0; i < support_l_arr_.size(); i++)
 108         key_item_p_->add_support (support_l_arr_[i]);
 109
 110       typeset_element (key_item_p_);
 111       key_item_p_ =0;
 112     }
 113
 114   grace_align_l_ = 0;
 115   mel_l_arr_.clear();
 116   tied_l_arr_.clear();
 117   support_l_arr_.clear();
 118   forced_l_arr_.clear();
 119 }
 120
 121 void
 122 Local_key_engraver::acknowledge_element (Score_element_info info)
 123 {
 124   SCM wg= get_property ("weAreGraceContext", 0);
 125
 126   bool selfgr = gh_boolean_p (wg) &&gh_scm2bool (wg);
 127   bool he_gr = info.elem_l_->get_elt_property ("grace") != SCM_UNDEFINED;
 128
 129   Grace_align_item * gai = dynamic_cast<Grace_align_item*> (info.elem_l_);
 130   if (he_gr && !selfgr && gai)
 131     {
 132       grace_align_l_ = gai;
 133     }
 134   Note_req * note_l =  dynamic_cast <Note_req *> (info.req_l_);
 135   Note_head * note_head = dynamic_cast<Note_head *> (info.elem_l_);
 136
 137
 138
 139   if (he_gr != selfgr)
 140     return;
 141
 142   if (note_l && note_head)
 143     {
 144       mel_l_arr_.push (note_l);
 145       support_l_arr_.push (note_head);
 146     }
 147  else if (Tie * tie_l = dynamic_cast<Tie *> (info.elem_l_))
 148     {
 149       tied_l_arr_.push (tie_l-> head_l_drul_[RIGHT]);
 150     }
 151 }
 152
 153 void
 154 Local_key_engraver::do_process_requests()
 155 {
 156   Time_description const * time_C_ = get_staff_info().time_C_;
 157   if (time_C_ && !time_C_->whole_in_measure_)
 158     {
 159       SCM n =  get_property ("noResetKey",0);
 160       bool no_res = gh_boolean_p (n) && gh_scm2bool (n);
 161       if (!no_res && key_grav_l_)
 162         local_key_= key_grav_l_->key_;
 163     }
 164   else if (key_grav_l_ && key_grav_l_->key_changed_b ())
 165     {
 166       local_key_ = key_grav_l_->key_;
 167     }
 168 }
 169
 170
 171
 172 ADD_THIS_TRANSLATOR(Local_key_engraver);
 173