os/kernelhwsrv/kerneltest/e32test/dll/t_dlla1.cpp
author sl@SLION-WIN7.fritz.box
Fri, 15 Jun 2012 03:10:57 +0200
changeset 0 bde4ae8d615e
permissions -rw-r--r--
First public contribution.
     1 // Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).
     2 // All rights reserved.
     3 // This component and the accompanying materials are made available
     4 // under the terms of the License "Eclipse Public License v1.0"
     5 // which accompanies this distribution, and is available
     6 // at the URL "http://www.eclipse.org/legal/epl-v10.html".
     7 //
     8 // Initial Contributors:
     9 // Nokia Corporation - initial contribution.
    10 //
    11 // Contributors:
    12 //
    13 // Description:
    14 // e32test\dll\t_dlla1.cpp
    15 // 
    16 //
    17 
    18 #include <e32svr.h>
    19 
    20 const TInt KAmountOfBss=0x1004;
    21 TInt someBss[KAmountOfBss];
    22 
    23 TInt somedata=0;
    24 TFullName ProcessName(RProcess().FullName());
    25 TFullName ThreadName(RThread().FullName());
    26 
    27 
    28 TInt AnyOldFunction()
    29 	{
    30 	return 0x56789012;
    31 	}
    32 TInt (*function)()=&AnyOldFunction;
    33 
    34 EXPORT_C TInt AFunction()
    35 	{
    36 	if ((*function)()!=0x56789012)
    37 		return KErrGeneral;
    38 	TInt i;
    39 	for (i=0; i<KAmountOfBss; i++)
    40 		{
    41 		if (someBss[i]!=0)
    42 			{
    43 //			RDebug::Print(_L("i=%x addr %08x  data %08x"),i,&someBss[i], someBss[i]);
    44 			return KErrArgument;
    45 			}
    46 		}
    47 	return KErrNone;
    48 	}
    49 
    50 EXPORT_C TInt Inc()
    51 	{ return ++somedata; }
    52 
    53 EXPORT_C TFullName& GetProcessName()
    54 	{
    55 	return ProcessName;
    56 	}
    57 
    58 EXPORT_C TFullName& GetThreadName()
    59 	{
    60 	return ThreadName;
    61 	}
    62