src/io/StatWriter.cpp

/*
 * Copyright (c) 2005, 2010 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. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *
 * 2. 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.
 *
 * SUPPORT OPEN SCIENCE!  If you use OpenMD or its source code in your
 * research, please cite the appropriate papers when you publish your
 * work.  Good starting points are:
 *                                                                      
 * [1]  Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).             
 * [2]  Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).          
 * [3]  Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).          
 * [4]  Vardeman & Gezelter, in progress (2009).                        
 */
 
#define _LARGEFILE_SOURCE64
#define _FILE_OFFSET_BITS 64

#include "io/StatWriter.hpp"
#include "utils/simError.h"

namespace OpenMD {
  StatsBitSet parseStatFileFormat(const std::string& format) {
    StringTokenizer tokenizer(format, " ,;|\t\n\r");
    StatsBitSet mask;
    while(tokenizer.hasMoreTokens()) {
        std::string token(tokenizer.nextToken());
        toUpper(token);
        Stats::StatsMapType::iterator i = Stats::statsMap.find(token);
        if (i != Stats::statsMap.end()) {
            mask.set(i->second);
        } else {
          sprintf( painCave.errMsg,
                       "%s is not a valid statFileFormat keyword.\n", token.c_str() );
          painCave.isFatal = 0;
          painCave.severity = OPENMD_ERROR;
          simError();            
        }
    }
    
    return mask;
  }
  
  StatWriter::StatWriter( const std::string& filename, const StatsBitSet& mask) : mask_(mask){

#ifdef IS_MPI
    if(worldRank == 0 ){
#endif // is_mpi

      statfile_.open(filename.c_str(), std::ios::out | std::ios::trunc );
    
      if( !statfile_ ){
      
        sprintf( painCave.errMsg,
                 "Could not open \"%s\" for stat output.\n",
                 filename.c_str());
        painCave.isFatal = 1;
        simError();
      }

      writeTitle();
    
#ifdef IS_MPI
    }

    sprintf( checkPointMsg,
             "Sucessfully opened output file for stating.\n");
    errorCheckPoint();
#endif // is_mpi

  }

  StatWriter::~StatWriter( ){

#ifdef IS_MPI
    if(worldRank == 0 ){
#endif // is_mpi

      statfile_.close();

#ifdef IS_MPI
    }
#endif // is_mpi
  }

  void StatWriter::writeTitle() {


#ifdef IS_MPI
    if(worldRank == 0 ){
#endif // is_mpi

      //write title
      statfile_ << "#";
      for (int i =0; i < mask_.size(); ++i) {
        if (mask_[i]) {
          statfile_ << "\t" << Stats::getTitle(i) << "(" << Stats::getUnits(i) << ")";
        }
      }
      statfile_ << std::endl;

#ifdef IS_MPI
    }
#endif // is_mpi    
  }

