2010-03-11 15:47:40 +00:00
|
|
|
/*
|
|
|
|
* Copyright (C) 2010 Thorsten Liebig (Thorsten.Liebig@gmx.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 3 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, see <http://www.gnu.org/licenses/>.
|
|
|
|
*/
|
|
|
|
|
2010-03-02 13:54:50 +00:00
|
|
|
#include "processfields_td.h"
|
2010-12-06 08:59:42 +00:00
|
|
|
#include "Common/operator_base.h"
|
2010-03-02 13:54:50 +00:00
|
|
|
#include <iomanip>
|
|
|
|
#include <sstream>
|
|
|
|
#include <string>
|
|
|
|
|
2010-12-07 15:47:23 +00:00
|
|
|
ProcessFieldsTD::ProcessFieldsTD(Engine_Interface_Base* eng_if) : ProcessFields(eng_if)
|
2010-03-02 13:54:50 +00:00
|
|
|
{
|
|
|
|
pad_length = 8;
|
|
|
|
}
|
|
|
|
|
|
|
|
ProcessFieldsTD::~ProcessFieldsTD()
|
|
|
|
{
|
|
|
|
}
|
|
|
|
|
2010-12-02 12:51:34 +00:00
|
|
|
int ProcessFieldsTD::Process()
|
2010-03-02 13:54:50 +00:00
|
|
|
{
|
2010-12-02 12:51:34 +00:00
|
|
|
if (Enabled==false) return -1;
|
|
|
|
if (filePattern.empty()) return -1;
|
|
|
|
if (CheckTimestep()==false) return GetNextInterval();
|
2010-07-15 10:58:48 +00:00
|
|
|
|
2010-12-02 12:51:34 +00:00
|
|
|
string filename;
|
2010-04-05 18:22:03 +00:00
|
|
|
|
2010-12-02 12:51:34 +00:00
|
|
|
if (m_fileType==VTK_FILETYPE)
|
2010-03-02 14:37:00 +00:00
|
|
|
{
|
2010-12-02 12:51:34 +00:00
|
|
|
stringstream ss;
|
2010-12-02 13:29:46 +00:00
|
|
|
ss << filePattern << std::setw( pad_length ) << std::setfill( '0' ) << m_Eng_Interface->GetNumberOfTimesteps() << ".vtk";
|
2010-12-02 12:51:34 +00:00
|
|
|
filename = ss.str();
|
2010-03-02 14:37:00 +00:00
|
|
|
}
|
2010-12-02 12:51:34 +00:00
|
|
|
else
|
|
|
|
filename = m_filename;
|
2010-03-09 20:35:57 +00:00
|
|
|
|
2010-07-15 10:58:48 +00:00
|
|
|
#ifdef OUTPUT_IN_DRAWINGUNITS
|
|
|
|
double discLines_scaling = 1;
|
|
|
|
#else
|
|
|
|
double discLines_scaling = Op->GetGridDelta();
|
|
|
|
#endif
|
|
|
|
|
2010-12-17 14:14:34 +00:00
|
|
|
FDTD_FLOAT**** field = CalcField();
|
2010-03-09 20:35:57 +00:00
|
|
|
|
2010-04-05 18:22:03 +00:00
|
|
|
if (m_fileType==VTK_FILETYPE)
|
|
|
|
{
|
2010-12-02 12:51:34 +00:00
|
|
|
ofstream file(filename.c_str());
|
2010-12-06 12:04:37 +00:00
|
|
|
if (file.is_open()==false)
|
|
|
|
{
|
|
|
|
cerr << "ProcessFieldsTD::Process: can't open file '" << filename << "' for writing... abort! " << endl;
|
|
|
|
};
|
2010-12-02 12:51:34 +00:00
|
|
|
DumpVectorArray2VTK(file,GetFieldNameByType(m_DumpType),field,discLines,numLines,m_precision,string("Interpolation: ")+m_Eng_Interface->GetInterpolationTypeString(), m_Mesh_Type, discLines_scaling);
|
|
|
|
file.close();
|
2010-04-05 18:22:03 +00:00
|
|
|
}
|
|
|
|
else if (m_fileType==HDF5_FILETYPE)
|
|
|
|
{
|
2010-12-02 12:51:34 +00:00
|
|
|
stringstream ss;
|
2010-12-02 13:29:46 +00:00
|
|
|
ss << std::setw( pad_length ) << std::setfill( '0' ) << m_Eng_Interface->GetNumberOfTimesteps();
|
2010-12-19 19:41:08 +00:00
|
|
|
DumpVectorArray2HDF5(filename.c_str(),string( ss.str() ),field,numLines,m_Eng_Interface->GetTime(m_dualTime));
|
2010-04-05 18:22:03 +00:00
|
|
|
}
|
2010-12-02 12:51:34 +00:00
|
|
|
else
|
|
|
|
cerr << "ProcessFieldsTD::Process: unknown File-Type" << endl;
|
|
|
|
|
|
|
|
Delete_N_3DArray(field,numLines);
|
|
|
|
|
2010-03-10 11:15:14 +00:00
|
|
|
return GetNextInterval();
|
2010-03-02 13:54:50 +00:00
|
|
|
}
|