services/terminalmodeservice/src/upnptmclientprofileservice.cpp
author hgs
Fri, 23 Jul 2010 08:57:49 +0300
changeset 24 e9457ebcc4df
child 26 b6b8e90f9863
permissions -rw-r--r--
201029
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
24
hgs
parents:
diff changeset
     1
/**
hgs
parents:
diff changeset
     2
* Copyright (c) 2010 Nokia Corporation and/or its subsidiary(-ies).
hgs
parents:
diff changeset
     3
* All rights reserved.
hgs
parents:
diff changeset
     4
* This component and the accompanying materials are made available
hgs
parents:
diff changeset
     5
* under the terms of "Eclipse Public License v1.0"
hgs
parents:
diff changeset
     6
* which accompanies this distribution, and is available
hgs
parents:
diff changeset
     7
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
hgs
parents:
diff changeset
     8
*
hgs
parents:
diff changeset
     9
* Initial Contributors:
hgs
parents:
diff changeset
    10
* Nokia Corporation - initial contribution.
hgs
parents:
diff changeset
    11
*
hgs
parents:
diff changeset
    12
* Contributors:
hgs
parents:
diff changeset
    13
*
hgs
parents:
diff changeset
    14
* Description: CUpnpTmClientProfileService class implementation.
hgs
parents:
diff changeset
    15
*
hgs
parents:
diff changeset
    16
*/
hgs
parents:
diff changeset
    17
hgs
parents:
diff changeset
    18
// System includes
hgs
parents:
diff changeset
    19
#include <upnpdevice.h>
hgs
parents:
diff changeset
    20
#include <upnpservice.h>
hgs
parents:
diff changeset
    21
hgs
parents:
diff changeset
    22
//User includes
hgs
parents:
diff changeset
    23
#include "upnptmclientprofileservice.h"
hgs
parents:
diff changeset
    24
#include "upnptmserverdevice.h"
hgs
parents:
diff changeset
    25
#include "upnptmserverimpl.h"
hgs
parents:
diff changeset
    26
#include "OstTraceDefinitions.h"
hgs
parents:
diff changeset
    27
#ifdef OST_TRACE_COMPILER_IN_USE
hgs
parents:
diff changeset
    28
#include "upnptmclientprofileserviceTraces.h"
hgs
parents:
diff changeset
    29
#endif
hgs
parents:
diff changeset
    30
hgs
parents:
diff changeset
    31
hgs
parents:
diff changeset
    32
//Defines different action names ,their arguments and their related state variables
hgs
parents:
diff changeset
    33
_LIT8(KGetMaxNumProfiles,              "GetMaxNumProfiles");
hgs
parents:
diff changeset
    34
_LIT8(KSetClientProfile,               "SetClientProfile");
hgs
parents:
diff changeset
    35
_LIT8(KGetClientProfile,               "GetClientProfile");
hgs
parents:
diff changeset
    36
_LIT8(KProfileId,                      "profileID");
hgs
parents:
diff changeset
    37
_LIT8(KClientProfile ,                 "clientProfile");
hgs
parents:
diff changeset
    38
_LIT8(KResultProfile ,                 "resultProfile");
hgs
parents:
diff changeset
    39
_LIT8(KNumProfilesAllowed ,            "numProfilesAllowed");
hgs
parents:
diff changeset
    40
_LIT8(KArgTypeUnusedProfileIds,        "UnusedProfileIDs");
hgs
parents:
diff changeset
    41
_LIT8(KArgTypeClientProfile,           "A_ARG_TYPE_ClientProfile");
hgs
parents:
diff changeset
    42
_LIT8(KArgTypeMaxProfiles,             "MaxNumProfiles");
hgs
parents:
diff changeset
    43
_LIT8(KArgTypeProfileId,               "A_ARG_TYPE_ProfileID");
hgs
parents:
diff changeset
    44
hgs
parents:
diff changeset
    45
hgs
parents:
diff changeset
    46
// ================= MEMBER FUNCTIONS ==============================================
hgs
parents:
diff changeset
    47
hgs
parents:
diff changeset
    48
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    49
// CUpnpTmClientProfileService::CUpnpTmClientProfileService
hgs
parents:
diff changeset
    50
// C++ default constructor can NOT contain any code, that
hgs
parents:
diff changeset
    51
// might leave.
hgs
parents:
diff changeset
    52
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    53
//
hgs
parents:
diff changeset
    54
CUpnpTmClientProfileService::CUpnpTmClientProfileService( CUpnpDevice& aUpnpDevice,CUpnpTmServerImpl& aTmServerImpl )
hgs
parents:
diff changeset
    55
    :CUpnpServiceImplementation(aUpnpDevice),iUpnpDevice(aUpnpDevice), iTmServerImpl(aTmServerImpl)
