src/io/DumpReader.cpp

/* 
 * Copyright (c) 2005 The University of Notre Dame. All Rights Reserved. 
 * 
 * The University of Notre Dame grants you ("Licensee") a 
 * non-exclusive, royalty free, license to use, modify and 
 * redistribute this software in source and binary code form, provided 
 * that the following conditions are met: 
 * 
 * 1. Acknowledgement of the program authors must be made in any 
 *    publication of scientific results based in part on use of the 
 *    program.  An acceptable form of acknowledgement is citation of 
 *    the article in which the program was described (Matthew 
 *    A. Meineke, Charles F. Vardeman II, Teng Lin, Christopher 
 *    J. Fennell and J. Daniel Gezelter, "OOPSE: An Object-Oriented 
 *    Parallel Simulation Engine for Molecular Dynamics," 
 *    J. Comput. Chem. 26, pp. 252-271 (2005)) 
 * 
 * 2. Redistributions of source code must retain the above copyright 
 *    notice, this list of conditions and the following disclaimer. 
 * 
 * 3. 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. 
 * 
 * This software is provided "AS IS," without a warranty of any 
 * kind. All express or implied conditions, representations and 
 * warranties, including any implied warranty of merchantability, 
 * fitness for a particular purpose or non-infringement, are hereby 
 * excluded.  The University of Notre Dame and its licensors shall not 
 * be liable for any damages suffered by licensee as a result of 
 * using, modifying or distributing the software or its 
 * derivatives. In no event will the University of Notre Dame or its 
 * licensors be liable for any lost revenue, profit or data, or for 
 * direct, indirect, special, consequential, incidental or punitive 
 * damages, however caused and regardless of the theory of liability, 
 * arising out of the use of or inability to use software, even if the 
 * University of Notre Dame has been advised of the possibility of 
 * such damages. 
 */ 
  
#define _LARGEFILE_SOURCE64 
#define _FILE_OFFSET_BITS 64 
 
#include <sys/types.h> 
#include <sys/stat.h> 
 
#include <iostream> 
#include <math.h> 
 
#include <stdio.h> 
#include <stdlib.h> 
#include <string.h> 
 
#include "io/DumpReader.hpp" 
#include "primitives/Molecule.hpp" 
#include "utils/simError.h" 
#include "utils/MemoryUtils.hpp" 
#include "utils/StringTokenizer.hpp" 
 
#ifdef IS_MPI 
 
#include <mpi.h> 
#define TAKE_THIS_TAG_CHAR 0 
#define TAKE_THIS_TAG_INT 1 
 
#endif // is_mpi 
 
 
namespace oopse { 
   
  DumpReader::DumpReader(SimInfo* info, const std::string& filename) 
    : info_(info), filename_(filename), isScanned_(false), nframes_(0), needCOMprops_(false) { 
    
#ifdef IS_MPI 
    
    if (worldRank == 0) { 
#endif 
      
      inFile_ = new std::ifstream(filename_.c_str()); 
      
      if (inFile_->fail()) { 
        sprintf(painCave.errMsg, 
                "DumpReader: Cannot open file: %s\n", 
                filename_.c_str()); 
        painCave.isFatal = 1; 
        simError(); 
      } 
      
#ifdef IS_MPI 
      
    } 
    
    strcpy(checkPointMsg, "Dump file opened for reading successfully."); 
    errorCheckPoint(); 
    
#endif 
    
    return; 
  } 
  
  DumpReader::~DumpReader() { 
    
#ifdef IS_MPI 
    
    if (worldRank == 0) { 
#endif 
      
      delete inFile_; 
      
#ifdef IS_MPI 
      
    } 
    
    strcpy(checkPointMsg, "Dump file closed successfully."); 
    errorCheckPoint(); 
    
#endif 
    
    return; 
  } 
  
  int DumpReader::getNFrames(void) { 
     
    if (!isScanned_) 
      scanFile(); 
     
    return nframes_; 
  } 
   
