/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#include <log4cxx/helpers/messagebuffer.h>
#include <log4cxx/helpers/transcoder.h>

using namespace log4cxx::helpers;

static bool gMessageBufferUseStaticStream = false;

namespace log4cxx
{
namespace helpers
{
void MessageBufferUseStaticStream()
{
    gMessageBufferUseStaticStream = true;
}
}
}

template <typename T>
void ResetStream(std::basic_ostringstream<T>& stream)
{
    stream.seekp(0);
    stream.str(std::basic_string<T>());
    stream.clear();
}

CharMessageBuffer::CharMessageBuffer() : stream(0)
{

#if defined(STATIC_STRINGSTREAM)

    if (gMessageBufferUseStaticStream)
    {
        thread_local static char ossBuf[8192];
        thread_local static std::basic_ostringstream<char> sStream;
        thread_local static bool inited = false;

        if (!inited)
        {
            inited = true;
            sStream.rdbuf()->pubsetbuf(ossBuf, 8192);

            ResetStream(sStream);
        }

        stream = &sStream;
    }

#endif
}

CharMessageBuffer::~CharMessageBuffer()
{
    if (!gMessageBufferUseStaticStream)
    {
        delete stream;
    }
}

CharMessageBuffer& CharMessageBuffer::operator<<(const std::basic_string<char>& msg)
{
    if (stream == 0)
    {
        buf.append(msg);
    }
    else
    {
        *stream << msg;
    }

    return *this;
}

CharMessageBuffer& CharMessageBuffer::operator<<(const char* msg)
{
    const char* actualMsg = msg;

    if (actualMsg == 0)
    {
        actualMsg = "null";
    }

    if (stream == 0)
    {
        buf.append(actualMsg);
    }
    else
    {
        *stream << actualMsg;
    }

    return *this;
}
CharMessageBuffer& CharMessageBuffer::operator<<(char* msg)
{
    return operator<<((const char*) msg);
}

CharMessageBuffer& CharMessageBuffer::operator<<(const char msg)
{
    if (stream == 0)
    {
        buf.append(1, msg);
    }
    else
    {
        buf.assign(1, msg);
        *stream << buf;
    }

    return *this;
}

CharMessageBuffer::operator std::basic_ostream<char>& ()
{
    if (stream == 0)
    {
        stream = new std::basic_ostringstream<char>();

        if (!buf.empty())
        {
            *stream << buf;
        }
    }

    return *stream;
}

const std::basic_string<char>& CharMessageBuffer::str(std::basic_ostream<char>&)
{
    buf = stream->str();

    ResetStream(*stream);

    return buf;
}

const std::basic_string<char>& CharMessageBuffer::str(CharMessageBuffer&)
{
    return buf;
}

bool CharMessageBuffer::hasStream() const
{
    return (stream != 0);
}

std::ostream& CharMessageBuffer::operator<<(ios_base_manip manip)
{
    std::ostream& s = *this;
    (*manip)(s);
    return s;
}

