Mercurial > otakunoraifu
annotate music2/koedec.cc @ 71:1fd20d231376
Fix objScale with 2D zoom; implement objWidth and objHeight.
| author | Emmanuel Gil Peyrot <linkmauve@linkmauve.fr> |
|---|---|
| date | Fri, 01 Apr 2011 23:49:12 +0200 |
| parents | 4416cfac86ae |
| children |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * Copyright (c) 2004-2006 Kazunori "jagarl" Ueno | |
| 3 * All rights reserved. | |
| 4 * | |
| 5 * Redistribution and use in source and binary forms, with or without | |
| 6 * modification, are permitted provided that the following conditions | |
| 7 * are met: | |
| 8 * 1. Redistributions of source code must retain the above copyright | |
| 9 * notice, this list of conditions and the following disclaimer. | |
| 10 * 2. Redistributions in binary form must reproduce the above copyright | |
| 11 * notice, this list of conditions and the following disclaimer in the | |
| 12 * documentation and/or other materials provided with the distribution. | |
| 13 * 3. The name of the author may not be used to endorse or promote products | |
| 14 * derived from this software without specific prior written permission. | |
| 15 * | |
| 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR | |
| 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES | |
| 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | |
| 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, | |
| 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
| 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | |
| 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | |
| 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | |
| 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF | |
| 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |
| 26 */ | |
| 27 | |
| 52 | 28 #include <stdio.h> |
| 29 #include <stdlib.h> | |
| 30 #include <string.h> | |
| 0 | 31 #include <vector> |
| 32 #include <list> | |
| 33 #include <algorithm> | |
| 52 | 34 #include "music.h" |
| 35 #include "system/file.h" | |
| 36 #include "system/file_impl.h" | |
| 0 | 37 |
| 38 using namespace std; | |
| 39 | |
| 40 /********************************************* | |
| 41 ** | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
42 ** FindKoe -- RealLiveの音声アーカイブ処理 |
| 0 | 43 ** |
| 44 */ | |
| 45 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
46 /* 声ファイルのアーカイブ用のキャッシュ */ |
| 0 | 47 #define koe_cache_size 7 |
| 48 struct AvgKoeTable { | |
| 49 int koe_num; | |
| 50 int length; | |
| 51 int offset; | |
| 52 AvgKoeTable(int _num, int _len, int _off) : | |
| 53 koe_num(_num), length(_len), offset(_off) {} | |
| 54 bool operator <(int number) const { | |
| 55 return koe_num < number; | |
| 56 } | |
| 57 bool operator <(const AvgKoeTable& to) const { | |
| 58 return koe_num < to.koe_num; | |
| 59 } | |
| 60 bool operator ==(const AvgKoeTable& to) const { | |
| 61 return koe_num == to.koe_num; | |
| 62 } | |
| 63 bool operator ==(const int to) const { | |
| 64 return koe_num == to; | |
| 65 } | |
| 66 }; | |
| 52 | 67 |
| 0 | 68 struct AvgKoeHead { |
| 69 FILE* stream; | |
| 70 int file_number; | |
| 71 int rate; | |
| 72 KoeType type; | |
| 73 vector<AvgKoeTable> table; | |
| 74 AvgKoeHead(FILE* stream, int file_number, KoeType type); | |
| 75 AvgKoeHead(const AvgKoeHead& from); | |
| 76 ~AvgKoeHead(); | |
| 77 AvgKoeTable* Find(int koe_num); | |
| 78 bool operator !=(int num) const { return file_number != num; } | |
| 79 bool operator ==(int num) const { return file_number == num; } | |
| 80 }; | |
| 52 | 81 |
| 0 | 82 struct AvgKoeCache { |
| 83 list<AvgKoeHead> cache; | |
| 84 AvgKoeInfo Find(int file_number, int index); | |
| 85 }; | |
| 52 | 86 |
| 0 | 87 static AvgKoeCache koe_cache; |
| 88 | |
| 89 AvgKoeInfo FindKoe(int file_number, int index) { | |
| 90 return koe_cache.Find(file_number, index); | |
| 52 | 91 } |
|
45
53a311ea8289
Patched an old patch of mine (OGG koe files handling)... It's a bit less ugly, and it works with tremor!
thib
parents:
43
diff
changeset
|
92 |
| 0 | 93 AvgKoeInfo AvgKoeCache::Find(int file_number, int index) { |
| 94 AvgKoeInfo info; | |
| 52 | 95 info.stream = NULL; |
| 96 info.length = 0; | |
| 97 info.offset = 0; | |
| 0 | 98 |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
99 FileSearcher* file_searcher = FileSearcher::GetInstance(); |
|
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
100 |
| 0 | 101 list<AvgKoeHead>::iterator it; |
| 102 it = find(cache.begin(), cache.end(), file_number); | |
| 103 if (it == cache.end()) { | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
104 /* 新たに head を作る */ |
| 0 | 105 char fname[100]; |
| 106 KoeType type = koe_unknown; | |
| 107 sprintf(fname, "z%03d.koe", file_number); | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
108 ARCINFO* arcinfo = file_searcher->Find(FileSearcher::KOE,fname,".koe"); |
| 52 | 109 if (arcinfo == NULL) { |
| 0 | 110 type = koe_nwk; |
| 111 sprintf(fname, "z%04d.nwk", file_number); | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
112 arcinfo = file_searcher->Find(FileSearcher::KOE,fname,".nwk"); |
| 0 | 113 } |
| 52 | 114 if (arcinfo == NULL) { |
| 0 | 115 type = koe_ovk; |
| 116 sprintf(fname, "z%04d.ovk", file_number); | |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
117 arcinfo = file_searcher->Find(FileSearcher::KOE,fname,".ovk"); |
| 0 | 118 } |
| 24 | 119 #if HAVE_LIBVORBISFILE || HAVE_LIBVORBISIDEC |
| 52 | 120 if (arcinfo == NULL) { |
|
45
53a311ea8289
Patched an old patch of mine (OGG koe files handling)... It's a bit less ugly, and it works with tremor!
thib
parents:
43
diff
changeset
|
121 //FIXME: OMG that's ugly, improve it as soon as you can! |
|
53
ddbcbd000206
* MuSys, AyuSysConfig, FileSearcher (former FILESEARCHER) and KeyHolder (former KEYHOLDER) are now singletons
thib
parents:
52
diff
changeset
|
122 DIRFILE* koedir = (DIRFILE*) file_searcher->MakeARCFILE((FileSearcher::ARCTYPE)0, "koe"); |
|
2
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
123 sprintf(fname, "%04d", file_number); |
| 50 | 124 char* dirname = koedir->SearchFile(fname); |
| 125 delete koedir; | |
| 126 koedir = new DIRFILE(dirname); | |
| 127 delete[] dirname; | |
|
2
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
128 sprintf(fname, "z%04d%05d.ogg", file_number, index); |
|
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
129 arcinfo = koedir->Find(fname, ".ogg"); |
|
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
130 delete koedir; |
|
45
53a311ea8289
Patched an old patch of mine (OGG koe files handling)... It's a bit less ugly, and it works with tremor!
thib
parents:
43
diff
changeset
|
131 |
| 52 | 132 if (arcinfo == NULL) return info; |
|
45
53a311ea8289
Patched an old patch of mine (OGG koe files handling)... It's a bit less ugly, and it works with tremor!
thib
parents:
43
diff
changeset
|
133 FILE* stream = arcinfo->OpenFile(&info.length); |
| 50 | 134 delete arcinfo; |
|
2
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
135 info.type = koe_ogg; |
|
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
136 info.stream = stream; |
|
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
137 return info; |
|
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
138 } |
| 24 | 139 #endif |
| 52 | 140 if (arcinfo == NULL) return info; |
| 0 | 141 FILE* stream = arcinfo->OpenFile(); |
| 142 delete arcinfo; | |
| 52 | 143 if (stream == NULL) return info; |
| 0 | 144 cache.push_front(AvgKoeHead(stream, file_number, type)); |
| 145 if (cache.size() >= koe_cache_size) cache.pop_back(); | |
| 146 it = cache.begin(); | |
| 147 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
148 if (it->file_number != file_number) return info; // 番号がおかしい |
| 0 | 149 AvgKoeTable* table = it->Find(index); |
| 52 | 150 //FIXME: table == NULL ? |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
151 if (table == 0) return info; // index が見付からない |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
152 // info を作成する |
| 0 | 153 info.length = table->length; |
| 154 info.offset = table->offset; | |
| 155 info.rate = it->rate; | |
| 156 info.type = it->type; | |
| 157 int new_fd = dup(fileno(it->stream)); | |
| 52 | 158 if (new_fd == -1) info.stream = NULL; |
| 0 | 159 else info.stream = fdopen(new_fd, "rb"); |
| 160 return info; | |
| 161 } | |
| 162 | |
| 163 AvgKoeHead::AvgKoeHead(const AvgKoeHead& from) { | |
| 164 if (from.stream) { | |
| 165 int new_fd = dup(fileno(from.stream)); | |
| 52 | 166 if (new_fd == -1) stream = NULL; |
| 0 | 167 else stream = fdopen(new_fd, "rb"); |
| 168 } | |
| 169 file_number = from.file_number; | |
| 170 rate = from.rate; | |
| 171 table = from.table; | |
| 172 type = from.type; | |
| 173 } | |
|
2
422f3cb3614b
Enabled voice playing with "%04d/%04d%05d.ogg" format. Don't use a cache for this
thib
parents:
0
diff
changeset
|
174 |
| 0 | 175 AvgKoeHead::AvgKoeHead(FILE* _s, int _file_number, KoeType _type) { |
| 176 char head[0x20]; | |
| 177 stream = _s; file_number = _file_number; | |
|
43
01aa5ddf7dc8
A lot of very minor improvements (deleted some unused variables, and other things like that...)
thib
parents:
24
diff
changeset
|
178 //int offset = ftell(stream); |
| 0 | 179 rate = 22050; |
| 180 type = _type; | |
| 52 | 181 if (stream == NULL) return; |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
182 /* header 読み込み */ |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
183 if (type == koe_nwk) { // 新しい形式 : .nwk file |
| 0 | 184 rate = 44100; |
| 185 fread(head, 4, 1, stream); | |
| 186 int table_len = read_little_endian_int(head); | |
| 187 table.reserve(table_len); | |
| 188 int i; | |
| 189 for (i=0; i<table_len; i++) { | |
| 190 fread(head, 12, 1, stream); | |
| 191 int sz = read_little_endian_int(head); | |
| 192 int off = read_little_endian_int(head+4); | |
| 193 int cnt = read_little_endian_int(head+8); | |
| 194 table.push_back(AvgKoeTable(cnt, sz, off)); | |
| 195 } | |
| 196 } else if (type == koe_ovk) { // Little Busters! : .ovk file | |
| 197 rate = 44100; | |
| 198 fread(head, 4, 1, stream); | |
| 199 int table_len = read_little_endian_int(head); | |
| 200 table.reserve(table_len); | |
| 201 int i; | |
| 202 for (i=0; i<table_len; i++) { | |
| 203 fread(head, 16, 1, stream); | |
| 204 int sz = read_little_endian_int(head); | |
| 205 int off = read_little_endian_int(head+4); | |
| 206 int cnt = read_little_endian_int(head+8); | |
| 207 table.push_back(AvgKoeTable(cnt, sz, off)); | |
| 208 } | |
| 209 } else { // .koe file | |
| 210 fread(head, 0x20, 1, stream); | |
| 211 if (strncmp(head, "KOEPAC", 7) != 0) { // invalid header | |
| 52 | 212 stream = NULL; |
| 0 | 213 return; |
| 214 } | |
| 215 int table_len = read_little_endian_int(head+0x10); | |
| 216 rate = read_little_endian_int(head+0x18); | |
| 217 if (rate == 0) rate = 22050; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
218 /* table 読み込み */ |
| 0 | 219 table.reserve(table_len); |
| 220 char* buf = new char[table_len*8]; | |
| 221 fread(buf, table_len, 8, stream); | |
| 222 int i; for (i=0; i<table_len; i++) { | |
| 223 int cnt = read_little_endian_short(buf+i*8); | |
| 224 int sz = read_little_endian_short(buf+i*8+2); | |
| 225 int off = read_little_endian_int(buf+i*8+4); | |
| 226 table.push_back(AvgKoeTable(cnt, sz, off)); | |
| 227 } | |
| 228 } | |
| 229 sort(table.begin(), table.end()); | |
| 230 } | |
| 231 | |
| 232 AvgKoeHead::~AvgKoeHead(void) { | |
| 233 if (stream) fclose(stream); | |
| 52 | 234 stream = NULL; |
| 0 | 235 } |
| 52 | 236 |
| 0 | 237 AvgKoeTable* AvgKoeHead::Find(int koe_num) { |
| 52 | 238 if (table.empty()) return NULL; |
| 0 | 239 vector<AvgKoeTable>::iterator it; |
| 240 it = lower_bound(table.begin(), table.end(), koe_num); | |
| 52 | 241 if (it == table.end() || it->koe_num != koe_num) return NULL; |
| 0 | 242 return &table[it-table.begin()]; |
| 243 } | |
| 244 | |
| 245 /********************************************* | |
| 246 ** | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
247 ** MakeWavHeader : koe ファイルに wave header を付ける |
| 0 | 248 ** |
| 249 */ | |
| 250 | |
| 251 static unsigned char orig_header[0x2c] = { | |
| 252 0x52, 0x49, 0x46, 0x46, /* +00 "RIFF" */ | |
| 253 0x00, 0x00, 0x00, 0x00, /* +04 file size - 8 */ | |
| 254 0x57, 0x41, 0x56, 0x45, 0x66, 0x6d, 0x74, 0x20, /* +08 "WAVEfmt " */ | |
| 255 0x10, 0x00, 0x00, 0x00, /* +10 fmt size */ | |
| 256 0x01, 0x00, /* +14 wFormatTag */ | |
| 257 0x02, 0x00, /* +16 Channels */ | |
| 258 0x44, 0xac, 0x00, 0x00, /* +18 rate */ | |
| 259 0x10, 0xb1, 0x02, 0x00, /* +1c BytesPerSec = rate * BlockAlign */ | |
| 260 0x04, 0x00, /* +20 BlockAlign = channels*BytesPerSample */ | |
| 261 0x10, 0x00, /* +22 BitsPerSample */ | |
| 262 0x64, 0x61, 0x74, 0x61, /* +24 "data" */ | |
| 263 0x00, 0x00, 0x00, 0x00 /* +28 filesize - 0x2c */ | |
| 264 }; | |
| 265 | |
| 266 const char* MakeWavHeader(int rate, int ch, int bps, int size) { | |
| 267 static char header[0x2c]; | |
| 268 memcpy(header, (const char*)orig_header, 0x2c); | |
| 269 write_little_endian_int(header+0x04, size-8); | |
| 270 write_little_endian_int(header+0x28, size-0x2c); | |
| 271 write_little_endian_int(header+0x18, rate); | |
| 272 write_little_endian_int(header+0x1c, rate*ch*bps); | |
| 273 header[0x16] = ch; | |
| 274 header[0x20] = ch*bps; | |
| 275 header[0x22] = bps*8; | |
| 276 return header; | |
| 277 } | |
| 278 | |
| 279 /********************************************* | |
| 280 ** | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
281 ** decode_koe -- 音声データ展開 |
| 0 | 282 ** |
| 283 */ | |
| 284 | |
| 285 extern char* decode_koe(AvgKoeInfo info, int* len); | |
| 286 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
287 /* 8bit -> 16bit への変換テーブル。本来は signed short だが |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
288 ** とりあえず unsigned で扱っている |
| 0 | 289 */ |
| 290 | |
| 291 unsigned short koe_8bit_trans_tbl[256] = { | |
| 292 0x8000,0x81ff,0x83f9,0x85ef,0x87e1,0x89cf,0x8bb9,0x8d9f, | |
| 293 0x8f81,0x915f,0x9339,0x950f,0x96e1,0x98af,0x9a79,0x9c3f, | |
| 294 0x9e01,0x9fbf,0xa179,0xa32f,0xa4e1,0xa68f,0xa839,0xa9df, | |
| 295 0xab81,0xad1f,0xaeb9,0xb04f,0xb1e1,0xb36f,0xb4f9,0xb67f, | |
| 296 0xb801,0xb97f,0xbaf9,0xbc6f,0xbde1,0xbf4f,0xc0b9,0xc21f, | |
| 297 0xc381,0xc4df,0xc639,0xc78f,0xc8e1,0xca2f,0xcb79,0xccbf, | |
| 298 0xce01,0xcf3f,0xd079,0xd1af,0xd2e1,0xd40f,0xd539,0xd65f, | |
| 299 0xd781,0xd89f,0xd9b9,0xdacf,0xdbe1,0xdcef,0xddf9,0xdeff, | |
| 300 0xe001,0xe0ff,0xe1f9,0xe2ef,0xe3e1,0xe4cf,0xe5b9,0xe69f, | |
| 301 0xe781,0xe85f,0xe939,0xea0f,0xeae1,0xebaf,0xec79,0xed3f, | |
| 302 0xee01,0xeebf,0xef79,0xf02f,0xf0e1,0xf18f,0xf239,0xf2df, | |
| 303 0xf381,0xf41f,0xf4b9,0xf54f,0xf5e1,0xf66f,0xf6f9,0xf77f, | |
| 304 0xf801,0xf87f,0xf8f9,0xf96f,0xf9e1,0xfa4f,0xfab9,0xfb1f, | |
| 305 0xfb81,0xfbdf,0xfc39,0xfc8f,0xfce1,0xfd2f,0xfd79,0xfdbf, | |
| 306 0xfe01,0xfe3f,0xfe79,0xfeaf,0xfee1,0xff0f,0xff39,0xff5f, | |
| 307 0xff81,0xff9f,0xffb9,0xffcf,0xffe1,0xffef,0xfff9,0xffff, | |
| 308 0x0000,0x0001,0x0007,0x0011,0x001f,0x0031,0x0047,0x0061, | |
| 309 0x007f,0x00a1,0x00c7,0x00f1,0x011f,0x0151,0x0187,0x01c1, | |
| 310 0x01ff,0x0241,0x0287,0x02d1,0x031f,0x0371,0x03c7,0x0421, | |
| 311 0x047f,0x04e1,0x0547,0x05b1,0x061f,0x0691,0x0707,0x0781, | |
| 312 0x07ff,0x0881,0x0907,0x0991,0x0a1f,0x0ab1,0x0b47,0x0be1, | |
| 313 0x0c7f,0x0d21,0x0dc7,0x0e71,0x0f1f,0x0fd1,0x1087,0x1141, | |
| 314 0x11ff,0x12c1,0x1387,0x1451,0x151f,0x15f1,0x16c7,0x17a1, | |
| 315 0x187f,0x1961,0x1a47,0x1b31,0x1c1f,0x1d11,0x1e07,0x1f01, | |
| 316 0x1fff,0x2101,0x2207,0x2311,0x241f,0x2531,0x2647,0x2761, | |
| 317 0x287f,0x29a1,0x2ac7,0x2bf1,0x2d1f,0x2e51,0x2f87,0x30c1, | |
| 318 0x31ff,0x3341,0x3487,0x35d1,0x371f,0x3871,0x39c7,0x3b21, | |
| 319 0x3c7f,0x3de1,0x3f47,0x40b1,0x421f,0x4391,0x4507,0x4681, | |
| 320 0x47ff,0x4981,0x4b07,0x4c91,0x4e1f,0x4fb1,0x5147,0x52e1, | |
| 321 0x547f,0x5621,0x57c7,0x5971,0x5b1f,0x5cd1,0x5e87,0x6041, | |
| 322 0x61ff,0x63c1,0x6587,0x6751,0x691f,0x6af1,0x6cc7,0x6ea1, | |
| 323 0x707f,0x7261,0x7447,0x7631,0x781f,0x7a11,0x7c07,0x7fff | |
| 324 }; | |
| 325 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
326 /* ADPCM・・・じゃないらしい。ただのDPCMのナめたテーブル。 |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
327 ** 自動生成すりゃいいんだけど256byteだったら |
|
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
328 ** テーブルでも問題ないでしょ |
| 0 | 329 */ |
| 330 | |
| 331 char koe_ad_trans_tbl[256] = { | |
| 332 0x00,0xff,0x01,0xfe,0x02,0xfd,0x03,0xfc,0x04,0xfb,0x05,0xfa,0x06,0xf9,0x07,0xf8, | |
| 333 0x08,0xf7,0x09,0xf6,0x0a,0xf5,0x0b,0xf4,0x0c,0xf3,0x0d,0xf2,0x0e,0xf1,0x0f,0xf0, | |
| 334 0x10,0xef,0x11,0xee,0x12,0xed,0x13,0xec,0x14,0xeb,0x15,0xea,0x16,0xe9,0x17,0xe8, | |
| 335 0x18,0xe7,0x19,0xe6,0x1a,0xe5,0x1b,0xe4,0x1c,0xe3,0x1d,0xe2,0x1e,0xe1,0x1f,0xe0, | |
| 336 0x20,0xdf,0x21,0xde,0x22,0xdd,0x23,0xdc,0x24,0xdb,0x25,0xda,0x26,0xd9,0x27,0xd8, | |
| 337 0x28,0xd7,0x29,0xd6,0x2a,0xd5,0x2b,0xd4,0x2c,0xd3,0x2d,0xd2,0x2e,0xd1,0x2f,0xd0, | |
| 338 0x30,0xcf,0x31,0xce,0x32,0xcd,0x33,0xcc,0x34,0xcb,0x35,0xca,0x36,0xc9,0x37,0xc8, | |
| 339 0x38,0xc7,0x39,0xc6,0x3a,0xc5,0x3b,0xc4,0x3c,0xc3,0x3d,0xc2,0x3e,0xc1,0x3f,0xc0, | |
| 340 0x40,0xbf,0x41,0xbe,0x42,0xbd,0x43,0xbc,0x44,0xbb,0x45,0xba,0x46,0xb9,0x47,0xb8, | |
| 341 0x48,0xb7,0x49,0xb6,0x4a,0xb5,0x4b,0xb4,0x4c,0xb3,0x4d,0xb2,0x4e,0xb1,0x4f,0xb0, | |
| 342 0x50,0xaf,0x51,0xae,0x52,0xad,0x53,0xac,0x54,0xab,0x55,0xaa,0x56,0xa9,0x57,0xa8, | |
| 343 0x58,0xa7,0x59,0xa6,0x5a,0xa5,0x5b,0xa4,0x5c,0xa3,0x5d,0xa2,0x5e,0xa1,0x5f,0xa0, | |
| 344 0x60,0x9f,0x61,0x9e,0x62,0x9d,0x63,0x9c,0x64,0x9b,0x65,0x9a,0x66,0x99,0x67,0x98, | |
| 345 0x68,0x97,0x69,0x96,0x6a,0x95,0x6b,0x94,0x6c,0x93,0x6d,0x92,0x6e,0x91,0x6f,0x90, | |
| 346 0x70,0x8f,0x71,0x8e,0x72,0x8d,0x73,0x8c,0x74,0x8b,0x75,0x8a,0x76,0x89,0x77,0x88, | |
| 347 0x78,0x87,0x79,0x86,0x7a,0x85,0x7b,0x84,0x7c,0x83,0x7d,0x82,0x7e,0x81,0x7f,0x80 | |
| 348 }; | |
| 349 | |
| 350 extern int is_koe_ogg(char* head); | |
| 351 extern char* decode_koe_ogg(AvgKoeInfo info, int* dest_len); | |
| 352 | |
| 353 char* decode_koe(AvgKoeInfo info, int* dest_len) { | |
| 52 | 354 char buf[1024]; |
| 355 char* table; | |
| 0 | 356 unsigned char* src_orig, *src; |
| 357 unsigned short* dest_orig, *dest; | |
| 52 | 358 int all_len, i, j; |
| 0 | 359 if (info.stream == NULL) { |
| 360 return NULL; | |
| 361 } | |
| 52 | 362 fseek(info.stream, info.offset, SEEK_SET); |
| 0 | 363 if (info.type == koe_nwk) { |
| 364 return decode_koe_nwa(info, dest_len); | |
| 365 } | |
| 366 fread(buf, 1, 0x20, info.stream); | |
| 367 if (is_koe_ogg(buf)) { | |
| 52 | 368 fseek(info.stream, -20, SEEK_CUR); |
| 0 | 369 return decode_koe_ogg(info, dest_len); |
| 370 } | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
371 /* avg32 の声データ展開 */ |
| 0 | 372 table = (char*)malloc(info.length*2); |
| 52 | 373 fseek(info.stream, info.offset, SEEK_SET); |
| 0 | 374 fread(table, 2, info.length, info.stream); |
| 375 | |
| 376 all_len = 0; | |
| 52 | 377 for (i=0; i < info.length; i++) |
| 0 | 378 all_len += read_little_endian_short(table + i*2); |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
379 /* データ読み込み */ |
| 0 | 380 src_orig = (unsigned char*) malloc(all_len); |
| 381 dest_orig = (unsigned short*)malloc(info.length * 0x1000 + 0x2c); | |
| 382 if (src_orig == NULL || dest_orig == NULL) return NULL; | |
| 383 src = src_orig; | |
| 384 fread(src, 1, all_len, info.stream); | |
| 385 *dest_len = info.length * 0x400 * 4; | |
| 386 const char* header = MakeWavHeader(info.rate, 2, 2, *dest_len); | |
| 387 memcpy(dest_orig, header, 0x2c); | |
| 388 dest = dest_orig + 0x2c; | |
| 389 /* memset(dest_data, 0, table_len * 0x1000); */ | |
| 390 | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
391 /* 展開 */ |
| 0 | 392 for (i=0; i<info.length; i++) { |
| 393 int slen = read_little_endian_short(table+i*2); | |
| 394 if (slen == 0) { // do nothing | |
| 395 memset(dest, 0, 0x1000); | |
| 396 dest += 0x800; src += 0; | |
|
65
4416cfac86ae
Convert EUC-JP files to UTF8
Thibaut Girka <thib@sitedethib.com>
parents:
53
diff
changeset
|
397 } else if (slen == 0x400) { // table 変換 |
| 0 | 398 for (j=0; j<0x400; j++) { |
| 399 write_little_endian_short((char*)(dest+0), koe_8bit_trans_tbl[*src]); | |
| 400 write_little_endian_short((char*)(dest+1), koe_8bit_trans_tbl[*src]); | |
| 401 dest += 2; src++; | |
| 402 } | |
| 403 } else { // DPCM | |
| 404 char d = 0; short o2; | |
| 405 int k,j; for (j=0, k=0; j<slen && k < 0x800; j++) { | |
| 406 unsigned char s = src[j]; | |
| 407 if ( (s+1) & 0x0f) { | |
| 408 d -= koe_ad_trans_tbl[s & 0x0f]; | |
| 409 } else { | |
| 410 unsigned char s2; | |
| 411 s >>= 4; s &= 0x0f; s2 = s; | |
| 412 s = src[++j]; s2 |= (s<<4) & 0xf0; | |
| 413 d -= koe_ad_trans_tbl[s2]; | |
| 414 } | |
| 415 o2 = koe_8bit_trans_tbl[ (unsigned char)d]; | |
| 416 write_little_endian_short((char*)(dest+k), o2); | |
| 417 write_little_endian_short((char*)(dest+k+1), o2); | |
| 418 k+=2; | |
| 419 s >>= 4; | |
| 420 if ((s+1) & 0x0f) { | |
| 421 d -= koe_ad_trans_tbl[s & 0x0f]; | |
| 422 } else { | |
| 423 d -= koe_ad_trans_tbl[ src[++j] ]; | |
| 424 } | |
| 425 o2 = koe_8bit_trans_tbl[ (unsigned char)d]; | |
| 426 write_little_endian_short((char*)(dest+k), o2); | |
| 427 write_little_endian_short((char*)(dest+k+1), o2); | |
| 428 k+=2; | |
| 429 } | |
| 430 dest += 0x800; src += slen; | |
| 431 } | |
| 432 } | |
| 433 free( (void*) table); | |
| 434 free( (void*) src_orig); | |
| 435 return (char*)dest_orig; | |
| 436 } | |
| 437 | |
| 438 |