LÖVE

Code: Select all

-- assuming you have your received data completely in the variable "data"
-- assuming the transmitted sound's properities are mono, 8bit and 8000 Hz sampling rate.
-- also assuming that data holds unsigned values, i.e. you'll need to "transpose" the numbers down by 256/2.
local length = #data
local SD = love.sound.newSoundData(length, 8000, 8, 1)
for i=1, length do
	local smp = data:sub(i,i):byte() -- turns one character from the string into a number
	smp = smp - 128 -- [0,255] -> [-128,127]
	smp = smp / 128 -- [-128,127] -> [-1,~1]
	smp = math.min(math.max(smp, -1.0), 1.0) -- probably unnecessary
	SD:setSample(i-1, smp)
end
QS:queue(SD); QS:play()



-- Do this once
local QS = love.audio.newQueueableSource(8000, 8, 1)

Code: Select all

function love.load()
	devices = love.audio.getRecordingDevices( )
	for k,v in pairs(devices)do
		print("device: " .. v:getName() )
		print("is recording: " .. tostring( v:isRecording()) )
	end
	devices[1]:start()
end

function love.update(dt)
	local SoundData = devices[1]:getData()
	if(SoundData ~= nil)then
		local Source = love.audio.newSource(SoundData)
		local DataStringed = love.data.encode("string", "base64", SoundData:clone() )
		print(DataStringed)
		local DataUnstringedd = love.data.decode("data", "base64", DataStringed)
		local DataReturned = love.audio.newSource( DataUnstringedd )
		love.audio.play( DataReturned )
	end
end

Code: Select all

function love.load()
	devices = love.audio.getRecordingDevices( )
	for k,v in pairs(devices)do
		print("device: " .. v:getName() )
		print("is recording: " .. tostring( v:isRecording()) )
	end
	devices[1]:start()

	qsource = love.audio.newQueueableSource(
		devices[1]:getSampleRate(),
		devices[1]:getBitDepth(),
		devices[1]:getChannelCount()
	)
end

function love.update(dt)
	local sounddata = devices[1]:getData()
	if(sounddata ~= nil)then
		local s = sounddata:getString()
		print(s) -- yes it might be garbled, you should not care about that, perfectly reasonable that a binary string is not printable easily. Also, printing data this fast will lag your project; DON'T DO THIS.
		-- Also, as was said before, there's no real easy way to turn a string back into a SoundData; you either do what i suggested above, or use the FFI to copy the whole string at once into the area you can get by the getPointer method of the SoundData.

		local anothersd = love.sound.newSoundData(
			#s,
			devices[1]:getSampleRate(),
			devices[1]:getBitDepth(),
			devices[1]:getChannelCount()
		)
		
		-- Further complexities ahead, since you need to make it work differently whether it's 8bit or 16bit, and 1 or 2 channels(interleaved in the latter case). Then again, with the FFI, it'd be easier in the sense that what you got from :getString is what you'd need to copy into the memory area anyway, without needing to convert it.
		local i = 1
		while i <= #s do
			local smp = 0
			if devices[1]:getChannelCount() > 1 then error("Implement this yourself.") end
			if devices[1]:getBitDepth() == 8 then
				smp = s:sub(i,i):byte() -- turns one character from the string into a number
				-- Since i don't recall how the samplepoints are stored internally, this might not work 	without some modifications.
				smp = smp - 128 -- [0,255] -> [-128,127]
				smp = smp / 128 -- [-128,127] -> [-1,~1]
				smp = math.min(math.max(smp, -1.0), 1.0) -- probably unnecessary
				anothersd:setSample(i-1, smp)
				i=i+1
			else
				smp = s:sub(i,i):byte() * 256 + s:sub(i+1,i+1):byte()
				smp = smp - (65536/2)
				smp = smp / (65536/2)
				smp = math.min(math.max(smp, -1.0), 1.0) -- probably unnecessary
				anothersd:setSample(i/2-1, smp)
				i=i+2
			end
			
		end
		qsource:queue(anothersd)
		qsource:play()
	end
end

Code: Select all

local sptr, ssize = soundData:getPointer(), soundData:getSize()
require('ffi').copy(sptr, streamDataString, math.min(#streamDataString, ssize)