std::ostream& CharMessageBuffer::operator<<(bool val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(short val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(int val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(unsigned int val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(long val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(unsigned long val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(float val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(double val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(long double val)
{
    return ((std::ostream&) * this).operator << (val);
}
std::ostream& CharMessageBuffer::operator<<(void* val)
{
    return ((std::ostream&) * this).operator << (val);
}


#if LOG4CXX_WCHAR_T_API
WideMessageBuffer::WideMessageBuffer() : stream(0)
{

#if defined(STATIC_STRINGSTREAM)

    if (gMessageBufferUseStaticStream)
    {
        thread_local static wchar_t ossBuf[8192];
        thread_local static std::basic_ostringstream<wchar_t> sStream;
        thread_local static bool inited = false;

        if (!inited)
        {
            inited = true;
            sStream.rdbuf()->pubsetbuf(ossBuf, 8192);

            ResetStream(sStream);
        }

        stream = &sStream;
    }

#endif
}

WideMessageBuffer::~WideMessageBuffer()
{
    if (!gMessageBufferUseStaticStream)
    {
        delete stream;
    }
}

WideMessageBuffer& WideMessageBuffer::operator<<(const std::basic_string<wchar_t>& msg)
{
    if (stream == 0)
    {
        buf.append(msg);
    }
    else
    {
        *stream << msg;
    }

    return *this;
}

WideMessageBuffer& WideMessageBuffer::operator<<(const wchar_t* msg)
{
    const wchar_t* actualMsg = msg;

    if (actualMsg == 0)
    {
        actualMsg = L"null";
    }

    if (stream == 0)
    {
        buf.append(actualMsg);
    }
    else
    {
        *stream << actualMsg;
    }

    return *this;
}

WideMessageBuffer& WideMessageBuffer::operator<<(wchar_t* msg)
{
    return operator<<((const wchar_t*) msg);
}

WideMessageBuffer& WideMessageBuffer::operator<<(const wchar_t msg)
{
    if (stream == 0)
    {
        buf.append(1, msg);
    }
    else
    {
        buf.assign(1, msg);
        *stream << buf;
    }

    return *this;
}

WideMessageBuffer::operator std::basic_ostream<wchar_t>& ()
{
    if (stream == 0)
    {
        stream = new std::basic_ostringstream<wchar_t>();

        if (!buf.empty())
        {
            *stream << buf;
        }
    }

    return *stream;
}

const std::basic_string<wchar_t>& WideMessageBuffer::str(std::basic_ostream<wchar_t>&)
{
    buf = stream->str();

    ResetStream(*stream);

    return buf;
}

const std::basic_string<wchar_t>& WideMessageBuffer::str(WideMessageBuffer&)
{
    return buf;
}

bool WideMessageBuffer::hasStream() const
{
    return (stream != 0);
}

std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(ios_base_manip manip)
{
    std::basic_ostream<wchar_t>& s = *this;
    (*manip)(s);
    return s;
}

std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(bool val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(short val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(int val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(unsigned int val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(long val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(unsigned long val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(float val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(double val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(long double val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}
std::basic_ostream<wchar_t>& WideMessageBuffer::operator<<(void* val)
{
    return ((std::basic_ostream<wchar_t>&) * this).operator << (val);
}


MessageBuffer::MessageBuffer()  : wbuf(0)
#if LOG4CXX_UNICHAR_API || LOG4CXX_CFSTRING_API
    , ubuf(0)
#endif
{
}

MessageBuffer::~MessageBuffer()
{
    delete wbuf;
#if LOG4CXX_UNICHAR_API || LOG4CXX_CFSTRING_API
    delete ubuf;
#endif
}

bool MessageBuffer::hasStream() const
{
    bool retval = cbuf.hasStream() || (wbuf != 0 && wbuf->hasStream());
#if LOG4CXX_UNICHAR_API || LOG4CXX_CFSTRING_API
    retval = retval || (ubuf != 0 && ubuf->hasStream());
#endif
    return retval;
}

std::ostream& MessageBuffer::operator<<(ios_base_manip manip)
{
    std::ostream& s = *this;
    (*manip)(s);
    return s;
}

MessageBuffer::operator std::ostream& ()
{
    return (std::ostream&) cbuf;
}

CharMessageBuffer& MessageBuffer::operator<<(const std::string& msg)
{
    return cbuf.operator << (msg);
}

CharMessageBuffer& MessageBuffer::operator<<(const char* msg)
{
    return cbuf.operator << (msg);
}
CharMessageBuffer& MessageBuffer::operator<<(char* msg)
{
    return cbuf.operator << ((const char*) msg);
}

CharMessageBuffer& MessageBuffer::operator<<(const char msg)
{
    return cbuf.operator << (msg);
}

const std::string& MessageBuffer::str(CharMessageBuffer& buf)
{
    return cbuf.str(buf);
}

const std::string& MessageBuffer::str(std::ostream& os)
{
    return cbuf.str(os);
}

WideMessageBuffer& MessageBuffer::operator<<(const std::wstring& msg)
{
    wbuf = new WideMessageBuffer();
    return (*wbuf) << msg;
}

WideMessageBuffer& MessageBuffer::operator<<(const wchar_t* msg)
{
    wbuf = new WideMessageBuffer();
    return (*wbuf) << msg;
}
WideMessageBuffer& MessageBuffer::operator<<(wchar_t* msg)
{
    wbuf = new WideMessageBuffer();
    return (*wbuf) << (const wchar_t*) msg;
}

WideMessageBuffer& MessageBuffer::operator<<(const wchar_t msg)
{
    wbuf = new WideMessageBuffer();
    return (*wbuf) << msg;
}

const std::wstring& MessageBuffer::str(WideMessageBuffer& buf)
{
    return wbuf->str(buf);
}

const std::wstring& MessageBuffer::str(std::basic_ostream<wchar_t>& os)
{
    return wbuf->str(os);
}

std::ostream& MessageBuffer::operator<<(bool val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(short val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(int val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(unsigned int val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(long val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(unsigned long val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(float val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(double val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(long double val)
{
    return cbuf.operator << (val);
}
std::ostream& MessageBuffer::operator<<(void* val)
{
    return cbuf.operator << (val);
}


#endif


#if LOG4CXX_UNICHAR_API || LOG4CXX_CFSTRING_API
UniCharMessageBuffer& MessageBuffer::operator<<(const std::basic_string<log4cxx::UniChar>& msg)
{
    ubuf = new UniCharMessageBuffer();
    return (*ubuf) << msg;
}

UniCharMessageBuffer& MessageBuffer::operator<<(const log4cxx::UniChar* msg)
{
    ubuf = new UniCharMessageBuffer();
    return (*ubuf) << msg;
}
UniCharMessageBuffer& MessageBuffer::operator<<(log4cxx::UniChar* msg)
{
    ubuf = new UniCharMessageBuffer();
    return (*ubuf) << (const log4cxx::UniChar*) msg;
}

UniCharMessageBuffer& MessageBuffer::operator<<(const log4cxx::UniChar msg)
{
    ubuf = new UniCharMessageBuffer();
    return (*ubuf) << msg;
}

const std::basic_string<log4cxx::UniChar>& MessageBuffer::str(UniCharMessageBuffer& buf)
{
    return ubuf->str(buf);
}

const std::basic_string<log4cxx::UniChar>& MessageBuffer::str(std::basic_ostream<log4cxx::UniChar>& os)
{
    return ubuf->str(os);
}


UniCharMessageBuffer::UniCharMessageBuffer() : stream(0)
{

#if defined(STATIC_STRINGSTREAM)

    if (gMessageBufferUseStaticStream)
    {
        thread_local static log4cxx::UniChar ossBuf[8192];
        thread_local static std::basic_ostringstream<log4cxx::UniChar> sStream;
        thread_local static bool inited = false;

        if (!inited)
        {
            inited = true;
            sStream.rdbuf()->pubsetbuf(ossBuf, 8192);

            ResetStream(sStream);
        }

        stream = &sStream;
    }

#endif
}

UniCharMessageBuffer::~UniCharMessageBuffer()
{
    if (!gMessageBufferUseStaticStream)
    {
        delete stream;
    }
}


UniCharMessageBuffer& UniCharMessageBuffer::operator<<(const std::basic_string<log4cxx::UniChar>& msg)
{
    if (stream == 0)
    {
        buf.append(msg);
    }
    else
    {
        *stream << buf;
    }

    return *this;
}

UniCharMessageBuffer& UniCharMessageBuffer::operator<<(const log4cxx::UniChar* msg)
{
    const log4cxx::UniChar* actualMsg = msg;
    static log4cxx::UniChar nullLiteral[] = { 0x6E, 0x75, 0x6C, 0x6C, 0};

    if (actualMsg == 0)
    {
        actualMsg = nullLiteral;
    }

    if (stream == 0)
    {
        buf.append(actualMsg);
    }
    else
    {
        *stream << actualMsg;
    }

    return *this;
}

UniCharMessageBuffer& UniCharMessageBuffer::operator<<(log4cxx::UniChar* msg)
{
    return operator<<((const log4cxx::UniChar*) msg);
}

UniCharMessageBuffer& UniCharMessageBuffer::operator<<(const log4cxx::UniChar msg)
{
    if (stream == 0)
    {
        buf.append(1, msg);
    }
    else
    {
        *stream << msg;
    }

    return *this;
}

UniCharMessageBuffer::operator UniCharMessageBuffer::uostream& ()
{
    if (stream == 0)
    {
        stream = new std::basic_ostringstream<UniChar>();

        if (!buf.empty())
        {
            *stream << buf;
        }
    }

    return *stream;
}

const std::basic_string<log4cxx::UniChar>& UniCharMessageBuffer::str(UniCharMessageBuffer::uostream&)
{
    buf = stream->str();
    ResetStream(*stream);
    return buf;
}

const std::basic_string<log4cxx::UniChar>& UniCharMessageBuffer::str(UniCharMessageBuffer&)
{
    return buf;
}

bool UniCharMessageBuffer::hasStream() const
{
    return (stream != 0);
}

UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(ios_base_manip manip)
{
    UniCharMessageBuffer::uostream& s = *this;
    (*manip)(s);
    return s;
}

UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(bool val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(short val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(int val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(unsigned int val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(long val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(unsigned long val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(float val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(double val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(long double val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}
UniCharMessageBuffer::uostream& UniCharMessageBuffer::operator<<(void* val)
{
    return ((UniCharMessageBuffer::uostream&) * this).operator << (val);
}


#endif

#if LOG4CXX_CFSTRING_API
#include <CoreFoundation/CFString.h>
#include <vector>

UniCharMessageBuffer& UniCharMessageBuffer::operator<<(const CFStringRef& msg)
{
    const log4cxx::UniChar* chars = CFStringGetCharactersPtr(msg);

    if (chars != 0)
    {
        return operator<<(chars);
    }
    else
    {
        size_t length = CFStringGetLength(msg);
        std::vector<log4cxx::UniChar> tmp(length);
        CFStringGetCharacters(msg, CFRangeMake(0, length), &tmp[0]);

        if (stream)
        {
            std::basic_string<UniChar> s(&tmp[0], tmp.size());
            *stream << s;
        }
        else
        {
            buf.append(&tmp[0], tmp.size());
        }
    }

    return *this;
}


UniCharMessageBuffer& MessageBuffer::operator<<(const CFStringRef& msg)
{
    ubuf = new UniCharMessageBuffer();
    return (*ubuf) << msg;
}
#endif