mirror of
https://github.com/thestk/stk
synced 2026-01-11 20:11:52 +00:00
103 lines
2.7 KiB
C++
103 lines
2.7 KiB
C++
/*******************************************/
|
|
/* SndWvIn Input Class, */
|
|
/* by Gary P. Scavone, 1999 */
|
|
/* */
|
|
/* This object inherits from WvIn and is */
|
|
/* used to open NeXT/Sun .snd 16-bit data */
|
|
/* (signed integer) files for playback. */
|
|
/* */
|
|
/* .snd files are always big-endian. */
|
|
/*******************************************/
|
|
|
|
#include "SndWvIn.h"
|
|
|
|
#ifdef __LITTLE_ENDIAN__
|
|
#include "swapstuf.h"
|
|
#endif
|
|
|
|
SndWvIn :: SndWvIn(char *fileName, char *mode)
|
|
{
|
|
// Open the file and get header info
|
|
FILE *fd;
|
|
fd = fopen(fileName,"rb");
|
|
if (!fd) {
|
|
printf("Couldn't open or find .snd file %s !!!\n",fileName);
|
|
exit(0);
|
|
}
|
|
|
|
// Make sure this is a .snd format file
|
|
char magic[4];
|
|
fseek(fd,0,SEEK_SET); // Locate magic number in header
|
|
fread(magic,4,1,fd);
|
|
if (strncmp(magic,".snd",4)) {
|
|
printf("This doesn't appear to be a .snd file %s !!!\n",fileName);
|
|
exit(0);
|
|
}
|
|
|
|
// Get number of channels from the header
|
|
INT32 int32temp;
|
|
fseek(fd,20,SEEK_SET);
|
|
fread(&int32temp,4,1,fd);
|
|
#ifdef __LITTLE_ENDIAN__
|
|
int32temp = SwapINT32(int32temp);
|
|
#endif
|
|
channels = int32temp;
|
|
|
|
// Get length of data from the header
|
|
fseek(fd,8,SEEK_SET);
|
|
fread(&int32temp,4,1,fd);
|
|
#ifdef __LITTLE_ENDIAN__
|
|
int32temp = SwapINT32(int32temp);
|
|
#endif
|
|
length = int32temp / 2 / channels; // channel length in 2-byte samples
|
|
data = (MY_FLOAT *) new MY_FLOAT[(length+1)*channels];
|
|
|
|
// Read samples into data[]
|
|
INT16 temp;
|
|
long i = 0;
|
|
fseek(fd,40,SEEK_SET);
|
|
while (fread(&temp,2,1,fd)) {
|
|
#ifdef __LITTLE_ENDIAN__
|
|
temp = SwapINT16 (temp);
|
|
#endif
|
|
data[i++] = (MY_FLOAT) temp;
|
|
}
|
|
|
|
// Get file sample rate from the header and set the default rate
|
|
fseek(fd,16,SEEK_SET);
|
|
fread(&int32temp,4,1,fd);
|
|
#ifdef __LITTLE_ENDIAN__
|
|
int32temp = SwapINT32(int32temp);
|
|
#endif
|
|
rate = (MY_FLOAT) (int32temp/SRATE);
|
|
fclose(fd);
|
|
|
|
// Setup for looping or one-shot playback
|
|
if (!strcmp(mode,"looping")) {
|
|
looping = 1;
|
|
for (int j=0; j<channels; j++)
|
|
data[length*channels+j] = data[j]; // extra sample for interpolation
|
|
}
|
|
else if (!strcmp(mode,"oneshot")) {
|
|
looping = 0;
|
|
for (int j=0; j<channels; j++)
|
|
data[length*channels+j] = data[(length-1)*channels+j]; // extra sample for interpolation
|
|
}
|
|
else {
|
|
fprintf(stderr,"ERROR: Unsupported SndWvIn mode: %s\n",mode);
|
|
free(data);
|
|
exit(0);
|
|
}
|
|
|
|
if (fmod(rate, 1.0) > 0.0) interpolate = 1;
|
|
else interpolate = 0;
|
|
time = (MY_FLOAT) 0.0;
|
|
phaseOffset = (MY_FLOAT) 0.0;
|
|
finished = 0;
|
|
lastOutput = (MY_FLOAT *) calloc(channels, sizeof(MY_FLOAT));
|
|
}
|
|
|
|
SndWvIn :: ~SndWvIn()
|
|
{
|
|
}
|