// Copyright (c) 2010 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:

// This file contains the implementation of the AT command parser and common utilities

// 

//

#include "atcommandparser.h"

#include <hash.h>

#include "debug.h"

#include "atmisccmdpluginconsts.h"

TAtCommandParser::TAtCommandParser()

    : iCmdType(EUnknown), iCmdHandlerType(ECmdHandlerTypeUndefined)  

    {

    TRACE_FUNC_ENTRY

    TRACE_FUNC_EXIT

    }

TAtCommandParser::TAtCommandParser(const TDesC8& aCmd)

    : iCmdType(EUnknown), iCmdHandlerType(ECmdHandlerTypeUndefined)  

    {

    TRACE_FUNC_ENTRY

    ParseAtCommand(aCmd);

    TRACE_FUNC_EXIT

    }

void TAtCommandParser::ParseAtCommand(const TDesC8& aCmd)

    {

    TRACE_FUNC_ENTRY

    iCmd.Assign(aCmd);

    iCmd.Mark();

    TChar c = 0;

    // First extract the AT command "AT+COMMAND"

    while(!iCmd.Eos() && !(c=='=' || c=='?'))

        {

        iCmd.Inc();

        c = iCmd.Peek();

        }

    TPtrC8 token = iCmd.MarkedToken();   

    _LIT8(KAtCfun, "AT+CFUN");

    _LIT8(KAtCbc, "AT+CBC");

    _LIT8(KAtClck, "AT+CLCK");

    _LIT8(KAtCpwd, "AT+CPWD");

    _LIT8(KAtCpin, "AT+CPIN");

    _LIT8(KAtCusd, "AT+CUSD");

    _LIT8(KAtCnum, "AT+CNUM");

	_LIT8(KAtCmee, "AT+CMEE");

    _LIT8(KAtHver, "AT^HVER");

    _LIT8(KAtCgsn, "AT+CGSN");

    _LIT8(KAtCgmr, "AT+CGMR");

    _LIT8(KAtCgmi, "AT+CGMI");

    _LIT8(KAtCmgw, "AT+CMGW");

	_LIT8(KAtCmgd, "AT+CMGD");

	_LIT8(KAtCmgf, "AT+CMGF");

	_LIT8(KAtiBase, "ATI");

	_LIT8(KAti0, "ATI0");

	_LIT8(KAti1, "ATI1");

	_LIT8(KAti2, "ATI2");

	_LIT8(KAti3, "ATI3");

	_LIT8(KAti4, "ATI4");

	_LIT8(KAtGmr, "AT+GMR");

	_LIT8(KAtGmi, "AT+GMI");

	_LIT8(KAtGsn, "AT+GSN");

	_LIT8(KAtCgmm, "AT+CGMM");

	_LIT8(KAtGmm, "AT+GMM");

	_LIT8(KAtScpbr, "AT^SCPBR");

	_LIT8(KAtScpbw, "AT^SCPBW");

    Trace(KDebugPrintS, "token: ", &token);

    // Determine the AT command type

    if(!token.CompareF(KAtCfun))

        {

        iCmdType = ECmdAtCfun;

        }

    else if(!token.CompareF(KAtCbc))

        {

        iCmdType = ECmdAtCbc;

        }

    else if(!token.CompareF(KAtClck))

        {

        iCmdType = ECmdAtClck;

        }

    else if(!token.CompareF(KAtCpwd))

        {

        iCmdType = ECmdAtCpwd;

        }

    else if(!token.CompareF(KAtCpin))

        {

        iCmdType = ECmdAtCpin;

        }

    else if(!token.CompareF(KAtCusd))

        {

        iCmdType = ECmdAtCusd;

        }

    else if(!token.CompareF(KAtCnum))

        {

        iCmdType = ECmdAtCnum;

        }

    else if(!token.CompareF(KAtCmee))

        {

        iCmdType = ECmdAtCmee;

		}

    else if(!token.CompareF(KAtHver))

        {

        iCmdType = ECmdAtHver;

        }

    else if(!token.CompareF(KAtCgsn))

        {

        iCmdType = ECmdAtCgsn;

        }

    else if(!token.CompareF(KAtGsn))

        {

        iCmdType = ECmdAtGsn;

        }

    else if(!token.CompareF(KAtCgmr))

        {

        iCmdType = ECmdAtCgmr;

        }

    else if(!token.CompareF(KAtGmr))

        {

        iCmdType = ECmdAtGmr;

        }

    else if(!token.CompareF(KAtCgmi))

        {

        iCmdType = ECmdAtCgmi;

        }    

    else if(!token.CompareF(KAtGmi))

        {

        iCmdType = ECmdAtGmi;

        } 

    else if(!token.CompareF(KAtCmgw))

        {

        iCmdType = ECmdAtCmgw;

        }

    else if(!token.CompareF(KAtCmgd))

        {

        iCmdType = ECmdAtCmgd;

        }

    else if(!token.CompareF(KAtCmgf))

        {

        iCmdType = ECmdAtCmgf;

        }

    else if(!token.CompareF(KAtCgmm))

        {

        iCmdType = ECmdAtCgmm;

        }

    else if(!token.CompareF(KAtGmm))

        {

        iCmdType = ECmdAtGmm;

        }

    else if(!token.CompareF(KAtiBase))

        {

        iCmdType = ECmdAtI;

        }

    else if(!token.CompareF(KAti0))

        {

        iCmdType = ECmdAtI0;

        }

    else if(!token.CompareF(KAti1))

        {

        iCmdType = ECmdAtI1;

        }

    else if(!token.CompareF(KAti2))

        {

        iCmdType = ECmdAtI2;

        }

    else if(!token.CompareF(KAti3))

        {

        iCmdType = ECmdAtI3;

        }

    else if(!token.CompareF(KAti4))

        {

        iCmdType = ECmdAtI4;

        }

	else if(!token.CompareF(KAtScpbr))

        {

        iCmdType = ECmdAtScpbr;

        } 

    else if(!token.CompareF(KAtScpbw))

        {

        iCmdType = ECmdAtScpbw;

        }

    else

        {

        iCmdType = EUnknown;

        TRACE_FUNC_EXIT

        return;

        }

    // Now find out the AT command handler type

    if(iCmd.Eos())

        {

        iCmdHandlerType = ECmdHandlerTypeBase;

        }

    else if(iCmd.Peek() == '?')

        {

        iCmdHandlerType = ECmdHandlerTypeRead;

        }

    else if(iCmd.Peek() == '=')

        {

        iCmd.Inc();

        if(iCmd.Peek() == '?')

            {

            iCmd.Inc();

            iCmdHandlerType = ECmdHandlerTypeTest;

            }

        else

            {

            iCmdHandlerType = ECmdHandlerTypeSet;

            }

        }

    else

        {

        iCmdHandlerType = ECmdHandlerTypeUndefined;

        }

    TRACE_FUNC_EXIT

    }

