// -*- C++ -*-
/* \file fs_extras.C
 * This file is part of LyX, the document processor.
 * Licence details can be found in the file COPYING.
 *
 * \author Lars Gullik Bjønnes
 *
 * Full author contact details are available in file CREDITS.
 */


#include <config.h>

#include "fs_extras.h"

#include <boost/filesystem/config.hpp>
#include <boost/filesystem/exception.hpp>
#include <boost/detail/workaround.hpp>
#include <boost/throw_exception.hpp>

#ifdef HAVE_SYS_TYPES_H
# include <sys/types.h>
#endif
#ifdef HAVE_SYS_STAT_H
# include <sys/stat.h>
#endif
#include <fcntl.h>

// BOOST_POSIX or BOOST_WINDOWS specify which API to use.
# if !defined( BOOST_WINDOWS ) && !defined( BOOST_POSIX )
#   if defined(_WIN32) || defined(__WIN32__) || defined(WIN32) || defined(__CYGWIN__)
#     define BOOST_WINDOWS
#   else
#     define BOOST_POSIX
#   endif
# endif

#if defined (BOOST_WINDOWS)
# define WIN32_LEAN_AND_MEAN
# include <windows.h>
#endif

namespace fs = boost::filesystem;

namespace boost {
namespace filesystem {

bool is_readable(path const & ph)
{
#ifdef BOOST_POSIX
	return ::access(ph.string().c_str(), R_OK) == 0;
#endif
#ifdef BOOST_WINDOWS
	DWORD const attr = ::GetFileAttributes(ph.string().c_str());
	return attr != INVALID_FILE_ATTRIBUTES &&
		(attr & FILE_ATTRIBUTE_DIRECTORY) != FILE_ATTRIBUTE_DIRECTORY;
#endif
}


bool is_writable(path const & ph)
{
#ifdef BOOST_POSIX
	return ::access(ph.string().c_str(), W_OK) == 0;
#endif
#ifdef BOOST_WINDOWS
	DWORD const attr = ::GetFileAttributes(ph.string().c_str());
	if (attr != INVALID_FILE_ATTRIBUTES &&
	    (attr & FILE_ATTRIBUTE_READONLY) != 0) {
		// Read-only - no write access
		return false;
	}
	return attr != INVALID_FILE_ATTRIBUTES &&
		(attr & FILE_ATTRIBUTE_DIRECTORY) != FILE_ATTRIBUTE_DIRECTORY;
#endif
}


bool is_readonly(path const & ph)
{
#ifdef BOOST_POSIX
	return is_readable(ph) && !is_writable(ph);
#endif
#ifdef BOOST_WINDOWS
	DWORD const attr = ::GetFileAttributes(ph.string().c_str());
        return (attr != INVALID_FILE_ATTRIBUTES
                && (attr & FILE_ATTRIBUTE_READONLY));
#endif
}


void copy_file(path const & source, path const & target, bool noclobber)
{

#ifdef BOOST_POSIX
	int const infile = ::open(source.string().c_str(), O_RDONLY);
        if (infile == -1) {
		boost::throw_exception(
			filesystem_error(
				"boost::filesystem::copy_file",
				source, target,
				fs::detail::system_error_code()));
	}

        struct stat source_stat;
        int const ret = ::fstat(infile, &source_stat);
        if (ret == -1) {
                ::close(infile);
		boost::throw_exception(
			filesystem_error(
				"boost::filesystem::copy_file",
				source, target,
				fs::detail::system_error_code()));
        }

        int const flags = O_WRONLY | O_CREAT | (noclobber ? O_EXCL : O_TRUNC);

        int const outfile = ::open(target.string().c_str(), flags, source_stat.st_mode);
        if (outfile == -1) {
                ::close(infile);
		boost::throw_exception(
			filesystem_error(
				"boost::filesystem::copy_file",
				source, target,
				fs::detail::system_error_code()));
        }

        std::size_t const buf_sz = 32768;
        char buf[buf_sz];
        ssize_t in = -1;
        ssize_t out = -1;

        while (true) {
                in = ::read(infile, buf, buf_sz);
                if (in == -1) {
                        break;
                } else if (in == 0) {
                        break;
                } else {
                        out = ::write(outfile, buf, in);
                        if (out == -1) {
                                break;
                        }
                }
        }

        ::close(infile);
        ::close(outfile);

        if (in == -1 || out == -1)
		boost::throw_exception(
			filesystem_error(
				"boost::filesystem::copy_file",
				source, target,
				fs::detail::system_error_code()));
#endif
#ifdef BOOST_WINDOWS
	if (::CopyFile(source.string().c_str(), target.string().c_str(), noclobber) == 0) {
		boost::throw_exception(
			filesystem_error(
				"boost::filesystem::copy_file",
				source, target,
				fs::detail::system_error_code()));
	}
#endif
}

}
}
