2 * Adplug - Replayer for many OPL2/OPL3 audio file formats.
3 * Copyright (C) 1999 - 2004 Simon Peter, <dn.tlp@gmx.net>, et al.
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 * hsp.cpp - HSP Loader by Simon Peter <dn.tlp@gmx.net>
26 CPlayer *ChspLoader::factory(Copl *newopl)
28 return new ChspLoader(newopl);
31 bool ChspLoader::load(const std::string &filename, const CFileProvider &fp)
33 binistream *f = fp.open(filename); if(!f) return false;
34 unsigned long i, j, orgsize, filesize;
35 unsigned char *cmp, *org;
37 // file validation section
38 if(!fp.extension(filename, ".hsp")) { fp.close(f); return false; }
40 filesize = fp.filesize(f);
41 orgsize = f->readInt(2);
42 if(orgsize > 59187) { fp.close(f); return false; }
45 cmp = new unsigned char[filesize];
46 for(i = 0; i < filesize; i++) cmp[i] = f->readInt(1);
49 org = new unsigned char[orgsize];
50 for(i = 0, j = 0; i < filesize; j += cmp[i], i += 2) { // RLE decompress
51 if(j >= orgsize) break; // memory boundary check
52 memset(org + j, cmp[i + 1], j + cmp[i] < orgsize ? cmp[i] : orgsize - j - 1);
56 memcpy(instr, org, 128 * 12); // instruments
57 for(i = 0; i < 128; i++) { // correct instruments
58 instr[i][2] ^= (instr[i][2] & 0x40) << 1;
59 instr[i][3] ^= (instr[i][3] & 0x40) << 1;
60 instr[i][11] >>= 4; // slide
62 memcpy(song, org + 128 * 12, 51); // tracklist
63 memcpy(patterns, org + 128 * 12 + 51, orgsize - 128 * 12 - 51); // patterns