1 // Copyright (C) 2007-2016 CEA/DEN, EDF R&D
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11 // Lesser General Public License for more details.
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
19 // Author : Anthony Geay (CEA/DEN)
21 #ifndef __PARAMEDMEM_MEDCOUPLINGMEMARRAY_TXX__
22 #define __PARAMEDMEM_MEDCOUPLINGMEMARRAY_TXX__
24 #include "MEDCouplingMemArray.hxx"
25 #include "NormalizedUnstructuredMesh.hxx"
26 #include "InterpKernelException.hxx"
27 #include "InterpolationUtils.hxx"
36 void MEDCouplingPointer<T>::setInternal(T *pointer)
43 void MEDCouplingPointer<T>::setExternal(const T *pointer)
50 MemArray<T>::MemArray(const MemArray<T>& other):_nb_of_elem(0),_nb_of_elem_alloc(0),_ownership(false),_dealloc(0),_param_for_deallocator(0)
52 if(!other._pointer.isNull())
54 _nb_of_elem_alloc=other._nb_of_elem;
55 T *pointer=(T*)malloc(_nb_of_elem_alloc*sizeof(T));
56 std::copy(other._pointer.getConstPointer(),other._pointer.getConstPointer()+other._nb_of_elem,pointer);
57 useArray(pointer,true,C_DEALLOC,other._nb_of_elem);
62 void MemArray<T>::useArray(const T *array, bool ownership, DeallocType type, std::size_t nbOfElem)
66 _nb_of_elem_alloc=nbOfElem;
68 _pointer.setInternal(const_cast<T *>(array));
70 _pointer.setExternal(array);
72 _dealloc=BuildFromType(type);
76 void MemArray<T>::useExternalArrayWithRWAccess(const T *array, std::size_t nbOfElem)
80 _nb_of_elem_alloc=nbOfElem;
81 _pointer.setInternal(const_cast<T *>(array));
83 _dealloc=CPPDeallocator;
87 void MemArray<T>::writeOnPlace(std::size_t id, T element0, const T *others, std::size_t sizeOfOthers)
89 if(id+sizeOfOthers>=_nb_of_elem_alloc)
90 reserve(2*_nb_of_elem+sizeOfOthers+1);
91 T *pointer=_pointer.getPointer();
93 std::copy(others,others+sizeOfOthers,pointer+id+1);
94 _nb_of_elem=std::max<std::size_t>(_nb_of_elem,id+sizeOfOthers+1);
98 template<class InputIterator>
99 void MemArray<T>::insertAtTheEnd(InputIterator first, InputIterator last)
101 T *pointer=_pointer.getPointer();
104 if(_nb_of_elem>=_nb_of_elem_alloc)
106 reserve(_nb_of_elem_alloc>0?2*_nb_of_elem_alloc:1);
107 pointer=_pointer.getPointer();
109 pointer[_nb_of_elem++]=*first++;
114 void MemArray<T>::pushBack(T elem)
116 if(_nb_of_elem>=_nb_of_elem_alloc)
117 reserve(_nb_of_elem_alloc>0?2*_nb_of_elem_alloc:1);
119 pt[_nb_of_elem++]=elem;
123 T MemArray<T>::popBack()
127 const T *pt=getConstPointer();
128 return pt[--_nb_of_elem];
130 throw INTERP_KERNEL::Exception("MemArray::popBack : nothing to pop in array !");
134 void MemArray<T>::pack() const
136 (const_cast<MemArray<T> * >(this))->reserve(_nb_of_elem);
140 bool MemArray<T>::isEqual(const MemArray<T>& other, T prec, std::string& reason) const
142 std::ostringstream oss; oss.precision(15);
143 if(_nb_of_elem!=other._nb_of_elem)
145 oss << "Number of elements in coarse data of DataArray mismatch : this=" << _nb_of_elem << " other=" << other._nb_of_elem;
149 const T *pt1=_pointer.getConstPointer();
150 const T *pt2=other._pointer.getConstPointer();
155 oss << "coarse data pointer is defined for only one DataArray instance !";
161 for(std::size_t i=0;i<_nb_of_elem;i++)
162 if(pt1[i]-pt2[i]<-prec || (pt1[i]-pt2[i])>prec)
164 oss << "The content of data differs at pos #" << i << " of coarse data ! this[i]=" << pt1[i] << " other[i]=" << pt2[i];
172 * \param [in] sl is typically the number of components
173 * \return True if a not null pointer is present, False if not.
176 bool MemArray<T>::reprHeader(int sl, std::ostream& stream) const
178 stream << "Number of tuples : ";
179 if(!_pointer.isNull())
182 stream << _nb_of_elem/sl << std::endl << "Internal memory facts : " << _nb_of_elem << "/" << _nb_of_elem_alloc;
184 stream << "Empty Data";
189 stream << "Data content :\n";
190 bool ret=!_pointer.isNull();
192 stream << "No data !\n";
197 * \param [in] sl is typically the number of components
200 void MemArray<T>::repr(int sl, std::ostream& stream) const
202 if(reprHeader(sl,stream))
204 const T *data=getConstPointer();
205 if(_nb_of_elem!=0 && sl!=0)
207 std::size_t nbOfTuples=_nb_of_elem/std::abs(sl);
208 for(std::size_t i=0;i<nbOfTuples;i++)
210 stream << "Tuple #" << i << " : ";
211 std::copy(data,data+sl,std::ostream_iterator<T>(stream," "));
217 stream << "Empty Data\n";
222 * \param [in] sl is typically the number of components
225 void MemArray<T>::reprZip(int sl, std::ostream& stream) const
227 stream << "Number of tuples : ";
228 if(!_pointer.isNull())
231 stream << _nb_of_elem/sl;
233 stream << "Empty Data";
238 stream << "Data content : ";
239 const T *data=getConstPointer();
240 if(!_pointer.isNull())
242 if(_nb_of_elem!=0 && sl!=0)
244 std::size_t nbOfTuples=_nb_of_elem/std::abs(sl);
245 for(std::size_t i=0;i<nbOfTuples;i++)
248 std::copy(data,data+sl,std::ostream_iterator<T>(stream," "));
255 stream << "Empty Data\n";
258 stream << "No data !\n";
262 * \param [in] sl is typically the number of components
265 void MemArray<T>::reprNotTooLong(int sl, std::ostream& stream) const
267 if(reprHeader(sl,stream))
269 const T *data=getConstPointer();
270 if(_nb_of_elem!=0 && sl!=0)
272 std::size_t nbOfTuples=_nb_of_elem/std::abs(sl);
275 for(std::size_t i=0;i<nbOfTuples;i++)
277 stream << "Tuple #" << i << " : ";
278 std::copy(data,data+sl,std::ostream_iterator<T>(stream," "));
284 {// too much tuples -> print the 3 first tuples and 3 last.
285 stream << "Tuple #0 : ";
286 std::copy(data,data+sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
287 stream << "Tuple #1 : ";
288 std::copy(data+sl,data+2*sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
289 stream << "Tuple #2 : ";
290 std::copy(data+2*sl,data+3*sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
292 stream << "Tuple #" << nbOfTuples-3 << " : ";
293 std::copy(data+(nbOfTuples-3)*sl,data+(nbOfTuples-2)*sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
294 stream << "Tuple #" << nbOfTuples-2 << " : ";
295 std::copy(data+(nbOfTuples-2)*sl,data+(nbOfTuples-1)*sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
296 stream << "Tuple #" << nbOfTuples-1 << " : ";
297 std::copy(data+(nbOfTuples-1)*sl,data+nbOfTuples*sl,std::ostream_iterator<T>(stream," ")); stream << "\n";
301 stream << "Empty Data\n";
306 void MemArray<T>::fillWithValue(const T& val)
308 T *pt=_pointer.getPointer();
309 std::fill(pt,pt+_nb_of_elem,val);
313 T *MemArray<T>::fromNoInterlace(int nbOfComp) const
316 throw INTERP_KERNEL::Exception("MemArray<T>::fromNoInterlace : number of components must be > 0 !");
317 const T *pt=_pointer.getConstPointer();
318 std::size_t nbOfTuples=_nb_of_elem/nbOfComp;
319 T *ret=(T*)malloc(_nb_of_elem*sizeof(T));
321 for(std::size_t i=0;i<nbOfTuples;i++)
322 for(int j=0;j<nbOfComp;j++,w++)
323 *w=pt[j*nbOfTuples+i];
328 T *MemArray<T>::toNoInterlace(int nbOfComp) const
331 throw INTERP_KERNEL::Exception("MemArray<T>::toNoInterlace : number of components must be > 0 !");
332 const T *pt=_pointer.getConstPointer();
333 std::size_t nbOfTuples=_nb_of_elem/nbOfComp;
334 T *ret=(T*)malloc(_nb_of_elem*sizeof(T));
336 for(int i=0;i<nbOfComp;i++)
337 for(std::size_t j=0;j<nbOfTuples;j++,w++)
343 void MemArray<T>::sort(bool asc)
345 T *pt=_pointer.getPointer();
347 std::sort(pt,pt+_nb_of_elem);
350 typename std::reverse_iterator<T *> it1(pt+_nb_of_elem);
351 typename std::reverse_iterator<T *> it2(pt);
357 void MemArray<T>::reverse(int nbOfComp)
360 throw INTERP_KERNEL::Exception("MemArray<T>::reverse : only supported with 'this' array with ONE or more than ONE component !");
361 T *pt=_pointer.getPointer();
364 std::reverse(pt,pt+_nb_of_elem);
369 T *pt2=pt+_nb_of_elem-nbOfComp;
370 std::size_t nbOfTuples=_nb_of_elem/nbOfComp;
371 for(std::size_t i=0;i<nbOfTuples/2;i++,pt+=nbOfComp,pt2-=nbOfComp)
373 for(int j=0;j<nbOfComp;j++)
374 std::swap(pt[j],pt2[j]);
380 void MemArray<T>::alloc(std::size_t nbOfElements)
383 _nb_of_elem=nbOfElements;
384 _nb_of_elem_alloc=nbOfElements;
385 _pointer.setInternal((T*)malloc(_nb_of_elem_alloc*sizeof(T)));
387 _dealloc=CDeallocator;
391 * This method performs systematically an allocation of \a newNbOfElements elements in \a this.
392 * \a _nb_of_elem and \a _nb_of_elem_alloc will \b NOT be systematically equal (contrary to MemArray<T>::reAlloc method.
393 * So after the call of this method \a _nb_of_elem will be equal tostd::min<std::size_t>(_nb_of_elem,newNbOfElements) and \a _nb_of_elem_alloc equal to
394 * \a newNbOfElements. This method is typically used to perform a pushBack to avoid systematic allocations-copy-deallocation.
395 * So after the call of this method the accessible content is perfectly set.
397 * So this method should not be confused with MemArray<T>::reserve that is close to MemArray<T>::reAlloc but not same.
400 void MemArray<T>::reserve(std::size_t newNbOfElements)
402 if(_nb_of_elem_alloc==newNbOfElements)
404 T *pointer=(T*)malloc(newNbOfElements*sizeof(T));
405 std::copy(_pointer.getConstPointer(),_pointer.getConstPointer()+std::min<std::size_t>(_nb_of_elem,newNbOfElements),pointer);
407 DestroyPointer(const_cast<T *>(_pointer.getConstPointer()),_dealloc,_param_for_deallocator);//Do not use getPointer because in case of _external
408 _pointer.setInternal(pointer);
409 _nb_of_elem=std::min<std::size_t>(_nb_of_elem,newNbOfElements);
410 _nb_of_elem_alloc=newNbOfElements;
412 _dealloc=CDeallocator;
413 _param_for_deallocator=0;
417 * This method performs systematically an allocation of \a newNbOfElements elements in \a this.
418 * \a _nb_of_elem and \a _nb_of_elem_alloc will be equal even if only std::min<std::size_t>(_nb_of_elem,newNbOfElements) come from the .
419 * The remaing part of the new allocated chunk are available but not set previouly !
421 * So this method should not be confused with MemArray<T>::reserve that is close to MemArray<T>::reAlloc but not same.
424 void MemArray<T>::reAlloc(std::size_t newNbOfElements)
426 if(_nb_of_elem==newNbOfElements)
428 T *pointer=(T*)malloc(newNbOfElements*sizeof(T));
429 std::copy(_pointer.getConstPointer(),_pointer.getConstPointer()+std::min<std::size_t>(_nb_of_elem,newNbOfElements),pointer);
431 DestroyPointer(const_cast<T *>(_pointer.getConstPointer()),_dealloc,_param_for_deallocator);//Do not use getPointer because in case of _external
432 _pointer.setInternal(pointer);
433 _nb_of_elem=newNbOfElements;
434 _nb_of_elem_alloc=newNbOfElements;
436 _dealloc=CDeallocator;
437 _param_for_deallocator=0;
441 void MemArray<T>::CPPDeallocator(void *pt, void *param)
443 delete [] reinterpret_cast<T*>(pt);
447 void MemArray<T>::CDeallocator(void *pt, void *param)
453 typename MemArray<T>::Deallocator MemArray<T>::BuildFromType(DeallocType type)
458 return CPPDeallocator;
462 throw INTERP_KERNEL::Exception("Invalid deallocation requested ! Unrecognized enum DeallocType !");
467 void MemArray<T>::DestroyPointer(T *pt, typename MemArray<T>::Deallocator dealloc, void *param)
474 void MemArray<T>::destroy()
477 DestroyPointer(const_cast<T *>(_pointer.getConstPointer()),_dealloc,_param_for_deallocator);//Do not use getPointer because in case of _external
481 _param_for_deallocator=NULL;
487 MemArray<T> &MemArray<T>::operator=(const MemArray<T>& other)
489 alloc(other._nb_of_elem);
490 std::copy(other._pointer.getConstPointer(),other._pointer.getConstPointer()+_nb_of_elem,_pointer.getPointer());