aboutsummaryrefslogtreecommitdiff
path: root/modules/chibi/cp_loader_s3m.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'modules/chibi/cp_loader_s3m.cpp')
-rw-r--r--modules/chibi/cp_loader_s3m.cpp456
1 files changed, 210 insertions, 246 deletions
diff --git a/modules/chibi/cp_loader_s3m.cpp b/modules/chibi/cp_loader_s3m.cpp
index eb5fad12e..c54e0c395 100644
--- a/modules/chibi/cp_loader_s3m.cpp
+++ b/modules/chibi/cp_loader_s3m.cpp
@@ -29,305 +29,276 @@
#include "cp_loader_s3m.h"
-#define BITBOOL(m_exp) ((m_exp)?1:0)
-
+#define BITBOOL(m_exp) ((m_exp) ? 1 : 0)
CPLoader::Error CPLoader_S3M::load_header() {
int i;
-
- file->get_byte_array((uint8_t*)header.songname,28);
- header.t1a=file->get_byte();
- header.type=file->get_byte();
- file->get_byte_array((uint8_t*)header.unused1,2);
- header.ordnum=file->get_word();
- header.insnum=file->get_word();
- header.patnum=file->get_word();
- header.flags=file->get_word();
- header.tracker=file->get_word();
- header.fileformat=file->get_word();
- file->get_byte_array((uint8_t*)header.scrm,4);
- header.scrm[4]=0;
-
- if (header.scrm[0]!='S' || header.scrm[1]!='C' || header.scrm[2]!='R' || header.scrm[3]!='M')
+ file->get_byte_array((uint8_t *)header.songname, 28);
+ header.t1a = file->get_byte();
+ header.type = file->get_byte();
+ file->get_byte_array((uint8_t *)header.unused1, 2);
+ header.ordnum = file->get_word();
+ header.insnum = file->get_word();
+ header.patnum = file->get_word();
+ header.flags = file->get_word();
+ header.tracker = file->get_word();
+ header.fileformat = file->get_word();
+ file->get_byte_array((uint8_t *)header.scrm, 4);
+ header.scrm[4] = 0;
+
+ if (header.scrm[0] != 'S' || header.scrm[1] != 'C' || header.scrm[2] != 'R' || header.scrm[3] != 'M')
return FILE_UNRECOGNIZED;
- header.mastervol=file->get_byte();
- header.initspeed=file->get_byte();
- header.inittempo=file->get_byte();
- header.mastermult=file->get_byte();
- header.ultraclick=file->get_byte();
- header.pantable=file->get_byte();
- file->get_byte_array((uint8_t*)header.unused2,8);
- header.special=file->get_word();
- file->get_byte_array((uint8_t*)header.channels,32);
+ header.mastervol = file->get_byte();
+ header.initspeed = file->get_byte();
+ header.inittempo = file->get_byte();
+ header.mastermult = file->get_byte();
+ header.ultraclick = file->get_byte();
+ header.pantable = file->get_byte();
+ file->get_byte_array((uint8_t *)header.unused2, 8);
+ header.special = file->get_word();
+ file->get_byte_array((uint8_t *)header.channels, 32);
- file->get_byte_array((uint8_t*)header.orderlist,header.ordnum);
+ file->get_byte_array((uint8_t *)header.orderlist, header.ordnum);
- header.scrm[4]=0;
- if (header.scrm[0]!='S' || header.scrm[1]!='C' || header.scrm[2]!='R' || header.scrm[3]!='M') //again?
+ header.scrm[4] = 0;
+ if (header.scrm[0] != 'S' || header.scrm[1] != 'C' || header.scrm[2] != 'R' || header.scrm[3] != 'M') //again?
return FILE_UNRECOGNIZED;
//sample parapointers
- for (i=0;i<header.insnum;i++) {
+ for (i = 0; i < header.insnum; i++) {
int parapointer;
- parapointer=file->get_word();
- parapointer=(parapointer*16);
- sample_parapointers[i]=parapointer;
+ parapointer = file->get_word();
+ parapointer = (parapointer * 16);
+ sample_parapointers[i] = parapointer;
}
//pattern
- for (i=0;i<header.patnum;i++) {
+ for (i = 0; i < header.patnum; i++) {
int parapointer;
- parapointer=file->get_word();
- parapointer=(parapointer*16);
- pattern_parapointers[i]=parapointer;
+ parapointer = file->get_word();
+ parapointer = (parapointer * 16);
+ pattern_parapointers[i] = parapointer;
}
- if (header.pantable==252) {
+ if (header.pantable == 252) {
- file->get_byte_array((uint8_t*)header.pannings,32);
+ file->get_byte_array((uint8_t *)header.pannings, 32);
}
return FILE_OK;
-
-
}
-
void CPLoader_S3M::set_header() {
-
-
+ song->set_name(header.songname);
+ // song->variables.filename=
- song->set_name( header.songname );
-// song->variables.filename=
-
- song->set_row_highlight_minor( 4 );
- song->set_row_highlight_major( 16 );
- song->set_mixing_volume( header.mastervol );
- song->set_linear_slides( false );
- song->set_old_effects( !(header.flags&64) );
- song->set_compatible_gxx( true );
+ song->set_row_highlight_minor(4);
+ song->set_row_highlight_major(16);
+ song->set_mixing_volume(header.mastervol);
+ song->set_linear_slides(false);
+ song->set_old_effects(!(header.flags & 64));
+ song->set_compatible_gxx(true);
- song->set_global_volume( header.mastermult );
- song->set_speed( header.initspeed );
- song->set_tempo( header.inittempo );
+ song->set_global_volume(header.mastermult);
+ song->set_speed(header.initspeed);
+ song->set_tempo(header.inittempo);
//[TODO] Set Panning Positions.. ?
- for (int i=0;i<header.ordnum;i++) song->set_order(i,header.orderlist[i]);
-
+ for (int i = 0; i < header.ordnum; i++)
+ song->set_order(i, header.orderlist[i]);
}
-CPLoader::Error CPLoader_S3M::load_sample(CPSample *p_sample) {
+CPLoader::Error CPLoader_S3M::load_sample(CPSample *p_sample) {
+ int type = file->get_byte();
+ char filename[13];
+ file->get_byte_array((uint8_t *)filename, 12);
+ filename[12] = 0;
- int type=file->get_byte();
-
- char filename[13];
- file->get_byte_array((uint8_t*)filename,12);
- filename[12]=0;
-
-
- uint32_t samplepos=(uint32_t)file->get_byte() << 16;
- samplepos|=file->get_word();
- samplepos*=16;
-// printf("sample at %i\n",samplepos);
- /**/
- int sample_size=file->get_dword();
-
-
- int loop_begin=file->get_dword();
- int loop_end=file->get_dword();
+ uint32_t samplepos = (uint32_t)file->get_byte() << 16;
+ samplepos |= file->get_word();
+ samplepos *= 16;
+ // printf("sample at %i\n",samplepos);
+ /**/
+ int sample_size = file->get_dword();
- int def_volume=file->get_byte();;
- int dsk=file->get_byte();
- int pack=file->get_byte();
-
- int flags=file->get_byte();
- int c2speed=file->get_dword();
-
- file->get_dword(); //useless crap
- file->get_dword();
- file->get_dword();
-
-
- char name[29];
- file->get_byte_array((uint8_t*)name,28);
- name[28]=0;
-
- p_sample->set_default_volume(def_volume);
- p_sample->set_name(name);
-
- char scrs[5];
- file->get_byte_array((uint8_t*)scrs,4);
- scrs[4]=0;
+ int loop_begin = file->get_dword();
+ int loop_end = file->get_dword();
-
+ int def_volume = file->get_byte();
+ ;
+ int dsk = file->get_byte();
+ int pack = file->get_byte();
- bool data_is_16bits=flags&4;
- bool data_is_stereo=flags&2;
+ int flags = file->get_byte();
+ int c2speed = file->get_dword();
- if (type==0) {
- //empty sample
- return FILE_OK;
- }
-
+ file->get_dword(); //useless crap
+ file->get_dword();
+ file->get_dword();
- if ((type!=1) || scrs[0]!='S' || scrs[1]!='C' || scrs[2]!='R' || scrs[3]!='S' ) {
-// printf("type: %i, %c%c%c%c\n",type,scrs[0],scrs[1],scrs[2],scrs[3]);
- CP_PRINTERR("Not an S3M CPSample!");
- return FILE_CORRUPTED;
- }
+ char name[29];
+ file->get_byte_array((uint8_t *)name, 28);
+ name[28] = 0;
- //p_sample->data.set_c5_freq(p_sample->c2spd<<1);
+ p_sample->set_default_volume(def_volume);
+ p_sample->set_name(name);
- file->seek(samplepos);
+ char scrs[5];
+ file->get_byte_array((uint8_t *)scrs, 4);
+ scrs[4] = 0;
- int real_sample_size=sample_size<<BITBOOL(data_is_16bits);
- real_sample_size<<=BITBOOL(data_is_stereo);
+ bool data_is_16bits = flags & 4;
+ bool data_is_stereo = flags & 2;
- CPSampleManager *sm=CPSampleManager::get_singleton();
-
- CPSample_ID id =sm->create( data_is_16bits, data_is_stereo, sample_size );
-
- if (id.is_null())
- return FILE_OUT_OF_MEMORY;
+ if (type == 0) {
+ //empty sample
+ return FILE_OK;
+ }
- sm->lock_data(id);
- void *dataptr = sm->get_data(id);
-
- int chans = (data_is_stereo?2:1);
- for (int c=0;c<chans;c++) {
- for (int i=0;i<sample_size;i++) {
-
- if (data_is_16bits) {
-
- uint16_t s=file->get_word();
- s-=32768; //toggle sign
-
- int16_t *v=(int16_t*)&s;
- ((int16_t*)dataptr)[i*chans+c]=*v;
- } else {
-
-
- int8_t *v;
- uint8_t s=file->get_byte();
- s-=128; //toggle sign
- v=(int8_t*)&s;
- ((int8_t*)dataptr)[i*chans+c]=*v;
+ if ((type != 1) || scrs[0] != 'S' || scrs[1] != 'C' || scrs[2] != 'R' || scrs[3] != 'S') {
+ // printf("type: %i, %c%c%c%c\n",type,scrs[0],scrs[1],scrs[2],scrs[3]);
+ CP_PRINTERR("Not an S3M CPSample!");
+ return FILE_CORRUPTED;
+ }
- }
+ //p_sample->data.set_c5_freq(p_sample->c2spd<<1);
- }
-
- }
+ file->seek(samplepos);
+
+ int real_sample_size = sample_size << BITBOOL(data_is_16bits);
+ real_sample_size <<= BITBOOL(data_is_stereo);
- sm->unlock_data(id);
+ CPSampleManager *sm = CPSampleManager::get_singleton();
-
- sm->set_loop_begin( id, loop_begin );
- sm->set_loop_end( id, loop_end );
- sm->set_loop_type( id, (flags&1) ? CP_LOOP_FORWARD : CP_LOOP_NONE );
- sm->set_c5_freq( id, c2speed << 1 );
- p_sample->set_sample_data(id);
-
- /* Scream tracker previous to 3.10 seems to be buggy, as in, wont save what is after the sample loop, including the loop end point. Because of this I must fix it by habd */
- if (flags&1) {
-
- for (int c=0;c<(data_is_stereo?2:1);c++) {
- sm->set_data( id, loop_end, sm->get_data( id, loop_begin,c ),c );
-
+ CPSample_ID id = sm->create(data_is_16bits, data_is_stereo, sample_size);
+
+ if (id.is_null())
+ return FILE_OUT_OF_MEMORY;
+
+ sm->lock_data(id);
+ void *dataptr = sm->get_data(id);
+
+ int chans = (data_is_stereo ? 2 : 1);
+ for (int c = 0; c < chans; c++) {
+ for (int i = 0; i < sample_size; i++) {
+
+ if (data_is_16bits) {
+
+ uint16_t s = file->get_word();
+ s -= 32768; //toggle sign
+
+ int16_t *v = (int16_t *)&s;
+ ((int16_t *)dataptr)[i * chans + c] = *v;
+ } else {
+
+ int8_t *v;
+ uint8_t s = file->get_byte();
+ s -= 128; //toggle sign
+ v = (int8_t *)&s;
+ ((int8_t *)dataptr)[i * chans + c] = *v;
}
}
-
+ }
- return FILE_OK;
+ sm->unlock_data(id);
-}
+ sm->set_loop_begin(id, loop_begin);
+ sm->set_loop_end(id, loop_end);
+ sm->set_loop_type(id, (flags & 1) ? CP_LOOP_FORWARD : CP_LOOP_NONE);
+ sm->set_c5_freq(id, c2speed << 1);
+ p_sample->set_sample_data(id);
+ /* Scream tracker previous to 3.10 seems to be buggy, as in, wont save what is after the sample loop, including the loop end point. Because of this I must fix it by habd */
+ if (flags & 1) {
+
+ for (int c = 0; c < (data_is_stereo ? 2 : 1); c++) {
+ sm->set_data(id, loop_end, sm->get_data(id, loop_begin, c), c);
+ }
+ }
+
+ return FILE_OK;
+}
CPLoader::Error CPLoader_S3M::load_pattern(CPPattern *p_pattern) {
- int row=0,flag,ch;
+ int row = 0, flag, ch;
CPNote n;
- int length,accum=0;
+ int length, accum = 0;
- length=file->get_word();
- p_pattern->set_length(64);
+ length = file->get_word();
+ p_pattern->set_length(64);
- /* clear pattern data */
- while((row<64) && (accum<=length) ) {
- flag=file->get_byte();
+ /* clear pattern data */
+ while ((row < 64) && (accum <= length)) {
+ flag = file->get_byte();
accum++;
n.clear();
- if(flag) {
- // ch=remap[flag&31];
-// ch=remap[flag&31];
-// if(ch!=-1)
-// n=s3mbuf[(64U*ch)+row];
-// else
-// n=&dummy;
+ if (flag) {
+ // ch=remap[flag&31];
+ // ch=remap[flag&31];
+ // if(ch!=-1)
+ // n=s3mbuf[(64U*ch)+row];
+ // else
+ // n=&dummy;
- ch=flag&31;
+ ch = flag & 31;
- if(flag&32) {
- n.note=file->get_byte();
- if (n.note==255) {
+ if (flag & 32) {
+ n.note = file->get_byte();
+ if (n.note == 255) {
- n.note=CPNote::EMPTY;
- } else if (n.note==254) {
+ n.note = CPNote::EMPTY;
+ } else if (n.note == 254) {
- n.note=CPNote::CUT;
+ n.note = CPNote::CUT;
} else {
-
- n.note=((n.note>>4)*12)+(n.note&0xF);
- }
- n.instrument=file->get_byte()-1;
- accum+=2;
+ n.note = ((n.note >> 4) * 12) + (n.note & 0xF);
+ }
- }
- if(flag&64) {
- n.volume=file->get_byte();
- if (n.volume>64) n.volume=64;
+ n.instrument = file->get_byte() - 1;
+ accum += 2;
+ }
+ if (flag & 64) {
+ n.volume = file->get_byte();
+ if (n.volume > 64) n.volume = 64;
accum++;
+ }
+ if (flag & 128) {
+ n.command = file->get_byte() - 1;
+ n.parameter = file->get_byte();
+ accum += 2;
+ }
- }
- if(flag&128) {
- n.command=file->get_byte()-1;
- n.parameter=file->get_byte();
- accum+=2;
- }
-
- p_pattern->set_note(ch,row,n);
- } else row++;
- }
- return FILE_OK;
-
-
+ p_pattern->set_note(ch, row, n);
+ } else
+ row++;
+ }
+ return FILE_OK;
}
-CPLoader::Error CPLoader_S3M::load_sample(const char *p_file,CPSample *p_sample) {
-
+CPLoader::Error CPLoader_S3M::load_sample(const char *p_file, CPSample *p_sample) {
+
return FILE_UNRECOGNIZED;
}
-CPLoader::Error CPLoader_S3M::load_instrument(const char *p_file,CPSong *p_song,int p_instr_idx) {
-
+CPLoader::Error CPLoader_S3M::load_instrument(const char *p_file, CPSong *p_song, int p_instr_idx) {
+
return FILE_UNRECOGNIZED;
-
}
-
CPLoader::Error CPLoader_S3M::load_samples() {
int i;
- for(i=0;i<header.insnum;i++) {
+ for (i = 0; i < header.insnum; i++) {
file->seek(sample_parapointers[i]);
load_sample(song->get_sample(i));
@@ -342,72 +313,65 @@ CPLoader::Error CPLoader_S3M::load_patterns() {
int i;
Error err;
- for(i=0;i<header.patnum;i++) {
+ for (i = 0; i < header.patnum; i++) {
file->seek(pattern_parapointers[i]);
-
- err=load_pattern(song->get_pattern(i) );
- CP_ERR_COND_V(err,err);
-
+ err = load_pattern(song->get_pattern(i));
+ CP_ERR_COND_V(err, err);
+
pattern_count++;
}
return FILE_OK;
-
}
-CPLoader::Error CPLoader_S3M::load_song(const char *p_file,CPSong *p_song,bool p_sampleset) {
+CPLoader::Error CPLoader_S3M::load_song(const char *p_file, CPSong *p_song, bool p_sampleset) {
- song=p_song;
+ song = p_song;
- if (file->open(p_file,CPFileAccessWrapper::READ)) {
+ if (file->open(p_file, CPFileAccessWrapper::READ)) {
//printf("Can't open file! %s\n",p_file);
return FILE_CANNOT_OPEN;
};
-
- sample_count=0;
- pattern_count=0;
+
+ sample_count = 0;
+ pattern_count = 0;
//printf("LOADING HEADER\n");
CPLoader::Error err;
- if ((err=load_header())) {
+ if ((err = load_header())) {
file->close();
- CP_ERR_COND_V(err,err);
-
- }
+ CP_ERR_COND_V(err, err);
+ }
song->reset(); //file type recognized, reset song!
-
+
set_header();
-
+
//printf("LOADING SAMPLES\n");
-
- if ((err=load_samples())) {
+
+ if ((err = load_samples())) {
file->close();
- CP_ERR_COND_V(err,err);
- }
+ CP_ERR_COND_V(err, err);
+ }
//printf("LOADING PATTERNS\n");
-
- if ((err=load_patterns())) {
+
+ if ((err = load_patterns())) {
file->close();
return err;
- }
+ }
file->close();
return FILE_OK;
}
+CPLoader_S3M::CPLoader_S3M(CPFileAccessWrapper *p_file) {
-
-CPLoader_S3M::CPLoader_S3M(CPFileAccessWrapper *p_file){
-
- file=p_file;
-
+ file = p_file;
}
-CPLoader_S3M::~CPLoader_S3M(){
+CPLoader_S3M::~CPLoader_S3M() {
}
-
generated by cgit v1.2.3-70-g09d2 (git 2.52.0) at 2026-01-09 02:24:04 +0000