lily/midi-chunk.cc

   1 /*
   2   This file is part of LilyPond, the GNU music typesetter.
   3
   4   Copyright (C) 2007--2011 Han-Wen Nienhuys <hanwen@lilypond.org>
   5
   6
   7   LilyPond is free software: you can redistribute it and/or modify
   8   it under the terms of the GNU General Public License as published by
   9   the Free Software Foundation, either version 3 of the License, or
  10   (at your option) any later version.
  11
  12   LilyPond is distributed in the hope that it will be useful,
  13   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15   GNU General Public License for more details.
  16
  17   You should have received a copy of the GNU General Public License
  18   along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  19 */
  20
  21 #include "midi-chunk.hh"
  22
  23 #include "midi-item.hh"
  24 #include "std-string.hh"
  25 #include "string-convert.hh"
  26
  27 Midi_track::Midi_track (int number, bool port)
  28  : number_ (number)
  29 {
  30   //                4D 54 72 6B     MTrk
  31   //                00 00 00 3B     chunk length (59)
  32   //        00      FF 58 04 04 02 18 08    time signature
  33   //        00      FF 51 03 07 A1 20       tempo
  34
  35   // FF 59 02 sf mi  Key Signature
  36   //         sf = -7:  7 flats
  37   //         sf = -1:  1 flat
  38   //         sf = 0:  key of C
  39   //         sf = 1:  1 sharp
  40   //         sf = 7: 7 sharps
  41   //         mi = 0:  major key
  42   //         mi = 1:  minor key
  43
  44   char const *data_str0 = ""
  45     //        "00" "ff58" "0404" "0218" "08"
  46     //  "00" "ff51" "0307" "a120"
  47     // why a key at all, in midi?
  48     // key: C
  49     //  "00" "ff59" "02" "00" "00"
  50     // key: F (scsii-menuetto)
  51     //                            "00" "ff59" "02" "ff" "00"
  52     ;
  53
  54   string data_string;
  55   // only for format 0 (currently using format 1)?
  56   data_string += String_convert::hex2bin (data_str0);
  57
  58   if (port)
  59     {
  60       string port = "00" "ff" "21" "01"
  61         + String_convert::int2hex (number_, 2, '0');
  62       data_string += String_convert::hex2bin (port);
  63     }
  64
  65   char const *footer_str0 = "00" "ff2f" "00";
  66   string footer_string = String_convert::hex2bin (footer_str0);
  67
  68   set ("MTrk", data_string, footer_string);
  69 }
  70
  71 void
  72 Midi_track::add (int delta_ticks, Midi_item *midi)
  73 {
  74   assert (delta_ticks >= 0);
  75
  76   Midi_event *e = new Midi_event (delta_ticks, midi);
  77   events_.push_back (e);
  78 }
  79
  80 string
  81 Midi_track::data_string () const
  82 {
  83   string str = Midi_chunk::data_string ();
  84
  85   for (vector<Midi_event*>::const_iterator i (events_.begin ());
  86        i != events_.end (); i ++)
  87     {
  88       str += (*i)->to_string ();
  89     }
  90   return str;
  91 }
  92
  93
  94 Midi_track::~Midi_track ()
  95 {
  96   junk_pointers (events_);
  97 }
  98
  99 /****************************************************************
 100   event
 101 */
 102 Midi_event::Midi_event (int delta_ticks, Midi_item *midi)
 103 {
 104   delta_ticks_ = delta_ticks;
 105   midi_ = midi;
 106 }
 107
 108 string
 109 Midi_event::to_string () const
 110 {
 111   string delta_string = int2midi_varint_string (delta_ticks_);
 112   string midi_string = midi_->to_string ();
 113   if (midi_string.empty ())
 114     return "";
 115   return delta_string + midi_string;
 116 }
 117 /****************************************************************
 118  header
 119 */
 120
 121 Midi_header::Midi_header (int format, int tracks, int clocks_per_4)
 122 {
 123   string str;
 124
 125   string format_string = String_convert::int2hex (format, 4, '0');
 126   str += String_convert::hex2bin (format_string);
 127
 128   string tracks_string = String_convert::int2hex (tracks, 4, '0');
 129   str += String_convert::hex2bin (tracks_string);
 130
 131   string tempo_string = String_convert::int2hex (clocks_per_4, 4, '0');
 132   str += String_convert::hex2bin (tempo_string);
 133
 134   set ("MThd", str, "");
 135 }
 136
 137
 138 /****************************************************************
 139    chunk
 140  */
 141 Midi_chunk::~Midi_chunk ()
 142 {
 143
 144 }
 145
 146 void
 147 Midi_chunk::set (string header_string, string data_string, string footer_string)
 148 {
 149   data_string_ = data_string;
 150   footer_string_ = footer_string;
 151   header_string_ = header_string;
 152 }
 153
 154 string
 155 Midi_chunk::data_string () const
 156 {
 157   return data_string_;
 158 }
 159
 160 string
 161 Midi_chunk::to_string () const
 162 {
 163   string str = header_string_;
 164   string dat = data_string ();
 165   string length_string = String_convert::int2hex (dat.length ()
 166                                                   + footer_string_.length (), 8, '0');
 167   length_string = String_convert::hex2bin (length_string);
 168
 169   str += length_string;
 170   str += dat;
 171   str += footer_string_;
 172
 173   return str;
 174 }
 175