/*

* 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:  javamobinfo implementation

 *

*/

#include <e32base.h>

#include <etelmm.h>

#include <mmtsy_names.h>    // TSY and Phone name

#include <commsdattypesv1_1.h>

#include <cdblen.h>

#include <commdb.h>

#include <rconnmon.h>

#include <cmmanager.h>

#include <cmconnectionmethoddef.h>

#include <cmpluginpacketdatadef.h>

#include <cmpluginwlandef.h>

#include <cmpluginhscsddef.h>

#include "connectionmanager.h"

using namespace CMManager;

#ifndef SYMBIAN_ENABLE_SPLIT_HEADERS

#include <es_sock.h>

#include <es_enum.h>

#else

#include <es_enum_internal.h>

#include <es_sock_partner.h>

#endif

#include "logger.h"

#include "s60commonutils.h"

#include "com_nokia_mj_impl_properties_mobinfo_MobileInfoProperties.h"

#include "mobinfoconstants.h"

#include "javauids.h"

using namespace std;

using namespace CommsDat;

_LIT(KNetworkAvailable, "available");

_LIT(KNetworkUnavailable, "unavailable");

_LIT(KNetworkAccessPdLAN, "lan"); // Local Area Network

_LIT(KNetworkAccessPdGSM, "pd"); // Packet data in GSM network

_LIT(KNetworkAccessPdEDGE, "pd.EDGE"); // Packet data in EDGE network

_LIT(KNetworkAccessPd3G, "pd.3G"); // Packet data in 3G network

_LIT(KNetworkAccessHSPDA, "pd.HSPDA"); // High speed downlink packet access for 3G networks

_LIT(KNetworkAccessCSD, "csd"); // Circuit switched data, for example GSM CSD/HSCSD data call

_LIT(KNetworkAccessBtPan, "bt_pan"); // Bluetooth PAN network

_LIT(KNetworkAccessWLAN, "wlan"); // Wireless network, for example 802.11b, 802.11G or WiMaX

_LIT(KNetworkAccessNa, "na"); // Not applicable, the implementation can’t determine the type

_LIT(KNetworkStatusHome, "home"); // Home operator

_LIT(KNetworkStatusRoaming, "roaming"); // Roaming

_LIT(KNetworkStatusUnknown, "unknown"); // Unknown operator

_LIT(KMSISDNSeparator, " "); // separator MSISDN numbers

const TInt KMaxPropertySize = 50;

const TInt KJVMProcessUid = KJavaMidp;

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

//    forward declarations

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

HBufC* GetProperty(const TInt aProperty, const TUint32 aAppDefaultApn, const TUint32 aAppDefaultApType);

HBufC* GetTelephonyPropertyL(const TInt aProperty);

HBufC* GetDateTimePropertyL(const TInt aProperty);

HBufC* GetNetworkAccessL(const TUint32 aAppDefaultApn, const TUint32 aAppDefaultApType);

TUint32     GetUsedIapL();

HBufC*      GetBearerTypeL(TUint32 aIapId);

HBufC*      GetIapBearerTypeL(const TUint32 aAppDefaultApn, const TUint32 aAppDefaultApType);

HBufC*      TranslateBearerInfoToNetworkAccessL(TConnMonBearerInfo aBearerInfo);

HBufC*      GetAppDefIapBearerTypeL(const TUint32 aAppDefaultApn);

/*

 * Class:     com_nokia_mj_impl_properties_mobinfo_MobileInfoProperties

 * Method:    _getProperty

 * Signature: (I)Ljava/lang/String;

 */

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

//    JNI function called from java side from MobileInfoProperties class.

//    Each mobinfo java property implementation calls the getPropertyMsid()

//    function of the MobileInfoProperties class.

//    @param aProperty name of the actual property

//    @param aAppDefaultApn application default access point id

//    @param aAppDefaultApType application default access point type ( SNAP, IAP)

//    @param aAppDefaultApn Application default apn

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

JNIEXPORT jstring JNICALL

Java_com_nokia_mj_impl_properties_mobinfo_MobileInfoProperties__1getPropertyApn

(JNIEnv* aJni, jclass, jint aProperty, jint aAppDefaultApn, jint aAppDefaultApType)

