sl@0: // Copyright (c) 2004-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: #include <d32dbms.h>
sl@0: #include <s32file.h>
sl@0: #include <e32test.h>
sl@0: 
sl@0: static RTest TheTest(_L("t_dblongcol"));
sl@0: static CTrapCleanup* TheTrapCleanup;
sl@0: const TInt KTestCleanupStack=0x40;
sl@0: RFs TheFsSession;
sl@0: 
sl@0: _LIT( KTestDir, "c:\\DBMS-TST\\" );
sl@0: _LIT( KSearchTestDbPath, "c:\\DBMS-TST\\eposlmserachtest.ldb" );
sl@0: 
sl@0: //Delete "aFullName" file.
sl@0: static 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: ///////////////////////////////////////////////////////////////////////////////////////
sl@0: ///////////////////////////////////////////////////////////////////////////////////////
sl@0: //Tests macros and functions.
sl@0: //If (!aValue) then the test will be panicked, the test data files will be deleted.
sl@0: static void Check(TInt aValue, TInt aLine)
sl@0: 	{
sl@0: 	if(!aValue)
sl@0: 		{
sl@0: 		::DeleteDataFile(KSearchTestDbPath);
sl@0: 		TheTest(EFalse, aLine);
sl@0: 		}
sl@0: 	}
sl@0: //If (aValue != aExpected) then the test will be panicked, the test data files will be deleted.
sl@0: static void Check(TInt aValue, TInt aExpected, TInt aLine)
sl@0: 	{
sl@0: 	if(aValue != aExpected)
sl@0: 		{
sl@0: 		RDebug::Print(_L("*** Expected error: %d, got: %d\r\n"), aExpected, aValue);
sl@0: 		::DeleteDataFile(KSearchTestDbPath);
sl@0: 		TheTest(EFalse, aLine);
sl@0: 		}
sl@0: 	}
sl@0: //Use these to test conditions.
sl@0: #define TEST(arg) ::Check((arg), __LINE__)
sl@0: #define TEST2(aValue, aExpected) ::Check(aValue, aExpected, __LINE__)
sl@0: 
sl@0: ///////////////////////////////////////////////////////////////////////////////////////
sl@0: 
sl@0: static void LeaveL(TInt aLine, TInt aError)
sl@0: 	{
sl@0: 	RDebug::Print(_L("*** Leave. Error: %d, line: %d\r\n"), aError, aLine);
sl@0: 	User::Leave(aError);
sl@0: 	}
sl@0: static void LeaveIfErrorL(TInt aLine, TInt aError)
sl@0: 	{
sl@0: 	if(aError < KErrNone)
sl@0: 		{
sl@0: 		LeaveL(aLine, aError);
sl@0: 		}
sl@0: 	}
sl@0: #define __LEAVE(err) LeaveL(__LINE__, err)
sl@0: #define __LEAVE_IF_ERROR(err) LeaveIfErrorL(__LINE__, err)
sl@0: 
sl@0: ///////////////////////////////////////////////////////////////////////////////////////
sl@0: ///////////////////////////////////////////////////////////////////////////////////////
sl@0: 
sl@0: //
sl@0: // Prepare the test directory.
sl@0: //
sl@0: static void SetupTestDirectory()
sl@0:     {
sl@0: 	TInt r=TheFsSession.MkDir(KTestDir);
sl@0: 	TEST(r==KErrNone || r==KErrAlreadyExists);
sl@0: 	r=TheFsSession.SetSessionPath(KTestDir);
sl@0: 	TEST2(r,KErrNone);
sl@0: 	}
sl@0: 
sl@0: static TInt SearchForL( const TPtrC& aSearchString, RDbNamedDatabase& aDb )
sl@0: 	{
sl@0: 	_LIT( KSQLSearchStatement, "select Notes from CDs where Notes like '%S'" );
sl@0: 	TBuf<512> query;
sl@0: 	query.Format( KSQLSearchStatement, &aSearchString );
sl@0: 
sl@0: 	// Display query
sl@0: 	_LIT( KQueryFormatter, "\r\n %S\r\n" );
sl@0: 	TBuf<512> msg;
sl@0: 	msg.Format( KQueryFormatter, &query );
sl@0: 	TheTest.Printf( msg );
sl@0: 
sl@0: 	// create a view on the database
sl@0: 	RDbView view;
sl@0: 	// use EDbCompareCollated in order to search case-insensitive
sl@0: 	__LEAVE_IF_ERROR( view.Prepare( aDb, TDbQuery( query, EDbCompareCollated ) ) );
sl@0: 	__LEAVE_IF_ERROR( view.EvaluateAll() );
sl@0: 
sl@0: 	// iterate across the row set
sl@0: 	TInt noOfMatches = 0;
sl@0: 	for ( view.FirstL(); view.AtRow(); view.NextL() )
sl@0: 		{
sl@0: 		// retrieve the row
sl@0: 		view.GetL();
sl@0: 		noOfMatches++;
sl@0: 		}
sl@0: 
sl@0: 	// Display no of matches
sl@0: 	_LIT( KNoOfMatchFormatter, " Found %d matches\r\n" );
sl@0: 	msg.Format( KNoOfMatchFormatter, noOfMatches );
sl@0: 	TheTest.Printf( msg );
sl@0: 
sl@0: 	// close the view
sl@0: 	view.Close();
sl@0: 	return noOfMatches;
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: @SYMTestCaseID          SYSLIB-DBMS-CT-0645
sl@0: @SYMTestCaseDesc        Searching for data from a database
sl@0: @SYMTestPriority        Medium
sl@0: @SYMTestActions         Tests for EDbColText,EDbColLongText column type
sl@0: @SYMTestExpectedResults Test must not fail
sl@0: @SYMREQ                 REQ0000
sl@0: */
sl@0: static void TestSearchL( TInt aIndex )
sl@0: 	{
sl@0: 	// Default database
sl@0: 	_LIT( KComposer1, "Elgar" );
sl@0: 	_LIT( KCol1, "Artist" );
sl@0: 	_LIT( KCol2, "Notes" );
sl@0: 	_LIT( KTable, "CDs" );
sl@0: 
sl@0: 	TInt err = TheFsSession.Delete( KSearchTestDbPath );
sl@0: 	if ( ( err != KErrNone ) && ( err != KErrNotFound ) && ( err != KErrPathNotFound ) )
sl@0: 		{
sl@0: 		__LEAVE( err );
sl@0: 		}
sl@0: 
sl@0: 	RDbNamedDatabase db;
sl@0: 	CleanupClosePushL( db );
sl@0: 	__LEAVE_IF_ERROR( db.Create( TheFsSession, KSearchTestDbPath ) );
sl@0: 
sl@0: 	//
sl@0: 	// Create the database table
sl@0: 	//
sl@0: 	// Create a table definition
sl@0: 	CDbColSet* columns = CDbColSet::NewLC();
sl@0: 	// add the columns
sl@0: 	columns->AddL( TDbCol( KCol1, EDbColText ) );
sl@0: 	if ( aIndex == 0 )
sl@0: 		columns->AddL( TDbCol( KCol2, EDbColText ) );
sl@0: 	else
sl@0: 		columns->AddL( TDbCol( KCol2, EDbColLongText ) );
sl@0: 	// if the column is of type "EDbColText" instead,
sl@0: 	// all searching is working properly
sl@0: 	// Create a table
sl@0: 	__LEAVE_IF_ERROR( db.CreateTable( KTable, *columns ) );
sl@0: 	// cleanup the column set
sl@0: 	CleanupStack::PopAndDestroy( columns );
sl@0: 
sl@0: 	//
sl@0: 	// Add data
sl@0: 	//
sl@0: 	// create a view on the database
sl@0: 	_LIT( KSQLStatement, "select Artist,Notes from CDs order by Artist" );
sl@0: 	RDbView view;
sl@0: 	__LEAVE_IF_ERROR( view.Prepare( db, TDbQuery( KSQLStatement, EDbCompareNormal ) ) );
sl@0: 	__LEAVE_IF_ERROR( view.EvaluateAll() );
sl@0: 
sl@0: 	// Get the structure of rowset
sl@0: 	CDbColSet* colSet = view.ColSetL();
sl@0: 	// insert a row
sl@0: 	view.InsertL();
sl@0: 	view.SetColL( colSet->ColNo( KCol1 ), KComposer1 ); // Artist
sl@0: 	// Use the stream
sl@0: 	// RDbColWriteStream out;
sl@0: 	// TDbColNo col = colSet->ColNo( KCol2 ); // Ordinal position of long column
sl@0: 	//
sl@0: 	// out.OpenLC( view, col );
sl@0: 	// out.WriteL( _L( "Some additional comment here." ) );
sl@0: 	// out.Close();
sl@0: 	//
sl@0: 	// CleanupStack::PopAndDestroy(); // out
sl@0: 	view.SetColL( colSet->ColNo( KCol2 ), _L( "Some additional comment here." ) );
sl@0: 	view.PutL();
sl@0: 	// close the view
sl@0: 	view.Close();
sl@0: 	delete colSet;
sl@0: 
sl@0: 	//
sl@0: 	// Display the data
sl@0: 	//
sl@0: 	_LIT( KRowFormatter, "\r\n Artist: %S \r\n Notes: %S \r\n" );
sl@0: 	__LEAVE_IF_ERROR( view.Prepare( db, TDbQuery( KSQLStatement, EDbCompareNormal ) ) );
sl@0: 	__LEAVE_IF_ERROR( view.EvaluateAll() );
sl@0: 
sl@0: 	// Get the structure of the rowset
sl@0: 	colSet = view.ColSetL();
sl@0: 	// iterate across the row set
sl@0: 	for ( view.FirstL(); view.AtRow(); view.NextL() )
sl@0: 		{
sl@0: 		// retrieve the row
sl@0: 		view.GetL();
sl@0: 		// while the rowset is on this row, can use a TPtrC to
sl@0: 		// refer to any text columns
sl@0: 		TPtrC artist = view.ColDes( colSet->ColNo( KCol1 ) );
sl@0: 		// and a stream for long columns
sl@0: 		RDbColReadStream in;
sl@0: 		TDbColNo col = colSet->ColNo( KCol2 ); // Ordinal position of long column
sl@0: 		TBuf<256> notes; // Buffer for out notes
sl@0: 		in.OpenLC( view, col );
sl@0: 		in.ReadL( notes, view.ColLength( col ) );
sl@0: 		in.Close();
sl@0: 		CleanupStack::PopAndDestroy(); // in
sl@0: 		// Display the artist and notes
sl@0: 		TBuf<512> msg;
sl@0: 		msg.Format( KRowFormatter, &artist, &notes );
sl@0: 		TheTest.Printf( msg );
sl@0: 		}
sl@0: 	// close the view
sl@0: 	view.Close();
sl@0: 	delete colSet;
sl@0: 
sl@0: 	//
sl@0: 	// Search for the data
sl@0: 	//
sl@0: 	TInt result;
sl@0: 	result = SearchForL( _L( "Some*" ), db ); // matches
sl@0: 	TEST(result == 1);
sl@0: 	result = SearchForL( _L( "some*" ), db ); // defect causes no match, should match
sl@0: 	TEST(result == 1);
sl@0: 	result = SearchForL( _L( "*some*" ), db ); // matches
sl@0: 	TEST(result == 1);
sl@0: 	result = SearchForL( _L( "s?me*" ), db ); // matches
sl@0: 	TEST(result == 1);
sl@0: 	result = SearchForL( _L( "Some additional comment here." ), db ); // matches
sl@0: 	TEST(result == 1);
sl@0: 	result = SearchForL( _L( "some additional comment here." ), db ); // defect causes no match, should match
sl@0: 	TEST(result == 1);
sl@0: 
sl@0: 	CleanupStack::PopAndDestroy( &db );
sl@0: 	}
sl@0: 
sl@0: //
sl@0: // Initialise the cleanup stack.
sl@0: //
sl@0: static void setupCleanup()
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: 	TEST2(r,KErrNone);
sl@0: 	}
sl@0: 
sl@0: //
sl@0: // Test streaming conversions.
sl@0: //
sl@0: GLDEF_C TInt E32Main()
sl@0: 	{
sl@0: 	TheTest.Title();
sl@0: 	setupCleanup();
sl@0: 	__UHEAP_MARK;
sl@0: 
sl@0: 	TInt err = TheFsSession.Connect();
sl@0: 	TEST2(err, KErrNone);
sl@0: 	::SetupTestDirectory();
sl@0: 
sl@0: 	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-DBMS-CT-0645 Testing DBMS - EDbColText "));
sl@0: 	TRAP(err, TestSearchL( 0 ));
sl@0: 	TEST2(err,KErrNone);
sl@0: 	TheTest.Start(_L(" @SYMTestCaseID:SYSLIB-DBMS-CT-0645 Testing DBMS - EDbColLongText "));
sl@0: 	TRAP(err, TestSearchL( 1 ));
sl@0: 	TEST2(err,KErrNone);
sl@0: 	::DeleteDataFile(KSearchTestDbPath);
sl@0: 	TheTest.End();
sl@0: 
sl@0: 	TheFsSession.Close();
sl@0: 
sl@0: 	__UHEAP_MARKEND;
sl@0: 	delete TheTrapCleanup;
sl@0: 	TheTest.Close();
sl@0: 	return 0;
sl@0: 	}
sl@0: