mirror of
https://gitlab.com/hashborgir/d2tools.git
synced 2025-04-28 07:15:37 +00:00
132 lines
3.8 KiB
PHP
132 lines
3.8 KiB
PHP
<?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' );
|
|
}
|
|
}
|