--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/persistentstorage/dbms/tdbms/t_dblongcol.cpp Fri Jan 22 11:06:30 2010 +0200
@@ -0,0 +1,324 @@
+// Copyright (c) 2004-2009 Nokia Corporation and/or its subsidiary(-ies).
+// All rights reserved.
+// This component and the accompanying materials are made available
+// under the terms of "Eclipse Public License v1.0"
+// which accompanies this distribution, and is available
+// at the URL "http://www.eclipse.org/legal/epl-v10.html".
+//
+// Initial Contributors:
+// Nokia Corporation - initial contribution.
+//
+// Contributors:
+//
+// Description:
+//
+
+#include <d32dbms.h>
+#include <s32file.h>
+#include <e32test.h>
+
+static RTest TheTest(_L("t_dblongcol"));
+static CTrapCleanup* TheTrapCleanup;
+const TInt KTestCleanupStack=0x40;
+RFs TheFsSession;
+
+_LIT( KTestDir, "c:\\DBMS-TST\\" );
+_LIT( KSearchTestDbPath, "c:\\DBMS-TST\\eposlmserachtest.ldb" );
+
+//Delete "aFullName" file.
+static void DeleteDataFile(const TDesC& aFullName)
+ {
+ RFs fsSession;
+ TInt err = fsSession.Connect();
+ if(err == KErrNone)
+ {
+ TEntry entry;
+ if(fsSession.Entry(aFullName, entry) == KErrNone)
+ {
+ RDebug::Print(_L("Deleting \"%S\" file.\n"), &aFullName);
+ err = fsSession.SetAtt(aFullName, 0, KEntryAttReadOnly);
+ if(err != KErrNone)
+ {
+ RDebug::Print(_L("Error %d changing \"%S\" file attributes.\n"), err, &aFullName);
+ }
+ err = fsSession.Delete(aFullName);
+ if(err != KErrNone)
+ {
+ RDebug::Print(_L("Error %d deleting \"%S\" file.\n"), err, &aFullName);
+ }
+ }
+ fsSession.Close();
+ }
+ else
+ {
+ RDebug::Print(_L("Error %d connecting file session. File: %S.\n"), err, &aFullName);
+ }
+ }
+
+///////////////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////////////
+//Tests macros and functions.
+//If (!aValue) then the test will be panicked, the test data files will be deleted.
+static void Check(TInt aValue, TInt aLine)
+ {
+ if(!aValue)
+ {
+ ::DeleteDataFile(KSearchTestDbPath);
+ TheTest(EFalse, aLine);
+ }
+ }
+//If (aValue != aExpected) then the test will be panicked, the test data files will be deleted.
+static void Check(TInt aValue, TInt aExpected, TInt aLine)
+ {
+ if(aValue != aExpected)
+ {
+ RDebug::Print(_L("*** Expected error: %d, got: %d\r\n"), aExpected, aValue);
+ ::DeleteDataFile(KSearchTestDbPath);
+ TheTest(EFalse, aLine);
+ }
+ }
+//Use these to test conditions.
+#define TEST(arg) ::Check((arg), __LINE__)
+#define TEST2(aValue, aExpected) ::Check(aValue, aExpected, __LINE__)
+
+///////////////////////////////////////////////////////////////////////////////////////
+
+static void LeaveL(TInt aLine, TInt aError)
+ {
+ RDebug::Print(_L("*** Leave. Error: %d, line: %d\r\n"), aError, aLine);
+ User::Leave(aError);
+ }
+static void LeaveIfErrorL(TInt aLine, TInt aError)
+ {
+ if(aError < KErrNone)
+ {
+ LeaveL(aLine, aError);
+ }
+ }
+#define __LEAVE(err) LeaveL(__LINE__, err)
+#define __LEAVE_IF_ERROR(err) LeaveIfErrorL(__LINE__, err)
+
+///////////////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////////////
+
+//
+// Prepare the test directory.
+//
+static void SetupTestDirectory()
+ {
+ TInt r=TheFsSession.MkDir(KTestDir);
+ TEST(r==KErrNone || r==KErrAlreadyExists);
+ r=TheFsSession.SetSessionPath(KTestDir);
+ TEST2(r,KErrNone);
+ }
+
+static TInt SearchForL( const TPtrC& aSearchString, RDbNamedDatabase& aDb )
+ {
+ _LIT( KSQLSearchStatement, "select Notes from CDs where Notes like '%S'" );
+ TBuf<512> query;
+ query.Format( KSQLSearchStatement, &aSearchString );
+
+ // Display query
+ _LIT( KQueryFormatter, "\r\n %S\r\n" );
+ TBuf<512> msg;
+ msg.Format( KQueryFormatter, &query );
+ TheTest.Printf( msg );
+
+ // create a view on the database
+ RDbView view;
+ // use EDbCompareCollated in order to search case-insensitive
+ __LEAVE_IF_ERROR( view.Prepare( aDb, TDbQuery( query, EDbCompareCollated ) ) );
+ __LEAVE_IF_ERROR( view.EvaluateAll() );
+
+ // iterate across the row set
+ TInt noOfMatches = 0;
+ for ( view.FirstL(); view.AtRow(); view.NextL() )
+ {
+ // retrieve the row
+ view.GetL();
+ noOfMatches++;
+ }
+
+ // Display no of matches
+ _LIT( KNoOfMatchFormatter, " Found %d matches\r\n" );
+ msg.Format( KNoOfMatchFormatter, noOfMatches );
+ TheTest.Printf( msg );
+
+ // close the view
+ view.Close();
+ return noOfMatches;
+ }
+
+/**
+@SYMTestCaseID SYSLIB-DBMS-CT-0645
+@SYMTestCaseDesc Searching for data from a database
+@SYMTestPriority Medium
+@SYMTestActions Tests for EDbColText,EDbColLongText column type
+@SYMTestExpectedResults Test must not fail
+@SYMREQ REQ0000
+*/
+static void TestSearchL( TInt aIndex )
+ {
+ // Default database
+ _LIT( KComposer1, "Elgar" );
+ _LIT( KCol1, "Artist" );
+ _LIT( KCol2, "Notes" );
+ _LIT( KTable, "CDs" );
+
+ TInt err = TheFsSession.Delete( KSearchTestDbPath );
+ if ( ( err != KErrNone ) && ( err != KErrNotFound ) && ( err != KErrPathNotFound ) )
+ {
+ __LEAVE( err );
+ }
+
+ RDbNamedDatabase db;
+ CleanupClosePushL( db );
+ __LEAVE_IF_ERROR( db.Create( TheFsSession, KSearchTestDbPath ) );
+
+ //
+ // Create the database table
+ //
+ // Create a table definition
+ CDbColSet* columns = CDbColSet::NewLC();
+ // add the columns
+ columns->AddL( TDbCol( KCol1, EDbColText ) );
+ if ( aIndex == 0 )
+ columns->AddL( TDbCol( KCol2, EDbColText ) );
+ else
+ columns->AddL( TDbCol( KCol2, EDbColLongText ) );
+ // if the column is of type "EDbColText" instead,
+ // all searching is working properly
+ // Create a table
+ __LEAVE_IF_ERROR( db.CreateTable( KTable, *columns ) );
+ // cleanup the column set
+ CleanupStack::PopAndDestroy( columns );
+
+ //
+ // Add data
+ //
+ // create a view on the database
+ _LIT( KSQLStatement, "select Artist,Notes from CDs order by Artist" );
+ RDbView view;
+ __LEAVE_IF_ERROR( view.Prepare( db, TDbQuery( KSQLStatement, EDbCompareNormal ) ) );
+ __LEAVE_IF_ERROR( view.EvaluateAll() );
+
+ // Get the structure of rowset
+ CDbColSet* colSet = view.ColSetL();
+ // insert a row
+ view.InsertL();
+ view.SetColL( colSet->ColNo( KCol1 ), KComposer1 ); // Artist
+ // Use the stream
+ // RDbColWriteStream out;
+ // TDbColNo col = colSet->ColNo( KCol2 ); // Ordinal position of long column
+ //
+ // out.OpenLC( view, col );
+ // out.WriteL( _L( "Some additional comment here." ) );
+ // out.Close();
+ //
+ // CleanupStack::PopAndDestroy(); // out
+ view.SetColL( colSet->ColNo( KCol2 ), _L( "Some additional comment here." ) );
+ view.PutL();
+ // close the view
+ view.Close();
+ delete colSet;
+
+ //
+ // Display the data
+ //
+ _LIT( KRowFormatter, "\r\n Artist: %S \r\n Notes: %S \r\n" );
+ __LEAVE_IF_ERROR( view.Prepare( db, TDbQuery( KSQLStatement, EDbCompareNormal ) ) );
+ __LEAVE_IF_ERROR( view.EvaluateAll() );
+
+ // Get the structure of the rowset
+ colSet = view.ColSetL();
+ // iterate across the row set
+ for ( view.FirstL(); view.AtRow(); view.NextL() )
+ {
+ // retrieve the row
+ view.GetL();
+ // while the rowset is on this row, can use a TPtrC to
+ // refer to any text columns
+ TPtrC artist = view.ColDes( colSet->ColNo( KCol1 ) );
+ // and a stream for long columns
+ RDbColReadStream in;
+ TDbColNo col = colSet->ColNo( KCol2 ); // Ordinal position of long column
+ TBuf<256> notes; // Buffer for out notes
+ in.OpenLC( view, col );
+ in.ReadL( notes, view.ColLength( col ) );
+ in.Close();
+ CleanupStack::PopAndDestroy(); // in
+ // Display the artist and notes
+ TBuf<512> msg;
+ msg.Format( KRowFormatter, &artist, ¬es );
+ TheTest.Printf( msg );
+ }
+ // close the view
+ view.Close();
+ delete colSet;
+
+ //
+ // Search for the data
+ //
+ TInt result;
+ result = SearchForL( _L( "Some*" ), db ); // matches
+ TEST(result == 1);
+ result = SearchForL( _L( "some*" ), db ); // defect causes no match, should match
+ TEST(result == 1);
+ result = SearchForL( _L( "*some*" ), db ); // matches
+ TEST(result == 1);
+ result = SearchForL( _L( "s?me*" ), db ); // matches
+ TEST(result == 1);
+ result = SearchForL( _L( "Some additional comment here." ), db ); // matches
+ TEST(result == 1);
+ result = SearchForL( _L( "some additional comment here." ), db ); // defect causes no match, should match
+ TEST(result == 1);
+
+ CleanupStack::PopAndDestroy( &db );
+ }
+
+//
+// Initialise the cleanup stack.
+//
+static void setupCleanup()
+ {
+ TheTrapCleanup=CTrapCleanup::New();
+ TEST(TheTrapCleanup!=NULL);
+ TRAPD(r,\
+ {\
+ for (TInt i=KTestCleanupStack;i>0;i--)\
+ CleanupStack::PushL((TAny*)0);\
+ CleanupStack::Pop(KTestCleanupStack);\
+ });
+ TEST2(r,KErrNone);
+ }
+
+//
+// Test streaming conversions.
+//
+GLDEF_C TInt E32Main()
+ {
+ TheTest.Title();
+ setupCleanup();
+ __UHEAP_MARK;
+
+ TInt err = TheFsSession.Connect();
+ TEST2(err, KErrNone);
+ ::SetupTestDirectory();
+
+ TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-DBMS-CT-0645 Testing DBMS - EDbColText "));
+ TRAP(err, TestSearchL( 0 ));
+ TEST2(err,KErrNone);
+ TheTest.Start(_L(" @SYMTestCaseID:SYSLIB-DBMS-CT-0645 Testing DBMS - EDbColLongText "));
+ TRAP(err, TestSearchL( 1 ));
+ TEST2(err,KErrNone);
+ ::DeleteDataFile(KSearchTestDbPath);
+ TheTest.End();
+
+ TheFsSession.Close();
+
+ __UHEAP_MARKEND;
+ delete TheTrapCleanup;
+ TheTest.Close();
+ return 0;
+ }
+