]> git.donarmstrong.com Git - lilypond.git/blob - lily/score-grav.cc
release: 0.0.76
[lilypond.git] / lily / score-grav.cc
1 /*
2   score-grav.cc -- implement Score_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8 #include "super-elem.hh"
9 #include "scoreline.hh"
10 #include "debug.hh"
11 #include "score-elem.hh"
12 #include "bar.hh"               // needed for Bar::static_name
13 #include "staffline.hh"
14 #include "score-grav.hh"
15 #include "p-col.hh"
16 #include "p-score.hh"
17 #include "score.hh"
18 #include "musical-request.hh"
19 #include "score-column.hh"
20 #include "command-request.hh"
21
22
23 void
24 Score_engraver::set_score(Score *s)
25 {
26     Global_translator::set_score(s);
27     scoreline_l_ = s->pscore_p_->super_elem_l_->line_of_score_l_;
28 }
29
30 Score_engraver::Score_engraver()
31 {
32     disallow_break_b_ = false;
33     scoreline_l_ =0;
34     command_column_l_ =0;
35     musical_column_l_ =0;
36     breaks_i_ =0;
37 }
38
39  
40 void
41 Score_engraver::prepare(Moment w)
42 {
43     command_column_l_ = new Score_column(w);
44     musical_column_l_ = new Score_column(w);
45     
46     command_column_l_->musical_b_ = false;
47     musical_column_l_->musical_b_ = true;
48     
49     score_l_->pscore_p_->add(command_column_l_);
50     score_l_->pscore_p_->add(musical_column_l_);
51     disallow_break_b_ = false;
52     post_move_processing();
53 }
54
55 void
56 Score_engraver::finish()
57 {
58     check_removal();
59     do_removal_processing();
60 }
61
62 void
63 Score_engraver::do_creation_processing()
64 {
65     scoreline_l_->left_col_l_ = get_staff_info().command_pcol_l();
66     scoreline_l_->left_col_l_ ->set_breakable();
67     Engraver_group_engraver::do_creation_processing();
68 }
69
70 void
71 Score_engraver::do_removal_processing()
72 {
73     Engraver_group_engraver::do_removal_processing();
74     scoreline_l_->right_col_l_ = get_staff_info().command_pcol_l();
75     scoreline_l_->right_col_l_ ->set_breakable();
76     typeset_all();
77 }
78
79 void
80 Score_engraver::process()
81 {
82         process_requests();
83         do_announces();
84         pre_move_processing();
85         check_removal();
86 }
87
88 void
89 Score_engraver::announce_element(Score_elem_info info)
90 {
91     announce_info_arr_.push(info);
92     info.origin_grav_l_arr_.push(this);
93         
94 }
95 void
96 Score_engraver::do_announces()
97 {
98     /* All elements are propagated to the top upon announcement. If
99       something was created during one run of
100       Engraver_group_engraver::do_announces, then
101       announce_info_arr_.size() will be nonzero again
102
103       */
104     while (announce_info_arr_.size()) {
105         for (int i=0; i <announce_info_arr_.size(); i++)
106             /*
107               TODO
108
109               More subtle spacing
110              */
111             if (announce_info_arr_[i].req_l_) {
112                 Musical_req *m = announce_info_arr_[i].req_l_->musical();
113                 if (m && m->rhythmic()) {
114                     musical_column_l_->add_duration( m->duration());
115                 }
116             }
117         Engraver_group_engraver::do_announces();
118     }
119 }
120
121
122 void
123 Score_engraver::typeset_element(Score_elem *elem_p)
124 {
125     musical_item_p_arr_.push(elem_p);
126 }
127
128 void
129 Score_engraver::typeset_breakable_item(Item * nobreak_p)
130 {
131     if (nobreak_p) {
132         nobreak_item_p_arr_.push(nobreak_p);
133     }
134 }
135
136 void
137 Score_engraver::typeset_all()
138 {
139     PCol * c= get_staff_info().command_pcol_l();
140     PScore *ps_l = score_l_->pscore_p_;
141
142     for  (int i =0; i < nobreak_item_p_arr_.size(); i++) {
143         ps_l->typeset_item(nobreak_item_p_arr_[i], c, 0);
144         scoreline_l_->add_dependency(nobreak_item_p_arr_[i]);
145     }
146     nobreak_item_p_arr_.set_size(0);
147     
148     for (int i=0; i < musical_item_p_arr_.size(); i++) {
149         PCol* m = get_staff_info().musical_pcol_l();
150         Score_elem *elem_p = musical_item_p_arr_[i];
151
152         scoreline_l_->add(elem_p);
153         if (elem_p->spanner()) {
154             ps_l->typeset_unbroken_spanner(elem_p->spanner());
155         } else if (elem_p->item()) {
156             ps_l->typeset_item(elem_p->item(), m, 0);
157         } else
158             assert(false);
159     }
160     musical_item_p_arr_.set_size(0);
161 }
162
163
164 void
165 Score_engraver::do_pre_move_processing()
166 {
167     if ( !disallow_break_b_ ){ 
168         get_staff_info().command_pcol_l()->set_breakable();
169         breaks_i_ ++;
170         if ( ! (breaks_i_%8))
171             *mlog << "[" << breaks_i_ << "]" << flush;
172     }
173     // this generates all items.
174     Engraver_group_engraver::do_pre_move_processing();
175     
176     typeset_all();
177 }
178
179
180 Staff_info
181 Score_engraver::get_staff_info()const
182 {
183     Staff_info inf;
184
185     inf.command_l_ = command_column_l_;
186     inf.musical_l_ = musical_column_l_;
187     return inf;
188 }
189
190 Paper_def*
191 Score_engraver::paper()const
192 {
193     return score_l_->paper_p_;
194 }
195
196
197
198 bool
199 Score_engraver::do_try_request(Request*r)
200 {
201     bool gotcha = false;  
202     for ( int i =0; !gotcha && i < nongroup_l_arr_.size() ; i++)
203         gotcha = nongroup_l_arr_[i]->try_request(r);
204   
205     if ( r->command() && r->command()->disallowbreak())
206             disallow_break_b_ = true;
207     return gotcha;
208 }
209
210 IMPLEMENT_IS_TYPE_B1(Score_engraver,Engraver_group_engraver);
211 IMPLEMENT_STATIC_NAME(Score_engraver);
212 ADD_THIS_ENGRAVER(Score_engraver);
213