LNXSDK/Kha/Backends/Kinc-hxcpp/kha/audio2/StreamChannel.hx

package kha.audio2;

import haxe.io.Bytes;

@:headerCode("#define STB_VORBIS_HEADER_ONLY\n#include <kinc/libs/stb_vorbis.c>")
@:headerClassCode("stb_vorbis* vorbis;")
class StreamChannel implements kha.audio1.AudioChannel {
	var atend: Bool = false;
	@:keep var loop: Bool;
	var myVolume: Float;
	var paused: Bool = false;

	public function new(data: Bytes, loop: Bool) {
		myVolume = 1;
		this.loop = loop;
		initVorbis(data);
	}

	@:functionCode("vorbis = stb_vorbis_open_memory(data->b->Pointer(), data->length, NULL, NULL);")
	function initVorbis(data: Bytes): Void {}

	@:functionCode("
		int read = stb_vorbis_get_samples_float_interleaved(vorbis, 2, (float*)samples->self.data, length);
		if (read < length / 2) {
			if (loop) {
				stb_vorbis_seek_start(vorbis);
			}
			else {
				atend = true;
			}
			for (int i = read * 2; i < length; ++i) {
				samples->self.data[i] = 0;
			}
		}
	")
	function nextVorbisSamples(samples: kha.arrays.Float32Array, length: Int): Void {}

	public function nextSamples(samples: kha.arrays.Float32Array, length: Int, sampleRate: Int): Void {
		if (paused) {
			for (i in 0...length) {
				samples[i] = 0;
			}
			return;
		}

		nextVorbisSamples(samples, length);
	}

	public function play(): Void {
		paused = false;
	}

	public function pause(): Void {
		paused = true;
	}

	public function stop(): Void {
		atend = true;
	}

	public var length(get, never): Float; // Seconds

	@:functionCode("
		if (vorbis == NULL) return 0;
		return stb_vorbis_stream_length_in_seconds(vorbis);
	")
	function get_length(): Int {
		return 0;
	}

	public var position(get, set): Float; // Seconds

	@:functionCode("
		if (vorbis == NULL) return 0;
		return stb_vorbis_get_sample_offset(vorbis) /
			(float)stb_vorbis_stream_length_in_samples(vorbis) *
			stb_vorbis_stream_length_in_seconds(vorbis);
	")
	function get_position(): Float {
		return 0;
	}

	@:functionCode("
		if (vorbis == NULL) return value;
		unsigned int rate = stb_vorbis_get_info(vorbis).sample_rate;
		stb_vorbis_seek_frame(vorbis, rate * value);
		return value;
	")
	function set_position(value: Float): Float {
		return value;
	}

	public var volume(get, set): Float;

	function get_volume(): Float {
		return myVolume;
	}

	function set_volume(value: Float): Float {
		return myVolume = value;
	}

	public var finished(get, never): Bool;

	function get_finished(): Bool {
		return atend;
	}
}