hgs
parents:
diff changeset
    56
    {
hgs
parents:
diff changeset
    57
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_CUPNPTMCLIENTPROFILESERVICE_ENTRY );
hgs
parents:
diff changeset
    58
    
hgs
parents:
diff changeset
    59
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_CUPNPTMCLIENTPROFILESERVICE_EXIT );
hgs
parents:
diff changeset
    60
    }
hgs
parents:
diff changeset
    61
hgs
parents:
diff changeset
    62
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    63
// CUpnpTmClientProfileService::~CUpnpTmClientProfileService
hgs
parents:
diff changeset
    64
// C++ default destructor
hgs
parents:
diff changeset
    65
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    66
//
hgs
parents:
diff changeset
    67
CUpnpTmClientProfileService::~CUpnpTmClientProfileService()
hgs
parents:
diff changeset
    68
    {
hgs
parents:
diff changeset
    69
hgs
parents:
diff changeset
    70
    }
hgs
parents:
diff changeset
    71
hgs
parents:
diff changeset
    72
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    73
// CUpnpTmClientProfileService::ConstructL
hgs
parents:
diff changeset
    74
// Two-phased constructor.
hgs
parents:
diff changeset
    75
// Initialize variables, set parent service and create XML reader.
hgs
parents:
diff changeset
    76
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    77
//
hgs
parents:
diff changeset
    78
void CUpnpTmClientProfileService::ConstructL(const TDesC& aDescriptionPath )
hgs
parents:
diff changeset
    79
    {
hgs
parents:
diff changeset
    80
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_CONSTRUCTL_ENTRY );
hgs
parents:
diff changeset
    81
    _LIT8( KServiceType, "TmClientProfile:1" );
hgs
parents:
diff changeset
    82
    BaseConstructL( aDescriptionPath, KServiceType);
hgs
parents:
diff changeset
    83
hgs
parents:
diff changeset
    84
    SetStateVariableL( KArgTypeUnusedProfileIds, KEmptyString, EFalse );
hgs
parents:
diff changeset
    85
    SetStateVariableL( KArgTypeClientProfile, KEmptyString, EFalse );
hgs
parents:
diff changeset
    86
    SetStateVariableL( KArgTypeMaxProfiles, KEmptyString, EFalse );
hgs
parents:
diff changeset
    87
    SetStateVariableL( KArgTypeProfileId, KEmptyString, EFalse );
hgs
parents:
diff changeset
    88
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_CONSTRUCTL_EXIT );
hgs
parents:
diff changeset
    89
    }
hgs
parents:
diff changeset
    90
hgs
parents:
diff changeset
    91
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    92
// CUpnpTmClientProfileService::NewL
hgs
parents:
diff changeset
    93
// Two-phased constructor.
hgs
parents:
diff changeset
    94
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
    95
//
hgs
parents:
diff changeset
    96
CUpnpTmClientProfileService* CUpnpTmClientProfileService::NewL(CUpnpDevice& aUpnpDevice, const TDesC& aDescriptionPath, CUpnpTmServerImpl& aTmServerImp )
hgs
parents:
diff changeset
    97
    {
hgs
parents:
diff changeset
    98
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_NEWL_ENTRY );
hgs
parents:
diff changeset
    99
    CUpnpTmClientProfileService* clientProfileService = new (ELeave) CUpnpTmClientProfileService(aUpnpDevice, aTmServerImp);
hgs
parents:
diff changeset
   100
    CleanupStack::PushL( clientProfileService );
hgs
parents:
diff changeset
   101
    clientProfileService->ConstructL( aDescriptionPath );
hgs
parents:
diff changeset
   102
    CleanupStack::Pop( clientProfileService );
hgs
parents:
diff changeset
   103
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_NEWL_EXIT );
hgs
parents:
diff changeset
   104
    return clientProfileService;
hgs
parents:
diff changeset
   105
    }
hgs
parents:
diff changeset
   106
hgs
parents:
diff changeset
   107
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   108
// CUpnpTmClientProfileService::ActionReceivedLD
hgs
parents:
diff changeset
   109
// @param aAction action received from the client
hgs
parents:
diff changeset
   110
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   111
//
hgs
parents:
diff changeset
   112
void CUpnpTmClientProfileService::ActionReceivedLD( CUpnpAction* aAction )
hgs
parents:
diff changeset
   113
    {
hgs
parents:
diff changeset
   114
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_ACTIONRECEIVEDLD_ENTRY );
hgs
parents:
diff changeset
   115
    if ( !aAction )
