/*

* Copyright (c) 2006 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "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:  API functions that were loaded into TLS for the Browser to use.

*

*/

// INCLUDE FILES

#include <Uri16.h>

#include <mmf/common/MmfControllerFrameworkBase.h>

#include "BavpLogger.h"

#include "BavpPlugin.h"

#include "BavpVolumeHandler.h"

#include <npscript.h>

#include "BavpNPObject.h"

// CONSTANTS

_LIT(KAccessPtId, "accesspointid");

_LIT(KLoop,"loop");

_LIT(KSrc,"src");

_LIT(KData,"data");

_LIT(KRtsp,"rtsp");

_LIT(KInfinite,"infinite");

_LIT(KVolume, "volume");

_LIT(KHigh, "high");

_LIT(KMiddle, "middle");

_LIT(KLow, "low");

const TInt KOneLoopValue = 1;

const TInt KMaxLoopValue = 50; 

// ============================= LOCAL FUNCTIONS ===============================

// -----------------------------------------------------------------------------

// BavpNewp

// Create a new instance of a plugin. This is non-leaving method.

// Returns: NPError: Error codes recognized by Browser

// -----------------------------------------------------------------------------

NPError BavpNewp( NPMIMEType /* pluginType*/,   // Not used locally

                  NPP aInstance,                // Stores pointer to Bavp 

                  uint16 /* mode */,            // 

                  CDesCArray* argn,             // The number of arguments passed

                  CDesCArray* argv,             // The values of arguments in the array

                  NPSavedData* /*saved*/ )      // 

    {

    // Fix for TSW error ID:  SLON-74588K, as ControlPanel is unsupported so for the time being

    // controlPanel plugin window shown as emplty non supported window.

    _LIT(KControls, "controls");     

    _LIT(KControlPanel, "controlpanel");

    for ( TInt i=0; i < argn->Count(); i++ )

    {

    if(((*argn)[i].Compare( KControls) == 0)&&((*argv)[i].Compare(KControlPanel ) == 0))

        {

            return NPERR_INVALID_PLUGIN_ERROR;

        }

    }

    // Create BrowserAudioVideoPlugin, call this leaving method to wrap leaving methods

    TRAPD( err, BavpConstructL( aInstance, argn, argv ) );

    if ( err == KErrNoMemory )

        {       

        Log( EFalse, _L("FUNCTION BavpNewp ERROR! Out of Memory Error") );

        return NPERR_OUT_OF_MEMORY_ERROR;

        }

    if ( err != KErrNone )

        {

        Log( EFalse, _L("FUNCTION BavpNewp ERROR! Module Load Failure") );

        return NPERR_MODULE_LOAD_FAILED_ERROR;

        }

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpConstructL

// This is the leaving method to create the plugin.  We have leaving setters

// that need to be wrapped.

// Returns: void

// -----------------------------------------------------------------------------

void BavpConstructL( NPP aInstance,     // Stores pointer to Bavp 

                     CDesCArray* argn,  // The number of arguments passed

                     CDesCArray* argv ) // The values of arguments in the array

    {

    Log( EFalse, _L("Calling FUNCTION BavpConstructL") );

    CBavpPlugin *pluginInstance( NULL );

    // Create BrowserVideoPlugin        

    pluginInstance = CBavpPlugin::NewL();   

    // Bavp functions can now be called

    aInstance->pdata = pluginInstance;

    // Retrieve the various attributes from the HTTP file and the

    // object/embed/bgsound/soundstart tags on that page

    //

    // Retrieve the access point attribute

    TInt accessPtIndex;

    TInt accessPtId( KUseDefaultIap );

    if  ( !argn->Find( KAccessPtId, accessPtIndex, ECmpFolded ) )

        {

        // If the string is found get the access pt id and convert to TInt

        TPtrC16 accessPtValue( (*argv)[accessPtIndex] );

        TLex lex( accessPtValue );

        TInt intVal( 0 );

        if ( lex.Val( intVal ) == KErrNone)

          {

          accessPtId = intVal;

          }

        }

    pluginInstance->SetAccessPtId( accessPtId );

    // Retrieve the "loop" attribute value, default value is "1",

    // with infiniteFlag off. This handles the loop attribute missing

    // and loop="0" cases.

    TInt loopIndex( 0 );

    TPtrC16 loopValue;

    TBool infiniteFlag( EFalse );   // Always false, use loop="50" instead "infinite" 

    TInt loop( KOneLoopValue );     // Our default loop value is "1"

    TInt positionLoop = argn->Find( KLoop, loopIndex, ECmpFolded );

    if ( positionLoop == 0 )

        {

        // Found a loop attribute value

        TPtrC16 pointerLoopCount( (*argv)[loopIndex] );

        loopValue.Set( pointerLoopCount );

        // Is the loop value equal to string "infinite"

        if  ( loopValue.Compare( KInfinite ) == 0 )

            {

            // We never play true infinite, we loop max 50 times

            loop = KMaxLoopValue;

            }

        else

            {

            // Ensure that only a valid loop value is used (1 to 50)

            HBufC8* convertPointerLoopCount = HBufC8::New( pointerLoopCount.Length() );

            TPtr8 convertToByteLoop = convertPointerLoopCount->Des();

            convertToByteLoop.Copy( pointerLoopCount );

            loop = atoi( (char*)(convertToByteLoop.Ptr()) );

            if ( loop < KOneLoopValue )

                {

                loop = KOneLoopValue;

                }

            else if ( loop > KMaxLoopValue )

                {

                loop = KMaxLoopValue;

                }

            }

        }

    // Retrieve the "volume" attribute value, default is max, so that if the

    // "volume" attribute isn't present, the user preferences will not get

    // overwritten.  There is a check in controller->SetVolumeByAttribute that

    // checks current and attribute volume and choses lower volume.

    TInt positionVolumeValue( 0 ); 

    TInt CRVolume( KCRVolumeMax );

    TPtrC16 volumeValue;

    TInt positionVol = argn->Find( KVolume, positionVolumeValue, ECmpFolded );

    if ( positionVol == 0 )

    {

        TPtrC16 pointerVolumeValue( (*argv)[positionVolumeValue] );

        volumeValue.Set( pointerVolumeValue );

        if (  !(volumeValue.Compare( KHigh )) )

            {

            CRVolume = KCRVolume10;

            }

        else if ( !(volumeValue.Compare( KMiddle )) )

            {

            CRVolume = KCRVolume5;

            }

        else if ( !(volumeValue.Compare( KLow )) )

            {

            CRVolume = KCRVolume2;

            }

        else

            {

            // Convert volume numeric string (i.e. volume="6") to CR volume

            HBufC8* convertPointerVolumeValue = HBufC8::New( pointerVolumeValue.Length() );

            TPtr8 convertToByteVolume = convertPointerVolumeValue->Des();

            convertToByteVolume.Append( pointerVolumeValue );

            CRVolume = atoi( (char*)(convertToByteVolume.Ptr()) );

            if ( CRVolume < KCRVolumeMute )

                {

                CRVolume = KCRVolumeMute;

                }

            else if ( CRVolume > KCRVolumeMax )

                {

                CRVolume = KCRVolumeMax;

                }

            }    

    }

    // Set the Volume and Loop for plugin

    pluginInstance->SetVolumeAndLoop( CRVolume, loop, infiniteFlag );

    // Retrieve the "src" or "data" attribute value, if it is rtsp scheme lets

    // save it, so we can start a controller, since rtsp content is not passed

    // by WebKit.  It is our (Bavp) responsibilty to load rtsp content.

    TInt srcIndex( 0 ); 

    TInt ret = argn->Find( KSrc, srcIndex, ECmpFolded );

    if  ( ret != 0 )

        {

        // If the src attribute NOT found, try to find data attribute

        ret = argn->Find( KData, srcIndex, ECmpFolded );

        }

    if ( ret == 0 )

        {

        // We found either data or src attribute

        TPtrC16 srcValue( (*argv)[ srcIndex ] );

        TUriParser uriParser;

        uriParser.Parse( srcValue );

        if ( !uriParser.Extract( EUriScheme ).Compare( KRtsp ) )

            {

            // We found a RTSP scheme. Lets save it up, so when the BavpView

            // is create we can start the BavpController and load rtsp. This

            // is because rtsp will not be started by a call to BavpAsFile().

            // NOTE: Files (http) are downloaded first and then BavpAsFile()

            // is called, which starts the BavpController.

            pluginInstance->SetRtspUriL( uriParser.UriDes() );

            // We may have to move this to a different place if eg: the url of

            // the object is changed later (say from javascript)

            CBavpPluginEcomMain* lBavpPluginEcomMain = (CBavpPluginEcomMain*) Dll::Tls();

            NPNetscapeFuncs* funcPtr = lBavpPluginEcomMain->Funcs();

            if ( funcPtr && funcPtr->getvalue ) 

               {

               funcPtr->getvalue( aInstance, NPNNetworkAccess, (void *)&accessPtId);

               pluginInstance->SetAccessPtId( accessPtId );

               }

            }

        }

    }

// -----------------------------------------------------------------------------

// BavpDestroy(NPP aInstance, NPSavedData**)

// Called by Browser to destroy the plugin

// Returns: NPError: Error Code

// -----------------------------------------------------------------------------

NPError BavpDestroy( NPP    aInstance,          // Link to Browser

                     NPSavedData** /*save*/ )   // Not used locally

    {

    Log( EFalse, _L("Calling FUNCTION BavpDestroy") );

    CBavpPlugin *pluginInstance = STATIC_CAST( CBavpPlugin*, aInstance->pdata );

    delete pluginInstance;

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpSetwindow

// This is the parent window of plugin

// Returns: NPError: Error Code

// -----------------------------------------------------------------------------

NPError BavpSetwindow( NPP aInstance,       // Link to Browser

                       NPWindow* aWindow )  // Browser's window passed to Bavp

    {

    Log( EFalse, _L("Calling FUNCTION BavpSetwindow") );

    CBavpPlugin *pluginInstance = STATIC_CAST( CBavpPlugin*, aInstance->pdata );

    MPluginAdapter *pluginAdapter = STATIC_CAST( MPluginAdapter*, aWindow->window);

    TRAPD( err, pluginInstance->SetWindowL(pluginAdapter, aWindow, aInstance) );

    if ( err == KErrNoMemory )

        {

        Log( EFalse, _L("FUNCTION BavpSetWindow ERROR! Out of Memory Error") );

        // Set the error to plugin if err occurs, it's for the next create plugin check

        pluginInstance->iError = ETrue;

        return NPERR_OUT_OF_MEMORY_ERROR;

        }

    if ( err != KErrNone )

        {

        Log( EFalse, _L("FUNCTION BavpSetWindow ERROR: %d"), err );

        // Set the error to plugin if err occurs, it's for the next create plugin check

        pluginInstance->iError = ETrue;

        return NPERR_GENERIC_ERROR;

        }

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpNewstream

// Indicates start of downloading of an video file from the internet

// Returns: NPError: Error Code

// -----------------------------------------------------------------------------

NPError BavpNewstream( NPP instance,         

                       NPMIMEType type,      

                       NPStream* /*stream*/,    // 

                       NPBool /*seekable*/,     // 

                       uint16* stype )          // Will set to NP_ASFILEONLY to notify Browser how to send data 

    {

    Log( EFalse, _L("Calling FUNCTION BavpNewstream") );

    // Bavp needs to set stype to alert Browser to send data via Bavp_asfile

    *stype = NP_ASFILEONLY; 

    CBavpPlugin *pluginInstance = STATIC_CAST( CBavpPlugin*, instance->pdata );

    pluginInstance->SetMimeType( type );

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpDestroystream    NOT USED

// Indicates completion of downloading an video file from the internet

// Returns: NPError: Error Code

// -----------------------------------------------------------------------------

NPError BavpDestroystream( NPP  /*instance*/,       // Not used locally

                           NPStream* /*stream*/,    //

                           NPReason /*aReason*/ )   //

    {

    Log( EFalse, _L("Calling FUNCTION BavpDestroyStream") );

    return NPERR_NO_ERROR; 

    }

// -----------------------------------------------------------------------------

// BavpAsfile

// Called by Browser when data is copied to a file.

// Returns: void

// -----------------------------------------------------------------------------

void BavpAsfile( NPP aInstance,             // Link to Browser

                 NPStream* stream,      

                 const TDesC& aFileName )   // file name and path

    {

    Log( EFalse, _L("Calling FUNCTION BavpAsfile") );

    Log( EFalse, _L("Filename:") );

    Log( EFalse, aFileName );

    CBavpPlugin *pluginInstance = STATIC_CAST( CBavpPlugin*, aInstance->pdata );

    // Get the error, and set this error to iError in plugin

    TRAPD( err, pluginInstance->OpenAndPlayFileL( aFileName, stream->url ) );

    if ( err != KErrNone )

        {

        Log( EFalse, _L("FUNCTION BavpAsfile ERROR!") );

        // If error, set for plugin, it's for the next create plugin check

        pluginInstance->iError = ETrue;

        }

    }

// -----------------------------------------------------------------------------

// BavpWriteready       NOT SUPPORTED

// -----------------------------------------------------------------------------

int32 BavpWriteready( NPP /*instance*/,     

                      NPStream* /*stream*/ )    

    {

    // Not implemented

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpWrite     NOT SUPPORTED

// -----------------------------------------------------------------------------

int32 BavpWrite( NPP /*instance*/,  

                 NPStream* /*stream*/,   

                 int32 /*offset*/,      

                 int32 /*len*/,     

                 void* /*buffer*/ )

        {

        // Not implemented

        return NPERR_NO_ERROR; 

        }

// -----------------------------------------------------------------------------

// BavpPrint        NOT SUPPORTED

// -----------------------------------------------------------------------------

void BavpPrint( NPP /*instance*/,           

                NPPrint* /*platformPrint*/ )    

    {

    // Not implemented

    }

// -----------------------------------------------------------------------------

// BavpEvent        NOT SUPPORTED

// -----------------------------------------------------------------------------

int16 BavpEvent( NPP instance,

                 void* event )      

    {

    TInt ret = EFalse;

    if (instance)

        {

        CBavpPlugin *plugin = static_cast<CBavpPlugin*>(instance->pdata);

        NPEvent *ev = static_cast<NPEvent*>(event);

        if (plugin)

            {

            if (ev->event == ENppEventPointer)

                {

                NPEventPointer *evp =static_cast<NPEventPointer*> (ev->param);

                ret = plugin->HandleGesture(evp->reserved);

                }

            }

        }

    return ret;

    }

// -----------------------------------------------------------------------------

// BavpUrlnotify        NOT SUPPORTED

// -----------------------------------------------------------------------------

void BavpUrlnotify( NPP /*instance*/,       

                    const TDesC8& /*url*/,  

                    NPReason /*reason*/,    

                    void* /*notifyData*/ )

    {

    // Not implemented

    }

// -----------------------------------------------------------------------------

// BavpSetvalue     NOT SUPPORTED

// -----------------------------------------------------------------------------

NPError BavpSetvalue( NPP /*instance*/,     

                      NPNVariable /*variable*/,

                      void* /*ret_value*/ )

    {

    // Not implemented

    return NPERR_NO_ERROR;

    }

// -----------------------------------------------------------------------------

// BavpGetvalue     NOT SUPPORTED

// -----------------------------------------------------------------------------

NPError BavpGetvalue( NPP aInstance,        

                      NPPVariable aVariable,  

                      void* ret_value ) 

    {

    NPError err( NPERR_NO_ERROR );

        switch( aVariable )

        {

        case NPPVpluginInteractiveBool:

            // Interactive=0, Not Interactive=1

             *(TBool *)ret_value = EFalse;

             break;

        case NPPVpluginScriptableNPObject:

            {        

            // return instance of scripting object to the browser

            BavpNPObject *pluginNPObject = BavpNPObject_new( aInstance );        

            CBavpPlugin *bavpplugin = (CBavpPlugin*)aInstance->pdata;

            bavpplugin->SetNPObject(pluginNPObject);

            pluginNPObject->plugin = bavpplugin; 

            pluginNPObject->nppInstance = aInstance;

            void** ret = (void**)ret_value;

            *ret = (void*)pluginNPObject;        

            }

            break;

        default:

            break;

        }   //end switch

    return err;

    }

//  End of File