Updated installer with custom action

installer/src/installer-lib/test/database_test.cpp

+#include <gtest/gtest.h>
+#include "../database.h"
+
+TEST( Database, open )
+{
+  File_System_Database db( L"test-installer-lib.msi" ) ;
+}
+
+class Database_F
+  : public ::testing::Test
+{
+protected:
+  File_System_Database db ;
+
+  Database_F()
+    : db( L"test-installer-lib.msi" )
+  {}
+} ;
+
+TEST_F( Database_F, view_n_columns_and_n_rows )
+{
+  View v( db, L"SELECT * FROM AbpUIText" ) ;
+  Record r( v.first() ) ;
+  unsigned int j ;
+  for ( j = 0 ; r != v.end() ; ++ j )
+  {
+    ASSERT_EQ( 3, r.n_fields() ) ;
+    r = v.next() ;
+  }
+  ASSERT_EQ( 4, j ) ;
+}
+
+TEST_F( Database_F, view_single_record )
+{
+  View v( db, L"SELECT `content` FROM `AbpUIText` WHERE `component`='close_ie' and `id`='dialog_unknown'" ) ;
+  Record r( v.first() ) ;
+  ASSERT_EQ( 1, r.n_fields() ) ;
+  std::wstring s( r.value_string( 1 ) ) ;
+  std::wstring expected( L"IE is still running" ) ;
+  ASSERT_GT( s.length(), expected.length() ) ;
+  std::wstring prefix( s.substr( 0, expected.length() ) ) ;
+  ASSERT_EQ( prefix, expected ) ;
+  r = v.next() ;
+  ASSERT_EQ( v.end(), r ) ;
+}
+
+TEST_F( Database_F, view_single_record_parametric )
+{
+  View v( db, L"SELECT `content` FROM `AbpUIText` WHERE `component`='close_ie' and `id`=?" ) ;
+  Record arg( 1 ) ;
+  arg.assign_string( 1, L"dialog_unknown" ) ;
+  Record r( v.first( arg ) ) ;
+  ASSERT_EQ( 1, r.n_fields() ) ;
+  std::wstring s( r.value_string( 1 ) ) ;
+  std::wstring expected( L"IE is still running" ) ;
+  ASSERT_GT( s.length(), expected.length() ) ;
+  std::wstring prefix( s.substr( 0, expected.length() ) ) ;
+  ASSERT_EQ( prefix, expected ) ;
+  r = v.next() ;
+  ASSERT_EQ( v.end(), r ) ;
+}