/**
*
* @brief Definition of CHTTPExampleEngine
*
* Copyright (c) EMCC Software Ltd 2003
* @version 1.0
*/

// INCLUDE FILES

// Class include
#include "HTTPExampleEngine.h"

#include <chttpformencoder.h>		// CHTTPFormEncoder
#include <httpstringconstants.h>	// HTTP string table
#include <http/rhttpheaders.h>			// RHTTPHeaders
#include <aknnotewrappers.h>
// User includes
#include "EVERYDAY.hrh"            // EMaxNameLength

// CONSTANTS
// HTTP header values
_LIT8(KUserAgent, "HTTPExample (1.0)");    // Name of this client app
_LIT8(KAccept, "text/*");                // Accept any (but only) text content
_LIT8(KPostParamName, "");            // Name of the parameter sent in a POST request
_LIT8(KPostContentType, "text/plain");    // Content type sent in a POST request

// URL for POST request.
//_LIT8(KPostUri, "http://cgi.www.emccsoft.com/cgi-bin/www.emccsoft.com/post.pl");
_LIT8(KUpData,"http://www.ldci.mobi/snsProject/update");


// ================= MEMBER FUNCTIONS =======================

/**
* 2-phase constructor
*
* @param aObserver An observer of this engine (e.g. the UI)
*/
CHTTPExampleEngine* CHTTPExampleEngine::NewL(MHTTPExampleEngineObserver& aObserver)
{
    CHTTPExampleEngine* self = new (ELeave) CHTTPExampleEngine(aObserver);
    CleanupStack::PushL(self);
    self->ConstructL();
    CleanupStack::Pop(self);
    return self;
}

/**
* C++ constructor
*
* @param aObserver An observer of this engine (e.g. the UI)
*/
CHTTPExampleEngine::CHTTPExampleEngine(MHTTPExampleEngineObserver& aObserver)
: iObserver(aObserver)
{
}

/**
* 2nd-phase constructor
*/
void CHTTPExampleEngine::ConstructL()
{
    // Open the RHTTPSession
    iSession.OpenL();
	
    // Construct the form encoder
    iFormEncoder = CHTTPFormEncoder::NewL();
}

/**
* C++ destructor
*/
CHTTPExampleEngine::~CHTTPExampleEngine()
{
    // Close session
    iSession.Close();    // Will also close any open transactions
    delete iResponseBuffer;
    delete iFormEncoder;
    delete iUri;
}

/**
* Override of pure virtual method in MHTTPTransactionCallback.
* Called to report progress by a currently outstanding transaction.
*
* @param aTransaction The transaction reporting progress
* @param aEvent The event being notified
*/
void CHTTPExampleEngine::MHFRunL(RHTTPTransaction aTransaction, const THTTPEvent& aEvent)
{
    switch (aEvent.iStatus)
    {
	case THTTPEvent::EGotResponseHeaders:
        {
            // HTTP response headers have been received.
            // Pass status information to observer.
            RHTTPResponse resp = aTransaction.Response();
			
            // Get status code
            TInt statusCode = resp.StatusCode();
			
            // Get status text
            RStringF statusStr = resp.StatusText();
            HBufC* statusBuf = HBufC::NewLC(statusStr.DesC().Length());
            statusBuf->Des().Copy(statusStr.DesC());
			
            // Inform observer
            iObserver.ResponseStatusL(statusCode, *statusBuf);
			
            CleanupStack::PopAndDestroy(statusBuf);
        }
		break;
		
		
	case THTTPEvent::EGotResponseBodyData:
        {
            // Get text of response body
            MHTTPDataSupplier* dataSupplier = aTransaction.Response().Body();
            TPtrC8 ptr;
            dataSupplier->GetNextDataPart(ptr);
			
            // Convert to 16-bit descriptor
            HBufC* buf = HBufC::NewLC(ptr.Length());
            buf->Des().Copy(ptr);
			
            // Append to iResponseBuffer
            if (!iResponseBuffer)
            {
                iResponseBuffer = buf->AllocL();
            }
            else
            {
                iResponseBuffer = iResponseBuffer->ReAllocL(iResponseBuffer->Length() + buf->Length());
                iResponseBuffer->Des().Append(*buf);
            }
			
            // Release buf
            CleanupStack::PopAndDestroy(buf);
			
            // Release the body data
            dataSupplier->ReleaseData();
        }
		break;
		
	case THTTPEvent::EResponseComplete:
        {
            // Pass the response buffer by reference to the observer
            iObserver.ResponseReceivedL(*iResponseBuffer);
        }
		break;
	case THTTPEvent::ESucceeded:
		{
			
		}
		break;
	case THTTPEvent::EFailed:
		{
			
		}
		break;
	}
}