{

    LOG1(ESOCKET, EInfo, "MOBINFO + getPropertyMsid(), msid: %D", aAppDefaultApn);

    HBufC* property = NULL;

    jstring str = NULL;

    property = GetProperty(aProperty, aAppDefaultApn,aAppDefaultApType);

    if (NULL != property)

    {

        LOG(ESOCKET,EInfo,"_getPropertyApn, property is not null");

        str = java::util::S60CommonUtils::NativeToJavaString(*aJni, property->Des());

        LOG(ESOCKET, EInfo,"MOBINFO - after nativetojavastring");

        //LOG1( ESOCKET, EInfo,"MOBINFO  returning value: %S", property->Des());

        delete property;

    }

    LOG(ESOCKET, EInfo, "MOBINFO - getPropertyMsid()");

    return str;

}

JNIEXPORT jstring JNICALL Java_com_nokia_mj_impl_properties_mobinfo_MobileInfoProperties__1getProperty

(JNIEnv *aJni, jobject, jint aKey)

{

    LOG1(ESOCKET, EInfo, "MOBINFO Key: %d", aKey);

    HBufC* property = NULL;

    jstring str = NULL;

    property = GetProperty(aKey,NULL,0);

    if (NULL != property)

    {

        TPtrC data(property->Des());

        str = java::util::S60CommonUtils::NativeToJavaString(*aJni, data);

        delete property;

    }

    return str;

}

HBufC* GetProperty(const TInt aProperty, const TUint32 aAppDefaultApn, const TUint32 aAppDefaultApType)

{

    JELOG2(ESOCKET);

    LOG(ESOCKET, EInfo, "MOBINFO + GetProperty()");

    HBufC* property = NULL;

    TInt err;

    switch (aProperty)

    {

    case DATEFORMAT:

    case TIMEFORMAT:

        TRAP(err, property = GetDateTimePropertyL(aProperty));

        break;

    case NETWORK_ACCESS:

        TRAP(err, property = GetNetworkAccessL(aAppDefaultApn,aAppDefaultApType));

        LOG(ESOCKET, EInfo,"after GetNetworkAccessL");

        break;

    default:

        TRAP(err, property = GetTelephonyPropertyL(aProperty));

        break;

    }

    return property;

}

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

//    Finds the default TSY module name from the CommDB. The GlobalSettings

//    table contains a field: ModemForPhoneServicesAndSMS, this field point to

//    a record in the ModemBearer table. The function reads the TsyName from

//    this linked table.

//    @param aTsyName TSY name to be initialized

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

void GetDefaultTSYL(TDes& aTsyName)

{

    JELOG2(ESOCKET);

    CMDBSession* db = CMDBSession::NewL(KCDVersion1_1);

    CleanupStack::PushL(db);

    // Load Global Settings record (there is always only 1 record in it)

    CCDGlobalSettingsRecord

    * ptrSingleGlSettingRecord =

        static_cast<CCDGlobalSettingsRecord*>(CCDRecordBase::RecordFactoryL(

                                                  KCDTIdGlobalSettingsRecord));

    CleanupStack::PushL(ptrSingleGlSettingRecord);

    ptrSingleGlSettingRecord->iRecordTag.SetL(1);

    if (ptrSingleGlSettingRecord->FindL(*db))

    {

        // Find record by RecordTag

        CCDModemBearerRecord

        * ptrModemRecord =

            static_cast<CCDModemBearerRecord*>(CCDRecordBase::RecordFactoryL(

                                                   KCDTIdModemBearerRecord));

        CleanupStack::PushL(ptrModemRecord);

        ptrModemRecord->iRecordTag.SetL(

            ptrSingleGlSettingRecord->iModemForPhoneServicesAndSMS);

        if (ptrModemRecord->FindL(*db))

        {

            aTsyName.Copy(ptrModemRecord->iTsyName);

        }

        CleanupStack::PopAndDestroy(ptrModemRecord);

    }

    CleanupStack::PopAndDestroy(ptrSingleGlSettingRecord);

    CleanupStack::PopAndDestroy(db);

}

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

//    Initializes the given RTelServer with the default TSY (GetDefaultTSYL)

//    module and opens the corresponding RMobilePhone. The searching of the

