lily/audio-item.cc

   1 /*
   2   This file is part of LilyPond, the GNU music typesetter.
   3
   4   Copyright (C) 1997--2012 Jan Nieuwenhuizen <janneke@gnu.org>
   5
   6   LilyPond is free software: you can redistribute it and/or modify
   7   it under the terms of the GNU General Public License as published by
   8   the Free Software Foundation, either version 3 of the License, or
   9   (at your option) any later version.
  10
  11   LilyPond is distributed in the hope that it will be useful,
  12   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14   GNU General Public License for more details.
  15
  16   You should have received a copy of the GNU General Public License
  17   along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #include "audio-item.hh"
  21
  22 #include "midi-item.hh"
  23 #include "audio-column.hh"
  24
  25 Audio_instrument::Audio_instrument (string instrument_string)
  26 {
  27   str_ = instrument_string;
  28 }
  29
  30 void
  31 Audio_item::render ()
  32 {
  33 }
  34
  35 Audio_column *
  36 Audio_item::get_column () const
  37 {
  38   return audio_column_;
  39 }
  40
  41 Audio_item::Audio_item ()
  42   : audio_column_ (0),
  43     channel_ (0)
  44 {
  45 }
  46
  47 Audio_note::Audio_note (Pitch p, Moment m, bool tie_event, Pitch transposing)
  48   : pitch_ (p),
  49     length_mom_ (m),
  50     transposing_ (transposing),
  51     dynamic_ (0),
  52     tied_ (0),
  53     tie_event_ (tie_event)
  54 {
  55 }
  56
  57 void
  58 Audio_note::tie_to (Audio_note *t, Moment skip)
  59 {
  60   tied_ = t;
  61   Audio_note *first = t;
  62   while (first->tied_)
  63     first = first->tied_;
  64   // Add the skip to the tied note and the length of the appended note
  65   // to the full duration of the tie...
  66   first->length_mom_ += skip + length_mom_;
  67   length_mom_ = 0;
  68 }
  69
  70 string
  71 Audio_note::to_string () const
  72 {
  73   string s = "#<Audio_note pitch ";
  74   s += pitch_.to_string();
  75   s += " len ";
  76   s += length_mom_.to_string();
  77   if (tied_)
  78     {
  79       s += " tied to " + tied_->to_string();
  80     }
  81   if (tie_event_)
  82     {
  83       s += " tie_event";
  84     }
  85   s += ">";
  86   return s;
  87 }
  88
  89 Audio_key::Audio_key (int acc, bool major)
  90 {
  91   accidentals_ = acc;
  92   major_ = major;
  93 }
  94
  95 Audio_dynamic::Audio_dynamic ()
  96   : volume_ (-1),
  97     silent_ (false)
  98 {
  99 }
 100
 101 Audio_span_dynamic::Audio_span_dynamic (Real min_volume, Real max_volume)
 102 {
 103   grow_dir_ = CENTER;
 104   min_volume_ = min_volume;
 105   max_volume_ = max_volume;
 106 }
 107
 108 void
 109 Audio_span_dynamic::add_absolute (Audio_dynamic *d)
 110 {
 111   assert (d);
 112   dynamics_.push_back (d);
 113 }
 114
 115 Moment
 116 remap_grace_duration (Moment m)
 117 {
 118   return Moment (m.main_part_ + Rational (9, 40) * m.grace_part_,
 119                  Rational (0));
 120 }
 121
 122 Real
 123 moment_to_real (Moment m)
 124 {
 125   return remap_grace_duration (m).main_part_.to_double ();
 126 }
 127
 128 int
 129 moment_to_ticks (Moment m)
 130 {
 131   return int (moment_to_real (m) * 384 * 4);
 132 }
 133
 134 void
 135 Audio_span_dynamic::render ()
 136 {
 137   if (dynamics_.size () <= 1)
 138     return;
 139
 140   assert (dynamics_[0]->volume_ >= 0);
 141
 142   while (dynamics_.back ()->volume_ > 0
 143          && dynamics_.size () > 1
 144          && sign (dynamics_.back ()->volume_ - dynamics_[0]->volume_) != grow_dir_)
 145     {
 146       dynamics_.erase (dynamics_.end () - 1);
 147     }
 148
 149   if (dynamics_.size () <= 1)
 150     {
 151       programming_error ("Impossible or ambiguous (de)crescendo in MIDI.");
 152       return;
 153     }
 154
 155   Real start_v = dynamics_[0]->volume_;
 156   if (dynamics_.back ()->volume_ < 0)
 157     {
 158       // The dynamic spanner does not end with an explicit dynamic script
 159       // event.  Adjust the end volume by at most 1/4 of the available
 160       // volume range in this case.
 161       dynamics_.back ()->volume_ = max (min (start_v + grow_dir_ * (max_volume_ - min_volume_) * 0.25, max_volume_), min_volume_);
 162     }
 163
 164   Real delta_v = dynamics_.back ()->volume_ - dynamics_[0]->volume_;
 165
 166   Moment start = dynamics_[0]->get_column ()->when ();
 167
 168   Real total_t = moment_to_real (dynamics_.back ()->get_column ()->when () - start);
 169
 170   for (vsize i = 1; i < dynamics_.size (); i++)
 171     {
 172       Moment dt_moment = dynamics_[i]->get_column ()->when ()
 173                          - start;
 174
 175       Real dt = moment_to_real (dt_moment);
 176
 177       Real v = start_v + delta_v * (dt / total_t);
 178
 179       dynamics_[i]->volume_ = v;
 180     }
 181 }
 182
 183 Audio_tempo::Audio_tempo (int per_minute_4)
 184 {
 185   per_minute_4_ = per_minute_4;
 186 }
 187
 188 Audio_time_signature::Audio_time_signature (int beats, int one_beat)
 189 {
 190   beats_ = beats;
 191   one_beat_ = one_beat;
 192 }
 193
 194 Audio_text::Audio_text (Audio_text::Type type, string text_string)
 195 {
 196   text_string_ = text_string;
 197   type_ = type;
 198 }
 199