Регистрация | Войти
Lisp — программируемый язык программирования
flac декодер
shamaz.mazum - 04.07.2012 22:24, Сообщений - 0
Тут народ пиарится, я смотрю)

Позвольте и мне. Пилю тут flac-decoder. Уже он может перегонять flac файлы с 8 или 16 bps, с fixed block size (у меня в аудио-коллекции все такие) в wav.
Делается это так:


(asdf:load-system :cl-flac-examples)
(flac-examples:flac2wav "file.flac" "file.wav")

Работает он примерно в 5 раз тормознее оригинального декодера на C (если пускать на sbcl), и это первый мой опыт написания программы на Common Lisp, от которой требуется быстрота. Буду рад услышать любые пожелания и рекомендации по ускорению этого дела. Спасибо Love5an'у, чей trivial-bit-streams я спер в bitreader.lisp (оригинал, увы тормозил. Может из-за моих идиотских изменений, может из-за ООП какого-никагого). Прочитанные метаданные (сейчас понимает только streaminfo) хранятся в соответствующих объектах. Документации пока нет, но из примера всё должно быть ясно.
@2009-2013 lisper.ru