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--2003 Jan Nieuwenhuizen <janneke@gnu.org>
   7  */
   8
   9 #include "score-performer.hh"
  10 #include "midi-def.hh"
  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
  19
  20
  21 ENTER_DESCRIPTION(Score_performer,
  22 /* descr */       "",
  23 /* creats*/       "",
  24 /* accepts */     "",
  25 /* acks  */      "",
  26 /* reads */       "",
  27 /* write */       "");
  28
  29
  30 Score_performer::Score_performer ()
  31 {
  32   performance_ = 0;
  33 }
  34
  35
  36 Score_performer::~Score_performer ()
  37 {
  38 }
  39
  40 void
  41 Score_performer::play_element (Audio_element * p)
  42 {
  43   if (Audio_item * i=dynamic_cast<Audio_item *> (p))
  44     {
  45       audio_column_->add_audio_item (i);
  46     }
  47   performance_->add_element (p);
  48 }
  49
  50 void
  51 Score_performer::announce_element (Audio_element_info info)
  52 {
  53   announce_infos_.push (info);
  54
  55
  56   /*
  57     huh?
  58     copied from score-engraver, but
  59     this way staff gets in list twice
  60   if (Audio_item* i = dynamic_cast<Audio_item*> (info.elem_))
  61     performance_->add_element (i);
  62   */
  63 }
  64
  65 void
  66 Score_performer::prepare (Moment m)
  67 {
  68   Global_translator::prepare (m);
  69   audio_column_ = new Audio_column (m);
  70   play_element (audio_column_);
  71   start_translation_timestep ();
  72 }
  73
  74
  75 void
  76 Score_performer::one_time_step ()
  77 {
  78   // fixme: put this back.
  79   // process_music ();
  80   do_announces ();
  81   stop_translation_timestep ();
  82   check_removal ();
  83 }
  84
  85 void
  86 Score_performer::start ()
  87 {
  88 }
  89
  90
  91 int
  92 Score_performer::get_tempo () const
  93 {
  94   return performance_->midi_->get_tempo (Moment (Rational (1, 4)));
  95 }
  96
  97 void
  98 Score_performer::finish ()
  99 {
 100   check_removal ();
 101   finalize ();
 102 }
 103
 104 Music_output *
 105 Score_performer::get_output ()
 106 {
 107   Music_output * o = performance_;
 108   performance_ =0;
 109   return o;
 110 }
 111
 112 void
 113 Score_performer::initialize ()
 114 {
 115   unsmob_context_def (definition_)->apply_default_property_operations (this);
 116   assert (dynamic_cast<Midi_def *> (output_def_));
 117   performance_ = new Performance;
 118   performance_->midi_ = dynamic_cast<Midi_def*> (output_def_);
 119
 120   Translator_group::initialize ();
 121 }