mirror of
https://gitlab.com/hashborgir/d2tools.git
synced 2025-04-28 07:15:37 +00:00
711 lines
22 KiB
PHP
711 lines
22 KiB
PHP
<?php
|
|
|
|
namespace RedUNIT\Postgres;
|
|
|
|
use RedUNIT\Postgres as Postgres;
|
|
use RedBeanPHP\Facade as R;
|
|
use RedBeanPHP\AssociationManager as AssociationManager;
|
|
use RedBeanPHP\QueryWriter\PostgreSQL as PostgreSQL;
|
|
use RedBeanPHP\RedException\SQL as SQL;
|
|
use RedBeanPHP\RedException as RedException;
|
|
|
|
/**
|
|
* Writer
|
|
*
|
|
* Tests for PostgreSQL Query Writer.
|
|
* This test class contains Query Writer specific tests.
|
|
* Use this class to add tests to test Query Writer specific
|
|
* behaviours, quirks and issues.
|
|
*
|
|
* @file RedUNIT/Postgres/Writer.php
|
|
* @desc A collection of writer specific tests.
|
|
* @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 Writer extends Postgres
|
|
{
|
|
/**
|
|
* Test whether optimizations do not have effect on Writer query outcomes.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testWriterSpeedUp()
|
|
{
|
|
R::nuke();
|
|
$id = R::store( R::dispense( 'book' ) );
|
|
$writer = R::getWriter();
|
|
$count1 = $writer->queryRecordCount( 'book', array( 'id' => $id ), ' id = :id ', array( ':id' => $id ) );
|
|
$count2 = $writer->queryRecordCount( 'book', array( ), ' id = :id ', array( ':id' => $id ) );
|
|
$count3 = $writer->queryRecordCount( 'book', NULL, ' id = :id ', array( ':id' => $id ) );
|
|
$count4 = $writer->queryRecordCount( 'book', array( 'id' => $id ) );
|
|
asrt( $count1, $count2 );
|
|
asrt( $count2, $count3 );
|
|
asrt( $count3, $count4 );
|
|
R::nuke();
|
|
$books = R::dispenseAll( 'book*4' );
|
|
$ids = R::storeAll( $books[0] );
|
|
$writer->deleteRecord( 'book', array( 'id' => $ids[0] ) );
|
|
$writer->deleteRecord( 'book', array( 'id' => $ids[1] ), ' id = :id ', array( ':id' => $ids[1] ) );
|
|
$writer->deleteRecord( 'book', NULL, ' id = :id ', array( ':id' => $ids[2] ) );
|
|
$writer->deleteRecord( 'book', array(), ' id = :id ', array( ':id' => $ids[3] ) );
|
|
asrt( R::count( 'book' ), 0 );
|
|
R::nuke();
|
|
$id = R::store( R::dispense( 'book' ) );
|
|
$record = $writer->queryRecord( 'book', array( 'id' => $id ) );
|
|
asrt( is_array( $record ), TRUE );
|
|
asrt( is_array( $record[0] ), TRUE );
|
|
asrt( isset( $record[0]['id'] ), TRUE );
|
|
asrt( (int) $record[0]['id'], $id );
|
|
$record = $writer->queryRecord( 'book', array( 'id' => $id ), ' id = :id ', array( ':id' => $id ) );
|
|
asrt( is_array( $record ), TRUE );
|
|
asrt( is_array( $record[0] ), TRUE );
|
|
asrt( isset( $record[0]['id'] ), TRUE );
|
|
asrt( (int) $record[0]['id'], $id );
|
|
$record = $writer->queryRecord( 'book', NULL, ' id = :id ', array( ':id' => $id ) );
|
|
asrt( is_array( $record ), TRUE );
|
|
asrt( is_array( $record[0] ), TRUE );
|
|
asrt( isset( $record[0]['id'] ), TRUE );
|
|
asrt( (int) $record[0]['id'], $id );
|
|
$record = $writer->queryRecord( 'book', array(), ' id = :id ', array( ':id' => $id ) );
|
|
asrt( is_array( $record ), TRUE );
|
|
asrt( is_array( $record[0] ), TRUE );
|
|
asrt( isset( $record[0]['id'] ), TRUE );
|
|
asrt( (int) $record[0]['id'], $id );
|
|
}
|
|
|
|
/**
|
|
* Tests wheter we can write a deletion query
|
|
* for PostgreSQL using NO conditions but only an
|
|
* additional SQL snippet.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testWriteDeleteQuery()
|
|
{
|
|
$queryWriter = R::getWriter();
|
|
asrt( ( $queryWriter instanceof PostgreSQL ), TRUE );
|
|
R::nuke();
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->name = 'a';
|
|
$id = R::store( $bean );
|
|
asrt( R::count( 'bean' ), 1 );
|
|
$queryWriter->deleteRecord( 'bean', array(), $addSql = ' id = :id ', $bindings = array( ':id' => $id ) );
|
|
asrt( R::count( 'bean' ), 0 );
|
|
}
|
|
|
|
/**
|
|
* Tests wheter we can write a counting query
|
|
* for PostgreSQL using conditions and an additional SQL snippet.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testWriteCountQuery()
|
|
{
|
|
$queryWriter = R::getWriter();
|
|
asrt( ( $queryWriter instanceof PostgreSQL ), TRUE );
|
|
R::nuke();
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->name = 'a';
|
|
R::store( $bean );
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->name = 'b';
|
|
R::store( $bean );
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->name = 'b';
|
|
R::store( $bean );
|
|
$count = $queryWriter->queryRecordCount( 'bean', array( 'name' => 'b' ), $addSql = ' id > :id ', $bindings = array( ':id' => 0 ) );
|
|
asrt( $count, 2 );
|
|
}
|
|
|
|
/**
|
|
* Tests whether we can write a PostgreSQL join and
|
|
* whether the correct exception is thrown in case
|
|
* of an invalid join.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testWriteJoinSnippets()
|
|
{
|
|
$queryWriter = R::getWriter();
|
|
asrt( ( $queryWriter instanceof PostgreSQL ), TRUE );
|
|
$snippet = $queryWriter->writeJoin( 'book', 'page' ); //default must be LEFT
|
|
asrt( is_string( $snippet ), TRUE );
|
|
asrt( ( strlen( $snippet ) > 0 ), TRUE );
|
|
asrt( ' LEFT JOIN "page" ON "page".id = "book".page_id ', $snippet );
|
|
$snippet = $queryWriter->writeJoin( 'book', 'page', 'LEFT' );
|
|
asrt( is_string( $snippet ), TRUE );
|
|
asrt( ( strlen( $snippet ) > 0 ), TRUE );
|
|
asrt( ' LEFT JOIN "page" ON "page".id = "book".page_id ', $snippet );
|
|
$snippet = $queryWriter->writeJoin( 'book', 'page', 'RIGHT' );
|
|
asrt( is_string( $snippet ), TRUE );
|
|
asrt( ( strlen( $snippet ) > 0 ), TRUE );
|
|
asrt( ' RIGHT JOIN "page" ON "page".id = "book".page_id ', $snippet );
|
|
$snippet = $queryWriter->writeJoin( 'book', 'page', 'INNER' );
|
|
asrt( ' INNER JOIN "page" ON "page".id = "book".page_id ', $snippet );
|
|
$exception = NULL;
|
|
try {
|
|
$snippet = $queryWriter->writeJoin( 'book', 'page', 'MIDDLE' );
|
|
}
|
|
catch(\Exception $e) {
|
|
$exception = $e;
|
|
}
|
|
asrt( ( $exception instanceof RedException ), TRUE );
|
|
$errorMessage = $exception->getMessage();
|
|
asrt( is_string( $errorMessage ), TRUE );
|
|
asrt( ( strlen( $errorMessage ) > 0 ), TRUE );
|
|
asrt( $errorMessage, 'Invalid JOIN.' );
|
|
}
|
|
|
|
/**
|
|
* Test whether we can store JSON as a JSON column
|
|
* and whether this plays well with the other data types.
|
|
*/
|
|
public function testSetGetJSON()
|
|
{
|
|
global $travis;
|
|
if ($travis) return;
|
|
R::nuke();
|
|
$bean = R::dispense('bean');
|
|
$message = json_encode( array( 'message' => 'hello', 'type' => 'greeting' ) ) ;
|
|
$bean->data = $message;
|
|
R::store( $bean );
|
|
$columns = R::inspect('bean');
|
|
asrt( array_key_exists( 'data', $columns ), TRUE );
|
|
asrt( ( $columns['data'] !== 'json' ), TRUE );
|
|
R::useJSONFeatures( TRUE );
|
|
R::nuke();
|
|
$bean = R::dispense('bean');
|
|
$message = array( 'message' => 'hello', 'type' => 'greeting' );
|
|
$bean->data = $message;
|
|
R::store( $bean );
|
|
$columns = R::inspect('bean');
|
|
asrt( array_key_exists( 'data', $columns ), TRUE );
|
|
asrt( $columns['data'], 'json' );
|
|
$bean = $bean->fresh();
|
|
$message = json_decode( $bean->data, TRUE );
|
|
asrt( $message['message'], 'hello' );
|
|
asrt( $message['type'], 'greeting' );
|
|
$message['message'] = 'hi';
|
|
$bean->data = $message;
|
|
R::store( $bean );
|
|
pass();
|
|
$bean = R::findOne( 'bean' );
|
|
$message = json_decode( $bean->data );
|
|
asrt( $message->message, 'hi' );
|
|
$book = R::dispense( 'book' );
|
|
$book->page = 'lorem ipsum';
|
|
R::store( $book );
|
|
$book = $book->fresh();
|
|
asrt( $book->page, 'lorem ipsum' );
|
|
$book2 = R::dispense( 'book' );
|
|
$book2->page = array( 'chapter' => '1' );
|
|
R::store( $book2 );
|
|
pass(); //should not try to modify column and trigger exception
|
|
$book = $book->fresh();
|
|
asrt( $book->page, 'lorem ipsum' );
|
|
$columns = R::inspect('book');
|
|
asrt( ( $columns['page'] !== 'json' ), TRUE );
|
|
$building = R::dispense( 'building' );
|
|
$building->year = 'MLXXVIII';
|
|
R::store( $building );
|
|
$shop = R::dispense( 'building' );
|
|
$shop->year = '2010-01-01';
|
|
R::store( $shop );
|
|
$building = R::load( 'building', $building->id );
|
|
asrt( $building->year, 'MLXXVIII' );
|
|
$columns = R::inspect( 'building' );
|
|
asrt( strpos( strtolower( $columns['year'] ), 'date' ), FALSE );
|
|
$shop->anno = '2010-01-01';
|
|
R::store( $shop );
|
|
$columns = R::inspect( 'building' );
|
|
asrt( $columns['anno'], 'date' );
|
|
R::useJSONFeatures( FALSE );
|
|
}
|
|
|
|
/**
|
|
* Test scanning and coding.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testScanningAndCoding()
|
|
{
|
|
$toolbox = R::getToolBox();
|
|
$adapter = $toolbox->getDatabaseAdapter();
|
|
$writer = $toolbox->getWriter();
|
|
$redbean = $toolbox->getRedBean();
|
|
$pdo = $adapter->getDatabase();
|
|
$a = new AssociationManager( $toolbox );
|
|
$adapter->exec( "DROP TABLE IF EXISTS testtable" );
|
|
asrt( in_array( "testtable", $writer->getTables() ), FALSE );
|
|
$writer->createTable( "testtable" );
|
|
asrt( in_array( "testtable", $writer->getTables() ), TRUE );
|
|
asrt( count( array_keys( $writer->getColumns( "testtable" ) ) ), 1 );
|
|
asrt( in_array( "id", array_keys( $writer->getColumns( "testtable" ) ) ), TRUE );
|
|
asrt( in_array( "c1", array_keys( $writer->getColumns( "testtable" ) ) ), FALSE );
|
|
$writer->addColumn( "testtable", "c1", 1 );
|
|
asrt( count( array_keys( $writer->getColumns( "testtable" ) ) ), 2 );
|
|
asrt( in_array( "c1", array_keys( $writer->getColumns( "testtable" ) ) ), TRUE );
|
|
foreach ( $writer->sqltype_typeno as $key => $type ) {
|
|
if ( $type < 100 ) {
|
|
asrt( $writer->code( $key, TRUE ), $type );
|
|
} else {
|
|
asrt( $writer->code( $key ), PostgreSQL::C_DATATYPE_SPECIFIED );
|
|
}
|
|
}
|
|
asrt( $writer->code( PostgreSQL::C_DATATYPE_SPECIAL_DATETIME ), PostgreSQL::C_DATATYPE_SPECIFIED );
|
|
asrt( $writer->code( "unknown" ), PostgreSQL::C_DATATYPE_SPECIFIED );
|
|
asrt( $writer->scanType( FALSE ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( TRUE ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( NULL ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( 2 ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( 255 ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( 256 ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( -1 ), PostgreSQL::C_DATATYPE_INTEGER );
|
|
asrt( $writer->scanType( 1.5 ), PostgreSQL::C_DATATYPE_DOUBLE );
|
|
asrt( $writer->scanType( INF ), PostgreSQL::C_DATATYPE_TEXT );
|
|
asrt( $writer->scanType( "abc" ), PostgreSQL::C_DATATYPE_TEXT );
|
|
asrt( $writer->scanType( "2001-10-10", TRUE ), PostgreSQL::C_DATATYPE_SPECIAL_DATE );
|
|
asrt( $writer->scanType( "2001-10-10 10:00:00", TRUE ), PostgreSQL::C_DATATYPE_SPECIAL_DATETIME );
|
|
asrt( $writer->scanType( "2001-10-10 10:00:00" ), PostgreSQL::C_DATATYPE_TEXT );
|
|
asrt( $writer->scanType( "2001-10-10" ), PostgreSQL::C_DATATYPE_TEXT );
|
|
asrt( $writer->scanType( str_repeat( "lorem ipsum", 100 ) ), PostgreSQL::C_DATATYPE_TEXT );
|
|
$writer->widenColumn( "testtable", "c1", PostgreSQL::C_DATATYPE_TEXT );
|
|
$cols = $writer->getColumns( "testtable" );
|
|
asrt( $writer->code( $cols["c1"] ), PostgreSQL::C_DATATYPE_TEXT );
|
|
$writer->addColumn( "testtable", "special", PostgreSQL::C_DATATYPE_SPECIAL_DATE );
|
|
$cols = $writer->getColumns( "testtable" );
|
|
asrt( $writer->code( $cols['special'], TRUE ), PostgreSQL::C_DATATYPE_SPECIAL_DATE );
|
|
asrt( $writer->code( $cols['special'], FALSE ), PostgreSQL::C_DATATYPE_SPECIFIED );
|
|
$writer->addColumn( "testtable", "special2", PostgreSQL::C_DATATYPE_SPECIAL_DATETIME );
|
|
$cols = $writer->getColumns( "testtable" );
|
|
asrt( $writer->code( $cols['special2'], TRUE ), PostgreSQL::C_DATATYPE_SPECIAL_DATETIME );
|
|
asrt( $writer->code( $cols['special'], FALSE ), PostgreSQL::C_DATATYPE_SPECIFIED );
|
|
$id = $writer->updateRecord( "testtable", array( array( "property" => "c1", "value" => "lorem ipsum" ) ) );
|
|
$row = $writer->queryRecord( "testtable", array( "id" => array( $id ) ) );
|
|
asrt( $row[0]["c1"], "lorem ipsum" );
|
|
$writer->updateRecord( "testtable", array( array( "property" => "c1", "value" => "ipsum lorem" ) ), $id );
|
|
$row = $writer->queryRecord( "testtable", array( "id" => array( $id ) ) );
|
|
asrt( $row[0]["c1"], "ipsum lorem" );
|
|
$writer->deleteRecord( "testtable", array( "id" => array( $id ) ) );
|
|
$row = $writer->queryRecord( "testtable", array( "id" => array( $id ) ) );
|
|
asrt( empty( $row ), TRUE );
|
|
}
|
|
|
|
/**
|
|
* (FALSE should be stored as 0 not as '')
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testZeroIssue()
|
|
{
|
|
testpack( "Zero issue" );
|
|
$toolbox = R::getToolBox();
|
|
$redbean = $toolbox->getRedBean();
|
|
$bean = $redbean->dispense( "zero" );
|
|
$bean->zero = FALSE;
|
|
$bean->title = "bla";
|
|
$redbean->store( $bean );
|
|
asrt( count( $redbean->find( "zero", array(), " zero = 0 " ) ), 1 );
|
|
testpack( "Test ANSI92 issue in clearrelations" );
|
|
$a = new AssociationManager( $toolbox );
|
|
$book = $redbean->dispense( "book" );
|
|
$author1 = $redbean->dispense( "author" );
|
|
$author2 = $redbean->dispense( "author" );
|
|
$book->title = "My First Post";
|
|
$author1->name = "Derek";
|
|
$author2->name = "Whoever";
|
|
set1toNAssoc( $a, $book, $author1 );
|
|
set1toNAssoc( $a, $book, $author2 );
|
|
pass();
|
|
}
|
|
|
|
/**
|
|
* Various.
|
|
* Tests whether writer correctly handles keyword 'group' and SQL state 23000 issue.
|
|
* These tests remain here to make sure issues 9 and 10 never happen again.
|
|
* However this bug will probably never re-appear due to changed architecture.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testIssue9and10()
|
|
{
|
|
$toolbox = R::getToolBox();
|
|
$redbean = $toolbox->getRedBean();
|
|
$adapter = $toolbox->getDatabaseAdapter();
|
|
$a = new AssociationManager( $toolbox );
|
|
$book = $redbean->dispense( "book" );
|
|
$author1 = $redbean->dispense( "author" );
|
|
$author2 = $redbean->dispense( "author" );
|
|
$book->title = "My First Post";
|
|
$author1->name = "Derek";
|
|
$author2->name = "Whoever";
|
|
$a->associate( $book, $author1 );
|
|
$a->associate( $book, $author2 );
|
|
pass();
|
|
testpack( "Test Association Issue Group keyword (Issues 9 and 10)" );
|
|
R::nuke();
|
|
$group = $redbean->dispense( "group" );
|
|
$group->name = "mygroup";
|
|
$redbean->store( $group );
|
|
try {
|
|
$a->associate( $group, $book );
|
|
pass();
|
|
} catch ( SQL $e ) {
|
|
fail();
|
|
}
|
|
// Test issue SQL error 23000
|
|
try {
|
|
$a->associate( $group, $book );
|
|
|
|
pass();
|
|
} catch ( SQL $e ) {
|
|
fail();
|
|
}
|
|
asrt( (int) $adapter->getCell( "select count(*) from book_group" ), 1 ); //just 1 rec!
|
|
}
|
|
|
|
/**
|
|
* Test various.
|
|
* Test various somewhat uncommon trash/unassociate scenarios.
|
|
* (i.e. unassociate unrelated beans, trash non-persistant beans etc).
|
|
* Should be handled gracefully - no output checking.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testVaria()
|
|
{
|
|
$toolbox = R::getToolBox();
|
|
$redbean = $toolbox->getRedBean();
|
|
$a = new AssociationManager( $toolbox );
|
|
$book = $redbean->dispense( "book" );
|
|
$author1 = $redbean->dispense( "author" );
|
|
$author2 = $redbean->dispense( "author" );
|
|
$book->title = "My First Post";
|
|
$author1->name = "Derek";
|
|
$author2->name = "Whoever";
|
|
$a->unassociate( $book, $author1 );
|
|
$a->unassociate( $book, $author2 );
|
|
pass();
|
|
$redbean->trash( $redbean->dispense( "bla" ) );
|
|
pass();
|
|
$bean = $redbean->dispense( "bla" );
|
|
$bean->name = 1;
|
|
$bean->id = 2;
|
|
$redbean->trash( $bean );
|
|
pass();
|
|
}
|
|
|
|
/**
|
|
* Test special types.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypes()
|
|
{
|
|
testpack( 'Special data types' );
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->date = 'someday';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['date'], 'text' );
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->date = '2011-10-10';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['date'], 'text' );
|
|
}
|
|
|
|
/**
|
|
* Test dates.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesDates()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->date = '2011-10-10';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['date'], 'date' );
|
|
}
|
|
|
|
/**
|
|
* Datetime.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesDateTimes()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->date = '2011-10-10 10:00:00';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['date'], 'timestamp without time zone' );
|
|
}
|
|
|
|
/**
|
|
* Test spatial data types.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesPoints()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->point = '(92,12)';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['point'], 'point' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->point, '(92,12)' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->point, '(92,12)' );
|
|
}
|
|
|
|
/**
|
|
* Test points.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesDecPoints()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->point = '(9.2,1.2)';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['point'], 'point' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->point, '(9.2,1.2)' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->point, '(9.2,1.2)' );
|
|
}
|
|
|
|
/**
|
|
* Test polygons.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testPolygons()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->polygon = '((0,0),(1,1),(2,0))';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['polygon'], 'polygon' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->polygon, '((0,0),(1,1),(2,0))' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->polygon, '((0,0),(1,1),(2,0))' );
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->polygon = '((0,0),(1.2,1),(2,0.3))';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['polygon'], 'polygon' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->polygon, '((0,0),(1.2,1),(2,0.3))' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->polygon, '((0,0),(1.2,1),(2,0.3))' );
|
|
}
|
|
|
|
/**
|
|
* Test multi points.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesMultiDecPoints()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->line = '[(1.2,1.4),(2.2,34)]';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['line'], 'lseg' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->line, '[(1.2,1.4),(2.2,34)]' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->line, '[(1.2,1.4),(2.2,34)]' );
|
|
}
|
|
|
|
/**
|
|
* More points...
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesWeirdPoints()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->circle = '<(9.2,1.2),7.9>';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['circle'], 'circle' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->circle, '<(9.2,1.2),7.9>' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->circle, '<(9.2,1.2),7.9>' );
|
|
}
|
|
|
|
/**
|
|
* Test money types.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesMon()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->amount = '22.99';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['amount'], 'numeric' );
|
|
R::nuke();
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->amount = '-22.99';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['amount'], 'numeric' );
|
|
}
|
|
|
|
/**
|
|
* Test money data type.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesMoney()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->money = '$123.45';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['money'], 'money' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->money, '$123.45' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->money, '$123.45' );
|
|
$bean->money = '$123,455.01';
|
|
R::store($bean);
|
|
$bean = $bean->fresh();
|
|
asrt( $bean->money, '$123,455.01' );
|
|
}
|
|
|
|
/**
|
|
* Test negative money data type.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesNegativeMoney()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->money = '-$123.45';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['money'], 'money' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->money, '-$123.45' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->money, '-$123.45' );
|
|
}
|
|
|
|
/**
|
|
* Issue #340
|
|
* Redbean is currently picking up bcrypt hashed passwords
|
|
* (which look like this: $2y$12$85lAS....SnpDNVGPAC7w0G)
|
|
* as PostgreSQL money types.
|
|
* Then, once R::store is called on the bean, it chokes and throws the following error:
|
|
* PHP Fatal error: Uncaught [22P02] - SQLSTATE[22P02]: Invalid text representation: 7 ERROR:
|
|
* invalid input syntax for type money: ....
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesInvalidMoney()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->nomoney = '$2y$12$85lAS';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['nomoney'], 'text' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->nomoney, '$2y$12$85lAS' );
|
|
$bean->note = 'taint';
|
|
R::store( $bean );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->nomoney, '$2y$12$85lAS' );
|
|
}
|
|
|
|
/**
|
|
* Test types of strings.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTypesStrings()
|
|
{
|
|
$bean = R::dispense( 'bean' );
|
|
$bean->data = 'abcdefghijk';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
$bean = R::load( 'bean', $bean->id );
|
|
asrt( $bean->data, 'abcdefghijk' );
|
|
$bean->data = '(1,2)';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
$bean->data = '[(1.2,1.4),(2.2,34)]';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
$bean->data = '<(9.2,1.2),7.9>';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
$bean->data = '$25';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
$bean->data = '2012-10-10 10:00:00';
|
|
R::store( $bean );
|
|
$cols = R::getColumns( 'bean' );
|
|
asrt( $cols['data'], 'text' );
|
|
}
|
|
|
|
/**
|
|
* Can we manually add a Postgres time column without a time zone
|
|
* and with a time zone?
|
|
*
|
|
* @return void
|
|
*/
|
|
public function testTime()
|
|
{
|
|
R::nuke();
|
|
$clock = R::dispense('clock');
|
|
$clock->time = '10:00:00';
|
|
$clock->setMeta('cast.time', 'time');
|
|
R::store( $clock );
|
|
$columns = R::inspect('clock');
|
|
asrt( $columns['time'], 'time without time zone' );
|
|
R::nuke();
|
|
$clock = R::dispense('clock');
|
|
$clock->time = '10:00:00 PST';
|
|
$clock->setMeta('cast.time', 'time with time zone');
|
|
R::store( $clock );
|
|
$columns = R::inspect('clock');
|
|
asrt( $columns['time'], 'time with time zone' );
|
|
}
|
|
}
|