<?php
namespace RedUNIT\Base;
use RedUNIT\Base as Base;
use RedBeanPHP\Facade as R;
/**
* With
*
* With/WithCondition can be used to fetch bean lists with additional
* requirements, filters or ordering specification using SQL snippets.
* This suite tests the handling of with() and withCondition() snippets.
* Additionally this test suite also tests noLoad() and all() modifiers.
*
* @file RedUNIT/Base/With.php
* @desc Tests query modification of own-lists with prefix-with
* @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 With extends Base
{
/**
* This test suite uses specific SQL, only suited for MySQL.
*
* @return array
*/
public function getTargetDrivers()
{
return array( 'mysql' );
}
/**
* Tests no-load modifier for lists.
*
* @return void
*/
public function testNoLoad()
{
$book = R::dispense( array(
'_type' => 'book',
'title' => 'Book of Lorem Ipsum',
'ownPage' => array(
array(
'_type' => 'page',
'content' => 'Lorem Ipsum',
)
),
'sharedTag' => array(
array(
'_type' => 'tag',
'label' => 'testing'
)
)
) );
R::store( $book );
$book = $book->fresh();
asrt( R::count( 'book' ), 1 );
asrt( count( $book->ownPage ), 1 );
//now try with no-load
$book = $book->fresh();
asrt( count( $book->noLoad()->ownPage ), 0 );
asrt( count( $book->noLoad()->sharedTag ), 0 );
//now try to add with no-load
$book = $book->fresh();
$book->noLoad()->xownPageList[] = R::dispense( 'page' );
$book->noLoad()->sharedTagList[] = R::dispense( 'tag' );
R::store( $book );
$book = $book->fresh();
asrt( count( $book->ownPage ), 2 );
asrt( count( $book->sharedTagList ), 2 );
//no-load overrides with and withCondition
$book = $book->fresh();
asrt( count( $book->with(' invalid sql ')->noLoad()->ownPage ), 0 );
asrt( count( $book->withCondition(' invalid sql ')->noLoad()->sharedTag ), 0 );
//no-load overrides all and alias
$book = $book->fresh();
asrt( count( $book->all()->noLoad()->ownPage ), 0 );
asrt( count( $book->alias('nothing')->noLoad()->sharedTag ), 0 );
//no-load gets cleared
$book = $book->fresh();
asrt( count( $book->ownPage ), 2 );
asrt( count( $book->sharedTagList ), 2 );
//We cant clear with no-load accidentally?
$book = $book->fresh();
$book->noLoad()->ownPage = array();
$book->noLoad()->sharedTagList = array();
R::store( $book );
asrt( count( $book->ownPage ), 2 );
asrt( count( $book->sharedTagList ), 2 );
//No-load does not have effect if list is already cached
$book = $book->fresh();
$book->ownPage;
$book->sharedTag;
asrt( count( $book->ownPage ), 2 );
asrt( count( $book->sharedTagList ), 2 );
}
/**
* Test all().
*
* @return void
*/
public function testAll()
{
$book = R::dispense( 'book' );
$book->ownPage = R::dispense( 'page', 10 );
R::store( $book );
asrt( count( $book->with( ' LIMIT 3 ' )->ownPage ), 3 );
asrt( count( $book->ownPage ), 3 );
asrt( count( $book->all()->ownPage ), 10 );
asrt( count( $book->ownPage ), 10 );
R::nuke();
asrt( count( $book->ownPage ), 10 );
asrt( count( $book->all()->ownPage ), 0 );
}
/**
* Test embedded SQL snippets using with and withCondition.
*
* @return void
*/
public function testEmbeddedSQL()
{
list( $page1, $page2, $page3 ) = R::dispense( 'page', 3 );
list( $ad1, $ad2, $ad3 ) = R::dispense( 'ad', 3 );
$ad2->name = 'shampoo';
$page3->name = 'homepage';
$page1->sharedAd = array( $ad1, $ad3 );
$page2->sharedAd = array( $ad2, $ad3 );
$page3->sharedAd = array( $ad3, $ad2, $ad1 );
R::storeAll( array( $page1, $page2, $page3 ) );
$page1 = R::load( 'page', $page1->id );
asrt( 1, count( $page1->with( ' LIMIT 1 ' )->sharedAd ) );
$page2 = R::load( 'page', $page2->id );
$adsOnPage2 = $page2->withCondition( ' `name` = ? ', array( 'shampoo' ) )->sharedAd;
asrt( 1, count( $adsOnPage2 ) );
$ad = reset( $adsOnPage2 );
asrt( $ad->name, 'shampoo' );
$ad = R::load( 'ad', $ad->id );
asrt( count( $ad->sharedPage ), 2 );
$ad = R::load( 'ad', $ad->id );
$homepage = reset( $ad->withCondition( ' `name` LIKE ? AND page.id > 0 ORDER BY id DESC ', array( '%ome%' ) )->sharedPage );
asrt( $homepage->name, 'homepage' );
}
/**
* More variations...
*
* @return void
*/
public function testEmbeddedSQLPart2()
{
list( $book1, $book2, $book3 ) = R::dispense( 'book', 3 );
$book1->position = 1;
$book2->position = 2;
$book3->position = 3;
$shelf = R::dispense( 'shelf' );
$shelf->ownBook = array( $book1, $book2, $book3 );
$id = R::store( $shelf );
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' ORDER BY position ASC ' )->ownBook;
$book1 = array_shift( $books );
asrt( (int) $book1->position, 1 );
$book2 = array_shift( $books );
asrt( (int) $book2->position, 2 );
$book3 = array_shift( $books );
asrt( (int) $book3->position, 3 );
$books = $shelf->with( ' ORDER BY position DESC ' )->ownBook;
$book1 = array_shift( $books );
asrt( (int) $book1->position, 3 );
$book2 = array_shift( $books );
asrt( (int) $book2->position, 2 );
$book3 = array_shift( $books );
asrt( (int) $book3->position, 1 );
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position > 2 ' )->ownBook;
asrt( count( $books ), 1 );
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position < ? ', array( 3 ) )->ownBook;
asrt( count( $books ), 2 );
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position = 1 ' )->ownBook;
asrt( count( $books ), 1 );
$shelf = R::load( 'shelf', $id );
$books = $shelf->withCondition( ' position > -1 ' )->ownBook;
asrt( count( $books ), 3 );
// With-condition should not affect storing
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position = 1 ' )->ownBook;
asrt( count( $books ), 1 );
asrt( count( $shelf->ownBook ), 1 );
$book = reset( $shelf->ownBook );
$book->title = 'Trees and other Poems';
R::store( $shelf );
$books = $shelf->withCondition( ' position > -1 ' )->ownBook;
asrt( count( $books ), 3 );
asrt( count( $shelf->ownBook ), 3 );
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position = 1 ' )->ownBook;
// Also with trashing -- just trash one!
$shelf->ownBook = array();
R::store( $shelf );
$books = $shelf->withCondition( ' position > -1 ' )->ownBook;
asrt( count( $books ), 2 );
// With should cause a reload of a list
$shelf = R::load( 'shelf', $id );
$books = $shelf->with( ' AND position = 2 ' )->ownBook;
asrt( count( $books ), 1 );
$books = $shelf->withCondition( ' position > -1 ' )->ownBook;
asrt( count( $books ), 2 );
$book = reset( $books );
$book->title = 'Venetian Music';
// Should not affect storage (fact that we used with twice, unsetting prop)
R::store( $shelf );
$shelf = R::load( 'shelf', $id );
asrt( count( $shelf->ownBook ), 2 );
// Alias
list( $game1, $game2, $game3 ) = R::dispense( 'game', 3 );
list( $t1, $t2, $t3 ) = R::dispense( 'team', 3 );
$t1->name = 'Bats';
$t2->name = 'Tigers';
$t3->name = 'Eagles';
$game1->name = 'a';
$game1->team1 = $t1;
$game1->team2 = $t2;
$game2->name = 'b';
$game2->team1 = $t1;
$game2->team2 = $t3;
$game3->name = 'c';
$game3->team1 = $t2;
$game3->team2 = $t3;
R::storeAll( array( $game1, $game2, $game3 ) );
$team1 = R::load( 'team', $t1->id );
$team2 = R::load( 'team', $t2->id );
$team3 = R::load( 'team', $t3->id );
asrt( count( $team1->alias( 'team1' )->ownGame ), 2 );
asrt( count( $team2->alias( 'team1' )->ownGame ), 1 );
$team1 = R::load( 'team', $t1->id );
$team2 = R::load( 'team', $t2->id );
asrt( count( $team1->alias( 'team2' )->ownGame ), 0 );
asrt( count( $team2->alias( 'team2' )->ownGame ), 1 );
asrt( count( $team3->alias( 'team1' )->ownGame ), 0 );
$team3 = R::load( 'team', $t3->id );
asrt( count( $team3->alias( 'team2' )->ownGame ), 2 );
$team1 = R::load( 'team', $t1->id );
$games = $team1->alias( 'team1' )->ownGame;
$game4 = R::dispense( 'game' );
$game4->name = 'd';
$game4->team2 = $t3;
$team1->alias( 'team1' )->ownGame[] = $game4;
R::store( $team1 );
$team1 = R::load( 'team', $t1->id );
asrt( count( $team1->alias( 'team1' )->ownGame ), 3 );
foreach ( $team1->ownGame as $g ) {
if ( $g->name == 'a' ) $game = $g;
}
$game->name = 'match';
R::store( $team1 );
$team1 = R::load( 'team', $t1->id );
asrt( count( $team1->alias( 'team1' )->ownGame ), 3 );
$found = 0;
foreach ( $team1->ownGame as $g ) {
if ( $g->name == 'match' ) $found = 1;
}
if ( $found ) pass();
$team1->ownGame = array();
R::store( $team1 );
$team1 = R::load( 'team', $t1->id );
asrt( count( $team1->alias( 'team1' )->ownGame ), 0 );
$team1->ownBook[] = $book1;
R::store( $team1 );
$team1 = R::load( 'team', $t1->id );
asrt( count( $team1->alias( 'team1' )->ownGame ), 0 );
asrt( count( $team1->ownBook ), 1 );
}
/**
* Test when to reload and when to NOT reload beans.
* Use UNSET to reload a parent bean. Use UNSET or
* a modifier (with, withCondition, all) to reload a list.
* Use noLoad() to obtain an empty list - does not reload
* but sets an empty array.
*
* @return void
*/
public function testWhenToReload()
{
$book = R::dispense( 'book' );
$book->ownPage = R::dispense( 'page', 3 );
$book->author = R::dispense( 'author' );
$book->coauthor = R::dispense( 'author' );
R::store( $book );
$book = $book->fresh();
$firstPage = reset( $book->ownPage );
$id = $firstPage->id;
$book->ownPage[ $id ]->title = 'a';
//Do not reload an own list after manipulations
asrt( $book->ownPage[ $id ]->title, 'a' ); //dont reload!
$book->ownPage[] = R::dispense( 'page' ); //dont reload!
asrt( $book->ownPage[ $id ]->title, 'a' ); //dont reload!
asrt( $book->ownPageList[ $id ]->title, 'a' ); //dont reload!
asrt( $book->xownPageList[ $id ]->title, 'a' ); //dont reload!
asrt( $book->xownPage[ $id ]->title, 'a' ); //dont reload!
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
unset( $book->ownPageList );
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
unset( $book->xownPageList );
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
unset( $book->xownPage );
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
unset( $book->ownPage );
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
$book->all()->ownPage;
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
$book->all()->xownPage;
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
$book->all()->ownPageList;
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//now trigger reload
$book->all()->xownPageList;
asrt( count( $book->ownPageList ), 3 );
$book->ownPage[] = R::dispense( 'page' );
asrt( count( $book->ownPageList ), 4 );
//Do not reload an own list if told to not reload using noLoad()
$book->noLoad()->with(' LIMIT 1 ')->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->noLoad()->all()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->noLoad()->alias('magazine')->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->noLoad()->withCondition('')->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
//even if modifiers proceed noLoad()
$book->with(' LIMIT 1 ')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->all()->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->alias('magazine')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->withCondition('')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
//even in combinations
$book->all()->with(' LIMIT 1 ')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->alias('magazine')->all()->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->alias('magazine')->with('LIMIT 1')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
$book->alias('magazine')->withCondition('')->noLoad()->ownPage; //dont reload!
asrt( count( $book->xownPage ), 0); //dont reload!
//now test shared list
$book->sharedTag = R::dispense( 'tag', 16 );
asrt( count( $book->sharedTag ), 16 );
$book->sharedTag[] = R::dispense( 'tag' );
asrt( count( $book->sharedTag ), 17 ); //dont reload after adding
$last = end( $book->sharedTagList );
$id = $last->id;
$book->sharedTag[ $id ]->title = 'b';
asrt( count( $book->sharedTag ), 17 ); //dont reload after manipulation
unset( $book->sharedTagList[ $id ] );
asrt( count( $book->sharedTag ), 16 ); //dont reload after manipulation
//now trigger reload
unset( $book->sharedTagList );
asrt( count( $book->sharedTag ), 0 );
$book->sharedTag = R::dispense( 'tag', 16 );
asrt( count( $book->sharedTag ), 16 );
//now trigger reload
unset( $book->sharedTag );
asrt( count( $book->sharedTag ), 0 );
$book->sharedTag = R::dispense( 'tag', 16 );
asrt( count( $book->sharedTag ), 16 );
//now trigger reload
$book->all()->sharedTag;
asrt( count( $book->sharedTag ), 0 );
$book->sharedTag = R::dispense( 'tag', 16 );
asrt( count( $book->sharedTag ), 16 );
//now trigger reload
$book->all()->sharedTagList;
asrt( count( $book->sharedTag ), 0 );
$book->sharedTag = R::dispense( 'tag', 16 );
asrt( count( $book->sharedTag ), 16 );
//Do not reload a sharedTag list if told to not reload using noLoad()
$book->noLoad()->with(' LIMIT 1 ')->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->noLoad()->all()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->noLoad()->alias('magazine')->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->noLoad()->withCondition('')->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
//even if modifiers proceed noLoad()
$book->with(' LIMIT 1 ')->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->all()->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->alias('magazine')->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->withCondition('')->noLoad()->ownPage; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
//even in combinations
$book->all()->with(' LIMIT 1 ')->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->alias('magazine')->all()->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->alias('magazine')->with('LIMIT 1')->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
$book->alias('magazine')->withCondition('')->noLoad()->sharedTag; //dont reload!
asrt( count( $book->sharedTag ), 0); //dont reload!
//test do not reload parent bean
$book->author->name = 'me';
asrt( $book->author->name, 'me' );
$book->fetchAs('author')->coauthor;
asrt( $book->author->name, 'me' );
$book->fetchAs('author')->author;
asrt( $book->author->name, 'me' );
$book->with(' LIMIT 1 ')->author;
asrt( $book->author->name, 'me' );
$book->withCondition('')->author;
asrt( $book->author->name, 'me' );
$book->all()->author;
asrt( $book->author->name, 'me' );
$book->noLoad()->author;
asrt( $book->author->name, 'me' );
$book->noLoad()->all()->author;
asrt( $book->author->name, 'me' );
$book->with('LIMIT 1')->noLoad()->all()->author;
asrt( $book->author->name, 'me' );
//now trigger reload
unset( $book->author );
asrt( $book->author->name, NULL );
$book->author->name = 'me';
asrt( $book->author->name, 'me' );
}
/**
* Tests whether modifiers are cleared after reading or
* writing a bean property.
*
* @return void
*/
public function testClearanceOfModFlags()
{
//test base condition, retrieving list or parent should not set flags
$book = R::dispense( 'book' );
asrt( $book->getModFlags(), '' );
$book->ownPage = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->xownPage = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->ownPageList = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->xownPageList = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->ownPage[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->xownPage[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->ownPageList[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->xownPageList[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->sharedPage = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->sharedPageList = R::dispense( 'page', 2 );
asrt( $book->getModFlags(), '' );
$book->sharedPage[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->sharedPageList[] = R::dispense( 'page', 1 );
asrt( $book->getModFlags(), '' );
$book->author = R::dispense( 'author' );
asrt( $book->getModFlags(), '' );
$book->title = 'title';
//Test whether appropriate flags are set and whether they are cleared after
//accessing a property.
$modifiers = array('with'=>'w', 'withCondition'=>'w', 'alias'=>'a', 'fetchAs'=>'f', 'all'=>'r', 'noLoad'=>'n');
$properties = array('ownPage', 'ownPageList', 'xownPage', 'xownPageList', 'sharedPage', 'sharedPageList', 'author', 'title');
foreach( $modifiers as $modifier => $flag ) {
foreach( $properties as $property ) {
$book = R::dispense( 'book' );
$book->$modifier('something');
$flags = $book->getModFlags();
$expect = $flag;
asrt( $flags, $expect );
$book->$property;
$flags = $book->getModFlags();
asrt( $flags, '' );
}
}
//now test combinations and also test whether we can
//clear modifiers manually using the clearModifiers() method.
foreach( $modifiers as $modifier => $flag ) {
foreach( $modifiers as $modifier2 => $flag2 ) {
foreach( $properties as $property ) {
$book = R::dispense( 'book' );
$book->$modifier( 'something' )->$modifier2( 'something' );
$flags = $book->getModFlags();
$expect = array($flag, $flag2);
$expect = array_unique( $expect );
sort( $expect );
$expect = implode( '', $expect );
asrt( $flags, $expect );
$book->$modifier( 'something' )->$modifier2( 'something' )->clearModifiers();
$flags = $book->getModFlags();
asrt( $flags, '' );
$book->$modifier( 'something' )->$modifier2( 'something' )->clearModifiers();
$book->$property;
$flags = $book->getModFlags();
asrt( $flags, '' );
}
}
}
$book = R::dispense( 'book' );
$book->ownPage = R::dispense( 'page', 2 );
$book->sharedPage = R::dispense( 'page', 2 );
R::store( $book );
$book = R::dispense( 'book' );
$book->alias('magazine')->ownPage = R::dispense( 'page', 2 );
R::store( $book );
//test modifier with countOwn and countShared methods
foreach( $modifiers as $modifier => $flag ) {
$book = R::dispense( 'book' );
if ($modifier === 'withCondition') $book->$modifier( ' 1 ' );
elseif ($modifier === 'with') $book->$modifier( ' LIMIT 1 ' );
elseif ($modifier === 'alias') $book->$modifier('magazine');
else $book->$modifier('something');
$flags = $book->getModFlags();
$expect = $flag;
asrt( $flags, $expect );
$book->countOwn('page');
$flags = $book->getModFlags();
asrt( $flags, '' );
if ($modifier === 'withCondition') $book->$modifier( ' 1 ' );
elseif ($modifier === 'with') $book->$modifier( ' LIMIT 1 ' );
elseif ($modifier === 'alias') $book->$modifier('magazine');
else $book->$modifier('something');
$flags = $book->getModFlags();
$expect = $flag;
asrt( $flags, $expect );
$book->countShared('page');
$flags = $book->getModFlags();
asrt( $flags, '' );
if ($modifier === 'withCondition') $book->$modifier( ' 1 ' );
elseif ($modifier === 'with') $book->$modifier( ' LIMIT 1 ' );
elseif ($modifier === 'alias') $book->$modifier('magazine');
else $book->$modifier('something');
$flags = $book->getModFlags();
$expect = $flag;
asrt( $flags, $expect );
unset( $book->author );
$flags = $book->getModFlags();
asrt( $flags, '' );
}
}
}
|