1 files changed, 57 insertions, 0 deletions
diff --git a/src/modules/fluidsynth.c b/src/modules/fluidsynth.c
new file mode 100644
index 0000000..fd3c874
--- /dev/null
+++ b/src/modules/fluidsynth.c
@@ -0,0 +1,57 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include "../include.h"
+
+#include <fluidsynth.h>
+
+struct fluidsynth_userdata {
+	fluid_settings_t *settings;
+	fluid_synth_t *synth;
+	fluid_player_t *player;
+	int soundfont;
+};
+
+
+static void fluidsynth_callback(void *userdata, unsigned char *stream, int const length) {
+	struct fluidsynth_userdata *fs = userdata;
+	fluid_synth_write_float(fs->synth, length / sizeof (float) / 2, stream, 0, 2, stream, 1, 2);
+}
+
+static void fluidsynth_free(void *ptr) {
+	struct fluidsynth_userdata *fs = ptr;
+	fluid_player_stop(fs->player);
+	delete_fluid_player(fs->player);
+	fluid_player_play(fs->player);
+	fluid_synth_sfunload(fs->synth, fs->soundfont, 0);
+	delete_fluid_synth(fs->synth);
+	delete_fluid_settings(fs->settings);
+	free(fs);
+}
+
+int module_fluidsynth(struct blob *file, struct userdata *userdata) {
+	struct fluidsynth_userdata *fs = malloc(sizeof (struct fluidsynth_userdata));
+	if (fs == NULL) {
+		return 1;
+	}
+	fs->settings = new_fluid_settings(); // wasteful, but when trying to 'fix' it it just caused more errors
+	fluid_settings_setnum(fs->settings, "synth.gain", 0.5);
+	fluid_settings_setint(fs->settings, "player.reset-synth", 0);
+	fluid_settings_setnum(fs->settings, "synth.sample-rate", 48000);
+	fs->synth = new_fluid_synth(fs->settings);
+	char *soundfont_path = getenv("SOUNDFONT");
+	if (soundfont_path == NULL) {
+		soundfont_path = "/usr/share/sounds/sf2/default-GM.sf2";
+	}
+	fs->soundfont = fluid_synth_sfload(fs->synth, soundfont_path, 1); // ugly hack
+	fs->player = new_fluid_player(fs->synth);
+	fluid_player_set_loop(fs->player, -1);
+	if (fluid_player_add_mem(fs->player, file->data, file->size) == FLUID_FAILED) {
+		fluidsynth_free(fs);
+		return 1;
+	}
+	fluid_player_play(fs->player);
+	userdata->callback = fluidsynth_callback;
+	userdata->user = fs;
+	userdata->freefunc = fluidsynth_free;
+	return 0;
+}