lily/score.cc

   1 /*
   2   score.cc -- implement Score
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "score.hh"
  10 #include "debug.hh"
  11 #include "music-output-def.hh"
  12 #include "music-output.hh"
  13 #include "source.hh"
  14 #include "source-file.hh"
  15 #include "music-iterator.hh"
  16 #include "music.hh"
  17 #include "global-translator.hh"
  18 #include "header.hh"
  19 #include "cpu-timer.hh"
  20 #include "main.hh"
  21 #include "paper-def.hh"
  22
  23
  24 Score::Score()
  25 {
  26   header_p_ = 0;
  27   music_p_ = 0;
  28   errorlevel_i_ = 0;
  29 }
  30
  31 Score::Score (Score const &s)
  32 {
  33   music_p_ = s.music_p_->clone();
  34   for (int i=0; i < s.def_p_arr_.size (); i++)
  35     def_p_arr_.push(s.def_p_arr_[i]->clone());
  36   header_p_ = new Header (*s.header_p_);
  37 }
  38
  39 Score::~Score()
  40 {
  41   delete header_p_;
  42   for (int i=0; i < def_p_arr_.size (); i++)
  43     delete def_p_arr_[i];
  44   delete music_p_;
  45 }
  46
  47 void
  48 Score::run_translator (Music_output_def *odef_l)
  49 {
  50   Cpu_timer timer;
  51   Global_translator * trans_p = odef_l->get_global_translator_p();
  52   if (!trans_p)
  53     return ;
  54
  55   *mlog << _("\nInterpreting music ...");
  56   trans_p->last_mom_ = music_p_->time_int().max ();
  57
  58   Music_iterator * iter = Music_iterator::static_get_iterator_p (music_p_,
  59                                                                  trans_p);
  60   iter->construct_children();
  61
  62   if (! iter->ok())
  63     {
  64       delete iter;
  65       warning (_("Need music in a score"));
  66       errorlevel_i_ =1;
  67       return ;
  68     }
  69
  70   trans_p->start();
  71
  72   while (iter->ok() || trans_p->moments_left_i ())
  73     {
  74       Moment w = infinity_mom;
  75       if (iter->ok())
  76         {
  77           w = iter->next_moment();
  78           DOUT << "proccing: " << w <<"\n";
  79           if (!monitor->silent_b ("walking"))
  80             iter->print();
  81         }
  82
  83       trans_p->modify_next (w);
  84       trans_p->prepare (w);
  85       if (!monitor->silent_b ("walking"))
  86         trans_p->print();
  87
  88       iter->process_and_next (w);
  89       trans_p->process();
  90     }
  91   delete iter;
  92   trans_p->finish();
  93
  94
  95   if (errorlevel_i_)
  96     {
  97       // should we? hampers debugging.
  98       warning (_("Errors found, /*not processing score*/"));
  99     }
 100
 101   Music_output * output = trans_p->get_output_p();
 102   delete trans_p;
 103   *mlog << _(" (time: ") << String(timer.read (), "%.2f") << _(" seconds)");
 104
 105
 106   output->header_l_ = header_p_;
 107   output->origin_str_ =  location_str();
 108
 109   *mlog << endl;
 110   output->process();
 111   delete output ;
 112 }
 113
 114 void
 115 Score::process()
 116 {
 117   if (!music_p_)
 118     return;
 119
 120   print();
 121   for (int i=0; i < def_p_arr_.size (); i++)
 122     {
 123       if (no_paper_global_b
 124           && def_p_arr_[i]->is_type_b (Paper_def::static_name ()))
 125         continue;
 126       run_translator (def_p_arr_[i]);
 127     }
 128 }
 129
 130
 131
 132 void
 133 Score::print() const
 134 {
 135 #ifndef NPRINT
 136   DOUT << "score {\n";
 137   music_p_ -> print ();
 138   for (int i=0; i < def_p_arr_.size (); i++)
 139     def_p_arr_[i]->print();
 140   DOUT << "}\n";
 141 #endif
 142 }
 143
 144 void
 145 Score::add (Music_output_def *pap_p)
 146 {
 147   def_p_arr_.push(pap_p);
 148 }