Release: bump Welcome versions.

[lilypond.git] / lily / ligature-bracket-engraver.cc

diff --git a/lily/ligature-bracket-engraver.cc b/lily/ligature-bracket-engraver.cc
index 8f1c18a50b6524cfa1fffcd26fee190584b93161..9e50962ddcb2473a0158068bb26f13e67ff81568 100644 (file)
--- a/lily/ligature-bracket-engraver.cc
+++ b/lily/ligature-bracket-engraver.cc
@@ -1,71 +1,141 @@
-/*   
-  ligature-bracket-engraver.cc -- implement Ligature_bracket_engraver
-  
-  source file of the GNU LilyPond music typesetter
-  
-  (c) 2002--2003 Juergen Reuter <reuter@ipd.uka.de>
-  
- */
-#include "ligature-engraver.hh"
+/*
+  This file is part of LilyPond, the GNU music typesetter.
+
+  Copyright (C) 2002--2015 Juergen Reuter <reuter@ipd.uka.de>
+
+  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 <http://www.gnu.org/licenses/>.
+*/
+
+#include "international.hh"
+
+#include "engraver.hh"
 #include "note-column.hh"
 #include "tuplet-bracket.hh"
 #include "spanner.hh"
+#include "stream-event.hh"
+#include "item.hh"
 
-/*
- * This engraver marks ligatures of any kind by just printing a
- * horizontal square bracket on top of each ligature.  See class
- * Ligature_engraver for more information on the interaction between
- * this class and its superclass.
- */
-class Ligature_bracket_engraver : public Ligature_engraver
+#include "translator.icc"
+
+class Ligature_bracket_engraver : public Engraver
 {
 protected:
-  virtual Spanner *create_ligature_spanner ();
-  virtual void acknowledge_grob (Grob_info);
-  virtual void typeset_ligature (Spanner *ligature, Array<Grob_info>);
-
+  virtual void process_music ();
+  virtual void stop_translation_timestep ();
+  void acknowledge_rest (Grob_info);
+  void acknowledge_note_column (Grob_info);
+  void listen_ligature (Stream_event *);
 public:
-  TRANSLATOR_DECLARATIONS(Ligature_bracket_engraver);
+  TRANSLATOR_DECLARATIONS (Ligature_bracket_engraver);
 
 private:
-  void typeset_ligature_bracket ();
+  Drul_array<Stream_event *> events_drul_;
+  Spanner *finished_ligature_;
+  Spanner *ligature_;
+  Stream_event *previous_start_event_;
 };
 
-
-Ligature_bracket_engraver::Ligature_bracket_engraver ()
+void
+Ligature_bracket_engraver::listen_ligature (Stream_event *ev)
 {
+  Direction d = to_dir (ev->get_property ("span-direction"));
+  ASSIGN_EVENT_ONCE (events_drul_[d], ev);
 }
 
-Spanner *
-Ligature_bracket_engraver::create_ligature_spanner ()
+Ligature_bracket_engraver::Ligature_bracket_engraver (Context *c)
+  : Engraver (c)
 {
-  return new Spanner (get_property ("LigatureBracket"));
+  ligature_ = 0;
+  finished_ligature_ = 0;
+  events_drul_[LEFT] = events_drul_[RIGHT] = 0;
+  previous_start_event_ = 0;
 }
 
 void
-Ligature_bracket_engraver::typeset_ligature (Spanner *ligature, Array<Grob_info>)
+Ligature_bracket_engraver::process_music ()
 {
-  typeset_grob (ligature);
+  if (events_drul_[STOP])
+    {
+      if (!ligature_)
+        {
+          events_drul_[STOP]->origin ()->warning (_ ("cannot find start of ligature"));
+          return;
+        }
+
+      finished_ligature_ = ligature_;
+      ligature_ = 0;
+      previous_start_event_ = 0;
+    }
+
+  if (events_drul_[START])
+    {
+      if (ligature_)
+        {
+          events_drul_[START]->origin ()->warning (_ ("already have a ligature"));
+          return;
+        }
+
+      previous_start_event_ = events_drul_[START];
+      ligature_ = make_spanner ("LigatureBracket", events_drul_[START]->self_scm ());
+    }
 }
 
 void
-Ligature_bracket_engraver::acknowledge_grob (Grob_info info)
+Ligature_bracket_engraver::acknowledge_note_column (Grob_info info)
 {
-  if (current_ligature ())
+  if (ligature_)
     {
-      if (Note_column::has_interface (info.grob_))
-       {
-         Tuplet_bracket::add_column (current_ligature (),
-                                     dynamic_cast<Item*> (info.grob_));
-       }
-      else Ligature_engraver::acknowledge_grob (info);
+      Tuplet_bracket::add_column (ligature_,
+                                  info.item ());
+      add_bound_item (ligature_, info.item ());
     }
 }
 
-ENTER_DESCRIPTION(Ligature_bracket_engraver,
-/* descr */       "Handles Ligature_events by engraving Ligature brackets.",
-/* creats*/       "TupletBracket",
-/* accepts */     "ligature-event abort-event",
-/* acks  */      "ligature-head-interface rest-interface note-column-interface",
-/* reads */       "",
-/* write */       "");
+void
+Ligature_bracket_engraver::acknowledge_rest (Grob_info info)
+{
+  acknowledge_note_column (info);
+}
+
+void
+Ligature_bracket_engraver::stop_translation_timestep ()
+{
+  events_drul_[LEFT]
+    = events_drul_[RIGHT] = 0;
+  finished_ligature_ = 0;
+}
+
+
+void
+Ligature_bracket_engraver::boot ()
+{
+  ADD_LISTENER (Ligature_bracket_engraver, ligature);
+  ADD_ACKNOWLEDGER (Ligature_bracket_engraver, rest);
+  ADD_ACKNOWLEDGER (Ligature_bracket_engraver, note_column);
+}
+
+ADD_TRANSLATOR (Ligature_bracket_engraver,
+                /* doc */
+                "Handle @code{Ligature_events} by engraving @code{Ligature}"
+                " brackets.",
+
+                /* create */
+                "LigatureBracket ",
+
+                /* read */
+                "",
+
+                /* write */
+                ""
+               );