]> git.donarmstrong.com Git - lilypond.git/blob - lily/staff-walker.cc
release: 0.0.46.jcn1
[lilypond.git] / lily / staff-walker.cc
1 /*
2   staff-walker.cc -- implement Staff_walker
3
4   source file of the LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9 #include "proto.hh"
10 #include "plist.hh"
11 #include "grouping.hh"
12 #include "staff.hh"
13 #include "musical-request.hh"
14 #include "staff-walker.hh"
15 #include "staff-column.hh"
16 #include "score-column.hh"
17 #include "debug.hh"
18 #include "time-description.hh"
19 #include "command-request.hh"
20 #include "grouping.hh"
21 #include "score-walker.hh"
22
23 Staff_walker::~Staff_walker()
24 {
25     do_pre_move();
26 }
27
28 Staff_walker::Staff_walker(Staff_walker const &s)
29     :PCursor<Staff_column*> (s)
30 {
31     assert(false);
32 }
33
34 Staff_walker::Staff_walker(Staff * s, PScore*ps )
35     : PCursor<Staff_column*> (s->cols_)
36 {
37     staff_l_ = s;
38     pscore_l_ = ps;
39     
40     // should be in tdes. TODO
41     default_grouping = new Rhythmic_grouping(MInterval(0, 1), 4); 
42     score_walk_l_ = 0;
43 }
44
45 Moment
46 Staff_walker::when() const
47 {
48     return ptr()->when();
49 }
50
51
52 void
53 Staff_walker::process_timing_reqs()
54 {
55     for (int i=0; i < ptr()->timing_req_l_arr_.size(); i++) {
56         Timing_req * tr_l = ptr()->timing_req_l_arr_[i];
57         if (tr_l->meterchange()) {
58             int b_i=tr_l->meterchange()->beats_i_;
59             int o_i = tr_l->meterchange()->one_beat_i_;
60             if (! time_.allow_meter_change_b() )
61                 
62                         tr_l->warning("Meterchange should be at start of measure");
63             else
64                 time_.set_meter(b_i, o_i);
65                         
66             *default_grouping = Rhythmic_grouping(
67                 MInterval(0,Moment(b_i, o_i)), b_i);
68         } 
69     }
70     
71     for (int i=0; i < ptr()->timing_req_l_arr_.size(); i++) {
72         Timing_req * tr_l = ptr()->timing_req_l_arr_[i];
73         if (tr_l->partial()) {
74             time_.setpartial(tr_l->partial()->duration_);
75         } else if (tr_l->barcheck() && time_.whole_in_measure_) {
76             tr_l ->warning( "Barcheck failed");
77         } else if (tr_l->cadenza()) {
78             time_.set_cadenza(tr_l->cadenza()->on_b_);
79         } else if (tr_l->measuregrouping()) {
80             *default_grouping = parse_grouping(
81                 tr_l->measuregrouping()->beat_i_arr_,
82                 tr_l->measuregrouping()->elt_length_arr_);
83         }
84     }
85     time_.OK();
86 }
87
88 void
89 Staff_walker::operator++(int i)
90 {
91     Moment last = when();
92
93     do_pre_move();
94     PCursor<Staff_column*>::operator++(i);
95     if (ok() ) {
96         Moment delta_t = when() - last;
97         assert(delta_t >Moment(0));
98         time_.add( delta_t );
99     }
100     do_post_move();
101 }
102
103 void
104 Staff_walker::process()
105 {
106     process_timing_reqs();    
107     process_requests();
108 }
109
110 void 
111 Staff_walker::allow_break()
112 {
113     score_walk_l_->allow_break(this);
114 }
115