// * This file is part of the COLOBOT source code
// * Copyright (C) 2014 Polish Portal of Colobot (PPC)
// *
// * 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
// * the Free Software Foundation, either version 3 of the License, or
// * (at your option) any later version.
// *
// * This program is distributed in the hope that it will be useful,
// * but WITHOUT ANY WARRANTY; without even the implied warranty of
// * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// * GNU General Public License for more details.
// *
// * You should have received a copy of the GNU General Public License
// * along with this program. If not, see  http://www.gnu.org/licenses/.

#include "common/resources/sndfile.h"

#include <cstring>


CSNDFile::CSNDFile(const std::string& filename)
{
    memset(&m_file_info, 0, sizeof(SF_INFO));

    if (PHYSFS_isInit())
    {
        m_file = PHYSFS_openRead(filename.c_str());
    }
    else
    {
        m_last_error = "Resource system not started!";
    }
    
    if (m_file)
    {
        m_snd_file = sf_open_virtual(&snd_callbacks, SFM_READ, &m_file_info, m_file);
        if (!m_snd_file)
        {
            m_last_error = "Could not load file";
        }
    }
    else
    {
        m_last_error = std::string(PHYSFS_getLastError());
    }
}


CSNDFile::~CSNDFile()
{
    if (m_file)
    {
        PHYSFS_close(m_file);
    }
    
    if (m_snd_file)
    {
        sf_close(m_snd_file);
    }
}


bool CSNDFile::IsOpen()
{
    return m_snd_file;
}


SF_INFO &CSNDFile::GetFileInfo()
{
    return m_file_info;
}


std::string& CSNDFile::GetLastError()
{
    return m_last_error;
}


sf_count_t CSNDFile::Read(short int *ptr, sf_count_t items)
{
    return sf_read_short(m_snd_file, ptr, items);
}


sf_count_t CSNDFile::SNDLength(void *data)
{
    return PHYSFS_fileLength(static_cast<PHYSFS_File *>(data));
}


sf_count_t CSNDFile::SNDRead(void *ptr, sf_count_t count, void *data)
{
    return PHYSFS_read(static_cast<PHYSFS_File *>(data), ptr, 1, count);
}


sf_count_t CSNDFile::SNDSeek(sf_count_t offset, int whence, void *data)
{
    PHYSFS_File *file = static_cast<PHYSFS_File *>(data);
    
    switch(whence)
    {
        case SEEK_CUR:
            PHYSFS_seek(file, PHYSFS_tell(file) + offset);
            break;
        case SEEK_SET:
            PHYSFS_seek(file, offset);
            break;
        case SEEK_END:
            PHYSFS_seek(file, PHYSFS_fileLength(file) + offset);
            break;
    }

    return PHYSFS_tell(file);
}


sf_count_t CSNDFile::SNDTell(void *data)
{
    return PHYSFS_tell(static_cast<PHYSFS_File *>(data));
}


sf_count_t CSNDFile::SNDWrite(const void *ptr, sf_count_t count, void *data)
{
    return PHYSFS_write(static_cast<PHYSFS_File *>(data), ptr, 1, count);
}