draft a test to cover ElementQuery (Session API)

trying to get #639 closed...
discovered, that I had already implemented this
filtering query in 6/2010
This commit is contained in:
Fischlurch 2010-10-17 05:08:47 +02:00
parent bb3eb8f3aa
commit da994cf9fd
4 changed files with 157 additions and 0 deletions

View file

@ -139,6 +139,7 @@ namespace asset {
if (!track)
track = Session::current->getRoot().attach (MObject::create (TrackID (desiredID)));
return track;
}

View file

@ -98,6 +98,12 @@ namespace session {
public:
/** pick the first element from session satisfying a predicate.
* @param searchPredicate applied to \c Placement<MO> for filtering
* @note the embedded MObject subtype (MO) causes an additional filtering
* on that specific kind of MObject (e.g. considering just Clips)
* @return MObject ref to the fist suitable element. Might be an empty MObjectRef.
*/
template<typename PRED>
typename _PickRes<PRED>::Result
pick (PRED const& searchPredicate)

View file

@ -92,6 +92,7 @@ test_components_SOURCES = \
$(testcomponents_srcdir)/proc/mobject/session/rebuildfixturetest.cpp \
$(testcomponents_srcdir)/proc/mobject/session/scope-path-test.cpp \
$(testcomponents_srcdir)/proc/mobject/session/scope-query-test.cpp \
$(testcomponents_srcdir)/proc/mobject/session/session-element-query-test.cpp \
$(testcomponents_srcdir)/proc/mobject/session/session-service-access-test.cpp \
$(testcomponents_srcdir)/proc/mobject/session/sessionmanagertest.cpp \
$(testcomponents_srcdir)/proc/mobject/session/test-scopes.cpp \

View file

@ -0,0 +1,149 @@
/*
ScopeQuery(Test) - running queries to discover container contents, filtering (sub)types
Copyright (C) Lumiera.org
2009, Hermann Vosseler <Ichthyostega@web.de>
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
published by the Free Software Foundation; either version 2 of the
License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
* *****************************************************/
#include "lib/test/run.hpp"
#include "proc/mobject/session/scope-query.hpp"
#include "proc/mobject/session/specific-contents-query.hpp"
#include "proc/mobject/session/session-service-explore-scope.hpp"
#include "proc/mobject/session/test-scopes.hpp"
#include "proc/mobject/session/clip.hpp"
#include "lib/symbol.hpp"
#include "lib/util.hpp"
#include <iostream>
#include <string>
namespace mobject {
namespace session {
namespace test {
using lib::Literal;
using std::string;
using std::cout;
using std::endl;
using util::contains;
namespace { // helpers and shortcuts....
/** a filter predicate to pick some objects from a resultset.
* @note using the specific API of DummyMO, without cast! */
bool
filter (Placement<DummyMO> const& candidate)
{
string desc = candidate->operator string();
return contains(desc, "MO2");
}
template<class IT>
void
pullOut (IT const& iter)
{
for (IT elm(iter);
elm; ++elm)
cout << string(*elm) << endl;
}
void
announce (Literal description)
{
static uint nr(0);
cout << "--------------------------------Test-"<< ++nr << ": " << description << endl;
}
}
/**********************************************************************************************
* @test how to discover contents or location of a container-like part of the high-level model.
* As this container-like object is just a concept and actually implemented by the
* PlacementIndex, this means querying the index for elements registered with
* a given scope or finding the enclosing scopes. The discovered
* elements will be filtered by a runtime type check.
*
* @todo change that to use a more realistic test session, based on the actual model types //////////////// TICKET #532
*
* @see mobject::session::PlacementIndex
* @see mobject::session::QueryResolver
* @see mobject::session::ContentsQuery
*/
class ScopeQuery_test : public Test
{
virtual void
run (Arg)
{
// Prepare an (test)Index (dummy "session")
PPIdx testSession (build_testScopes());
PlacementMO const& scope = SessionServiceExploreScope::getScopeRoot();
discover (ScopeQuery<MObject> (scope, CONTENTS) , "contents depth-first");
discover (ScopeQuery<Clip> (scope, CONTENTS) , "contents depth-first, filtered to Clip");
discover (ScopeQuery<DummyMO> (scope, CONTENTS) , "contents depth-first, filtered to DummyMO"); ////////////////////// TICKET #532
discover (ScopeQuery<TestSubMO1> (scope, CONTENTS) , "contents depth-first, filtered to TestSubMO1");
discover (ScopeQuery<TestSubMO2> (scope, CONTENTS) , "contents depth-first, filtered to TestSubMO2");
discover (pickAllSuitable(scope, filter) , "contents depth-first, custom filtered DummyMO");
// note filter is typed to accept DummyMO
ScopeQuery<TestSubMO21> allM021(scope, CONTENTS);
ScopeQuery<TestSubMO21>::iterator specialEl (issue(allM021));
++specialEl; // step in to second solution found...
ASSERT (specialEl);
discover (ScopeQuery<MObject> (*specialEl, PARENTS) , "parents of the second TestSubMO2 element found");
discover (ScopeQuery<MObject> (*specialEl, CHILDREN), "children of the this TestSubMO2 element");
discover (ScopeQuery<MObject> (*specialEl, PATH) , "path from there to root");
discover (ScopeQuery<TestSubMO2> (*specialEl, PATH) , "same path, but filtered to TestSubMO2");
announce ( "continue exploring partially used TestSubMO2 iterator");
pullOut (specialEl);
}
template<class MO>
static void
discover (ScopeQuery<MO> const& query, Literal description)
{
announce (description);
pullOut (issue(query));
}
template<class MO>
static typename ScopeQuery<MO>::iterator
issue (ScopeQuery<MO> const& query)
{
return query.resolveBy(SessionServiceExploreScope::getResolver());
}
};
/** Register this test class... */
LAUNCHER (ScopeQuery_test, "unit session");
}}} // namespace mobject::session::test