src/inputmusic.cc

   1 #include "debug.hh"
   2 #include "inputmusic.hh"
   3 #include "voice.hh"
   4 #include "musicalrequest.hh"
   5
   6 void
   7 Input_music::check_plet(Voice_element* velt_l)
   8 {
   9     for (iter_top(velt_l->reqs,i); i.ok(); i++)
  10         if ( i->plet() ) {
  11             Moment start_moment = 0;
  12             if ( !find_plet_start_bo( i->plet()->type_c_, start_moment ) ) {
  13                 error( "begin of plet not found", i->defined_ch_c_l_ );
  14                 break;
  15             }
  16             Moment moment = 0;
  17             set_plet_backwards( moment, start_moment, i->plet()->dur_i_, i->plet()->type_i_ );
  18             i.del();
  19             break;
  20         }
  21 }
  22
  23 void
  24 Simple_music::add(Voice_element*v)
  25 {
  26     voice_.add(v);
  27 }
  28
  29 Moment
  30 Simple_music::length()const
  31 {
  32     return voice_.last();
  33 }
  34 void
  35 Simple_music::translate_time(Moment t)
  36 {
  37     voice_.start += t;
  38 }
  39
  40 Voice_list
  41 Simple_music::convert()const
  42 {
  43     Voice_list l;
  44     l.bottom().add(new Voice(voice_));
  45     return l;
  46 }
  47
  48
  49 void
  50 Simple_music::print() const
  51 {
  52     mtor << "Simple_music {";
  53     voice_.print();
  54     mtor << "}\n";
  55 }
  56 bool
  57 Simple_music::find_plet_start_bo(char c, Moment& moment_r)
  58 {
  59     return voice_.find_plet_start_bo(c, moment_r);
  60 }
  61 void
  62 Simple_music::set_plet_backwards(Moment& now_moment_r, Moment until_moment, int num_i, int den_i)
  63 {
  64     voice_.set_plet_backwards(now_moment_r, until_moment, num_i, den_i);
  65 }
  66
  67 /* *************** */
  68
  69 void
  70 Complex_music::add(Input_music*v)
  71 {
  72     elts.bottom().add(v);
  73 }
  74
  75 void
  76 Complex_music::print() const
  77 {
  78     for (iter_top(elts,i); i.ok(); i++)
  79          i->print();
  80 }
  81
  82 void
  83 Complex_music::concatenate(Complex_music*h)
  84 {
  85     for (iter_top(h->elts,i); i.ok(); i++)
  86         add(i->clone());
  87 }
  88
  89 Complex_music::Complex_music()
  90 {
  91 }
  92
  93 Complex_music::Complex_music(Complex_music const&s)
  94 {
  95     for (iter_top(s.elts,i); i.ok(); i++)
  96         add(i->clone());
  97 }
  98 void
  99 Complex_music::set_default_group(String g)
 100 {
 101     for (iter_top(elts,i); i.ok(); i++)
 102             i->set_default_group(g);
 103 }
 104 bool
 105 Complex_music::find_plet_start_bo(char c, Moment& moment_r)
 106 {
 107     for (iter_bot(elts,i); i.ok(); i--) {
 108         if ( i->find_plet_start_bo(c, moment_r) )
 109             return true;
 110     }
 111     return false;
 112 }
 113 void
 114 Complex_music::set_plet_backwards(Moment& now_moment_r, Moment until_moment, int num_i, int den_i)
 115 {
 116     for (iter_bot(elts,i); i.ok(); i--) {
 117         i->set_plet_backwards(now_moment_r, until_moment, num_i, den_i);
 118     }
 119 }
 120 /* *************************************************************** */
 121
 122 void
 123 Music_voice::print() const
 124 {
 125     mtor << "Music_voice {";
 126     Complex_music::print();
 127     mtor << "}\n";
 128 }
 129
 130 void
 131 Music_voice::add_elt(Voice_element*v)
 132 {
 133     PCursor<Input_music*> c(elts.bottom());
 134     if (!c.ok() || !c->simple()) {
 135         Simple_music*vs = new Simple_music;
 136
 137         c.add(vs);
 138     }
 139
 140     c = elts.bottom();
 141     Simple_music *s = c->simple();
 142     s->add(v);
 143
 144     check_plet(v);
 145 }
 146
 147 Moment
 148 Music_voice::length()const
 149 {
 150     Moment l = 0;
 151
 152     for (iter_top(elts,i); i.ok(); i++)
 153         l += i->length();
 154     return l;
 155 }
 156
 157
 158 Voice_list
 159 Music_voice::convert()const
 160 {
 161     Voice_list l;
 162     Moment here = 0;
 163
 164     for (iter_top(elts,i); i.ok(); i++) {
 165         Moment len = i->length();
 166         Voice_list k(i->convert());
 167         k.translate_time(here);
 168         l.concatenate(k);
 169         here +=len;
 170     }
 171     return l;
 172 }
 173
 174 void
 175 Music_voice::translate_time(Moment t)
 176 {
 177     elts.bottom()->translate_time(t);
 178 }
 179
 180
 181
 182 /* *************** */
 183
 184 void
 185 Music_general_chord::add_elt(Voice_element*v)
 186 {
 187     Simple_music*vs = new Simple_music;
 188     vs->add(v);
 189     elts.bottom().add(vs);
 190
 191     check_plet(v);
 192 }
 193
 194 void
 195 Music_general_chord::print() const
 196 {
 197     mtor << "Music_general_chord {";
 198     Complex_music::print();
 199      mtor << "}\n";
 200 }
 201
 202 void
 203 Music_general_chord::translate_time(Moment t)
 204 {
 205     for (iter_top(elts,i); i.ok(); i++)
 206         i->translate_time(t);
 207 }
 208
 209 Moment
 210 Music_general_chord::length()const
 211 {
 212     Moment l =0;
 213
 214     for (iter_top(elts,i); i.ok(); i++)
 215         l = l >? i->length();
 216     return l;
 217 }
 218
 219 Voice_list
 220 Music_general_chord::convert()const
 221 {
 222     Voice_list l;
 223     for (iter_top(elts,i); i.ok(); i++) {
 224         Voice_list k(i->convert());
 225         l.concatenate(k);
 226     }
 227     return l;
 228 }
 229
 230 /* *************** */
 231
 232 void
 233 Multi_voice_chord::set_default_group(String g)
 234 {
 235     int j=0;
 236     for (iter_top(elts, i); i.ok(); i++) {
 237         i->set_default_group(g + String(j));
 238         j++;
 239     }
 240 }
 241
 242
 243 /* *************** */
 244
 245 void
 246 Voice_list::translate_time(Moment x)
 247 {
 248     for (iter_top(*this,i); i.ok(); i++)
 249         i->start += x;
 250 }
 251