//    correct phone is based on the TSY name.

//    @param aMobilePhone RMobilePhone to be opened

//    @param aTelServer RTelServer instance to be initialized

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

void GetDefaultPhoneL(RMobilePhone& aMobilePhone, RTelServer& aTelServer)

{

    JELOG2(ESOCKET);

    HBufC* tsyName = HBufC16::NewLC(KCommsDbSvrMaxFieldLength);

    TPtr tsyPtr(tsyName->Des());

    GetDefaultTSYL(tsyPtr);

    //LOG1(ESOCKET, EInfo, "MOBINFO  Default Tsy = %S", tsyPtr);

    User::LeaveIfError(aTelServer.LoadPhoneModule(*tsyName));

    LOG(ESOCKET, EInfo, "MOBINFO  TSY loaded...");

    // Get the name of the first phone

    TInt numPhones = 0;

    User::LeaveIfError(aTelServer.EnumeratePhones(numPhones));

    LOG1(ESOCKET, EInfo, "MOBINFO - Phone count %D", numPhones);

    // Iterate through the phones until we find the correct one

    while (numPhones > 0)

    {

        // The GetTsyName function requires the index of the phone

        // so we must decrease the number here

        --numPhones;

        TName phoneTsy;

        User::LeaveIfError(aTelServer.GetTsyName(numPhones, phoneTsy));

        //LOG1(ESOCKET, EInfo, "MOBINFO  Available phone...%S", phoneTsy);

        if (phoneTsy.CompareF(*tsyName) == KErrNone)

        {

            // Get the phone info

            RTelServer::TPhoneInfo info;

            User::LeaveIfError(aTelServer.GetPhoneInfo(numPhones, info));

            //LOG1(ESOCKET, EInfo, "MOBINFO  Opening phone...%S", info.iName);

            TInt error = aMobilePhone.Open(aTelServer, info.iName);

            LOG1(ESOCKET, EInfo, "MOBINFO  Phone status %D", error);

            User::LeaveIfError(error);

            // We can finish the search here

            numPhones = 0;

        }

    }

    CleanupStack::PopAndDestroy(tsyName);

}

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

//    Retrieves the IMEI or IMSI number.

//    @param aMobilePhone initialized RMobilePhone instance.

//    @param aProperty the name of the actual property

//    @return percentage of battery charge level

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

HBufC* GetIdentityPropertyL(RMobilePhone& aMobilePhone, const TInt aProperty)

{

    JELOG2(ESOCKET);

    TUint32 identityCaps = 0;

    HBufC* telephonyProperty = NULL;

    TRequestStatus status;

    LOG(ESOCKET, EInfo, "MOBINFO + GetIdentityPropertyL()");

    LOG(ESOCKET, EInfo, "MOBINFO  Checking phone identitycaps");

    TInt identityStatus = aMobilePhone.GetIdentityCaps(identityCaps);

    LOG1(ESOCKET, EInfo, "MOBINFO  Checking identity caps status=%D", identityStatus);

    if ((identityCaps & RMobilePhone::KCapsGetSubscriberId)

            && (aProperty == IMSI))

    {

        LOG(ESOCKET, EInfo, "MOBINFO  retrieving IMSI");

        // initialise a variable to hold IMSI

        RMobilePhone::TMobilePhoneSubscriberId imsi;

        // put values into variable

        aMobilePhone.GetSubscriberId(status, imsi);

        User::WaitForRequest(status);

        User::LeaveIfError(status.Int());

        LOG(ESOCKET, EInfo, "MOBINFO  returning property IMSI");

        telephonyProperty = imsi.AllocL();

    }

    if ((identityCaps & RMobilePhone::KCapsGetSerialNumber)

            && (aProperty == IMEI))

    {

        LOG(ESOCKET, EInfo, "MOBINFO  retrieving IMEI");

        RMobilePhone::TMobilePhoneIdentityV1 phoneId;

        aMobilePhone.GetPhoneId(status, phoneId);

        User::WaitForRequest(status);

        User::LeaveIfError(status.Int());

        LOG(ESOCKET, EInfo, "MOBINFO  returning property IMEI");

        telephonyProperty = (phoneId.iSerialNumber).AllocL();

    }

    return telephonyProperty;

}

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

