--- libgig/trunk/src/RIFF.cpp 2003/12/26 16:15:31 24 +++ libgig/trunk/src/RIFF.cpp 2015/01/13 15:28:37 2703 @@ -1,9 +1,9 @@ /*************************************************************************** * * - * libgig - C++ cross-platform Gigasampler format file loader library * + * libgig - C++ cross-platform Gigasampler format file access library * * * - * Copyright (C) 2003 by Christian Schoenebeck * - * * + * Copyright (C) 2003-2015 by Christian Schoenebeck * + * * * * * This library is free software; you can redistribute it and/or modify * * it under the terms of the GNU General Public License as published by * @@ -20,41 +20,98 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * * MA 02111-1307 USA * ***************************************************************************/ -#if 1 + +#include +#include +#include + #include "RIFF.h" +#include "helper.h" + +#if POSIX +# include +#endif + namespace RIFF { +// *************** Internal functions ************** +// * + + /// Returns a human readable path of the given chunk. + static String __resolveChunkPath(Chunk* pCk) { + String sPath; + for (Chunk* pChunk = pCk; pChunk; pChunk = pChunk->GetParent()) { + if (pChunk->GetChunkID() == CHUNK_ID_LIST) { + List* pList = (List*) pChunk; + sPath = "->'" + pList->GetListTypeString() + "'" + sPath; + } else { + sPath = "->'" + pChunk->GetChunkIDString() + "'" + sPath; + } + } + return sPath; + } + + + +// *************** progress_t *************** +// * + + progress_t::progress_t() { + callback = NULL; + custom = NULL; + __range_min = 0.0f; + __range_max = 1.0f; + } + + + // *************** Chunk ************** // * - Chunk::Chunk() { + Chunk::Chunk(File* pFile) { #if DEBUG - std::cout << "Chunk::Chunk()" << std::endl; + std::cout << "Chunk::Chunk(File* pFile)" << std::endl; #endif // DEBUG ulPos = 0; pParent = NULL; pChunkData = NULL; + CurrentChunkSize = 0; + NewChunkSize = 0; + ulChunkDataSize = 0; + ChunkID = CHUNK_ID_RIFF; + this->pFile = pFile; } - #if POSIX - Chunk::Chunk(int hFile, unsigned long StartPos, bool EndianNative, List* Parent) { - #else - Chunk::Chunk(FILE* hFile, unsigned long StartPos, bool EndianNative, List* Parent) { - #endif // POSIX + Chunk::Chunk(File* pFile, unsigned long StartPos, List* Parent) { #if DEBUG - std::cout << "Chunk::Chunk(FILE,ulong,bool,List*),StartPos=" << StartPos << std::endl; + std::cout << "Chunk::Chunk(File*,ulong,bool,List*),StartPos=" << StartPos << std::endl; #endif // DEBUG - Chunk::hFile = hFile; + this->pFile = pFile; ulStartPos = StartPos + CHUNK_HEADER_SIZE; - bEndianNative = EndianNative; pParent = Parent; ulPos = 0; pChunkData = NULL; + CurrentChunkSize = 0; + NewChunkSize = 0; + ulChunkDataSize = 0; ReadHeader(StartPos); } + Chunk::Chunk(File* pFile, List* pParent, uint32_t uiChunkID, uint uiBodySize) { + this->pFile = pFile; + ulStartPos = 0; // arbitrary usually, since it will be updated when we write the chunk + this->pParent = pParent; + ulPos = 0; + pChunkData = NULL; + ChunkID = uiChunkID; + ulChunkDataSize = 0; + CurrentChunkSize = 0; + NewChunkSize = uiBodySize; + } + Chunk::~Chunk() { + if (pFile) pFile->UnlogResized(this); if (pChunkData) delete[] pChunkData; } @@ -62,35 +119,77 @@ #if DEBUG std::cout << "Chunk::Readheader(" << fPos << ") "; #endif // DEBUG + ChunkID = 0; + NewChunkSize = CurrentChunkSize = 0; #if POSIX - if (lseek(hFile, fPos, SEEK_SET) != -1) { - read(hFile, &ChunkID, 4); - read(hFile, &ChunkSize, 4); - #else - if (!fseek(hFile, fPos, SEEK_SET)) { - fread(&ChunkID, 4, 1, hFile); - fread(&ChunkSize, 4, 1, hFile); + if (lseek(pFile->hFileRead, fPos, SEEK_SET) != -1) { + read(pFile->hFileRead, &ChunkID, 4); + read(pFile->hFileRead, &CurrentChunkSize, 4); + #elif defined(WIN32) + if (SetFilePointer(pFile->hFileRead, fPos, NULL/*32 bit*/, FILE_BEGIN) != INVALID_SET_FILE_POINTER) { + DWORD dwBytesRead; + ReadFile(pFile->hFileRead, &ChunkID, 4, &dwBytesRead, NULL); + ReadFile(pFile->hFileRead, &CurrentChunkSize, 4, &dwBytesRead, NULL); + #else + if (!fseek(pFile->hFileRead, fPos, SEEK_SET)) { + fread(&ChunkID, 4, 1, pFile->hFileRead); + fread(&CurrentChunkSize, 4, 1, pFile->hFileRead); #endif // POSIX #if WORDS_BIGENDIAN if (ChunkID == CHUNK_ID_RIFF) { - bEndianNative = false; + pFile->bEndianNative = false; } #else // little endian if (ChunkID == CHUNK_ID_RIFX) { - bEndianNative = false; + pFile->bEndianNative = false; ChunkID = CHUNK_ID_RIFF; } #endif // WORDS_BIGENDIAN - if (!bEndianNative) { + if (!pFile->bEndianNative) { //swapBytes_32(&ChunkID); - swapBytes_32(&ChunkSize); + swapBytes_32(&CurrentChunkSize); } #if DEBUG std::cout << "ckID=" << convertToString(ChunkID) << " "; - std::cout << "ckSize=" << ChunkSize << " "; - std::cout << "bEndianNative=" << bEndianNative << std::endl; + std::cout << "ckSize=" << CurrentChunkSize << " "; + std::cout << "bEndianNative=" << pFile->bEndianNative << std::endl; #endif // DEBUG + NewChunkSize = CurrentChunkSize; + } + } + + void Chunk::WriteHeader(unsigned long fPos) { + uint32_t uiNewChunkID = ChunkID; + if (ChunkID == CHUNK_ID_RIFF) { + #if WORDS_BIGENDIAN + if (pFile->bEndianNative) uiNewChunkID = CHUNK_ID_RIFX; + #else // little endian + if (!pFile->bEndianNative) uiNewChunkID = CHUNK_ID_RIFX; + #endif // WORDS_BIGENDIAN + } + + uint32_t uiNewChunkSize = NewChunkSize; + if (!pFile->bEndianNative) { + swapBytes_32(&uiNewChunkSize); + } + + #if POSIX + if (lseek(pFile->hFileWrite, fPos, SEEK_SET) != -1) { + write(pFile->hFileWrite, &uiNewChunkID, 4); + write(pFile->hFileWrite, &uiNewChunkSize, 4); + } + #elif defined(WIN32) + if (SetFilePointer(pFile->hFileWrite, fPos, NULL/*32 bit*/, FILE_BEGIN) != INVALID_SET_FILE_POINTER) { + DWORD dwBytesWritten; + WriteFile(pFile->hFileWrite, &uiNewChunkID, 4, &dwBytesWritten, NULL); + WriteFile(pFile->hFileWrite, &uiNewChunkSize, 4, &dwBytesWritten, NULL); } + #else + if (!fseek(pFile->hFileWrite, fPos, SEEK_SET)) { + fwrite(&uiNewChunkID, 4, 1, pFile->hFileWrite); + fwrite(&uiNewChunkSize, 4, 1, pFile->hFileWrite); + } + #endif // POSIX } /** @@ -105,6 +204,9 @@ * Sets the position within the chunk body, thus within the data portion * of the chunk (in bytes). * + * Caution: the position will be reset to zero whenever + * File::Save() was called. + * * @param Where - position offset (in bytes) * @param Whence - optional: defines to what \a Where relates to, * if omitted \a Where relates to beginning of the chunk @@ -119,7 +221,7 @@ ulPos += Where; break; case stream_end: - ulPos = ChunkSize - 1 - Where; + ulPos = CurrentChunkSize - 1 - Where; break; case stream_backward: ulPos -= Where; @@ -128,7 +230,7 @@ ulPos = Where; break; } - if (ulPos > ChunkSize) ulPos = ChunkSize; + if (ulPos > CurrentChunkSize) ulPos = CurrentChunkSize; return ulPos; } @@ -144,9 +246,9 @@ */ unsigned long Chunk::RemainingBytes() { #if DEBUG - std::cout << "Chunk::Remainingbytes()=" << ChunkSize - ulPos << std::endl; + std::cout << "Chunk::Remainingbytes()=" << CurrentChunkSize - ulPos << std::endl; #endif // DEBUG - return ChunkSize - ulPos; + return (CurrentChunkSize > ulPos) ? CurrentChunkSize - ulPos : 0; } /** @@ -157,7 +259,7 @@ * - RIFF::stream_closed : * the data stream was closed somehow, no more reading possible * - RIFF::stream_end_reached : - * alreaady reached the end of the chunk data, no more reading + * already reached the end of the chunk data, no more reading * possible without SetPos() */ stream_state_t Chunk::GetState() { @@ -165,12 +267,15 @@ std::cout << "Chunk::GetState()" << std::endl; #endif // DEBUG #if POSIX - if (hFile == 0) return stream_closed; + if (pFile->hFileRead == 0) return stream_closed; + #elif defined (WIN32) + if (pFile->hFileRead == INVALID_HANDLE_VALUE) + return stream_closed; #else - if (hFile == NULL) return stream_closed; + if (pFile->hFileRead == NULL) return stream_closed; #endif // POSIX - if (ulPos < ChunkSize) return stream_ready; - else return stream_end_reached; + if (ulPos < CurrentChunkSize) return stream_ready; + else return stream_end_reached; } /** @@ -192,18 +297,30 @@ #if DEBUG std::cout << "Chunk::Read(void*,ulong,ulong)" << std::endl; #endif // DEBUG - if (ulPos >= ChunkSize) return 0; - if (ulPos + WordCount * WordSize >= ChunkSize) WordCount = (ChunkSize - ulPos) / WordSize; + //if (ulStartPos == 0) return 0; // is only 0 if this is a new chunk, so nothing to read (yet) + if (ulPos >= CurrentChunkSize) return 0; + if (ulPos + WordCount * WordSize >= CurrentChunkSize) WordCount = (CurrentChunkSize - ulPos) / WordSize; #if POSIX - if (lseek(hFile, ulStartPos + ulPos, SEEK_SET) < 0) return 0; - unsigned long readWords = read(hFile, pData, WordCount * WordSize); + if (lseek(pFile->hFileRead, ulStartPos + ulPos, SEEK_SET) < 0) return 0; + ssize_t readWords = read(pFile->hFileRead, pData, WordCount * WordSize); + if (readWords < 1) { + #if DEBUG + std::cerr << "POSIX read() failed: " << strerror(errno) << std::endl << std::flush; + #endif // DEBUG + return 0; + } + readWords /= WordSize; + #elif defined(WIN32) + if (SetFilePointer(pFile->hFileRead, ulStartPos + ulPos, NULL/*32 bit*/, FILE_BEGIN) == INVALID_SET_FILE_POINTER) return 0; + DWORD readWords; + ReadFile(pFile->hFileRead, pData, WordCount * WordSize, &readWords, NULL); if (readWords < 1) return 0; readWords /= WordSize; #else // standard C functions - if (fseek(hFile, ulStartPos + ulPos, SEEK_SET)) return 0; - unsigned long readWords = fread(pData, WordSize, WordCount, hFile); + if (fseek(pFile->hFileRead, ulStartPos + ulPos, SEEK_SET)) return 0; + size_t readWords = fread(pData, WordSize, WordCount, pFile->hFileRead); #endif // POSIX - if (!bEndianNative && WordSize != 1) { + if (!pFile->bEndianNative && WordSize != 1) { switch (WordSize) { case 2: for (unsigned long iWord = 0; iWord < readWords; iWord++) @@ -223,6 +340,71 @@ return readWords; } + /** + * Writes \a WordCount number of data words with given \a WordSize from + * the buffer pointed by \a pData. Be sure to provide the correct + * \a WordSize, as this will be important and taken into account for + * eventual endian correction (swapping of bytes due to different + * native byte order of a system). The position within the chunk will + * automatically be incremented. + * + * @param pData source buffer (containing the data) + * @param WordCount number of data words to write + * @param WordSize size of each data word to write + * @returns number of successfully written data words + * @throws RIFF::Exception if write operation would exceed current + * chunk size or any IO error occured + * @see Resize() + */ + unsigned long Chunk::Write(void* pData, unsigned long WordCount, unsigned long WordSize) { + if (pFile->Mode != stream_mode_read_write) + throw Exception("Cannot write data to chunk, file has to be opened in read+write mode first"); + if (ulPos >= CurrentChunkSize || ulPos + WordCount * WordSize > CurrentChunkSize) + throw Exception("End of chunk reached while trying to write data"); + if (!pFile->bEndianNative && WordSize != 1) { + switch (WordSize) { + case 2: + for (unsigned long iWord = 0; iWord < WordCount; iWord++) + swapBytes_16((uint16_t*) pData + iWord); + break; + case 4: + for (unsigned long iWord = 0; iWord < WordCount; iWord++) + swapBytes_32((uint32_t*) pData + iWord); + break; + default: + for (unsigned long iWord = 0; iWord < WordCount; iWord++) + swapBytes((uint8_t*) pData + iWord * WordSize, WordSize); + break; + } + } + #if POSIX + if (lseek(pFile->hFileWrite, ulStartPos + ulPos, SEEK_SET) < 0) { + throw Exception("Could not seek to position " + ToString(ulPos) + + " in chunk (" + ToString(ulStartPos + ulPos) + " in file)"); + } + unsigned long writtenWords = write(pFile->hFileWrite, pData, WordCount * WordSize); + if (writtenWords < 1) throw Exception("POSIX IO Error while trying to write chunk data"); + writtenWords /= WordSize; + #elif defined(WIN32) + if (SetFilePointer(pFile->hFileWrite, ulStartPos + ulPos, NULL/*32 bit*/, FILE_BEGIN) == INVALID_SET_FILE_POINTER) { + throw Exception("Could not seek to position " + ToString(ulPos) + + " in chunk (" + ToString(ulStartPos + ulPos) + " in file)"); + } + DWORD writtenWords; + WriteFile(pFile->hFileWrite, pData, WordCount * WordSize, &writtenWords, NULL); + if (writtenWords < 1) throw Exception("Windows IO Error while trying to write chunk data"); + writtenWords /= WordSize; + #else // standard C functions + if (fseek(pFile->hFileWrite, ulStartPos + ulPos, SEEK_SET)) { + throw Exception("Could not seek to position " + ToString(ulPos) + + " in chunk (" + ToString(ulStartPos + ulPos) + " in file)"); + } + unsigned long writtenWords = fwrite(pData, WordSize, WordCount, pFile->hFileWrite); + #endif // POSIX + SetPos(writtenWords * WordSize, stream_curpos); + return writtenWords; + } + /** Just an internal wrapper for the main Read() method with additional Exception throwing on errors. */ unsigned long Chunk::ReadSceptical(void* pData, unsigned long WordCount, unsigned long WordSize) { unsigned long readWords = Read(pData, WordCount, WordSize); @@ -249,6 +431,24 @@ } /** + * Writes \a WordCount number of 8 Bit signed integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 8 Bit signed integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteInt8(int8_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 1); + } + + /** * Reads \a WordCount number of 8 Bit unsigned integer words and copies * it into the buffer pointed by \a pData. The buffer has to be * allocated. The position within the chunk will automatically be @@ -268,6 +468,24 @@ } /** + * Writes \a WordCount number of 8 Bit unsigned integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 8 Bit unsigned integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteUint8(uint8_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 1); + } + + /** * Reads \a WordCount number of 16 Bit signed integer words and copies * it into the buffer pointed by \a pData. The buffer has to be * allocated. Endian correction will automatically be done if needed. @@ -287,6 +505,24 @@ } /** + * Writes \a WordCount number of 16 Bit signed integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 16 Bit signed integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteInt16(int16_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 2); + } + + /** * Reads \a WordCount number of 16 Bit unsigned integer words and copies * it into the buffer pointed by \a pData. The buffer has to be * allocated. Endian correction will automatically be done if needed. @@ -306,6 +542,24 @@ } /** + * Writes \a WordCount number of 16 Bit unsigned integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 16 Bit unsigned integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteUint16(uint16_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 2); + } + + /** * Reads \a WordCount number of 32 Bit signed integer words and copies * it into the buffer pointed by \a pData. The buffer has to be * allocated. Endian correction will automatically be done if needed. @@ -325,6 +579,24 @@ } /** + * Writes \a WordCount number of 32 Bit signed integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 32 Bit signed integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteInt32(int32_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 4); + } + + /** * Reads \a WordCount number of 32 Bit unsigned integer words and copies * it into the buffer pointed by \a pData. The buffer has to be * allocated. Endian correction will automatically be done if needed. @@ -344,6 +616,41 @@ } /** + * Reads a null-padded string of size characters and copies it + * into the string \a s. The position within the chunk will + * automatically be incremented. + * + * @param s destination string + * @param size number of characters to read + * @throws RIFF::Exception if an error occured or less than + * \a size characters could be read! + */ + void Chunk::ReadString(String& s, int size) { + char* buf = new char[size]; + ReadSceptical(buf, 1, size); + s.assign(buf, std::find(buf, buf + size, '\0')); + delete[] buf; + } + + /** + * Writes \a WordCount number of 32 Bit unsigned integer words from the + * buffer pointed by \a pData to the chunk's body, directly to the + * actual "physical" file. The position within the chunk will + * automatically be incremented. Note: you cannot write beyond the + * boundaries of the chunk, to append data to the chunk call Resize() + * before. + * + * @param pData source buffer (containing the data) + * @param WordCount number of 32 Bit unsigned integers to write + * @returns number of written integers + * @throws RIFF::Exception if an IO error occured + * @see Resize() + */ + unsigned long Chunk::WriteUint32(uint32_t* pData, unsigned long WordCount) { + return Write(pData, WordCount, 4); + } + + /** * Reads one 8 Bit signed integer word and increments the position within * the chunk. * @@ -443,27 +750,71 @@ return word; } + /** @brief Load chunk body into RAM. + * + * Loads the whole chunk body into memory. You can modify the data in + * RAM and save the data by calling File::Save() afterwards. + * + * Caution: the buffer pointer will be invalidated once + * File::Save() was called. You have to call LoadChunkData() again to + * get a new, valid pointer whenever File::Save() was called. + * + * You can call LoadChunkData() again if you previously scheduled to + * enlarge this chunk with a Resize() call. In that case the buffer will + * be enlarged to the new, scheduled chunk size and you can already + * place the new chunk data to the buffer and finally call File::Save() + * to enlarge the chunk physically and write the new data in one rush. + * This approach is definitely recommended if you have to enlarge and + * write new data to a lot of chunks. + * + * @returns a pointer to the data in RAM on success, NULL otherwise + * @throws Exception if data buffer could not be enlarged + * @see ReleaseChunkData() + */ void* Chunk::LoadChunkData() { - if (!pChunkData) { + if (!pChunkData && pFile->Filename != "" /*&& ulStartPos != 0*/) { #if POSIX - if (lseek(hFile, ulStartPos, SEEK_SET) == -1) return NULL; - pChunkData = new uint8_t[GetSize()]; - if (!pChunkData) return NULL; - unsigned long readWords = read(hFile, pChunkData, GetSize()); + if (lseek(pFile->hFileRead, ulStartPos, SEEK_SET) == -1) return NULL; + #elif defined(WIN32) + if (SetFilePointer(pFile->hFileRead, ulStartPos, NULL/*32 bit*/, FILE_BEGIN) == INVALID_SET_FILE_POINTER) return NULL; #else - if (fseek(hFile, ulStartPos, SEEK_SET)) return NULL; - pChunkData = new uint8_t[GetSize()]; + if (fseek(pFile->hFileRead, ulStartPos, SEEK_SET)) return NULL; + #endif // POSIX + unsigned long ulBufferSize = (CurrentChunkSize > NewChunkSize) ? CurrentChunkSize : NewChunkSize; + pChunkData = new uint8_t[ulBufferSize]; if (!pChunkData) return NULL; - unsigned long readWords = fread(pChunkData, 1, GetSize(), hFile); + memset(pChunkData, 0, ulBufferSize); + #if POSIX + unsigned long readWords = read(pFile->hFileRead, pChunkData, GetSize()); + #elif defined(WIN32) + DWORD readWords; + ReadFile(pFile->hFileRead, pChunkData, GetSize(), &readWords, NULL); + #else + unsigned long readWords = fread(pChunkData, 1, GetSize(), pFile->hFileRead); #endif // POSIX if (readWords != GetSize()) { delete[] pChunkData; return (pChunkData = NULL); } + ulChunkDataSize = ulBufferSize; + } else if (NewChunkSize > ulChunkDataSize) { + uint8_t* pNewBuffer = new uint8_t[NewChunkSize]; + if (!pNewBuffer) throw Exception("Could not enlarge chunk data buffer to " + ToString(NewChunkSize) + " bytes"); + memset(pNewBuffer, 0 , NewChunkSize); + memcpy(pNewBuffer, pChunkData, ulChunkDataSize); + delete[] pChunkData; + pChunkData = pNewBuffer; + ulChunkDataSize = NewChunkSize; } return pChunkData; } + /** @brief Free loaded chunk body from RAM. + * + * Frees loaded chunk body data from memory (RAM). You should call + * File::Save() before calling this method if you modified the data to + * make the changes persistent. + */ void Chunk::ReleaseChunkData() { if (pChunkData) { delete[] pChunkData; @@ -471,27 +822,158 @@ } } + /** @brief Resize chunk. + * + * Resizes this chunk's body, that is the actual size of data possible + * to be written to this chunk. This call will return immediately and + * just schedule the resize operation. You should call File::Save() to + * actually perform the resize operation(s) "physically" to the file. + * As this can take a while on large files, it is recommended to call + * Resize() first on all chunks which have to be resized and finally to + * call File::Save() to perform all those resize operations in one rush. + * + * Caution: You cannot directly write to enlarged chunks before + * calling File::Save() as this might exceed the current chunk's body + * boundary! + * + * @param iNewSize - new chunk body size in bytes (must be greater than zero) + * @throws RIFF::Exception if \a iNewSize is less than 1 + * @see File::Save() + */ + void Chunk::Resize(int iNewSize) { + if (iNewSize <= 0) + throw Exception("There is at least one empty chunk (zero size): " + __resolveChunkPath(this)); + if (NewChunkSize == iNewSize) return; + NewChunkSize = iNewSize; + pFile->LogAsResized(this); + } + + /** @brief Write chunk persistently e.g. to disk. + * + * Stores the chunk persistently to its actual "physical" file. + * + * @param ulWritePos - position within the "physical" file where this + * chunk should be written to + * @param ulCurrentDataOffset - offset of current (old) data within + * the file + * @param pProgress - optional: callback function for progress notification + * @returns new write position in the "physical" file, that is + * \a ulWritePos incremented by this chunk's new size + * (including its header size of course) + */ + unsigned long Chunk::WriteChunk(unsigned long ulWritePos, unsigned long ulCurrentDataOffset, progress_t* pProgress) { + const unsigned long ulOriginalPos = ulWritePos; + ulWritePos += CHUNK_HEADER_SIZE; + + if (pFile->Mode != stream_mode_read_write) + throw Exception("Cannot write list chunk, file has to be opened in read+write mode"); + + // if the whole chunk body was loaded into RAM + if (pChunkData) { + // make sure chunk data buffer in RAM is at least as large as the new chunk size + LoadChunkData(); + // write chunk data from RAM persistently to the file + #if POSIX + lseek(pFile->hFileWrite, ulWritePos, SEEK_SET); + if (write(pFile->hFileWrite, pChunkData, NewChunkSize) != NewChunkSize) { + throw Exception("Writing Chunk data (from RAM) failed"); + } + #elif defined(WIN32) + SetFilePointer(pFile->hFileWrite, ulWritePos, NULL/*32 bit*/, FILE_BEGIN); + DWORD dwBytesWritten; + WriteFile(pFile->hFileWrite, pChunkData, NewChunkSize, &dwBytesWritten, NULL); + if (dwBytesWritten != NewChunkSize) { + throw Exception("Writing Chunk data (from RAM) failed"); + } + #else + fseek(pFile->hFileWrite, ulWritePos, SEEK_SET); + if (fwrite(pChunkData, 1, NewChunkSize, pFile->hFileWrite) != NewChunkSize) { + throw Exception("Writing Chunk data (from RAM) failed"); + } + #endif // POSIX + } else { + // move chunk data from the end of the file to the appropriate position + int8_t* pCopyBuffer = new int8_t[4096]; + unsigned long ulToMove = (NewChunkSize < CurrentChunkSize) ? NewChunkSize : CurrentChunkSize; + #if defined(WIN32) + DWORD iBytesMoved = 1; // we have to pass it via pointer to the Windows API, thus the correct size must be ensured + #else + int iBytesMoved = 1; + #endif + for (unsigned long ulOffset = 0; ulToMove > 0 && iBytesMoved > 0; ulOffset += iBytesMoved, ulToMove -= iBytesMoved) { + iBytesMoved = (ulToMove < 4096) ? ulToMove : 4096; + #if POSIX + lseek(pFile->hFileRead, ulStartPos + ulCurrentDataOffset + ulOffset, SEEK_SET); + iBytesMoved = read(pFile->hFileRead, pCopyBuffer, iBytesMoved); + lseek(pFile->hFileWrite, ulWritePos + ulOffset, SEEK_SET); + iBytesMoved = write(pFile->hFileWrite, pCopyBuffer, iBytesMoved); + #elif defined(WIN32) + SetFilePointer(pFile->hFileRead, ulStartPos + ulCurrentDataOffset + ulOffset, NULL/*32 bit*/, FILE_BEGIN); + ReadFile(pFile->hFileRead, pCopyBuffer, iBytesMoved, &iBytesMoved, NULL); + SetFilePointer(pFile->hFileWrite, ulWritePos + ulOffset, NULL/*32 bit*/, FILE_BEGIN); + WriteFile(pFile->hFileWrite, pCopyBuffer, iBytesMoved, &iBytesMoved, NULL); + #else + fseek(pFile->hFileRead, ulStartPos + ulCurrentDataOffset + ulOffset, SEEK_SET); + iBytesMoved = fread(pCopyBuffer, 1, iBytesMoved, pFile->hFileRead); + fseek(pFile->hFileWrite, ulWritePos + ulOffset, SEEK_SET); + iBytesMoved = fwrite(pCopyBuffer, 1, iBytesMoved, pFile->hFileWrite); + #endif + } + delete[] pCopyBuffer; + if (iBytesMoved < 0) throw Exception("Writing Chunk data (from file) failed"); + } + + // update this chunk's header + CurrentChunkSize = NewChunkSize; + WriteHeader(ulOriginalPos); + + __notify_progress(pProgress, 1.0); // notify done + + // update chunk's position pointers + ulStartPos = ulOriginalPos + CHUNK_HEADER_SIZE; + ulPos = 0; + + // add pad byte if needed + if ((ulStartPos + NewChunkSize) % 2 != 0) { + const char cPadByte = 0; + #if POSIX + lseek(pFile->hFileWrite, ulStartPos + NewChunkSize, SEEK_SET); + write(pFile->hFileWrite, &cPadByte, 1); + #elif defined(WIN32) + SetFilePointer(pFile->hFileWrite, ulStartPos + NewChunkSize, NULL/*32 bit*/, FILE_BEGIN); + DWORD dwBytesWritten; + WriteFile(pFile->hFileWrite, &cPadByte, 1, &dwBytesWritten, NULL); + #else + fseek(pFile->hFileWrite, ulStartPos + NewChunkSize, SEEK_SET); + fwrite(&cPadByte, 1, 1, pFile->hFileWrite); + #endif + return ulStartPos + NewChunkSize + 1; + } + + return ulStartPos + NewChunkSize; + } + + void Chunk::__resetPos() { + ulPos = 0; + } + // *************** List *************** // * - List::List() : Chunk() { + List::List(File* pFile) : Chunk(pFile) { #if DEBUG - std::cout << "List::List()" << std::endl; + std::cout << "List::List(File* pFile)" << std::endl; #endif // DEBUG pSubChunks = NULL; pSubChunksMap = NULL; } - #if POSIX - List::List(int hFile, unsigned long StartPos, bool EndianNative, List* Parent) - #else - List::List(FILE* hFile, unsigned long StartPos, bool EndianNative, List* Parent) - #endif // POSIX - : Chunk(hFile, StartPos, EndianNative, Parent) { + List::List(File* pFile, unsigned long StartPos, List* Parent) + : Chunk(pFile, StartPos, Parent) { #if DEBUG - std::cout << "List::List(FILE*,ulong,bool,List*)" << std::endl; + std::cout << "List::List(File*,ulong,bool,List*)" << std::endl; #endif // DEBUG pSubChunks = NULL; pSubChunksMap = NULL; @@ -499,10 +981,21 @@ ulStartPos = StartPos + LIST_HEADER_SIZE; } + List::List(File* pFile, List* pParent, uint32_t uiListID) + : Chunk(pFile, pParent, CHUNK_ID_LIST, 0) { + pSubChunks = NULL; + pSubChunksMap = NULL; + ListType = uiListID; + } + List::~List() { #if DEBUG std::cout << "List::~List()" << std::endl; #endif // DEBUG + DeleteChunkList(); + } + + void List::DeleteChunkList() { if (pSubChunks) { ChunkList::iterator iter = pSubChunks->begin(); ChunkList::iterator end = pSubChunks->end(); @@ -511,8 +1004,12 @@ iter++; } delete pSubChunks; + pSubChunks = NULL; + } + if (pSubChunksMap) { + delete pSubChunksMap; + pSubChunksMap = NULL; } - if (pSubChunksMap) delete pSubChunksMap; } /** @@ -642,7 +1139,7 @@ } /** - * Returns number subchunks within the list. + * Returns number of subchunks within the list. */ unsigned int List::CountSubChunks() { if (!pSubChunks) LoadSubChunks(); @@ -693,34 +1190,186 @@ return result; } + /** @brief Creates a new sub chunk. + * + * Creates and adds a new sub chunk to this list chunk. Note that the + * chunk's body size given by \a uiBodySize must be greater than zero. + * You have to call File::Save() to make this change persistent to the + * actual file and before performing any data write operations + * on the new chunk! + * + * @param uiChunkID - chunk ID of the new chunk + * @param uiBodySize - size of the new chunk's body, that is its actual + * data size (without header) + * @throws RIFF::Exception if \a uiBodySize equals zero + */ + Chunk* List::AddSubChunk(uint32_t uiChunkID, uint uiBodySize) { + if (uiBodySize == 0) throw Exception("Chunk body size must be at least 1 byte"); + if (!pSubChunks) LoadSubChunks(); + Chunk* pNewChunk = new Chunk(pFile, this, uiChunkID, 0); + pSubChunks->push_back(pNewChunk); + (*pSubChunksMap)[uiChunkID] = pNewChunk; + pNewChunk->Resize(uiBodySize); + NewChunkSize += CHUNK_HEADER_SIZE; + pFile->LogAsResized(this); + return pNewChunk; + } + + /** @brief Moves a sub chunk witin this list. + * + * Moves a sub chunk from one position in this list to another + * position in the same list. The pSrc chunk is placed before the + * pDst chunk. + * + * @param pSrc - sub chunk to be moved + * @param pDst - the position to move to. pSrc will be placed + * before pDst. If pDst is 0, pSrc will be placed + * last in list. + */ + void List::MoveSubChunk(Chunk* pSrc, Chunk* pDst) { + if (!pSubChunks) LoadSubChunks(); + pSubChunks->remove(pSrc); + ChunkList::iterator iter = find(pSubChunks->begin(), pSubChunks->end(), pDst); + pSubChunks->insert(iter, pSrc); + } + + /** @brief Moves a sub chunk from this list to another list. + * + * Moves a sub chunk from this list list to the end of another + * list. + * + * @param pSrc - sub chunk to be moved + * @param pDst - destination list where the chunk shall be moved to + */ + void List::MoveSubChunk(Chunk* pSrc, List* pNewParent) { + if (pNewParent == this || !pNewParent) return; + if (!pSubChunks) LoadSubChunks(); + if (!pNewParent->pSubChunks) pNewParent->LoadSubChunks(); + pSubChunks->remove(pSrc); + pNewParent->pSubChunks->push_back(pSrc); + // update chunk id map of this List + if ((*pSubChunksMap)[pSrc->GetChunkID()] == pSrc) { + pSubChunksMap->erase(pSrc->GetChunkID()); + // try to find another chunk of the same chunk ID + ChunkList::iterator iter = pSubChunks->begin(); + ChunkList::iterator end = pSubChunks->end(); + for (; iter != end; ++iter) { + if ((*iter)->GetChunkID() == pSrc->GetChunkID()) { + (*pSubChunksMap)[pSrc->GetChunkID()] = *iter; + break; // we're done, stop search + } + } + } + // update chunk id map of other list + if (!(*pNewParent->pSubChunksMap)[pSrc->GetChunkID()]) + (*pNewParent->pSubChunksMap)[pSrc->GetChunkID()] = pSrc; + } + + /** @brief Creates a new list sub chunk. + * + * Creates and adds a new list sub chunk to this list chunk. Note that + * you have to add sub chunks / sub list chunks to the new created chunk + * before trying to make this change persisten to the actual + * file with File::Save()! + * + * @param uiListType - list ID of the new list chunk + */ + List* List::AddSubList(uint32_t uiListType) { + if (!pSubChunks) LoadSubChunks(); + List* pNewListChunk = new List(pFile, this, uiListType); + pSubChunks->push_back(pNewListChunk); + (*pSubChunksMap)[CHUNK_ID_LIST] = pNewListChunk; + NewChunkSize += LIST_HEADER_SIZE; + pFile->LogAsResized(this); + return pNewListChunk; + } + + /** @brief Removes a sub chunk. + * + * Removes the sub chunk given by \a pSubChunk from this list and frees + * it completely from RAM. The given chunk can either be a normal sub + * chunk or a list sub chunk. In case the given chunk is a list chunk, + * all its subchunks (if any) will be removed recursively as well. You + * should call File::Save() to make this change persistent at any time. + * + * @param pSubChunk - sub chunk or sub list chunk to be removed + */ + void List::DeleteSubChunk(Chunk* pSubChunk) { + if (!pSubChunks) LoadSubChunks(); + pSubChunks->remove(pSubChunk); + if ((*pSubChunksMap)[pSubChunk->GetChunkID()] == pSubChunk) { + pSubChunksMap->erase(pSubChunk->GetChunkID()); + // try to find another chunk of the same chunk ID + ChunkList::iterator iter = pSubChunks->begin(); + ChunkList::iterator end = pSubChunks->end(); + for (; iter != end; ++iter) { + if ((*iter)->GetChunkID() == pSubChunk->GetChunkID()) { + (*pSubChunksMap)[pSubChunk->GetChunkID()] = *iter; + break; // we're done, stop search + } + } + } + delete pSubChunk; + } + void List::ReadHeader(unsigned long fPos) { #if DEBUG std::cout << "List::Readheader(ulong) "; #endif // DEBUG Chunk::ReadHeader(fPos); - ChunkSize -= 4; + if (CurrentChunkSize < 4) return; + NewChunkSize = CurrentChunkSize -= 4; #if POSIX - lseek(hFile, fPos + CHUNK_HEADER_SIZE, SEEK_SET); - read(hFile, &ListType, 4); + lseek(pFile->hFileRead, fPos + CHUNK_HEADER_SIZE, SEEK_SET); + read(pFile->hFileRead, &ListType, 4); + #elif defined(WIN32) + SetFilePointer(pFile->hFileRead, fPos + CHUNK_HEADER_SIZE, NULL/*32 bit*/, FILE_BEGIN); + DWORD dwBytesRead; + ReadFile(pFile->hFileRead, &ListType, 4, &dwBytesRead, NULL); #else - fseek(hFile, fPos + CHUNK_HEADER_SIZE, SEEK_SET); - fread(&ListType, 4, 1, hFile); + fseek(pFile->hFileRead, fPos + CHUNK_HEADER_SIZE, SEEK_SET); + fread(&ListType, 4, 1, pFile->hFileRead); #endif // POSIX #if DEBUG std::cout << "listType=" << convertToString(ListType) << std::endl; #endif // DEBUG - if (!bEndianNative) { + if (!pFile->bEndianNative) { //swapBytes_32(&ListType); } } - void List::LoadSubChunks() { + void List::WriteHeader(unsigned long fPos) { + // the four list type bytes officially belong the chunk's body in the RIFF format + NewChunkSize += 4; + Chunk::WriteHeader(fPos); + NewChunkSize -= 4; // just revert the +4 incrementation + #if POSIX + lseek(pFile->hFileWrite, fPos + CHUNK_HEADER_SIZE, SEEK_SET); + write(pFile->hFileWrite, &ListType, 4); + #elif defined(WIN32) + SetFilePointer(pFile->hFileWrite, fPos + CHUNK_HEADER_SIZE, NULL/*32 bit*/, FILE_BEGIN); + DWORD dwBytesWritten; + WriteFile(pFile->hFileWrite, &ListType, 4, &dwBytesWritten, NULL); + #else + fseek(pFile->hFileWrite, fPos + CHUNK_HEADER_SIZE, SEEK_SET); + fwrite(&ListType, 4, 1, pFile->hFileWrite); + #endif // POSIX + } + + void List::LoadSubChunks(progress_t* pProgress) { #if DEBUG std::cout << "List::LoadSubChunks()"; #endif // DEBUG if (!pSubChunks) { pSubChunks = new ChunkList(); pSubChunksMap = new ChunkMap(); + #if defined(WIN32) + if (pFile->hFileRead == INVALID_HANDLE_VALUE) return; + #else + if (!pFile->hFileRead) return; + #endif + unsigned long uiOriginalPos = GetPos(); + SetPos(0); // jump to beginning of list chunk body while (RemainingBytes() >= CHUNK_HEADER_SIZE) { Chunk* ck; uint32_t ckid; @@ -729,17 +1378,88 @@ std::cout << " ckid=" << convertToString(ckid) << std::endl; #endif // DEBUG if (ckid == CHUNK_ID_LIST) { - ck = new RIFF::List(hFile, ulStartPos + ulPos - 4, bEndianNative, this); + ck = new RIFF::List(pFile, ulStartPos + ulPos - 4, this); SetPos(ck->GetSize() + LIST_HEADER_SIZE - 4, RIFF::stream_curpos); } else { // simple chunk - ck = new RIFF::Chunk(hFile, ulStartPos + ulPos - 4, bEndianNative, this); + ck = new RIFF::Chunk(pFile, ulStartPos + ulPos - 4, this); SetPos(ck->GetSize() + CHUNK_HEADER_SIZE - 4, RIFF::stream_curpos); } pSubChunks->push_back(ck); (*pSubChunksMap)[ckid] = ck; if (GetPos() % 2 != 0) SetPos(1, RIFF::stream_curpos); // jump over pad byte } + SetPos(uiOriginalPos); // restore position before this call + } + __notify_progress(pProgress, 1.0); // notify done + } + + void List::LoadSubChunksRecursively(progress_t* pProgress) { + const int n = CountSubLists(); + int i = 0; + for (List* pList = GetFirstSubList(); pList; pList = GetNextSubList(), ++i) { + // divide local progress into subprogress + progress_t subprogress; + __divide_progress(pProgress, &subprogress, n, i); + // do the actual work + pList->LoadSubChunksRecursively(&subprogress); + } + __notify_progress(pProgress, 1.0); // notify done + } + + /** @brief Write list chunk persistently e.g. to disk. + * + * Stores the list chunk persistently to its actual "physical" file. All + * subchunks (including sub list chunks) will be stored recursively as + * well. + * + * @param ulWritePos - position within the "physical" file where this + * list chunk should be written to + * @param ulCurrentDataOffset - offset of current (old) data within + * the file + * @param pProgress - optional: callback function for progress notification + * @returns new write position in the "physical" file, that is + * \a ulWritePos incremented by this list chunk's new size + * (including its header size of course) + */ + unsigned long List::WriteChunk(unsigned long ulWritePos, unsigned long ulCurrentDataOffset, progress_t* pProgress) { + const unsigned long ulOriginalPos = ulWritePos; + ulWritePos += LIST_HEADER_SIZE; + + if (pFile->Mode != stream_mode_read_write) + throw Exception("Cannot write list chunk, file has to be opened in read+write mode"); + + // write all subchunks (including sub list chunks) recursively + if (pSubChunks) { + int i = 0; + const int n = pSubChunks->size(); + for (ChunkList::iterator iter = pSubChunks->begin(), end = pSubChunks->end(); iter != end; ++iter, ++i) { + // divide local progress into subprogress for loading current Instrument + progress_t subprogress; + __divide_progress(pProgress, &subprogress, n, i); + // do the actual work + ulWritePos = (*iter)->WriteChunk(ulWritePos, ulCurrentDataOffset, &subprogress); + } + } + + // update this list chunk's header + CurrentChunkSize = NewChunkSize = ulWritePos - ulOriginalPos - LIST_HEADER_SIZE; + WriteHeader(ulOriginalPos); + + // offset of this list chunk in new written file may have changed + ulStartPos = ulOriginalPos + LIST_HEADER_SIZE; + + __notify_progress(pProgress, 1.0); // notify done + + return ulWritePos; + } + + void List::__resetPos() { + Chunk::__resetPos(); + if (pSubChunks) { + for (ChunkList::iterator iter = pSubChunks->begin(), end = pSubChunks->end(); iter != end; ++iter) { + (*iter)->__resetPos(); + } } } @@ -755,53 +1475,589 @@ // *************** File *************** // * - File::File(const String& path) : List() { - #if DEBUG - std::cout << "File::File("<::const_iterator iter = ResizedChunks.begin(), end = ResizedChunks.end(); iter != end; ++iter) { + if ((*iter)->GetNewSize() == 0) { + throw Exception("There is at least one empty chunk (zero size): " + __resolveChunkPath(*iter)); + } + unsigned long newSizePadded = (*iter)->GetNewSize() + (*iter)->GetNewSize() % 2; + unsigned long oldSizePadded = (*iter)->GetSize() + (*iter)->GetSize() % 2; + if (newSizePadded > oldSizePadded) ulPositiveSizeDiff += newSizePadded - oldSizePadded; + } + + unsigned long ulWorkingFileSize = GetFileSize(); + + // if there are positive size changes... + if (ulPositiveSizeDiff > 0) { + // divide progress into subprogress + progress_t subprogress; + __divide_progress(pProgress, &subprogress, 3.f, 1.f); // arbitrarily subdivided into 1/3 of total progress + + // ... we enlarge this file first ... + ulWorkingFileSize += ulPositiveSizeDiff; + ResizeFile(ulWorkingFileSize); + // ... and move current data by the same amount towards end of file. + int8_t* pCopyBuffer = new int8_t[4096]; + const unsigned long ulFileSize = GetSize() + RIFF_HEADER_SIZE; + #if defined(WIN32) + DWORD iBytesMoved = 1; // we have to pass it via pointer to the Windows API, thus the correct size must be ensured + #else + int iBytesMoved = 1; + #endif + for (unsigned long ulPos = ulFileSize, iNotif = 0; iBytesMoved > 0; ++iNotif) { + iBytesMoved = (ulPos < 4096) ? ulPos : 4096; + ulPos -= iBytesMoved; + #if POSIX + lseek(hFileRead, ulPos, SEEK_SET); + iBytesMoved = read(hFileRead, pCopyBuffer, iBytesMoved); + lseek(hFileWrite, ulPos + ulPositiveSizeDiff, SEEK_SET); + iBytesMoved = write(hFileWrite, pCopyBuffer, iBytesMoved); + #elif defined(WIN32) + SetFilePointer(hFileRead, ulPos, NULL/*32 bit*/, FILE_BEGIN); + ReadFile(hFileRead, pCopyBuffer, iBytesMoved, &iBytesMoved, NULL); + SetFilePointer(hFileWrite, ulPos + ulPositiveSizeDiff, NULL/*32 bit*/, FILE_BEGIN); + WriteFile(hFileWrite, pCopyBuffer, iBytesMoved, &iBytesMoved, NULL); + #else + fseek(hFileRead, ulPos, SEEK_SET); + iBytesMoved = fread(pCopyBuffer, 1, iBytesMoved, hFileRead); + fseek(hFileWrite, ulPos + ulPositiveSizeDiff, SEEK_SET); + iBytesMoved = fwrite(pCopyBuffer, 1, iBytesMoved, hFileWrite); + #endif + if (!(iNotif % 8) && iBytesMoved > 0) + __notify_progress(&subprogress, float(ulFileSize - ulPos) / float(ulFileSize)); + } + delete[] pCopyBuffer; + if (iBytesMoved < 0) throw Exception("Could not modify file while trying to enlarge it"); + + __notify_progress(&subprogress, 1.f); // notify subprogress done + } + + // rebuild / rewrite complete RIFF tree ... + + // divide progress into subprogress + progress_t subprogress; + __divide_progress(pProgress, &subprogress, 3.f, 2.f); // arbitrarily subdivided into 1/3 of total progress + // do the actual work + unsigned long ulTotalSize = WriteChunk(0, ulPositiveSizeDiff, &subprogress); + unsigned long ulActualSize = __GetFileSize(hFileWrite); + // notify subprogress done + __notify_progress(&subprogress, 1.f); + + // resize file to the final size + if (ulTotalSize < ulActualSize) ResizeFile(ulTotalSize); + + // forget all resized chunks + ResizedChunks.clear(); + + __notify_progress(pProgress, 1.0); // notify done + } + + /** @brief Save changes to another file. + * + * Make all changes of all chunks persistent by writing them to another + * file. Caution: this method is optimized for writing to + * another file, do not use it to save the changes to the same + * file! Use File::Save() in that case instead! Ignoring this might + * result in a corrupted file, especially in case chunks were resized! + * + * After calling this method, this File object will be associated with + * the new file (given by \a path) afterwards. + * + * @param path - path and file name where everything should be written to + * @param pProgress - optional: callback function for progress notification + */ + void File::Save(const String& path, progress_t* pProgress) { + //TODO: we should make a check here if somebody tries to write to the same file and automatically call the other Save() method in that case + + //TODO: implementation for the case where first chunk is not a global container (List chunk) is not implemented yet (i.e. Korg files) + if (Layout == layout_flat) + throw Exception("Saving a RIFF file with layout_flat is not implemented yet"); + + // make sure the RIFF tree is built (from the original file) + { + // divide progress into subprogress + progress_t subprogress; + __divide_progress(pProgress, &subprogress, 2.f, 0.f); // arbitrarily subdivided into 1/2 of total progress + // do the actual work + LoadSubChunksRecursively(&subprogress); + // notify subprogress done + __notify_progress(&subprogress, 1.f); + } + + if (!bIsNewFile) SetMode(stream_mode_read); + // open the other (new) file for writing and truncate it to zero size + #if POSIX + hFileWrite = open(path.c_str(), O_RDWR | O_CREAT, S_IRUSR | S_IWUSR | S_IRGRP); + if (hFileWrite == -1) { + hFileWrite = hFileRead; + String sError = strerror(errno); + throw Exception("Could not open file \"" + path + "\" for writing: " + sError); + } + #elif defined(WIN32) + hFileWrite = CreateFile( + path.c_str(), GENERIC_WRITE, FILE_SHARE_READ, + NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL | + FILE_FLAG_RANDOM_ACCESS, NULL + ); + if (hFileWrite == INVALID_HANDLE_VALUE) { + hFileWrite = hFileRead; + throw Exception("Could not open file \"" + path + "\" for writing"); + } + #else + hFileWrite = fopen(path.c_str(), "w+b"); + if (!hFileWrite) { + hFileWrite = hFileRead; + throw Exception("Could not open file \"" + path + "\" for writing"); + } + #endif // POSIX + Mode = stream_mode_read_write; + + // write complete RIFF tree to the other (new) file + unsigned long ulTotalSize; + { + // divide progress into subprogress + progress_t subprogress; + __divide_progress(pProgress, &subprogress, 2.f, 1.f); // arbitrarily subdivided into 1/2 of total progress + // do the actual work + ulTotalSize = WriteChunk(0, 0, &subprogress); + // notify subprogress done + __notify_progress(&subprogress, 1.f); + } + unsigned long ulActualSize = __GetFileSize(hFileWrite); + + // resize file to the final size (if the file was originally larger) + if (ulTotalSize < ulActualSize) ResizeFile(ulTotalSize); + + // forget all resized chunks + ResizedChunks.clear(); + + #if POSIX + if (hFileWrite) close(hFileWrite); + #elif defined(WIN32) + if (hFileWrite != INVALID_HANDLE_VALUE) CloseHandle(hFileWrite); + #else + if (hFileWrite) fclose(hFileWrite); + #endif + hFileWrite = hFileRead; + + // associate new file with this File object from now on + Filename = path; + bIsNewFile = false; + Mode = (stream_mode_t) -1; // Just set it to an undefined mode ... + SetMode(stream_mode_read_write); // ... so SetMode() has to reopen the file handles. + + __notify_progress(pProgress, 1.0); // notify done + } + + void File::ResizeFile(unsigned long ulNewSize) { + #if POSIX + if (ftruncate(hFileWrite, ulNewSize) < 0) + throw Exception("Could not resize file \"" + Filename + "\""); + #elif defined(WIN32) + if ( + SetFilePointer(hFileWrite, ulNewSize, NULL/*32 bit*/, FILE_BEGIN) == INVALID_SET_FILE_POINTER || + !SetEndOfFile(hFileWrite) + ) throw Exception("Could not resize file \"" + Filename + "\""); + #else + # error Sorry, this version of libgig only supports POSIX and Windows systems yet. + # error Reason: portable implementation of RIFF::File::ResizeFile() is missing (yet)! + #endif } File::~File() { #if DEBUG std::cout << "File::~File()" << std::endl; #endif // DEBUG + Cleanup(); + } + + /** + * Returns @c true if this file has been created new from scratch and + * has not been stored to disk yet. + */ + bool File::IsNew() const { + return bIsNewFile; + } + + void File::Cleanup() { #if POSIX - if (hFile) close(hFile); + if (hFileRead) close(hFileRead); + #elif defined(WIN32) + if (hFileRead != INVALID_HANDLE_VALUE) CloseHandle(hFileRead); #else - if (hFile) fclose(hFile); + if (hFileRead) fclose(hFileRead); #endif // POSIX + DeleteChunkList(); + pFile = NULL; + ResizedChunks.clear(); + } + + void File::LogAsResized(Chunk* pResizedChunk) { + ResizedChunks.insert(pResizedChunk); + } + + void File::UnlogResized(Chunk* pResizedChunk) { + ResizedChunks.erase(pResizedChunk); } unsigned long File::GetFileSize() { - #if POSIX + return __GetFileSize(hFileRead); + } + + #if POSIX + unsigned long File::__GetFileSize(int hFile) { struct stat filestat; fstat(hFile, &filestat); long size = filestat.st_size; - #else // standard C functions + return size; + } + #elif defined(WIN32) + unsigned long File::__GetFileSize(HANDLE hFile) { + DWORD dwSize = ::GetFileSize(hFile, NULL /*32bit*/); + if (dwSize == INVALID_FILE_SIZE) + throw Exception("Windows FS error: could not determine file size"); + return dwSize; + } + #else // standard C functions + unsigned long File::__GetFileSize(FILE* hFile) { long curpos = ftell(hFile); fseek(hFile, 0, SEEK_END); long size = ftell(hFile); fseek(hFile, curpos, SEEK_SET); - #endif // POSIX return size; } - + #endif // *************** Exception *************** @@ -811,5 +2067,25 @@ std::cout << "RIFF::Exception: " << Message << std::endl; } + +// *************** functions *************** +// * + + /** + * Returns the name of this C++ library. This is usually "libgig" of + * course. This call is equivalent to DLS::libraryName() and + * gig::libraryName(). + */ + String libraryName() { + return PACKAGE; + } + + /** + * Returns version of this C++ library. This call is equivalent to + * DLS::libraryVersion() and gig::libraryVersion(). + */ + String libraryVersion() { + return VERSION; + } + } // namespace RIFF -#endif