doc/html/RCPNodeHandle__UnitTests_8cpp_source.html

 /*

 // @HEADER

 // ***********************************************************************

 //

 //                    Teuchos: Common Tools Package

 //                 Copyright (2004) Sandia Corporation

 //

 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive

 // license for use of this work by or on behalf of the U.S. Government.

 //

 // Redistribution and use in source and binary forms, with or without

 // modification, are permitted provided that the following conditions are

 // met:

 //

 // 1. Redistributions of source code must retain the above copyright

 // notice, this list of conditions and the following disclaimer.

 //

 // 2. Redistributions in binary form must reproduce the above copyright

 // notice, this list of conditions and the following disclaimer in the

 // documentation and/or other materials provided with the distribution.

 //

 // 3. Neither the name of the Corporation nor the names of the

 // contributors may be used to endorse or promote products derived from

 // this software without specific prior written permission.

 //

 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY

 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR

 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE

 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,

 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,

 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR

 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF

 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING

 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS

 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 //

 // Questions? Contact Michael A. Heroux (maherou@sandia.gov)

 //

 // ***********************************************************************

 // @HEADER

 */


 #include "Teuchos_UnitTestHarness.hpp"

 #include "Teuchos_RCPNode.hpp"

 #include "Teuchos_getConst.hpp"

 #include "Teuchos_TypeNameTraits.hpp"

 #include "TestClasses.hpp"


 namespace Teuchos {


 template<class T>

 class MockRCP {

 public:

   T* access_private_ptr() const

     {

       return (T*)(0x777777); // Just some bogus address printed to out

     }

 };


 template<class T>

 RCPNode* basicRCPNodeNoAlloc(T* p, const bool has_ownership)

 {

   RCPNodeTmpl<T,DeallocDelete<T> > *rcpNode =

     new RCPNodeTmpl<T,DeallocDelete<T> >(p, DeallocDelete<T>(), has_ownership);

   return rcpNode;

 }


 template<class T>

 RCPNode* basicRCPNode(const bool has_ownership, T **p_out = 0)

 {

   T *p = new T;

   if (p_out)

     *p_out = p;

   RCPNode *rcpNode = basicRCPNodeNoAlloc<T>(p, has_ownership);

   return rcpNode;

 }


 void deleteRCPNode( RCPNode **node )

 {

   TEUCHOS_ASSERT(node);

   TEUCHOS_ASSERT(*node);

   (*node)->delete_obj();

   delete (*node);

   *node = 0;

 }


 template<class T>

 RCPNodeHandle basicRCPNodeHandle(const bool has_ownership, T **p_out = 0)

 {

   T *p = 0;

   RCPNode *rcpNode = basicRCPNode(has_ownership, &p);

   if (p_out)

     *p_out = p;

 #ifdef TEUCHOS_DEBUG

   return RCPNodeHandle(rcpNode, p, typeName(*p), concreteTypeName(*p), has_ownership);

 #else

   return RCPNodeHandle(rcpNode);

 #endif

 }


 TEUCHOS_STATIC_SETUP()

 {

 }


 //

 // Non-templated tests

 //


 TEUCHOS_UNIT_TEST( RCPNodeHandle, assignSelf )

 {

   RCPNodeHandle nodeRef;

   nodeRef = nodeRef;

 }


 TEUCHOS_UNIT_TEST( RCPNodeHandle, defaultConstruct)

 {

   RCPNodeHandle nodeRef;

   TEST_EQUALITY_CONST( nodeRef.strong_count(), 0 );

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), false );

   nodeRef.has_ownership(true);

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), false );

 #ifdef TEUCHOS_DEBUG

   TEST_EQUALITY_CONST( nodeRef.get_base_obj_map_key_void_ptr(), static_cast<void*>(0) );

   TEST_THROW({nodeRef.set_extra_data(any(),"", PRE_DESTROY, true);},

     NullReferenceError);

   TEST_THROW({any &a = nodeRef.get_extra_data("int","blob"); (void)a;},

     NullReferenceError);

   TEST_THROW({const any &a = getConst(nodeRef).get_extra_data("int","blob"); (void)a;},

     NullReferenceError);

   TEST_THROW({any *a = nodeRef.get_optional_extra_data("int","blob"); (void)a;},

     NullReferenceError);

   TEST_THROW({const any *a = getConst(nodeRef).get_optional_extra_data("int","blob"); (void)a;},

     NullReferenceError);

 #endif // TEUCHOS_DEBUG

 }


 #ifdef TEUCHOS_DEBUG


 TEUCHOS_UNIT_TEST( RCPNodeHandle, add_New_RCPNode_basic )

 {


   typedef RCPNodeTracer::RCPNodeStatistics RCPNodeStatistics;


   SET_RCPNODE_TRACING();


   RCPNode *node = basicRCPNode<A>(true);


   const int numActiveNodesBase = RCPNodeTracer::numActiveRCPNodes();

   const RCPNodeStatistics rcpNodeStatisticsBefore = RCPNodeTracer::getRCPNodeStatistics();


   out << std::endl;

   ECHO(RCPNodeTracer::addNewRCPNode(node, "dummy"));


   out << std::endl;

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);


   out << std::endl;

   const RCPNodeStatistics rcpNodeStatistics1 = RCPNodeTracer::getRCPNodeStatistics();

   TEST_COMPARE(rcpNodeStatistics1.maxNumRCPNodes, >=,

     rcpNodeStatisticsBefore.maxNumRCPNodes);

   TEST_EQUALITY(rcpNodeStatistics1.totalNumRCPNodeAllocations,

     rcpNodeStatisticsBefore.totalNumRCPNodeAllocations+1);

   TEST_EQUALITY(rcpNodeStatistics1.totalNumRCPNodeDeletions,

     rcpNodeStatisticsBefore.totalNumRCPNodeDeletions);


   out << std::endl;

   ECHO(RCPNodeTracer::removeRCPNode(node));


   out << std::endl;

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase);


   out << std::endl;

   const RCPNodeStatistics rcpNodeStatistics2 = RCPNodeTracer::getRCPNodeStatistics();

   TEST_COMPARE(rcpNodeStatistics2.maxNumRCPNodes, >=,

     rcpNodeStatisticsBefore.maxNumRCPNodes);

   TEST_EQUALITY(rcpNodeStatistics2.totalNumRCPNodeAllocations,

     rcpNodeStatisticsBefore.totalNumRCPNodeAllocations+1);

   TEST_EQUALITY(rcpNodeStatistics2.totalNumRCPNodeDeletions,

     rcpNodeStatisticsBefore.totalNumRCPNodeDeletions+1);


   out << std::endl;

   std::ostringstream statsOut_oss;

   RCPNodeTracer::printRCPNodeStatistics(rcpNodeStatistics2, statsOut_oss);

   std::ostringstream expectedStatsOut_oss;

   expectedStatsOut_oss

     << "\n***"

     << "\n*** RCPNode Tracing statistics:"

     << "\n**\n"

     << "\n    maxNumRCPNodes             = "<<rcpNodeStatistics2.maxNumRCPNodes

     << "\n    totalNumRCPNodeAllocations = "<<rcpNodeStatistics2.totalNumRCPNodeAllocations

     << "\n    totalNumRCPNodeDeletions   = "<<rcpNodeStatistics2.totalNumRCPNodeDeletions

     << "\n";

   TEST_EQUALITY(statsOut_oss.str(), expectedStatsOut_oss.str());


   deleteRCPNode(&node);


 }


 TEUCHOS_UNIT_TEST( RCPNodeHandle, add_New_RCPNode_add_owning_twice_error )

 {

   SET_RCPNODE_TRACING();

 #ifdef HAVE_TEUCHOS_STACKTRACE

   // Make sure that you store a stacktrace so as not to affect the RCPNode count below!

   Teuchos::store_stacktrace();

 #endif

   A *a_ptr = new A;

   RCPNode *node1 = basicRCPNodeNoAlloc<A>(a_ptr, true);

   const int numActiveNodesBase = RCPNodeTracer::numActiveRCPNodes();

   ECHO(RCPNodeTracer::addNewRCPNode(node1, "dummy1"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   RCPNode *node2 = basicRCPNodeNoAlloc<A>(a_ptr, true);

   TEST_THROW(RCPNodeTracer::addNewRCPNode(node2, "dummy2"), DuplicateOwningRCPError);

   ECHO(RCPNodeTracer::removeRCPNode(node1));

   deleteRCPNode(&node1);

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase);

   node2->has_ownership(false);

   deleteRCPNode(&node2);

 }


 TEUCHOS_UNIT_TEST( RCPNodeHandle, add_New_RCPNode_add_nonowning_twice_okay_1 )

 {

   SET_RCPNODE_TRACING();

   A *a_ptr = new A;

   RCPNode *node1 = basicRCPNodeNoAlloc<A>(a_ptr, true);

   const int numActiveNodesBase = RCPNodeTracer::numActiveRCPNodes();

   ECHO(RCPNodeTracer::addNewRCPNode(node1, "dummy1"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   RCPNode *node2 = basicRCPNodeNoAlloc<A>(a_ptr, false);

   ECHO(RCPNodeTracer::addNewRCPNode(node2, "dummy2"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+2);

   TEST_EQUALITY(RCPNodeTracer::getExistingRCPNode(a_ptr), node1);

   ECHO(RCPNodeTracer::removeRCPNode(node2));

   deleteRCPNode(&node2);

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   ECHO(RCPNodeTracer::removeRCPNode(node1));

   deleteRCPNode(&node1);

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase);

 }


 TEUCHOS_UNIT_TEST( RCPNodeHandle, add_New_RCPNode_add_nonowning_twice_okay_2 )

 {

   SET_RCPNODE_TRACING();

   A *a_ptr = new A;

   RCPNode *node1 = basicRCPNodeNoAlloc<A>(a_ptr, false);

   const int numActiveNodesBase = RCPNodeTracer::numActiveRCPNodes();

   ECHO(RCPNodeTracer::addNewRCPNode(node1, "dummy1"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   RCPNode *node2 = basicRCPNodeNoAlloc<A>(a_ptr, true);

   ECHO(RCPNodeTracer::addNewRCPNode(node2, "dummy2"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+2);

   TEST_EQUALITY(RCPNodeTracer::getExistingRCPNode(a_ptr), node2);

   ECHO(RCPNodeTracer::removeRCPNode(node2));

   deleteRCPNode(&node2);

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   ECHO(RCPNodeTracer::removeRCPNode(node1));

   deleteRCPNode(&node1);

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase);

 }


 TEUCHOS_UNIT_TEST( RCPNodeHandle, add_New_RCPNode_add_two_nodes_same_obj )

 {

   SET_RCPNODE_TRACING();

   ECHO(C *c_ptr = new C);

   ECHO(RCPNode *node_c = basicRCPNodeNoAlloc<C>(c_ptr, true));

   ECHO(RCPNode *node_b1 = basicRCPNodeNoAlloc<B1>(c_ptr, true));

   ECHO(const int numActiveNodesBase = RCPNodeTracer::numActiveRCPNodes());

   ECHO(RCPNodeTracer::addNewRCPNode(node_c, "dummy"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

 #ifdef HAS_TEUCHOS_GET_BASE_OBJ_VOID_PTR

   // We can detect that these are the same object!

   TEST_THROW(RCPNodeTracer::addNewRCPNode(node_b1, "dummy"), DuplicateOwningRCPError);

 #else

   // We can not detect if these are the same object!

   ECHO(RCPNodeTracer::addNewRCPNode(node_b1, "dummy"));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+2);

   ECHO(RCPNodeTracer::removeRCPNode(node_b1));

 #endif

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase+1);

   ECHO(RCPNodeTracer::removeRCPNode(node_c));

   TEST_EQUALITY(RCPNodeTracer::numActiveRCPNodes(), numActiveNodesBase);

   ECHO(node_b1->has_ownership(false));

   ECHO(deleteRCPNode(&node_b1));

   ECHO(deleteRCPNode(&node_c));

 }


 #ifdef HAVE_TEUCHOS_DEBUG_RCP_NODE_TRACING

 TEUCHOS_UNIT_TEST( RCPNodeHandle, remove_RCPNode_missing_node )

 {

   SET_RCPNODE_TRACING();

   RCPNode *node = basicRCPNode<A>(true);

   TEST_THROW(RCPNodeTracer::removeRCPNode(node), std::logic_error);

   deleteRCPNode(&node);

 }

 #endif // HAVE_TEUCHOS_DEBUG_RCP_NODE_TRACING


 #endif // TEUCHOS_DEBUG


 //

 // Templated tests

 //


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, basicConstruct_owns_mem, T )

 {

   T *p = 0;

   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(true, &p));

   TEST_EQUALITY_CONST( nodeRef.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), true );

   nodeRef.has_ownership(false);

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), false );

 #ifdef TEUCHOS_DEBUG

   TEST_INEQUALITY_CONST( nodeRef.get_base_obj_map_key_void_ptr(), static_cast<void*>(0) );

   TEST_EQUALITY( nodeRef.get_base_obj_map_key_void_ptr(), static_cast<void*>(p) );

   TEST_THROW({any &a = nodeRef.get_extra_data("int","blob"); (void)a;},

     std::invalid_argument);

   TEST_THROW({const any &a = getConst(nodeRef).get_extra_data("int","blob"); (void)a;},

     std::invalid_argument);

 #endif // TEUCHOS_DEBUG

   TEST_EQUALITY_CONST(nodeRef.get_optional_extra_data("int","blob"), 0);

   TEST_EQUALITY_CONST(getConst(nodeRef).get_optional_extra_data("int","blob"), 0);

   nodeRef.has_ownership(true);

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, basicConstruct_no_owns_mem, T )

 {

   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(false));

   TEST_EQUALITY_CONST( nodeRef.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), false );

   nodeRef.has_ownership(true);

   TEST_EQUALITY_CONST( nodeRef.has_ownership(), true );

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, weakPtr_basic_1, T )

 {


   ECHO(RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true)));

   TEST_EQUALITY_CONST( nodeRef1.strength(), RCP_STRONG );


   ECHO(RCPNodeHandle nodeRef2 = nodeRef1.create_weak());


   TEST_EQUALITY_CONST( nodeRef2.strength(), RCP_WEAK );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef1.weak_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef2.weak_count(), 1 );


   ECHO(RCPNodeHandle nodeRef3 = nodeRef2.create_strong());


   TEST_EQUALITY_CONST( nodeRef3.strength(), RCP_STRONG );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef1.weak_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef2.weak_count(), 1 );


   MockRCP<T> mockRCP;

   ECHO(nodeRef2.debug_assert_valid_ptr(mockRCP)); // Should not throw!


   // This will make the underlying object T get deleted!

   ECHO(nodeRef1 = null);

   ECHO(nodeRef3 = null);


   TEST_EQUALITY_CONST( nodeRef1.node_ptr()==0, true );

   TEST_EQUALITY_CONST( nodeRef1.is_node_null(), true );

   TEST_EQUALITY_CONST( nodeRef1.is_valid_ptr(), true );


   TEST_EQUALITY_CONST( nodeRef2.node_ptr()!=0, true );

   TEST_EQUALITY_CONST( nodeRef2.is_node_null(), false );

   TEST_EQUALITY_CONST( nodeRef2.is_valid_ptr(), false );


 #ifdef TEUCHOS_DEBUG

   TEST_THROW( nodeRef2.debug_assert_valid_ptr(mockRCP),

     DanglingReferenceError );

 #endif


   ECHO(nodeRef2 = null); // Should make the underlying node go away


 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, weakPtr_basic_2, T )

 {


   ECHO(RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true)));

   TEST_EQUALITY_CONST( nodeRef1.strength(), RCP_STRONG );


   ECHO(RCPNodeHandle nodeRef2 = nodeRef1.create_weak());

   TEST_EQUALITY_CONST( nodeRef2.strength(), RCP_WEAK );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef1.weak_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef2.weak_count(), 1 );


   MockRCP<T> mockRCP;


   ECHO(nodeRef2.debug_assert_valid_ptr(mockRCP)); // Should not throw!


   ECHO(nodeRef2 = null); // The underlying object stays alive!


   TEST_EQUALITY_CONST( nodeRef2.node_ptr()==0, true );

   TEST_EQUALITY_CONST( nodeRef2.is_node_null(), true );

   TEST_EQUALITY_CONST( nodeRef2.is_valid_ptr(), true );


   TEST_EQUALITY_CONST( nodeRef1.node_ptr()!=0, true );

   TEST_EQUALITY_CONST( nodeRef1.is_node_null(), false );

   TEST_EQUALITY_CONST( nodeRef1.is_valid_ptr(), true );


   nodeRef1.debug_assert_valid_ptr(mockRCP); // Should not throw!


 }


 //

 // Test behavior of RCP node tracing but only if it is off by default

 //

 // NOTE: If node tracing is on by default then we can't control how many nodes

 // get created in other code not in the unit test.

 //


 #if defined(TEUCHOS_DEBUG) && !defined(HAVE_TEUCHOS_DEBUG_RCP_NODE_TRACING)

 #  define DO_RCPNODE_TRACING_TESTS 1

 #endif


 #ifdef DO_RCPNODE_TRACING_TESTS


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, debugWithNodeTracingPrint, T )

 {


   TEST_EQUALITY_CONST(RCPNodeTracer::isTracingActiveRCPNodes(), false);

   RCPNodeTracer::setTracingActiveRCPNodes(true);

   TEST_EQUALITY_CONST(RCPNodeTracer::isTracingActiveRCPNodes(), true);


   {


     T *p = new T; // Never do this in production code!

     const std::string T_name = "T_name";

     const std::string concreateT_name = "concreateT_name";

     const bool has_ownership = true;

     RCPNode *node = new RCPNodeTmpl<T,DeallocDelete<T> >(

       p, DeallocDelete<T>(), has_ownership);


     RCPNodeHandle nodeRef(node, p, T_name, concreateT_name, has_ownership);


     TEST_EQUALITY_CONST(RCPNodeTracer::numActiveRCPNodes(), 1);


     out << "\nMake sure output is printed when there is an active node with tracing ...\n";


     const void* rcpNodeKey = RCPNodeTracer::getRCPNodeBaseObjMapKeyVoidPtr(p);


     std::ostringstream expendedOutput_oss;

     expendedOutput_oss

         << RCPNodeTracer::getActiveRCPNodeHeaderString()

         << "\n"

         << "  0: RCPNode (map_key_void_ptr=" << rcpNodeKey << ")\n"

         << "       Information = {T="<<T_name<<", ConcreteT="<<concreateT_name<<", p="<<p<<", has_ownership="<<has_ownership<<"}\n"

         << "       RCPNode address = " << node << "\n"

         << "       insertionNumber = " << node->insertion_number()

         << "\n\n"

         << RCPNodeTracer::getCommonDebugNotesString();


     std::ostringstream printActiveRCPNodes_out;

     RCPNodeTracer::printActiveRCPNodes(printActiveRCPNodes_out);

     TEST_EQUALITY( printActiveRCPNodes_out.str(), expendedOutput_oss.str() );


     // NOTE: The above test basically copied and pasted the ouptut stream code

     // from printActiveRCPNodes(...) and will need to be maintained

     // with this code.  However, this is a good test because it ensures that

     // the arguments node, p, T_name, and concreateT_name are passed, stored,

     // and retrieved correctly.  It is also a good test because it ensures

     // that output is printed when node tracing is turned on.

     //

     // This is the very definition of a "white box" test but that is just fine

     // for a unit test.


   }


   TEST_EQUALITY_CONST(RCPNodeTracer::numActiveRCPNodes(), 0);


   out << "\nMake sure no output is printed when there are no active nodes ...\n";

   const std::string expendedOutput = "";

   std::ostringstream printActiveRCPNodes_out;

   RCPNodeTracer::printActiveRCPNodes(printActiveRCPNodes_out);

   TEST_EQUALITY( printActiveRCPNodes_out.str(), expendedOutput );


   RCPNodeTracer::setTracingActiveRCPNodes(false);

   TEST_EQUALITY_CONST(RCPNodeTracer::isTracingActiveRCPNodes(), false);


 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, debugWithoutNodeTracingPrint, T )

 {


   TEST_EQUALITY_CONST(RCPNodeTracer::isTracingActiveRCPNodes(), false);

   RCPNodeTracer::setTracingActiveRCPNodes(false);

   TEST_EQUALITY_CONST(RCPNodeTracer::isTracingActiveRCPNodes(), false);


   T *p = new T; // Never do this in production code!

   const std::string T_name = "T_name";

   const std::string concreateT_name = "concreateT_name";

   const bool has_ownership = true;

   RCPNode *node = new RCPNodeTmpl<T,DeallocDelete<T> >(

     p, DeallocDelete<T>(), has_ownership);


   RCPNodeHandle nodeRef(node, p, T_name, concreateT_name, has_ownership);


   TEST_EQUALITY_CONST(RCPNodeTracer::numActiveRCPNodes(), 0);


   out << "\nMake sure no output is printed when there are no active nodes without tracing ...\n";

   const std::string expendedOutput = "";

   std::ostringstream printActiveRCPNodes_out;

   RCPNodeTracer::printActiveRCPNodes(printActiveRCPNodes_out);

   TEST_EQUALITY( printActiveRCPNodes_out.str(), expendedOutput );


 }


 #endif // DO_RCPNODE_TRACING_TESTS


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, copyConstruct, T )

 {

   RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true));

   RCPNodeHandle nodeRef2(nodeRef1);

   TEST_EQUALITY( nodeRef1.node_ptr(), nodeRef2.node_ptr() );

   TEST_EQUALITY_CONST( nodeRef1.same_node(nodeRef2), true );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef1.has_ownership(), true );

   TEST_EQUALITY_CONST( nodeRef2.has_ownership(), true );

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, moveConstruct, T )

 {

   RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true));

   RCPNodeHandle nodeRef2(std::move(nodeRef1));

   TEST_EQUALITY_CONST( nodeRef1.node_ptr(), 0 );

   TEST_INEQUALITY_CONST( nodeRef2.node_ptr(), 0 );

   TEST_EQUALITY_CONST( nodeRef1.same_node(nodeRef2), false );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 0 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef1.has_ownership(), false );

   TEST_EQUALITY_CONST( nodeRef2.has_ownership(), true );

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, copyAssignmentOperator, T )

 {

   RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true));

   RCPNodeHandle nodeRef2;

   nodeRef2 = nodeRef1;

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 2 );

   TEST_EQUALITY_CONST( nodeRef1.has_ownership(), true );

   TEST_EQUALITY_CONST( nodeRef2.has_ownership(), true );

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, moveAssignmentOperator, T )

 {

   RCPNodeHandle nodeRef1(basicRCPNodeHandle<T>(true));

   RCPNodeHandle nodeRef2;

   nodeRef2 = std::move(nodeRef1);

   TEST_EQUALITY_CONST( nodeRef1.node_ptr(), 0 );

   TEST_INEQUALITY_CONST( nodeRef2.node_ptr(), 0 );

   TEST_EQUALITY_CONST( nodeRef1.same_node(nodeRef2), false );

   TEST_EQUALITY_CONST( nodeRef1.strong_count(), 0 );

   TEST_EQUALITY_CONST( nodeRef2.strong_count(), 1 );

   TEST_EQUALITY_CONST( nodeRef1.has_ownership(), false );

   TEST_EQUALITY_CONST( nodeRef2.has_ownership(), true );

 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, extraData_basic, T )

 {


   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(true));


   const int v1 = 2;

   const any a1(v1);

   nodeRef.set_extra_data(a1, "a1", PRE_DESTROY, true);


   any &a2 = nodeRef.get_extra_data(a1.typeName(), "a1");

   TEST_EQUALITY_CONST( a1.same(a2), true );

   TEST_EQUALITY( any_cast<int>(a2), v1 );


   any *a3 = nodeRef.get_optional_extra_data(a1.typeName(), "a1");

   TEST_EQUALITY_CONST( a3!=0, true );

   TEST_EQUALITY( &a2, a3 );

   TEST_EQUALITY_CONST( a3->same(a1), true );


   RCPNodeHandle nodeRef2 = nodeRef;


   const int v2 = 3;

   a2 = v2;

   TEST_EQUALITY( any_cast<int>(a1), v1 );

   TEST_EQUALITY( any_cast<int>(*a3), v2 );


   any &a4 = nodeRef2.get_extra_data(a1.typeName(), "a1");

   TEST_EQUALITY( &a4, &a2 );

   TEST_EQUALITY( &a4, a3 );

   TEST_EQUALITY( any_cast<int>(a4), v2 );


 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, extraData_basic_const, T )

 {


   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(true));


   const int v1 = 2;

   const any a1(v1);

   nodeRef.set_extra_data(a1, "a1", PRE_DESTROY, true);


   const RCPNodeHandle nodeRef2 = nodeRef;


   const any &a2 = nodeRef2.get_extra_data(a1.typeName(), "a1");

   TEST_EQUALITY_CONST( a1.same(a2), true );

   TEST_EQUALITY( any_cast<int>(a2), v1 );


   const any *a3 = nodeRef2.get_optional_extra_data(a1.typeName(), "a1");

   TEST_EQUALITY_CONST( a3!=0, true );

   TEST_EQUALITY( &a2, a3 );

   TEST_EQUALITY_CONST( a3->same(a1), true );


 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, extraData_failed, T )

 {


   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(true));


   const int v1 = 2;

   const any a1(v1);

   nodeRef.set_extra_data(a1, "a1", PRE_DESTROY, true);


 #ifdef TEUCHOS_DEBUG


   TEST_THROW({nodeRef.get_extra_data("wrong type", "a1");},

     std::invalid_argument);


   TEST_THROW({nodeRef.get_extra_data(a1.typeName(), "wrong name");},

     std::invalid_argument);


 #endif // TEUCHOS_DEBUG


   any *a2 = nodeRef.get_optional_extra_data("wrong type", "a1");

   TEST_EQUALITY_CONST( a2, 0 );


   any *a3 = nodeRef.get_optional_extra_data(a1.typeName(), "wrong name");

   TEST_EQUALITY_CONST( a3, 0 );


 }


 TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL( RCPNodeHandle, extraData_failed_const, T )

 {


   RCPNodeHandle nodeRef(basicRCPNodeHandle<T>(true));


   const int v1 = 2;

   const any a1(v1);

   nodeRef.set_extra_data(a1, "a1", PRE_DESTROY, true);


   const RCPNodeHandle nodeRef2 = nodeRef;


 #ifdef TEUCHOS_DEBUG


   TEST_THROW({nodeRef2.get_extra_data("wrong type", "a1");},

     std::invalid_argument);


   TEST_THROW({nodeRef2.get_extra_data(a1.typeName(), "wrong name");},

     std::invalid_argument);


 #endif // TEUCHOS_DEBUG


   const any *a2 = nodeRef2.get_optional_extra_data("wrong type", "a1");

   TEST_EQUALITY_CONST( a2, 0 );


   const any *a3 = nodeRef2.get_optional_extra_data(a1.typeName(), "wrong name");

   TEST_EQUALITY_CONST( a3, 0 );


 }


 //

 // Instantiations

 //


 #ifdef DO_RCPNODE_TRACING_TESTS


 #  define DEBUG_UNIT_TEST_GROUP( T ) \

     TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, debugWithNodeTracingPrint, T ) \

     TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, debugWithoutNodeTracingPrint, T )


 #else


 #  define DEBUG_UNIT_TEST_GROUP( T )


 #endif


 #define UNIT_TEST_GROUP( T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, basicConstruct_owns_mem, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, basicConstruct_no_owns_mem, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, weakPtr_basic_1, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, weakPtr_basic_2, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, copyConstruct, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, moveConstruct, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, copyAssignmentOperator, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, moveAssignmentOperator, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, extraData_basic, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, extraData_basic_const, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, extraData_failed, T ) \

   TEUCHOS_UNIT_TEST_TEMPLATE_1_INSTANT( RCPNodeHandle, extraData_failed_const, T ) \

   DEBUG_UNIT_TEST_GROUP(T)


 UNIT_TEST_GROUP(A)

 //UNIT_TEST_GROUP(B1)

 //UNIT_TEST_GROUP(B2)

 UNIT_TEST_GROUP(C)

 //UNIT_TEST_GROUP(D)

 UNIT_TEST_GROUP(E)


 // 2008/09/22: rabartl: Above: We don't need to test with all of these classes

 // in order to test this functionality.


 } // namespace Teuchos

