1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/os/kernelhwsrv/kerneltest/e32test/dll/t_dlla1.cpp	Fri Jun 15 03:10:57 2012 +0200
     1.3 @@ -0,0 +1,62 @@
     1.4 +// Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).
     1.5 +// All rights reserved.
     1.6 +// This component and the accompanying materials are made available
     1.7 +// under the terms of the License "Eclipse Public License v1.0"
     1.8 +// which accompanies this distribution, and is available
     1.9 +// at the URL "http://www.eclipse.org/legal/epl-v10.html".
    1.10 +//
    1.11 +// Initial Contributors:
    1.12 +// Nokia Corporation - initial contribution.
    1.13 +//
    1.14 +// Contributors:
    1.15 +//
    1.16 +// Description:
    1.17 +// e32test\dll\t_dlla1.cpp
    1.18 +// 
    1.19 +//
    1.20 +
    1.21 +#include <e32svr.h>
    1.22 +
    1.23 +const TInt KAmountOfBss=0x1004;
    1.24 +TInt someBss[KAmountOfBss];
    1.25 +
    1.26 +TInt somedata=0;
    1.27 +TFullName ProcessName(RProcess().FullName());
    1.28 +TFullName ThreadName(RThread().FullName());
    1.29 +
    1.30 +
    1.31 +TInt AnyOldFunction()
    1.32 +	{
    1.33 +	return 0x56789012;
    1.34 +	}
    1.35 +TInt (*function)()=&AnyOldFunction;
    1.36 +
    1.37 +EXPORT_C TInt AFunction()
    1.38 +	{
    1.39 +	if ((*function)()!=0x56789012)
    1.40 +		return KErrGeneral;
    1.41 +	TInt i;
    1.42 +	for (i=0; i<KAmountOfBss; i++)
    1.43 +		{
    1.44 +		if (someBss[i]!=0)
    1.45 +			{
    1.46 +//			RDebug::Print(_L("i=%x addr %08x  data %08x"),i,&someBss[i], someBss[i]);
    1.47 +			return KErrArgument;
    1.48 +			}
    1.49 +		}
    1.50 +	return KErrNone;
    1.51 +	}
    1.52 +
    1.53 +EXPORT_C TInt Inc()
    1.54 +	{ return ++somedata; }
    1.55 +
    1.56 +EXPORT_C TFullName& GetProcessName()
    1.57 +	{
    1.58 +	return ProcessName;
    1.59 +	}
    1.60 +
    1.61 +EXPORT_C TFullName& GetThreadName()
    1.62 +	{
    1.63 +	return ThreadName;
    1.64 +	}
    1.65 +