]> git.donarmstrong.com Git - lilypond.git/blob - lily/abbreviation-beam-engraver.cc
release: 1.1.15
[lilypond.git] / lily / abbreviation-beam-engraver.cc
1 /*
2   abbreviation-beam-engraver.cc -- implement Abbreviation_beam_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7            Jan Nieuwenhuizen <janneke@gnu.org>
8 */
9
10 #include "duration-convert.hh"
11 #include "time-description.hh"
12 #include "abbreviation-beam-engraver.hh"
13 #include "stem.hh"
14 #include "abbreviation-beam.hh"
15 #include "musical-request.hh"
16 #include "misc.hh"
17
18
19 ADD_THIS_TRANSLATOR(Abbreviation_beam_engraver);
20
21 Abbreviation_beam_engraver::Abbreviation_beam_engraver ()
22 {
23   span_reqs_drul_[LEFT] = span_reqs_drul_[RIGHT] = 0;
24   abeam_p_ = 0;
25 }
26
27 bool
28 Abbreviation_beam_engraver::do_try_music (Music*r)
29 {
30   Abbreviation_beam_req * b = dynamic_cast <Abbreviation_beam_req *> (r);
31
32   if (!b)
33     return false;
34
35   if (bool (abeam_p_) == bool (b->spantype_ == START))
36     return false;
37
38   Direction d = (!abeam_p_) ? LEFT : RIGHT;
39   if (span_reqs_drul_[d] && !span_reqs_drul_[d]->equal_b (b))
40     return false;
41
42   span_reqs_drul_[d] = b;
43   return true;
44 }
45
46 void
47 Abbreviation_beam_engraver::do_process_requests ()
48 {
49   if (!abeam_p_ && span_reqs_drul_[LEFT]) {
50     abeam_p_ = new Abbreviation_beam;
51     announce_element (Score_element_info (abeam_p_, span_reqs_drul_[LEFT]));
52   }
53 }
54
55 void
56 Abbreviation_beam_engraver::do_pre_move_processing ()
57 {
58   if (abeam_p_ && span_reqs_drul_[RIGHT]) {
59     typeset_element (abeam_p_);
60     abeam_p_ = 0;
61
62     span_reqs_drul_[RIGHT] =
63       span_reqs_drul_[LEFT] = 0;
64   }
65 }
66
67 void
68 Abbreviation_beam_engraver::do_removal_processing ()
69 {
70   if (abeam_p_)
71     {
72       span_reqs_drul_[LEFT]->warning (_("unterminated beam"));
73       typeset_element (abeam_p_);
74       abeam_p_ = 0;
75     }
76 }
77
78 void
79 Abbreviation_beam_engraver::acknowledge_element (Score_element_info i)
80 {
81   Stem* s = dynamic_cast<Stem *> (i.elem_l_);
82   if (!abeam_p_ || !s)
83     return;
84
85   int type_i = span_reqs_drul_[LEFT]->type_i_;
86   s->flag_i_ = intlog2 (type_i) - 2;
87   s->beams_i_drul_[(span_reqs_drul_[RIGHT]) ? LEFT: RIGHT] = s->flag_i_;
88
89   abeam_p_->multiple_i_ = s->flag_i_;
90   if (s->type_i () != 1) // no abbrev gaps on half note
91     s->beam_gap_i_ = s->flag_i_ - ((s->type_i () >? 2) - 2);
92
93   abeam_p_->add_stem (s);
94 }