X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fsndfilesource.cc;h=b34bbaa9d26527af37c6b6fd9e7cb80513a572d1;hb=4250940ad83200e065b966d0646c75a48bb0f73d;hp=2f4c575883ee6e9ad55afedcdecef44fd8af5ab5;hpb=29f6f0cf05893371a64fb14f8868a3e0e4effd39;p=ardour.git diff --git a/libs/ardour/sndfilesource.cc b/libs/ardour/sndfilesource.cc index 2f4c575883..b34bbaa9d2 100644 --- a/libs/ardour/sndfilesource.cc +++ b/libs/ardour/sndfilesource.cc @@ -1,5 +1,5 @@ /* - Copyright (C) 2006 Paul Davis + Copyright (C) 2006 Paul Davis This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -17,69 +17,116 @@ */ +#ifdef WAF_BUILD +#include "libardour-config.h" +#endif + +#include #include #include +#include +#include -#include -#include #include +#include +#include "pbd/gstdio_compat.h" + +#include +#include #include -#include -#include -#include +#include "ardour/runtime_functions.h" +#include "ardour/sndfilesource.h" +#include "ardour/sndfile_helpers.h" +#include "ardour/utils.h" +#include "ardour/session.h" -#include "i18n.h" +#include "pbd/i18n.h" using namespace std; using namespace ARDOUR; using namespace PBD; +using std::string; gain_t* SndFileSource::out_coefficient = 0; gain_t* SndFileSource::in_coefficient = 0; -nframes_t SndFileSource::xfade_frames = 64; -const AudioFileSource::Flag SndFileSource::default_writable_flags = AudioFileSource::Flag (AudioFileSource::Writable| - AudioFileSource::Removable| - AudioFileSource::RemovableIfEmpty| - AudioFileSource::CanRename); +samplecnt_t SndFileSource::xfade_samples = 64; +const Source::Flag SndFileSource::default_writable_flags = Source::Flag ( + Source::Writable | + Source::Removable | + Source::RemovableIfEmpty | + Source::CanRename ); SndFileSource::SndFileSource (Session& s, const XMLNode& node) - : AudioFileSource (s, node) + : Source(s, node) + , AudioFileSource (s, node) + , _sndfile (0) + , _broadcast_info (0) + , _capture_start (false) + , _capture_end (false) + , file_pos (0) + , xfade_buf (0) { - init (); + init_sndfile (); + + assert (Glib::file_test (_path, Glib::FILE_TEST_EXISTS)); + existence_check (); if (open()) { throw failed_constructor (); } } -SndFileSource::SndFileSource (Session& s, string path, int chn, Flag flags) - /* files created this way are never writable or removable */ - : AudioFileSource (s, path, Flag (flags & ~(Writable|Removable|RemovableIfEmpty|RemoveAtDestroy))) +/** Constructor for existing external-to-session files. + Files created this way are never writable or removable +*/ +SndFileSource::SndFileSource (Session& s, const string& path, int chn, Flag flags) + : Source(s, DataType::AUDIO, path, flags) + /* note that the origin of an external file is itself */ + , AudioFileSource (s, path, Flag (flags & ~(Writable|Removable|RemovableIfEmpty|RemoveAtDestroy))) + , _sndfile (0) + , _broadcast_info (0) + , _capture_start (false) + , _capture_end (false) + , file_pos (0) + , xfade_buf (0) { - channel = chn; + _channel = chn; - init (); + init_sndfile (); + + assert (Glib::file_test (_path, Glib::FILE_TEST_EXISTS)); + existence_check (); if (open()) { throw failed_constructor (); } } -SndFileSource::SndFileSource (Session& s, string path, SampleFormat sfmt, HeaderFormat hf, nframes_t rate, Flag flags) - : AudioFileSource (s, path, flags, sfmt, hf) +/** This constructor is used to construct new internal-to-session files, + not open existing ones. +*/ +SndFileSource::SndFileSource (Session& s, const string& path, const string& origin, + SampleFormat sfmt, HeaderFormat hf, samplecnt_t rate, Flag flags) + : Source(s, DataType::AUDIO, path, flags) + , AudioFileSource (s, path, origin, flags, sfmt, hf) + , _sndfile (0) + , _broadcast_info (0) + , _capture_start (false) + , _capture_end (false) + , file_pos (0) + , xfade_buf (0) { int fmt = 0; - init (); + init_sndfile (); - /* this constructor is used to construct new files, not open - existing ones. - */ + assert (!Glib::file_test (_path, Glib::FILE_TEST_EXISTS)); + existence_check (); + + _file_is_new = true; - file_is_new = true; - switch (hf) { case CAF: fmt = SF_FORMAT_CAF; @@ -106,9 +153,26 @@ SndFileSource::SndFileSource (Session& s, string path, SampleFormat sfmt, Header _flags = Flag (_flags & ~Broadcast); break; + case RF64_WAV: + fmt = SF_FORMAT_RF64; + _flags = Flag (_flags & ~Broadcast); + _flags = Flag (_flags | RF64_RIFF); + break; + + case MBWF: + fmt = SF_FORMAT_RF64; + _flags = Flag (_flags | Broadcast); + _flags = Flag (_flags | RF64_RIFF); + break; + + case RF64: + fmt = SF_FORMAT_RF64; + _flags = Flag (_flags & ~Broadcast); + break; + default: fatal << string_compose (_("programming error: %1"), X_("unsupported audio header format requested")) << endmsg; - /*NOTREACHED*/ + abort(); /*NOTREACHED*/ break; } @@ -121,249 +185,426 @@ SndFileSource::SndFileSource (Session& s, string path, SampleFormat sfmt, Header case FormatInt24: fmt |= SF_FORMAT_PCM_24; break; + + case FormatInt16: + fmt |= SF_FORMAT_PCM_16; + break; } - + _info.channels = 1; _info.samplerate = rate; _info.format = fmt; - if (open()) { - throw failed_constructor(); + if (_flags & Destructive) { + if (open()) { + throw failed_constructor(); + } + } else { + /* normal mode: do not open the file here - do that in {read,write}_unlocked() as needed + */ } +} - if (writable() && (_flags & Broadcast)) { +/** Constructor to be called for recovering files being used for + * capture. They are in-session, they already exist, they should not + * be writable. They are an odd hybrid (from a constructor point of + * view) of the previous two constructors. + */ +SndFileSource::SndFileSource (Session& s, const string& path, int chn) + : Source (s, DataType::AUDIO, path, Flag (0)) + /* the final boolean argument is not used, its value is irrelevant. see audiofilesource.h for explanation */ + , AudioFileSource (s, path, Flag (0)) + , _sndfile (0) + , _broadcast_info (0) + , _capture_start (false) + , _capture_end (false) + , file_pos (0) + , xfade_buf (0) +{ + _channel = chn; - _broadcast_info = new SF_BROADCAST_INFO; - memset (_broadcast_info, 0, sizeof (*_broadcast_info)); - - snprintf (_broadcast_info->description, sizeof (_broadcast_info->description), "BWF %s", _name.c_str()); - - struct utsname utsinfo; + init_sndfile (); - if (uname (&utsinfo)) { - error << string_compose(_("FileSource: cannot get host information for BWF header (%1)"), strerror(errno)) << endmsg; - return; - } - - snprintf (_broadcast_info->originator, sizeof (_broadcast_info->originator), "ardour:%s:%s:%s:%s:%s)", - Glib::get_real_name().c_str(), - utsinfo.nodename, - utsinfo.sysname, - utsinfo.release, - utsinfo.version); - - _broadcast_info->version = 1; - _broadcast_info->time_reference_low = 0; - _broadcast_info->time_reference_high = 0; - - /* XXX do something about this field */ - - snprintf (_broadcast_info->umid, sizeof (_broadcast_info->umid), "%s", "fnord"); - - /* coding history is added by libsndfile */ - - if (sf_command (sf, SFC_SET_BROADCAST_INFO, _broadcast_info, sizeof (_broadcast_info)) != SF_TRUE) { - char errbuf[256]; - sf_error_str (0, errbuf, sizeof (errbuf) - 1); - error << string_compose (_("cannot set broadcast info for audio file %1 (%2); dropping broadcast info for this file"), _path, errbuf) << endmsg; - _flags = Flag (_flags & ~Broadcast); - delete _broadcast_info; - _broadcast_info = 0; - } - + assert (Glib::file_test (_path, Glib::FILE_TEST_EXISTS)); + existence_check (); + + if (open()) { + throw failed_constructor (); } } -void -SndFileSource::init () +/** Constructor to losslessly compress existing source to flac */ +SndFileSource::SndFileSource (Session& s, const AudioFileSource& other, const string& path, bool use16bits, Progress* progress) + : Source(s, DataType::AUDIO, path, Flag ((other.flags () | default_writable_flags | NoPeakFile) & ~RF64_RIFF)) + , AudioFileSource (s, path, "", Flag ((other.flags () | default_writable_flags | NoPeakFile) & ~RF64_RIFF), /*unused*/ FormatFloat, /*unused*/ WAVE64) + , _sndfile (0) + , _broadcast_info (0) + , _capture_start (false) + , _capture_end (false) + , file_pos (0) + , xfade_buf (0) { - string file; + if (other.readable_length () == 0) { + throw failed_constructor(); + } - // lets try to keep the object initalizations here at the top - xfade_buf = 0; - interleave_buf = 0; - interleave_bufsize = 0; - sf = 0; - _broadcast_info = 0; + assert (!Glib::file_test (_path, Glib::FILE_TEST_EXISTS)); - if (is_embedded()) { - _name = _path; - } else { - _name = Glib::path_get_basename (_path); + _channel = 0; + init_sndfile (); + + _file_is_new = true; + + _info.channels = 1; + _info.samplerate = other.sample_rate (); + _info.format = SF_FORMAT_FLAC | (use16bits ? SF_FORMAT_PCM_16 : SF_FORMAT_PCM_24); + + /* flac is either read or write -- never both, + * so we need to special-case ::open () */ +#ifdef PLATFORM_WINDOWS + int fd = g_open (_path.c_str(), O_CREAT | O_RDWR, 0644); +#else + int fd = ::open (_path.c_str(), O_CREAT | O_RDWR, 0644); +#endif + if (fd == -1) { + throw failed_constructor(); } + _sndfile = sf_open_fd (fd, SFM_WRITE, &_info, true); + + if (_sndfile == 0) { + throw failed_constructor(); + } + +#if 0 + /* setting flac compression quality above the default does not produce a significant size + * improvement (not for large raw recordings anyway, the_CLA tests 2017-10-02, >> 250MB files, + * ~1% smaller), but does have a significant encoding speed penalty. + * + * We still may expose this as option someday though, perhaps for opposite reason: "fast encoding" + */ + double flac_quality = 1; // libsndfile uses range 0..1 (mapped to flac 0..8), default is (5/8) + if (sf_command (_sndfile, SFC_SET_COMPRESSION_LEVEL, &flac_quality, sizeof (double)) != SF_TRUE) { + char errbuf[256]; + sf_error_str (_sndfile, errbuf, sizeof (errbuf) - 1); + error << string_compose (_("Cannot set flac compression level: %1"), errbuf) << endmsg; + } +#endif + + Sample buf[8192]; + samplecnt_t off = 0; + float peak = 0; + float norm = 1.f; + + /* normalize before converting to fixed point, calc gain factor */ + samplecnt_t len = other.read (buf, off, 8192, other.channel ()); + while (len > 0) { + peak = compute_peak (buf, len, peak); + off += len; + len = other.read (buf, off, 8192, other.channel ()); + if (progress) { + progress->set_progress (0.5f * (float) off / other.readable_length ()); + } + } + + if (peak > 0) { + _gain *= peak; + norm = 1.f / peak; + } + + /* copy file */ + off = 0; + len = other.read (buf, off, 8192, other.channel ()); + while (len > 0) { + if (norm != 1.f) { + for (samplecnt_t i = 0; i < len; ++i) { + buf[i] *= norm; + } + } + write (buf, len); + off += len; + len = other.read (buf, off, 8192, other.channel ()); + if (progress) { + progress->set_progress (0.5f + 0.5f * (float) off / other.readable_length ()); + } + } +} + +void +SndFileSource::init_sndfile () +{ /* although libsndfile says we don't need to set this, valgrind and source code shows us that we do. */ memset (&_info, 0, sizeof(_info)); - _capture_start = false; - _capture_end = false; - file_pos = 0; - - if (destructive()) { - xfade_buf = new Sample[xfade_frames]; - timeline_position = header_position_offset; + if (destructive()) { + xfade_buf = new Sample[xfade_samples]; + _timeline_position = header_position_offset; } - AudioFileSource::HeaderPositionOffsetChanged.connect (mem_fun (*this, &SndFileSource::handle_header_position_change)); + AudioFileSource::HeaderPositionOffsetChanged.connect_same_thread (header_position_connection, boost::bind (&SndFileSource::handle_header_position_change, this)); +} + +void +SndFileSource::close () +{ + if (_sndfile) { + sf_close (_sndfile); + _sndfile = 0; + file_closed (); + } } int SndFileSource::open () { - if ((sf = sf_open (_path.c_str(), (writable() ? SFM_RDWR : SFM_READ), &_info)) == 0) { - char errbuf[256]; + if (_sndfile) { + return 0; + } + +// We really only want to use g_open for all platforms but because of this +// method(SndfileSource::open), the compiler(or at least GCC) is confused +// because g_open will expand to "open" on non-POSIX systems and needs the +// global namespace qualifer. The problem is since since C99 ::g_open will +// apparently expand to ":: open" +#ifdef PLATFORM_WINDOWS + int fd = g_open (_path.c_str(), writable() ? O_CREAT | O_RDWR : O_RDONLY, writable() ? 0644 : 0444); +#else + int fd = ::open (_path.c_str(), writable() ? O_CREAT | O_RDWR : O_RDONLY, writable() ? 0644 : 0444); +#endif + + if (fd == -1) { + error << string_compose ( + _ ("SndFileSource: cannot open file \"%1\" for %2"), + _path, + (writable () ? "read+write" : "reading")) << endmsg; + return -1; + } + + if ((_info.format & SF_FORMAT_TYPEMASK ) == SF_FORMAT_FLAC) { + assert (!writable()); + _sndfile = sf_open_fd (fd, SFM_READ, &_info, true); + } else { + _sndfile = sf_open_fd (fd, writable() ? SFM_RDWR : SFM_READ, &_info, true); + } + + if (_sndfile == 0) { + char errbuf[1024]; sf_error_str (0, errbuf, sizeof (errbuf) - 1); - error << string_compose(_("SndFileSource: cannot open file \"%1\" for %2 (%3)"), +#ifndef HAVE_COREAUDIO + /* if we have CoreAudio, we will be falling back to that if libsndfile fails, + so we don't want to see this message. + */ + + cerr << "failed to open " << _path << " with name " << _name << endl; + + error << string_compose(_("SndFileSource: cannot open file \"%1\" for %2 (%3)"), _path, (writable() ? "read+write" : "reading"), errbuf) << endmsg; +#endif return -1; } - if (channel >= _info.channels) { - error << string_compose(_("SndFileSource: file only contains %1 channels; %2 is invalid as a channel number"), _info.channels, channel) << endmsg; - sf_close (sf); - sf = 0; + if (_channel >= _info.channels) { +#ifndef HAVE_COREAUDIO + error << string_compose(_("SndFileSource: file only contains %1 channels; %2 is invalid as a channel number"), _info.channels, _channel) << endmsg; +#endif + sf_close (_sndfile); + _sndfile = 0; return -1; } _length = _info.frames; - _broadcast_info = new SF_BROADCAST_INFO; - memset (_broadcast_info, 0, sizeof (*_broadcast_info)); - - bool timecode_info_exists; +#ifdef HAVE_RF64_RIFF + if (_file_is_new && _length == 0 && writable()) { + if (_flags & RF64_RIFF) { + if (sf_command (_sndfile, SFC_RF64_AUTO_DOWNGRADE, 0, 0) != SF_TRUE) { + char errbuf[256]; + sf_error_str (_sndfile, errbuf, sizeof (errbuf) - 1); + error << string_compose (_("Cannot mark RF64 audio file for automatic downgrade to WAV: %1"), errbuf) + << endmsg; + } + } + } +#endif + + if (!_broadcast_info) { + _broadcast_info = new BroadcastInfo; + } - set_timeline_position (get_timecode_info (sf, _broadcast_info, timecode_info_exists)); + bool bwf_info_exists = _broadcast_info->load_from_file (_sndfile); - if (!timecode_info_exists) { + if (_file_is_new && _length == 0 && writable() && !bwf_info_exists) { + /* newly created files will not have a BWF header at this point in time. + * Import will have called Source::set_timeline_position() if one exists + * in the original. */ + header_position_offset = _timeline_position; + } + + /* Set our timeline position to either the time reference from a BWF header or the current + start of the session. + */ + set_timeline_position (bwf_info_exists ? _broadcast_info->get_time_reference() : header_position_offset); + + if (_length != 0 && !bwf_info_exists) { delete _broadcast_info; _broadcast_info = 0; _flags = Flag (_flags & ~Broadcast); } - if (writable()) { - sf_command (sf, SFC_SET_UPDATE_HEADER_AUTO, 0, SF_FALSE); - } + /* Set the broadcast flag if the BWF info is already there. We need + * this when recovering or using existing files. + */ - return 0; -} + if (bwf_info_exists) { + _flags = Flag (_flags | Broadcast); + } -SndFileSource::~SndFileSource () -{ - GoingAway (); /* EMIT SIGNAL */ + if (writable()) { + sf_command (_sndfile, SFC_SET_UPDATE_HEADER_AUTO, 0, SF_FALSE); - if (sf) { - sf_close (sf); - sf = 0; + if (_flags & Broadcast) { - /* stupid libsndfile updated the headers on close, - so touch the peakfile if it exists and has data - to make sure its time is as new as the audio - file. - */ + if (!_broadcast_info) { + _broadcast_info = new BroadcastInfo; + } - touch_peakfile (); - } + _broadcast_info->set_from_session (_session, header_position_offset); + _broadcast_info->set_description (string_compose ("BWF %1", _name)); - if (interleave_buf) { - delete [] interleave_buf; - } + if (!_broadcast_info->write_to_file (_sndfile)) { + error << string_compose (_("cannot set broadcast info for audio file %1 (%2); dropping broadcast info for this file"), + _path, _broadcast_info->get_error()) + << endmsg; + _flags = Flag (_flags & ~Broadcast); + delete _broadcast_info; + _broadcast_info = 0; + } + } + } - if (_broadcast_info) { - delete _broadcast_info; - } + return 0; +} - if (xfade_buf) { - delete [] xfade_buf; - } +SndFileSource::~SndFileSource () +{ + close (); + delete _broadcast_info; + delete [] xfade_buf; } float -SndFileSource::sample_rate () const +SndFileSource::sample_rate () const { return _info.samplerate; } -nframes_t -SndFileSource::read_unlocked (Sample *dst, nframes_t start, nframes_t cnt) const +samplecnt_t +SndFileSource::read_unlocked (Sample *dst, samplepos_t start, samplecnt_t cnt) const { - int32_t nread; + assert (cnt >= 0); + + samplecnt_t nread; float *ptr; - uint32_t real_cnt; - nframes_t file_cnt; + samplecnt_t real_cnt; + samplepos_t file_cnt; + + if (writable() && !_sndfile) { + /* file has not been opened yet - nothing written to it */ + memset (dst, 0, sizeof (Sample) * cnt); + return cnt; + } + + if (const_cast(this)->open()) { + error << string_compose (_("could not open file %1 for reading."), _path) << endmsg; + return 0; + } if (start > _length) { /* read starts beyond end of data, just memset to zero */ - + file_cnt = 0; } else if (start + cnt > _length) { - + /* read ends beyond end of data, read some, memset the rest */ - + file_cnt = _length - start; } else { - + /* read is entirely within data */ file_cnt = cnt; } - + + assert (file_cnt >= 0); + + if (file_cnt != cnt) { + samplepos_t delta = cnt - file_cnt; + memset (dst+file_cnt, 0, sizeof (Sample) * delta); + } + if (file_cnt) { - if (sf_seek (sf, (sf_count_t) start, SEEK_SET|SFM_READ) != (sf_count_t) start) { + if (sf_seek (_sndfile, (sf_count_t) start, SEEK_SET|SFM_READ) != (sf_count_t) start) { char errbuf[256]; sf_error_str (0, errbuf, sizeof (errbuf) - 1); - error << string_compose(_("SndFileSource: could not seek to frame %1 within %2 (%3)"), start, _name.substr (1), errbuf) << endmsg; + error << string_compose(_("SndFileSource: could not seek to sample %1 within %2 (%3)"), start, _name.val().substr (1), errbuf) << endmsg; return 0; } - + if (_info.channels == 1) { - nframes_t ret = sf_read_float (sf, dst, file_cnt); - _read_data_count = cnt * sizeof(float); + samplecnt_t ret = sf_read_float (_sndfile, dst, file_cnt); + if (ret != file_cnt) { + char errbuf[256]; + sf_error_str (0, errbuf, sizeof (errbuf) - 1); + error << string_compose(_("SndFileSource: @ %1 could not read %2 within %3 (%4) (len = %5, ret was %6)"), start, file_cnt, _name.val().substr (1), errbuf, _length, ret) << endl; + } + if (_gain != 1.f) { + for (samplecnt_t i = 0; i < ret; ++i) { + dst[i] *= _gain; + } + } return ret; } } - if (file_cnt != cnt) { - nframes_t delta = cnt - file_cnt; - memset (dst+file_cnt, 0, sizeof (Sample) * delta); - } - real_cnt = cnt * _info.channels; - if (interleave_bufsize < real_cnt) { - - if (interleave_buf) { - delete [] interleave_buf; - } - interleave_bufsize = real_cnt; - interleave_buf = new float[interleave_bufsize]; - } - - nread = sf_read_float (sf, interleave_buf, real_cnt); - ptr = interleave_buf + channel; + Sample* interleave_buf = get_interleave_buffer (real_cnt); + + nread = sf_read_float (_sndfile, interleave_buf, real_cnt); + ptr = interleave_buf + _channel; nread /= _info.channels; - + /* stride through the interleaved data */ - - for (int32_t n = 0; n < nread; ++n) { - dst[n] = *ptr; - ptr += _info.channels; + + if (_gain != 1.f) { + for (samplecnt_t n = 0; n < nread; ++n) { + dst[n] = *ptr * _gain; + ptr += _info.channels; + } + } else { + for (samplecnt_t n = 0; n < nread; ++n) { + dst[n] = *ptr; + ptr += _info.channels; + } } - _read_data_count = cnt * sizeof(float); - return nread; } -nframes_t -SndFileSource::write_unlocked (Sample *data, nframes_t cnt) +samplecnt_t +SndFileSource::write_unlocked (Sample *data, samplecnt_t cnt) { + if (open()) { + return 0; // failure + } + if (destructive()) { return destructive_write_unlocked (data, cnt); } else { @@ -371,8 +612,8 @@ SndFileSource::write_unlocked (Sample *data, nframes_t cnt) } } -nframes_t -SndFileSource::nondestructive_write_unlocked (Sample *data, nframes_t cnt) +samplecnt_t +SndFileSource::nondestructive_write_unlocked (Sample *data, samplecnt_t cnt) { if (!writable()) { warning << string_compose (_("attempt to write a non-writable audio file source (%1)"), _path) << endmsg; @@ -381,34 +622,28 @@ SndFileSource::nondestructive_write_unlocked (Sample *data, nframes_t cnt) if (_info.channels != 1) { fatal << string_compose (_("programming error: %1 %2"), X_("SndFileSource::write called on non-mono file"), _path) << endmsg; - /*NOTREACHED*/ + abort(); /*NOTREACHED*/ return 0; } - - nframes_t oldlen; - int32_t frame_pos = _length; - if (write_float (data, frame_pos, cnt) != cnt) { + samplepos_t sample_pos = _length; + + if (write_float (data, sample_pos, cnt) != cnt) { return 0; } - oldlen = _length; - update_length (oldlen, cnt); + update_length (_length + cnt); if (_build_peakfiles) { - compute_and_write_peaks (data, frame_pos, cnt, false); + compute_and_write_peaks (data, sample_pos, cnt, true, true); } - _write_data_count = cnt; - return cnt; } -nframes_t -SndFileSource::destructive_write_unlocked (Sample* data, nframes_t cnt) +samplecnt_t +SndFileSource::destructive_write_unlocked (Sample* data, samplecnt_t cnt) { - nframes_t old_file_pos; - if (!writable()) { warning << string_compose (_("attempt to write a non-writable audio file source (%1)"), _path) << endmsg; return 0; @@ -422,28 +657,28 @@ SndFileSource::destructive_write_unlocked (Sample* data, nframes_t cnt) _capture_start = false; _capture_end = false; - + /* move to the correct location place */ - file_pos = capture_start_frame - timeline_position; - + file_pos = capture_start_sample - _timeline_position; + // split cnt in half - nframes_t subcnt = cnt / 2; - nframes_t ofilepos = file_pos; - + samplecnt_t subcnt = cnt / 2; + samplecnt_t ofilepos = file_pos; + // fade in if (crossfade (data, subcnt, 1) != subcnt) { return 0; } - + file_pos += subcnt; Sample * tmpdata = data + subcnt; - + // fade out subcnt = cnt - subcnt; if (crossfade (tmpdata, subcnt, 0) != subcnt) { return 0; } - + file_pos = ofilepos; // adjusted below } else if (_capture_start) { @@ -454,14 +689,14 @@ SndFileSource::destructive_write_unlocked (Sample* data, nframes_t cnt) _capture_start = false; _capture_end = false; - + /* move to the correct location place */ - file_pos = capture_start_frame - timeline_position; + file_pos = capture_start_sample - _timeline_position; if (crossfade (data, cnt, 1) != cnt) { return 0; } - + } else if (_capture_end) { /* end of capture both occur within the data we are writing, @@ -470,7 +705,7 @@ SndFileSource::destructive_write_unlocked (Sample* data, nframes_t cnt) _capture_start = false; _capture_end = false; - + if (crossfade (data, cnt, 0) != cnt) { return 0; } @@ -484,28 +719,27 @@ SndFileSource::destructive_write_unlocked (Sample* data, nframes_t cnt) } } - old_file_pos = file_pos; - update_length (file_pos, cnt); + update_length (file_pos + cnt); if (_build_peakfiles) { - compute_and_write_peaks (data, file_pos, cnt, false); + compute_and_write_peaks (data, file_pos, cnt, true, true); } file_pos += cnt; - + return cnt; } int -SndFileSource::update_header (nframes_t when, struct tm& now, time_t tnow) -{ +SndFileSource::update_header (samplepos_t when, struct tm& now, time_t tnow) +{ set_timeline_position (when); if (_flags & Broadcast) { if (setup_broadcast_info (when, now, tnow)) { return -1; } - } + } return flush_header (); } @@ -513,59 +747,61 @@ SndFileSource::update_header (nframes_t when, struct tm& now, time_t tnow) int SndFileSource::flush_header () { - if (!writable() || (sf == 0)) { + if (!writable()) { warning << string_compose (_("attempt to flush a non-writable audio file source (%1)"), _path) << endmsg; return -1; } - return (sf_command (sf, SFC_UPDATE_HEADER_NOW, 0, 0) != SF_TRUE); + + if (_sndfile == 0) { + error << string_compose (_("could not allocate file %1 to write header"), _path) << endmsg; + return -1; + } + + int const r = sf_command (_sndfile, SFC_UPDATE_HEADER_NOW, 0, 0) != SF_TRUE; + + return r; +} + +void +SndFileSource::flush () +{ + if (!writable()) { + warning << string_compose (_("attempt to flush a non-writable audio file source (%1)"), _path) << endmsg; + return; + } + + if (_sndfile == 0) { + error << string_compose (_("could not allocate file %1 to flush contents"), _path) << endmsg; + return; + } + + // Hopefully everything OK + sf_write_sync (_sndfile); } int -SndFileSource::setup_broadcast_info (nframes_t when, struct tm& now, time_t tnow) +SndFileSource::setup_broadcast_info (samplepos_t /*when*/, struct tm& now, time_t /*tnow*/) { if (!writable()) { warning << string_compose (_("attempt to store broadcast info in a non-writable audio file source (%1)"), _path) << endmsg; return -1; } - if (!(_flags & Broadcast)) { + if (!_sndfile) { + warning << string_compose (_("attempt to set BWF info for an un-opened audio file source (%1)"), _path) << endmsg; + return -1; + } + + if (!(_flags & Broadcast) || !_broadcast_info) { return 0; } - /* random code is 9 digits */ - - int random_code = random() % 999999999; - - snprintf (_broadcast_info->originator_reference, sizeof (_broadcast_info->originator_reference), "%2s%3s%12s%02d%02d%02d%9d", - Config->get_bwf_country_code().c_str(), - Config->get_bwf_organization_code().c_str(), - bwf_serial_number, - now.tm_hour, - now.tm_min, - now.tm_sec, - random_code); - - snprintf (_broadcast_info->origination_date, sizeof (_broadcast_info->origination_date), "%4d-%02d-%02d", - 1900 + now.tm_year, - now.tm_mon, - now.tm_mday); - - snprintf (_broadcast_info->origination_time, sizeof (_broadcast_info->origination_time), "%02d:%02d:%02d", - now.tm_hour, - now.tm_min, - now.tm_sec); + _broadcast_info->set_originator_ref_from_session (_session); + _broadcast_info->set_origination_time (&now); /* now update header position taking header offset into account */ - - set_header_timeline_position (); - if (sf_command (sf, SFC_SET_BROADCAST_INFO, _broadcast_info, sizeof (*_broadcast_info)) != SF_TRUE) { - error << string_compose (_("cannot set broadcast info for audio file %1; Dropping broadcast info for this file"), _path) << endmsg; - _flags = Flag (_flags & ~Broadcast); - delete _broadcast_info; - _broadcast_info = 0; - return -1; - } + set_header_timeline_position (); return 0; } @@ -576,58 +812,44 @@ SndFileSource::set_header_timeline_position () if (!(_flags & Broadcast)) { return; } + assert (_broadcast_info); - _broadcast_info->time_reference_high = (timeline_position >> 32); - _broadcast_info->time_reference_low = (timeline_position & 0xffffffff); + _broadcast_info->set_time_reference (_timeline_position); - if (sf_command (sf, SFC_SET_BROADCAST_INFO, _broadcast_info, sizeof (*_broadcast_info)) != SF_TRUE) { - error << string_compose (_("cannot set broadcast info for audio file %1; Dropping broadcast info for this file"), _path) << endmsg; + if (_sndfile == 0 || !_broadcast_info->write_to_file (_sndfile)) { + error << string_compose (_("cannot set broadcast info for audio file %1 (%2); dropping broadcast info for this file"), + _path, _broadcast_info->get_error()) + << endmsg; _flags = Flag (_flags & ~Broadcast); delete _broadcast_info; _broadcast_info = 0; } } -nframes_t -SndFileSource::write_float (Sample* data, nframes_t frame_pos, nframes_t cnt) +samplecnt_t +SndFileSource::write_float (Sample* data, samplepos_t sample_pos, samplecnt_t cnt) { - if (sf_seek (sf, frame_pos, SEEK_SET|SFM_WRITE) < 0) { + if ((_info.format & SF_FORMAT_TYPEMASK ) == SF_FORMAT_FLAC) { + assert (_length == sample_pos); + } + else if (_sndfile == 0 || sf_seek (_sndfile, sample_pos, SEEK_SET|SFM_WRITE) < 0) { char errbuf[256]; sf_error_str (0, errbuf, sizeof (errbuf) - 1); - error << string_compose (_("%1: cannot seek to %2 (libsndfile error: %3"), _path, frame_pos, errbuf) << endmsg; + error << string_compose (_("%1: cannot seek to %2 (libsndfile error: %3)"), _path, sample_pos, errbuf) << endmsg; return 0; } - - if (sf_writef_float (sf, data, cnt) != (ssize_t) cnt) { + + if (sf_writef_float (_sndfile, data, cnt) != (ssize_t) cnt) { return 0; } - + return cnt; } -nframes_t +samplepos_t SndFileSource::natural_position() const { - return timeline_position; -} - -bool -SndFileSource::set_destructive (bool yn) -{ - if (yn) { - _flags = Flag (_flags | Destructive); - if (!xfade_buf) { - xfade_buf = new Sample[xfade_frames]; - } - clear_capture_marks (); - timeline_position = header_position_offset; - } else { - _flags = Flag (_flags & ~Destructive); - timeline_position = 0; - /* leave xfade buf alone in case we need it again later */ - } - - return true; + return _timeline_position; } void @@ -635,17 +857,18 @@ SndFileSource::clear_capture_marks () { _capture_start = false; _capture_end = false; -} +} +/** @param pos Capture start position in session samples */ void -SndFileSource::mark_capture_start (nframes_t pos) +SndFileSource::mark_capture_start (samplepos_t pos) { if (destructive()) { - if (pos < timeline_position) { + if (pos < _timeline_position) { _capture_start = false; } else { _capture_start = true; - capture_start_frame = pos; + capture_start_sample = pos; } } } @@ -658,15 +881,15 @@ SndFileSource::mark_capture_end() } } -nframes_t -SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) +samplecnt_t +SndFileSource::crossfade (Sample* data, samplecnt_t cnt, int fade_in) { - nframes_t xfade = min (xfade_frames, cnt); - nframes_t nofade = cnt - xfade; + samplecnt_t xfade = min (xfade_samples, cnt); + samplecnt_t nofade = cnt - xfade; Sample* fade_data = 0; - nframes_t fade_position = 0; // in frames + samplepos_t fade_position = 0; // in samples ssize_t retval; - nframes_t file_cnt; + samplecnt_t file_cnt; if (fade_in) { fade_position = file_pos; @@ -677,26 +900,26 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) } if (fade_position > _length) { - + /* read starts beyond end of data, just memset to zero */ - + file_cnt = 0; } else if (fade_position + xfade > _length) { - + /* read ends beyond end of data, read some, memset the rest */ - + file_cnt = _length - fade_position; } else { - + /* read is entirely within data */ file_cnt = xfade; } if (file_cnt) { - + if ((retval = read_unlocked (xfade_buf, fade_position, file_cnt)) != (ssize_t) file_cnt) { if (retval >= 0 && errno == EAGAIN) { /* XXX - can we really trust that errno is meaningful here? yes POSIX, i'm talking to you. @@ -707,13 +930,13 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) return 0; } } - } + } if (file_cnt != xfade) { - nframes_t delta = xfade - file_cnt; + samplecnt_t delta = xfade - file_cnt; memset (xfade_buf+file_cnt, 0, sizeof (Sample) * delta); } - + if (nofade && !fade_in) { if (write_float (data, file_pos, nofade) != nofade) { error << string_compose(_("SndFileSource: \"%1\" bad write (%2)"), _path, strerror (errno)) << endmsg; @@ -721,16 +944,16 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) } } - if (xfade == xfade_frames) { + if (xfade == xfade_samples) { - nframes_t n; + samplecnt_t n; /* use the standard xfade curve */ - + if (fade_in) { /* fade new material in */ - + for (n = 0; n < xfade; ++n) { xfade_buf[n] = (xfade_buf[n] * out_coefficient[n]) + (fade_data[n] * in_coefficient[n]); } @@ -739,23 +962,23 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) /* fade new material out */ - + for (n = 0; n < xfade; ++n) { xfade_buf[n] = (xfade_buf[n] * in_coefficient[n]) + (fade_data[n] * out_coefficient[n]); } } - } else if (xfade < xfade_frames) { + } else if (xfade < xfade_samples) { - gain_t in[xfade]; - gain_t out[xfade]; + std::vector in(xfade); + std::vector out(xfade); /* short xfade, compute custom curve */ - compute_equal_power_fades (xfade, in, out); + compute_equal_power_fades (xfade, &in[0], &out[0]); - for (nframes_t n = 0; n < xfade; ++n) { - xfade_buf[n] = (xfade_buf[n] * out[n]) + (fade_data[n] * in[n]); + for (samplecnt_t n = 0; n < xfade; ++n) { + xfade_buf[n] = (xfade_buf[n] * out[n]) + (fade_data[n] * in[n]); } } else if (xfade) { @@ -770,7 +993,7 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) return 0; } } - + if (fade_in && nofade) { if (write_float (data + xfade, file_pos + xfade, nofade) != nofade) { error << string_compose(_("SndFileSource: \"%1\" bad write (%2)"), _path, strerror (errno)) << endmsg; @@ -781,11 +1004,11 @@ SndFileSource::crossfade (Sample* data, nframes_t cnt, int fade_in) return cnt; } -nframes_t -SndFileSource::last_capture_start_frame () const +samplepos_t +SndFileSource::last_capture_start_sample () const { if (destructive()) { - return capture_start_frame; + return capture_start_sample; } else { return 0; } @@ -799,59 +1022,68 @@ SndFileSource::handle_header_position_change () error << string_compose(_("Filesource: start time is already set for existing file (%1): Cannot change start time."), _path ) << endmsg; //in the future, pop up a dialog here that allows user to regenerate file with new start offset } else if (writable()) { - timeline_position = header_position_offset; + _timeline_position = header_position_offset; set_header_timeline_position (); //this will get flushed if/when the file is recorded to } } } void -SndFileSource::setup_standard_crossfades (nframes_t rate) +SndFileSource::setup_standard_crossfades (Session const & s, samplecnt_t rate) { /* This static method is assumed to have been called by the Session before any DFS's are created. */ - xfade_frames = (nframes_t) floor ((Config->get_destructive_xfade_msecs () / 1000.0) * rate); + xfade_samples = (samplecnt_t) floor ((s.config.get_destructive_xfade_msecs () / 1000.0) * rate); - if (out_coefficient) { - delete [] out_coefficient; - } - - if (in_coefficient) { - delete [] in_coefficient; - } + delete [] out_coefficient; + delete [] in_coefficient; - out_coefficient = new gain_t[xfade_frames]; - in_coefficient = new gain_t[xfade_frames]; + out_coefficient = new gain_t[xfade_samples]; + in_coefficient = new gain_t[xfade_samples]; - compute_equal_power_fades (xfade_frames, in_coefficient, out_coefficient); + compute_equal_power_fades (xfade_samples, in_coefficient, out_coefficient); } void -SndFileSource::set_timeline_position (int64_t pos) +SndFileSource::set_timeline_position (samplepos_t pos) { // destructive track timeline postion does not change - // except at instantion or when header_position_offset + // except at instantion or when header_position_offset // (session start) changes if (!destructive()) { AudioFileSource::set_timeline_position (pos); - } + } } int -SndFileSource::get_soundfile_info (string path, SoundFileInfo& info, string& error_msg) +SndFileSource::get_soundfile_info (const string& path, SoundFileInfo& info, string& error_msg) { SNDFILE *sf; SF_INFO sf_info; - SF_BROADCAST_INFO binfo; - bool timecode_exists; + BroadcastInfo binfo; sf_info.format = 0; // libsndfile says to clear this before sf_open(). - if ((sf = sf_open ((char*) path.c_str(), SFM_READ, &sf_info)) == 0) { - char errbuf[256]; + if (path.empty() || Glib::file_test(path, Glib::FILE_TEST_IS_DIR)) { + return false; + } + +#ifdef PLATFORM_WINDOWS + int fd = g_open (path.c_str(), O_RDONLY, 0444); +#else + int fd = ::open (path.c_str(), O_RDONLY, 0444); +#endif + + if (fd == -1) { + error << string_compose ( _("SndFileSource: cannot open file \"%1\" for reading"), path) + << endmsg; + return false; + } + if ((sf = sf_open_fd (fd, SFM_READ, &sf_info, true)) == 0) { + char errbuf[1024]; error_msg = sf_error_str (0, errbuf, sizeof (errbuf) - 1); return false; } @@ -859,37 +1091,53 @@ SndFileSource::get_soundfile_info (string path, SoundFileInfo& info, string& err info.samplerate = sf_info.samplerate; info.channels = sf_info.channels; info.length = sf_info.frames; - info.format_name = string_compose("Format: %1, %2", - sndfile_major_format(sf_info.format), - sndfile_minor_format(sf_info.format)); - memset (&binfo, 0, sizeof (binfo)); - info.timecode = get_timecode_info (sf, &binfo, timecode_exists); + string major = sndfile_major_format(sf_info.format); + string minor = sndfile_minor_format(sf_info.format); + + if (major.length() + minor.length() < 16) { /* arbitrary */ + info.format_name = string_compose("%1/%2", major, minor); + } else { + info.format_name = string_compose("%1\n%2", major, minor); + } + + info.timecode = binfo.load_from_file (sf) ? binfo.get_time_reference() : 0; - if (!timecode_exists) { - info.timecode = 0; - } - sf_close (sf); return true; } -int64_t -SndFileSource::get_timecode_info (SNDFILE* sf, SF_BROADCAST_INFO* binfo, bool& exists) +bool +SndFileSource::one_of_several_channels () const { - if (sf_command (sf, SFC_GET_BROADCAST_INFO, binfo, sizeof (*binfo)) != SF_TRUE) { - exists = false; - return (header_position_offset); - } - - /* XXX 64 bit alert: when JACK switches to a 64 bit frame count, this needs to use the high bits - of the time reference. + return _info.channels > 1; +} + +bool +SndFileSource::clamped_at_unity () const +{ + int const type = _info.format & SF_FORMAT_TYPEMASK; + int const sub = _info.format & SF_FORMAT_SUBMASK; + /* XXX: this may not be the full list of formats that are unclamped */ + return (sub != SF_FORMAT_FLOAT && sub != SF_FORMAT_DOUBLE && type != SF_FORMAT_OGG); +} + +void +SndFileSource::file_closed () +{ + /* stupid libsndfile updated the headers on close, + so touch the peakfile if it exists and has data + to make sure its time is as new as the audio + file. */ - - exists = true; - int64_t ret = (uint32_t) binfo->time_reference_high; - ret <<= 32; - ret |= (uint32_t) binfo->time_reference_low; - return ret; + + touch_peakfile (); } + +void +SndFileSource::set_path (const string& p) +{ + FileSource::set_path (p); +} +