Teuchos::DanglingReferenceError
Dangling reference error exception class.
Definition: Teuchos_Exceptions.hpp:101

Teuchos::NullReferenceError
Null reference error exception class.
Definition: Teuchos_Exceptions.hpp:77

Teuchos::RCP_WEAK
Definition: Teuchos_RCPNode.hpp:85

Teuchos::typeName
std::string typeName(const T &t)
Template function for returning the concrete type name of a passed-in object.
Definition: Teuchos_TypeNameTraits.hpp:115

TEST_INEQUALITY_CONST
#define TEST_INEQUALITY_CONST(v1, v2)
Assert the inequality of v1 and constant v2.
Definition: Teuchos_LocalTestingHelpers.hpp:95

Teuchos::RCPNodeTracer::printRCPNodeStatistics
static void printRCPNodeStatistics(const RCPNodeStatistics &rcpNodeStatistics, std::ostream &out)
Print the RCPNode allocation statistics.
Definition: Teuchos_RCPNode.cpp:328

Teuchos::RCPNodeTracer::getRCPNodeBaseObjMapKeyVoidPtr
static const void * getRCPNodeBaseObjMapKeyVoidPtr(T *p)
Get a const void* address to be used as the lookup key for an RCPNode given its embedded object&#39;s typ...
Definition: Teuchos_RCPNode.hpp:498

