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 "note-column.hh"
  17
  18 #include "translator.icc"
  19
  20 class Arpeggio_engraver : public Engraver
  21 {
  22 public:
  23   TRANSLATOR_DECLARATIONS (Arpeggio_engraver);
  24
  25   void acknowledge_stem (Grob_info);
  26   void acknowledge_rhythmic_head (Grob_info);
  27   void acknowledge_note_column (Grob_info);
  28 protected:
  29   void process_music ();
  30   void stop_translation_timestep ();
  31   virtual bool try_music (Music *);
  32 private:
  33   Item *arpeggio_;
  34   Music *arpeggio_event_;
  35 };
  36
  37 Arpeggio_engraver::Arpeggio_engraver ()
  38 {
  39   arpeggio_ = 0;
  40   arpeggio_event_ = 0;
  41 }
  42
  43 bool
  44 Arpeggio_engraver::try_music (Music *m)
  45 {
  46   if (!arpeggio_event_)
  47     arpeggio_event_ = m;
  48   return true;
  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     arpeggio_ = make_item ("Arpeggio", arpeggio_event_->self_scm ());
  88 }
  89
  90 void
  91 Arpeggio_engraver::stop_translation_timestep ()
  92 {
  93   arpeggio_ = 0;
  94   arpeggio_event_ = 0;
  95 }
  96
  97 ADD_ACKNOWLEDGER (Arpeggio_engraver, stem)
  98   ADD_ACKNOWLEDGER (Arpeggio_engraver, rhythmic_head)
  99   ADD_ACKNOWLEDGER (Arpeggio_engraver, note_column)
 100
 101   ADD_TRANSLATOR (Arpeggio_engraver,
 102                   /* doc */ "Generate an Arpeggio symbol",
 103                   /* create */ "Arpeggio",
 104                   /* accept */ "arpeggio-event",
 105                   /* read */ "",
 106                   /* write */ "");