  void DumpReader::scanFile(void) { 
    int lineNo = 0; 
    std::streampos prevPos;
    std::streampos  currPos; 
    
#ifdef IS_MPI 
    
    if (worldRank == 0) { 
#endif // is_mpi 
      
      currPos = inFile_->tellg();
      prevPos = currPos;
      bool foundOpenSnapshotTag = false;
      bool foundClosedSnapshotTag = false;
      while(inFile_->getline(buffer, bufferSize)) {
        ++lineNo;
        
        std::string line = buffer;
        currPos = inFile_->tellg(); 
        if (line.find("<Snapshot>")!= std::string::npos) {
          if (foundOpenSnapshotTag) {
            sprintf(painCave.errMsg, 
                    "DumpReader:<Snapshot> is multiply nested at line %d in %s \n", lineNo, 
                    filename_.c_str()); 
            painCave.isFatal = 1; 
            simError();           
          }
          foundOpenSnapshotTag = true;
          foundClosedSnapshotTag = false;
          framePos_.push_back(prevPos);
          
        } else if (line.find("</Snapshot>") != std::string::npos){
          if (!foundOpenSnapshotTag) {
            sprintf(painCave.errMsg, 
                    "DumpReader:</Snapshot> appears before <Snapshot> at line %d in %s \n", lineNo, 
                    filename_.c_str()); 
            painCave.isFatal = 1; 
            simError(); 
          }
          
          if (foundClosedSnapshotTag) {
            sprintf(painCave.errMsg, 
                    "DumpReader:</Snapshot> appears multiply nested at line %d in %s \n", lineNo, 
                    filename_.c_str()); 
            painCave.isFatal = 1; 
            simError(); 
          }
          foundClosedSnapshotTag = true;
          foundOpenSnapshotTag = false;
        }
        prevPos = currPos;
      }
      
      // only found <Snapshot> for the last frame means the file is corrupted, we should discard
      // it and give a warning message
      if (foundOpenSnapshotTag) {
        sprintf(painCave.errMsg, 
                "DumpReader: last frame in %s is invalid\n", filename_.c_str()); 
        painCave.isFatal = 0; 
        simError();       
        framePos_.pop_back();
      }
      
      nframes_ = framePos_.size(); 
      
      if (nframes_ == 0) {
        sprintf(painCave.errMsg, 
                "DumpReader: %s does not contain a valid frame\n", filename_.c_str()); 
        painCave.isFatal = 1; 
        simError();      
      }
#ifdef IS_MPI 
    } 
     
    MPI_Bcast(&nframes_, 1, MPI_INT, 0, MPI_COMM_WORLD); 
    
#endif // is_mpi 
    
    isScanned_ = true; 
  } 
   
  void DumpReader::readFrame(int whichFrame) { 
    if (!isScanned_) 
      scanFile(); 
         
    int storageLayout = info_->getSnapshotManager()->getStorageLayout(); 
     
    if (storageLayout & DataStorage::dslPosition) { 
      needPos_ = true; 
    } else { 
      needPos_ = false; 
    } 
     
    if (storageLayout & DataStorage::dslVelocity) { 
      needVel_ = true; 
    } else { 
      needVel_ = false; 
    } 
     
    if (storageLayout & DataStorage::dslAmat || storageLayout & DataStorage::dslElectroFrame) { 
      needQuaternion_ = true; 
    } else { 
      needQuaternion_ = false; 
    } 
     
    if (storageLayout & DataStorage::dslAngularMomentum) { 
      needAngMom_ = true; 
    } else { 
      needAngMom_ = false;     
    } 
     
    readSet(whichFrame); 

    if (needCOMprops_) {
      Snapshot* s = info_->getSnapshotManager()->getCurrentSnapshot();
      Vector3d com;
      Vector3d comvel;
      Vector3d comw;
      if (needPos_ && needVel_){
        info_->getComAll(com, comvel);
        comw = info_->getAngularMomentum();
      }else{
        com = info_->getCom();
        comvel = 0.0;
        comw   = 0.0;
      }
      s->setCOMprops(com, comvel, comw);      
    }

  } 
   
