lily/music-iterator.cc

   1 /*
   2   music-iterator.cc -- implement Music_iterator
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 /*
  10   UGH. too many includes.
  11  */
  12 #include "debug.hh"
  13 #include "music-list.hh"
  14 #include "music-iterator.hh"
  15 #include "property-iterator.hh"
  16 #include "request-chord-iterator.hh"
  17 #include "sequential-music-iterator.hh"
  18 #include "simultaneous-music-iterator.hh"
  19 #include "translator-group.hh"
  20 #include "translation-property.hh"
  21 #include "change-iterator.hh"
  22 #include "change-translator.hh"
  23 #include "music-wrapper.hh"
  24 #include "music-wrapper-iterator.hh"
  25 #include "time-scaled-music-iterator.hh"
  26 #include "time-scaled-music.hh"
  27 #include "context-specced-music.hh"
  28 #include "repeated-music.hh"
  29 #include "folded-repeat-iterator.hh"
  30 #include "unfolded-repeat-iterator.hh"
  31 #include "grace-iterator.hh"
  32 #include "grace-music.hh"
  33 #include "lyric-combine-music.hh"
  34 #include "lyric-combine-music-iterator.hh"
  35 #include "auto-change-music.hh"
  36 #include "auto-change-iterator.hh"
  37 #include "part-combine-music.hh"
  38 #include "part-combine-music-iterator.hh"
  39 #include "request.hh"
  40 #include "simple-music-iterator.hh"
  41 #include "output-property.hh"
  42 #include "chord-tremolo-iterator.hh"
  43
  44 Music_iterator::Music_iterator ()
  45 {
  46   //  clone_i_ = 0;
  47 }
  48
  49 Music_iterator::Music_iterator (Music_iterator const& src)
  50 {
  51   //  clone_i_ = src.clone_i_ + 1;
  52   handle_ = *src.handle_.clone ();
  53   music_l_ = src.music_l_;
  54 }
  55
  56 Music_iterator::~Music_iterator ()
  57 {
  58 }
  59
  60
  61
  62
  63 Translator_group*
  64 Music_iterator::report_to_l () const
  65 {
  66   return handle_.report_to_l ();
  67 }
  68
  69
  70 void
  71 Music_iterator::set_translator (Translator_group *trans)
  72 {
  73   handle_.set_translator (trans);
  74 }
  75
  76 void
  77 Music_iterator::construct_children ()
  78 {
  79 }
  80
  81 Moment
  82 Music_iterator::pending_moment () const
  83 {
  84   return 0;
  85 }
  86
  87
  88 void
  89 Music_iterator::skip (Moment)
  90 {
  91   assert (0);
  92 }
  93
  94 void
  95 Music_iterator::process (Moment)
  96 {
  97 }
  98
  99 bool
 100 Music_iterator::ok () const
 101 {
 102   return false;
 103 }
 104
 105 SCM
 106 Music_iterator::get_music (Moment)const
 107 {
 108   return SCM_EOL;
 109 }
 110
 111 Music_iterator*
 112 Music_iterator::static_get_iterator_p (Music *m)
 113 {
 114   Music_iterator * p =0;
 115
 116   /* It would be nice to do this decentrally, but the order of this is
 117      significant.  */
 118   if (dynamic_cast<Request_chord   *> (m))
 119     p = new Request_chord_iterator;
 120   else if (dynamic_cast<Lyric_combine_music *> (m))
 121     p = new Lyric_combine_music_iterator;
 122   else if (dynamic_cast<Simultaneous_music *> (m))
 123     p =  new Simultaneous_music_iterator;
 124   else if (dynamic_cast<Sequential_music *> (m))
 125     p =  new Sequential_music_iterator;
 126   else if (dynamic_cast<Translation_property *> (m))
 127     p = new Property_iterator;
 128   else if (dynamic_cast<Change_translator *> (m))
 129     p = new Change_iterator;
 130   else if (dynamic_cast<Push_translation_property*> (m))
 131     p = new Push_property_iterator;
 132   else if (dynamic_cast<Pop_translation_property*> (m))
 133     p = new Pop_property_iterator;
 134   else if (dynamic_cast<Time_scaled_music *> (m))
 135     p = new Time_scaled_music_iterator;
 136   else if (dynamic_cast<Grace_music *> (m))
 137     p = new Grace_iterator;
 138   else if (dynamic_cast<Auto_change_music *> (m))
 139     p = new Auto_change_iterator;
 140   else if (dynamic_cast<Part_combine_music *> (m))
 141     p = new Part_combine_music_iterator;
 142   else if (dynamic_cast<Music_wrapper   *> (m))
 143     p = new Music_wrapper_iterator;
 144   else if (Repeated_music  * n = dynamic_cast<Repeated_music  *> (m))
 145     {
 146       if (n->type_ == "tremolo")
 147         p = new Chord_tremolo_iterator;
 148       else if (n->fold_b_)
 149         p = new Folded_repeat_iterator;
 150       else
 151         p = new Unfolded_repeat_iterator;
 152     }
 153   else
 154     {
 155       p = new Simple_music_iterator ;
 156     }
 157
 158   p->music_l_ = m;
 159   return p;
 160 }
 161
 162 void
 163 Music_iterator::init_translator (Music *m, Translator_group *report_l)
 164 {
 165   music_l_ = m;
 166   if (Context_specced_music * csm =dynamic_cast<Context_specced_music *> (m))
 167     {
 168       Translator_group* a =report_l->
 169         find_create_translator_l (csm->translator_type_str_, csm->translator_id_str_);
 170
 171       set_translator (a);
 172
 173     }
 174
 175   if (! report_to_l ())
 176     set_translator (report_l);
 177 }
 178
 179
 180 Music_iterator*
 181 Music_iterator::get_iterator_p (Music *m) const
 182 {
 183   Music_iterator*p = static_get_iterator_p (m);
 184   p->init_translator (m, report_to_l ());
 185
 186   p->construct_children ();
 187   return p;
 188 }
 189
 190 Music_iterator*
 191 Music_iterator::try_music (Music *m) const
 192 {
 193   bool b = report_to_l ()->try_music ( (Music*)m); // ugh
 194   Music_iterator * it = b ? (Music_iterator*) this : 0; // ugh
 195   if (!it)
 196     it = try_music_in_children (m);
 197   return it;
 198 }
 199
 200 Music_iterator*
 201 Music_iterator::try_music_in_children (Music *) const
 202 {
 203   return 0;
 204 }
 205