2008-11-10 00:56:24 +01:00
|
|
|
|
<?php
|
2016-06-15 06:03:16 +02:00
|
|
|
|
|
2016-10-14 03:30:05 +02:00
|
|
|
|
namespace SilverStripe\ORM\Tests;
|
|
|
|
|
|
2016-06-15 06:03:16 +02:00
|
|
|
|
use SilverStripe\ORM\DB;
|
|
|
|
|
use SilverStripe\ORM\Connect\MySQLDatabase;
|
2016-06-23 01:37:22 +02:00
|
|
|
|
use SilverStripe\MSSQL\MSSQLDatabase;
|
2016-08-19 00:51:35 +02:00
|
|
|
|
use SilverStripe\Dev\SapphireTest;
|
2016-10-14 03:30:05 +02:00
|
|
|
|
use Exception;
|
|
|
|
|
use SilverStripe\ORM\Tests\DatabaseTest\MyObject;
|
2016-06-23 01:37:22 +02:00
|
|
|
|
|
2016-12-16 05:34:21 +01:00
|
|
|
|
/**
|
|
|
|
|
* @skipUpgrade
|
|
|
|
|
*/
|
|
|
|
|
class DatabaseTest extends SapphireTest
|
|
|
|
|
{
|
|
|
|
|
|
2017-03-24 12:17:26 +01:00
|
|
|
|
protected static $extra_dataobjects = array(
|
2016-12-16 05:34:21 +01:00
|
|
|
|
MyObject::class,
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
protected $usesDatabase = true;
|
|
|
|
|
|
|
|
|
|
public function testDontRequireField()
|
|
|
|
|
{
|
|
|
|
|
$schema = DB::get_schema();
|
|
|
|
|
$this->assertArrayHasKey(
|
|
|
|
|
'MyField',
|
|
|
|
|
$schema->fieldList('DatabaseTest_MyObject')
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
$schema->dontRequireField('DatabaseTest_MyObject', 'MyField');
|
|
|
|
|
|
|
|
|
|
$this->assertArrayHasKey(
|
|
|
|
|
'_obsolete_MyField',
|
|
|
|
|
$schema->fieldList('DatabaseTest_MyObject'),
|
|
|
|
|
'Field is renamed to _obsolete_<fieldname> through dontRequireField()'
|
|
|
|
|
);
|
|
|
|
|
|
2017-03-24 12:17:26 +01:00
|
|
|
|
static::resetDBSchema(true);
|
2016-12-16 05:34:21 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testRenameField()
|
|
|
|
|
{
|
|
|
|
|
$schema = DB::get_schema();
|
|
|
|
|
|
|
|
|
|
$schema->clearCachedFieldlist();
|
|
|
|
|
|
|
|
|
|
$schema->renameField('DatabaseTest_MyObject', 'MyField', 'MyRenamedField');
|
|
|
|
|
|
|
|
|
|
$this->assertArrayHasKey(
|
|
|
|
|
'MyRenamedField',
|
|
|
|
|
$schema->fieldList('DatabaseTest_MyObject'),
|
|
|
|
|
'New fieldname is set through renameField()'
|
|
|
|
|
);
|
|
|
|
|
$this->assertArrayNotHasKey(
|
|
|
|
|
'MyField',
|
|
|
|
|
$schema->fieldList('DatabaseTest_MyObject'),
|
|
|
|
|
'Old fieldname isnt preserved through renameField()'
|
|
|
|
|
);
|
|
|
|
|
|
2017-03-24 12:17:26 +01:00
|
|
|
|
static::resetDBSchema(true);
|
2016-12-16 05:34:21 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testMySQLCreateTableOptions()
|
|
|
|
|
{
|
|
|
|
|
if (!(DB::get_conn() instanceof MySQLDatabase)) {
|
|
|
|
|
$this->markTestSkipped('MySQL only');
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
$ret = DB::query(
|
|
|
|
|
sprintf(
|
|
|
|
|
'SHOW TABLE STATUS WHERE "Name" = \'%s\'',
|
|
|
|
|
'DatabaseTest_MyObject'
|
|
|
|
|
)
|
|
|
|
|
)->first();
|
|
|
|
|
$this->assertEquals(
|
|
|
|
|
$ret['Engine'],
|
|
|
|
|
'InnoDB',
|
|
|
|
|
"MySQLDatabase tables can be changed to InnoDB through DataObject::\$create_table_options"
|
|
|
|
|
);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function testIsSchemaUpdating()
|
|
|
|
|
{
|
|
|
|
|
$schema = DB::get_schema();
|
|
|
|
|
|
|
|
|
|
$this->assertFalse($schema->isSchemaUpdating(), 'Before the transaction the flag is false.');
|
|
|
|
|
|
|
|
|
|
// Test complete schema update
|
|
|
|
|
$test = $this;
|
|
|
|
|
$schema->schemaUpdate(
|
|
|
|
|
function () use ($test, $schema) {
|
|
|
|
|
$test->assertTrue($schema->isSchemaUpdating(), 'During the transaction the flag is true.');
|
|
|
|
|
}
|
|
|
|
|
);
|
|
|
|
|
$this->assertFalse($schema->isSchemaUpdating(), 'After the transaction the flag is false.');
|
|
|
|
|
|
|
|
|
|
// Test cancelled schema update
|
|
|
|
|
$schema->schemaUpdate(
|
|
|
|
|
function () use ($test, $schema) {
|
|
|
|
|
$schema->cancelSchemaUpdate();
|
|
|
|
|
$test->assertFalse($schema->doesSchemaNeedUpdating(), 'After cancelling the transaction the flag is false');
|
|
|
|
|
}
|
|
|
|
|
);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testSchemaUpdateChecking()
|
|
|
|
|
{
|
|
|
|
|
$schema = DB::get_schema();
|
|
|
|
|
|
|
|
|
|
// Initially, no schema changes necessary
|
|
|
|
|
$test = $this;
|
|
|
|
|
$schema->schemaUpdate(
|
|
|
|
|
function () use ($test, $schema) {
|
|
|
|
|
$test->assertFalse($schema->doesSchemaNeedUpdating());
|
|
|
|
|
|
|
|
|
|
// If we make a change, then the schema will need updating
|
|
|
|
|
$schema->transCreateTable("TestTable");
|
|
|
|
|
$test->assertTrue($schema->doesSchemaNeedUpdating());
|
|
|
|
|
|
|
|
|
|
// If we make cancel the change, then schema updates are no longer necessary
|
|
|
|
|
$schema->cancelSchemaUpdate();
|
|
|
|
|
$test->assertFalse($schema->doesSchemaNeedUpdating());
|
|
|
|
|
}
|
|
|
|
|
);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testHasTable()
|
|
|
|
|
{
|
|
|
|
|
$this->assertTrue(DB::get_schema()->hasTable('DatabaseTest_MyObject'));
|
|
|
|
|
$this->assertFalse(DB::get_schema()->hasTable('asdfasdfasdf'));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testGetAndReleaseLock()
|
|
|
|
|
{
|
|
|
|
|
$db = DB::get_conn();
|
|
|
|
|
|
|
|
|
|
if (!$db->supportsLocks()) {
|
|
|
|
|
return $this->markTestSkipped('Tested database doesn\'t support application locks');
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
$this->assertTrue(
|
|
|
|
|
$db->getLock('DatabaseTest'),
|
|
|
|
|
'Can aquire lock'
|
|
|
|
|
);
|
|
|
|
|
// $this->assertFalse($db->getLock('DatabaseTest'), 'Can\'t repeatedly aquire the same lock');
|
|
|
|
|
$this->assertTrue(
|
|
|
|
|
$db->getLock('DatabaseTest'),
|
|
|
|
|
'The same lock can be aquired multiple times in the same connection'
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
$this->assertTrue(
|
|
|
|
|
$db->getLock('DatabaseTestOtherLock'),
|
|
|
|
|
'Can aquire different lock'
|
|
|
|
|
);
|
|
|
|
|
$db->releaseLock('DatabaseTestOtherLock');
|
|
|
|
|
|
|
|
|
|
// Release potentially stacked locks from previous getLock() invocations
|
|
|
|
|
$db->releaseLock('DatabaseTest');
|
|
|
|
|
$db->releaseLock('DatabaseTest');
|
|
|
|
|
|
|
|
|
|
$this->assertTrue(
|
|
|
|
|
$db->getLock('DatabaseTest'),
|
|
|
|
|
'Can aquire lock after releasing it'
|
|
|
|
|
);
|
|
|
|
|
$db->releaseLock('DatabaseTest');
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public function testCanLock()
|
|
|
|
|
{
|
|
|
|
|
$db = DB::get_conn();
|
|
|
|
|
|
|
|
|
|
if (!$db->supportsLocks()) {
|
|
|
|
|
return $this->markTestSkipped('Database doesn\'t support locks');
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if ($db instanceof MSSQLDatabase) {
|
|
|
|
|
return $this->markTestSkipped('MSSQLDatabase doesn\'t support inspecting locks');
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
$this->assertTrue($db->canLock('DatabaseTest'), 'Can lock before first aquiring one');
|
|
|
|
|
$db->getLock('DatabaseTest');
|
|
|
|
|
$this->assertFalse($db->canLock('DatabaseTest'), 'Can\'t lock after aquiring one');
|
|
|
|
|
$db->releaseLock('DatabaseTest');
|
|
|
|
|
$this->assertTrue($db->canLock('DatabaseTest'), 'Can lock again after releasing it');
|
|
|
|
|
}
|
|
|
|
|
|
2018-10-04 05:13:32 +02:00
|
|
|
|
public function testFieldTypes()
|
|
|
|
|
{
|
|
|
|
|
// Scaffold some data
|
|
|
|
|
$obj = new MyObject();
|
|
|
|
|
$obj->MyField = "value";
|
|
|
|
|
$obj->MyInt = 5;
|
|
|
|
|
$obj->MyFloat = 6.0;
|
|
|
|
|
$obj->MyBoolean = true;
|
|
|
|
|
$obj->write();
|
|
|
|
|
|
|
|
|
|
$record = DB::prepared_query(
|
|
|
|
|
'SELECT * FROM "DatabaseTest_MyObject" WHERE "ID" = ?',
|
|
|
|
|
[ $obj->ID ]
|
|
|
|
|
)->record();
|
|
|
|
|
|
|
|
|
|
// IDs and ints are returned as ints
|
|
|
|
|
$this->assertInternalType('int', $record['ID']);
|
|
|
|
|
$this->assertInternalType('int', $record['MyInt']);
|
|
|
|
|
|
|
|
|
|
$this->assertInternalType('float', $record['MyFloat']);
|
|
|
|
|
|
|
|
|
|
// Booleans are returned as ints – we follow MySQL's lead
|
|
|
|
|
$this->assertInternalType('int', $record['MyBoolean']);
|
|
|
|
|
|
|
|
|
|
// Strings and enums are returned as strings
|
|
|
|
|
$this->assertInternalType('string', $record['MyField']);
|
|
|
|
|
$this->assertInternalType('string', $record['ClassName']);
|
|
|
|
|
|
|
|
|
|
// Dates are returned as strings
|
|
|
|
|
$this->assertInternalType('string', $record['Created']);
|
|
|
|
|
$this->assertInternalType('string', $record['LastEdited']);
|
|
|
|
|
}
|
2008-11-10 00:56:24 +01:00
|
|
|
|
}
|