Salome HOME
Merge branch 'V7_main' into V7_3_1_BR
[modules/paravis.git] / src / Plugins / MEDReader / IO / vtkGenerateVectors.cxx
1 // Copyright (C) 2010-2014  CEA/DEN, EDF R&D
2 //
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.
7 //
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.
12 //
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
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19 // Author : Anthony Geay
20
21 #include "vtkGenerateVectors.h"
22 #include "vtkDoubleArray.h"
23 #include "vtkInformation.h"
24 #include "vtkQuadratureSchemeDefinition.h"
25 #include "MEDUtilities.hxx"
26 #define protected public
27 #include "vtkFieldData.h"
28
29 void vtkGenerateVectors::Operate(vtkFieldData *fd)
30 {
31   if(!fd)
32     return ;
33   const int nbOfArrs(fd->GetNumberOfArrays());
34   for(int i=0;i<nbOfArrs;i++)
35     {
36       vtkDataArray *arr(fd->GetArray(i));
37       if(!arr)
38         continue;
39       vtkDoubleArray *arrc(vtkDoubleArray::SafeDownCast(arr));
40       if(!arrc)
41         continue;
42       int nbOfCompo(arrc->GetNumberOfComponents());
43       if(nbOfCompo<=1 || nbOfCompo==3)
44         continue;
45       if(nbOfCompo==2)
46         fd->SetArray(i,Operate2Compo(arrc));
47       else
48         fd->SetArray(i,OperateMoreThan3Compo(arrc));
49     }
50 }
51
52 vtkDoubleArray *vtkGenerateVectors::Operate2Compo(vtkDoubleArray *oldArr)
53 {
54   static const int VTK_DATA_ARRAY_FREE=vtkDataArrayTemplate<double>::VTK_DATA_ARRAY_FREE;
55   vtkDoubleArray *ret(vtkDoubleArray::New());
56   std::size_t nbOfTuples(oldArr->GetNumberOfTuples());
57   const double *inPt(oldArr->GetPointer(0));
58   double *pt((double *)malloc(nbOfTuples*3*sizeof(double)));
59   for(std::size_t i=0;i<nbOfTuples;i++)
60     {
61       pt[3*i+0]=inPt[2*i+0];
62       pt[3*i+1]=inPt[2*i+1];
63       pt[3*i+2]=0.;
64     }
65   ret->SetNumberOfComponents(3);
66   ret->SetName(oldArr->GetName());
67   ret->SetComponentName(0,oldArr->GetComponentName(0));
68   ret->SetComponentName(1,oldArr->GetComponentName(1));
69   ret->SetArray(pt,3*nbOfTuples,0,VTK_DATA_ARRAY_FREE);
70   UpdateInformationOfArray(oldArr,ret);
71   return ret;
72 }
73
74 vtkDoubleArray *vtkGenerateVectors::OperateMoreThan3Compo(vtkDoubleArray *oldArr)
75 {
76   static const int VTK_DATA_ARRAY_FREE=vtkDataArrayTemplate<double>::VTK_DATA_ARRAY_FREE;
77   vtkDoubleArray *ret(vtkDoubleArray::New());
78   int nbOfCompo(oldArr->GetNumberOfComponents());
79   std::size_t nbOfTuples(oldArr->GetNumberOfTuples());
80   const double *inPt(oldArr->GetPointer(0));
81   double *pt((double *)malloc(nbOfTuples*3*sizeof(double)));
82   for(std::size_t i=0;i<nbOfTuples;i++)
83     {
84       pt[3*i+0]=inPt[nbOfCompo*i+0];
85       pt[3*i+1]=inPt[nbOfCompo*i+1];
86       pt[3*i+2]=inPt[nbOfCompo*i+2];
87     }
88   ret->SetNumberOfComponents(3);
89   ret->SetName(oldArr->GetName());
90   ret->SetComponentName(0,oldArr->GetComponentName(0));
91   ret->SetComponentName(1,oldArr->GetComponentName(1));
92   ret->SetComponentName(2,oldArr->GetComponentName(2));
93   ret->SetArray(pt,3*nbOfTuples,0,VTK_DATA_ARRAY_FREE);
94   UpdateInformationOfArray(oldArr,ret);
95   return ret;
96 }
97
98 void vtkGenerateVectors::UpdateInformationOfArray(vtkDoubleArray *oldArr, vtkDoubleArray *arr)
99 {
100   if(oldArr->GetInformation()->Has(vtkQuadratureSchemeDefinition::QUADRATURE_OFFSET_ARRAY_NAME()))
101     {
102       arr->GetInformation()->Set(vtkQuadratureSchemeDefinition::QUADRATURE_OFFSET_ARRAY_NAME(),oldArr->GetInformation()->Get((vtkQuadratureSchemeDefinition::QUADRATURE_OFFSET_ARRAY_NAME())));
103     }
104   if(oldArr->GetInformation()->Get(MEDUtilities::ELGA()))
105     arr->GetInformation()->Set(MEDUtilities::ELGA(),1);
106   if(oldArr->GetInformation()->Get(MEDUtilities::ELNO()))
107     arr->GetInformation()->Set(MEDUtilities::ELNO(),1);
108 }