--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/upnp/upnpstack/serviceframework/src/upnpsoapparser.cpp	Tue Feb 02 01:12:20 2010 +0200
@@ -0,0 +1,196 @@
+/** @file
+* Copyright (c) 2007 Nokia Corporation and/or its subsidiary(-ies). 
+* All rights reserved.
+* This component and the accompanying materials are made available
+* under the terms of "Eclipse Public License v1.0"
+* which accompanies  this distribution, and is available 
+* at the URL "http://www.eclipse.org/legal/epl-v10.html".
+*
+* Initial Contributors:
+* Nokia Corporation - initial contribution.
+*
+* Contributors:
+*
+* Description:  TUpnpSoapParser
+ *
+*/
+
+
+#include "upnpsoapparser.h"
+
+#include "upnpsoapmessage.h"
+#include "upnpcontenthandlerscontroller.h"
+#include "upnpaction.h"
+#include "upnpsoapliterals.h"
+
+// -----------------------------------------------------------------------------
+// C++ constructor
+// -----------------------------------------------------------------------------
+//
+TUpnpSoapParser::TUpnpSoapParser(
+    CUpnpContentHandlersController& aParsingController )
+    : iParsingController( aParsingController )
+    {
+    }
+
+// -----------------------------------------------------------------------------
+// CleanupResetAndDestroy
+// Releases array, and object keapt in it.
+// Used as method passed to TCleanupItem object.
+// -----------------------------------------------------------------------------
+//
+LOCAL_C void CleanupResetAndDestroy(TAny* aRPointerArray)
+    {
+    reinterpret_cast<RPointerArray<CUpnpDescriptionProperty>* >(aRPointerArray)
+        ->ResetAndDestroy();
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionWithOKResponseL
+// For internal use. Update all necessary information from a SOAP-message
+// that should be OK answer (e.g. received by Http 200 OK message).
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionWithOKResponseL( CUpnpSoapMessage* aMessage,
+    CUpnpAction* aAction )
+    {
+    if ( NULL == aMessage )
+        {
+        return;
+        }
+    RPointerArray<CUpnpDescriptionProperty> parsedValues;
+    CleanupStack::PushL( TCleanupItem( CleanupResetAndDestroy, &parsedValues ) );
+
+    UpdateActionL( aMessage, aAction, parsedValues );
+    if ( parsedValues[0]->Name() == KUpnpSoapFault )
+        {
+        UpdateActionFaultL( parsedValues[0], aAction );
+        }
+    else
+        {
+        ProcessActionArgumentsL( parsedValues, aAction );
+        }
+    CleanupStack::PopAndDestroy( &parsedValues );
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionWithErrorResponseL
+// For internal use. Update all necessary information from a SOAP-message
+// that should contain SOAP error (fault) message (eg. received by http
+// 500 InternalServerError message.
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionWithErrorResponseL(
+    CUpnpSoapMessage* aMessage, CUpnpAction* aAction )
+    {
+    if ( NULL == aMessage )
+        {
+        return;
+        }
+    RPointerArray<CUpnpDescriptionProperty> parsedValues;
+    CleanupStack::PushL( TCleanupItem( CleanupResetAndDestroy, &parsedValues ) );
+
+    UpdateActionL( aMessage, aAction, parsedValues );
+    if ( parsedValues[0]->Name() == KUpnpSoapFault )
+        {
+        UpdateActionFaultL( parsedValues[0], aAction );
+        }
+    else
+        {
+        User::Leave( KErrArgument );
+        }
+    CleanupStack::PopAndDestroy( &parsedValues );
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionWithRequestL
+// Update action with all necessary information from
+// a SOAP request message.
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionWithRequestL(
+    CUpnpSoapMessage* aMessage, CUpnpAction* aAction )
+    {
+    if ( NULL == aMessage )
+        {
+        return;
+        }
+    RPointerArray<CUpnpDescriptionProperty> parsedArguments;
+    CleanupStack::PushL( TCleanupItem( CleanupResetAndDestroy, &parsedArguments ) );
+
+    UpdateActionL( aMessage, aAction, parsedArguments );
+    ProcessActionArgumentsL( parsedArguments, aAction );
+    CleanupStack::PopAndDestroy( &parsedArguments );
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionL
+// Common code used by 3 particular soap update action methods methods
+// @post if there were no leave aParsedValues has at least 1 object within
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionL( CUpnpSoapMessage* aMessage,
+    CUpnpAction* aAction, RPointerArray<CUpnpDescriptionProperty>& aParsedValues )
+    {
+    aAction->SetSender( aMessage->Sender() );
+    aAction->SetLocal( aMessage->Local() );
+    aAction->SetSessionId( aMessage->SessionId() );
+
+    iParsingController.ParseSoapL( aMessage->Body(), aParsedValues );
+    if ( aParsedValues.Count() == 0 )    //error of parsing, nothing retrieved
+        {
+        User::Leave( KErrArgument );
+        }
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::ProcessActionArgumentsL
+// Process parsed description property, and the rest of parsed properties
+// and update action arguments with them.
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::ProcessActionArgumentsL(
+    RPointerArray<CUpnpDescriptionProperty>& aProperties, CUpnpAction* aAction )
+    {
+    TRAPD( err, UpdateActionArgumentsL( aProperties, aAction ) );
+    if( KErrNone != err )
+        {
+        if ( EInvalidArgs == err )
+            {
+            User::Leave( KErrArgument );
+            }
+        }
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionArgumentsL
+// Update all action arguments with previously parsed properties.
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionArgumentsL(
+    RPointerArray<CUpnpDescriptionProperty>& aProperties, CUpnpAction* aAction )
+    {
+    aAction->SetError( EHttpOk );
+    for ( TInt i(1); i < aProperties.Count(); ++i )
+        {
+        CUpnpDescriptionProperty* property = aProperties[i];
+        aAction->SetArgumentL( property->Name(), property->Value() );
+        }
+    }
+
+// -----------------------------------------------------------------------------
+// TUpnpSoapParser::UpdateActionFaultL
+// Update action error value from parsed description property
+// -----------------------------------------------------------------------------
+//
+void TUpnpSoapParser::UpdateActionFaultL(
+    CUpnpDescriptionProperty* aProperty, CUpnpAction* aAction )
+    {
+    TLex8 code( aProperty->Value() );
+    TInt errNumber( aAction->Error() );
+    TInt parseErr = code.Val( errNumber );
+    aAction->SetError( errNumber );
+    User::LeaveIfError( parseErr );
+    }
+
+//  End of File