X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fcustos-engraver.cc;h=78342bbfed5351a2ead9293539525f1329627831;hb=ca20eaa74e7e762c0611de26cc2267909ae27e02;hp=5f15194535d0f82afc1cc53ef1db223e8c39cde7;hpb=867530093ed5374d6e28d2c11a933f3b991c226e;p=lilypond.git diff --git a/lily/custos-engraver.cc b/lily/custos-engraver.cc index 5f15194535..78342bbfed 100644 --- a/lily/custos-engraver.cc +++ b/lily/custos-engraver.cc @@ -3,40 +3,39 @@ source file of the GNU LilyPond music typesetter - (C) 2000 Juergen Reuter , - - Han-Wen Nienhuys - + (c) 2000--2005 Juergen Reuter , + Han-Wen Nienhuys */ #include "engraver.hh" -#include "bar.hh" +#include "bar-line.hh" #include "item.hh" #include "note-head.hh" #include "staff-symbol-referencer.hh" #include "warn.hh" -#include "musical-request.hh" /* - This class implements an engraver for custos symbols. -*/ + * This class implements an engraver for custos symbols. + * + * FIXME: note heads inside of ligatures (i.e. ligature heads) are + * sometimes not recognized by this engraver. --jr + */ class Custos_engraver : public Engraver { public: - Custos_engraver(); - virtual void do_post_move_processing(); - virtual void acknowledge_element(Score_element_info); - virtual void do_process_music (); - virtual void process_acknowledged (); - virtual void do_pre_move_processing (); - virtual void do_removal_processing (); - VIRTUAL_COPY_CONS(Translator); + TRANSLATOR_DECLARATIONS (Custos_engraver); + virtual void start_translation_timestep (); + virtual void acknowledge_grob (Grob_info); + virtual void process_acknowledged_grobs (); + virtual void stop_translation_timestep (); + virtual void finalize (); + private: - Item * create_custos(); + Item * create_custos (); bool custos_permitted; - Link_array custos_arr_; - Array pitches_; + Link_array custodes_; + Array pitches_; }; Custos_engraver::Custos_engraver () @@ -46,46 +45,35 @@ Custos_engraver::Custos_engraver () void -Custos_engraver::do_pre_move_processing() +Custos_engraver::stop_translation_timestep () { /* delay typeset until we're at the next moment, so we can silence custodes at the end of the piece. */ -} - -void -Custos_engraver::do_post_move_processing () -{ - for (int i = custos_arr_.size (); i--;) - { - typeset_element (custos_arr_[i]); - } - custos_arr_.clear (); pitches_.clear (); custos_permitted = false; } - -/* - TODO check if this works with forced bar lines? - */ void -Custos_engraver::do_process_music () +Custos_engraver::start_translation_timestep () { - if (gh_string_p (get_property( "whichBar"))) - custos_permitted = true; + custodes_.clear (); } + void -Custos_engraver::acknowledge_element (Score_element_info info) +Custos_engraver::acknowledge_grob (Grob_info info) { - Item *item = dynamic_cast (info.elem_l_); + Item *item = dynamic_cast (info.grob_); if (item) { - if (Bar::has_interface (info.elem_l_)) + Music * m = info.music_cause (); + if (Bar_line::has_interface (info.grob_)) custos_permitted = true; - else if (Note_head::has_interface (info.elem_l_)) + else if (Note_head::has_interface (info.grob_) + && m + && m->is_mus_type ("note-event")) { /* @@ -96,23 +84,31 @@ Custos_engraver::acknowledge_element (Score_element_info info) don't look at the staff-position, since we can't be sure whether Clef_engraver already applied a vertical shift. */ - - pitches_.push (dynamic_cast (info.req_l_)->pitch_); + pitches_.push (*unsmob_pitch (m->get_property ("pitch"))); } } } void -Custos_engraver::process_acknowledged () +Custos_engraver::process_acknowledged_grobs () { + if (scm_is_string (get_property ("whichBar"))) + custos_permitted = true; + if (custos_permitted) { for (int i = pitches_.size (); i--;) { Item *c = create_custos (); + + int p = pitches_[i].steps (); + SCM c0 = get_property ("middleCPosition"); + if (scm_is_number (c0)) + p += scm_to_int (c0); + - c->set_elt_property ("staff-position", - gh_int2scm (pitches_[i].steps ())); + c->set_property ("staff-position", + scm_int2num (p)); } @@ -121,27 +117,32 @@ Custos_engraver::process_acknowledged () } Item* -Custos_engraver::create_custos() +Custos_engraver::create_custos () { - SCM basicProperties = get_property ("Custos"); - Item* custos = new Item (basicProperties); + Item* custos = make_item ("Custos", SCM_EOL); - announce_element (custos, 0); - custos_arr_.push (custos); + + custodes_.push (custos); return custos; } void -Custos_engraver::do_removal_processing () +Custos_engraver::finalize () { - for (int i = custos_arr_.size (); i--;) + for (int i = custodes_.size (); i--;) { - custos_arr_[i]->suicide (); - typeset_element (custos_arr_[i]); + custodes_[i]->suicide (); } - custos_arr_.clear (); + custodes_.clear (); } -ADD_THIS_TRANSLATOR (Custos_engraver); + +ADD_TRANSLATOR (Custos_engraver, +/* descr */ "", +/* creats*/ "Custos", +/* accepts */ "", +/* acks */ "bar-line-interface note-head-interface", +/* reads */ "", +/* write */ "");