/**
*/
TInt CHTTPExampleEngine::MHFRunError(TInt aError, RHTTPTransaction /*aTransaction*/, const THTTPEvent& /*aEvent*/)
{
    return aError;
}


/**
* Initiate a GET request
*
* @param aUri The URI to get
*/
void CHTTPExampleEngine::GetRequestL(const TDesC& aUri)
{
	if(iResponseBuffer)
	{
		delete iResponseBuffer;
		iResponseBuffer = NULL;
	}
	// Parse the URI
	ParseUriL(aUri);
	
	// Create the transaction
	iTransaction = iSession.OpenTransactionL(iUriParser, *this,
		iSession.StringPool().StringF(HTTP::EGET, RHTTPSession::GetTable()));
	
	// Set transaction headers
	RHTTPHeaders headers = iTransaction.Request().GetHeaderCollection();
	AddHeaderL(headers, HTTP::EUserAgent, KUserAgent);
	AddHeaderL(headers, HTTP::EAccept, KAccept);
	
	// Submit the request
	iTransaction.SubmitL();
}


/**
* Initiate a POST request
*
* @param aName The user's name
*/
void CHTTPExampleEngine::PostRequestL(const TDesC& aBody)
{
	if(iResponseBuffer)
	{
		delete iResponseBuffer;
		iResponseBuffer = NULL;
	}
	
	// Build form encoder
	// Start by removing any previous content
	delete iFormEncoder;
	iFormEncoder = NULL;
	iFormEncoder = CHTTPFormEncoder::NewL();
	
	HBufC8* pStr = HBufC8::NewL(aBody.Length() * 2);
	pStr->Des().Copy(aBody);
	iFormEncoder->AddFieldL(KPostParamName, pStr->Des());
	
	// Create transaction
	iUriParser.Parse(KUpData);
	iTransaction = iSession.OpenTransactionL(iUriParser, *this,
		iSession.StringPool().StringF(HTTP::EPOST, RHTTPSession::GetTable()));
	
	// Set transaction headers
	RHTTPHeaders headers = iTransaction.Request().GetHeaderCollection();
	AddHeaderL(headers, HTTP::EUserAgent, KUserAgent);
	AddHeaderL(headers, HTTP::EAccept, KAccept);
	AddHeaderL(headers, HTTP::EContentType, KPostContentType);
	
	// Set the form encoder as the data supplier
	iTransaction.Request().SetBody(*iFormEncoder);
	
	// Submit the request
	iTransaction.SubmitL();
	
	delete pStr;
}


//
// Utility methods
//

/**
* Parse a URI
*
* @param aUri The URI to be parsed
*/
void CHTTPExampleEngine::ParseUriL(const TDesC& aUri)
{
    // Convert the URI to an 8-bit descriptor
    // then set iUriParser to point at it
    delete iUri;
    iUri = NULL;
    iUri = HBufC8::NewL(aUri.Length());
    iUri->Des().Copy(aUri);
    User::LeaveIfError(iUriParser.Parse(*iUri));
}


/**
* Add a header to a header set
*
* @param aHeaders The header set to be modified
* @param aHeaderField The name of the header to be added
* @param aHeaderValue The value for the header to be added
*/
void CHTTPExampleEngine::AddHeaderL(RHTTPHeaders aHeaders, TInt aHeaderField, const TDesC8& aHeaderValue)
{
    RStringPool stringPool = iSession.StringPool();
    RStringF valStr = stringPool.OpenFStringL(aHeaderValue);
    THTTPHdrVal headerVal(valStr);
    aHeaders.SetFieldL(stringPool.StringF(aHeaderField, RHTTPSession::GetTable()), headerVal);
    valStr.Close();
}


/**
* Cancel any outstanding transaction
*/
void CHTTPExampleEngine::Cancel()
{
    iTransaction.Cancel();
}