/*
 *   Copyright 2003-2004 The Apache Software Foundation.
// (c) Copyright IBM Corp. 2004, 2005 All Rights Reserved
 *
 *   Licensed 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.
 */

// !!! This include file must be first thing in file !!!
#include "../platforms/PlatformAutoSense.hpp"

#include <axis/GDefine.hpp>

#include "SoapHeader.h"
#include "SoapSerializer.h"
#include "Attribute.h"
#include "HeaderBlock.h"

#include "../common/AxisTrace.h"

AXIS_CPP_NAMESPACE_START

extern SoapEnvVersionsStruct gs_SoapEnvVersionsStruct[VERSION_LAST];

SoapHeader::
SoapHeader()
{    
    logEntryEngine("SoapHeader::SoapHeader")
    
    logExit()
}

SoapHeader::
~SoapHeader()
{
    logEntryEngine("SoapHeader::~SoapHeader")

    clear();
    
    logExit()
}

void SoapHeader::
addHeaderBlock(IHeaderBlock* pHeaderBlock)
{
    logEntryEngine("SoapHeader::addHeaderBlock")

    if (pHeaderBlock)
    {
        m_headerBlocks.push_back(pHeaderBlock);
    }
    
    logExit()
}

int SoapHeader::
serialize(SoapSerializer& pSZ, SOAP_VERSION eSoapVersion)
{    
    logEntryEngine("SoapHeader::serialize")

    int iStatus= AXIS_SUCCESS;

    do
    {
        if (0 == m_headerBlocks.size() && 0 == m_namespaceDecls.size() && 0 == m_attributes.size())
            break;
        
        pSZ.serialize("<", gs_SoapEnvVersionsStruct[eSoapVersion].pchPrefix,
            ":", gs_SoapEnvVersionsStruct[eSoapVersion].pchWords[SKW_HEADER],
            NULL);

        iStatus= serializeNamespaceDecl(pSZ);
        iStatus= serializeAttributes(pSZ);

        if(iStatus==AXIS_FAIL)
            break;
        
        pSZ.serialize(">", NULL);

        list<IHeaderBlock*>::iterator itCurrHeaderBlock= m_headerBlocks.begin();

        while(itCurrHeaderBlock != m_headerBlocks.end())
        {
            iStatus= ((HeaderBlock*)(*itCurrHeaderBlock))->serialize(pSZ);
            if(iStatus==AXIS_FAIL)
                break;
            itCurrHeaderBlock++;            
        }

        if(iStatus==AXIS_FAIL)
            break;
        
        pSZ.serialize("</", gs_SoapEnvVersionsStruct[eSoapVersion].pchPrefix,
            ":", gs_SoapEnvVersionsStruct[eSoapVersion].pchWords[SKW_HEADER],
            ">\n", NULL);
        
    } 
    while(0);

    logExitWithReturnCode(iStatus)

    return iStatus;
}

int SoapHeader::
addAttribute(Attribute *pAttribute)
{
    logEntryEngine("SoapHeader::addAttribute")
    
    int iStatus = AXIS_FAIL;

    if (pAttribute)
    {
        m_attributes.push_back(pAttribute);
        iStatus = AXIS_SUCCESS;
    }

    logExitWithReturnCode(iStatus)

    return iStatus;
}


int SoapHeader::
serializeAttributes(SoapSerializer& pSZ)
{
    logEntryEngine("SoapHeader::serializeAttributes")

    list<Attribute*>::iterator itCurrAttribute= m_attributes.begin();

    while(itCurrAttribute != m_attributes.end())
    {
        (*itCurrAttribute)->serialize(pSZ);
        itCurrAttribute++;        
    }    

    logExitWithReturnCode(AXIS_SUCCESS)

    return AXIS_SUCCESS;    
}

int SoapHeader::
addNamespaceDecl(Attribute *pAttribute)
{
    logEntryEngine("SoapHeader::addNamespaceDecl")

    int iStatus = AXIS_FAIL;
    
    if (pAttribute)
    {
        m_namespaceDecls.push_back(pAttribute);
        iStatus = AXIS_SUCCESS;
    }
    
    logExitWithReturnCode(iStatus)

    return iStatus;
}

int SoapHeader::
serializeNamespaceDecl(SoapSerializer& pSZ)
{
    logEntryEngine("SoapHeader::serializeNamespaceDecl")

    list<Attribute*>::iterator itCurrNamespaceDecl= m_namespaceDecls.begin();

    while(itCurrNamespaceDecl != m_namespaceDecls.end())
    {
        (*itCurrNamespaceDecl)->serialize(pSZ);
        itCurrNamespaceDecl++;        
    }    

    logExitWithReturnCode(AXIS_SUCCESS)

    return AXIS_SUCCESS;
}

IHeaderBlock* SoapHeader::
getHeaderBlock(bool bRemoveOrNot)
{
    logEntryEngine("SoapHeader::getHeaderBlock")

    IHeaderBlock* tmpHeaderBlock = NULL;

    list<IHeaderBlock*>::iterator itCurrHeaderBlock= m_headerBlocks.begin();

    if(itCurrHeaderBlock != m_headerBlocks.end())
    {
        tmpHeaderBlock = (*itCurrHeaderBlock);
        if (bRemoveOrNot == true)
            m_headerBlocks.pop_front();
    }

    logExitWithPointer(tmpHeaderBlock)

    return tmpHeaderBlock;

}

