]> git.donarmstrong.com Git - lilypond.git/blob - lily/local-key-engraver.cc
release: 1.1.52
[lilypond.git] / lily / local-key-engraver.cc
1 /*
2   local-key-reg.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
19
20 Local_key_engraver::Local_key_engraver()
21 {
22   key_grav_l_ = 0;
23   key_item_p_ =0;
24   self_grace_b_ = false;
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") + "! " + _ ("can't find") + " Key_engraver");
43     }
44   else
45     {
46       local_key_ = key_grav_l_->key_;
47     }
48
49   self_grace_b_ = get_property ("weAreGraceContext",0 ).to_bool ();
50
51   /*
52     TODO
53     (if we are grace) get key info from parent Local_key_engraver
54   */
55 }
56
57 void
58 Local_key_engraver::process_acknowledged ()
59 {
60   if (!key_item_p_ && mel_l_arr_.size()) 
61     {
62       bool forget = get_property ("forgetAccidentals",0).to_bool();
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) && 
69               !note_l->forceacc_b_)
70             {
71               if (!forget)
72                 local_key_.set (note_l->pitch_);
73               continue;
74             }
75             
76           if (!note_l->forceacc_b_
77               && local_key_.different_acc (note_l->pitch_))
78             continue;
79           if (!key_item_p_) 
80             {
81               key_item_p_ = new Local_key_item;
82               announce_element (Score_element_info (key_item_p_, 0));         
83             }
84
85
86           key_item_p_->add_pitch (note_l->pitch_,
87                                   note_l->cautionary_b_);
88           key_item_p_->add_support (support_l);
89           
90           if (!forget)
91             local_key_.set (note_l->pitch_);
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   mel_l_arr_.clear();
115   tied_l_arr_.clear();
116   support_l_arr_.clear();
117   forced_l_arr_.clear();        
118 }
119
120 void
121 Local_key_engraver::acknowledge_element (Score_element_info info)
122 {    
123   Note_req * note_l =  dynamic_cast <Note_req *> (info.req_l_);
124   Note_head * note_head = dynamic_cast<Note_head *> (info.elem_l_);
125
126   bool gr = (info.elem_l_->get_elt_property (grace_scm_sym)!=SCM_BOOL_F);
127   if (gr != self_grace_b_)
128     return;
129   
130   if (note_l && note_head)
131     {
132       mel_l_arr_.push (note_l);
133       support_l_arr_.push (note_head);
134     }
135  else if (Tie * tie_l = dynamic_cast<Tie *> (info.elem_l_))
136     {
137       tied_l_arr_.push (tie_l-> head_l_drul_[RIGHT]);
138     }
139 }
140
141 void
142 Local_key_engraver::do_process_requests()
143 {
144   Time_description const * time_C_ = get_staff_info().time_C_;
145   if (time_C_ && !time_C_->whole_in_measure_)
146     {
147       bool no_res = get_property ("noResetKey",0).to_bool ();
148       if (!no_res && key_grav_l_)
149         local_key_= key_grav_l_->key_;
150     }
151   else if (key_grav_l_ && key_grav_l_->key_changed_b ())
152     {
153       local_key_ = key_grav_l_->key_;
154     }
155 }
156
157
158
159 ADD_THIS_TRANSLATOR(Local_key_engraver);