mirror of
https://gitlab.com/hashborgir/d2tools.git
synced 2025-11-29 13:11:34 -06:00
Begin Refactor
This commit is contained in:
262
vendor/gabordemooij/redbean/testing/RedUNIT/Base/Partial.php
vendored
Normal file
262
vendor/gabordemooij/redbean/testing/RedUNIT/Base/Partial.php
vendored
Normal file
@@ -0,0 +1,262 @@
|
||||
<?php
|
||||
|
||||
namespace RedUNIT\Base;
|
||||
|
||||
use RedUNIT\Base as Base;
|
||||
use RedBeanPHP\Facade as R;
|
||||
|
||||
/**
|
||||
* Partial Beans
|
||||
*
|
||||
* Test whether we can use 'partial bean mode'.
|
||||
* In 'partial bean mode' only changed properties of a bean
|
||||
* will get updated in the database. This feature has been designed
|
||||
* to deal with 'incompatible table fields'. The specific case that
|
||||
* led to this feature is available as test Postgres/Partial and is
|
||||
* based on Github issue #547. This test only covers the basic functionality.
|
||||
*
|
||||
* @file RedUNIT/Base/Partial.php
|
||||
* @desc Tests Partial Beans Mode
|
||||
* @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 Partial extends Base {
|
||||
|
||||
/**
|
||||
* Github Issue #754.
|
||||
* If I set up the default values to some specific columns,
|
||||
* these columns can not act the same expectation in partial bean mode. #754.
|
||||
* "When I upgrade my code to Redbean 5.4 and turn on the partial bean mode,
|
||||
* I found this issue I mentioned.
|
||||
* As Redbean recommends, I set up the default values
|
||||
* to some specific columns before I use them.
|
||||
* And then I use the partial bean mode to store
|
||||
* the columns updated rather than the entire bean.
|
||||
* But I found if I set up the default values,
|
||||
* it will change the changelist in the bean which is the
|
||||
* foundation of the partial bean mode."
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testChangeListIssue()
|
||||
{
|
||||
R::nuke();
|
||||
R::usePartialBeans( TRUE );
|
||||
\Model_Coffee::$defaults = array(
|
||||
'strength' => 'strong',
|
||||
'beans' => 'Arabica',
|
||||
'preparation' => 'Kettle'
|
||||
);
|
||||
$coffee = R::dispense('coffee');
|
||||
$changelist = $coffee->getMeta('changelist');
|
||||
asrt( count( $changelist), 3 );
|
||||
$coffee->preparation = 'Espresso';
|
||||
$changelist = $coffee->getMeta('changelist');
|
||||
asrt( count( $changelist), 4 );
|
||||
$id = R::store( $coffee );
|
||||
$coffee = R::load( 'coffee', $id );
|
||||
$changelist = $coffee->getMeta('changelist');
|
||||
asrt( count( $changelist), 0 );
|
||||
}
|
||||
|
||||
/**
|
||||
* Github Issue #754.
|
||||
* The importRow() function should clear the changeList.
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testChangeListImportRow()
|
||||
{
|
||||
R::usePartialBeans( TRUE );
|
||||
$bean = R::dispense( 'bean' );
|
||||
asrt( count( $bean->getMeta('changelist') ), 0 );
|
||||
$bean->property = 'abc';
|
||||
asrt( count( $bean->getMeta('changelist') ), 1 );
|
||||
$bean->importRow( array( 'property' => 123 ) );
|
||||
asrt( count( $bean->getMeta('changelist') ), 0 );
|
||||
}
|
||||
|
||||
/**
|
||||
* Tests the basic scenarios for Partial Beans.
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testPartialBeans()
|
||||
{
|
||||
R::nuke();
|
||||
R::usePartialBeans( FALSE );
|
||||
$book = R::dispense( 'book' );
|
||||
$book->title = 'A book about half beans';
|
||||
$book->price = 99;
|
||||
$book->pages = 60;
|
||||
$id = R::store( $book );
|
||||
/* test baseline condition */
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 60 );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 61 );
|
||||
/* now test partial beans mode */
|
||||
R::usePartialBeans( TRUE );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->pages, 62 );
|
||||
/* mask should be cleared... */
|
||||
R::exec( 'UPDATE book SET pages = ? ', array( 64 ) );
|
||||
$book->price = 92;
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( (integer) $book->pages, 64 );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->price, 92 );
|
||||
R::usePartialBeans( FALSE );
|
||||
}
|
||||
|
||||
/**
|
||||
* Tests whether we can pass a list of specific bean types
|
||||
* to apply partial saving to.
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testPartialBeansTypeList()
|
||||
{
|
||||
R::nuke();
|
||||
R::usePartialBeans( array( 'notbook' ) );
|
||||
$book = R::dispense( 'book' );
|
||||
$book->title = 'A book about half beans';
|
||||
$book->price = 99;
|
||||
$book->pages = 60;
|
||||
$id = R::store( $book );
|
||||
/* test baseline condition */
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 60 );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 61 );
|
||||
/* now test partial beans mode */
|
||||
R::usePartialBeans( array( 'book', 'more' ) );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->pages, 62 );
|
||||
/* mask should be cleared... */
|
||||
R::exec( 'UPDATE book SET pages = ? ', array( 64 ) );
|
||||
$book->price = 92;
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( (integer) $book->pages, 64 );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->price, 92 );
|
||||
R::usePartialBeans( FALSE );
|
||||
}
|
||||
|
||||
/**
|
||||
* Tests the basic scenarios for Partial Beans.
|
||||
* Frozen.
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testPartialBeansFrozen()
|
||||
{
|
||||
R::nuke();
|
||||
R::usePartialBeans( FALSE );
|
||||
$book = R::dispense( 'book' );
|
||||
$book->title = 'A book about half beans';
|
||||
$book->price = 99;
|
||||
$book->pages = 60;
|
||||
$id = R::store( $book );
|
||||
/* test baseline condition */
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 60 );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 61 );
|
||||
/* now test partial beans mode */
|
||||
R::freeze( TRUE );
|
||||
R::usePartialBeans( TRUE );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->pages, 62 );
|
||||
/* mask should be cleared... */
|
||||
R::exec( 'UPDATE book SET pages = ? ', array( 64 ) );
|
||||
$book->price = 92;
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( (integer) $book->pages, 64 );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->price, 92 );
|
||||
R::usePartialBeans( FALSE );
|
||||
R::freeze( FALSE );
|
||||
}
|
||||
|
||||
/**
|
||||
* Tests whether we can pass a list of specific bean types
|
||||
* to apply partial saving to.
|
||||
* Frozen.
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function testPartialBeansTypeListFrozen()
|
||||
{
|
||||
R::nuke();
|
||||
R::usePartialBeans( array( 'notbook' ) );
|
||||
$book = R::dispense( 'book' );
|
||||
$book->title = 'A book about half beans';
|
||||
$book->price = 99;
|
||||
$book->pages = 60;
|
||||
$id = R::store( $book );
|
||||
/* test baseline condition */
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 60 );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'A book about half beans' );
|
||||
asrt( (integer) $book->pages, 61 );
|
||||
/* now test partial beans mode */
|
||||
R::freeze( TRUE );
|
||||
R::usePartialBeans( array( 'book', 'more' ) );
|
||||
$book->pages++;
|
||||
R::exec( 'UPDATE book SET title = ? ', array( 'Another Title' ) );
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->pages, 62 );
|
||||
/* mask should be cleared... */
|
||||
R::exec( 'UPDATE book SET pages = ? ', array( 64 ) );
|
||||
$book->price = 92;
|
||||
$id = R::store( $book );
|
||||
$book = R::load( 'book', $id );
|
||||
asrt( (integer) $book->pages, 64 );
|
||||
asrt( $book->title, 'Another Title' );
|
||||
asrt( (integer) $book->price, 92 );
|
||||
R::usePartialBeans( FALSE );
|
||||
R::freeze( FALSE );
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user