int SoapHeader::
setPrefix(const char* pcPrefix)
{
    m_pcPrefix = pcPrefix;

    return AXIS_SUCCESS;
}

IHeaderBlock* SoapHeader::
getHeaderBlock(const AxisChar *pName, const AxisChar *pNamespace, bool bRemoveOrNot)
{
    logEntryEngine("SoapHeader::getHeaderBlock")

    HeaderBlock* tmpHeaderBlock = NULL;

    list<IHeaderBlock*>::iterator itCurrHeaderBlock= m_headerBlocks.begin();

    while (itCurrHeaderBlock != m_headerBlocks.end())
    {
        tmpHeaderBlock = (HeaderBlock*)(*itCurrHeaderBlock);

        if ((strcmp(((tmpHeaderBlock)->m_localname).c_str(), pName) == 0) && 
                (strcmp(((tmpHeaderBlock)->m_uri).c_str(), pNamespace) == 0))
        {
            if (bRemoveOrNot == true)
                m_headerBlocks.remove(tmpHeaderBlock);
            break;
        }
        else
        {
            tmpHeaderBlock = NULL;
            itCurrHeaderBlock++;
        }
    }

    logExitWithPointer(tmpHeaderBlock)

    return tmpHeaderBlock;
}

 
IHeaderBlock* SoapHeader::
getFirstHeaderBlock() 
{
    logEntryEngine("SoapHeader::getFirstHeaderBlock")

    m_itHeaderBlocks = m_headerBlocks.begin();
    IHeaderBlock* tmpIHeaderBlock=NULL;
    if (m_itHeaderBlocks != m_headerBlocks.end())
        tmpIHeaderBlock = *m_itHeaderBlocks;
    
    logExitWithPointer(tmpIHeaderBlock)

    return tmpIHeaderBlock;
}

IHeaderBlock* SoapHeader::
getNextHeaderBlock() 
{
    logEntryEngine("SoapHeader::getNextHeaderBlock")

    m_itHeaderBlocks++;
    IHeaderBlock* tmpIHeaderBlock=NULL;
    if (m_itHeaderBlocks != m_headerBlocks.end())
        tmpIHeaderBlock = *m_itHeaderBlocks;
    
    logExitWithPointer(tmpIHeaderBlock)

    return tmpIHeaderBlock;
}

IHeaderBlock* SoapHeader::
getCurrentHeaderBlock()
{
    logEntryEngine("SoapHeader::getCurrentHeaderBlock")

    IHeaderBlock* tmpIHeaderBlock=NULL;
    if (m_itHeaderBlocks != m_headerBlocks.end())
        tmpIHeaderBlock = *m_itHeaderBlocks;

    logExitWithPointer(tmpIHeaderBlock)

    return tmpIHeaderBlock;
}


int SoapHeader::
deleteHeaderBlock(const AxisChar *pName, const AxisChar *pNamespace)
{
    logEntryEngine("SoapHeader::deleteHeaderBlock")

    int iStatus = AXIS_SUCCESS;
    HeaderBlock* tmpHeaderBlock = NULL;

    list<IHeaderBlock*>::iterator itCurrHeaderBlock= m_headerBlocks.begin();
    
    while (itCurrHeaderBlock != m_headerBlocks.end())
    {
        tmpHeaderBlock = (HeaderBlock*)(*itCurrHeaderBlock);

        if ((strcmp(((tmpHeaderBlock)->m_localname).c_str(), pName) == 0) && 
                (strcmp(((tmpHeaderBlock)->m_uri).c_str(), pNamespace) == 0))
        {
            m_headerBlocks.remove(tmpHeaderBlock);            
            break; 
        }
        else
            itCurrHeaderBlock++;
    }

    if (m_headerBlocks.empty())
        iStatus = AXIS_NO_REMAINING_SOAP_HEADERS;
    
    logExitWithReturnCode(iStatus)

    return iStatus;
}

void SoapHeader::
clearHeaderBlocks()
{
    logEntryEngine("SoapHeader::clearHeaderBlocks")

    // Header blocks are not deleted here. Its the responsibility of
    // either a handler or stub etc to delete any header block created by them.
    // Here we will just clear the list of header block pointers.
    // The thought was that header blocks take some effort to create and thus
    // why should user recreate every time a request is issued.
    m_headerBlocks.clear();

    logExit()
}

void SoapHeader::
clearAttributes()
{
    logEntryEngine("SoapHeader::clearAttributes")

    // Deletion of attributes - strange, i know, that we delete attributes but not header blocks...
    // I guess the thought is that attributes are easy to recreate.
    list<Attribute*>::iterator itCurrAttribute= m_attributes.begin();
    while(itCurrAttribute != m_attributes.end())
    {
        delete *itCurrAttribute;
        itCurrAttribute++;
    }
    m_attributes.clear();

    logExit()
}

void SoapHeader::
clearNamespaceDecls()
{
    logEntryEngine("SoapHeader::clearNamespaceDecls")

    list<Attribute*>::iterator itCurrNamespaceDecl= m_namespaceDecls.begin();
    while(itCurrNamespaceDecl != m_namespaceDecls.end())
    {
        delete *itCurrNamespaceDecl;
        itCurrNamespaceDecl++;
    }
    m_namespaceDecls.clear();

    logExit()
}

void SoapHeader::
clear()
{
    logEntryEngine("SoapHeader::clear")

    clearHeaderBlocks();
    clearAttributes();
    clearNamespaceDecls();
    
    logExit()
}


AXIS_CPP_NAMESPACE_END