Yaffs site version 1.1

[yaffs-website] / vendor / gabordemooij / redbean / testing / RedUNIT / Base / Facade.php

diff --git a/vendor/gabordemooij/redbean/testing/RedUNIT/Base/Facade.php b/vendor/gabordemooij/redbean/testing/RedUNIT/Base/Facade.php
new file mode 100644 (file)
index 0000000..c67edc8
--- /dev/null
+++ b/vendor/gabordemooij/redbean/testing/RedUNIT/Base/Facade.php
@@ -0,0 +1,138 @@
+<?php
+
+namespace RedUNIT\Base;
+
+use RedUNIT\Base as Base;
+use RedBeanPHP\Facade as R;
+use RedBeanPHP\AssociationManager as AssociationManager;
+use RedBeanPHP\OODB as OODB;
+use RedBeanPHP\ToolBox as ToolBox;
+use RedBeanPHP\Adapter as Adapter;
+use RedBeanPHP\QueryWriter as QueryWriter;
+use RedBeanPHP\OODBBean as OODBBean;
+
+/**
+ * Facade
+ *
+ * Tests the facade. The facade is a single class (often aliased with R)
+ * that provides access to all (or most) RedBeanPHP functionality without
+ * the need to interact with all the objects involved. The facade has
+ * been designed to be as 'straightfoward' as possible, many methods
+ * of the facade class should be 'almost identical' to simple calls
+ * to objects behind the facade. This test focuses on basic usage
+ * scenarios. Complex scenarios are tested in other suites because
+ * we often test 'the complete route' as the facade code path always
+ * includes the non-facade code path as well (as proven by the coverage numbers).
+ *
+ * @file    RedUNIT/Base/Facade.php
+ * @desc    Tests basic functions through facade.
+ * @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 Facade extends Base
+{
+
+       /**
+        * What drivers should be loaded for this test pack?
+        * This pack contains some SQL incomp. with OCI
+        */
+       public function getTargetDrivers()
+       {
+               return array( 'mysql', 'pgsql', 'sqlite', 'CUBRID' );
+       }
+
+       /**
+        * Tests quick trash method: R::trash( type, id ).
+        *
+        * @return void
+        */
+       public function testQuickTrash()
+       {
+               R::nuke();
+               $bean = R::dispense( 'bean' );
+               $id = R::store( $bean );
+               asrt( R::count( 'bean' ), 1 );
+               R::trash( 'bean', $id );
+               asrt( R::count( 'bean' ), 0 );
+       }
+
+       /**
+        * Test common Facade usage scenarios.
+        *
+        * @return void
+        */
+       public function testCommonUsageFacade()
+       {
+               $toolbox = R::getToolBox();
+               $adapter = $toolbox->getDatabaseAdapter();
+               $writer  = $toolbox->getWriter();
+               $redbean = $toolbox->getRedBean();
+               $pdo     = $adapter->getDatabase();
+               $a       = new AssociationManager( $toolbox );
+               asrt( R::getRedBean() instanceof OODB, TRUE );
+               asrt( R::getToolBox() instanceof ToolBox, TRUE );
+               asrt( R::getDatabaseAdapter() instanceof Adapter, TRUE );
+               asrt( R::getWriter() instanceof QueryWriter, TRUE );
+               $book = R::dispense( "book" );
+               asrt( $book instanceof OODBBean, TRUE );
+               $book->title = "a nice book";
+               $id = R::store( $book );
+               asrt( ( $id > 0 ), TRUE );
+               $book = R::load( "book", (int) $id );
+               asrt( $book->title, "a nice book" );
+               asrt( R::load( 'book', 999 )->title, NULL );
+               R::freeze( TRUE );
+               try {
+                       R::load( 'bookies', 999 );
+                       fail();
+               } catch (\Exception $e ) {
+                       pass();
+               }
+               R::freeze( FALSE );
+               $author = R::dispense( "author" );
+               $author->name = "me";
+               R::store( $author );
+               $book9   = R::dispense( "book" );
+               $author9 = R::dispense( "author" );
+               $author9->name = "mr Nine";
+               $a9 = R::store( $author9 );
+               $book9->author_id = $a9;
+               $bk9 = R::store( $book9 );
+               $book9  = R::load( "book", $bk9 );
+               $author = R::load( "author", $book9->author_id );
+               asrt( $author->name, "mr Nine" );
+               R::trash( $author );
+               R::trash( $book9 );
+               pass();
+               $book2 = R::dispense( "book" );
+               $book2->title = "second";
+               R::store( $book2 );
+               $book3 = R::dispense( "book" );
+               $book3->title = "third";
+               R::store( $book3 );
+               asrt( count( R::find( "book" ) ), 3 );
+               asrt( count( R::findAll( "book" ) ), 3 );
+               asrt( count( R::findAll( "book", " LIMIT 2" ) ), 2 );
+               asrt( count( R::find( "book", " id=id " ) ), 3 );
+               asrt( count( R::find( "book", " title LIKE ?", array( "third" ) ) ), 1 );
+               asrt( count( R::find( "book", " title LIKE ?", array( "%d%" ) ) ), 2 );
+               // Find without where clause
+               asrt( count( R::findAll( 'book', ' order by id' ) ), 3 );
+               R::trash( $book3 );
+               R::trash( $book2 );
+               asrt( count( R::getAll( "SELECT * FROM book " ) ), 1 );
+               asrt( count( R::getCol( "SELECT title FROM book " ) ), 1 );
+               asrt( (int) R::getCell( "SELECT 123 " ), 123 );
+               $book = R::dispense( "book" );
+               $book->title = "not so original title";
+               $author = R::dispense( "author" );
+               $author->name = "Bobby";
+               R::store( $book );
+               $aid = R::store( $author );
+               $author = R::findOne( "author", " name = ? ", array( "Bobby" ) );
+       }
+}