ECHO
#define ECHO(statement)
Echo the given statement before it is executed.
Definition: Teuchos_LocalTestingHelpers.hpp:63

Teuchos::RCPNodeTracer::isTracingActiveRCPNodes
static bool isTracingActiveRCPNodes()
Return if we are tracing active nodes or not.
Definition: Teuchos_RCPNode.cpp:300

Teuchos::any::same
bool same(const any &other) const
Return if two any objects are the same or not.
Definition: Teuchos_any.hpp:223

Teuchos::MockRCP
Definition: RCPNodeHandle_UnitTests.cpp:55

Teuchos::RCPNodeHandle::get_extra_data
any & get_extra_data(const std::string &type_name, const std::string &name)
Definition: Teuchos_RCPNode.hpp:972

TEST_EQUALITY
#define TEST_EQUALITY(v1, v2)
Assert the equality of v1 and v2.
Definition: Teuchos_LocalTestingHelpers.hpp:87

TEST_THROW
#define TEST_THROW(code, ExceptType)
Assert that the statement &#39;code&#39; throws the exception &#39;ExceptType&#39; (otherwise the test fails)...
Definition: Teuchos_LocalTestingHelpers.hpp:198

C
Definition: core/example/RefCountPtr/cxx_main.cpp:55

Teuchos::RCPNodeHandle::get_optional_extra_data
any * get_optional_extra_data(const std::string &type_name, const std::string &name)
Definition: Teuchos_RCPNode.hpp:987

