transactd 2.2.0 → 2.3.0

data/source/bzs/netsvc/server/serverPipe.cpp

@@ -319,7 +319,7 @@ public:
     char* ptr() { return m_buf.writeBuffer(); }
 };
 
-class connection : public iconnection, private noncopyable
+class connection : public iconnection, private boost::noncopyable
 {
     mutable io_service m_ios;
     static mutex m_mutex;
@@ -483,7 +483,7 @@ unsigned int connection::m_shareMemSize;
 //		worker
 // ---------------------------------------------------------------------------
 
-class worker : private noncopyable
+class worker : private boost::noncopyable
 {
 
     static mutex m_mutex;

data/source/bzs/test/tdclphp/transactd_Test.php

@@ -22,7 +22,26 @@ mb_internal_encoding('UTF-8');
 require_once("transactd.php");
 use BizStation\Transactd as Bz;
 
-define("HOSTNAME", "localhost/");
+function getHost()
+{
+    $host = getenv('TRANSACTD_PHPUNIT_HOST');
+    if (strlen($host) == 0)
+    {
+        $host = '127.0.0.1/';
+    }
+    if ($host[strlen($host) - 1] != '/')
+    {
+        $host = $host . '/';
+    }
+    return $host;
+}
+
+define("HOSTNAME", getHost());
+define("USERNAME", getenv('TRANSACTD_PHPUNIT_USER'));
+define("USERPART", strlen(USERNAME) == 0 ? '' : USERNAME . '@');
+define("PASSWORD", getenv('TRANSACTD_PHPUNIT_PASS'));
+define("PASSPART", strlen(PASSWORD) == 0 ? '' : '&pwd=' . PASSWORD);
+define("PASSPART2", strlen(PASSWORD) == 0 ? '' : '?pwd=' . PASSWORD);
 define("DBNAME", "test");
 define("DBNAME_VAR", "testvar");
 define("DBNAME_SF", "testString");
@@ -30,10 +49,12 @@ define("DBNAME_QT", "querytest");
 define("TABLENAME", "user");
 define("PROTOCOL", "tdap://");
 define("BDFNAME", "?dbfile=test.bdf");
-define("URL", PROTOCOL . HOSTNAME . DBNAME . BDFNAME);
-define("URL_VAR", PROTOCOL . HOSTNAME . DBNAME_VAR . BDFNAME);
-define("URL_SF", PROTOCOL . HOSTNAME . DBNAME_SF . BDFNAME);
-define("URL_QT", PROTOCOL . HOSTNAME . DBNAME_QT . BDFNAME);
+define("URL", PROTOCOL . USERPART . HOSTNAME . DBNAME . BDFNAME . PASSPART);
+define("URL_VAR", PROTOCOL . USERPART . HOSTNAME . DBNAME_VAR . BDFNAME . PASSPART);
+define("URL_SF", PROTOCOL . USERPART . HOSTNAME . DBNAME_SF . BDFNAME . PASSPART);
+define("URL_QT", PROTOCOL . USERPART . HOSTNAME . DBNAME_QT . BDFNAME . PASSPART);
+define("URL_HOST", PROTOCOL . USERPART . HOSTNAME . PASSPART2);
+define("URL_DB", PROTOCOL . USERPART . HOSTNAME . DBNAME . PASSPART2);
 define("FDI_ID", 0);
 define("FDI_NAME", 1);
 define("FDI_GROUP", 2);
@@ -122,8 +143,18 @@ class transactdTest extends PHPUnit_Framework_TestCase
         
         $fd = $dbdef->insertField($tableid, 1);
         $fd->setName('name');
-        $fd->type = Bz\transactd::ft_zstring;
         $fd->len = 33;
+        
+        //test padChar only string or wstring
+        $fd->type = Bz\transactd::ft_string;
+        $fd->setPadCharSettings(true, false);
+        $this->assertEquals($fd->usePadChar(), true);
+        $this->assertEquals($fd->trimPadChar(), false);
+        $fd->setPadCharSettings(false, true);
+        $this->assertEquals($fd->usePadChar(), false);
+        $this->assertEquals($fd->trimPadChar(), true);
+        
+        $fd->type = Bz\transactd::ft_zstring;
         $dbdef->updateTableDef($tableid);
         $this->assertEquals($dbdef->stat(), 0);
         // Set field charset index
@@ -277,7 +308,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
     public function testVersion()
     {
         $db = new Bz\database();
-        $db->connect(PROTOCOL . HOSTNAME);
+        $db->connect(URL_HOST);
         $this->assertEquals($db->stat(), 0);
         $vv = new Bz\btrVersions();
         $db->getBtrVersion($vv);
@@ -717,7 +748,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $this->assertNotEquals($tbg, NULL);
         $db2 = new Bz\database();
         $this->assertEquals($db2->stat(), 0);
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $tb2 = $this->openTable($db2);
         $this->assertNotEquals($tb2, NULL);
         $tbg2 = $db2->openTable('group');
@@ -837,7 +868,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $db  = new Bz\database();
         $tb = $this->openTable($db);
         $db2 = new Bz\database();
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $this->assertEquals($db2->stat(), 0);
         $this->assertNotEquals($tb, NULL);
         $tb2 = $this->openTable($db2);
@@ -889,7 +920,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $tb = $this->openTable($db);
         $this->assertNotEquals($tb, NULL);
         $db2 = new Bz\database();
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $this->assertEquals($db2->stat(), 0);
         $tb2 = $this->openTable($db2);
         $this->assertNotEquals($tb2, NULL);
@@ -1084,7 +1115,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $tb = $this->openTable($db);
         $this->assertNotEquals($tb, NULL);
         $db2 = new Bz\database();
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $this->assertEquals($db2->stat(), 0);
         $tb2 = $this->openTable($db2);
         $this->assertNotEquals($tb2, NULL);
@@ -1372,7 +1403,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $tb = $this->openTable($db);
         $this->assertNotEquals($tb, NULL);
         $db2 = new Bz\database();
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $this->assertEquals($db2->stat(), 0);
         $tb2 = $this->openTable($db2);
         $this->assertNotEquals($tb2, NULL);
@@ -1513,7 +1544,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         
         // Can not open database from other connections.
         $db2 = new Bz\database();
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $this->assertEquals($db2->stat(), 0);
         $db2->open(URL, Bz\transactd::TYPE_SCHEMA_BDF);
         // database open error. Check database::stat()
@@ -1536,7 +1567,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $db2->close();
         
         // Normal open
-        $db2->connect(PROTOCOL . HOSTNAME . DBNAME, true);
+        $db2->connect(URL_DB, true);
         $db2->open(URL, Bz\transactd::TYPE_SCHEMA_BDF, Bz\transactd::TD_OPEN_NORMAL);
         $this->assertEquals($db2->stat(), 0);
         $db2->close();
@@ -1834,13 +1865,13 @@ class transactdTest extends PHPUnit_Framework_TestCase
     public function testLogin()
     {
         $db = new Bz\database();
-        $db->connect(PROTOCOL . HOSTNAME);
+        $db->connect(URL_HOST);
         $this->assertEquals($db->stat(), 0);
         if ($db->stat() == 0)
         {
             // second connection
             $db2 = new Bz\database();
-            $db2->connect(PROTOCOL . HOSTNAME, true);
+            $db2->connect(URL_HOST, true);
             $this->assertEquals($db2->stat(), 0);
             unset($db2);
             $db->disconnect();
@@ -1858,7 +1889,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $db->close();
         $this->assertEquals($db->stat(), 0);
         // true database name
-        $db->connect(PROTOCOL . HOSTNAME . DBNAME);
+        $db->connect(URL_DB);
         $this->assertEquals($db->stat(), 0);
         if ($db->stat() == 0)
         {
@@ -1869,7 +1900,7 @@ class transactdTest extends PHPUnit_Framework_TestCase
         $this->dropDatabase($db);
         $db->disconnect();
         $this->assertEquals($db->stat(), 0);
-        $db->connect(PROTOCOL . HOSTNAME . DBNAME);
+        $db->connect(URL_DB);
         $this->assertEquals($db->stat(), Bz\transactd::ERROR_NO_DATABASE);
         $db->disconnect();
         $this->assertEquals($db->stat(), 1);
@@ -2929,10 +2960,10 @@ class transactdTest extends PHPUnit_Framework_TestCase
     }
     private function insertQT($db, $maxId)
     {
-        $db->beginTrn();
         // insert user data
         $tb = $db->openTable('user', Bz\transactd::TD_OPEN_NORMAL);
         $this->assertEquals($db->stat(), 0);
+        $db->beginTrn();
         $tb->clearBuffer();
         for ($i = 1; $i <= $maxId; $i++)
         {
@@ -2942,10 +2973,12 @@ class transactdTest extends PHPUnit_Framework_TestCase
             $tb->insert();
             $this->assertEquals($tb->stat(), 0);
         }
+        $db->endTrn();
         $tb->close();
         // insert groups data
         $tb = $db->openTable('groups', Bz\transactd::TD_OPEN_NORMAL);
         $this->assertEquals($db->stat(), 0);
+        $db->beginTrn();
         $tb->clearBuffer();
         for ($i = 1; $i <= 100; $i++)
         {
@@ -2954,10 +2987,12 @@ class transactdTest extends PHPUnit_Framework_TestCase
             $tb->insert();
             $this->assertEquals($tb->stat(), 0);
         }
+        $db->endTrn();
         $tb->close();
         // insert extention data
         $tb = $db->openTable('extention', Bz\transactd::TD_OPEN_NORMAL);
         $this->assertEquals($db->stat(), 0);
+        $db->beginTrn();
         $tb->clearBuffer();
         for ($i = 1; $i <= $maxId; $i++)
         {
@@ -3497,6 +3532,67 @@ class transactdTest extends PHPUnit_Framework_TestCase
         if ($tb->stat() != 0)
             $db->drop();
     }
+    
+    public function testReadMore()
+    {
+        $db = new Bz\database();
+        $db->open(URL_QT);
+
+        $this->assertEquals($db->stat(), 0);
+        $atu = new Bz\activeTable($db, 'user');
+        $atu->alias('名前', 'name');
+        $q = new Bz\query();
+        
+        //isStopAtLimit
+        $this->assertEquals($q->isStopAtLimit(), 0);
+        $q->select('id', 'name', 'group')
+            ->where('name', '=', '1*')
+            ->reject(70)->limit(8)->stopAtLimit(true);
+        $this->assertEquals($q->isStopAtLimit(), true);
+        $stmt1 = $atu->prepare($q);
+        $this->assertEquals($atu->table()->stat(), 0);
+        $this->assertNotEquals($stmt1, null);
+        $rs = $atu->index(0)->keyValue(18)->read($stmt1);
+        $this->assertEquals($rs->size(), 2);
+        
+        //readMore
+        $rs2 = $atu->readMore();
+        $this->assertEquals($rs2->size(), 8);
+        $rs->unionRecordset($rs2);
+        $this->assertEquals($rs->size(), 10);
+    }
+
+    public function testFirstLastGroupFunction()
+    {
+        $db = new Bz\database();
+        $db->open(URL_QT);
+        $this->assertEquals($db->stat(), 0);
+        
+        $atu = new Bz\activeTable($db, 'user');
+        $atu->alias('名前', 'name');
+        $q = new Bz\query();
+        $q->select('id', 'name', 'group')
+              ->where('name', '=', '1*')
+              ->reject(70)->limit(8)->stopAtLimit(true);
+        $stmt1 = $atu->prepare($q);
+        $this->assertNotEquals($stmt1, null);
+        
+        $rs = $atu->index(0)->keyValue(0)->read($stmt1);
+        $this->assertEquals($rs->size(), 8);
+        
+        #grouping first and last
+        $gq = new Bz\groupQuery();
+        $target = new Bz\fieldNames();
+        $target->addValue('name');
+        $last = new Bz\last($target, 'last_rec_name');
+        $first = new Bz\first($target, 'first_rec_name');
+        $gq->addFunction($last);
+        $gq->addFunction($first);
+        $rs->groupBy($gq);
+        $this->assertEquals($rs[0]['first_rec_name'], "1 user");
+        $this->assertEquals($rs[0]['last_rec_name'], "16 user");
+    }
+
     public function testWritableRecord()
     {
         $db = new Bz\database();

data/source/bzs/test/tdclphp/transactd_blob_Test.php

@@ -22,8 +22,26 @@ mb_internal_encoding('UTF-8');
 require_once("transactd.php");
 use BizStation\Transactd as Bz;
 
-define("HOSTNAME", "localhost/");
-define("URL", "tdap://" . HOSTNAME . "test_blob?dbfile=test.bdf");
+function getHost()
+{
+    $host = getenv('TRANSACTD_PHPUNIT_HOST');
+    if (strlen($host) == 0)
+    {
+        $host = '127.0.0.1/';
+    }
+    if ($host[strlen($host) - 1] != '/')
+    {
+        $host = $host . '/';
+    }
+    return $host;
+}
+
+define("HOSTNAME", getHost());
+define("USERNAME", getenv('TRANSACTD_PHPUNIT_USER'));
+define("USERPART", strlen(USERNAME) == 0 ? '' : USERNAME . '@');
+define("PASSWORD", getenv('TRANSACTD_PHPUNIT_PASS'));
+define("PASSPART", strlen(PASSWORD) == 0 ? '' : '&pwd=' . PASSWORD);
+define("URL", "tdap://" . USERPART . HOSTNAME . "test_blob?dbfile=test.bdf" . PASSPART);
 define("TABLENAME", "comments");
 define("FDI_ID", 0);
 define("FDI_USER_ID", 1);
@@ -219,9 +237,6 @@ class transactdBlobTest extends PHPUnit_Framework_TestCase
         // 3... but not found because filtered
         $tb->findNext(true);
         $this->assertEquals($tb->stat(), Bz\transactd::STATUS_EOF);
-        // 2... but changing seek-direction is not allowed
-        $tb->findPrev(true);
-        $this->assertEquals($tb->stat(), Bz\transactd::STATUS_PROGRAM_ERROR);
     }
     public function testUpdate()
     {
@@ -289,6 +304,19 @@ class transactdBlobTest extends PHPUnit_Framework_TestCase
         $tb->seekNext();
         $this->assertEquals($tb->stat(), Bz\transactd::STATUS_EOF);
     }
+    public function testRecord()
+    {
+        $image = $this->getTestBinary();
+        $db = new Bz\database();
+        $this->openDatabase($db, URL);
+        $at = new Bz\ActiveTable($db, TABLENAME);
+        $q = new Bz\query();
+        $q->where('id', '=', 1);
+        $rs = $at->index(0)->keyValue(1)->read($q);
+        $this->assertEquals(count($rs), 1);
+        $f = $rs[0]->getField(FDI_IMAGE);
+        $this->assertEquals($f->getBin(), $image);
+    }
     public function testDrop()
     {
         $db = new Bz\database();

data/source/bzs/test/tdclphp/transactd_kanjischema_Test.php

@@ -22,9 +22,27 @@ mb_internal_encoding('UTF-8');
 require_once("transactd.php");
 use BizStation\Transactd as Bz;
 
-define("HOSTNAME", "localhost/");
-define("URL", "tdap://" . HOSTNAME . "test?dbfile=test.bdf");
-define("URL_KANJI", "tdap://" . HOSTNAME . "テスト?dbfile=構成.bdf");
+function getHost()
+{
+    $host = getenv('TRANSACTD_PHPUNIT_HOST');
+    if (strlen($host) == 0)
+    {
+        $host = '127.0.0.1/';
+    }
+    if ($host[strlen($host) - 1] != '/')
+    {
+        $host = $host . '/';
+    }
+    return $host;
+}
+
+define("HOSTNAME", getHost());
+define("USERNAME", getenv('TRANSACTD_PHPUNIT_USER'));
+define("USERPART", strlen(USERNAME) == 0 ? '' : USERNAME . '@');
+define("PASSWORD", getenv('TRANSACTD_PHPUNIT_PASS'));
+define("PASSPART", strlen(PASSWORD) == 0 ? '' : '&pwd=' . PASSWORD);
+define("URL", "tdap://" . USERPART . HOSTNAME . "test?dbfile=test.bdf" . PASSPART);
+define("URL_KANJI", "tdap://" . USERPART . HOSTNAME . "テスト?dbfile=構成.bdf" . PASSPART);
 define("FDI_ID", 0);
 define("FDN_ID", "番号");
 define("FDI_NAME", 1);

data/source/bzs/test/tdclphp/transactd_pool_Test.php

@@ -22,12 +22,26 @@ mb_internal_encoding('UTF-8');
 require_once("transactd.php");
 use BizStation\Transactd as Bz;
 
+function getHost()
+{
+    $host = getenv('TRANSACTD_PHPUNIT_HOST');
+    if (strlen($host) == 0)
+    {
+        $host = '127.0.0.1';
+    }
+    return $host;
+}
+
 define("PROTOCOL", 'tdap');
-define("HOSTNAME", 'localhost');
+define("HOSTNAME", getHost());
+define("USERNAME", getenv('TRANSACTD_PHPUNIT_USER'));
+define("USERPART", strlen(USERNAME) == 0 ? '' : USERNAME . '@');
+define("PASSWORD", getenv('TRANSACTD_PHPUNIT_PASS'));
+define("PASSPART", strlen(PASSWORD) == 0 ? '' : '&pwd=' . PASSWORD);
 define("DBNAME", 'querytest');
 define("SCHEMANAME", 'test');
 define("BDFNAME", '?dbfile=' . SCHEMANAME . '.bdf');
-define("URL", PROTOCOL . '://' . HOSTNAME . '/' . DBNAME . BDFNAME);
+define("URL", PROTOCOL . '://' . USERPART . HOSTNAME . '/' . DBNAME . BDFNAME . PASSPART);
 define("TABLENAME", 'user');
 
 // multi thread test if `php_pthreads` exists.
@@ -58,7 +72,7 @@ class transactdPoolTest extends PHPUnit_Framework_TestCase
     {
         $cp = new Bz\connectParams(URL);
         $this->assertEquals($cp->uri(), URL);
-        $cp = new Bz\connectParams(PROTOCOL, HOSTNAME, DBNAME, SCHEMANAME);
+        $cp = new Bz\connectParams(PROTOCOL, HOSTNAME, DBNAME, SCHEMANAME, USERNAME, PASSWORD);
         $this->assertEquals($cp->uri(), URL);
     }
     public function testUse()

data/source/bzs/test/tdclrb/transactd_blob_spec.rb

@@ -21,17 +21,24 @@
 require 'transactd'
 require 'base64'
 
+def getEnv(valuename)
+  return ENV[valuename] if ENV[valuename] != nil
+  return ''
+end
+
 def getHost()
-  hostname = '127.0.0.1/'
-  if (ENV['TRANSACTD_RSPEC_HOST'] != nil && ENV['TRANSACTD_RSPEC_HOST'] != '')
-    hostname = ENV['TRANSACTD_RSPEC_HOST']
-  end
+  hostname = getEnv('TRANSACTD_RSPEC_HOST')
+  hostname = '127.0.0.1/' if hostname == ''
   hostname = hostname + '/' unless (hostname =~ /\/$/)
   return hostname
 end
 
 HOSTNAME = getHost()
-URL = 'tdap://' + HOSTNAME + 'test_blob?dbfile=test.bdf'
+USERNAME = getEnv('TRANSACTD_RSPEC_USER')
+USERPART = USERNAME == '' ? '' : USERNAME + '@'
+PASSWORD = getEnv('TRANSACTD_RSPEC_PASS')
+PASSPART = PASSWORD == '' ? '' : '&pwd=' + PASSWORD
+URL = 'tdap://' + USERPART + HOSTNAME + 'test_blob?dbfile=test.bdf' + PASSPART
 TABLENAME = 'comments'
 FDI_ID = 0
 FDI_USER_ID = 1
@@ -234,9 +241,6 @@ describe Transactd, 'blob' do
     # 3... but not found because filtered
     tb.findNext(true)
     expect(tb.stat()).to eq Transactd::STATUS_EOF
-    # 2... but changing seek-direction is not allowed
-    tb.findPrev(true)
-    expect(tb.stat()).to eq Transactd::STATUS_PROGRAM_ERROR
     db.close()
   end
   
@@ -322,6 +326,20 @@ describe Transactd, 'blob' do
     db.close()
   end
   
+  it 'use recordset' do
+    image = getTestBinary()
+    db = Transactd::Database.new()
+    openDatabase(db)
+    at = Transactd::ActiveTable.new(db, TABLENAME)
+    q = Transactd::Query.new()
+    q.where('id', '=', 1)
+    rs = at.index(0).keyValue(1).read(q)
+    expect(rs.count()).to eq 1
+    f = rs[0].getField(FDI_IMAGE);
+    expect(f.getBin()).to eq image
+    db.close()
+  end
+  
   it 'drop' do
     db = Transactd::Database.new()
     dropDatabase(db)

data/source/bzs/test/tdclrb/transactd_kanjischema_spec.rb

@@ -23,18 +23,25 @@ require 'transactd'
 require 'rbconfig'
 IS_WINDOWS = (RbConfig::CONFIG['host_os'] =~ /mswin|mingw|cygwin/)
 
+def getEnv(valuename)
+  return ENV[valuename] if ENV[valuename] != nil
+  return ''
+end
+
 def getHost()
-  hostname = '127.0.0.1/'
-  if (ENV['TRANSACTD_RSPEC_HOST'] != nil && ENV['TRANSACTD_RSPEC_HOST'] != '')
-    hostname = ENV['TRANSACTD_RSPEC_HOST']
-  end
+  hostname = getEnv('TRANSACTD_RSPEC_HOST')
+  hostname = '127.0.0.1/' if hostname == ''
   hostname = hostname + '/' unless (hostname =~ /\/$/)
   return hostname
 end
 
 HOSTNAME = getHost()
-URL = 'tdap://' + HOSTNAME + 'test?dbfile=test.bdf'
-URL_KANJI = 'tdap://' + HOSTNAME + 'テスト?dbfile=構成.bdf'
+USERNAME = getEnv('TRANSACTD_RSPEC_USER')
+USERPART = USERNAME == '' ? '' : USERNAME + '@'
+PASSWORD = getEnv('TRANSACTD_RSPEC_PASS')
+PASSPART = PASSWORD == '' ? '' : '&pwd=' + PASSWORD
+URL = 'tdap://' + USERPART + HOSTNAME + 'test?dbfile=test.bdf' + PASSPART
+URL_KANJI = 'tdap://' + USERPART + HOSTNAME + 'テスト?dbfile=構成.bdf' + PASSPART
 FDI_ID = 0
 FDN_ID = '番号'.encode('UTF-8')
 FDI_NAME = 1

data/source/bzs/test/tdclrb/transactd_pool_spec.rb

@@ -21,28 +21,34 @@
 require 'transactd'
 require 'thwait'
 
+def getEnv(valuename)
+  return ENV[valuename] if ENV[valuename] != nil
+  return ''
+end
+
 def getHost()
-  hostname = '127.0.0.1/'
-  if (ENV['TRANSACTD_RSPEC_HOST'] != nil && ENV['TRANSACTD_RSPEC_HOST'] != '')
-    hostname = ENV['TRANSACTD_RSPEC_HOST']
-  end
-  hostname = hostname + '/' unless (hostname =~ /\/$/)
+  hostname = getEnv('TRANSACTD_RSPEC_HOST')
+  hostname = '127.0.0.1' if hostname == ''
   return hostname
 end
 
 PROTOCOL = 'tdap'
-HOSTNAME = getHost().sub(/\/$/, '')
+HOSTNAME = getHost()
+USERNAME = getEnv('TRANSACTD_RSPEC_USER')
+USERPART = USERNAME == '' ? '' : USERNAME + '@'
+PASSWORD = getEnv('TRANSACTD_RSPEC_PASS')
+PASSPART = PASSWORD == '' ? '' : '&pwd=' + PASSWORD
 DBNAME = 'querytest'
 SCHEMANAME = 'test'
 BDFNAME = '?dbfile=' + SCHEMANAME + '.bdf'
-URL = PROTOCOL + '://' + HOSTNAME + '/' + DBNAME + BDFNAME
+URL = PROTOCOL + '://' + USERPART + HOSTNAME + '/' + DBNAME + BDFNAME + PASSPART
 TABLENAME = 'user'
 
 describe Transactd, 'pool' do
   it 'create ConnectParams' do
     cp = Transactd::ConnectParams.new(URL)
     expect(cp.uri()).to eq URL
-    cp = Transactd::ConnectParams.new(PROTOCOL, HOSTNAME, DBNAME, SCHEMANAME)
+    cp = Transactd::ConnectParams.new(PROTOCOL, HOSTNAME, DBNAME, SCHEMANAME, USERNAME, PASSWORD)
     expect(cp.uri()).to eq URL
   end