Run `make grand-replace'.

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

diff --git a/lily/ligature-bracket-engraver.cc b/lily/ligature-bracket-engraver.cc
index b95b6b6997a5f4bf015aea9ec38471f5e21513df..98bd944e33e8e782faa06e40a11736f982c144ee 100644 (file)
--- a/lily/ligature-bracket-engraver.cc
+++ b/lily/ligature-bracket-engraver.cc
@@ -1,71 +1,126 @@
-/*   
+/*
   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>
-  
- */
+
+  (c) 2002--2008 Juergen Reuter <reuter@ipd.uka.de>
+*/
+
+#include "international.hh"
+
 #include "ligature-engraver.hh"
 #include "note-column.hh"
 #include "tuplet-bracket.hh"
 #include "spanner.hh"
+#include "stream-event.hh"
+#include "spanner.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 ();
+  DECLARE_ACKNOWLEDGER (rest);
+  DECLARE_ACKNOWLEDGER (note_column);
+  DECLARE_TRANSLATOR_LISTENER (ligature);
 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 ()
+IMPLEMENT_TRANSLATOR_LISTENER (Ligature_bracket_engraver, ligature);
+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 ()
 {
-  return make_spanner ("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",
-/* acks  */      "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;
+}
+
+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 */
+               ""
+               );