2cd2732fed
UPtrList::set(const label i, T* ptr); No-op if the new pointer value is identical to the current content. This avoid memory management issues.
502 lines
11 KiB
C
502 lines
11 KiB
C
/*---------------------------------------------------------------------------*\
|
|
========= |
|
|
\\ / F ield | OpenFOAM: The Open Source CFD Toolbox
|
|
\\ / O peration |
|
|
\\ / A nd | Copyright (C) 2011 OpenFOAM Foundation
|
|
\\/ M anipulation | Copyright (C) 2018 OpenCFD Ltd.
|
|
-------------------------------------------------------------------------------
|
|
License
|
|
This file is part of OpenFOAM.
|
|
|
|
OpenFOAM 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 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
OpenFOAM 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 OpenFOAM. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
Description
|
|
Test behaviour of UPtrList, PtrList
|
|
\*---------------------------------------------------------------------------*/
|
|
|
|
#include "OSspecific.H"
|
|
|
|
#include "scalar.H"
|
|
#include "IOstreams.H"
|
|
#include "PtrDynList.H"
|
|
#include "DLPtrList.H"
|
|
#include "SLPtrList.H"
|
|
#include "plane.H"
|
|
#include "DynamicList.H"
|
|
|
|
using namespace Foam;
|
|
|
|
class Scalar
|
|
{
|
|
scalar data_;
|
|
|
|
public:
|
|
|
|
Scalar()
|
|
:
|
|
data_(0)
|
|
{}
|
|
|
|
Scalar(scalar val)
|
|
:
|
|
data_(val)
|
|
{}
|
|
|
|
~Scalar()
|
|
{
|
|
Info<<"delete Scalar: " << data_ << endl;
|
|
}
|
|
|
|
const scalar& value() const
|
|
{
|
|
return data_;
|
|
}
|
|
|
|
scalar& value()
|
|
{
|
|
return data_;
|
|
}
|
|
|
|
autoPtr<Scalar> clone() const
|
|
{
|
|
return autoPtr<Scalar>::New(data_);
|
|
}
|
|
|
|
friend Ostream& operator<<(Ostream& os, const Scalar& val)
|
|
{
|
|
os << val.data_;
|
|
return os;
|
|
}
|
|
};
|
|
|
|
|
|
|
|
// As per
|
|
//
|
|
// template<class T>
|
|
// Ostream& operator<<(Ostream& os, const UPtrList<T>& list)
|
|
//
|
|
// but handle nullptr
|
|
|
|
template<class T>
|
|
Ostream& printAddr
|
|
(
|
|
Ostream& os,
|
|
const UPtrList<T>& list
|
|
)
|
|
{
|
|
const label len = list.size();
|
|
|
|
// Size and start delimiter
|
|
os << nl << indent << len << nl
|
|
<< indent << token::BEGIN_LIST << incrIndent << nl;
|
|
|
|
for (label i=0; i < len; ++i)
|
|
{
|
|
os << "addr=" << long(list(i)) << nl;
|
|
}
|
|
|
|
// End delimiter
|
|
os << decrIndent << indent << token::END_LIST << nl;
|
|
return os;
|
|
}
|
|
|
|
|
|
// As per
|
|
//
|
|
// template<class T>
|
|
// Ostream& operator<<(Ostream& os, const UPtrList<T>& list)
|
|
//
|
|
// but handle nullptr
|
|
|
|
template<class T>
|
|
Ostream& print
|
|
(
|
|
Ostream& os,
|
|
const UPtrList<T>& list,
|
|
const bool debug=false
|
|
)
|
|
{
|
|
const label len = list.size();
|
|
|
|
// Size and start delimiter
|
|
os << nl << indent << len << nl
|
|
<< indent << token::BEGIN_LIST << incrIndent << nl;
|
|
|
|
for (label i=0; i < len; ++i)
|
|
{
|
|
const T* ptr = list(i);
|
|
|
|
if (ptr)
|
|
{
|
|
os << *ptr << nl;
|
|
}
|
|
else
|
|
{
|
|
os << "nullptr" << nl;
|
|
}
|
|
}
|
|
|
|
// End delimiter
|
|
os << decrIndent << indent << token::END_LIST << nl;
|
|
return os;
|
|
}
|
|
|
|
|
|
template<class T, int SizeMin>
|
|
Ostream& print
|
|
(
|
|
Ostream& os,
|
|
const PtrDynList<T, SizeMin>& list,
|
|
const bool debug=false
|
|
)
|
|
{
|
|
const label len = list.size();
|
|
|
|
// Size and start delimiter
|
|
os << nl << indent << len << nl
|
|
<< indent << token::BEGIN_LIST << incrIndent << nl;
|
|
|
|
for (label i=0; i < len; ++i)
|
|
{
|
|
const T* ptr = list(i);
|
|
|
|
if (ptr)
|
|
{
|
|
os << *ptr << nl;
|
|
}
|
|
else
|
|
{
|
|
os << "nullptr" << nl;
|
|
}
|
|
}
|
|
|
|
if (debug)
|
|
{
|
|
const label cap = list.capacity();
|
|
|
|
for (label i=len; i < cap; ++i)
|
|
{
|
|
const T* ptr = list(i);
|
|
|
|
os << "unused " << long(ptr) << nl;
|
|
}
|
|
}
|
|
|
|
|
|
// End delimiter
|
|
os << decrIndent << indent << token::END_LIST << nl;
|
|
return os;
|
|
}
|
|
|
|
|
|
template<class T>
|
|
Ostream& report
|
|
(
|
|
Ostream& os,
|
|
const UPtrList<T>& list,
|
|
const bool debug=false
|
|
)
|
|
{
|
|
return print(os, list, debug);
|
|
}
|
|
|
|
|
|
template<class T, int SizeMin>
|
|
Ostream& report
|
|
(
|
|
Ostream& os,
|
|
const PtrDynList<T,SizeMin>& list,
|
|
const bool debug=false
|
|
)
|
|
{
|
|
os << "capacity=" << list.capacity() << nl;
|
|
return print(os, list, debug);
|
|
}
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
|
|
// Main program:
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
PtrList<Scalar> list1(10);
|
|
PtrList<Scalar> list2(15);
|
|
PtrList<Scalar> listApp;
|
|
|
|
{
|
|
DLPtrList<Scalar> llist1;
|
|
llist1.insert(new Scalar(100));
|
|
llist1.insert(new Scalar(200));
|
|
llist1.insert(new Scalar(300));
|
|
|
|
DLPtrList<Scalar>::const_iterator citer = llist1.begin();
|
|
|
|
Info<< *citer << endl;
|
|
Info<< typeid(*citer).name() << endl;
|
|
|
|
++citer;
|
|
++citer;
|
|
|
|
--citer;
|
|
|
|
Info<< typeid(llist1.begin()).name() << endl;
|
|
|
|
forAllIters(llist1, it)
|
|
{
|
|
Info<< typeid(*it).name() << nl
|
|
<< "reversed: " << *it << endl;
|
|
}
|
|
for (const auto& it : llist1)
|
|
{
|
|
Info<< typeid(it).name() << nl
|
|
<< "for-: " << it << endl;
|
|
}
|
|
}
|
|
|
|
// Same but as SLPtrList
|
|
{
|
|
SLPtrList<Scalar> llist1;
|
|
llist1.insert(new Scalar(100));
|
|
llist1.insert(new Scalar(200));
|
|
llist1.insert(new Scalar(300));
|
|
|
|
for (const auto& it : llist1)
|
|
{
|
|
Info<< typeid(it).name() << nl
|
|
<< "for-: " << it << endl;
|
|
}
|
|
|
|
PtrList<Scalar> list1b(llist1);
|
|
Info<< list1b << endl;
|
|
}
|
|
|
|
forAll(list1, i)
|
|
{
|
|
list1.set(i, new Scalar(1.3*i));
|
|
}
|
|
|
|
forAll(list2, i)
|
|
{
|
|
list2.set(i, new Scalar(10 + 1.3*i));
|
|
}
|
|
|
|
for (label i = 0; i < 5; ++i)
|
|
{
|
|
listApp.append(new Scalar(1.3*i));
|
|
}
|
|
|
|
Info<< nl
|
|
<<"list1: " << list1 << nl
|
|
<<"list2: " << list2 << nl
|
|
<<"list-appended: " << listApp << endl;
|
|
|
|
Info<<"indirectly delete some items via set(.., 0) :" << endl;
|
|
for (label i = 0; i < 3; i++)
|
|
{
|
|
list1.set(i, nullptr);
|
|
}
|
|
|
|
Info<<"transfer list2 -> list1:" << endl;
|
|
list1.transfer(list2);
|
|
|
|
Info<<"list1: " << list1 << nl
|
|
<<"list2: " << list2 << endl;
|
|
|
|
Info<<"indirectly delete some items via setSize :" << endl;
|
|
list1.setSize(4);
|
|
|
|
Info<<"list1: " << list1 << endl;
|
|
|
|
{
|
|
PtrList<Scalar> list1a(list1, false);
|
|
|
|
Info<<"Clone constructed" << endl;
|
|
Info<<"in: " << list1 << nl
|
|
<<"out: " << list1a << nl
|
|
<<"addresses:" << nl;
|
|
printAddr(Info, list1);
|
|
printAddr(Info, list1a);
|
|
Info<<"values:" << nl;
|
|
print(Info, list1a);
|
|
|
|
// This should not cause problems (ie, no deletion)
|
|
{
|
|
auto* ptr = &(list1a.first());
|
|
list1a.set(0, ptr);
|
|
Info<<"values:" << nl;
|
|
print(Info, list1a);
|
|
}
|
|
|
|
|
|
PtrList<Scalar> list1b(list1a, true);
|
|
|
|
Info<<"Reuse constructed" << endl;
|
|
Info<<"in: " << list1a << nl
|
|
<<"out: " << list1b << nl
|
|
<<"addresses:" << nl;
|
|
printAddr(Info, list1a);
|
|
printAddr(Info, list1b);
|
|
|
|
|
|
PtrList<Scalar> list1c(list1b.clone());
|
|
|
|
Info<<"Explicit clone()" << endl;
|
|
Info<<"in: " << list1b << nl
|
|
<<"out: " << list1c << nl
|
|
<<"addresses:" << nl;
|
|
printAddr(Info, list1b);
|
|
printAddr(Info, list1c);
|
|
}
|
|
|
|
PtrList<Scalar> list3(std::move(list1));
|
|
Info<<"Move constructed" << endl;
|
|
|
|
Info<<"list1: " << list1 << nl
|
|
<<"list2: " << list2 << nl
|
|
<<"list3: " << list3 << endl;
|
|
|
|
|
|
Info<<"Move construct:" << endl;
|
|
|
|
PtrList<Scalar> list4(std::move(list3));
|
|
|
|
Info<<"list3: " << list3 << nl
|
|
<<"list4: " << list4 << endl;
|
|
|
|
Info<<"Move assign:" << endl;
|
|
list3 = std::move(list4);
|
|
|
|
Info<<"list3: " << list3 << nl
|
|
<<"list4: " << list4 << endl;
|
|
|
|
|
|
Info<<"UPtrList from PtrList" << nl;
|
|
|
|
UPtrList<Scalar> ulist1(list3);
|
|
|
|
Info<<"ulist1: " << ulist1 << nl;
|
|
Info<<"PtrList addresses:";
|
|
printAddr(Info, list3);
|
|
Info<<"UPtrList addresses:";
|
|
printAddr(Info, ulist1);
|
|
Info<< nl;
|
|
|
|
{
|
|
Info<<"UPtrList(const UPtrList&)" << nl;
|
|
|
|
const UPtrList<Scalar>& cref = ulist1;
|
|
|
|
UPtrList<Scalar> ulist1cp(cref);
|
|
|
|
Info<<"src addresses:";
|
|
printAddr(Info, cref);
|
|
Info<<"dst addresses:";
|
|
printAddr(Info, ulist1cp);
|
|
Info<< nl;
|
|
}
|
|
|
|
|
|
Info<<"Move construct:" << endl;
|
|
|
|
UPtrList<Scalar> ulist2(std::move(ulist1));
|
|
|
|
Info<<"ulist1: " << ulist1 << nl
|
|
<<"ulist2: " << ulist2 << nl;
|
|
|
|
Info<<"Copy assign:" << endl;
|
|
ulist1 = ulist2;
|
|
|
|
Info<<"ulist1: " << ulist1 << nl
|
|
<<"ulist2: " << ulist2 << nl;
|
|
|
|
Info<<"Move assign:" << endl;
|
|
ulist1 = std::move(ulist2);
|
|
|
|
Info<<"ulist1: " << ulist1 << nl
|
|
<<"ulist2: " << ulist2 << nl;
|
|
|
|
// Test iterator random access
|
|
{
|
|
auto iter1 = ulist1.begin();
|
|
auto iter2 = iter1 + 3;
|
|
|
|
Info<<"begin:" << *iter1 << " (+3):" << *iter2 << nl;
|
|
Info<< "diff= " << (iter1 - iter2) << nl;
|
|
Info<< "iter[2]=" << iter1[2] << nl;
|
|
Info<< "iter1 < iter2 : " << (iter1 < iter2) << nl;
|
|
Info<< "iter1 >= iter2 : " << (iter1 >= iter2) << nl;
|
|
|
|
Info<<"->" << iter1->value() << nl;
|
|
Info<<"*" << (*iter1).value() << nl;
|
|
Info<<"()" << iter1().value() << nl;
|
|
}
|
|
|
|
PtrList<plane> planes;
|
|
planes.append(new plane(vector::one, vector::one));
|
|
planes.append(new plane(vector(1,2,3), vector::one));
|
|
|
|
Info<< nl << "appended values" << nl;
|
|
for (const plane& p : planes)
|
|
{
|
|
Info<< " plane " << p << endl;
|
|
}
|
|
|
|
Info<<"Testing PtrDynList" << nl;
|
|
|
|
PtrDynList<plane> dynPlanes;
|
|
|
|
{
|
|
dynPlanes.append(new plane(vector::one, vector::one));
|
|
dynPlanes.append(new plane(vector(1,2,3), vector::one));
|
|
dynPlanes.append(nullptr);
|
|
|
|
dynPlanes.set(6, new plane(vector(2,2,1), vector::one));
|
|
dynPlanes.set(10, new plane(vector(4,5,6), vector::one));
|
|
}
|
|
|
|
Info<< nl << "PtrList: ";
|
|
report(Info, dynPlanes, true);
|
|
|
|
dynPlanes.resize(9);
|
|
|
|
Info<< nl << "resize()";
|
|
report(Info, dynPlanes, true);
|
|
|
|
dynPlanes.clear();
|
|
Info<<"clear()" << nl;
|
|
report(Info, dynPlanes);
|
|
|
|
Info<<"now append again" << endl;
|
|
{
|
|
dynPlanes.append(new plane(vector::one, vector::one));
|
|
dynPlanes.append(new plane(vector(1,2,3), vector::one));
|
|
|
|
dynPlanes.set(5, new plane(vector(2,2,1), vector::one));
|
|
}
|
|
|
|
report(Info, dynPlanes, true);
|
|
|
|
Info<<"free()" << endl;
|
|
|
|
dynPlanes.free();
|
|
report(Info, dynPlanes, true);
|
|
|
|
Info<< nl << "Done." << endl;
|
|
return 0;
|
|
}
|
|
|
|
|
|
// ************************************************************************* //
|