/*

* Copyright (c) 2000 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: Implementation of terminalsecurity components

*

*/

// INCLUDE FILES

#include <e32base.h>

#include <e32std.h>

#include <ecom/implementationproxy.h>

#include <SCPParamObject.h>

#include <featmgr.h>

#include "SCPPatternPlugin.h"

#include "SCP_IDs.h"

#include <SCPServerInterface.h>

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

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

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

// CSCPPatternPlugin::NewL

// Two-phased contructor

// (static, may leave)

// Status : Approved

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

//

CSCPPatternPlugin* CSCPPatternPlugin::NewL()

    {

	CSCPPatternPlugin* self = new ( ELeave ) CSCPPatternPlugin();

	CleanupStack::PushL( self );

	self->ConstructL();

	CleanupStack::Pop( self );

    Dprint ( ( _L( "( 0x%x ) CSCPPatternPlugin::NewL()" ), self ) );

    return self;

    }

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

// CSCPPatternPlugin::CSCPPatternPlugin

// Constructor

// Status : Approved

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

//

CSCPPatternPlugin::CSCPPatternPlugin()   

    {

    Dprint ( ( _L( "CSCPPatternPlugin::CSCPPatternPlugin()" ) ) );

    return;

    }

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

// CSCPPatternPlugin::ConstructL

// 2nd phase construction

// (may leave)

// Status : Approved

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

//

void CSCPPatternPlugin::ConstructL()

    {       

    FeatureManager::InitializeLibL();

	if(!FeatureManager::FeatureSupported(KFeatureIdSapDeviceLockEnhancements))

	{

    	FeatureManager::UnInitializeLib();

   		User::Leave( KErrNotSupported );

  	}

   	FeatureManager::UnInitializeLib();    

    Dprint ( ( _L( "CSCPPatternPlugin::ConstructL()" ) ) );

    return;

    }

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

// CSCPPatternPlugin::~CSCPPatternPlugin

// Destructor

// Status : Approved

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

//

CSCPPatternPlugin::~CSCPPatternPlugin()

    {

    Dprint( ( _L( "CSCPPatternPlugin::~CSCPPatternPlugin()" ) ) ) ;

	// Closes the resource file reader. 

	// This function is called after finishing reading all resources

    iRf.Close();   

    return;

    }

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

// CSCPPatternPlugin::HandleEvent

// 

// 

// Status : Approved

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

//    

