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--2006 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
  19 #include "translator.icc"
  20
  21 class Arpeggio_engraver : public Engraver
  22 {
  23 public:
  24   TRANSLATOR_DECLARATIONS (Arpeggio_engraver);
  25
  26   void acknowledge_stem (Grob_info);
  27   void acknowledge_rhythmic_head (Grob_info);
  28   void acknowledge_note_column (Grob_info);
  29 protected:
  30   void process_music ();
  31   void stop_translation_timestep ();
  32   DECLARE_TRANSLATOR_LISTENER (arpeggio);
  33 private:
  34   Item *arpeggio_;
  35   Stream_event *arpeggio_event_;
  36 };
  37
  38 Arpeggio_engraver::Arpeggio_engraver ()
  39 {
  40   arpeggio_ = 0;
  41   arpeggio_event_ = 0;
  42 }
  43
  44 IMPLEMENT_TRANSLATOR_LISTENER (Arpeggio_engraver, arpeggio);
  45 void Arpeggio_engraver::listen_arpeggio (Stream_event *ev)
  46 {
  47   arpeggio_event_ = ev;
  48 }
  49
  50 void
  51 Arpeggio_engraver::acknowledge_stem (Grob_info info)
  52 {
  53   if (arpeggio_)
  54     {
  55       if (!arpeggio_->get_parent (Y_AXIS))
  56         arpeggio_->set_parent (info.grob (), Y_AXIS);
  57
  58       Pointer_group_interface::add_grob (arpeggio_,
  59                                          ly_symbol2scm ("stems"),
  60                                          info.grob ());
  61     }
  62 }
  63 void
  64 Arpeggio_engraver::acknowledge_rhythmic_head (Grob_info info)
  65 {
  66   if (arpeggio_)
  67
  68     /*
  69       We can't catch local key items (accidentals) from Voice context,
  70       see Local_key_engraver
  71     */
  72     Side_position_interface::add_support (arpeggio_, info.grob ());
  73 }
  74
  75 void
  76 Arpeggio_engraver::acknowledge_note_column (Grob_info info)
  77 {
  78   if (arpeggio_)
  79     info.grob ()->set_object ("arpeggio", arpeggio_->self_scm ());
  80 }
  81
  82 void
  83 Arpeggio_engraver::process_music ()
  84 {
  85   if (arpeggio_event_)
  86     {
  87       arpeggio_ = make_item ("Arpeggio", arpeggio_event_->self_scm ());
  88     }
  89 }
  90
  91 void
  92 Arpeggio_engraver::stop_translation_timestep ()
  93 {
  94   arpeggio_ = 0;
  95   arpeggio_event_ = 0;
  96 }
  97
  98 ADD_ACKNOWLEDGER (Arpeggio_engraver, stem);
  99 ADD_ACKNOWLEDGER (Arpeggio_engraver, rhythmic_head);
 100 ADD_ACKNOWLEDGER (Arpeggio_engraver, note_column);
 101
 102 ADD_TRANSLATOR (Arpeggio_engraver,
 103                 /* doc */ "Generate an Arpeggio symbol",
 104                 /* create */ "Arpeggio",
 105                 /* accept */ "arpeggio-event",
 106                 /* read */ "",
 107                 /* write */ "");