first working version

[shapestoy] / src / music.c

diff --git a/src/music.c b/src/music.c
new file mode 100644 (file)
index 0000000..81b98d0
--- /dev/null
+++ b/src/music.c
@@ -0,0 +1,197 @@
+#include <stdio.h>
+#include <sys/stat.h>
+#include "music.h"
+#include "assfile.h"
+#include "miniaudio/miniaudio.h"
+
+static const char *fmtname(ma_format fmt);
+static ma_result vopen(ma_vfs *vfs, const char *path, ma_uint32 mode, ma_vfs_file *fret);
+static ma_result vclose(ma_vfs *vfs, ma_vfs_file fp);
+static ma_result vread(ma_vfs *vfs, ma_vfs_file fp, void *dest, size_t sz, size_t *numread);
+static ma_result vseek(ma_vfs *vfs, ma_vfs_file fp, ma_int64 offs, ma_seek_origin from);
+static ma_result vtell(ma_vfs *vfs, ma_vfs_file fp, ma_int64 *pos);
+static ma_result vinfo(ma_vfs *vfs, ma_vfs_file fp, ma_file_info *inf);
+
+static int init_done;
+static ma_engine engine;
+static ma_sound sound;
+static ma_resource_manager resman;
+static ma_uint32 sample_rate;
+static float volume;
+
+static ma_vfs_callbacks vfs = {
+       vopen, 0,
+       vclose,
+       vread, 0,
+       vseek,
+       vtell,
+       vinfo
+};
+
+int init_music(void)
+{
+       ma_engine_config engcfg;
+       ma_resource_manager_config rescfg;
+       unsigned int flags;
+       ma_format fmt;
+       ma_uint32 nchan;
+
+       rescfg = ma_resource_manager_config_init();
+       rescfg.pVFS = &vfs;
+       if(ma_resource_manager_init(&rescfg, &resman) != 0) {
+               fprintf(stderr, "failed to initialize miniaudio resource manager\n");
+               return -1;
+       }
+
+       engcfg = ma_engine_config_init();
+       engcfg.pResourceManager = &resman;
+
+       if(ma_engine_init(&engcfg, &engine) != 0) {
+               fprintf(stderr, "failed to initialize miniaudio engine\n");
+               return -1;
+       }
+
+       flags = MA_SOUND_FLAG_STREAM;
+       if(ma_sound_init_from_file(&engine, "data/woodclick.wav", flags, 0, 0, &sound) != 0) {
+               fprintf(stderr, "failed to load music\n");
+               return -1;
+       }
+       ma_sound_get_data_format(&sound, &fmt, &nchan, &sample_rate, 0, 0);
+       printf("loaded sound: %s %u.%03u khz, %u channels\n", fmtname(fmt),
+                       (unsigned int)sample_rate / 1000, (unsigned int)sample_rate % 1000,
+                       (unsigned int)nchan);
+
+       init_done = 1;
+       volume = 1.0f;
+       return 0;
+}
+
+void destroy_music(void)
+{
+       if(init_done) {
+               ma_sound_stop(&sound);
+               ma_sound_uninit(&sound);
+               ma_engine_uninit(&engine);
+       }
+       init_done = 0;
+}
+
+void play_music(void)
+{
+       if(init_done) {
+               ma_sound_start(&sound);
+       }
+}
+
+void stop_music(void)
+{
+       if(init_done) {
+               ma_sound_stop(&sound);
+       }
+}
+
+void seek_music(long tm)
+{
+       ma_uint64 frm;
+
+       if(init_done) {
+               if(tm < 0) tm = 0;
+               frm = (ma_uint64)tm * (ma_uint64)sample_rate / 1000llu;
+               ma_sound_seek_to_pcm_frame(&sound, frm);
+       }
+}
+
+void set_music_volume(float vol)
+{
+       if(init_done) {
+               volume = vol;
+               ma_engine_set_volume(&engine, vol);
+       }
+}
+
+
+static const char *fmtname(ma_format fmt)
+{
+       switch(fmt) {
+       case ma_format_u8: return "8 bit";
+       case ma_format_s16: return "16 bit";
+       case ma_format_s24: return "24 bit";
+       case ma_format_s32: return "32 bit";
+       case ma_format_f32: return "float";
+       default:
+               return "unknown";
+       }
+}
+
+static ma_result vopen(ma_vfs *vfs, const char *path, ma_uint32 mode, ma_vfs_file *fret)
+{
+       ass_file *fp;
+
+       if(mode != MA_OPEN_MODE_READ) return -1;
+
+       if(!(fp = ass_fopen(path, "rb"))) {
+               return -1;
+       }
+       *fret = fp;
+       return 0;
+}
+
+static ma_result vclose(ma_vfs *vfs, ma_vfs_file fp)
+{
+       ass_fclose(fp);
+       return 0;
+}
+
+static ma_result vread(ma_vfs *vfs, ma_vfs_file fp, void *dest, size_t sz, size_t *numread)
+{
+       size_t res;
+
+       res = ass_fread(dest, 1, sz, fp);
+       if(numread) *numread = res;
+
+       if(res != sz) {
+               if(res == 0) return MA_AT_END;
+       }
+       return MA_SUCCESS;
+}
+
+static ma_result vseek(ma_vfs *vfs, ma_vfs_file fp, ma_int64 offs, ma_seek_origin org)
+{
+       int from;
+       switch(org) {
+       case ma_seek_origin_start:
+               from = SEEK_SET;
+               break;
+       case ma_seek_origin_current:
+               from = SEEK_CUR;
+               break;
+       case ma_seek_origin_end:
+               from = SEEK_END;
+               break;
+       }
+       return ass_fseek(fp, offs, from) == -1 ? -1 : 0;
+}
+
+static ma_result vtell(ma_vfs *vfs, ma_vfs_file fp, ma_int64 *pos)
+{
+       *pos = ass_ftell(fp);
+       return 0;
+}
+
+static ma_result vinfo(ma_vfs *vfs, ma_vfs_file fp, ma_file_info *inf)
+{
+       int fd;
+       struct stat st;
+
+#ifdef _MSC_VER
+       fd = _fileno(fp);
+#else
+       fd = fileno(fp);
+#endif
+
+       if(fstat(fd, &st) != 0) {
+               return MA_ERROR;
+       }
+       inf->sizeInBytes = st.st_size;
+       return MA_SUCCESS;
+}