lily/lyric-combine-music-iterator.cc

   1 /*
   2   lyric-combine-music-iterator.cc --  implement Lyric_combine_music_iterator
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9
  10 #include "translator-group.hh"
  11 #include "lyric-combine-music-iterator.hh"
  12 #include "lyric-combine-music.hh"
  13 #include "musical-request.hh"
  14
  15 Busy_playing_req busy_req;
  16 Melisma_req melisma_start_req;
  17 Melisma_req melisma_stop_req;
  18 Melisma_playing_req melisma_playing_req;
  19
  20
  21 Lyric_combine_music_iterator::Lyric_combine_music_iterator ()
  22 {
  23   melisma_start_req.span_dir_ = START;
  24   melisma_stop_req.span_dir_ = STOP;
  25
  26   music_iter_p_ =0;
  27   lyric_iter_p_ =0;
  28 }
  29
  30 Moment
  31 Lyric_combine_music_iterator::next_moment () const
  32 {
  33   Moment musnext = music_iter_p_->next_moment ();
  34   return musnext;
  35 }
  36
  37 bool
  38 Lyric_combine_music_iterator::ok () const
  39 {
  40   return music_iter_p_->ok ();
  41 }
  42
  43 void
  44 Lyric_combine_music_iterator::do_print () const
  45 {
  46   music_iter_p_->print ();
  47   lyric_iter_p_->print ();
  48 }
  49
  50 void
  51 Lyric_combine_music_iterator::construct_children ()
  52 {
  53   Lyric_combine_music const * m = dynamic_cast<Lyric_combine_music const*> (music_l_);
  54
  55   music_iter_p_ = get_iterator_p (m->music_l ());
  56   lyric_iter_p_ = get_iterator_p (m->lyrics_l ());
  57 }
  58
  59 void
  60 Lyric_combine_music_iterator::do_process_and_next (Moment m)
  61 {
  62   Moment my_next = music_iter_p_->next_moment ();
  63   if (my_next > m)
  64     return;
  65
  66   music_iter_p_->process_and_next (m);
  67
  68   bool busy = try_music (&busy_req);
  69   if (busy)
  70     {
  71       bool melisma_b = try_music (&melisma_playing_req);
  72       if (!melisma_b)
  73         {
  74           if (lyric_iter_p_->ok ())
  75             {
  76 #if 0                           // devise a new way for this
  77               if (melisma_b && !melisma_started_b_)
  78                 lyric_iter_p_->try_music (&melisma_start_req);
  79               else if (melisma_started_b_)
  80                 lyric_iter_p_->try_music (&melisma_stop_req);
  81 #endif
  82
  83               Moment m= lyric_iter_p_->next_moment ();
  84               lyric_iter_p_->process_and_next (m);
  85             }
  86         }
  87     }
  88
  89
  90
  91   Music_iterator::do_process_and_next (m);
  92 }
  93
  94 Lyric_combine_music_iterator::~Lyric_combine_music_iterator ()
  95 {
  96   delete lyric_iter_p_;
  97   delete music_iter_p_;
  98 }
  99
 100 Music_iterator*
 101 Lyric_combine_music_iterator::try_music_in_children (Music const *m) const
 102 {
 103   Music_iterator * i =  music_iter_p_->try_music (m);
 104   if (i)
 105     return i;
 106   else
 107     return lyric_iter_p_->try_music (m);
 108 }
 109