*** empty log message ***
[lilypond.git] / lily / piano-pedal-performer.cc
blob8393fbe83d7079a1167f155b9a3b530552293444
1 /*
2 piano-pedal-performer.cc -- implement Piano_pedal_performer
4 source file of the GNU LilyPond music typesetter
6 (c) 2000--2005 Jan Nieuwenhuizen <janneke@gnu.org>
7 */
9 #include "performer.hh"
10 #include "audio-item.hh"
12 /**
13 perform Piano pedals
15 class Piano_pedal_performer : public Performer
17 struct Pedal_info
19 char const *name_;
20 Music *start_req_;
21 Drul_array<Music *> req_drul_;
24 public:
25 TRANSLATOR_DECLARATIONS (Piano_pedal_performer);
26 ~Piano_pedal_performer ();
28 protected:
29 virtual void initialize ();
30 virtual bool try_music (Music *);
31 virtual void create_audio_elements ();
32 virtual void stop_translation_timestep ();
33 virtual void start_translation_timestep ();
35 private:
36 Link_array<Audio_piano_pedal> audios_;
37 Pedal_info *info_alist_;
40 Piano_pedal_performer::Piano_pedal_performer ()
42 info_alist_ = 0;
45 Piano_pedal_performer::~Piano_pedal_performer ()
47 delete[] info_alist_;
50 void
51 Piano_pedal_performer::initialize ()
53 info_alist_ = new Pedal_info[4];
54 Pedal_info *p = info_alist_;
56 char *names [] = { "Sostenuto", "Sustain", "UnaCorda", 0 };
57 char **np = names;
60 p->name_ = *np;
61 p->req_drul_[START] = 0;
62 p->req_drul_[STOP] = 0;
63 p->start_req_ = 0;
65 p++;
67 while (* (np++));
70 void
71 Piano_pedal_performer::create_audio_elements ()
73 for (Pedal_info *p = info_alist_; p && p->name_; p++)
76 if (p->req_drul_[STOP])
78 if (!p->start_req_)
80 p->req_drul_[STOP]->origin ()->warning (_f ("can't find start of piano pedal: `%s'", String (p->name_)));
82 else
84 Audio_piano_pedal *a = new Audio_piano_pedal;
85 a->type_string_ = String (p->name_);
86 a->dir_ = STOP;
87 audios_.push (a);
89 p->start_req_ = 0;
92 if (p->req_drul_[START])
94 p->start_req_ = p->req_drul_[START];
95 Audio_piano_pedal *a = new Audio_piano_pedal;
96 a->type_string_ = String (p->name_);
97 a->dir_ = START;
98 audios_.push (a);
100 p->req_drul_[START] = 0;
101 p->req_drul_[STOP] = 0;
105 void
106 Piano_pedal_performer::stop_translation_timestep ()
108 for (int i = 0; i < audios_.size (); i++)
109 play_element (audios_[i]);
110 audios_.clear ();
113 void
114 Piano_pedal_performer::start_translation_timestep ()
116 for (Pedal_info *p = info_alist_; p && p->name_; p++)
118 p->req_drul_[STOP] = 0;
119 p->req_drul_[START] = 0;
123 bool
124 Piano_pedal_performer::try_music (Music *r)
126 if (r->is_mus_type ("pedal-event"))
128 for (Pedal_info *p = info_alist_; p->name_; p++)
130 String nm = p->name_ + String ("Event");
131 if (ly_c_equal_p (r->get_property ("name"),
132 scm_str2symbol (nm.to_str0 ())))
134 Direction d = to_dir (r->get_property ("span-direction"));
135 p->req_drul_[d] = r;
136 return true;
140 return false;
143 ADD_TRANSLATOR (Piano_pedal_performer, "", "",
144 "pedal-event",
145 "", "", "");