330 lines
6.9 KiB
C
Executable file
330 lines
6.9 KiB
C
Executable file
#include "sound.h"
|
|
#include "resources.h"
|
|
#include <stdlib.h>
|
|
#include "log.h"
|
|
#include "string.h"
|
|
#include "math.h"
|
|
#include "limits.h"
|
|
#include "time.h"
|
|
#include "music.h"
|
|
|
|
#include "SDL2/SDL.h"
|
|
|
|
#include "mix.h"
|
|
#include "dsp.h"
|
|
|
|
#define DR_WAV_IMPLEMENTATION
|
|
#include "dr_wav.h"
|
|
|
|
#define DR_MP3_IMPLEMENTATION
|
|
#include "dr_mp3.h"
|
|
|
|
#include "portaudio.h"
|
|
|
|
#include "circbuf.h"
|
|
|
|
#define TSF_IMPLEMENTATION
|
|
#include "tsf.h"
|
|
|
|
#define TML_IMPLEMENTATION
|
|
#include "tml.h"
|
|
|
|
const char *audioDriver;
|
|
|
|
void new_samplerate(short *in, short *out, int n, int ch, int sr_in, int sr_out)
|
|
{
|
|
SDL_AudioStream *stream = SDL_NewAudioStream(AUDIO_S16, ch, sr_in, AUDIO_S16, ch, sr_out);
|
|
SDL_AudioStreamPut(stream, in, n * ch * sizeof(short));
|
|
SDL_AudioStreamGet(stream, out, n * ch * sizeof(short));
|
|
SDL_FreeAudioStream(stream);
|
|
}
|
|
|
|
struct wav change_samplerate(struct wav w, int rate)
|
|
{
|
|
int samples = sizeof(short) * w.ch * w.frames;
|
|
short *new = malloc(samples);
|
|
new_samplerate(w.data, new,
|
|
|
|
|
|
|
|
SDL_AudioStream *stream = SDL_NewAudioStream(AUDIO_S16, w.ch, w.samplerate, AUDIO_S16, w.ch, rate);
|
|
SDL_AudioStreamPut(stream, w.data, w.frames*w.ch*sizeof(short));
|
|
|
|
int oldframes = w.frames;
|
|
w.frames *= (float)rate/w.samplerate;
|
|
|
|
w.samplerate = rate;
|
|
int samples = sizeof(short)*w.ch*w.frames;
|
|
short *new = malloc(samples);
|
|
SDL_AudioStreamGet(stream, new, samples);
|
|
|
|
free(w.data);
|
|
w.data = new;
|
|
SDL_FreeAudioStream(stream);
|
|
|
|
return w;
|
|
}
|
|
|
|
static int patestCallback(const void *inputBuffer, void *outputBuffer, unsigned long framesPerBuffer, const PaStreamCallbackTimeInfo *timeInfo, PaStreamCallbackFlags statusFlags, void *userData)
|
|
{
|
|
short *out = (short*)outputBuffer;
|
|
|
|
bus_fill_buffers(outputBuffer, framesPerBuffer);
|
|
|
|
return 0;
|
|
}
|
|
|
|
void check_pa_err(PaError e)
|
|
{
|
|
if (e != paNoError) {
|
|
YughError("PA Error: %s", Pa_GetErrorText(e));
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
static PaStream *stream_def;
|
|
|
|
void wav_norm_gain(struct wav *w, double lv)
|
|
{
|
|
short tarmax = db2short(lv);
|
|
short max = 0;
|
|
short *s = w->data;
|
|
for (int i = 0; i < w->frames; i++) {
|
|
for (int j = 0; j < w->ch; j++) {
|
|
max = (abs(s[i*w->ch + j]) > max) ? abs(s[i*w->ch + j]) : max;
|
|
}
|
|
}
|
|
|
|
float mult = (float)max / tarmax;
|
|
|
|
for (int i = 0; i < w->frames; i++) {
|
|
for (int j = 0; j < w->ch; j++) {
|
|
s[i*w->ch + j] *= mult;
|
|
}
|
|
}
|
|
}
|
|
|
|
struct osc sin600;
|
|
struct osc sin20;
|
|
struct dsp_ammod dspammod;
|
|
struct dsp_delay dspdel;
|
|
struct wav s600wav;
|
|
struct sound s600wavsound;
|
|
|
|
void sound_init()
|
|
{
|
|
PaError err = Pa_Initialize();
|
|
check_pa_err(err);
|
|
|
|
int numDevices = Pa_GetDeviceCount();
|
|
const PaDeviceInfo *deviceInfo;
|
|
|
|
for (int i = 0; i < numDevices; i++) {
|
|
deviceInfo = Pa_GetDeviceInfo(i);
|
|
|
|
// printf("Device %i: channels %i, sample rate %f, name %s\n", i, deviceInfo->maxOutputChannels, deviceInfo->defaultSampleRate, deviceInfo->name);
|
|
}
|
|
|
|
PaStreamParameters outparams;
|
|
|
|
|
|
/*
|
|
outparams.channelCount = 2;
|
|
outparams.device = 19;
|
|
outparams.sampleFormat = paInt16;
|
|
outparams.suggestedLatency = Pa_GetDeviceInfo(outparams.device)->defaultLowOutputLatency;
|
|
outparams.hostApiSpecificStreamInfo = NULL;
|
|
*/
|
|
|
|
//err = Pa_OpenStream(&stream_def, NULL, &outparams, 48000, 4096, paNoFlag, patestCallback, &data);
|
|
err = Pa_OpenDefaultStream(&stream_def, 0, 2, paInt16, SAMPLERATE, BUF_FRAMES, patestCallback, NULL);
|
|
check_pa_err(err);
|
|
|
|
err = Pa_StartStream(stream_def);
|
|
check_pa_err(err);
|
|
}
|
|
|
|
void audio_open(const char *device)
|
|
{
|
|
//Mix_OpenAudioDevice(44100, MIX_DEFAULT_FORMAT, 2, 2048, device, 0);
|
|
}
|
|
|
|
void audio_close()
|
|
{
|
|
//Mix_CloseAudio();
|
|
}
|
|
|
|
struct wav make_sound(const char *wav)
|
|
{
|
|
struct wav mwav;
|
|
mwav.data = drwav_open_file_and_read_pcm_frames_s16("sounds/alert.wav", &mwav.ch, &mwav.samplerate, &mwav.frames, NULL);
|
|
|
|
if (mwav.samplerate != SAMPLERATE) {
|
|
mwav = change_samplerate(mwav, 48000);
|
|
}
|
|
|
|
mwav.gain = 1.f;
|
|
|
|
return mwav;
|
|
}
|
|
|
|
struct sound *play_sound(struct wav *wav)
|
|
{
|
|
struct sound *new = calloc(1, sizeof(*new));
|
|
new.data = wav;
|
|
|
|
new->bus = first_free_bus(dsp_filter(new, sound_fillbuf));
|
|
new->playing = 1;
|
|
|
|
return new;
|
|
|
|
}
|
|
|
|
int sound_playing(const struct sound *s)
|
|
{
|
|
return s.playing;
|
|
}
|
|
|
|
int sound_paused(const struct sound *s)
|
|
{
|
|
return (!s.playing && s.frame < s.data->frames);
|
|
}
|
|
void sound_pause(struct sound *s)
|
|
{
|
|
s->playing = 0;
|
|
bus_free(s->bus);
|
|
}
|
|
|
|
void sound_resume(struct sound *s)
|
|
{
|
|
s->playing = 1;
|
|
s->bus = first_free_bus(dsp_filter(s, sound_fillbuf));
|
|
}
|
|
|
|
void sound_stop(struct sound *s)
|
|
{
|
|
s->playing = 0;
|
|
s->frame = 0;
|
|
bus_free(s->bus);
|
|
}
|
|
|
|
int sound_finished(struct sound *s)
|
|
{
|
|
return !s->playing && s->frame == s->data->frames;
|
|
}
|
|
|
|
int sound_stopped(struct sound *s)
|
|
{
|
|
return !s->playing && s->frame = 0;
|
|
}
|
|
|
|
struct music make_music(const char *mp3)
|
|
{
|
|
drmp3 new;
|
|
if (!drmp3_init_file(&new, mp3, NULL)) {
|
|
YughError("Could not open mp3 file %s.", mp3);
|
|
}
|
|
}
|
|
|
|
|
|
void audio_init()
|
|
{
|
|
//audioDriver = SDL_GetAudioDeviceName(0,0);
|
|
}
|
|
|
|
|
|
void close_audio_device(int device)
|
|
{
|
|
//SDL_CloseAudioDevice(device);
|
|
}
|
|
|
|
int open_device(const char *adriver)
|
|
{
|
|
|
|
/*
|
|
SDL_AudioSpec audio_spec;
|
|
SDL_memset(&audio_spec, 0, sizeof(audio_spec));
|
|
audio_spec.freq = SAMPLERATE;
|
|
audio_spec.format = AUDIO_F32;
|
|
audio_spec.channels = 2;
|
|
audio_spec.samples = BUF_FRAMES;
|
|
int dev = (int) SDL_OpenAudioDevice(adriver, 0, &audio_spec, NULL, 0);
|
|
SDL_PauseAudioDevice(dev, 0);
|
|
|
|
return dev;
|
|
*/
|
|
return 0;
|
|
}
|
|
|
|
void sound_fillbuf(struct sound *s, short *buf, int n)
|
|
{
|
|
float gainmult = pct2mult(s->data->gain);
|
|
|
|
short *in = s->data->data;
|
|
for (int i = 0; i < n; i++) {
|
|
for (int j = 0; j < 2; j++) {
|
|
buf[i*2+j] = in[s->frame+j] * gainmult;
|
|
}
|
|
|
|
s->frame++;
|
|
if (s->frame == s->data->frames) {
|
|
|
|
if (s->loop > 0) {
|
|
s->loop--;
|
|
s->frame = 0;
|
|
} else {
|
|
bus_free(s->bus);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void mp3_fillbuf(struct sound *s, short *buf, int n)
|
|
{
|
|
|
|
}
|
|
|
|
struct soundstream soundstream_make()
|
|
{
|
|
struct soundstream new;
|
|
new.buf = circbuf_init(sizeof(short), BUF_FRAMES*CHANNELS*2);
|
|
return new;
|
|
}
|
|
|
|
void soundstream_fillbuf(struct soundstream *s, short *buf, int n)
|
|
{
|
|
int max = s->buf.write - s->buf.read;
|
|
int lim = (max < n*CHANNELS) ? max : n*CHANNELS;
|
|
for (int i = 0; i < lim; i++) {
|
|
buf[i] = cbuf_shift(&s->buf);
|
|
}
|
|
}
|
|
|
|
float short2db(short val)
|
|
{
|
|
return 20*log10(abs((double)val) / SHRT_MAX);
|
|
}
|
|
|
|
short db2short(float db)
|
|
{
|
|
return pow(10, db/20.f) * SHRT_MAX;
|
|
}
|
|
|
|
short short_gain(short val, float db)
|
|
{
|
|
return (short)(pow(10, db/20.f) * val);
|
|
}
|
|
|
|
float pct2db(float pct)
|
|
{
|
|
if (pct <= 0) return -72.f;
|
|
|
|
return 10*log2(pct);
|
|
}
|
|
|
|
float pct2mult(float pct)
|
|
{
|
|
if (pct <= 0) return 0.f;
|
|
|
|
return pow(10, 0.5*log2(pct));
|
|
} |