TAtCommandParser::TCommandType TAtCommandParser::Command() const

    {

    TRACE_FUNC_ENTRY

    TRACE_FUNC_EXIT

    return iCmdType;

    }

TAtCommandParser::TCommandHandlerType TAtCommandParser::CommandHandlerType() const

    {

    TRACE_FUNC_ENTRY

    TRACE_FUNC_EXIT

    return iCmdHandlerType;

    }

TPtrC8 TAtCommandParser::NextParam()

    {

    TRACE_FUNC_ENTRY

    iCmd.SkipSpace(); // Skip front spaces

    iCmd.Mark();

    TChar chr = 0;

    if(!iCmd.Eos())

        {

        chr = iCmd.Peek();

        while(!iCmd.Eos() && chr != ',' && !chr.IsSpace() && !chr.IsControl())

            {// Stop at any of those chars: comma, space or control

            iCmd.Inc();

            chr = iCmd.Peek();

            }

        }

    // Extract the token at this point            

    TPtrC8 retVal = iCmd.MarkedToken();

    TRACE_FUNC_EXIT

    return retVal;

    }

TInt TAtCommandParser::NextTextParam(TPtrC8& aParam)

    {

    TRACE_FUNC_ENTRY

    TInt ret = KErrNone;

    TPtrC8 param = NextParam();

    if (param.Length() == 0)

        {

        aParam.Set(NULL,0);

        ret = KErrNotFound;

        }

    else if(param.Length() < 2 || param[0] != '"'

            || param[param.Length()-1] != '"')

        {

        aParam.Set(NULL,0);

        ret = KErrArgument;

        }

    else

        {

        aParam.Set(param.Mid(1, param.Length() - 2));

        }

    TRACE_FUNC_EXIT

    return ret;

    }

TInt TAtCommandParser::NextIntParam(TInt& aValue)

    {

    TRACE_FUNC_ENTRY

    TInt retVal =KErrNone;

    TPtrC8 param = NextParam();

    if (param.Length() == 0)

        {

        retVal = KErrNotFound;

        }

    else

        {

        TLex8 lex(param);

        retVal = lex.Val(aValue);

        }

    TRACE_FUNC_EXIT

    return retVal;

    }

TInt TAtCommandParser::HashSecurityCode(const TDesC8& aPasscode, TDes8& aHashCode)

    {

    TRACE_FUNC_ENTRY

    TInt ret = KErrNone;

    // Get MD5 Hash

    // see remotemgmt component CSCPServer::HashISACode() for encoding algorithm

    CMD5* hashObject = NULL;

    TRAP( ret, hashObject = CMD5::NewL() );

    if(ret != KErrNone)

        {

        TRACE_FUNC_EXIT

        return ret;

        }

    RBuf pwdBuffer;

    ret = pwdBuffer.Create(KSCPMaxHashLength);

    if(ret != KErrNone)

        {

        delete hashObject;

        TRACE_FUNC_EXIT

        return ret;

        }

    pwdBuffer.Copy(aPasscode); // convert to TDes16

    // add TDes16 to a binary buffer

    TUint16* inputPtr = const_cast<TUint16*>( pwdBuffer.Ptr() ); 

    TPtrC8 inputData( reinterpret_cast<TUint8*>(inputPtr), pwdBuffer.Length()*2 );

    TPtrC8 hash = hashObject->Final( inputData );

    delete hashObject;

    pwdBuffer.Zero();

    pwdBuffer.Copy(hash);

    // Compute the hash sum as four 32-bit integers.

    TInt64 hashSum = *(reinterpret_cast<TInt32*>(&pwdBuffer[0])) + 

                     *(reinterpret_cast<TInt32*>(&pwdBuffer[4])) + 

                     *(reinterpret_cast<TInt32*>(&pwdBuffer[8])) +

                     *(reinterpret_cast<TInt32*>(&pwdBuffer[12]));

    pwdBuffer.Close();

    // Create a five-digit security code from this number

    TInt isaCode = ( hashSum % 90000 ) + 10000;

    // save encoded security code to TDes

    aHashCode.Zero();

    aHashCode.AppendNum(isaCode);

    TRACE_FUNC_EXIT

    return KErrNone;

    }