hgs
parents:
diff changeset
   116
        {
hgs
parents:
diff changeset
   117
        User::Leave( KErrNotFound );
hgs
parents:
diff changeset
   118
        }
hgs
parents:
diff changeset
   119
    CleanupStack::PushL( aAction );
hgs
parents:
diff changeset
   120
    TUpnpErrorCode eCode = EHttpOk;
hgs
parents:
diff changeset
   121
    
hgs
parents:
diff changeset
   122
    // Get the name, saves calls in the if-else statements
hgs
parents:
diff changeset
   123
    TPtrC8 name( aAction->Name() );
hgs
parents:
diff changeset
   124
    // Verify the action and do the operation(s)
hgs
parents:
diff changeset
   125
    if ( name.Compare( KGetMaxNumProfiles ) == 0 )
hgs
parents:
diff changeset
   126
        {
hgs
parents:
diff changeset
   127
        eCode = GetMaxNumProfilesActionL( aAction );
hgs
parents:
diff changeset
   128
        }
hgs
parents:
diff changeset
   129
    else if ( name.Compare( KSetClientProfile ) == 0 )
hgs
parents:
diff changeset
   130
        {
hgs
parents:
diff changeset
   131
        eCode = SetClientProfileActionL( aAction );
hgs
parents:
diff changeset
   132
        }
hgs
parents:
diff changeset
   133
    else if ( name.Compare( KGetClientProfile ) == 0 )
hgs
parents:
diff changeset
   134
        {
hgs
parents:
diff changeset
   135
        eCode = GetClientProfileActionL ( aAction );
hgs
parents:
diff changeset
   136
        }
hgs
parents:
diff changeset
   137
    else
hgs
parents:
diff changeset
   138
        {
hgs
parents:
diff changeset
   139
        eCode = EInvalidAction;
hgs
parents:
diff changeset
   140
        }
hgs
parents:
diff changeset
   141
    SendL( aAction, eCode );
hgs
parents:
diff changeset
   142
    CleanupStack::PopAndDestroy( aAction );
hgs
parents:
diff changeset
   143
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_ACTIONRECEIVEDLD_EXIT );
hgs
parents:
diff changeset
   144
    }
hgs
parents:
diff changeset
   145
hgs
parents:
diff changeset
   146
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   147
// CUpnpTmClientProfileService::GetMaxNumProfilesActionL
hgs
parents:
diff changeset
   148
// @param aAction pointer to action object
hgs
parents:
diff changeset
   149
// @return Returns upnp error code
hgs
parents:
diff changeset
   150
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   151
//
hgs
parents:
diff changeset
   152
TUpnpErrorCode CUpnpTmClientProfileService::GetMaxNumProfilesActionL( CUpnpAction* aAction )
hgs
parents:
diff changeset
   153
   {
hgs
parents:
diff changeset
   154
   OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_GETMAXNUMPROFILESACTIONL_ENTRY );
hgs
parents:
diff changeset
   155
   TUint profileCount;
hgs
parents:
diff changeset
   156
   TTerminalModeErrorCode ret = iTmServerImpl.GetMaxNumProfiles( profileCount );
hgs
parents:
diff changeset
   157
   if ( ret != ETerminalModeSuccess ) 
hgs
parents:
diff changeset
   158
       {
hgs
parents:
diff changeset
   159
       OstTrace0( TRACE_ERROR, DUP1_CUPNPTMCLIENTPROFILESERVICE_GETMAXNUMPROFILESACTIONL, "CUpnpTmClientProfileService::GetMaxNumProfilesActionL" );
hgs
parents:
diff changeset
   160
       return TUpnpErrorCode( ret );       
hgs
parents:
diff changeset
   161
       } 
hgs
parents:
diff changeset
   162
   OstTrace1( TRACE_NORMAL, CUPNPTMCLIENTPROFILESERVICE_GETMAXNUMPROFILESACTIONL, "CUpnpTmClientProfileService::GetMaxNumProfilesActionL;profileCount=%d", profileCount );      
hgs
parents:
diff changeset
   163
   TBuf8<UpnpString::KMaxTUintLength> countBuf;
hgs
parents:
diff changeset
   164
   countBuf.Num(profileCount);
hgs
parents:
diff changeset
   165
   
hgs
parents:
diff changeset
   166
   aAction->SetArgumentL( KNumProfilesAllowed, countBuf ); 
hgs
parents:
diff changeset
   167
   OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_GETMAXNUMPROFILESACTIONL_EXIT );
hgs
parents:
diff changeset
   168
   return EHttpOk;
hgs
parents:
diff changeset
   169
   }
hgs
parents:
diff changeset
   170
