lily/ligature-bracket-engraver.cc

   1 /*
   2   ligature-bracket-engraver.cc -- implement Ligature_bracket_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2002--2007 Juergen Reuter <reuter@ipd.uka.de>
   7 */
   8
   9 #include "international.hh"
  10
  11 #include "ligature-engraver.hh"
  12 #include "note-column.hh"
  13 #include "tuplet-bracket.hh"
  14 #include "spanner.hh"
  15 #include "stream-event.hh"
  16 #include "spanner.hh"
  17 #include "item.hh"
  18
  19 #include "translator.icc"
  20
  21 class Ligature_bracket_engraver : public Engraver
  22 {
  23 protected:
  24   virtual void process_music ();
  25   virtual void stop_translation_timestep ();
  26   DECLARE_ACKNOWLEDGER (rest);
  27   DECLARE_ACKNOWLEDGER (note_column);
  28   DECLARE_TRANSLATOR_LISTENER (ligature);
  29 public:
  30   TRANSLATOR_DECLARATIONS (Ligature_bracket_engraver);
  31
  32 private:
  33   Drul_array<Stream_event *> events_drul_;
  34   Spanner *finished_ligature_;
  35   Spanner *ligature_;
  36   Stream_event *previous_start_event_;
  37 };
  38
  39 IMPLEMENT_TRANSLATOR_LISTENER (Ligature_bracket_engraver, ligature);
  40 void
  41 Ligature_bracket_engraver::listen_ligature (Stream_event *ev)
  42 {
  43   Direction d = to_dir (ev->get_property ("span-direction"));
  44   ASSIGN_EVENT_ONCE (events_drul_[d], ev);
  45 }
  46
  47 Ligature_bracket_engraver::Ligature_bracket_engraver ()
  48 {
  49   ligature_ = 0;
  50   finished_ligature_ = 0;
  51   events_drul_[LEFT] = events_drul_[RIGHT] = 0;
  52   previous_start_event_ = 0;
  53 }
  54
  55 void
  56 Ligature_bracket_engraver::process_music()
  57 {
  58   if (events_drul_[STOP])
  59     {
  60       if (!ligature_)
  61         {
  62           events_drul_[STOP]->origin ()->warning (_ ("cannot find start of ligature"));
  63           return;
  64         }
  65
  66       finished_ligature_ = ligature_;
  67       ligature_ = 0;
  68       previous_start_event_ = 0;
  69     }
  70
  71   if (events_drul_[START])
  72     {
  73       if (ligature_)
  74         {
  75           events_drul_[START]->origin ()->warning (_ ("already have a ligature"));
  76           return;
  77         }
  78
  79       previous_start_event_ = events_drul_[START];
  80       ligature_ = make_spanner ("LigatureBracket", events_drul_[START]->self_scm ());
  81     }
  82 }
  83
  84 void
  85 Ligature_bracket_engraver::acknowledge_note_column (Grob_info info)
  86 {
  87   if (ligature_)
  88     {
  89       Tuplet_bracket::add_column (ligature_,
  90                                   info.item ());
  91       add_bound_item (ligature_, info.item());
  92     }
  93 }
  94
  95 void
  96 Ligature_bracket_engraver::acknowledge_rest (Grob_info info)
  97 {
  98   acknowledge_note_column(info);
  99 }
 100
 101
 102 void
 103 Ligature_bracket_engraver::stop_translation_timestep ()
 104 {
 105   events_drul_[LEFT] =
 106     events_drul_[RIGHT] = 0;
 107   finished_ligature_ = 0;
 108 }
 109
 110 ADD_ACKNOWLEDGER (Ligature_bracket_engraver, rest);
 111 ADD_ACKNOWLEDGER (Ligature_bracket_engraver, note_column);
 112
 113 ADD_TRANSLATOR (Ligature_bracket_engraver,
 114                 /* doc */
 115                 "Handle @code{Ligature_events} by engraving @code{Ligature}"
 116                 " brackets.",
 117
 118                 /* create */
 119                 "LigatureBracket ",
 120
 121                 /* read */
 122                 "",
 123
 124                 /* write */
 125                 ""
 126                 );