  void DumpReader::readSet(int whichFrame) {     
    std::string line;

#ifndef IS_MPI 
    inFile_->clear();  
    inFile_->seekg(framePos_[whichFrame]); 

    std::istream& inputStream = *inFile_;     

#else 
    int masterNode = 0;
    std::stringstream sstream;
    if (worldRank == masterNode) {
      std::string sendBuffer;

      inFile_->clear();  
      inFile_->seekg(framePos_[whichFrame]); 
      
      while (inFile_->getline(buffer, bufferSize)) {

        line = buffer;
        sendBuffer += line;
        sendBuffer += '\n';
        if (line.find("</Snapshot>") != std::string::npos) {
          break;
        }        
      }

      int sendBufferSize = sendBuffer.size();
      MPI_Bcast(&sendBufferSize, 1, MPI_INT, masterNode, MPI_COMM_WORLD);     
      MPI_Bcast((void *)sendBuffer.c_str(), sendBufferSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);     
      
      sstream.str(sendBuffer);
    } else {
      int sendBufferSize;
      MPI_Bcast(&sendBufferSize, 1, MPI_INT, masterNode, MPI_COMM_WORLD);     
      char * recvBuffer = new char[sendBufferSize+1];
      assert(recvBuffer);
      recvBuffer[sendBufferSize] = '\0';
      MPI_Bcast(recvBuffer, sendBufferSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);     
      sstream.str(recvBuffer);
      delete [] recvBuffer;
    }      

    std::istream& inputStream = sstream;  
#endif

    inputStream.getline(buffer, bufferSize);

    line = buffer;
    if (line.find("<Snapshot>") == std::string::npos) {
      sprintf(painCave.errMsg, 
              "DumpReader Error: can not find <Snapshot>\n"); 
      painCave.isFatal = 1; 
      simError(); 
    } 
    
    //read frameData
    readFrameProperties(inputStream);

    //read StuntDoubles
    readStuntDoubles(inputStream);     

    inputStream.getline(buffer, bufferSize);
    line = buffer;
    if (line.find("</Snapshot>") == std::string::npos) {
      sprintf(painCave.errMsg, 
              "DumpReader Error: can not find </Snapshot>\n"); 
      painCave.isFatal = 1; 
      simError(); 
    }        
   
  } 
   
  void DumpReader::parseDumpLine(const std::string& line) { 

       
    StringTokenizer tokenizer(line); 
    int nTokens; 
     
    nTokens = tokenizer.countTokens(); 
     
    if (nTokens < 2) { 
      sprintf(painCave.errMsg, 
              "DumpReader Error: Not enough Tokens.\n%s\n", line.c_str()); 
      painCave.isFatal = 1; 
      simError(); 
    } 

    int index = tokenizer.nextTokenAsInt();
 
    StuntDouble* integrableObject = info_->getIOIndexToIntegrableObject(index);

    if (integrableObject == NULL) {
      return;
    }
    std::string type = tokenizer.nextToken(); 
    int size = type.size();

    for(int i = 0; i < size; ++i) {
      switch(type[i]) {
        
        case 'p': {
            Vector3d pos;
            pos[0] = tokenizer.nextTokenAsDouble(); 
            pos[1] = tokenizer.nextTokenAsDouble(); 
            pos[2] = tokenizer.nextTokenAsDouble(); 
            if (needPos_) { 
              integrableObject->setPos(pos); 
            }             
            break;
        }
        case 'v' : {
            Vector3d vel;
            vel[0] = tokenizer.nextTokenAsDouble(); 
            vel[1] = tokenizer.nextTokenAsDouble(); 
            vel[2] = tokenizer.nextTokenAsDouble(); 
            if (needVel_) { 
              integrableObject->setVel(vel); 
            } 
            break;
        }

        case 'q' : {
           Quat4d q;
           if (integrableObject->isDirectional()) { 
              
             q[0] = tokenizer.nextTokenAsDouble(); 
             q[1] = tokenizer.nextTokenAsDouble(); 
             q[2] = tokenizer.nextTokenAsDouble(); 
             q[3] = tokenizer.nextTokenAsDouble(); 
              
             RealType qlen = q.length(); 
             if (qlen < oopse::epsilon) { //check quaternion is not equal to 0 
                
               sprintf(painCave.errMsg, 
                       "DumpReader Error: initial quaternion error (q0^2 + q1^2 + q2^2 + q3^2) ~ 0\n"); 
               painCave.isFatal = 1; 
               simError(); 
                
             }  
              
             q.normalize(); 
             if (needQuaternion_) {            
               integrableObject->setQ(q); 
             }               
           }            
           break;
        }  
        case 'j' : {
          Vector3d ji;
          if (integrableObject->isDirectional()) {
             ji[0] = tokenizer.nextTokenAsDouble(); 
             ji[1] = tokenizer.nextTokenAsDouble(); 
             ji[2] = tokenizer.nextTokenAsDouble(); 
             if (needAngMom_) { 
               integrableObject->setJ(ji); 
             } 
          }
          break;
        }  
        case 'f': {

          Vector3d force;
          force[0] = tokenizer.nextTokenAsDouble(); 
          force[1] = tokenizer.nextTokenAsDouble(); 
          force[2] = tokenizer.nextTokenAsDouble();           
          integrableObject->setFrc(force); 
          break;
        }
        case 't' : {

           Vector3d torque;
           torque[0] = tokenizer.nextTokenAsDouble(); 
           torque[1] = tokenizer.nextTokenAsDouble(); 
           torque[2] = tokenizer.nextTokenAsDouble();           
           integrableObject->setTrq(torque);          
           break;
        }
        default: {
               sprintf(painCave.errMsg, 
                       "DumpReader Error: %s is an unrecognized type\n", type.c_str()); 
               painCave.isFatal = 1; 
               simError(); 
          break;   
        }

      }
    }
     
  } 
   