//    Retrieves the battery charge level in percentage.

//    @param aMobilePhone initialized RMobilePhone instance.

//    @return percentage of battery charge level

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

HBufC* GetBatteryPropertyL(RMobilePhone& aMobilePhone)

{

    JELOG2(ESOCKET);

    HBufC* telephonyProperty = NULL;

    LOG(ESOCKET, EInfo, "MOBINFO + GetBatteryPropertyL()");

    // Check BatteryCaps

    TUint32 batteryCaps;

    LOG(ESOCKET, EInfo, "MOBINFO  Checking phone BatteryCaps");

    TInt batteryCapsStatus = aMobilePhone.GetBatteryCaps(batteryCaps);

    LOG1(ESOCKET, EInfo, "MOBINFO  Checking Battery caps status=%D",

         batteryCapsStatus);

    if (batteryCapsStatus == KErrNone)

    {

        TRequestStatus status;

        LOG(ESOCKET, EInfo, "MOBINFO  retrieving battery charge level");

        RMobilePhone::TMobilePhoneBatteryInfoV1 info;

        aMobilePhone.GetBatteryInfo(status, info);

        User::WaitForRequest(status);

        User::LeaveIfError(status.Int());

        LOG(ESOCKET, EInfo, "MOBINFO  returning property Battery charge level");

        TBuf<KMaxPropertySize> buf; // percentage of battery charge level

        buf.Num(info.iChargeLevel);

        telephonyProperty = buf.AllocL();

    }

    LOG(ESOCKET, EInfo, "MOBINFO - GetBatteryPropertyL()");

    return telephonyProperty;

}

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

//    Retrieves the network related properties.

//    @param aMobilePhone initialized RMobilePhone instance.

//    @param aProperty name of the actual property

//    @return property value

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

HBufC* GetNetworkPropertyL(RMobilePhone& aMobilePhone, const TInt aProperty)

