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 "output-property-music-iterator.hh"
  43 #include "chord-tremolo-iterator.hh"
  44
  45 Music_iterator::Music_iterator ()
  46 {
  47   //  clone_i_ = 0;
  48 }
  49
  50 Music_iterator::Music_iterator (Music_iterator const& src)
  51 {
  52   //  clone_i_ = src.clone_i_ + 1;
  53   handle_ = *src.handle_.clone ();
  54   music_l_ = src.music_l_;
  55   music_length_ = src.music_length_;
  56 }
  57
  58 Music_iterator::~Music_iterator ()
  59 {
  60 }
  61
  62
  63
  64
  65 Translator_group*
  66 Music_iterator::report_to_l () const
  67 {
  68   return handle_.report_to_l ();
  69 }
  70
  71
  72 void
  73 Music_iterator::set_translator (Translator_group *trans)
  74 {
  75   handle_.set_translator (trans);
  76 }
  77
  78 void
  79 Music_iterator::construct_children ()
  80 {
  81 }
  82
  83 Moment
  84 Music_iterator::pending_moment () const
  85 {
  86   return 0;
  87 }
  88
  89
  90 void
  91 Music_iterator::process (Moment)
  92 {
  93 }
  94
  95 bool
  96 Music_iterator::ok () const
  97 {
  98   return false;
  99 }
 100
 101 void
 102 Music_iterator::skip (Moment )
 103 {
 104 }
 105
 106 SCM
 107 Music_iterator::get_music (Moment)const
 108 {
 109   return SCM_EOL;
 110 }
 111
 112 Music_iterator*
 113 Music_iterator::static_get_iterator_p (Music *m)
 114 {
 115   Music_iterator * p =0;
 116
 117   /* It would be nice to do this decentrally, but the order of this is
 118      significant.  */
 119   if (dynamic_cast<Request_chord   *> (m))
 120     p = new Request_chord_iterator;
 121   else if (dynamic_cast<Lyric_combine_music *> (m))
 122     p = new Lyric_combine_music_iterator;
 123   else if (dynamic_cast<Simultaneous_music *> (m))
 124     p =  new Simultaneous_music_iterator;
 125   else if (dynamic_cast<Sequential_music *> (m))
 126     p =  new Sequential_music_iterator;
 127   else if (dynamic_cast<Translation_property *> (m))
 128     p = new Property_iterator;
 129   else if (dynamic_cast<Change_translator *> (m))
 130     p = new Change_iterator;
 131   else if (dynamic_cast<Push_translation_property*> (m))
 132     p = new Push_property_iterator;
 133   else if (dynamic_cast<Pop_translation_property*> (m))
 134     p = new Pop_property_iterator;
 135   else if (dynamic_cast<Time_scaled_music *> (m))
 136     p = new Time_scaled_music_iterator;
 137   else if (dynamic_cast<Grace_music *> (m))
 138     p = new Grace_iterator;
 139   else if (dynamic_cast<Auto_change_music *> (m))
 140     p = new Auto_change_iterator;
 141   else if (dynamic_cast<Output_property *> (m))
 142     p = new Output_property_music_iterator;
 143   else if (dynamic_cast<Part_combine_music *> (m))
 144     p = new Part_combine_music_iterator;
 145   else if (dynamic_cast<Music_wrapper   *> (m))
 146     p = new Music_wrapper_iterator;
 147   else if (Repeated_music  * n = dynamic_cast<Repeated_music  *> (m))
 148     {
 149       if (n->type_ == "tremolo")
 150         p = new Chord_tremolo_iterator;
 151       else if (n->fold_b_)
 152         p = new Folded_repeat_iterator;
 153       else
 154         p = new Unfolded_repeat_iterator;
 155     }
 156   else
 157     {
 158       p = new Simple_music_iterator ;
 159     }
 160
 161   p->music_l_ = m;
 162   p->music_length_ = m->length_mom ();
 163
 164   return p;
 165 }
 166
 167
 168 Moment
 169 Music_iterator::music_length_mom() const
 170 {
 171   return music_length_;
 172 }
 173
 174 void
 175 Music_iterator::init_translator (Music *m, Translator_group *report_l)
 176 {
 177   music_l_ = m;
 178   if (Context_specced_music * csm =dynamic_cast<Context_specced_music *> (m))
 179     {
 180       Translator_group* a =report_l->
 181         find_create_translator_l (csm->translator_type_str_, csm->translator_id_str_);
 182
 183       set_translator (a);
 184
 185     }
 186
 187   if (! report_to_l ())
 188     set_translator (report_l);
 189 }
 190
 191
 192 Music_iterator*
 193 Music_iterator::get_iterator_p (Music *m) const
 194 {
 195   Music_iterator*p = static_get_iterator_p (m);
 196   p->init_translator (m, report_to_l ());
 197
 198   p->construct_children ();
 199   return p;
 200 }
 201
 202 Music_iterator*
 203 Music_iterator::try_music (Music *m) const
 204 {
 205   bool b = report_to_l ()->try_music ( (Music*)m); // ugh
 206   Music_iterator * it = b ? (Music_iterator*) this : 0; // ugh
 207   if (!it)
 208     it = try_music_in_children (m);
 209   return it;
 210 }
 211
 212 Music_iterator*
 213 Music_iterator::try_music_in_children (Music *) const
 214 {
 215   return 0;
 216 }
 217