  void  DumpReader::readStuntDoubles(std::istream& inputStream) {

    inputStream.getline(buffer, bufferSize);
    std::string line(buffer);
    
    if (line.find("<StuntDoubles>") == std::string::npos) {
      sprintf(painCave.errMsg, 
              "DumpReader Error: Missing <StuntDoubles>\n"); 
      painCave.isFatal = 1; 
      simError(); 
    }

    while(inputStream.getline(buffer, bufferSize)) {
      line = buffer;
      
      if(line.find("</StuntDoubles>") != std::string::npos) {
        break;
      }

      parseDumpLine(line);
    }
  
  }

  void DumpReader::readFrameProperties(std::istream& inputStream) {

    Snapshot* s = info_->getSnapshotManager()->getCurrentSnapshot();
    inputStream.getline(buffer, bufferSize);
    std::string line(buffer);

    if (line.find("<FrameData>") == std::string::npos) {
      sprintf(painCave.errMsg, 
              "DumpReader Error: Missing <FrameData>\n"); 
      painCave.isFatal = 1; 
      simError(); 
    }

    while(inputStream.getline(buffer, bufferSize)) {
      line = buffer;
      
      if(line.find("</FrameData>") != std::string::npos) {
        break;
      }
      
      StringTokenizer tokenizer(line, " ;\t\n\r{}:,");
      if (!tokenizer.hasMoreTokens()) {
        sprintf(painCave.errMsg, 
                "DumpReader Error: Not enough Tokens.\n%s\n", line.c_str()); 
        painCave.isFatal = 1; 
        simError();      
      }

      std::string propertyName = tokenizer.nextToken();
      if (propertyName == "Time") {
        RealType currTime = tokenizer.nextTokenAsDouble(); 
        s->setTime(currTime); 
      } else if (propertyName == "Hmat"){
        Mat3x3d hmat;
        hmat(0, 0) = tokenizer.nextTokenAsDouble(); 
        hmat(0, 1) = tokenizer.nextTokenAsDouble(); 
        hmat(0, 2) = tokenizer.nextTokenAsDouble(); 
        hmat(1, 0) = tokenizer.nextTokenAsDouble(); 
        hmat(1, 1) = tokenizer.nextTokenAsDouble(); 
        hmat(1, 2) = tokenizer.nextTokenAsDouble(); 
        hmat(2, 0) = tokenizer.nextTokenAsDouble(); 
        hmat(2, 1) = tokenizer.nextTokenAsDouble(); 
        hmat(2, 2) = tokenizer.nextTokenAsDouble(); 
        s->setHmat(hmat);      
      } else if (propertyName == "Thermostat") {
        RealType chi = tokenizer.nextTokenAsDouble();
        RealType integralOfChiDt = tokenizer.nextTokenAsDouble();
        s->setChi(chi); 
        s->setIntegralOfChiDt(integralOfChiDt);        
     } else if (propertyName == "Barostat") {
        Mat3x3d eta;
        eta(0, 0) = tokenizer.nextTokenAsDouble(); 
        eta(0, 1) = tokenizer.nextTokenAsDouble(); 
        eta(0, 2) = tokenizer.nextTokenAsDouble(); 
        eta(1, 0) = tokenizer.nextTokenAsDouble(); 
        eta(1, 1) = tokenizer.nextTokenAsDouble(); 
        eta(1, 2) = tokenizer.nextTokenAsDouble(); 
        eta(2, 0) = tokenizer.nextTokenAsDouble(); 
        eta(2, 1) = tokenizer.nextTokenAsDouble(); 
        eta(2, 2) = tokenizer.nextTokenAsDouble(); 
        s->setEta(eta); 
      } else {
        sprintf(painCave.errMsg, 
                "DumpReader Error: %s is an invalid property in <FrameData>\n", propertyName.c_str()); 
        painCave.isFatal = 0; 
        simError();         
      }
      
    }

  }

   
}//end namespace oopse 
Revision:	1313
Committed:	Wed Oct 22 20:01:49 2008 UTC (16 years, 6 months ago) by gezelter
File size:	16317 byte(s)
Log Message:	General bug-fixes and other changes to make particle pots work with the Helfand Energy correlation function
#	Content
1	/*
2	* Copyright (c) 2005 The University of Notre Dame. All Rights Reserved.
3	*
4	* The University of Notre Dame grants you ("Licensee") a
5	* non-exclusive, royalty free, license to use, modify and
6	* redistribute this software in source and binary code form, provided
7	* that the following conditions are met:
8	*
9	* 1. Acknowledgement of the program authors must be made in any
10	* publication of scientific results based in part on use of the
11	* program. An acceptable form of acknowledgement is citation of
12	* the article in which the program was described (Matthew
13	* A. Meineke, Charles F. Vardeman II, Teng Lin, Christopher
14	* J. Fennell and J. Daniel Gezelter, "OOPSE: An Object-Oriented
15	* Parallel Simulation Engine for Molecular Dynamics,"
16	* J. Comput. Chem. 26, pp. 252-271 (2005))
17	*
18	* 2. Redistributions of source code must retain the above copyright
19	* notice, this list of conditions and the following disclaimer.
20	*
21	* 3. Redistributions in binary form must reproduce the above copyright
22	* notice, this list of conditions and the following disclaimer in the
23	* documentation and/or other materials provided with the
24	* distribution.
25	*
26	* This software is provided "AS IS," without a warranty of any
27	* kind. All express or implied conditions, representations and
28	* warranties, including any implied warranty of merchantability,
29	* fitness for a particular purpose or non-infringement, are hereby
30	* excluded. The University of Notre Dame and its licensors shall not
31	* be liable for any damages suffered by licensee as a result of
32	* using, modifying or distributing the software or its
33	* derivatives. In no event will the University of Notre Dame or its
34	* licensors be liable for any lost revenue, profit or data, or for
35	* direct, indirect, special, consequential, incidental or punitive
36	* damages, however caused and regardless of the theory of liability,
37	* arising out of the use of or inability to use software, even if the
38	* University of Notre Dame has been advised of the possibility of
39	* such damages.
40	*/
41
42	#define _LARGEFILE_SOURCE64
43	#define _FILE_OFFSET_BITS 64
44
45	#include <sys/types.h>
46	#include <sys/stat.h>
47
48	#include <iostream>
49	#include <math.h>
50
51	#include <stdio.h>
52	#include <stdlib.h>
53	#include <string.h>
54
55	#include "io/DumpReader.hpp"
56	#include "primitives/Molecule.hpp"
57	#include "utils/simError.h"
58	#include "utils/MemoryUtils.hpp"
59	#include "utils/StringTokenizer.hpp"
60
61	#ifdef IS_MPI
62
63	#include <mpi.h>
64	#define TAKE_THIS_TAG_CHAR 0
65	#define TAKE_THIS_TAG_INT 1
66
67	#endif // is_mpi
68
69
70	namespace oopse {
71
72	DumpReader::DumpReader(SimInfo* info, const std::string& filename)
73	: info_(info), filename_(filename), isScanned_(false), nframes_(0), needCOMprops_(false) {
74
75	#ifdef IS_MPI
76
77	if (worldRank == 0) {
78	#endif
79
80	inFile_ = new std::ifstream(filename_.c_str());
81
82	if (inFile_->fail()) {
83	sprintf(painCave.errMsg,
84	"DumpReader: Cannot open file: %s\n",
85	filename_.c_str());
86	painCave.isFatal = 1;
87	simError();
88	}
89
90	#ifdef IS_MPI
91
92	}
93
94	strcpy(checkPointMsg, "Dump file opened for reading successfully.");
95	errorCheckPoint();
96
97	#endif
98
99	return;
100	}
101
102	DumpReader::~DumpReader() {
103
104	#ifdef IS_MPI
105
106	if (worldRank == 0) {
107	#endif
108
109	delete inFile_;
110
111	#ifdef IS_MPI
112
113	}
114
115	strcpy(checkPointMsg, "Dump file closed successfully.");
116	errorCheckPoint();
117
118	#endif
119
120	return;
121	}
122
123	int DumpReader::getNFrames(void) {
124
125	if (!isScanned_)
126	scanFile();
127
128	return nframes_;
129	}
130
131	void DumpReader::scanFile(void) {
132	int lineNo = 0;
133	std::streampos prevPos;
134	std::streampos currPos;
135
136	#ifdef IS_MPI
137
138	if (worldRank == 0) {
139	#endif // is_mpi
140
141	currPos = inFile_->tellg();
142	prevPos = currPos;
143	bool foundOpenSnapshotTag = false;
144	bool foundClosedSnapshotTag = false;
145	while(inFile_->getline(buffer, bufferSize)) {
146	++lineNo;
147
148	std::string line = buffer;
149	currPos = inFile_->tellg();
150	if (line.find("<Snapshot>")!= std::string::npos) {
151	if (foundOpenSnapshotTag) {
152	sprintf(painCave.errMsg,
153	"DumpReader:<Snapshot> is multiply nested at line %d in %s \n", lineNo,
154	filename_.c_str());
155	painCave.isFatal = 1;
156	simError();
157	}
158	foundOpenSnapshotTag = true;
159	foundClosedSnapshotTag = false;
160	framePos_.push_back(prevPos);
161
162	} else if (line.find("</Snapshot>") != std::string::npos){
163	if (!foundOpenSnapshotTag) {
164	sprintf(painCave.errMsg,
165	"DumpReader:</Snapshot> appears before <Snapshot> at line %d in %s \n", lineNo,
166	filename_.c_str());
167	painCave.isFatal = 1;
168	simError();
169	}
170
171	if (foundClosedSnapshotTag) {
172	sprintf(painCave.errMsg,
173	"DumpReader:</Snapshot> appears multiply nested at line %d in %s \n", lineNo,
174	filename_.c_str());
175	painCave.isFatal = 1;
176	simError();
177	}
178	foundClosedSnapshotTag = true;
179	foundOpenSnapshotTag = false;
180	}
181	prevPos = currPos;
182	}
183
184	// only found <Snapshot> for the last frame means the file is corrupted, we should discard
185	// it and give a warning message
186	if (foundOpenSnapshotTag) {
187	sprintf(painCave.errMsg,
188	"DumpReader: last frame in %s is invalid\n", filename_.c_str());
189	painCave.isFatal = 0;
190	simError();
191	framePos_.pop_back();
192	}
193
194	nframes_ = framePos_.size();
195
196	if (nframes_ == 0) {
197	sprintf(painCave.errMsg,
198	"DumpReader: %s does not contain a valid frame\n", filename_.c_str());
199	painCave.isFatal = 1;
200	simError();
201	}
202	#ifdef IS_MPI
203	}
204
205	MPI_Bcast(&nframes_, 1, MPI_INT, 0, MPI_COMM_WORLD);
206
207	#endif // is_mpi
208
209	isScanned_ = true;
210	}
211
212	void DumpReader::readFrame(int whichFrame) {
213	if (!isScanned_)
214	scanFile();
215
216	int storageLayout = info_->getSnapshotManager()->getStorageLayout();
217
218	if (storageLayout & DataStorage::dslPosition) {
219	needPos_ = true;
220	} else {
221	needPos_ = false;
222	}
223
224	if (storageLayout & DataStorage::dslVelocity) {
225	needVel_ = true;
226	} else {
227	needVel_ = false;
228	}
229
230	if (storageLayout & DataStorage::dslAmat \|\| storageLayout & DataStorage::dslElectroFrame) {
231	needQuaternion_ = true;
232	} else {
233	needQuaternion_ = false;
234	}
235
236	if (storageLayout & DataStorage::dslAngularMomentum) {
237	needAngMom_ = true;
238	} else {
239	needAngMom_ = false;
240	}
241
242	readSet(whichFrame);
243
244	if (needCOMprops_) {
245	Snapshot* s = info_->getSnapshotManager()->getCurrentSnapshot();
246	Vector3d com;
247	Vector3d comvel;
248	Vector3d comw;
249	if (needPos_ && needVel_){
250	info_->getComAll(com, comvel);
251	comw = info_->getAngularMomentum();
252	}else{
253	com = info_->getCom();
254	comvel = 0.0;
255	comw = 0.0;
256	}
257	s->setCOMprops(com, comvel, comw);
258	}
259
260	}
261
262	void DumpReader::readSet(int whichFrame) {
263	std::string line;
264
265	#ifndef IS_MPI
266	inFile_->clear();
267	inFile_->seekg(framePos_[whichFrame]);
268
269	std::istream& inputStream = *inFile_;
270
271	#else
272	int masterNode = 0;
273	std::stringstream sstream;
274	if (worldRank == masterNode) {
275	std::string sendBuffer;
276
277	inFile_->clear();
278	inFile_->seekg(framePos_[whichFrame]);
279
280	while (inFile_->getline(buffer, bufferSize)) {
281
282	line = buffer;
283	sendBuffer += line;
284	sendBuffer += '\n';
285	if (line.find("</Snapshot>") != std::string::npos) {
286	break;
287	}
288	}
289
290	int sendBufferSize = sendBuffer.size();
291	MPI_Bcast(&sendBufferSize, 1, MPI_INT, masterNode, MPI_COMM_WORLD);
292	MPI_Bcast((void *)sendBuffer.c_str(), sendBufferSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);
293
294	sstream.str(sendBuffer);
295	} else {
296	int sendBufferSize;
297	MPI_Bcast(&sendBufferSize, 1, MPI_INT, masterNode, MPI_COMM_WORLD);
298	char * recvBuffer = new char[sendBufferSize+1];
299	assert(recvBuffer);
300	recvBuffer[sendBufferSize] = '\0';
301	MPI_Bcast(recvBuffer, sendBufferSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);
302	sstream.str(recvBuffer);
303	delete [] recvBuffer;
304	}
305
306	std::istream& inputStream = sstream;
307	#endif
308
309	inputStream.getline(buffer, bufferSize);
310
311	line = buffer;
312	if (line.find("<Snapshot>") == std::string::npos) {
313	sprintf(painCave.errMsg,
314	"DumpReader Error: can not find <Snapshot>\n");
315	painCave.isFatal = 1;
316	simError();
317	}
318
319	//read frameData
320	readFrameProperties(inputStream);
321
322	//read StuntDoubles
323	readStuntDoubles(inputStream);
324
325	inputStream.getline(buffer, bufferSize);
326	line = buffer;
327	if (line.find("</Snapshot>") == std::string::npos) {
328	sprintf(painCave.errMsg,
329	"DumpReader Error: can not find </Snapshot>\n");
330	painCave.isFatal = 1;
331	simError();
332	}
333
334	}
335
336	void DumpReader::parseDumpLine(const std::string& line) {
337
338
339	StringTokenizer tokenizer(line);
340	int nTokens;
341
342	nTokens = tokenizer.countTokens();
343
344	if (nTokens < 2) {
345	sprintf(painCave.errMsg,
346	"DumpReader Error: Not enough Tokens.\n%s\n", line.c_str());
347	painCave.isFatal = 1;
348	simError();
349	}
350
351	int index = tokenizer.nextTokenAsInt();
352
353	StuntDouble* integrableObject = info_->getIOIndexToIntegrableObject(index);
354
355	if (integrableObject == NULL) {
356	return;
357	}
358	std::string type = tokenizer.nextToken();
359	int size = type.size();
360
361	for(int i = 0; i < size; ++i) {
362	switch(type[i]) {
363
364	case 'p': {
365	Vector3d pos;
366	pos[0] = tokenizer.nextTokenAsDouble();
367	pos[1] = tokenizer.nextTokenAsDouble();
368	pos[2] = tokenizer.nextTokenAsDouble();
369	if (needPos_) {
370	integrableObject->setPos(pos);
371	}
372	break;
373	}
374	case 'v' : {
375	Vector3d vel;
376	vel[0] = tokenizer.nextTokenAsDouble();
377	vel[1] = tokenizer.nextTokenAsDouble();
378	vel[2] = tokenizer.nextTokenAsDouble();
379	if (needVel_) {
380	integrableObject->setVel(vel);
381	}
382	break;
383	}
384
385	case 'q' : {
386	Quat4d q;
387	if (integrableObject->isDirectional()) {
388
389	q[0] = tokenizer.nextTokenAsDouble();
390	q[1] = tokenizer.nextTokenAsDouble();
391	q[2] = tokenizer.nextTokenAsDouble();
392	q[3] = tokenizer.nextTokenAsDouble();
393
394	RealType qlen = q.length();
395	if (qlen < oopse::epsilon) { //check quaternion is not equal to 0
396
397	sprintf(painCave.errMsg,
398	"DumpReader Error: initial quaternion error (q0^2 + q1^2 + q2^2 + q3^2) ~ 0\n");
399	painCave.isFatal = 1;
400	simError();
401
402	}
403
404	q.normalize();
405	if (needQuaternion_) {
406	integrableObject->setQ(q);
407	}
408	}
409	break;
410	}
411	case 'j' : {
412	Vector3d ji;
413	if (integrableObject->isDirectional()) {
414	ji[0] = tokenizer.nextTokenAsDouble();
415	ji[1] = tokenizer.nextTokenAsDouble();
416	ji[2] = tokenizer.nextTokenAsDouble();
417	if (needAngMom_) {
418	integrableObject->setJ(ji);
419	}
420	}
421	break;
422	}
423	case 'f': {
424
425	Vector3d force;
426	force[0] = tokenizer.nextTokenAsDouble();
427	force[1] = tokenizer.nextTokenAsDouble();
428	force[2] = tokenizer.nextTokenAsDouble();
429	integrableObject->setFrc(force);
430	break;
431	}
432	case 't' : {
433
434	Vector3d torque;
435	torque[0] = tokenizer.nextTokenAsDouble();
436	torque[1] = tokenizer.nextTokenAsDouble();
437	torque[2] = tokenizer.nextTokenAsDouble();
438	integrableObject->setTrq(torque);
439	break;
440	}
441	default: {
442	sprintf(painCave.errMsg,
443	"DumpReader Error: %s is an unrecognized type\n", type.c_str());
444	painCave.isFatal = 1;
445	simError();
446	break;
447	}
448
449	}
450	}
451
452	}
453
454
455	void DumpReader::readStuntDoubles(std::istream& inputStream) {
456
457	inputStream.getline(buffer, bufferSize);
458	std::string line(buffer);
459
460	if (line.find("<StuntDoubles>") == std::string::npos) {
461	sprintf(painCave.errMsg,
462	"DumpReader Error: Missing <StuntDoubles>\n");
463	painCave.isFatal = 1;
464	simError();
465	}
466
467	while(inputStream.getline(buffer, bufferSize)) {
468	line = buffer;
469
470	if(line.find("</StuntDoubles>") != std::string::npos) {
471	break;
472	}
473
474	parseDumpLine(line);
475	}
476
477	}
478
479	void DumpReader::readFrameProperties(std::istream& inputStream) {
480
481	Snapshot* s = info_->getSnapshotManager()->getCurrentSnapshot();
482	inputStream.getline(buffer, bufferSize);
483	std::string line(buffer);
484
485	if (line.find("<FrameData>") == std::string::npos) {
486	sprintf(painCave.errMsg,
487	"DumpReader Error: Missing <FrameData>\n");
488	painCave.isFatal = 1;
489	simError();
490	}
491
492	while(inputStream.getline(buffer, bufferSize)) {
493	line = buffer;
494
495	if(line.find("</FrameData>") != std::string::npos) {
496	break;
497	}
498
499	StringTokenizer tokenizer(line, " ;\t\n\r{}:,");
500	if (!tokenizer.hasMoreTokens()) {
501	sprintf(painCave.errMsg,
502	"DumpReader Error: Not enough Tokens.\n%s\n", line.c_str());
503	painCave.isFatal = 1;
504	simError();
505	}
506
507	std::string propertyName = tokenizer.nextToken();
508	if (propertyName == "Time") {
509	RealType currTime = tokenizer.nextTokenAsDouble();
510	s->setTime(currTime);
511	} else if (propertyName == "Hmat"){
512	Mat3x3d hmat;
513	hmat(0, 0) = tokenizer.nextTokenAsDouble();
514	hmat(0, 1) = tokenizer.nextTokenAsDouble();
515	hmat(0, 2) = tokenizer.nextTokenAsDouble();
516	hmat(1, 0) = tokenizer.nextTokenAsDouble();
517	hmat(1, 1) = tokenizer.nextTokenAsDouble();
518	hmat(1, 2) = tokenizer.nextTokenAsDouble();
519	hmat(2, 0) = tokenizer.nextTokenAsDouble();
520	hmat(2, 1) = tokenizer.nextTokenAsDouble();
521	hmat(2, 2) = tokenizer.nextTokenAsDouble();
522	s->setHmat(hmat);
523	} else if (propertyName == "Thermostat") {
524	RealType chi = tokenizer.nextTokenAsDouble();
525	RealType integralOfChiDt = tokenizer.nextTokenAsDouble();
526	s->setChi(chi);
527	s->setIntegralOfChiDt(integralOfChiDt);
528	} else if (propertyName == "Barostat") {
529	Mat3x3d eta;
530	eta(0, 0) = tokenizer.nextTokenAsDouble();
531	eta(0, 1) = tokenizer.nextTokenAsDouble();
532	eta(0, 2) = tokenizer.nextTokenAsDouble();
533	eta(1, 0) = tokenizer.nextTokenAsDouble();
534	eta(1, 1) = tokenizer.nextTokenAsDouble();
535	eta(1, 2) = tokenizer.nextTokenAsDouble();
536	eta(2, 0) = tokenizer.nextTokenAsDouble();
537	eta(2, 1) = tokenizer.nextTokenAsDouble();
538	eta(2, 2) = tokenizer.nextTokenAsDouble();
539	s->setEta(eta);
540	} else {
541	sprintf(painCave.errMsg,
542	"DumpReader Error: %s is an invalid property in <FrameData>\n", propertyName.c_str());
543	painCave.isFatal = 0;
544	simError();
545	}
546
547	}
548
549	}
550
551
552	}//end namespace oopse