Teuchos::RCPNodeTracer::getRCPNodeStatistics
static RCPNodeStatistics getRCPNodeStatistics()
Return the statistics on RCPNode allocations.
Definition: Teuchos_RCPNode.cpp:323

TEST_COMPARE
#define TEST_COMPARE(v1, comp, v2)
Assert that v1 comp v2 (where comp = &#39;==&#39;, &#39;&gt;=&quot;, &quot;!=", etc).
Definition: Teuchos_LocalTestingHelpers.hpp:152

Teuchos::getConst
const T & getConst(T &t)
Return a constant reference to an object given a non-const reference.
Definition: Teuchos_getConst.hpp:82

UNIT_TEST_GROUP
#define UNIT_TEST_GROUP(T)
Definition: RCPNodeHandle_UnitTests.cpp:729

A
Definition: core/example/RefCountPtr/cxx_main.cpp:47

Teuchos::TEUCHOS_STATIC_SETUP
TEUCHOS_STATIC_SETUP()
Definition: RCPNodeHandle_UnitTests.cpp:109

Teuchos::any
Modified boost::any class, which is a container for a templated value.
Definition: Teuchos_any.hpp:154

Teuchos::PRE_DESTROY
Definition: Teuchos_RCPNode.hpp:79

TestClasses.hpp

Teuchos::RCPNodeTracer::getCommonDebugNotesString
static std::string getCommonDebugNotesString()
Common error message string on how to debug RCPNode problems.
Definition: Teuchos_RCPNode.cpp:631

Teuchos::basicRCPNodeHandle
RCPNodeHandle basicRCPNodeHandle(const bool has_ownership, T **p_out=0)
Definition: RCPNodeHandle_UnitTests.cpp:95

Teuchos::DeallocDelete
Policy class for deallocator that uses delete to delete a pointer which is used by RCP...
Definition: Teuchos_RCPDecl.hpp:1002

Teuchos::TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL
TEUCHOS_UNIT_TEST_TEMPLATE_1_DECL(RCPNodeHandle, basicConstruct_owns_mem, T)
Definition: RCPNodeHandle_UnitTests.cpp:323

Teuchos::RCPNode
Node class to keep track of address and the reference count for a reference-counted utility class and...
Definition: Teuchos_RCPNode.hpp:153

Teuchos::TEUCHOS_UNIT_TEST
TEUCHOS_UNIT_TEST(ConstNonconstObjectContainer, create)
Definition: ConstNonconstObjectContainer.cpp:48

SET_RCPNODE_TRACING
#define SET_RCPNODE_TRACING()
Definition: Teuchos_RCPNode.hpp:1166

Teuchos::RCPNodeTmpl
Templated implementation class of RCPNode that has the responsibility for deleting the reference-coun...
Definition: Teuchos_RCPNode.hpp:558

Teuchos::concreteTypeName
std::string concreteTypeName(const T &t)
Template function for returning the type name of the actual concrete name of a passed-in object...
Definition: Teuchos_TypeNameTraits.hpp:138

Teuchos::deleteRCPNode
void deleteRCPNode(RCPNode **node)
Definition: RCPNodeHandle_UnitTests.cpp:84

Teuchos::basicRCPNodeNoAlloc
RCPNode * basicRCPNodeNoAlloc(T *p, const bool has_ownership)
Definition: RCPNodeHandle_UnitTests.cpp:65

Teuchos::RCPNodeHandle::create_strong
RCPNodeHandle create_strong() const
Return a strong handle.
Definition: Teuchos_RCPNode.hpp:896

Teuchos_getConst.hpp

Teuchos_UnitTestHarness.hpp
Unit testing support.

TEST_EQUALITY_CONST
#define TEST_EQUALITY_CONST(v1, v2)
Assert the equality of v1 and constant v2.
Definition: Teuchos_LocalTestingHelpers.hpp:79

Teuchos::RCPNodeHandle::set_extra_data
void set_extra_data(const any &extra_data, const std::string &name, EPrePostDestruction destroy_when, bool force_unique)
Definition: Teuchos_RCPNode.hpp:963

Teuchos::RCPNodeTracer::getExistingRCPNode
static RCPNode * getExistingRCPNode(T *p)
Return a raw pointer to an existing owning RCPNode given the address to the underlying object if it e...
Definition: Teuchos_RCPNode.hpp:528

E
Definition: TestClasses.hpp:208

Teuchos::basicRCPNode
RCPNode * basicRCPNode(const bool has_ownership, T **p_out=0)
Definition: RCPNodeHandle_UnitTests.cpp:74

Teuchos::MockRCP::access_private_ptr
T * access_private_ptr() const
Definition: RCPNodeHandle_UnitTests.cpp:57

Teuchos::RCPNodeHandle
Handle class that manages the RCPNode&#39;s reference counting.
Definition: Teuchos_RCPNode.hpp:748

Teuchos::RCPNodeHandle::strong_count
int strong_count() const
The strong count for this RCPNode, or 0 if the node is NULL.
Definition: Teuchos_RCPNode.hpp:925

Teuchos::RCPNodeHandle::has_ownership
void has_ownership(bool has_ownership_in)
Definition: Teuchos_RCPNode.hpp:950

Teuchos::null
Definition: Teuchos_ENull.hpp:54

Teuchos::RCPNodeTracer::removeRCPNode
static void removeRCPNode(RCPNode *rcp_node)
Remove an RCPNode from global list.
Definition: Teuchos_RCPNode.cpp:518

Teuchos::any::typeName
std::string typeName() const
Return the name of the type.
Definition: Teuchos_any.hpp:214

Teuchos::RCP_STRONG
Definition: Teuchos_RCPNode.hpp:85

Teuchos::RCPNodeHandle::same_node
bool same_node(const RCPNodeHandle &node2) const
Whether the RCPNode for which node2 is a handle is the same RCPNode as this object&#39;s RCPNode...
Definition: Teuchos_RCPNode.hpp:921

TEUCHOS_ASSERT
#define TEUCHOS_ASSERT(assertion_test)
This macro is throws when an assert fails.
Definition: Teuchos_Assert.hpp:55

Teuchos::RCPNodeHandle::node_ptr
RCPNode * node_ptr() const
Return a pointer to the underlying RCPNode.
Definition: Teuchos_RCPNode.hpp:903

Teuchos::RCPNodeHandle::create_weak
RCPNodeHandle create_weak() const
Return a weak handle.
Definition: Teuchos_RCPNode.hpp:889

Teuchos_RCPNode.hpp
Reference-counted pointer node classes.

Teuchos::RCPNodeTracer::getActiveRCPNodeHeaderString
static std::string getActiveRCPNodeHeaderString()
Header string used in printActiveRCPNodes().
Definition: Teuchos_RCPNode.cpp:604

Teuchos_TypeNameTraits.hpp
Defines basic traits returning the name of a type in a portable and readable way. ...

Teuchos::RCPNodeTracer::numActiveRCPNodes
static int numActiveRCPNodes()
Print the number of active RCPNode objects currently being tracked.
Definition: Teuchos_RCPNode.cpp:314

Teuchos::RCPNodeTracer::addNewRCPNode
static void addNewRCPNode(RCPNode *rcp_node, const std::string &info)
Add new RCPNode to the global list.
Definition: Teuchos_RCPNode.cpp:422

Teuchos::RCPNodeTracer::printActiveRCPNodes
static void printActiveRCPNodes(std::ostream &out)
Print the list of currently active RCP nodes.
Definition: Teuchos_RCPNode.cpp:367