oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more product collateral tests

Browse source
This commit is contained in:
Colin Kuskie 2008-05-03 19:18:01 +00:00
parent 0000db901e
commit ef12f5118f
1 changed files with 72 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

75
t/Asset/Sku/ProductCollateral.t
View file

@ -16,13 +16,16 @@
use FindBin;
use strict;
use lib "$FindBin::Bin/../../lib";
use Test::More;
use Test::Deep;
use JSON;
use Data::Dumper;
use WebGUI::Test; # Must use this before any other WebGUI modules
use WebGUI::Session;
use WebGUI::Asset;
use WebGUI::Asset::Sku::Product;
use JSON;
#----------------------------------------------------------------------------
# Init
@ -32,7 +35,7 @@ my $session = WebGUI::Test->session;
#----------------------------------------------------------------------------
# Tests
plan tests => 4; # Increment this number for each test you create
plan tests => 14; # Increment this number for each test you create
#----------------------------------------------------------------------------
# put your tests here
@ -52,12 +55,78 @@ isa_ok($product->{_collateral}, 'HASH', 'object cache created for collateral');
my $json;
$json = $product->get('variantsJSON');
my $jsonData = from_json($json);
cmp_bag(
cmp_deeply(
$jsonData,
[ {a => 'aye', b => 'bee' } ],
'Correct JSON data stored when collateral is empty',
);
my $dbJson = $session->db->quickScalar('select variantsJSON from Product where assetId=?', [$product->getId]);
is($json, $dbJson, 'db updated with correct JSON');
$product->setCollateral('variantsJSON', 'new', {c => 'see', d => 'dee'});
my $collateral = $product->getAllCollateral('variantsJSON');
isa_ok($collateral, 'ARRAY', 'getAllCollateral returns an array ref');
cmp_deeply(
$collateral,
[
{a => 'aye', b => 'bee' },
{c => 'see', d => 'dee' },
],
'setCollateral: new always appends to the end',
);
$product->setCollateral('variantsJSON', 2, {a => 'see', b => 'dee'});
cmp_deeply(
$product->getAllCollateral('variantsJSON'),
[
{a => 'aye', b => 'bee' },
{c => 'see', d => 'dee' },
],
'setCollateral: out of range index does not work',
);
$product->setCollateral('variantsJSON', 1, {a => 'see', b => 'dee'});
cmp_deeply(
$product->getAllCollateral('variantsJSON'),
[
{a => 'aye', b => 'bee' },
{a => 'see', b => 'dee' },
],
'setCollateral: set by index works',
);
cmp_deeply(
$product->getCollateral('variantsJSON', "new"),
{},
'getCollateral: index=new returns an empty hashref',
);
cmp_deeply(
$product->getCollateral('variantsJSON'),
{},
'getCollateral: undef index returns an empty hashref',
);
cmp_deeply(
$product->getCollateral('variantsJSON', 3),
{},
'getCollateral: out of range index returns an empty hashref',
);
cmp_deeply(
$product->getCollateral('variantsJSON', 1),
{a => 'see', b => 'dee' },
'getCollateral: get by index works',
);
cmp_deeply(
$product->getCollateral('variantsJSON', -1),
{a => 'see', b => 'dee' },
'getCollateral: negative index works',
);
$product->purge;