X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstaff-symbol-engraver.cc;h=fad9f0437900d5765301d6eb82376b9ce714d38e;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=3baf35e3ef9e816d1994d8b90b94cb1a9af9aa7d;hpb=e4f07a592ebde9621dede5a47430a51b9c232eb3;p=lilypond.git diff --git a/lily/staff-symbol-engraver.cc b/lily/staff-symbol-engraver.cc index 3baf35e3ef..fad9f04379 100644 --- a/lily/staff-symbol-engraver.cc +++ b/lily/staff-symbol-engraver.cc @@ -1,79 +1,186 @@ /* - staff-sym-reg.cc -- implement Staff_symbol_engraver + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2015 Han-Wen Nienhuys - (c) 1997--2000 Han-Wen Nienhuys + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ -#include "staff-symbol.hh" -#include "score.hh" -#include "paper-column.hh" -#include "paper-def.hh" -#include "side-position-interface.hh" #include "engraver.hh" -#include "moment.hh" +#include "international.hh" +#include "spanner.hh" +#include "stream-event.hh" +#include "warn.hh" + +#include "translator.icc" -/** - Manage the staff symbol. - */ -class Staff_symbol_engraver : public Engraver { - Staff_symbol *span_p_; +class Staff_symbol_engraver : public Engraver +{ public: - VIRTUAL_COPY_CONS(Translator); - Staff_symbol_engraver(); - + TRANSLATOR_DECLARATIONS (Staff_symbol_engraver); + protected: - virtual ~Staff_symbol_engraver(); + Drul_array span_events_; + Spanner *span_; + Spanner *finished_span_; + bool first_start_; - virtual void acknowledge_element (Score_element_info); - virtual void do_removal_processing(); - virtual void do_creation_processing(); - +protected: + virtual void start_spanner (); + virtual void stop_spanner (); + + void stop_translation_timestep (); + virtual ~Staff_symbol_engraver (); + void acknowledge_grob (Grob_info); + void listen_staff_span (Stream_event *); + virtual void finalize (); + void process_music (); + virtual void derived_mark () const; }; +void +Staff_symbol_engraver::derived_mark () const +{ + for (LEFT_and_RIGHT (d)) + { + if (span_events_[d]) + scm_gc_mark (span_events_[d]->self_scm ()); + } +} + +Staff_symbol_engraver::~Staff_symbol_engraver () +{ + if (span_) + { + // Somehow finalize() was not called? + programming_error ("Have a pending spanner in destructor."); + } +} -Staff_symbol_engraver::~Staff_symbol_engraver() +Staff_symbol_engraver::Staff_symbol_engraver (Context *c) + : Engraver (c) { - assert (!span_p_); + finished_span_ = 0; + first_start_ = true; + span_ = 0; + span_events_.set (0, 0); } -Staff_symbol_engraver::Staff_symbol_engraver() +void +Staff_symbol_engraver::listen_staff_span (Stream_event *ev) { - span_p_ = 0; + Direction d = to_dir (ev->get_property ("span-direction")); + if (d) + ASSIGN_EVENT_ONCE (span_events_[d], ev); + else + programming_error ("staff-span event has no direction"); } void -Staff_symbol_engraver::do_creation_processing() +Staff_symbol_engraver::process_music () { - span_p_ = new Staff_symbol; - span_p_->set_bound(LEFT,get_staff_info().command_pcol_l ()); - announce_element (Score_element_info (span_p_, 0)); + if (span_events_[STOP]) + { + finished_span_ = span_; + span_ = 0; + if (first_start_) + first_start_ = false; + } + + if (span_events_[START] + || (first_start_ && !span_events_[STOP])) + start_spanner (); } void -Staff_symbol_engraver::do_removal_processing() +Staff_symbol_engraver::start_spanner () { - SCM n = get_property ("numberOfStaffLines"); - SCM ss = get_property ("staffSpace"); + if (!span_) + { + span_ = make_spanner ("StaffSymbol", SCM_EOL); + span_->set_bound (LEFT, + unsmob (get_property ("currentCommandColumn"))); + } +} + +void +Staff_symbol_engraver::stop_spanner () +{ + if (!finished_span_) + return; + + if (!finished_span_->get_bound (RIGHT)) + finished_span_->set_bound (RIGHT, unsmob (get_property ("currentCommandColumn"))); - if (gh_number_p (ss)) - span_p_->set_elt_property ("staff-space", ss); - if (gh_number_p (n)) - span_p_->set_elt_property ("line-count", n); + announce_end_grob (finished_span_, + span_events_[STOP] + ? span_events_[STOP]->self_scm () + : SCM_EOL); - span_p_->set_bound(RIGHT,get_staff_info().command_pcol_l ()); - typeset_element (span_p_); - span_p_ =0; + finished_span_ = 0; } void -Staff_symbol_engraver::acknowledge_element (Score_element_info s) +Staff_symbol_engraver::stop_translation_timestep () { - s.elem_l_->set_elt_pointer ("staff-symbol", span_p_->self_scm_); - s.elem_l_->add_dependency (span_p_); // UGH. UGH. UGH + if ((span_events_[START] || first_start_) + && span_) + first_start_ = false; + + span_events_.set (0, 0); + stop_spanner (); +} + +void +Staff_symbol_engraver::finalize () +{ + finished_span_ = span_; + span_ = 0; + stop_spanner (); } +/* + Todo: staff-symbol-referencer iface. +*/ +void +Staff_symbol_engraver::acknowledge_grob (Grob_info s) +{ + if (span_ || finished_span_) + { + Spanner *my = span_ ? span_ : finished_span_; + s.grob ()->set_object ("staff-symbol", my->self_scm ()); + } +} + + +void +Staff_symbol_engraver::boot () +{ + ADD_LISTENER (Staff_symbol_engraver, staff_span); + ADD_ACKNOWLEDGER (Staff_symbol_engraver, grob); +} + +ADD_TRANSLATOR (Staff_symbol_engraver, + /* doc */ + "Create the constellation of five (default) staff lines.", + + /* create */ + "StaffSymbol ", -ADD_THIS_TRANSLATOR(Staff_symbol_engraver); + /* read */ + "", + /* write */ + "" + );