lily/score-performer.cc

   1 /*
   2   score-performer.cc -- implement Score_performer
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1996--2005 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "score-performer.hh"
  10
  11 #include "audio-column.hh"
  12 #include "audio-item.hh"
  13 #include "performance.hh"
  14 #include "midi-stream.hh"
  15 #include "string-convert.hh"
  16 #include "warn.hh"
  17 #include "context-def.hh"
  18 #include "output-def.hh"
  19
  20 ADD_TRANSLATOR (Score_performer,
  21                 /* descr */ "",
  22                 /* creats*/ "",
  23                 /* accepts */ "",
  24                 /* acks  */ "",
  25                 /* reads */ "",
  26                 /* write */ "");
  27
  28 Score_performer::Score_performer ()
  29 {
  30   performance_ = 0;
  31 }
  32
  33 Score_performer::~Score_performer ()
  34 {
  35 }
  36
  37 void
  38 Score_performer::play_element (Audio_element *p)
  39 {
  40   if (Audio_item *i = dynamic_cast<Audio_item *> (p))
  41     {
  42       audio_column_->add_audio_item (i);
  43     }
  44   performance_->add_element (p);
  45 }
  46
  47 void
  48 Score_performer::announce_element (Audio_element_info info)
  49 {
  50   announce_infos_.push (info);
  51 }
  52
  53 void
  54 Score_performer::prepare (Moment m)
  55 {
  56   audio_column_ = new Audio_column (m);
  57   play_element (audio_column_);
  58   recurse_over_translators (context (), &Translator::start_translation_timestep, UP);
  59 }
  60
  61 void
  62 Score_performer::finish ()
  63 {
  64   recurse_over_translators (context (), &Translator::finalize, UP);
  65 }
  66
  67 void
  68 Score_performer::one_time_step ()
  69 {
  70   recurse_over_translators (context (), &Performer::process_music, UP);
  71   recurse_over_translators (context (), &Performer::do_announces, UP);
  72   recurse_over_translators (context (), &Translator::stop_translation_timestep, UP);
  73 }
  74
  75 int
  76 Score_performer::get_tempo () const
  77 {
  78   return ::get_tempo (performance_->midi_, Moment (Rational (1, 4)));
  79 }
  80
  81 Music_output *
  82 Score_performer::get_output ()
  83 {
  84   Music_output *o = performance_;
  85   performance_ = 0;
  86   return o;
  87 }
  88
  89 void
  90 Score_performer::initialize ()
  91 {
  92   performance_ = new Performance;
  93   performance_->midi_ = get_output_def ();
  94
  95   Translator_group::initialize ();
  96 }