Mercurial > audlegacy-plugins
diff src/adplug/core/ksm.cxx @ 955:4709ce4e209e trunk
[svn] Run indent -ts4 -nut -bli0 -cdw on this messy lot. Upstream is not consistent with whitespace anyway, no loss there.
| author | chainsaw |
|---|---|
| date | Sat, 14 Apr 2007 15:23:50 -0700 |
| parents | cae46214b8bf |
| children | fa9f85cebade |
line wrap: on
line diff
--- a/src/adplug/core/ksm.cxx Sat Apr 14 08:48:41 2007 -0700 +++ b/src/adplug/core/ksm.cxx Sat Apr 14 15:23:50 2007 -0700 @@ -24,316 +24,396 @@ #include "ksm.h" #include "debug.h" -const unsigned int CksmPlayer::adlibfreq[63] = { - 0, - 2390,2411,2434,2456,2480,2506,2533,2562,2592,2625,2659,2695, - 3414,3435,3458,3480,3504,3530,3557,3586,3616,3649,3683,3719, - 4438,4459,4482,4504,4528,4554,4581,4610,4640,4673,4707,4743, - 5462,5483,5506,5528,5552,5578,5605,5634,5664,5697,5731,5767, - 6486,6507,6530,6552,6576,6602,6629,6658,6688,6721,6755,6791, - 7510}; +const unsigned int + CksmPlayer::adlibfreq[63] = { + 0, + 2390, 2411, 2434, 2456, 2480, 2506, 2533, 2562, 2592, 2625, 2659, 2695, + 3414, 3435, 3458, 3480, 3504, 3530, 3557, 3586, 3616, 3649, 3683, 3719, + 4438, 4459, 4482, 4504, 4528, 4554, 4581, 4610, 4640, 4673, 4707, 4743, + 5462, 5483, 5506, 5528, 5552, 5578, 5605, 5634, 5664, 5697, 5731, 5767, + 6486, 6507, 6530, 6552, 6576, 6602, 6629, 6658, 6688, 6721, 6755, 6791, + 7510 +}; /*** public methods **************************************/ -CPlayer *CksmPlayer::factory(Copl *newopl) +CPlayer * +CksmPlayer::factory (Copl * newopl) { - return new CksmPlayer(newopl); + return new CksmPlayer (newopl); } -bool CksmPlayer::load(VFSFile *fd, const CFileProvider &fp) +bool +CksmPlayer::load (VFSFile * fd, const CFileProvider & fp) { - binistream *f; - int i; - std::string filename(fd->uri); - char *fn = new char[filename.length() + 9]; + binistream *f; + int i; + std::string filename (fd->uri); + char *fn = new char[filename.length () + 9]; // file validation section - if(!fp.extension(filename, ".ksm")) { - AdPlug_LogWrite("CksmPlayer::load(,\"%s\"): File doesn't have '.ksm' " - "extension! Rejected!\n", filename.c_str()); + if (!fp.extension (filename, ".ksm")) + { + AdPlug_LogWrite ("CksmPlayer::load(,\"%s\"): File doesn't have '.ksm' " + "extension! Rejected!\n", filename.c_str ()); return false; } - AdPlug_LogWrite("*** CksmPlayer::load(,\"%s\") ***\n", filename.c_str()); + AdPlug_LogWrite ("*** CksmPlayer::load(,\"%s\") ***\n", filename.c_str ()); // Load instruments from 'insts.dat' - strcpy(fn, filename.c_str()); - for(i = strlen(fn) - 1; i >= 0; i--) - if(fn[i] == '/' || fn[i] == '\\') + strcpy (fn, filename.c_str ()); + for (i = strlen (fn) - 1; i >= 0; i--) + if (fn[i] == '/' || fn[i] == '\\') break; - strcpy(fn + i + 1, "insts.dat"); - AdPlug_LogWrite("Instruments file: \"%s\"\n", fn); - VFSFile *instfd = vfs_fopen(fn, "rb"); - f = fp.open(instfd); - delete [] fn; - if(!f) { - AdPlug_LogWrite("Couldn't open instruments file! Aborting!\n"); - AdPlug_LogWrite("--- CksmPlayer::load ---\n"); + strcpy (fn + i + 1, "insts.dat"); + AdPlug_LogWrite ("Instruments file: \"%s\"\n", fn); + VFSFile *instfd = vfs_fopen (fn, "rb"); + f = fp.open (instfd); + delete[]fn; + if (!f) + { + AdPlug_LogWrite ("Couldn't open instruments file! Aborting!\n"); + AdPlug_LogWrite ("--- CksmPlayer::load ---\n"); return false; } - loadinsts(f); - fp.close(f); - vfs_fclose(instfd); + loadinsts (f); + fp.close (f); + vfs_fclose (instfd); - f = fp.open(fd); if(!f) return false; - for(i = 0; i < 16; i++) trinst[i] = f->readInt(1); - for(i = 0; i < 16; i++) trquant[i] = f->readInt(1); - for(i = 0; i < 16; i++) trchan[i] = f->readInt(1); - f->ignore(16); - for(i = 0; i < 16; i++) trvol[i] = f->readInt(1); - numnotes = f->readInt(2); - note = new unsigned long [numnotes]; - for(i = 0; i < numnotes; i++) note[i] = f->readInt(4); - fp.close(f); + f = fp.open (fd); + if (!f) + return false; + for (i = 0; i < 16; i++) + trinst[i] = f->readInt (1); + for (i = 0; i < 16; i++) + trquant[i] = f->readInt (1); + for (i = 0; i < 16; i++) + trchan[i] = f->readInt (1); + f->ignore (16); + for (i = 0; i < 16; i++) + trvol[i] = f->readInt (1); + numnotes = f->readInt (2); + note = new unsigned long[numnotes]; + for (i = 0; i < numnotes; i++) + note[i] = f->readInt (4); + fp.close (f); - if(!trchan[11]) { + if (!trchan[11]) + { drumstat = 0; numchans = 9; - } else { + } + else + { drumstat = 32; numchans = 6; } - rewind(0); - AdPlug_LogWrite("--- CksmPlayer::load ---\n"); + rewind (0); + AdPlug_LogWrite ("--- CksmPlayer::load ---\n"); return true; } -bool CksmPlayer::update() +bool +CksmPlayer::update () { - int quanter,chan,drumnum,freq,track,volevel,volval; - unsigned int i,j,bufnum; - unsigned long temp,templong; + int quanter, chan, drumnum, freq, track, volevel, volval; + unsigned int i, j, bufnum; + unsigned long temp, templong; - count++; - if (count >= countstop) - { - bufnum = 0; - while (count >= countstop) - { - templong = note[nownote]; - track = (int)((templong>>8)&15); - if ((templong&192) == 0) - { - i = 0; + count++; + if (count >= countstop) + { + bufnum = 0; + while (count >= countstop) + { + templong = note[nownote]; + track = (int) ((templong >> 8) & 15); + if ((templong & 192) == 0) + { + i = 0; - while ((i < numchans) && - ((chanfreq[i] != (templong&63)) || - (chantrack[i] != ((templong>>8)&15)))) - i++; - if (i < numchans) - { - databuf[bufnum] = (char)0; bufnum++; - databuf[bufnum] = (unsigned char)(0xb0+i); bufnum++; - databuf[bufnum] = (unsigned char)((adlibfreq[templong&63]>>8)&223); bufnum++; - chanfreq[i] = 0; - chanage[i] = 0; - } - } - else - { - volevel = trvol[track]; - if ((templong&192) == 128) - { - volevel -= 4; - if (volevel < 0) - volevel = 0; - } - if ((templong&192) == 192) - { - volevel += 4; - if (volevel > 63) - volevel = 63; - } - if (track < 11) - { - temp = 0; - i = numchans; - for(j=0;j<numchans;j++) - if ((countstop - chanage[j] >= temp) && (chantrack[j] == track)) - { - temp = countstop - chanage[j]; - i = j; - } - if (i < numchans) - { - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xb0+i); bufnum++; - databuf[bufnum] = (unsigned char)0; bufnum++; - volval = (inst[trinst[track]][1]&192)+(volevel^63); - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0x40+op_table[i]+3); bufnum++; - databuf[bufnum] = (unsigned char)volval; bufnum++; - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xa0+i); bufnum++; - databuf[bufnum] = (unsigned char)(adlibfreq[templong&63]&255); bufnum++; - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xb0+i); bufnum++; - databuf[bufnum] = (unsigned char)((adlibfreq[templong&63]>>8)|32); bufnum++; - chanfreq[i] = templong&63; - chanage[i] = countstop; - } - } - else if ((drumstat&32) > 0) - { - freq = adlibfreq[templong&63]; - switch(track) - { - case 11: drumnum = 16; chan = 6; freq -= 2048; break; - case 12: drumnum = 8; chan = 7; freq -= 2048; break; - case 13: drumnum = 4; chan = 8; break; - case 14: drumnum = 2; chan = 8; break; - case 15: drumnum = 1; chan = 7; freq -= 2048; break; - } - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xa0+chan); bufnum++; - databuf[bufnum] = (unsigned char)(freq&255); bufnum++; - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xb0+chan); bufnum++; - databuf[bufnum] = (unsigned char)((freq>>8)&223); bufnum++; - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xbd); bufnum++; - databuf[bufnum] = (unsigned char)(drumstat&(255-drumnum)); bufnum++; - drumstat |= drumnum; - if ((track == 11) || (track == 12) || (track == 14)) - { - volval = (inst[trinst[track]][1]&192)+(volevel^63); - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0x40+op_table[chan]+3); bufnum++; - databuf[bufnum] = (unsigned char)(volval); bufnum++; - } - else - { - volval = (inst[trinst[track]][6]&192)+(volevel^63); - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0x40+op_table[chan]); bufnum++; - databuf[bufnum] = (unsigned char)(volval); bufnum++; - } - databuf[bufnum] = (char)0, bufnum++; - databuf[bufnum] = (unsigned char)(0xbd); bufnum++; - databuf[bufnum] = (unsigned char)(drumstat); bufnum++; - } - } - nownote++; - if (nownote >= numnotes) { - nownote = 0; - songend = true; - } - templong = note[nownote]; - if (nownote == 0) - count = (templong>>12)-1; - quanter = (240/trquant[(templong>>8)&15]); - countstop = (((templong>>12)+(quanter>>1)) / quanter) * quanter; - } - for(i=0;i<bufnum;i+=3) - opl->write(databuf[i+1],databuf[i+2]); - } - return !songend; + while ((i < numchans) && + ((chanfreq[i] != (templong & 63)) || + (chantrack[i] != ((templong >> 8) & 15)))) + i++; + if (i < numchans) + { + databuf[bufnum] = (char) 0; + bufnum++; + databuf[bufnum] = (unsigned char) (0xb0 + i); + bufnum++; + databuf[bufnum] = + (unsigned char) ((adlibfreq[templong & 63] >> 8) & 223); + bufnum++; + chanfreq[i] = 0; + chanage[i] = 0; + } + } + else + { + volevel = trvol[track]; + if ((templong & 192) == 128) + { + volevel -= 4; + if (volevel < 0) + volevel = 0; + } + if ((templong & 192) == 192) + { + volevel += 4; + if (volevel > 63) + volevel = 63; + } + if (track < 11) + { + temp = 0; + i = numchans; + for (j = 0; j < numchans; j++) + if ((countstop - chanage[j] >= temp) && (chantrack[j] == track)) + { + temp = countstop - chanage[j]; + i = j; + } + if (i < numchans) + { + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xb0 + i); + bufnum++; + databuf[bufnum] = (unsigned char) 0; + bufnum++; + volval = (inst[trinst[track]][1] & 192) + (volevel ^ 63); + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0x40 + op_table[i] + 3); + bufnum++; + databuf[bufnum] = (unsigned char) volval; + bufnum++; + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xa0 + i); + bufnum++; + databuf[bufnum] = + (unsigned char) (adlibfreq[templong & 63] & 255); + bufnum++; + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xb0 + i); + bufnum++; + databuf[bufnum] = + (unsigned char) ((adlibfreq[templong & 63] >> 8) | 32); + bufnum++; + chanfreq[i] = templong & 63; + chanage[i] = countstop; + } + } + else if ((drumstat & 32) > 0) + { + freq = adlibfreq[templong & 63]; + switch (track) + { + case 11: + drumnum = 16; + chan = 6; + freq -= 2048; + break; + case 12: + drumnum = 8; + chan = 7; + freq -= 2048; + break; + case 13: + drumnum = 4; + chan = 8; + break; + case 14: + drumnum = 2; + chan = 8; + break; + case 15: + drumnum = 1; + chan = 7; + freq -= 2048; + break; + } + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xa0 + chan); + bufnum++; + databuf[bufnum] = (unsigned char) (freq & 255); + bufnum++; + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xb0 + chan); + bufnum++; + databuf[bufnum] = (unsigned char) ((freq >> 8) & 223); + bufnum++; + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xbd); + bufnum++; + databuf[bufnum] = (unsigned char) (drumstat & (255 - drumnum)); + bufnum++; + drumstat |= drumnum; + if ((track == 11) || (track == 12) || (track == 14)) + { + volval = (inst[trinst[track]][1] & 192) + (volevel ^ 63); + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0x40 + op_table[chan] + 3); + bufnum++; + databuf[bufnum] = (unsigned char) (volval); + bufnum++; + } + else + { + volval = (inst[trinst[track]][6] & 192) + (volevel ^ 63); + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0x40 + op_table[chan]); + bufnum++; + databuf[bufnum] = (unsigned char) (volval); + bufnum++; + } + databuf[bufnum] = (char) 0, bufnum++; + databuf[bufnum] = (unsigned char) (0xbd); + bufnum++; + databuf[bufnum] = (unsigned char) (drumstat); + bufnum++; + } + } + nownote++; + if (nownote >= numnotes) + { + nownote = 0; + songend = true; + } + templong = note[nownote]; + if (nownote == 0) + count = (templong >> 12) - 1; + quanter = (240 / trquant[(templong >> 8) & 15]); + countstop = (((templong >> 12) + (quanter >> 1)) / quanter) * quanter; + } + for (i = 0; i < bufnum; i += 3) + opl->write (databuf[i + 1], databuf[i + 2]); + } + return !songend; } -void CksmPlayer::rewind(int subsong) +void +CksmPlayer::rewind (int subsong) { - unsigned int i,j,k; - unsigned char instbuf[11]; - unsigned long templong; - - songend = false; - opl->init(); opl->write(1,32); opl->write(4,0); opl->write(8,0); opl->write(0xbd,drumstat); + unsigned int i, j, k; + unsigned char instbuf[11]; + unsigned long templong; - if (trchan[11] == 1) { - for(i=0;i<11;i++) - instbuf[i] = inst[trinst[11]][i]; - instbuf[1] = ((instbuf[1]&192)|(trvol[11])^63); - setinst(6,instbuf[0],instbuf[1],instbuf[2],instbuf[3],instbuf[4],instbuf[5],instbuf[6],instbuf[7],instbuf[8],instbuf[9],instbuf[10]); - for(i=0;i<5;i++) - instbuf[i] = inst[trinst[12]][i]; - for(i=5;i<11;i++) - instbuf[i] = inst[trinst[15]][i]; - instbuf[1] = ((instbuf[1]&192)|(trvol[12])^63); - instbuf[6] = ((instbuf[6]&192)|(trvol[15])^63); - setinst(7,instbuf[0],instbuf[1],instbuf[2],instbuf[3],instbuf[4],instbuf[5],instbuf[6],instbuf[7],instbuf[8],instbuf[9],instbuf[10]); - for(i=0;i<5;i++) - instbuf[i] = inst[trinst[14]][i]; - for(i=5;i<11;i++) - instbuf[i] = inst[trinst[13]][i]; - instbuf[1] = ((instbuf[1]&192)|(trvol[14])^63); - instbuf[6] = ((instbuf[6]&192)|(trvol[13])^63); - setinst(8,instbuf[0],instbuf[1],instbuf[2],instbuf[3],instbuf[4],instbuf[5],instbuf[6],instbuf[7],instbuf[8],instbuf[9],instbuf[10]); - } + songend = false; + opl->init (); + opl->write (1, 32); + opl->write (4, 0); + opl->write (8, 0); + opl->write (0xbd, drumstat); - for(i=0;i<numchans;i++) - { - chantrack[i] = 0; - chanage[i] = 0; - } - j = 0; - for(i=0;i<16;i++) - if ((trchan[i] > 0) && (j < numchans)) - { - k = trchan[i]; - while ((j < numchans) && (k > 0)) - { - chantrack[j] = i; - k--; - j++; - } - } - for(i=0;i<numchans;i++) - { - for(j=0;j<11;j++) - instbuf[j] = inst[trinst[chantrack[i]]][j]; - instbuf[1] = ((instbuf[1]&192)|(63-trvol[chantrack[i]])); - setinst(i,instbuf[0],instbuf[1],instbuf[2],instbuf[3],instbuf[4],instbuf[5],instbuf[6],instbuf[7],instbuf[8],instbuf[9],instbuf[10]); - chanfreq[i] = 0; - } - k = 0; - templong = *note; - count = (templong>>12)-1; - countstop = (templong>>12)-1; - nownote = 0; + if (trchan[11] == 1) + { + for (i = 0; i < 11; i++) + instbuf[i] = inst[trinst[11]][i]; + instbuf[1] = ((instbuf[1] & 192) | (trvol[11]) ^ 63); + setinst (6, instbuf[0], instbuf[1], instbuf[2], instbuf[3], instbuf[4], + instbuf[5], instbuf[6], instbuf[7], instbuf[8], instbuf[9], + instbuf[10]); + for (i = 0; i < 5; i++) + instbuf[i] = inst[trinst[12]][i]; + for (i = 5; i < 11; i++) + instbuf[i] = inst[trinst[15]][i]; + instbuf[1] = ((instbuf[1] & 192) | (trvol[12]) ^ 63); + instbuf[6] = ((instbuf[6] & 192) | (trvol[15]) ^ 63); + setinst (7, instbuf[0], instbuf[1], instbuf[2], instbuf[3], instbuf[4], + instbuf[5], instbuf[6], instbuf[7], instbuf[8], instbuf[9], + instbuf[10]); + for (i = 0; i < 5; i++) + instbuf[i] = inst[trinst[14]][i]; + for (i = 5; i < 11; i++) + instbuf[i] = inst[trinst[13]][i]; + instbuf[1] = ((instbuf[1] & 192) | (trvol[14]) ^ 63); + instbuf[6] = ((instbuf[6] & 192) | (trvol[13]) ^ 63); + setinst (8, instbuf[0], instbuf[1], instbuf[2], instbuf[3], instbuf[4], + instbuf[5], instbuf[6], instbuf[7], instbuf[8], instbuf[9], + instbuf[10]); + } + + for (i = 0; i < numchans; i++) + { + chantrack[i] = 0; + chanage[i] = 0; + } + j = 0; + for (i = 0; i < 16; i++) + if ((trchan[i] > 0) && (j < numchans)) + { + k = trchan[i]; + while ((j < numchans) && (k > 0)) + { + chantrack[j] = i; + k--; + j++; + } + } + for (i = 0; i < numchans; i++) + { + for (j = 0; j < 11; j++) + instbuf[j] = inst[trinst[chantrack[i]]][j]; + instbuf[1] = ((instbuf[1] & 192) | (63 - trvol[chantrack[i]])); + setinst (i, instbuf[0], instbuf[1], instbuf[2], instbuf[3], instbuf[4], + instbuf[5], instbuf[6], instbuf[7], instbuf[8], instbuf[9], + instbuf[10]); + chanfreq[i] = 0; + } + k = 0; + templong = *note; + count = (templong >> 12) - 1; + countstop = (templong >> 12) - 1; + nownote = 0; } -std::string CksmPlayer::getinstrument(unsigned int n) +std::string CksmPlayer::getinstrument (unsigned int n) { - if(trchan[n]) - return std::string(instname[trinst[n]]); - else - return std::string(); + if (trchan[n]) + return std::string (instname[trinst[n]]); + else + return std::string (); } /*** private methods *************************************/ -void CksmPlayer::loadinsts(binistream *f) +void +CksmPlayer::loadinsts (binistream * f) { int i, j; - for(i = 0; i < 256; i++) { - f->readString(instname[i], 20); - for(j = 0; j < 11; j++) inst[i][j] = f->readInt(1); - f->ignore(2); + for (i = 0; i < 256; i++) + { + f->readString (instname[i], 20); + for (j = 0; j < 11; j++) + inst[i][j] = f->readInt (1); + f->ignore (2); } } -void CksmPlayer::setinst(int chan, - unsigned char v0,unsigned char v1,unsigned char v2, - unsigned char v3,unsigned char v4,unsigned char v5, - unsigned char v6,unsigned char v7,unsigned char v8, - unsigned char v9,unsigned char v10) +void +CksmPlayer::setinst (int chan, + unsigned char v0, unsigned char v1, unsigned char v2, + unsigned char v3, unsigned char v4, unsigned char v5, + unsigned char v6, unsigned char v7, unsigned char v8, + unsigned char v9, unsigned char v10) { - int offs; + int offs; - opl->write(0xa0+chan,0); - opl->write(0xb0+chan,0); - opl->write(0xc0+chan,v10); - offs = op_table[chan]; - opl->write(0x20+offs,v5); - opl->write(0x40+offs,v6); - opl->write(0x60+offs,v7); - opl->write(0x80+offs,v8); - opl->write(0xe0+offs,v9); - offs+=3; - opl->write(0x20+offs,v0); - opl->write(0x40+offs,v1); - opl->write(0x60+offs,v2); - opl->write(0x80+offs,v3); - opl->write(0xe0+offs,v4); + opl->write (0xa0 + chan, 0); + opl->write (0xb0 + chan, 0); + opl->write (0xc0 + chan, v10); + offs = op_table[chan]; + opl->write (0x20 + offs, v5); + opl->write (0x40 + offs, v6); + opl->write (0x60 + offs, v7); + opl->write (0x80 + offs, v8); + opl->write (0xe0 + offs, v9); + offs += 3; + opl->write (0x20 + offs, v0); + opl->write (0x40 + offs, v1); + opl->write (0x60 + offs, v2); + opl->write (0x80 + offs, v3); + opl->write (0xe0 + offs, v4); }