lily/local-key-reg.cc

   1 /*
   2   local-key-reg.cc -- implement Local_key_register
   3
   4   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   5 */
   6
   7 #include "musical-request.hh"
   8 #include "command-request.hh"
   9 #include "local-key-reg.hh"
  10 #include "local-key-item.hh"
  11 #include "complex-walker.hh"
  12 #include "key-reg.hh"
  13 #include "debug.hh"
  14 #include "key-item.hh"
  15 #include "tie.hh"
  16 #include "notehead.hh"
  17
  18 Local_key_register::Local_key_register()
  19 {
  20     key_C_ = 0;
  21 }
  22
  23 void
  24 Local_key_register::pre_move_processing()
  25 {
  26     if (mel_l_arr_.size()) {
  27         Local_key_item *key_item_p = 0;
  28         for (int i=0; i  < mel_l_arr_.size(); i++) {
  29             Item * support_l = support_l_arr_[i];
  30
  31             Note_req * note_l = mel_l_arr_[i];
  32             if (tied_l_arr_.find_l(support_l) &&
  33                 !forced_l_arr_.find_l(support_l))
  34                 continue;
  35
  36             if (!key_item_p)
  37                 key_item_p = new Local_key_item(*get_staff_info().c0_position_i_l_);
  38             key_item_p->add(note_l);
  39             key_item_p->add(support_l);
  40             local_key_.oct(note_l->octave_i_)
  41                 .set(note_l->notename_i_, note_l->accidental_i_);
  42         }
  43         if (key_item_p)
  44             typeset_element(key_item_p);
  45     }
  46     mel_l_arr_.set_size(0);
  47     tied_l_arr_.set_size(0);
  48     support_l_arr_.set_size(0);
  49     forced_l_arr_.set_size(0);
  50 }
  51
  52 void
  53 Local_key_register::acknowledge_element(Score_elem_info info)
  54 {
  55     Score_elem * elem_l = info.elem_l_;
  56     if (info.req_l_->note()) {
  57         Note_req * note_l = info.req_l_->note();
  58         Item * item_l = info.elem_l_->item();
  59
  60         if( note_l->forceacc_b_ ||
  61             local_key_.oct(note_l->octave_i_).acc(note_l->notename_i_)
  62             != note_l->accidental_i_) {
  63             mel_l_arr_.push(note_l );
  64             support_l_arr_.push(item_l);
  65             if (note_l->forceacc_b_)
  66                 forced_l_arr_.push(item_l);
  67         }
  68     } else if (info.req_l_->command()
  69                && info.req_l_->command()->keychange()) {
  70         Key_register * key_reg_l =
  71             (Key_register*)info.origin_reg_l_arr_[0];
  72         key_C_ = &key_reg_l->key_;
  73         local_key_ = *key_C_;
  74     } else if (elem_l->name() == Key_item::static_name()) {
  75         Key_register * key_reg_l =
  76             (Key_register*)info.origin_reg_l_arr_[0];
  77         key_C_ = &key_reg_l->key_;
  78     } else if (elem_l->name() == Tie::static_name()) {
  79         Tie * tie_l = (Tie*)elem_l->spanner();
  80         if (tie_l->same_pitch_b_)
  81             tied_l_arr_.push(tie_l-> right_head_l_ );
  82     }
  83 }
  84
  85 void
  86 Local_key_register::process_requests()
  87 {
  88     Time_description const * time_C_ = get_staff_info().time_C_;
  89     if (! time_C_->whole_in_measure_){
  90         if (key_C_)
  91             local_key_= *key_C_;
  92         else if( time_C_->when_ >Moment(0))
  93             warning ("Help me! can't figure out current key");
  94     }
  95 }
  96
  97 IMPLEMENT_STATIC_NAME(Local_key_register);
  98 ADD_THIS_REGISTER(Local_key_register);