void CSCPPatternPlugin :: HandleEventL( TInt aID, CSCPParamObject& aParam, CSCPParamObject& aOutParam )

	{	

	Dprint ( ( _L( "CSCPPatternPlugin::HandleEvent()" ) ) );

	TBool isInvalid = EFalse;

	// check for Case

    switch ( aID )

        {

        case ( KSCPEventValidate ):

            {

		     // Get required params for bounds

			CSCPParamObject& config = iEventHandler->GetParameters();	

			TBool argumentError = EFalse;

			// These are the dault values for ThisPlugIn's functions

			TInt passcodeminlength, passcodemaxlength, passcodemaxrepeatedcharacters, passcodeminspecialcharacters;

			TBool passcoderequireupperandlower, passcoderequirecharsandnumbers, passcodeconsecutivenumbers, passcodedisallowsimple;

			// Get Values with ID's

			if ( config.Get( ( RTerminalControl3rdPartySession::EPasscodeMinLength), 

				passcodeminlength ) !=  KErrNone )

					passcodeminlength = KSCPPasscodeMinLength;

			if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeMaxLength),

				 passcodemaxlength ) !=  KErrNone )

					passcodemaxlength = KSCPPasscodeMaxLength;

			if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeMaxRepeatedCharacters), 

				 passcodemaxrepeatedcharacters	 ) !=  KErrNone )

					passcodemaxrepeatedcharacters = 0;

			if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeRequireCharsAndNumbers), 

				 passcoderequirecharsandnumbers ) !=  KErrNone )

					passcoderequirecharsandnumbers = EFalse;

			if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeRequireUpperAndLower), 

				 passcoderequireupperandlower ) !=  KErrNone )

					passcoderequireupperandlower = EFalse;

			if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeConsecutiveNumbers), 

				 passcodeconsecutivenumbers ) !=  KErrNone )

					passcodeconsecutivenumbers = EFalse;

            if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeMinSpecialCharacters), 

                 passcodeminspecialcharacters   ) !=  KErrNone )

                    passcodeminspecialcharacters = 0;

            if ( config.Get( (RTerminalControl3rdPartySession::EPasscodeDisallowSimple), 

                 passcodedisallowsimple ) !=  KErrNone )

                    passcodedisallowsimple = EFalse;

            Dprint( ( _L( "CSCPPatternPlugin :: HandleEventL): EPasscodeMinLength :%d, EPasscodeMaxLength :%d, "), passcodeminlength,passcodemaxlength ) );		

            Dprint( ( _L( "CSCPPatternPlugin :: HandleEventL):  EPasscodeMaxRepeatedCharacters :%d, EPasscodeRequireCharsAndNumbers :%d"), passcodemaxrepeatedcharacters,passcoderequirecharsandnumbers ) );

            Dprint( ( _L( "CSCPPatternPlugin :: HandleEventL): EPasscodeRequireUpperAndLower :%d,minspecialcharacters :%d  "), passcoderequireupperandlower ,passcodeminspecialcharacters) );

            Dprint( ( _L( "CSCPPatternPlugin :: HandleEventL):  EPasscodeConsecutiveNumbers :%d, EPasscodeDisallowSimple :%d, "), passcodeconsecutivenumbers,passcodeminspecialcharacters ) );

            // Get the password from the paramObject

            TBuf<KSCPPasscodeMaxLength> password;

            if ( aParam.Get( KSCPParamPassword, password ) != KErrNone )

                {

                // Nothing to do anymore

                break;

                }

        	// The first rule is to check if securitycode has any

        	// forbidden chars, like WhiteSpace etc...

        	// If so, there is a problem >> KErrArgument

			for (TInt c1=0; c1 < password.Length(); c1++)

			    {

			  TChar ch = static_cast<TChar>( password[c1] );

			  TChar::TCategory chCat = ch.GetCategory();

			  if ( ch.IsSpace() )

				    {   

					aOutParam.Set( KSCPParamStatus, KErrArgument );

					argumentError = ETrue;

					break;

				    }

			    }			 

			// Argument failure, not supposed to be! Out!

        	if (argumentError) break;

			// if all required bounds are zero, there is nothing to do.

			if ( passcodemaxlength != 0 || 

				 passcodeminlength != 0 ||

				 passcodemaxrepeatedcharacters != 0 ||

				 passcoderequireupperandlower ||

				 passcoderequirecharsandnumbers || 

				 passcodeconsecutivenumbers ||

				 passcodeminspecialcharacters != 0 ||

				 passcodedisallowsimple)

			    {			

				// Declare the Check flags										

				TBool istoosimilar = EFalse;					

				TBool consecutively = EFalse;

				TBool consecutivechars = ETrue;

				TBool singlerepeat = ETrue;

				TInt digitCount = 0;	// for passcoderequirecharsandnumbers

				TInt lowerCount = 0;	// for passcoderequireupperandlower

				TInt upperCount = 0;	// for passcoderequireupperandlower

				TInt alphaCount = 0;	// for passcoderequirecharsandnumbers

				TInt specialCount = 0;  // for passcodeminspecialcharacters

				TChar temp = '1';

			 	 // Check for required check or not.

	        	if (passcodeminlength != 0)

	        	    {

		        	// check for Min lenght

		            if (  password.Length() < passcodeminlength )

		                {

		                //koya: return error code to SecUi

		                Dprint ( ( _L( "EDeviceLockMinlength Failed" ) ) );

		                aOutParam.AddtoFailedPolices(EDeviceLockMinlength);

		                isInvalid = ETrue;

		                }

		        	// Check for required check or not.

		        		// Check for Max Lenght

		            else if ( password.Length() > passcodemaxlength )

		             	    {

		                Dprint ( ( _L( "EDeviceLockMaxlength Failed" ) ) );

                            aOutParam.AddtoFailedPolices(EDeviceLockMaxlength);

		                    isInvalid = ETrue;

		           	    }

				    }

		  			// Check for required check or not.

		  			if ( passcodemaxrepeatedcharacters != 0 )

		  			    {

			  			// Check for TooManySameChars

			  			TRAPD( err, istoosimilar = TooManySameCharsL(password,passcodemaxrepeatedcharacters) );

					  	if ( ( err == KErrNone ) && ( istoosimilar ) )

					  	    {					  

					  	  Dprint ( ( _L( "EDeviceLockAllowedMaxRepeatedChars Failed" ) ) );

                            aOutParam.AddtoFailedPolices(EDeviceLockAllowedMaxRepeatedChars);

                            isInvalid = ETrue;

                            }

				  	    }

	   				// Check for Alphadigit

	   				if ( passcoderequirecharsandnumbers)

	   				    {

	   					for (TInt adcounter=0; adcounter < password.Length(); adcounter++)

			  			    {						

							if ( static_cast<TChar>( password[adcounter] ).IsDigit() ) 

						  		digitCount++;

							if ( static_cast<TChar>( password[adcounter] ).IsAlpha() )

						  		alphaCount++;

						    }

		  				if (digitCount >= password.Length() || alphaCount >= password.Length()

		  				           || digitCount == 0 || alphaCount == 0 )

		  				    {

		  				  Dprint ( ( _L( "EDeviceLockRequireCharsAndNumbers Failed" ) ) );

                              aOutParam.AddtoFailedPolices(EDeviceLockRequireCharsAndNumbers);

                              isInvalid = ETrue;

		  				    }

	   				    }	// End of Alphadigit Check

					// passcodeconsecutivenumbers

					if (passcodeconsecutivenumbers)

					    {

						consecutively = consecutivelyCheck(password);

						if ( consecutively )

						    {

						    Dprint ( ( _L( "EDeviceLockConsecutiveNumbers Failed" ) ) );

						    aOutParam.AddtoFailedPolices(EDeviceLockConsecutiveNumbers);

		                    isInvalid = ETrue;

						    }

					    } 

		        	// Check for required check or not.

		        	if (passcoderequireupperandlower)

		        	    {

		        	    for (TInt counter=0; counter < password.Length(); counter++)

		  			    {

						if ( static_cast<TChar>( password[counter] ).IsAlpha() )

							{

							if ( static_cast<TChar>( password[counter] ).IsUpper() )

					  		upperCount++;

							if ( static_cast<TChar>( password[counter] ).IsLower() )

					  		lowerCount++;

							}

		  			    }

		  			    if ( upperCount == 0 || lowerCount == 0)

		  			    	{

		  			      Dprint ( ( _L( "EDeviceLockRequireUpperAndLower Failed" ) ) );

		  			    	aOutParam.AddtoFailedPolices(EDeviceLockRequireUpperAndLower);

		  			    	isInvalid = ETrue;

		  			    	}

		        	    }        		

                    // Check for required check or not.

                    if (passcodeminspecialcharacters != 0)

                        {

                        for (TInt specialcounter=0; specialcounter< password.Length(); specialcounter++)

                            {

                            if ( ! (static_cast<TChar>( password[specialcounter] ).IsAlpha() ) )

                                specialCount++;

                            }

                        if ( specialCount < passcodeminspecialcharacters )

                            {

                            //koya: return error code to SecUi

                            Dprint ( ( _L( "EDeviceLockMinSpecialCharacters Failed" ) ) );

                            aOutParam.AddtoFailedPolices(EDeviceLockMinSpecialCharacters);

                            isInvalid = ETrue;

                            }                        

                    	}

                    if (passcodedisallowsimple)

                        {

                        for (TInt counter=0; counter< (password.Length()-1); counter++)

                            {

                            if ( (static_cast<TChar>(password[counter])) != (static_cast<TChar>(password[counter+1])) )

                                {

                                singlerepeat = EFalse;

                                break;

                                }

                            }

                        if (singlerepeat)

                            {

                            //koya: return error code to SecUi

                            Dprint ( ( _L( "EDeviceLockSingleCharRepeatNotAllowed Failed" ) ) );

                            aOutParam.AddtoFailedPolices(EDeviceLockSingleCharRepeatNotAllowed);

                            isInvalid = ETrue;

                            }

                            for (TInt counter=0; counter< (password.Length()-1); counter++)

                                {

                                //The consecutivity to be checked with only Alphanumeric characters.

                                //The check is being made for only the increasing order. Decreasing order is left for

                                //future implementation if needed. Right now it is left out as this will hit the

                                //usability of device lock a lot.

                                if ( (static_cast<TChar>( password[counter] ).IsAlphaDigit())

                                        && (static_cast<TChar>( password[counter+1] ).IsAlphaDigit()))

                                    {

                                    if ( (static_cast<TChar>(password[counter+1])) - (static_cast<TChar>(password[counter])) != 1 )                      

                                        {

                                        consecutivechars = EFalse;

                                        break;

                                        }

                                    }

                                else

                                    {

                                    consecutivechars = EFalse;

                                    break;

                                    }

                                }

                            if (consecutivechars)

                                {

                                //koya: return error code to SecUi

                                Dprint ( ( _L( "EDevicelockConsecutiveCharsNotAllowed Failed" ) ) );

                                aOutParam.AddtoFailedPolices(EDevicelockConsecutiveCharsNotAllowed);

                                isInvalid = ETrue;

                                }

                        }			  	

				if ( isInvalid )

				    {	    							

			            aOutParam.Set( KSCPParamStatus, KErrSCPInvalidCode );		                

		            }

                } // end of All Zero check

            break;  

            } // KSCPEventValidate

        case ( KSCPEventConfigurationQuery ):

            {            

            TInt paramID = -1; 

            // Get the ID from the paramObject      

            if ( aParam.Get( KSCPParamID, paramID ) != KErrNone )

                {

                // Nothing to do anymore

                break;

                }            

            if ( paramID == (RTerminalControl3rdPartySession::EPasscodeMinLength)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeMaxLength)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeRequireUpperAndLower)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeRequireCharsAndNumbers)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeMaxRepeatedCharacters)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeConsecutiveNumbers )

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeMinSpecialCharacters)

				||  paramID ==  (RTerminalControl3rdPartySession::EPasscodeDisallowSimple))

                {

                // All of our params are TInts

                TInt paramValue;

                if ( aParam.Get( KSCPParamValue, paramValue ) != KErrNone )

                    {

                    aOutParam.Set( KSCPParamStatus, KErrArgument );

                    break;

                    }

                TInt retStatus = KErrNone;

                switch ( paramID )

                    {

                        case ( RTerminalControl3rdPartySession::EPasscodeMinLength ):

                        	{

                        		TInt passcodemaxlength;  

                        		CSCPParamObject& config = iEventHandler->GetParameters();

                        		if ( config.Get( ( RTerminalControl3rdPartySession::EPasscodeMaxLength), 

                                             passcodemaxlength ) !=  KErrNone )

                                             passcodemaxlength = KSCPPasscodeMaxLength;

                        		if ( ( paramValue < KSCPPasscodeMinLength ) || 

                            	   ( paramValue > KSCPPasscodeMaxLength )|| 

                            	   ( paramValue > passcodemaxlength ) )

                        		{

                        			retStatus = KErrArgument;

                        		}

                        	}

                        break;

                        case ( RTerminalControl3rdPartySession::EPasscodeMaxLength ):

                           {

                           	    TInt passcodeminlength;  

                           	    CSCPParamObject& config = iEventHandler->GetParameters();

                           	    if ( config.Get( ( RTerminalControl3rdPartySession::EPasscodeMinLength), 

                                             passcodeminlength ) !=  KErrNone )

                                             passcodeminlength = KSCPPasscodeMinLength;

                        		if ( ( paramValue < KSCPPasscodeMinLength ) || 

                            	   ( paramValue > KSCPPasscodeMaxLength )|| 

                            	   ( paramValue < passcodeminlength ) )

                        		{

                        			retStatus = KErrArgument;

                        		}

                           }

                        break;

                        // Flow through: similar values

                        case ( RTerminalControl3rdPartySession::EPasscodeRequireUpperAndLower ):

                        case ( RTerminalControl3rdPartySession::EPasscodeConsecutiveNumbers ):

                        case ( RTerminalControl3rdPartySession::EPasscodeRequireCharsAndNumbers ):

                        case ( RTerminalControl3rdPartySession::EPasscodeDisallowSimple ):

                            if ( ( paramValue < 0 ) || 

                                 ( paramValue > 1 ) )                                 

                                {

                                // This is not a valid value

                                retStatus = KErrArgument;

                                }

                        break;

                        case ( RTerminalControl3rdPartySession::EPasscodeMaxRepeatedCharacters ):

                            if ( ( paramValue < 0 ) || 

                                 ( paramValue > KSCPMaxRepeatAmount ) ) 

                                {

                                // This is not a valid value

                                retStatus = KErrArgument;

                                }

                        break;

                        case ( RTerminalControl3rdPartySession::EPasscodeMinSpecialCharacters ):

                             if ( ( paramValue < 0 ) ||

                                  ( paramValue > KSCPMinSpecialAmount ) )

                                 {

                                 // This is not a valid value

                                 retStatus = KErrArgument;

                                 }

                        break;

                    }

                aOutParam.Set( KSCPParamStatus, retStatus );

                }

            break;

            } //KSCPEventConfigurationQuery                         

        } //  switch ( aID )

    // The caller will own this pointer from now on   

	}

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

// CSCPPatternPlugin::SetEventHandler

// 

// 

// Status : Approved

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

//    

void CSCPPatternPlugin::SetEventHandler( MSCPPluginEventHandler* aHandler )

	{

	Dprint( ( _L( "CSCPPatternPlugin::SetEventHandler()" ) ) ) ;

	iEventHandler = aHandler;

	iFs = &(iEventHandler->GetFsSession());

	}	

// ========================= OTHER INTERNAL FUNCTIONS =========================

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

// CSCPPatternPlugin::TooManySameCharsL

// 

// Status : Approved

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

//

TBool CSCPPatternPlugin::TooManySameCharsL ( TDes& aParam, TInt  aMaxRepeatedCharacters)

    {

	Dprint( ( _L( "CSCPPatternPlugin::TooManySameChars()" ) ) );

    // Make a copy from param

    // find the first's index's char from the param.

    // so that the found char get counter incresed and gets 

    // replaced with KNullDesC