void ConvertSong(byte[] srcdata, SongSt srcsong, byte[] destdata, SongSt destsong)
{
InstrumentMap instrument_map = new InstrumentMap(srcdata, srcsong.voices);
List <List <byte> > trackdata = new List <List <byte> >();
if (instrument_map.ErrorMessage != "")
{
DialogResult dr = R.ShowNoYes("この曲のデータ構造は壊れているようです。\r\nインポートを強行しますか？\r\n強行する場合は、正しく認識できたトラックのみをインポートします。" + "\r\n\r\n" + instrument_map.ErrorMessage);
if (dr != System.Windows.Forms.DialogResult.Yes)
{
return;
}
}
//曲の取出し.
this.ErrorMessage = "";
bool success = Rip(srcdata, srcsong, instrument_map, trackdata);
if (success == false)
{
R.ShowStopError("この曲のデータ構造は壊れているため、Rip出来ませんでした。" + "\r\n\r\n" + this.ErrorMessage);
return;
}
//取り出した曲を書き込む.
Burn(destsong, instrument_map, trackdata);
}
List <SongSt> SongTableToSongList(byte[] data)
{
List <SongSt> sonlist = new List <SongSt>();
uint songlist = FindSongTable(data);
if (songlist == U.NOT_FOUND)
{
return(sonlist);
}
// songlist += 8;
for (int i = 0; true; i++, songlist += 8)
{
uint header = U.u32(data, songlist);
if (i != 0 && !U.isPointer(header))
{
break;
}
header = U.toOffset(header);
uint voices = U.p32(data, header + 4);
uint tracks = U.u8(data, header);
SongSt song = new SongSt();
song.number = (uint)i;
song.table = songlist;
song.header = header;
song.voices = voices;
song.tracks = tracks;
sonlist.Add(song);
}
return(sonlist);
}
bool Rip(byte[] data, SongSt song, InstrumentMap instrument_map, List <List <byte> > trackdata)
{
//Rip
for (uint track = 0; track < song.tracks; track++)
{
uint songtrack_pointer = song.header + 8 + (4 * track);
uint songtrackdata_pointer = U.u32(data, songtrack_pointer);
if (!U.isPointer(songtrackdata_pointer))
{
this.ErrorMessage += "\r\n" +
R.Error("track:" + track.ToString() + " can not pointer! addr:" + songtrack_pointer.ToString("X08") + " data:" + songtrackdata_pointer.ToString("X08"));
return(false);
}
songtrackdata_pointer = U.toOffset(songtrackdata_pointer);
List <byte> track_data = process_track(data, songtrackdata_pointer, instrument_map);
trackdata.Add(track_data);
}
//ドラムがない曲の場合、それは困るので、ダミーのドラムを追加する.
instrument_map.appendDrumIfNoDrum();
return(true);
}
void Burn(SongSt song, InstrumentMap instrument_map, List <List <byte> > trackdata)
{
//必要なサイズを計算する.
uint use_size = 8 + (4 * (uint)trackdata.Count); //ヘッダー
for (int track = 0; track < trackdata.Count; track++)
{
use_size += (uint)trackdata[track].Count; //楽譜
}
use_size = U.Padding4(use_size); //楽譜と楽器の間は 4バイトアライメントが必要.
use_size += (uint)(instrument_map.Instrument_mapping.Count * 12); //楽器
use_size += (uint)instrument_map.Sample_data.Count; //楽器データ
uint write_pointer = InputFormRef.AllocBinaryData(use_size);
if (write_pointer == U.NOT_FOUND)
{
R.ShowStopError("データサイズを({0})確保できません。\r\nROM容量がもうないか、音楽のパースに失敗しています。", use_size);
return;
}
U.toPointer(write_pointer);
byte[] data = new byte[use_size];
U.write_u8(data, 0, (uint)trackdata.Count); //トラック数
U.write_u8(data, 1, 0x0); //常にゼロ.
U.write_u8(data, 2, 0x0A); //Do these values matter?
U.write_u8(data, 3, 0x80); //This is just copying what the stock ROM does...
uint offset = 8 + (4 * (uint)trackdata.Count);
//データ構造
//ヘッダー
//[track数] [0] [0x0A] [0x80] [楽器ポンタ] [楽譜1ポインタ] [楽譜2ポインタ].... [楽譜Nポインタ]
//
//実データ
//[楽譜1データ].......
//[楽譜2データ].......
//
//[楽器データ]
//[楽器サンプルデータ]
//楽譜
for (int track = 0; track < trackdata.Count; track++)
{
//楽譜ポインタの書き込み
U.write_u32(data, 8 + (4 * (uint)track), U.toPointer(write_pointer + offset));
//楽譜データを書き込む.
burn_track(data, offset, write_pointer, trackdata[track].ToArray());
offset += (uint)trackdata[track].Count;
}
offset = U.Padding4(offset); //楽譜と楽器の間は 4バイトアライメントが必要.
//楽器ポインタ
U.write_u32(data, 4, U.toPointer(write_pointer + offset));
uint instrument_start = offset; //楽器開始
uint instrumentdata_start = instrument_start + (12 * (uint)instrument_map.Instrument_mapping.Count); //楽器データ開始
Log.Debug("instrumentdata_start(", instrumentdata_start.ToString(), ") = instrument_start(", instrument_start.ToString(), ") + 12 * instrument_count(", instrument_map.Instrument_mapping.Count.ToString(), ")");
U.write_range(data, instrument_start, instrument_map.Instrument_codes.ToArray());
U.write_range(data, instrumentdata_start, instrument_map.Sample_data.ToArray());
//楽器
uint resyclesize = 0;
for (int i = 0; i < instrument_map.Instrument_mapping.Count; i++)
{
uint this_instrument = instrument_start + (12 * (uint)i);
Log.Debug("track:", i.ToString(), " ", data[this_instrument + 0].ToString());
uint instrumentCode = U.u8(data, this_instrument + 0);
if (SongInstrumentForm.IsDirectSound(instrumentCode) ||
SongInstrumentForm.IsWaveMemory(instrumentCode))
{
uint sample_data_start = U.u32(data, this_instrument + 4);
sample_data_start += instrumentdata_start;
if (sample_data_start < resyclesize)
{
Log.Error("BAD INSTRUMENT:", i.ToString(), (sample_data_start - instrumentdata_start).ToString(), sample_data_start.ToString(), resyclesize.ToString());
continue;
}
sample_data_start -= resyclesize;
uint sample_data_len;
if (SongInstrumentForm.IsWaveMemory(instrumentCode))
{
sample_data_len = 16;
}
else
{
sample_data_len = U.u32(data, sample_data_start + 12);
sample_data_len = U.Padding4(sample_data_len);
}
Log.Debug("d ", sample_data_start.ToString("X"), " ", sample_data_len.ToString());
uint found_address = U.Grep(Program.ROM.Data, U.subrange(data, sample_data_start, sample_data_start + sample_data_len), 100, 0, 4);
if (found_address != U.NOT_FOUND)
{
Log.Debug("recycle ", sample_data_start.ToString("X"), " len ", sample_data_len.ToString(), " -> ", found_address.ToString("X"));
//existing address in ROM.
//recycle
data = U.del(data, sample_data_start, sample_data_start + sample_data_len);
U.write_u32(data, this_instrument + 4, U.toPointer(found_address));
resyclesize += sample_data_len;
}
else
{
//nothing to recycle, write the data.
uint baseoffset = U.u32(data, this_instrument + 4); //相対アドレスが書いてあるので、それを求めに絶対値に変換する
U.write_u32(data, this_instrument + 4
, U.toPointer((instrumentdata_start + write_pointer + baseoffset) - resyclesize));
}
}
else if (instrumentCode == 0x80)
{ //ドラム
uint baseoffset = U.u32(data, this_instrument + 4); //相対アドレスが書いてあるので、それを求めに絶対値に変換する
U.write_u32(data, this_instrument + 4
, U.toPointer(instrument_start + write_pointer + baseoffset));
}
else if (instrumentCode == 0x40)
{
Log.Debug("MULTI TRACK!");
uint baseoffset = U.u32(data, this_instrument + 4); //相対アドレスが書いてあるので、それを求めに絶対値に変換する
U.write_u32(data, this_instrument + 4
, U.toPointer(instrument_start + write_pointer + baseoffset));
baseoffset = U.u32(data, this_instrument + 8); //相対アドレスが書いてあるので、それを求めに絶対値に変換する
U.write_u32(data, this_instrument + 8
, U.toPointer((instrumentdata_start + write_pointer + baseoffset) - resyclesize));
}
}
Log.Notify("resyclesize:", resyclesize.ToString(), U.To0xHexString(resyclesize));
string undo_name = "";
Undo.UndoData undodata = Program.Undo.NewUndoData(undo_name);
undodata.list.Add(new Undo.UndoPostion(song.table, 8));
Program.ROM.write_u32(song.table, U.toPointer(write_pointer));
InputFormRef.WriteBinaryDataDirect(write_pointer, data, undodata);
uint priority = GetSongPriority(trackdata.Count);
Program.ROM.write_u32(song.table + 4, priority, undodata);
Program.Undo.Push(undodata);
}
