lily/local-key-engraver.cc

   1 /*
   2   local-key-reg.cc -- implement Local_key_engraver
   3
   4   (c)  1997--1998 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.hh"
  18
  19
  20 Local_key_engraver::Local_key_engraver()
  21 {
  22   key_C_ = 0;
  23   key_item_p_ =0;
  24 }
  25
  26 void
  27 Local_key_engraver::do_creation_processing ()
  28 {
  29   /*
  30     UGHGUHGUH.
  31
  32     Breaks if Key_engraver is removed from under us.
  33    */
  34   Translator * result =
  35     daddy_grav_l()->get_simple_translator (Key_engraver::static_name());
  36
  37   if (!result)
  38     {
  39       warning (_ ("out of tune") + "! " + _ ("can't find") + " Key_engraver");
  40     }
  41   else
  42     {
  43       key_C_ = &((Key_engraver*)result->access_Engraver  ())->key_;
  44       local_key_ = *key_C_;
  45     }
  46 }
  47
  48 void
  49 Local_key_engraver::process_acknowledged ()
  50 {
  51   if (!key_item_p_ && mel_l_arr_.size())
  52     {
  53       for (int i=0; i  < mel_l_arr_.size(); i++)
  54         {
  55           Item * support_l = support_l_arr_[i];
  56           Note_req * note_l = mel_l_arr_[i];
  57
  58           if (tied_l_arr_.find_l (support_l) &&
  59               !note_l->forceacc_b_)
  60             continue;
  61
  62           if (!note_l->forceacc_b_
  63               && local_key_.different_acc (note_l->pitch_))
  64             continue;
  65           if (!key_item_p_)
  66             {
  67               key_item_p_ = new Local_key_item;
  68               announce_element (Score_element_info (key_item_p_, 0));
  69             }
  70           ///////// TODO: Handle cautionary accidentals
  71           if (note_l->cautionary_b_)
  72             {
  73               warning (_("cautionary accidentals are not yet supported"));
  74             }
  75
  76           key_item_p_->add (note_l->pitch_);
  77           key_item_p_->add_support (support_l);
  78           local_key_.set (note_l->pitch_);
  79         }
  80
  81     }
  82 }
  83
  84 void
  85 Local_key_engraver::do_pre_move_processing()
  86 {
  87   if (key_item_p_)
  88     {
  89       for (int i=0; i < support_l_arr_.size(); i++)
  90         key_item_p_->add_support (support_l_arr_[i]);
  91
  92       typeset_element (key_item_p_);
  93       key_item_p_ =0;
  94     }
  95
  96   mel_l_arr_.clear();
  97   tied_l_arr_.clear();
  98   support_l_arr_.clear();
  99   forced_l_arr_.clear();
 100 }
 101
 102 void
 103 Local_key_engraver::acknowledge_element (Score_element_info info)
 104 {
 105   Score_element * elem_l = info.elem_l_;
 106   Item * item_l = elem_l->access_Item();
 107
 108   Note_req * note_l = (info.req_l_->access_Musical_req ())
 109     ? info.req_l_->access_Musical_req ()->access_Note_req () : 0;
 110
 111   if (note_l &&  item_l && item_l->is_type_b (Note_head::static_name ()))
 112     {
 113       mel_l_arr_.push (note_l);
 114       support_l_arr_.push (item_l);
 115     }
 116   else if (info.req_l_->access_Command_req ()
 117            && info.req_l_->access_Command_req ()->access_Key_change_req () && key_C_)
 118     {
 119       local_key_ = *key_C_;
 120     }
 121   else if (elem_l->is_type_b (Tie::static_name ()))
 122     {
 123       Tie * tie_l = (Tie*)elem_l->access_Spanner ();
 124       if (tie_l->same_pitch_b_)
 125         tied_l_arr_.push (tie_l-> head_l_drul_[RIGHT]);
 126     }
 127 }
 128
 129 void
 130 Local_key_engraver::do_process_requests()
 131 {
 132   Time_description const * time_C_ = get_staff_info().time_C_;
 133   if (time_C_ && !time_C_->whole_in_measure_)
 134     {
 135       if (key_C_)
 136         local_key_= *key_C_;
 137     }
 138 }
 139
 140
 141 IMPLEMENT_IS_TYPE_B1(Local_key_engraver,Engraver);
 142 ADD_THIS_TRANSLATOR(Local_key_engraver);