hgs
parents:
diff changeset
   171
// -------------------------------------------------------------------------------------
hgs
parents:
diff changeset
   172
// CUpnpTmClientProfileService::SetClientProfileActionL
hgs
parents:
diff changeset
   173
// @param aAction  Pointer to UPnP action object
hgs
parents:
diff changeset
   174
// @return Returns upnp error code
hgs
parents:
diff changeset
   175
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   176
//
hgs
parents:
diff changeset
   177
TUpnpErrorCode CUpnpTmClientProfileService::SetClientProfileActionL( CUpnpAction* aAction )
hgs
parents:
diff changeset
   178
    {
hgs
parents:
diff changeset
   179
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_SETCLIENTPROFILEACTIONL_ENTRY );
hgs
parents:
diff changeset
   180
    TUint profileIdInt;
hgs
parents:
diff changeset
   181
    // Validates the input parameter(profileID)
hgs
parents:
diff changeset
   182
    if ( ConvertDescriptorToInt( aAction->ArgumentValue(KProfileId), profileIdInt ) != KErrNone )
hgs
parents:
diff changeset
   183
         {
hgs
parents:
diff changeset
   184
         OstTrace1( TRACE_ERROR, CUPNPTMCLIENTPROFILESERVICE_SETCLIENTPROFILEACTIONL, "CUpnpTmClientProfileService::SetClientProfileActionL;profileIdInt=%d", profileIdInt );      
hgs
parents:
diff changeset
   185
         return EInvalidArgs;   // invalid profile ID
hgs
parents:
diff changeset
   186
         }  
hgs
parents:
diff changeset
   187
    const TDesC8& clientProfile = aAction->ArgumentValue(KClientProfile);
hgs
parents:
diff changeset
   188
    
hgs
parents:
diff changeset
   189
    RBuf8 resultProfileBuf;
hgs
parents:
diff changeset
   190
    TTerminalModeErrorCode ret = iTmServerImpl.SetClientProfile( profileIdInt,clientProfile,resultProfileBuf );
hgs
parents:
diff changeset
   191
    if ( ret != ETerminalModeSuccess )
hgs
parents:
diff changeset
   192
       {
hgs
parents:
diff changeset
   193
       resultProfileBuf.Close();
hgs
parents:
diff changeset
   194
       OstTrace0( TRACE_ERROR, DUP1_CUPNPTMCLIENTPROFILESERVICE_SETCLIENTPROFILEACTIONL, "CUpnpTmClientProfileService::SetClientProfileActionL" );
hgs
parents:
diff changeset
   195
       return TUpnpErrorCode( ret );
hgs
parents:
diff changeset
   196
       }
hgs
parents:
diff changeset
   197
    CleanupClosePushL(resultProfileBuf);
hgs
parents:
diff changeset
   198
    aAction->SetArgumentL( KResultProfile , resultProfileBuf );
hgs
parents:
diff changeset
   199
    CleanupStack::PopAndDestroy(&resultProfileBuf);
hgs
parents:
diff changeset
   200
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_SETCLIENTPROFILEACTIONL_EXIT );
hgs
parents:
diff changeset
   201
    return EHttpOk;  
hgs
parents:
diff changeset
   202
    }
hgs
parents:
diff changeset
   203
hgs
parents:
diff changeset
   204
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   205
// CUpnpTmClientProfileService::GetClientProfileActionL
hgs
parents:
diff changeset
   206
// @param aAction pointer to action object
hgs
parents:
diff changeset
   207
// @return Returns upnp error code
hgs
parents:
diff changeset
   208
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   209
//
hgs
parents:
diff changeset
   210
TUpnpErrorCode CUpnpTmClientProfileService::GetClientProfileActionL( CUpnpAction* aAction )
hgs
parents:
diff changeset
   211
    { 
hgs
parents:
diff changeset
   212
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_GETCLIENTPROFILEACTIONL_ENTRY );
hgs
parents:
diff changeset
   213
    TUint profileIdInt;
hgs
parents:
diff changeset
   214
    // Validates the input parameter(profileID)
hgs
parents:
diff changeset
   215
    if ( ConvertDescriptorToInt( aAction->ArgumentValue(KProfileId), profileIdInt ) != KErrNone )
hgs
parents:
diff changeset
   216
         {
hgs
parents:
diff changeset
   217
         OstTrace1( TRACE_ERROR, CUPNPTMCLIENTPROFILESERVICE_GETCLIENTPROFILEACTIONL, "CUpnpTmClientProfileService::GetClientProfileActionL;profileIdInt=%d", profileIdInt );        
hgs
parents:
diff changeset
   218
         return EInvalidArgs;   // invalid profile ID
hgs
parents:
diff changeset
   219
         }
