<?php
namespace RedUNIT\Blackhole;
use RedUNIT\Blackhole as Blackhole;
use RedBeanPHP\Facade as R;
/**
* Tainted
*
* This test suite tests whether beans are marked as tainted
* under the correct circumstances.
*
* @file RedUNIT/Blackhole/Tainted.php
* @desc Tests tainted flag for OODBBean objects.
* @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 Tainted extends Blackhole
{
/**
* Test whether we can detect a change using hasChanged().
*
* @return void
*/
public function testHasChangedList()
{
R::nuke();
$book = R::dispense( 'book' );
$page = R::dispense( 'page' );
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
$book->ownPage[] = $page;
asrt( $book->hasListChanged( 'ownPage' ), TRUE );
R::store( $book );
$book = $book->fresh();
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
$page = R::dispense( 'page' );
$book->ownPageList[] = $page;
asrt( $book->hasListChanged( 'ownPage' ), TRUE );
R::store( $book );
$book = $book->fresh();
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
asrt( count( $book->ownPageList ), 2 );
array_pop( $book->ownPageList );
asrt( count( $book->ownPageList ), 1 );
asrt( $book->hasListChanged( 'ownPage' ), TRUE );
array_pop( $book->ownPageList );
asrt( count( $book->ownPageList ), 0 );
asrt( $book->hasListChanged( 'ownPage' ), TRUE );
$book = $book->fresh();
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
asrt( count( $book->ownPageList ), 2 );
$otherPage = R::dispense( 'page' );
array_pop( $book->ownPageList );
$book->ownPageList[] = $otherPage;
asrt( count( $book->ownPageList ), 2 );
asrt( $book->hasListChanged( 'ownPage' ), TRUE );
$book = $book->fresh();
$firstPage = reset( $book->ownPageList );
$firstPage->content = 'abc';
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
$book = $book->fresh();
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
$lastPage = end( $book->ownPageList );
$lastPage->ownText[] = R::dispense( 'text' );
asrt( $book->hasListChanged( 'ownPage' ), FALSE );
}
/**
* Tests whether we can clear the history of a bean.
*
* @return void
*/
public function testClearHist()
{
R::nuke();
$book = R::dispense( 'book' );
asrt( $book->hasChanged( 'title' ), FALSE );
$book->title = 'book';
asrt( $book->hasChanged( 'title' ), TRUE );
R::store( $book );
asrt( $book->hasChanged( 'title' ), TRUE );
$book->clearHistory();
asrt( $book->hasChanged( 'title' ), FALSE );
}
/**
* Test tainted.
*
* @return void
*/
public function testTainted()
{
testpack( 'Original Tainted Tests' );
$redbean = R::getRedBean();
$spoon = $redbean->dispense( "spoon" );
asrt( $spoon->getMeta( "tainted" ), TRUE );
$spoon->dirty = "yes";
asrt( $spoon->getMeta( "tainted" ), TRUE );
testpack( 'Tainted List test' );
$note = R::dispense( 'note' );
$note->text = 'abc';
$note->ownNote[] = R::dispense( 'note' )->setAttr( 'text', 'def' );
$id = R::store( $note );
$note = R::load( 'note', $id );
asrt( $note->isTainted(), FALSE );
// Shouldn't affect tainted
$note->text;
asrt( $note->isTainted(), FALSE );
$note->ownNote;
asrt( $note->isTainted(), TRUE );
testpack( 'Tainted Test Old Value' );
$text = $note->old( 'text' );
asrt( $text, 'abc' );
asrt( $note->hasChanged( 'text' ), FALSE );
$note->text = 'xxx';
asrt( $note->hasChanged( 'text' ), TRUE );
$text = $note->old( 'text' );
asrt( $text, 'abc' );
testpack( 'Tainted Non-exist' );
asrt( $note->hasChanged( 'text2' ), FALSE );
testpack( 'Misc Tainted Tests' );
$bean = R::dispense( 'bean' );
$bean->hasChanged( 'prop' );
$bean->old( 'prop' );
}
}
|