Empire technology views
* Added new research-related constants * Added set of views and functions to list empires' technologies. This includes a view which determines the visibility of an in-progress research's details, and a main list view.
This commit is contained in:
parent
e01eab9c09
commit
b15acadc1b
8 changed files with 476 additions and 0 deletions
legacyworlds-server-data/db-structure/tests/admin/040-functions/040-empire
|
|
@ -0,0 +1,17 @@
|
|||
/*
|
||||
* Unit tests for emp.technology_make_identifier()
|
||||
*/
|
||||
BEGIN;
|
||||
SELECT no_plan( );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_make_identifier() - Identifier of visible technologies' );
|
||||
SELECT is( emp.technology_make_identifier( 1 , 'test-string' , TRUE ) , 'test-string' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_make_identifier() - Identifier of unknown technologies - 32 characters' );
|
||||
SELECT is( length( emp.technology_make_identifier( 1 , 'test-string' , FALSE ) ) , 32 );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_make_identifier() - Identifier of unknown technologies - Contains hex value' );
|
||||
SELECT ok( emp.technology_make_identifier( 1 , 'test-string' , FALSE ) !~ '[^a-f0-9]' );
|
||||
|
||||
SELECT * FROM finish( );
|
||||
ROLLBACK;
|
||||
|
|
@ -0,0 +1,111 @@
|
|||
/*
|
||||
* Unit tests for emp.technology_visibility_view
|
||||
*/
|
||||
BEGIN;
|
||||
\i utils/strings.sql
|
||||
\i utils/accounts.sql
|
||||
\i utils/naming.sql
|
||||
|
||||
/* Create a single empire */
|
||||
SELECT _create_emp_names( 1 , 'emp' );
|
||||
INSERT INTO emp.empires ( name_id , cash )
|
||||
VALUES ( _get_emp_name( 'emp1' ) , 200 );
|
||||
|
||||
/*
|
||||
* Set visibility thresholds to either 50% or 100 points.
|
||||
*/
|
||||
SELECT sys.uoc_constant( 'game.research.visibility.points' , '(test)' , 'Test' , 100.0 );
|
||||
SELECT sys.uoc_constant( 'game.research.visibility.ratio' , '(test)' , 'Test' , 0.5 );
|
||||
|
||||
/* Create 6 technology definitions that will be used to test various
|
||||
* states: pending, known, 4 variants of research in progress (points
|
||||
* and ratio below thresholds, points below threshold, ratio below
|
||||
* threshold, both points and ratio above thresholds).
|
||||
*
|
||||
* Disable all unused fields from the definition table.
|
||||
*/
|
||||
ALTER TABLE defs.technologies
|
||||
ALTER technology_category_id DROP NOT NULL ,
|
||||
ALTER technology_discovery_id DROP NOT NULL ,
|
||||
ALTER technology_description_id DROP NOT NULL ,
|
||||
ALTER technology_price DROP NOT NULL;
|
||||
SELECT _create_test_strings( 6 , 'tech' );
|
||||
INSERT INTO defs.technologies( technology_name_id , technology_points )
|
||||
VALUES ( _get_string( 'tech1' ) , 100 ) ,
|
||||
( _get_string( 'tech2' ) , 100 ) ,
|
||||
( _get_string( 'tech3' ) , 100 ) ,
|
||||
( _get_string( 'tech4' ) , 100 ) ,
|
||||
( _get_string( 'tech5' ) , 1000 ) ,
|
||||
( _get_string( 'tech6' ) , 1000 );
|
||||
|
||||
/* Insert empire state */
|
||||
INSERT INTO emp.technologies_v2 (
|
||||
empire_id , technology_name_id ,
|
||||
emptech_state , emptech_points , emptech_priority
|
||||
) VALUES (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech1' ) ,
|
||||
'KNOWN' , NULL , NULL
|
||||
) , (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech2' ) ,
|
||||
'PENDING' , NULL , NULL
|
||||
) , (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech3' ) ,
|
||||
'RESEARCH' , 10.0 , 2
|
||||
) , (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech4' ) ,
|
||||
'RESEARCH' , 51.0 , 2
|
||||
) , (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech5' ) ,
|
||||
'RESEARCH' , 101.0 , 2
|
||||
) , (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech6' ) ,
|
||||
'RESEARCH' , 501.0 , 2
|
||||
);
|
||||
|
||||
-- ***** TESTS BEGIN HERE *****
|
||||
SELECT plan( 7 );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - All technologies are listed' );
|
||||
SELECT is( COUNT( * )::INT , 6 )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - Known technologies are visible' );
|
||||
SELECT ok( emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech1' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - Pending technologies are visible' );
|
||||
SELECT ok( emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech2' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - In-progress technologies with both points and ratios below thresholds are not visible' );
|
||||
SELECT ok( NOT emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech3' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - In-progress technologies with points below threshold are visible' );
|
||||
SELECT ok( emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech4' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - In-progress technologies with ratio below threshold are visible' );
|
||||
SELECT ok( emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech5' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
SELECT diag_test_name( 'emp.technology_visibility_view - In-progress technologies with both points and ratios above threshold are visible' );
|
||||
SELECT ok( emptech_visible )
|
||||
FROM emp.technology_visibility_view
|
||||
WHERE technology_name_id = _get_string( 'tech6' )
|
||||
AND empire_id = _get_emp_name( 'emp1' );
|
||||
|
||||
|
||||
SELECT * FROM finish( );
|
||||
ROLLBACK;
|
||||
|
|
@ -0,0 +1,125 @@
|
|||
/*
|
||||
* Unit tests for emp.technologies_v2_view
|
||||
*/
|
||||
BEGIN;
|
||||
\i utils/strings.sql
|
||||
\i utils/accounts.sql
|
||||
\i utils/naming.sql
|
||||
|
||||
/* Create three empires (easier to use as keys) */
|
||||
SELECT _create_emp_names( 3 , 'emp' );
|
||||
INSERT INTO emp.empires ( name_id , cash )
|
||||
SELECT id , 200.0 FROM naming.empire_names;
|
||||
|
||||
/* Create a technology after disabling unused fields */
|
||||
ALTER TABLE defs.technologies
|
||||
ALTER technology_discovery_id DROP NOT NULL;
|
||||
SELECT _create_test_strings( 1 , 'tech' );
|
||||
SELECT _create_test_strings( 1 , 'techCategory' );
|
||||
SELECT _create_test_strings( 1 , 'techDescription' );
|
||||
INSERT INTO defs.technologies (
|
||||
technology_name_id , technology_category_id , technology_description_id ,
|
||||
technology_price , technology_points
|
||||
) VALUES (
|
||||
_get_string( 'tech1' ) , _get_string( 'techCategory1' ) , _get_string( 'techDescription1' ) ,
|
||||
123 , 456
|
||||
);
|
||||
|
||||
/* Replace identifier function with something easier to check */
|
||||
CREATE OR REPLACE FUNCTION emp.technology_make_identifier(
|
||||
_empire INT , _technology TEXT , _visible BOOLEAN )
|
||||
RETURNS TEXT
|
||||
LANGUAGE SQL
|
||||
STRICT IMMUTABLE
|
||||
SECURITY DEFINER
|
||||
AS $technology_make_identifier$
|
||||
SELECT $1::TEXT || ',' || $2 || ',' || $3::TEXT;
|
||||
$technology_make_identifier$;
|
||||
|
||||
/* Replace both the visibility and dependencies views with plain SELECT's
|
||||
* from tables.
|
||||
*/
|
||||
CREATE TABLE _fake_visibility(
|
||||
empire_id INT ,
|
||||
technology_name_id INT ,
|
||||
emptech_visible BOOLEAN
|
||||
);
|
||||
CREATE OR REPLACE VIEW emp.technology_visibility_view
|
||||
AS SELECT * FROM _fake_visibility;
|
||||
CREATE TABLE _fake_deps(
|
||||
technology_name_id INT ,
|
||||
technology_dependencies TEXT
|
||||
);
|
||||
CREATE OR REPLACE VIEW defs.technology_dependencies_view
|
||||
AS SELECT * FROM _fake_deps;
|
||||
|
||||
/* Insert empire states and data for fake views */
|
||||
INSERT INTO emp.technologies_v2 (
|
||||
empire_id , technology_name_id ,
|
||||
emptech_state , emptech_points , emptech_priority
|
||||
) VALUES (
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech1' ) ,
|
||||
'KNOWN' , NULL , NULL
|
||||
) , (
|
||||
_get_emp_name( 'emp2' ) , _get_string( 'tech1' ) ,
|
||||
'RESEARCH' , 228.9 , 0
|
||||
) , (
|
||||
_get_emp_name( 'emp3' ) , _get_string( 'tech1' ) ,
|
||||
'RESEARCH' , 114 , 1
|
||||
);
|
||||
INSERT INTO _fake_visibility VALUES(
|
||||
_get_emp_name( 'emp1' ) , _get_string( 'tech1' ) , TRUE
|
||||
) , (
|
||||
_get_emp_name( 'emp2' ) , _get_string( 'tech1' ) , TRUE
|
||||
) , (
|
||||
_get_emp_name( 'emp3' ) , _get_string( 'tech1' ) , FALSE
|
||||
);
|
||||
INSERT INTO _fake_deps VALUES( _get_string( 'tech1' ) , 'deps are here' );
|
||||
|
||||
-- ***** TESTS BEGIN HERE *****
|
||||
SELECT plan( 3 );
|
||||
|
||||
SELECT diag_test_name( 'emp.technologies_v2_view - Known technology' );
|
||||
SELECT set_eq( $$
|
||||
SELECT emptech_id , emptech_state::TEXT , emptech_visible ,
|
||||
technology_category , technology_name , technology_description ,
|
||||
emptech_points , emptech_priority IS NULL AS ep_null ,
|
||||
emptech_ratio IS NULL AS er_null ,
|
||||
technology_price , technology_dependencies
|
||||
FROM emp.technologies_v2_view
|
||||
WHERE empire_id = _get_emp_name( 'emp1' )
|
||||
$$ , $$ VALUES(
|
||||
_get_emp_name( 'emp1' ) || ',tech1,true' , 'KNOWN' , TRUE ,
|
||||
'techCategory1' , 'tech1' , 'techDescription1' ,
|
||||
456 , TRUE , TRUE , 123 , 'deps are here'
|
||||
) $$ );
|
||||
|
||||
SELECT diag_test_name( 'emp.technologies_v2_view - In-progress, visible technology' );
|
||||
SELECT set_eq( $$
|
||||
SELECT emptech_id , emptech_state::TEXT , emptech_visible ,
|
||||
technology_category , technology_name , technology_description ,
|
||||
emptech_points , emptech_priority , emptech_ratio ,
|
||||
technology_price , technology_dependencies
|
||||
FROM emp.technologies_v2_view
|
||||
WHERE empire_id = _get_emp_name( 'emp2' )
|
||||
$$ , $$ VALUES(
|
||||
_get_emp_name( 'emp2' ) || ',tech1,true' , 'RESEARCH' , TRUE ,
|
||||
'techCategory1' , 'tech1' , 'techDescription1' ,
|
||||
228 , 0 , 50 , 123 , 'deps are here'
|
||||
) $$ );
|
||||
|
||||
SELECT diag_test_name( 'emp.technologies_v2_view - In-progress, unknown technology' );
|
||||
SELECT set_eq( $$
|
||||
SELECT emptech_id , emptech_state::TEXT , emptech_visible ,
|
||||
technology_category , technology_name IS NULL AS n1 , technology_description IS NULL AS n2 ,
|
||||
emptech_points IS NULL AS n3 , emptech_priority , emptech_ratio ,
|
||||
technology_price IS NULL AS n4, technology_dependencies
|
||||
FROM emp.technologies_v2_view
|
||||
WHERE empire_id = _get_emp_name( 'emp3' )
|
||||
$$ , $$ VALUES(
|
||||
_get_emp_name( 'emp3' ) || ',tech1,false' , 'RESEARCH' , FALSE ,
|
||||
'techCategory1' , TRUE, TRUE ,
|
||||
TRUE , 1 , 25 , TRUE , 'deps are here'
|
||||
) $$ );
|
||||
SELECT * FROM finish( );
|
||||
ROLLBACK;
|
||||
Reference in a new issue