hash/d2tools
1
0
Fork 0
mirror of https://gitlab.com/hashborgir/d2tools.git synced 2025-10-23 21:24:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Begin Refactor

Browse Source
This commit is contained in:
color.diff=auto
2021-03-21 13:47:29 -06:00
parent 7622dc0d02
commit 018931d7ae
197 changed files with 47799 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

129
vendor/gabordemooij/redbean/testing/RedUNIT/Base/Threeway.php vendored Normal file
View File

@@ -0,0 +1,129 @@
<?php
namespace RedUNIT\Base;
use RedUNIT\Base as Base;
use RedBeanPHP\Facade as R;
use RedBeanPHP\RedException as RedException;
use RedBeanPHP\QueryWriter\AQueryWriter as AQueryWriter;
/**
* Threeway
*
* Tests link/via relations, i.e. N-M tables with additional
* columns.
*
* @file RedUNIT/Base/Threeway.php
* @desc Various tests for 3-way tables or X-way tables.
* @author Gabor de Mooij and the RedBeanPHP Community
* @license New BSD/GPLv2
*
* (c) G.J.G.T. (Gabor) de Mooij and the RedBeanPHP Community.
* This source file is subject to the New BSD/GPLv2 License that is bundled
* with this source code in the file license.txt.
*/
class Threeway extends Base
{
/**
* Test whether we can use threeway tables without being
* bothered by unique constraints.
*
* @return void
*/
public function testUniqueConstraintOnThreeways()
{
AQueryWriter::clearRenames();
R::nuke();
$person = R::dispense( 'person' );
$role = R::dispense( 'role' );
$person->sharedRole[] = $role;
R::store( $person );
$person->link( 'person_role', array(
'unit' => R::dispense('unit')
))->role = $role;
//Can we add a duplicate role now? - No because we started with a simple N-M table
//and unique constraint has been applied accordingly, manually change database.
asrt( R::count( 'person_role' ), 1 );
R::nuke();
$person = R::dispense( 'person' );
$role = R::dispense( 'role' );
$person->via('participant')->sharedRole[] = $role;
R::store( $person );
$person->link( 'participant', array(
'unit' => R::dispense('unit')
))->role = $role;
//Can we add a duplicate role now? - No because we started with a simple N-M table
//and unique constraint has been applied accordingly, manually change database.
asrt( R::count( 'participant' ), 1 );
R::nuke();
$participant = R::dispense( 'participant' );
$person = R::dispense( 'person' );
$role = R::dispense( 'role' );
$unit = R::dispense( 'unit' );
$participant->person = $person;
$participant->role = $role;
$participant->unit = $unit;
R::store( $participant );
$person->link( 'participant', array(
'unit' => R::dispense('unit')
))->role = $role;
R::store( $person );
//Can we add a duplicate role now?
asrt( R::count( 'participant' ), 2 );
AQueryWriter::clearRenames();
}
/**
* Test whether a duplicate bean in the list isnt saved.
* This was an issue with Postgres while testing the threeway tables.
* Postgres returned the ID as a string while other drivers returned
* a numeric value causing different outcome in array_diff when
* calculating the shared additions.
*
* @return void
*/
public function testIssueWithDriverReturnID()
{
AQueryWriter::clearRenames();
R::nuke();
$book = R::dispense( 'book' );
$page = R::dispense( 'page' );
$book->sharedPageList[] = $page;
R::store( $book );
asrt( R::count( 'page' ), 1 );
$book = $book->fresh();
$book->sharedPageList[] = $page;
R::store( $book );
//don't save the duplicate bean!
asrt( R::count( 'page' ), 1 );
$book = $book->fresh();
$page->item = 2; //even if we change a property ?
$book->sharedPageList[] = $page;
R::store( $book );
foreach( $book->sharedPageList as $listItem) {
asrt( is_string( $listItem->id ), TRUE );
}
//same test but for own-list
R::nuke();
$book = R::dispense( 'book' );
$page = R::dispense( 'page' );
$book->ownPageList[] = $page;
R::store( $book );
asrt( R::count( 'page' ), 1 );
$book = $book->fresh();
$book->ownPageList[] = $page;
R::store( $book );
//don't save the duplicate bean!
asrt( R::count( 'page' ), 1 );
$book = $book->fresh();
$book->ownPageList[] = $page;
$page->item = 3;
R::store( $book );
//don't save the duplicate bean!
asrt( R::count( 'page' ), 1 );
foreach( $book->ownPageList as $listItem) {
asrt( is_string( $listItem->id ), TRUE );
}
AQueryWriter::clearRenames();
}
}