lily/glissando-engraver.cc

   1 /*
   2   note-head-line-engraver.cc -- implement Note_head_line_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2000--2008 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "engraver.hh"
  10
  11 #include "international.hh"
  12 #include "rhythmic-head.hh"
  13 #include "spanner.hh"
  14 #include "stream-event.hh"
  15 #include "warn.hh"
  16 #include "item.hh"
  17
  18 #include "translator.icc"
  19
  20 class Glissando_engraver : public Engraver
  21 {
  22 public:
  23   TRANSLATOR_DECLARATIONS (Glissando_engraver);
  24
  25 protected:
  26   DECLARE_TRANSLATOR_LISTENER (glissando);
  27   DECLARE_ACKNOWLEDGER (rhythmic_head);
  28   virtual void finalize ();
  29
  30   void stop_translation_timestep ();
  31   void process_music ();
  32 private:
  33   Spanner *line_;
  34   Spanner *last_line_;
  35   Stream_event *event_;
  36 };
  37
  38 Glissando_engraver::Glissando_engraver ()
  39 {
  40   last_line_ = line_ = 0;
  41   event_ = 0;
  42 }
  43
  44 IMPLEMENT_TRANSLATOR_LISTENER (Glissando_engraver, glissando);
  45 void
  46 Glissando_engraver::listen_glissando (Stream_event *ev)
  47 {
  48   ASSIGN_EVENT_ONCE (event_, ev);
  49 }
  50
  51 void
  52 Glissando_engraver::process_music ()
  53 {
  54   if (event_)
  55     line_ = make_spanner ("Glissando", event_->self_scm ());
  56 }
  57
  58 void
  59 Glissando_engraver::acknowledge_rhythmic_head (Grob_info info)
  60 {
  61   Grob *g = info.grob ();
  62   if (line_)
  63     line_->set_bound (LEFT, g);
  64
  65   if (last_line_)
  66     {
  67       last_line_->set_bound (RIGHT, g);
  68       announce_end_grob (last_line_, g->self_scm ());
  69     }
  70 }
  71
  72 void
  73 Glissando_engraver::stop_translation_timestep ()
  74 {
  75   if (last_line_ && last_line_->get_bound (RIGHT))
  76     {
  77       last_line_ = 0;
  78     }
  79   if (line_)
  80     {
  81       if (last_line_)
  82         programming_error ("overwriting glissando");
  83       last_line_ = line_;
  84     }
  85   line_ = 0;
  86   event_ = 0;
  87 }
  88
  89 void
  90 Glissando_engraver::finalize ()
  91 {
  92   if (line_)
  93     {
  94       string msg = _ ("unterminated glissando");
  95
  96       if (event_)
  97         event_->origin ()->warning (msg);
  98       else
  99         warning (msg);
 100
 101       line_->suicide ();
 102       line_ = 0;
 103     }
 104 }
 105
 106 ADD_ACKNOWLEDGER (Glissando_engraver, rhythmic_head);
 107 ADD_TRANSLATOR (Glissando_engraver,
 108                 /* doc */
 109                 "Engrave glissandi.",
 110
 111                 /* create */
 112                 "Glissando ",
 113
 114                 /* read */
 115                 "",
 116
 117                 /* write */
 118                 ""
 119                 );