hgs
parents:
diff changeset
   220
    
hgs
parents:
diff changeset
   221
    RBuf8 resultProfileBuf;
hgs
parents:
diff changeset
   222
    TTerminalModeErrorCode ret = iTmServerImpl.GetClientProfile(profileIdInt,resultProfileBuf );
hgs
parents:
diff changeset
   223
    
hgs
parents:
diff changeset
   224
    if ( ret != ETerminalModeSuccess )
hgs
parents:
diff changeset
   225
       {
hgs
parents:
diff changeset
   226
       resultProfileBuf.Close();
hgs
parents:
diff changeset
   227
       OstTrace0( TRACE_ERROR, DUP1_CUPNPTMCLIENTPROFILESERVICE_GETCLIENTPROFILEACTIONL, "CUpnpTmClientProfileService::GetClientProfileActionL" ); 
hgs
parents:
diff changeset
   228
       return TUpnpErrorCode( ret );
hgs
parents:
diff changeset
   229
       }
hgs
parents:
diff changeset
   230
    CleanupClosePushL(resultProfileBuf);
hgs
parents:
diff changeset
   231
    aAction->SetArgumentL( KClientProfile,resultProfileBuf ); 
hgs
parents:
diff changeset
   232
    CleanupStack::PopAndDestroy(&resultProfileBuf);
hgs
parents:
diff changeset
   233
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_GETCLIENTPROFILEACTIONL_EXIT );
hgs
parents:
diff changeset
   234
    return EHttpOk;   
hgs
parents:
diff changeset
   235
    }
hgs
parents:
diff changeset
   236
hgs
parents:
diff changeset
   237
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   238
// CUpnpTmAppServerService::UnusedProfileIdEventL
hgs
parents:
diff changeset
   239
// Notifies the client about the status updates.
hgs
parents:
diff changeset
   240
// @param aUnusedProfileIdBuffer Buffer holding the unused profile IDs information.
hgs
parents:
diff changeset
   241
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   242
//
hgs
parents:
diff changeset
   243
void CUpnpTmClientProfileService::UnUsedProfileIdEventL(const TDesC8& aUnusedProfileIdBuffer)
hgs
parents:
diff changeset
   244
    {
hgs
parents:
diff changeset
   245
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_UNUSEDPROFILEIDEVENTL_ENTRY );
hgs
parents:
diff changeset
   246
    SetStateVariableL( KArgTypeUnusedProfileIds, aUnusedProfileIdBuffer, EFalse);
hgs
parents:
diff changeset
   247
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_UNUSEDPROFILEIDEVENTL_EXIT );
hgs
parents:
diff changeset
   248
    }
hgs
parents:
diff changeset
   249
hgs
parents:
diff changeset
   250
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   251
// CUpnpTmClientProfileService::ConvertDescriptorToInt
hgs
parents:
diff changeset
   252
// Utility method to convert descriptor to integer
hgs
parents:
diff changeset
   253
// @param aDes descriptor
hgs
parents:
diff changeset
   254
// @param[out] aIntVal Integer value
hgs
parents:
diff changeset
   255
// @return Returns error code
hgs
parents:
diff changeset
   256
// ---------------------------------------------------------------------------------
hgs
parents:
diff changeset
   257
//
hgs
parents:
diff changeset
   258
TInt CUpnpTmClientProfileService::ConvertDescriptorToInt( const TDesC8& aDes, TUint& aIntVal )
hgs
parents:
diff changeset
   259
    {
hgs
parents:
diff changeset
   260
    OstTraceFunctionEntry0( CUPNPTMCLIENTPROFILESERVICE_CONVERTDESCRIPTORTOINT_ENTRY );
hgs
parents:
diff changeset
   261
    aIntVal = KErrNone;
hgs
parents:
diff changeset
   262
    TLex8 lex( aDes );
hgs
parents:
diff changeset
   263
    OstTrace1( TRACE_NORMAL, CUPNPTMCLIENTPROFILESERVICE_CONVERTDESCRIPTORTOINT, "CUpnpTmClientProfileService::ConvertDescriptorToInt;aIntVal=%u", aIntVal );
hgs
parents:
diff changeset
   264
    OstTraceFunctionExit0( CUPNPTMCLIENTPROFILESERVICE_CONVERTDESCRIPTORTOINT_EXIT );
hgs
parents:
diff changeset
   265
    return lex.Val(aIntVal);  
hgs
parents:
diff changeset
   266
    }
hgs
parents:
diff changeset
   267
hgs
parents:
diff changeset
   268
//End of File