sl@0: // Copyright (c) 1998-2009 Nokia Corporation and/or its subsidiary(-ies).
sl@0: // All rights reserved.
sl@0: // This component and the accompanying materials are made available
sl@0: // under the terms of "Eclipse Public License v1.0"
sl@0: // which accompanies this distribution, and is available
sl@0: // at the URL "http://www.eclipse.org/legal/epl-v10.html".
sl@0: //
sl@0: // Initial Contributors:
sl@0: // Nokia Corporation - initial contribution.
sl@0: //
sl@0: // Contributors:
sl@0: //
sl@0: // Description:
sl@0: //
sl@0: 
sl@0: // MSVC++ up to 5.0 has problems with expanding inline functions
sl@0: // This disables the mad warnings for the whole project
sl@0: #if defined(NDEBUG) && defined(__VC32__) && _MSC_VER<=1100
sl@0: #pragma warning(disable : 4710)			// function not expanded. MSVC 5.0 is stupid
sl@0: #endif
sl@0: 
sl@0: #include <d32dbms.h>
sl@0: #include <e32test.h>
sl@0: #include <s32file.h>
sl@0: 
sl@0: LOCAL_D CTrapCleanup* TheTrapCleanup;
sl@0: LOCAL_D RFs TheFs;
sl@0: LOCAL_D RDbs TheDbs;
sl@0: LOCAL_D RDbNamedDatabase TheDatabase;
sl@0: LOCAL_D RDbTable TheTable;
sl@0: LOCAL_D RDbView TheView;
sl@0: 
sl@0: const TInt KTestCleanupStack=0x20;
sl@0: const TPtrC KTestDatabase=_L("C:\\DBMS-TST\\T_LIMIT.DB");
sl@0: const TPtrC KTableName(_S("TestTable"));
sl@0: 
sl@0: const TPtrC KColFormat=_L("c%d");
sl@0: 
sl@0: LOCAL_D RTest test(_L("t_dblimit - testing table limits"));
sl@0: 
sl@0: const TInt KRecordLimit=8200;
sl@0: const TInt KMinInlineLimit=16;
sl@0: const TInt KMaxInlineLimit=255;
sl@0: 
sl@0: // expected maxima for record structure
sl@0: const TInt KMaxColInt64NN=1025;
sl@0: const TInt KMaxColText8=32;
sl@0: const TInt KMaxColText16=16;
sl@0: const TInt KMaxColLongText8=504;
sl@0: 
sl@0: 
sl@0: LOCAL_C TBool FitBlob(TInt aCount)
sl@0: //
sl@0: // Matches heuristics in DBMS
sl@0: //
sl@0: 	{
sl@0: 	TInt used=(aCount*(2+(KMinInlineLimit<<3))+7)>>3;
sl@0: 	return used<=KRecordLimit;
sl@0: 	}
sl@0: 
sl@0: LOCAL_C TInt InlineLimit(TInt aCount)
sl@0: //
sl@0: // Matches heuristics in DBMS
sl@0: //
sl@0: 	{
sl@0: 	TInt used=(aCount*(2+(KMinInlineLimit<<3))+7)>>3;
sl@0: 	TInt space=(KRecordLimit-used);//>>1;
sl@0: 	TInt inl=space/aCount+KMinInlineLimit-1;
sl@0: 	return Min(inl,KMaxInlineLimit);
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void OpenDatabase()
sl@0: //
sl@0: // Open the database
sl@0: //
sl@0: 	{
sl@0: 	test (TheDatabase.Open(TheDbs,KTestDatabase)==KErrNone);
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void CloseDatabase()
sl@0: 	{
sl@0: 	TheDatabase.Close();
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void CreateDatabase()
sl@0: //
sl@0: // Create the database-in-a-store
sl@0: //
sl@0: 	{
sl@0: 	test (TheDatabase.Replace(TheFs,KTestDatabase)==KErrNone);
sl@0: 	CloseDatabase();
sl@0: 	OpenDatabase();
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void DestroyDatabase()
sl@0: 	{
sl@0: 	test (TheDatabase.Destroy()==KErrNone);
sl@0: 	}
sl@0: 
sl@0: LOCAL_C CDbColSet* SetLC(TDbCol& aCol,TInt aCount)
sl@0: 	{
sl@0: 	CDbColSet* set=CDbColSet::NewLC();
sl@0: 	TDbColName name;
sl@0: 	while (--aCount>=0)
sl@0: 		{
sl@0: 		name.Format(KColFormat,aCount);
sl@0: 		aCol.iName=name;
sl@0: 		set->AddL(aCol);
sl@0: 		}
sl@0: 	return set;
sl@0: 	}
sl@0: 
sl@0: LOCAL_C TBool TestL(TDbCol& aCol,TInt aCount)
sl@0: 	{
sl@0: 	test.Printf(_L("\rtesting %d    "),aCount);
sl@0: 	CDbColSet* set=SetLC(aCol,aCount);
sl@0: 	TInt r;
sl@0: 	r=TheDatabase.CreateTable(KTableName,*set);
sl@0: 	if (r==KErrNone)
sl@0: 		{
sl@0: 		CDbColSet* comp=TheDatabase.ColSetL(KTableName);
sl@0: 		test (comp->Count()==aCount);
sl@0: 		delete comp;
sl@0: 		}
sl@0: 	CleanupStack::PopAndDestroy();
sl@0: 	if (r==KErrTooBig)
sl@0: 		return EFalse;
sl@0: 	test (r==KErrNone);
sl@0: 	test (TheDatabase.DropTable(KTableName)==KErrNone);
sl@0: 	return ETrue;
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: See how many columns of this sort can be used
sl@0: 
sl@0: @SYMTestCaseID          SYSLIB-DBMS-CT-0631
sl@0: @SYMTestCaseDesc        Tests for maximum limits on a Table
sl@0: @SYMTestPriority        Medium
sl@0: @SYMTestActions         Tests for creating a table with maximum number of columns
sl@0: @SYMTestExpectedResults Test must not fail
sl@0: @SYMREQ                 REQ0000
sl@0: */
sl@0: LOCAL_C TInt TestTypeL(TDbCol& aCol)
sl@0: 	{
sl@0: 	CreateDatabase();
sl@0: 	TInt ii=1;
sl@0: 	for (;;)
sl@0: 		{
sl@0: 		if (!TestL(aCol,ii))
sl@0: 			break;
sl@0: 		ii<<=1;
sl@0: 		}
sl@0: 	TInt lim=ii>>=1;
sl@0: 	test (lim>0);
sl@0: 	while ((ii>>=1)>0)
sl@0: 		{	// ok<=max<ok+ii*2
sl@0: 		if (TestL(aCol,lim+ii))
sl@0: 			lim+=ii;
sl@0: 		}
sl@0: 	DestroyDatabase();
sl@0: 	test.Printf(_L("\r   create %d     \n"),lim);
sl@0: 	return lim;
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void StretchRecordL()
sl@0: 	{
sl@0: 	CreateDatabase();
sl@0: 	TDbCol col;
sl@0: 	col.iType=EDbColLongText8;
sl@0: 	col.iMaxLength=KDbUndefinedLength;
sl@0: 	col.iAttributes=0;
sl@0: 	for (TInt ii=4;FitBlob(ii);ii+=4)
sl@0: 		{
sl@0: 		test.Printf(_L("\rtesting %d    "),ii);
sl@0: 		CDbColSet* set=SetLC(col,ii);
sl@0: 		if (ii==4)
sl@0: 			test (TheDatabase.CreateTable(KTableName,*set)==KErrNone);
sl@0: 		else
sl@0: 			test (TheDatabase.AlterTable(KTableName,*set)==KErrNone);
sl@0: 		CleanupStack::PopAndDestroy();
sl@0: 		test (TheTable.Open(TheDatabase,KTableName)==KErrNone);
sl@0: 		if (ii==4)
sl@0: 			TheTable.InsertL();
sl@0: 		else
sl@0: 			{
sl@0: 			TheTable.FirstL();
sl@0: 			TheTable.UpdateL();
sl@0: 			}
sl@0: 		TBuf8<256> buf;
sl@0: 		buf.Fill('-',InlineLimit(ii)/*>>1*/);
sl@0: 		TPtrC8 ptr((const TUint8*)buf.Ptr(),buf.Size());
sl@0: 		TheTable.SetColL(ii-3,ptr);
sl@0: 		TheTable.SetColL(ii-2,ptr);
sl@0: 		TheTable.SetColL(ii-1,ptr);
sl@0: 		TheTable.SetColL(ii,ptr);
sl@0: 		TheTable.PutL();
sl@0: 		TheTable.Close();
sl@0: //		if ((ii&0x1c)==0)
sl@0: //			test (TheDatabase.Compact()==KErrNone);
sl@0: 		}
sl@0: 	test (TheDatabase.Compact()==KErrNone);
sl@0: 	test.Printf(_L("\n"));
sl@0: 	CloseDatabase();
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void doMainL()
sl@0: 	{
sl@0: 	test.Start(_L(" @SYMTestCaseID:SYSLIB-DBMS-CT-0631 TInt64 NOT NULL "));
sl@0: 	TDbCol col;
sl@0: 	col.iType=EDbColInt64;
sl@0: 	col.iMaxLength=KDbUndefinedLength;
sl@0: 	col.iAttributes=TDbCol::ENotNull;
sl@0: 	test (TestTypeL(col)==KMaxColInt64NN);
sl@0: 	test.Next(_L("Text8"));
sl@0: 	col.iType=EDbColText8;
sl@0: 	col.iAttributes=0;
sl@0: 	test (TestTypeL(col)==KMaxColText8);
sl@0: 	test.Next(_L("Text16"));
sl@0: 	col.iType=EDbColText16;
sl@0: 	test (TestTypeL(col)==KMaxColText16);
sl@0: 	test.Next(_L("LongText8"));
sl@0: 	col.iType=EDbColLongText8;
sl@0: 	test (TestTypeL(col)==KMaxColLongText8);
sl@0: 	test.Next(_L("Stretching the record"));
sl@0: 	StretchRecordL();
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void setupTestDirectory()
sl@0: //
sl@0: // Prepare the test directory.
sl@0: //
sl@0:     {
sl@0: 	TInt r=TheFs.Connect();
sl@0: 	test(r==KErrNone);
sl@0: //
sl@0: 	r=TheFs.MkDir(KTestDatabase);
sl@0: 	test(r==KErrNone || r==KErrAlreadyExists);
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void setupCleanup()
sl@0: //
sl@0: // Initialise the cleanup stack.
sl@0: //
sl@0:     {
sl@0: 	TheTrapCleanup=CTrapCleanup::New();
sl@0: 	test(TheTrapCleanup!=NULL);
sl@0: 	TRAPD(r,\
sl@0: 		{\
sl@0: 		for (TInt i=KTestCleanupStack;i>0;i--)\
sl@0: 			CleanupStack::PushL((TAny*)0);\
sl@0: 		CleanupStack::Pop(KTestCleanupStack);\
sl@0: 		});
sl@0: 	test(r==KErrNone);
sl@0: 	}
sl@0: 
sl@0: LOCAL_C void DeleteDataFile(const TDesC& aFullName)
sl@0: 	{
sl@0: 	RFs fsSession;
sl@0: 	TInt err = fsSession.Connect();
sl@0: 	if(err == KErrNone)
sl@0: 		{
sl@0: 		TEntry entry;
sl@0: 		if(fsSession.Entry(aFullName, entry) == KErrNone)
sl@0: 			{
sl@0: 			RDebug::Print(_L("Deleting \"%S\" file.\n"), &aFullName);
sl@0: 			err = fsSession.SetAtt(aFullName, 0, KEntryAttReadOnly);
sl@0: 			if(err != KErrNone)
sl@0: 				{
sl@0: 				RDebug::Print(_L("Error %d changing \"%S\" file attributes.\n"), err, &aFullName);
sl@0: 				}
sl@0: 			err = fsSession.Delete(aFullName);
sl@0: 			if(err != KErrNone)
sl@0: 				{
sl@0: 				RDebug::Print(_L("Error %d deleting \"%S\" file.\n"), err, &aFullName);
sl@0: 				}
sl@0: 			}
sl@0: 		fsSession.Close();
sl@0: 		}
sl@0: 	else
sl@0: 		{
sl@0: 		RDebug::Print(_L("Error %d connecting file session. File: %S.\n"), err, &aFullName);
sl@0: 		}
sl@0: 	}
sl@0: 
sl@0: GLDEF_C TInt E32Main()
sl@0: //
sl@0: // Test streaming conversions.
sl@0: //
sl@0:     {
sl@0: 	test.Title();
sl@0: 	setupTestDirectory();
sl@0: 	setupCleanup();
sl@0: 	test (TheDbs.Connect()==KErrNone);
sl@0: 	__UHEAP_MARK;
sl@0: //
sl@0: 	TRAPD(r,doMainL();)
sl@0: 	test(r==KErrNone);
sl@0: 
sl@0: 	::DeleteDataFile(KTestDatabase);	//deletion of data files must be done before call to end - DEF047652
sl@0: 	test.End();
sl@0: //
sl@0: 	__UHEAP_MARKEND;
sl@0: 	delete TheTrapCleanup;
sl@0: 
sl@0: 
sl@0: 
sl@0: 	TheDbs.Close();
sl@0: 	TheFs.Close();
sl@0: 	test.Close();
sl@0: 	return 0;
sl@0:     }