mirror of
https://github.com/Combodo/iTop.git
synced 2026-04-23 02:28:44 +02:00
N°931: TagSet : OQL Parse/Normalize unit tests
This commit is contained in:
Eric
@@ -123,328 +123,6 @@ class TestSQLQuery extends TestScenarioOnDB
|
||||
}
|
||||
}
|
||||
|
||||
class TestOQLParser extends TestFunction
|
||||
{
|
||||
static public function GetName() {return 'Check OQL parsing';}
|
||||
static public function GetDescription() {return 'Attempts a series of queries, and in particular those with a bad syntax';}
|
||||
|
||||
protected function CheckQuery($sQuery, $bIsCorrectQuery)
|
||||
{
|
||||
$oOql = new OqlInterpreter($sQuery);
|
||||
try
|
||||
{
|
||||
$oTrash = $oOql->Parse(); // Not expecting a given format, otherwise use ParseExpression/ParseObjectQuery/ParseValueSetQuery
|
||||
self::DumpVariable($oTrash);
|
||||
}
|
||||
catch (OQLException $OqlException)
|
||||
{
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
echo "<p>More info on this unexpected failure:<br/>".$OqlException->getHtmlDesc()."</p>\n";
|
||||
throw $OqlException;
|
||||
return false;
|
||||
}
|
||||
else
|
||||
{
|
||||
// Everything is fine :-)
|
||||
echo "<p>More info on this expected failure:<br/>".$OqlException->getHtmlDesc()."</p>\n";
|
||||
return true;
|
||||
}
|
||||
}
|
||||
catch (Exception $e)
|
||||
{
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
echo "<p>More info on this <b>un</b>expected failure:<br/>".htmlentities($e->getMessage(), ENT_QUOTES, 'UTF-8')."</p>\n";
|
||||
throw $OqlException;
|
||||
return false;
|
||||
}
|
||||
else
|
||||
{
|
||||
// Everything is fine :-)
|
||||
echo "<p>More info on this expected failure:<br/>".htmlentities($e->getMessage(), ENT_QUOTES, 'UTF-8')."</p>\n";
|
||||
return true;
|
||||
}
|
||||
}
|
||||
// The query was correctly parsed, was it expected to be correct ?
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
return true;
|
||||
}
|
||||
else
|
||||
{
|
||||
throw new UnitTestException("The query '$sQuery' was parsed with success, while it shouldn't (?)");
|
||||
return false;
|
||||
}
|
||||
}
|
||||
|
||||
protected function TestQuery($sQuery, $bIsCorrectQuery)
|
||||
{
|
||||
if (!$this->CheckQuery($sQuery, $bIsCorrectQuery))
|
||||
{
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
public function DoExecute()
|
||||
{
|
||||
$aQueries = array(
|
||||
'SELECT toto' => true,
|
||||
'SELECT toto WHERE toto.a = 1' => true,
|
||||
'SELECT toto WHERE toto.a = -1' => true,
|
||||
'SELECT toto WHERE toto.a = (1-1)' => true,
|
||||
'SELECT toto WHERE toto.a = (-1+3)' => true,
|
||||
'SELECT toto WHERE toto.a = (3+-1)' => true,
|
||||
'SELECT toto WHERE toto.a = (3--1)' => true,
|
||||
'SELECT toto WHERE toto.a = (3++1)' => false,
|
||||
'SELECT toto WHERE toto.a = 0xC' => true,
|
||||
'SELECT toto WHERE toto.a = \'AXDVFS0xCZ32\'' => true,
|
||||
'SELECT toto WHERE toto.a = :myparameter' => true,
|
||||
'SELECT toto WHERE toto.a IN (:param1)' => true,
|
||||
'SELECT toto WHERE toto.a IN (:param1, :param2)' => true,
|
||||
'SELECT toto WHERE toto.a=1' => true,
|
||||
'SELECT toto WHERE toto.a = "1"' => true,
|
||||
'SELECT toto WHHHERE toto.a = "1"' => false,
|
||||
'SELECT toto WHERE toto.a == "1"' => false,
|
||||
'SELECT toto WHERE toto.a % 1' => false,
|
||||
'SELECT toto WHERE toto.a & 1' => true, // bitwise and
|
||||
'SELECT toto WHERE toto.a | 1' => true, // bitwise or
|
||||
'SELECT toto WHERE toto.a ^ 1' => true, // bitwise xor
|
||||
'SELECT toto WHERE toto.a << 1' => true, // bitwise left shift
|
||||
'SELECT toto WHERE toto.a >> 1' => true, // bitwise right shift
|
||||
//'SELECT toto WHERE toto.a LIKE 1' => false,
|
||||
'SELECT toto WHERE toto.a like \'arg\'' => false,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "That\'s it"' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "That\'s "it""' => false,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "That\'s \\"it\\""' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE \'That"s it\'' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE \'That\'s it\'' => false,
|
||||
'SELECT toto WHERE toto.a NOT LIKE \'That\\\'s it\'' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "blah \\ truc"' => false,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "blah \\\\ truc"' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE \'blah \\ truc\'' => false,
|
||||
'SELECT toto WHERE toto.a NOT LIKE \'blah \\\\ truc\'' => true,
|
||||
|
||||
'SELECT toto WHERE toto.a NOT LIKE "\\\\"' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "\\""' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "\\"\\\\"' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "\\\\\\""' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE ""' => true,
|
||||
'SELECT toto WHERE toto.a NOT LIKE "\\\\"' => true,
|
||||
"SELECT UserRightsMatrixClassGrant WHERE UserRightsMatrixClassGrant.class = 'lnkContactRealObject' AND UserRightsMatrixClassGrant.action = 'modify' AND UserRightsMatrixClassGrant.login = 'Denis'" => true,
|
||||
"SELECT A WHERE A.col1 = 'lit1' AND A.col2 = 'lit2' AND A.col3 = 'lit3'" => true,
|
||||
|
||||
'SELECT toto WHERE toto.a NOT LIKE "blah" AND toto.b LIKE "foo"' => true,
|
||||
|
||||
//'SELECT toto WHERE toto.a > \'asd\'' => false,
|
||||
'SELECT toto WHERE toto.a = 1 AND toto.b LIKE "x" AND toto.f >= 12345' => true,
|
||||
'SELECT Device JOIN Site ON Device.site = Site.id' => true,
|
||||
'SELECT Device JOIN Site ON Device.site = Site.id JOIN Country ON Site.location = Country.id' => true,
|
||||
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE (A.col1 = 123 AND B.col1 = 'aa') OR (A.col3 = 'zzz' AND B.col4 > 100)" => true,
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE (A.col1 = B.col2 AND B.col1 = A.col2) OR (A.col3 = '' AND B.col4 > 100)" => true,
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE A.col1 + B.col2 * B.col1 = A.col2" => true,
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE A.col1 + (B.col2 * B.col1) = A.col2" => true,
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE (A.col1 + B.col2) * B.col1 = A.col2" => true,
|
||||
"SELECT A JOIN B ON A.myB = B.id WHERE (A.col1 & B.col2) = A.col2" => true,
|
||||
|
||||
'SELECT Device AS D_ JOIN Site AS S_ ON D_.site = S_.id WHERE S_.country = "Francia"' => true,
|
||||
|
||||
// Several objects in a row...
|
||||
//
|
||||
'SELECT A FROM A' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT B FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A,B FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A, B FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT B,A FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A, B,C FROM A JOIN B ON A.myB = B.id' => true,
|
||||
'SELECT C FROM A JOIN B ON A.myB = B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A JOIN B ON A.myB BELOW B.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A JOIN B ON B.myA BELOW A.id WHERE A.col1 = 2' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id BELOW B.id WHERE A.col1 = 2 AND B.id = 3' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id BELOW STRICT B.id WHERE A.col1 = 2 AND B.id = 3' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id NOT BELOW B.id WHERE A.col1 = 2 AND B.id = 3' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id NOT BELOW STRICT B.id WHERE A.col1 = 2 AND B.id = 3' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id = B.id WHERE A.col1 BELOW 2 AND B.id = 3' => false,
|
||||
|
||||
// Unions
|
||||
//
|
||||
'SELECT A UNION SELECT B' => true,
|
||||
'SELECT A WHERE A.b = "sdf" UNION SELECT B WHERE B.a = "sfde"' => true,
|
||||
'SELECT A UNION SELECT B UNION SELECT C' => true,
|
||||
'SELECT A UNION SELECT B UNION SELECT C UNION SELECT D' => true,
|
||||
'SELECT A JOIN B ON A.myB = B.id JOIN C ON C.parent_id NOT BELOW B.id WHERE A.col1 = 2 AND B.id = 3 UNION SELECT Device JOIN Site ON Device.site = Site.id JOIN Country ON Site.location = Country.id' => true,
|
||||
);
|
||||
|
||||
$iErrors = 0;
|
||||
|
||||
foreach($aQueries as $sQuery => $bIsCorrectQuery)
|
||||
{
|
||||
$sIsOk = $bIsCorrectQuery ? 'good' : 'bad';
|
||||
echo "<h4>Testing query: $sQuery ($sIsOk)</h4>\n";
|
||||
try
|
||||
{
|
||||
$bRet = $this->TestQuery($sQuery, $bIsCorrectQuery);
|
||||
}
|
||||
catch(Exception $e)
|
||||
{
|
||||
$this->m_aErrors[] = $e->getMessage();
|
||||
$bRet = false;
|
||||
}
|
||||
if (!$bRet) $iErrors++;
|
||||
}
|
||||
|
||||
return ($iErrors == 0);
|
||||
}
|
||||
}
|
||||
|
||||
class TestOQLNormalization extends TestBizModel
|
||||
{
|
||||
static public function GetName() {return 'Check OQL normalization';}
|
||||
static public function GetDescription() {return 'Attempts a series of queries, and in particular those with unknown or inconsistent class/attributes. Assumes a very standard installation!';}
|
||||
|
||||
protected function CheckQuery($sQuery, $bIsCorrectQuery)
|
||||
{
|
||||
try
|
||||
{
|
||||
$oSearch = DBObjectSearch::FromOQL($sQuery);
|
||||
self::DumpVariable($sQuery);
|
||||
}
|
||||
catch (OQLNormalizeException $OqlException)
|
||||
{
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
echo "<p>More info on this unexpected failure:<br/>".$OqlException->getHtmlDesc()."</p>\n";
|
||||
throw $OqlException;
|
||||
return false;
|
||||
}
|
||||
else
|
||||
{
|
||||
// Everything is fine :-)
|
||||
echo "<p>More info on this expected failure:<br/>".$OqlException->getHtmlDesc()."</p>\n";
|
||||
return true;
|
||||
}
|
||||
}
|
||||
catch (Exception $e)
|
||||
{
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
echo "<p>More info on this <b>un</b>expected failure:<br/>".htmlentities($e->getMessage(), ENT_QUOTES, 'UTF-8')."</p>\n";
|
||||
throw $e;
|
||||
return false;
|
||||
}
|
||||
else
|
||||
{
|
||||
// Everything is fine :-)
|
||||
echo "<p>More info on this expected failure:<br/>".htmlentities($e->getMessage(), ENT_QUOTES, 'UTF-8')."</p>\n";
|
||||
return true;
|
||||
}
|
||||
}
|
||||
// The query was correctly parsed, was it expected to be correct ?
|
||||
if ($bIsCorrectQuery)
|
||||
{
|
||||
return true;
|
||||
}
|
||||
else
|
||||
{
|
||||
throw new UnitTestException("The query '$sQuery' was parsed with success, while it shouldn't (?)");
|
||||
return false;
|
||||
}
|
||||
}
|
||||
|
||||
protected function TestQuery($sQuery, $bIsCorrectQuery)
|
||||
{
|
||||
if (!$this->CheckQuery($sQuery, $bIsCorrectQuery))
|
||||
{
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
public function DoExecute()
|
||||
{
|
||||
$aQueries = array(
|
||||
'SELECT Contact' => true,
|
||||
'SELECT Contact WHERE nom_de_famille = "foo"' => false,
|
||||
'SELECT Contact AS c WHERE name = "foo"' => true,
|
||||
'SELECT Contact AS c WHERE nom_de_famille = "foo"' => false,
|
||||
'SELECT Contact AS c WHERE c.name = "foo"' => true,
|
||||
'SELECT Contact AS c WHERE Contact.name = "foo"' => false,
|
||||
'SELECT Contact AS c WHERE x.name = "foo"' => false,
|
||||
|
||||
'SELECT Organization AS child JOIN Organization AS root ON child.parent_id BELOW root.id' => true,
|
||||
'SELECT Organization AS root JOIN Organization AS child ON child.parent_id BELOW root.id' => true,
|
||||
|
||||
'SELECT RelationProfessionnelle' => false,
|
||||
'SELECT RelationProfessionnelle AS c WHERE name = "foo"' => false,
|
||||
|
||||
// The first query is the base query altered only in one place in the subsequent queries
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE p.name LIKE "foo"' => true,
|
||||
'SELECT Person AS p JOIN lnkXXXXXXXXXXXX AS lnk ON lnk.person_id = p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON p.person_id = p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON person_id = p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.role = p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.team_id = p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id BELOW p.id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.org_id WHERE p.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON p.id = lnk.person_id WHERE p.name LIKE "foo"' => false, // inverted the JOIN spec
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE name LIKE "foo"' => true,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE x.name LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE p.eman LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE eman LIKE "foo"' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON lnk.person_id = p.id WHERE id = 1' => false,
|
||||
'SELECT Person AS p JOIN lnkPersonToTeam AS lnk ON p.id = lnk.person_id WHERE p.name LIKE "foo"' => false,
|
||||
|
||||
'SELECT Person AS p JOIN Organization AS o ON p.org_id = o.id WHERE p.name LIKE "foo" AND o.name LIKE "land"' => true,
|
||||
'SELECT Person AS p JOIN Organization AS o ON p.location_id = o.id WHERE p.name LIKE "foo" AND o.name LIKE "land"' => false,
|
||||
'SELECT Person AS p JOIN Organization AS o ON p.name = o.id WHERE p.name LIKE "foo" AND o.name LIKE "land"' => false,
|
||||
|
||||
'SELECT Person AS p JOIN Organization AS o ON p.org_id = o.id JOIN Person AS p ON p.org_id = o.id' => false,
|
||||
'SELECT Person JOIN Organization AS o ON Person.org_id = o.id JOIN Person ON Person.org_id = o.id' => false,
|
||||
|
||||
'SELECT Person AS p JOIN Location AS l ON p.location_id = l.id' => true,
|
||||
'SELECT Person AS p JOIN Location AS l ON p.location_id BELOW l.id' => false,
|
||||
|
||||
'SELECT Person FROM Person JOIN Location ON Person.location_id = Location.id' => true,
|
||||
'SELECT p FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => true,
|
||||
'SELECT l FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => true,
|
||||
'SELECT l, p FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => true,
|
||||
'SELECT p, l FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => true,
|
||||
'SELECT foo FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => false,
|
||||
'SELECT p, foo FROM Person AS p JOIN Location AS l ON p.location_id = l.id' => false,
|
||||
|
||||
// Joins based on AttributeObjectKey
|
||||
//
|
||||
'SELECT Attachment AS a JOIN UserRequest AS r ON a.item_id = r.id' => true,
|
||||
'SELECT UserRequest AS r JOIN Attachment AS a ON a.item_id = r.id' => true,
|
||||
);
|
||||
|
||||
$iErrors = 0;
|
||||
|
||||
foreach($aQueries as $sQuery => $bIsCorrectQuery)
|
||||
{
|
||||
$sIsOk = $bIsCorrectQuery ? 'good' : 'bad';
|
||||
echo "<h4>Testing query: $sQuery ($sIsOk)</h4>\n";
|
||||
try
|
||||
{
|
||||
$bRet = $this->TestQuery($sQuery, $bIsCorrectQuery);
|
||||
}
|
||||
catch(Exception $e)
|
||||
{
|
||||
$this->m_aErrors[] = $e->getMessage();
|
||||
$bRet = false;
|
||||
}
|
||||
if (!$bRet) $iErrors++;
|
||||
}
|
||||
|
||||
return ($iErrors == 0);
|
||||
}
|
||||
}
|
||||
|
||||
class TestCSVParser extends TestFunction
|
||||
{
|
||||
static public function GetName() {return 'Check CSV parsing';}
|
||||
|
||||
Reference in New Issue
Block a user