lily/arpeggio-engraver.cc

   1 /*
   2   arpeggio-engraver.cc -- implement Arpeggio_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2000--2007 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "engraver.hh"
  10
  11 #include "pointer-group-interface.hh"
  12 #include "arpeggio.hh"
  13 #include "stem.hh"
  14 #include "rhythmic-head.hh"
  15 #include "side-position-interface.hh"
  16 #include "stream-event.hh"
  17 #include "note-column.hh"
  18 #include "item.hh"
  19
  20 #include "translator.icc"
  21
  22 class Arpeggio_engraver : public Engraver
  23 {
  24 public:
  25   TRANSLATOR_DECLARATIONS (Arpeggio_engraver);
  26
  27   void acknowledge_stem (Grob_info);
  28   void acknowledge_rhythmic_head (Grob_info);
  29   void acknowledge_note_column (Grob_info);
  30 protected:
  31   void process_music ();
  32   void stop_translation_timestep ();
  33   DECLARE_TRANSLATOR_LISTENER (arpeggio);
  34 private:
  35   Item *arpeggio_;
  36   Stream_event *arpeggio_event_;
  37 };
  38
  39 Arpeggio_engraver::Arpeggio_engraver ()
  40 {
  41   arpeggio_ = 0;
  42   arpeggio_event_ = 0;
  43 }
  44
  45 IMPLEMENT_TRANSLATOR_LISTENER (Arpeggio_engraver, arpeggio);
  46 void Arpeggio_engraver::listen_arpeggio (Stream_event *ev)
  47 {
  48   ASSIGN_EVENT_ONCE (arpeggio_event_, ev);
  49 }
  50
  51 void
  52 Arpeggio_engraver::acknowledge_stem (Grob_info info)
  53 {
  54   if (arpeggio_)
  55     {
  56       if (!arpeggio_->get_parent (Y_AXIS))
  57         arpeggio_->set_parent (info.grob (), Y_AXIS);
  58
  59       Pointer_group_interface::add_grob (arpeggio_,
  60                                          ly_symbol2scm ("stems"),
  61                                          info.grob ());
  62     }
  63 }
  64 void
  65 Arpeggio_engraver::acknowledge_rhythmic_head (Grob_info info)
  66 {
  67   if (arpeggio_)
  68
  69     /*
  70       We can't catch local key items (accidentals) from Voice context,
  71       see Local_key_engraver
  72     */
  73     Side_position_interface::add_support (arpeggio_, info.grob ());
  74 }
  75
  76 void
  77 Arpeggio_engraver::acknowledge_note_column (Grob_info info)
  78 {
  79   if (arpeggio_)
  80     info.grob ()->set_object ("arpeggio", arpeggio_->self_scm ());
  81 }
  82
  83 void
  84 Arpeggio_engraver::process_music ()
  85 {
  86   if (arpeggio_event_)
  87     {
  88       arpeggio_ = make_item ("Arpeggio", arpeggio_event_->self_scm ());
  89     }
  90 }
  91
  92 void
  93 Arpeggio_engraver::stop_translation_timestep ()
  94 {
  95   arpeggio_ = 0;
  96   arpeggio_event_ = 0;
  97 }
  98
  99 ADD_ACKNOWLEDGER (Arpeggio_engraver, stem);
 100 ADD_ACKNOWLEDGER (Arpeggio_engraver, rhythmic_head);
 101 ADD_ACKNOWLEDGER (Arpeggio_engraver, note_column);
 102
 103 ADD_TRANSLATOR (Arpeggio_engraver,
 104                 /* doc */ "Generate an Arpeggio symbol",
 105                 /* create */ "Arpeggio",
 106                 /* read */ "",
 107                 /* write */ "");