zymon/PortAudio.jl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

adds method to get rate of a file

Browse source
This commit is contained in:
Spencer Russell 2014-08-27 10:57:55 -04:00
parent 87925d1d8d
commit ae76badebb
2 changed files with 13 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/sndfile.jl
View file

@ -1,4 +1,4 @@
export af_open, FilePlayer, rewind export af_open, FilePlayer, rewind, samplerate
const SFM_READ = int32(0x10) const SFM_READ = int32(0x10)
const SFM_WRITE = int32(0x20) const SFM_WRITE = int32(0x20)
@ -41,6 +41,8 @@ type AudioFile
sfinfo::SF_INFO sfinfo::SF_INFO
end end
samplerate(f::AudioFile) = f.sfinfo.samplerate
# AudioIO.open is part of the public API, but is not exported so that it # AudioIO.open is part of the public API, but is not exported so that it
# doesn't conflict with Base.open # doesn't conflict with Base.open
function open(path::String, mode::String = "r", function open(path::String, mode::String = "r",

19
test/test_sndfile.jl
View file

@ -9,9 +9,9 @@ import AudioIO: DeviceInfo, render, AudioSample, AudioBuf
facts("WAV file write/read") do facts("WAV file write/read") do
fname = Pkg.dir("AudioIO", "test", "sinwave.wav") fname = Pkg.dir("AudioIO", "test", "sinwave.wav")
samplerate = 44100 srate = 44100
freq = 440 freq = 440
t = [0 : 2 * samplerate - 1] / samplerate t = [0 : 2 * srate - 1] / srate
phase = 2 * pi * freq * t phase = 2 * pi * freq * t
reference = int16((2 ^ 15 - 1) * sin(phase)) reference = int16((2 ^ 15 - 1) * sin(phase))
@ -22,10 +22,11 @@ facts("WAV file write/read") do
# test basic reading # test basic reading
AudioIO.open(fname) do f AudioIO.open(fname) do f
@fact f.sfinfo.channels => 1 @fact f.sfinfo.channels => 1
@fact f.sfinfo.frames => 2 * samplerate @fact f.sfinfo.frames => 2 * srate
actual = read(f) actual = read(f)
@fact length(reference) => length(actual) @fact length(reference) => length(actual)
@fact reference => actual[:, 1] @fact reference => actual[:, 1]
@fact samplerate(f) => srate
end end
# test seeking # test seeking
@ -35,7 +36,7 @@ facts("WAV file write/read") do
# pretend we have a stream at the same rate as the file # pretend we have a stream at the same rate as the file
bufsize = 1024 bufsize = 1024
input = zeros(AudioSample, bufsize) input = zeros(AudioSample, bufsize)
test_info = DeviceInfo(samplerate, bufsize) test_info = DeviceInfo(srate, bufsize)
node = FilePlayer(f) node = FilePlayer(f)
# convert to floating point because that's what AudioIO uses natively # convert to floating point because that's what AudioIO uses natively
expected = convert(AudioBuf, reference ./ (2^15)) expected = convert(AudioBuf, reference ./ (2^15))
@ -48,8 +49,8 @@ end
facts("Stereo file reading") do facts("Stereo file reading") do
fname = Pkg.dir("AudioIO", "test", "440left_880right.wav") fname = Pkg.dir("AudioIO", "test", "440left_880right.wav")
samplerate = 44100 srate = 44100
t = [0 : 2 * samplerate - 1] / samplerate t = [0 : 2 * srate - 1] / srate
expected = int16((2^15-1) * hcat(sin(2pi*t*440), sin(2pi*t*880))) expected = int16((2^15-1) * hcat(sin(2pi*t*440), sin(2pi*t*880)))
AudioIO.open(fname) do f AudioIO.open(fname) do f
@ -62,11 +63,11 @@ end
# new-fangled stereo sound stuff # new-fangled stereo sound stuff
facts("Stereo file rendering") do facts("Stereo file rendering") do
fname = Pkg.dir("AudioIO", "test", "440left_880right.wav") fname = Pkg.dir("AudioIO", "test", "440left_880right.wav")
samplerate = 44100 srate = 44100
bufsize = 1024 bufsize = 1024
input = zeros(AudioSample, bufsize) input = zeros(AudioSample, bufsize)
test_info = DeviceInfo(samplerate, bufsize) test_info = DeviceInfo(srate, bufsize)
t = [0 : 2 * samplerate - 1] / samplerate t = [0 : 2 * srate - 1] / srate
expected = convert(AudioBuf, 0.5 * (sin(2pi*t*440) + sin(2pi*t*880))) expected = convert(AudioBuf, 0.5 * (sin(2pi*t*440) + sin(2pi*t*880)))
AudioIO.open(fname) do f AudioIO.open(fname) do f