{

    JELOG2(ESOCKET);

    HBufC* telephonyProperty = NULL;

    LOG(ESOCKET, EInfo, "MOBINFO + GetNetworkPropertyL()");

    if ((aProperty == NETWORK_ID) || (aProperty == COUNTRY_CODE) || (aProperty

            == CELLID))

    {

        // Check NetworkCaps

        TUint32 networkCaps;

        LOG(ESOCKET, EInfo, "MOBINFO  Checking phone NetworkCaps");

        TInt networkCapsStatus = aMobilePhone.GetNetworkCaps(networkCaps);

        LOG1(ESOCKET, EInfo, "MOBINFO  Checking network caps status=%D",

             networkCapsStatus);

        if (networkCapsStatus == KErrNone)

        {

            TRequestStatus status;

            if ((networkCaps & RMobilePhone::KCapsGetCurrentNetwork)

                    && (aProperty == NETWORK_ID))

            {

                LOG(ESOCKET, EInfo, "MOBINFO  retrieving NetworkId");

                RMobilePhone::TMobilePhoneOPlmnV3 locInfo;

                RMobilePhone::TMobilePhoneOPlmnV3Pckg pckgLocInfo(locInfo);

                RMobilePhone::TMobilePhoneNetworkNameV3 networkName;

                RMobilePhone::TMobilePhoneNetworkNameV3Pckg pckgNetworkName(

                    networkName);

                aMobilePhone.GetCurrentNetworkName(status, pckgNetworkName,

                                                   pckgLocInfo);

                User::WaitForRequest(status);

                User::LeaveIfError(status.Int());

                LOG(ESOCKET, EInfo, "MOBINFO  returning property NetworkId");

                _LIT(KStringFormat, "%S (%S)");

                // 8 is the max length of MNC, + 3 chars needed for the

                // formatting chars like space, "(" and ")"

                TBuf<KMaxPropertySize + RMobilePhone::KMaxNetworkNameFieldSize>

                disp;

                disp.Format(KStringFormat, &locInfo.iNetworkId,

                            &networkName.iShortName);

                telephonyProperty = disp.AllocL();

            }

            else if ((networkCaps & RMobilePhone::KCapsGetCurrentNetwork)

                     && (aProperty == CELLID))

            {

                LOG(ESOCKET, EInfo, "MOBINFO  retrieving CellId");

                RMobilePhone::TMobilePhoneNetworkInfoV1 networkInfo;

                RMobilePhone::TMobilePhoneNetworkInfoV1Pckg networkInfoPckg(

                    networkInfo);

                RMobilePhone::TMobilePhoneLocationAreaV1 locationArea;

                aMobilePhone.GetCurrentNetwork(status, networkInfoPckg,

                                               locationArea);

                User::WaitForRequest(status);

                User::LeaveIfError(status.Int());

                LOG(ESOCKET, EInfo, "MOBINFO  returning property CellId");

                TBuf<KMaxPropertySize> disp;

                disp.Num(locationArea.iCellId, EDecimal);

                telephonyProperty = disp.AllocL();

            }

            else // COUNTRY_CODE

            {

                LOG(ESOCKET, EInfo, "MOBINFO  retrieving CountryCode");

                RMobilePhone::TMobilePhoneOPlmnV3 locInfo;

                RMobilePhone::TMobilePhoneOPlmnV3Pckg pckgLocInfo(locInfo);

                RMobilePhone::TMobilePhoneNetworkNameV3 networkName;

                RMobilePhone::TMobilePhoneNetworkNameV3Pckg pckgNetworkName(

                    networkName);

                aMobilePhone.GetCurrentNetworkName(status, pckgNetworkName,

                                                   pckgLocInfo);

                User::WaitForRequest(status);

                User::LeaveIfError(status.Int());

                LOG(ESOCKET, EInfo, "MOBINFO  returning property CountryCode");

                telephonyProperty = (locInfo.iCountryCode).AllocL();

            }

        }

    }

    else if (aProperty == NETWORK_SIGNAL)

    {

        // Check Signal related Caps

        TUint32 signalCaps;

        LOG(ESOCKET, EInfo, "MOBINFO  Checking phone SignalCaps");

        TInt signalCapsStatus = aMobilePhone.GetSignalCaps(signalCaps);

        LOG1(ESOCKET, EInfo, "MOBINFO  Checking signal caps status=%D",

             signalCapsStatus);

        if (signalCapsStatus == KErrNone)

        {

            TRequestStatus status;

            if (signalCaps & RMobilePhone::KCapsGetSignalStrength)

            {

                LOG(ESOCKET, EInfo, "MOBINFO  retrieving SignalStrength");

                TInt32 signalStrength;

                TInt8 bar;

                aMobilePhone.GetSignalStrength(status, signalStrength, bar);

                User::WaitForRequest(status);

                User::LeaveIfError(status.Int());

                LOG(ESOCKET, EInfo,

                    "MOBINFO  returning property SignalStrength");

                _LIT(KStringFormat, "%d (%d dBm)");

                TBuf<KMaxPropertySize> disp;

                disp.Format(KStringFormat, bar, signalStrength);

                telephonyProperty = disp.AllocL();

            }

        }

    }

    else if (aProperty == NETWORKSTATUS)

    {

        // Check network status

        LOG(ESOCKET, EInfo, "MOBINFO  Checking network status");

        // Check NetworkCaps

        TUint32 networkCaps;

        TInt networkCapsStatus = aMobilePhone.GetNetworkCaps(networkCaps);

        LOG1(ESOCKET, EInfo, "MOBINFO  Checking network caps status=%D",

             networkCapsStatus);

        if (networkCapsStatus == KErrNone)

        {

            TRequestStatus status;

            RMobilePhone::TMobilePhoneRegistrationStatus networkStatus;

            aMobilePhone.GetNetworkRegistrationStatus(status, networkStatus);

            User::WaitForRequest(status);

            User::LeaveIfError(status.Int());

            switch (networkStatus)

            {

            case RMobilePhone::ERegisteredOnHomeNetwork:

            case RMobilePhone::ERegisteredBusy:

                telephonyProperty = KNetworkStatusHome().AllocL();

                break;

            case RMobilePhone::ERegisteredRoaming:

                telephonyProperty = KNetworkStatusRoaming().AllocL();

                break;

            default:

                telephonyProperty = KNetworkStatusUnknown().AllocL();

                break;

            }

        }

        LOG(ESOCKET, EInfo, "MOBINFO  returning property NetworkStatus");

    }