  void StatWriter::writeStat(const Stats& s){

#ifdef IS_MPI
    if(worldRank == 0 ){
#endif // is_mpi

      statfile_.precision(8);
      for (int i =0; i < mask_.size(); ++i) {
        if (mask_[i]) {
          if (! std::isinf(s[i]) && ! std::isnan(s[i])){
              statfile_ << "\t" << s[i];
          }
          else{
            sprintf( painCave.errMsg,
                     "Statwriter detected a numerical error writing: %s ",
                     Stats::getTitle(i).c_str());
            painCave.isFatal = 1;
            simError();
          }
          
        }
      }
      statfile_ << std::endl;

      statfile_.flush();

#ifdef IS_MPI
    }
    errorCheckPoint();
#endif // is_mpi
  }

}
Revision:	1436
Committed:	Tue Apr 20 19:59:45 2010 UTC (15 years, 6 months ago) by chuckv
Original Path:	*trunk/src/io/StatWriter.cpp*
File size:	4749 byte(s)
Log Message:	Addad a check for inf and nan to statwriter.
#	User	Rev	Content
1	gezelter	507	/*
2	chuckv	1436	* Copyright (c) 2005, 2010 The University of Notre Dame. All Rights Reserved.
3	gezelter	246	*
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	gezelter	1390	* 1. Redistributions of source code must retain the above copyright
10	gezelter	246	* notice, this list of conditions and the following disclaimer.
11			*
12	gezelter	1390	* 2. Redistributions in binary form must reproduce the above copyright
13	gezelter	246	* notice, this list of conditions and the following disclaimer in the
14			* documentation and/or other materials provided with the
15			* distribution.
16			*
17			* This software is provided "AS IS," without a warranty of any
18			* kind. All express or implied conditions, representations and
19			* warranties, including any implied warranty of merchantability,
20			* fitness for a particular purpose or non-infringement, are hereby
21			* excluded. The University of Notre Dame and its licensors shall not
22			* be liable for any damages suffered by licensee as a result of
23			* using, modifying or distributing the software or its
24			* derivatives. In no event will the University of Notre Dame or its
25			* licensors be liable for any lost revenue, profit or data, or for
26			* direct, indirect, special, consequential, incidental or punitive
27			* damages, however caused and regardless of the theory of liability,
28			* arising out of the use of or inability to use software, even if the
29			* University of Notre Dame has been advised of the possibility of
30			* such damages.
31	gezelter	1390	*
32			* SUPPORT OPEN SCIENCE! If you use OpenMD or its source code in your
33			* research, please cite the appropriate papers when you publish your
34			* work. Good starting points are:
35			*
36			* [1] Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).
37			* [2] Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).
38			* [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).
39			* [4] Vardeman & Gezelter, in progress (2009).
40	gezelter	246	*/
41
42	gezelter	2	#define _LARGEFILE_SOURCE64
43			#define _FILE_OFFSET_BITS 64
44
45	gezelter	246	#include "io/StatWriter.hpp"
46	tim	3	#include "utils/simError.h"
47	gezelter	2
48	gezelter	1390	namespace OpenMD {
49	tim	681	StatsBitSet parseStatFileFormat(const std::string& format) {
50			StringTokenizer tokenizer(format, " ,;\|\t\n\r");
51			StatsBitSet mask;
52			while(tokenizer.hasMoreTokens()) {
53			std::string token(tokenizer.nextToken());
54			toUpper(token);
55			Stats::StatsMapType::iterator i = Stats::statsMap.find(token);
56			if (i != Stats::statsMap.end()) {
57			mask.set(i->second);
58			} else {
59			sprintf( painCave.errMsg,
60			"%s is not a valid statFileFormat keyword.\n", token.c_str() );
61			painCave.isFatal = 0;
62	gezelter	1390	painCave.severity = OPENMD_ERROR;
63	tim	681	simError();
64			}
65			}
66
67			return mask;
68			}
69
70	gezelter	507	StatWriter::StatWriter( const std::string& filename, const StatsBitSet& mask) : mask_(mask){
71	gezelter	2
72			#ifdef IS_MPI
73	gezelter	507	if(worldRank == 0 ){
74	gezelter	2	#endif // is_mpi
75
76	gezelter	507	statfile_.open(filename.c_str(), std::ios::out \| std::ios::trunc );
77	gezelter	2
78	gezelter	507	if( !statfile_ ){
79	gezelter	2
80	gezelter	507	sprintf( painCave.errMsg,
81			"Could not open \"%s\" for stat output.\n",
82			filename.c_str());
83			painCave.isFatal = 1;
84			simError();
85			}
86	gezelter	2
87	gezelter	507	writeTitle();
88	gezelter	2
89			#ifdef IS_MPI
90	gezelter	507	}
91	gezelter	2
92	gezelter	507	sprintf( checkPointMsg,
93			"Sucessfully opened output file for stating.\n");
94	gezelter	1241	errorCheckPoint();
95	gezelter	2	#endif // is_mpi
96
97	gezelter	507	}
98	gezelter	2
99	gezelter	507	StatWriter::~StatWriter( ){
100	gezelter	2
101			#ifdef IS_MPI
102	gezelter	507	if(worldRank == 0 ){
103	gezelter	2	#endif // is_mpi
104
105	gezelter	507	statfile_.close();
106	gezelter	2
107			#ifdef IS_MPI
108	gezelter	507	}
109			#endif // is_mpi
110	gezelter	2	}
111
112	gezelter	507	void StatWriter::writeTitle() {
113	gezelter	2
114
115	gezelter	246	#ifdef IS_MPI
116			if(worldRank == 0 ){
117			#endif // is_mpi
118	gezelter	2
119	gezelter	507	//write title
120			statfile_ << "#";
121			for (int i =0; i < mask_.size(); ++i) {
122			if (mask_[i]) {
123			statfile_ << "\t" << Stats::getTitle(i) << "(" << Stats::getUnits(i) << ")";
124			}
125			}
126			statfile_ << std::endl;
127	gezelter	246
128	gezelter	2	#ifdef IS_MPI
129	gezelter	507	}
130			#endif // is_mpi
131	gezelter	246	}
132
133	gezelter	507	void StatWriter::writeStat(const Stats& s){
134	gezelter	246
135			#ifdef IS_MPI
136			if(worldRank == 0 ){
137	gezelter	2	#endif // is_mpi
138
139	gezelter	507	statfile_.precision(8);
140			for (int i =0; i < mask_.size(); ++i) {
141			if (mask_[i]) {
142	chuckv	1436	if (! std::isinf(s[i]) && ! std::isnan(s[i])){
143			statfile_ << "\t" << s[i];
144			}
145			else{
146			sprintf( painCave.errMsg,
147			"Statwriter detected a numerical error writing: %s ",
148			Stats::getTitle(i).c_str());
149			painCave.isFatal = 1;
150			simError();
151			}
152
153	gezelter	507	}
154			}
155			statfile_ << std::endl;
156	gezelter	2
157	gezelter	507	statfile_.flush();
158	gezelter	2
159			#ifdef IS_MPI
160	gezelter	246	}
161	chuckv	1436	errorCheckPoint();
162	gezelter	2	#endif // is_mpi
163	gezelter	507	}
164	gezelter	2
165	gezelter	246	}