| 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).                         | 
| 39 | 
> | 
 * [4]  Kuang & Gezelter,  J. Chem. Phys. 133, 164101 (2010). | 
| 40 | 
> | 
 * [5]  Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011). | 
| 41 | 
  | 
 */ | 
| 42 | 
  | 
  | 
| 43 | 
  | 
#include "io/DumpWriter.hpp" | 
| 44 | 
  | 
#include "primitives/Molecule.hpp" | 
| 45 | 
  | 
#include "utils/simError.h" | 
| 46 | 
  | 
#include "io/basic_teebuf.hpp" | 
| 47 | 
+ | 
#ifdef HAVE_ZLIB | 
| 48 | 
  | 
#include "io/gzstream.hpp" | 
| 49 | 
+ | 
#endif | 
| 50 | 
  | 
#include "io/Globals.hpp" | 
| 51 | 
  | 
 | 
| 52 | 
+ | 
#ifdef _MSC_VER | 
| 53 | 
+ | 
#define isnan(x) _isnan((x)) | 
| 54 | 
+ | 
#define isinf(x) (!_finite(x) && !_isnan(x)) | 
| 55 | 
+ | 
#endif | 
| 56 | 
  | 
 | 
| 57 | 
  | 
#ifdef IS_MPI | 
| 58 | 
  | 
#include <mpi.h> | 
| 59 | 
< | 
#endif //is_mpi | 
| 59 | 
> | 
#endif | 
| 60 | 
  | 
 | 
| 61 | 
  | 
using namespace std; | 
| 62 | 
  | 
namespace OpenMD { | 
| 65 | 
  | 
    : info_(info), filename_(info->getDumpFileName()), eorFilename_(info->getFinalConfigFileName()){ | 
| 66 | 
  | 
 | 
| 67 | 
  | 
    Globals* simParams = info->getSimParams(); | 
| 68 | 
< | 
    needCompression_ = simParams->getCompressDumpFile(); | 
| 69 | 
< | 
    needForceVector_ = simParams->getOutputForceVector(); | 
| 70 | 
< | 
    needParticlePot_ = simParams->getOutputParticlePotential(); | 
| 68 | 
> | 
    needCompression_   = simParams->getCompressDumpFile(); | 
| 69 | 
> | 
    needForceVector_   = simParams->getOutputForceVector(); | 
| 70 | 
> | 
    needParticlePot_   = simParams->getOutputParticlePotential(); | 
| 71 | 
> | 
    needFlucQ_         = simParams->getOutputFluctuatingCharges(); | 
| 72 | 
> | 
    needElectricField_ = simParams->getOutputElectricField(); | 
| 73 | 
> | 
 | 
| 74 | 
> | 
    if (needParticlePot_ || needFlucQ_ || needElectricField_) { | 
| 75 | 
> | 
      doSiteData_ = true; | 
| 76 | 
> | 
    } else { | 
| 77 | 
> | 
      doSiteData_ = false; | 
| 78 | 
> | 
    } | 
| 79 | 
> | 
 | 
| 80 | 
  | 
    createDumpFile_ = true; | 
| 81 | 
  | 
#ifdef HAVE_LIBZ | 
| 82 | 
  | 
    if (needCompression_) { | 
| 114 | 
  | 
    Globals* simParams = info->getSimParams(); | 
| 115 | 
  | 
    eorFilename_ = filename_.substr(0, filename_.rfind(".")) + ".eor";     | 
| 116 | 
  | 
 | 
| 117 | 
< | 
    needCompression_ = simParams->getCompressDumpFile(); | 
| 118 | 
< | 
    needForceVector_ = simParams->getOutputForceVector(); | 
| 117 | 
> | 
    needCompression_   = simParams->getCompressDumpFile(); | 
| 118 | 
> | 
    needForceVector_   = simParams->getOutputForceVector(); | 
| 119 | 
> | 
    needParticlePot_   = simParams->getOutputParticlePotential(); | 
| 120 | 
> | 
    needFlucQ_         = simParams->getOutputFluctuatingCharges(); | 
| 121 | 
> | 
    needElectricField_ = simParams->getOutputElectricField(); | 
| 122 | 
> | 
 | 
| 123 | 
> | 
    if (needParticlePot_ || needFlucQ_ || needElectricField_) { | 
| 124 | 
> | 
      doSiteData_ = true; | 
| 125 | 
> | 
    } else { | 
| 126 | 
> | 
      doSiteData_ = false; | 
| 127 | 
> | 
    } | 
| 128 | 
> | 
 | 
| 129 | 
  | 
    createDumpFile_ = true; | 
| 130 | 
  | 
#ifdef HAVE_LIBZ | 
| 131 | 
  | 
    if (needCompression_) { | 
| 163 | 
  | 
    Globals* simParams = info->getSimParams(); | 
| 164 | 
  | 
    eorFilename_ = filename_.substr(0, filename_.rfind(".")) + ".eor";     | 
| 165 | 
  | 
     | 
| 166 | 
< | 
    needCompression_ = simParams->getCompressDumpFile(); | 
| 167 | 
< | 
    needForceVector_ = simParams->getOutputForceVector(); | 
| 168 | 
< | 
    needParticlePot_ = simParams->getOutputParticlePotential(); | 
| 169 | 
< | 
     | 
| 166 | 
> | 
    needCompression_   = simParams->getCompressDumpFile(); | 
| 167 | 
> | 
    needForceVector_   = simParams->getOutputForceVector(); | 
| 168 | 
> | 
    needParticlePot_   = simParams->getOutputParticlePotential(); | 
| 169 | 
> | 
    needFlucQ_         = simParams->getOutputFluctuatingCharges(); | 
| 170 | 
> | 
    needElectricField_ = simParams->getOutputElectricField(); | 
| 171 | 
> | 
 | 
| 172 | 
> | 
    if (needParticlePot_ || needFlucQ_ || needElectricField_) { | 
| 173 | 
> | 
      doSiteData_ = true; | 
| 174 | 
> | 
    } else { | 
| 175 | 
> | 
      doSiteData_ = false; | 
| 176 | 
> | 
    } | 
| 177 | 
> | 
 | 
| 178 | 
  | 
#ifdef HAVE_LIBZ | 
| 179 | 
  | 
    if (needCompression_) { | 
| 180 | 
  | 
      filename_ += ".gz"; | 
| 263 | 
  | 
            hmat(0, 2), hmat(1, 2), hmat(2, 2)); | 
| 264 | 
  | 
    os << buffer; | 
| 265 | 
  | 
 | 
| 266 | 
< | 
    RealType chi = s->getChi(); | 
| 267 | 
< | 
    RealType integralOfChiDt = s->getIntegralOfChiDt(); | 
| 268 | 
< | 
    if (isinf(chi) || isnan(chi) ||  | 
| 269 | 
< | 
        isinf(integralOfChiDt) || isnan(integralOfChiDt)) {       | 
| 266 | 
> | 
    pair<RealType, RealType> thermostat = s->getThermostat(); | 
| 267 | 
> | 
 | 
| 268 | 
> | 
    if (isinf(thermostat.first)  || isnan(thermostat.first) ||  | 
| 269 | 
> | 
        isinf(thermostat.second) || isnan(thermostat.second)) {       | 
| 270 | 
  | 
      sprintf( painCave.errMsg, | 
| 271 | 
  | 
               "DumpWriter detected a numerical error writing the thermostat"); | 
| 272 | 
  | 
      painCave.isFatal = 1; | 
| 273 | 
  | 
      simError(); | 
| 274 | 
  | 
    } | 
| 275 | 
< | 
    sprintf(buffer, "  Thermostat: %.10g , %.10g\n", chi, integralOfChiDt); | 
| 275 | 
> | 
    sprintf(buffer, "  Thermostat: %.10g , %.10g\n", thermostat.first,  | 
| 276 | 
> | 
            thermostat.second); | 
| 277 | 
  | 
    os << buffer; | 
| 278 | 
  | 
 | 
| 279 | 
  | 
    Mat3x3d eta; | 
| 280 | 
< | 
    eta = s->getEta(); | 
| 280 | 
> | 
    eta = s->getBarostat(); | 
| 281 | 
  | 
 | 
| 282 | 
  | 
    for (unsigned int i = 0; i < 3; i++) { | 
| 283 | 
  | 
      for (unsigned int j = 0; j < 3; j++) { | 
| 309 | 
  | 
    StuntDouble* integrableObject; | 
| 310 | 
  | 
    SimInfo::MoleculeIterator mi; | 
| 311 | 
  | 
    Molecule::IntegrableObjectIterator ii; | 
| 312 | 
+ | 
    RigidBody::AtomIterator ai; | 
| 313 | 
+ | 
    Atom* atom; | 
| 314 | 
  | 
 | 
| 315 | 
  | 
#ifndef IS_MPI | 
| 316 | 
  | 
    os << "  <Snapshot>\n"; | 
| 328 | 
  | 
      } | 
| 329 | 
  | 
    }     | 
| 330 | 
  | 
    os << "    </StuntDoubles>\n"; | 
| 331 | 
< | 
     | 
| 331 | 
> | 
 | 
| 332 | 
> | 
    if (doSiteData_) { | 
| 333 | 
> | 
      os << "    <SiteData>\n"; | 
| 334 | 
> | 
      for (mol = info_->beginMolecule(mi); mol != NULL; mol = info_->nextMolecule(mi)) { | 
| 335 | 
> | 
                | 
| 336 | 
> | 
        for (integrableObject = mol->beginIntegrableObject(ii); integrableObject != NULL;   | 
| 337 | 
> | 
           integrableObject = mol->nextIntegrableObject(ii)) {   | 
| 338 | 
> | 
 | 
| 339 | 
> | 
          int ioIndex = integrableObject->getGlobalIntegrableObjectIndex(); | 
| 340 | 
> | 
          // do one for the IO itself | 
| 341 | 
> | 
          os << prepareSiteLine(integrableObject, ioIndex, 0); | 
| 342 | 
> | 
 | 
| 343 | 
> | 
          if (integrableObject->isRigidBody()) { | 
| 344 | 
> | 
             | 
| 345 | 
> | 
            RigidBody* rb = static_cast<RigidBody*>(integrableObject); | 
| 346 | 
> | 
            int siteIndex = 0; | 
| 347 | 
> | 
            for (atom = rb->beginAtom(ai); atom != NULL;   | 
| 348 | 
> | 
                 atom = rb->nextAtom(ai)) {                                              | 
| 349 | 
> | 
              os << prepareSiteLine(atom, ioIndex, siteIndex); | 
| 350 | 
> | 
              siteIndex++; | 
| 351 | 
> | 
            } | 
| 352 | 
> | 
          } | 
| 353 | 
> | 
        } | 
| 354 | 
> | 
      }     | 
| 355 | 
> | 
      os << "    </SiteData>\n"; | 
| 356 | 
> | 
    } | 
| 357 | 
  | 
    os << "  </Snapshot>\n"; | 
| 358 | 
  | 
 | 
| 359 | 
  | 
    os.flush(); | 
| 490 | 
  | 
 | 
| 491 | 
  | 
    if (needForceVector_) { | 
| 492 | 
  | 
      type += "f"; | 
| 493 | 
< | 
      Vector3d frc; | 
| 432 | 
< | 
 | 
| 433 | 
< | 
      frc = integrableObject->getFrc(); | 
| 434 | 
< | 
 | 
| 493 | 
> | 
      Vector3d frc = integrableObject->getFrc(); | 
| 494 | 
  | 
      if (isinf(frc[0]) || isnan(frc[0]) ||  | 
| 495 | 
  | 
          isinf(frc[1]) || isnan(frc[1]) ||  | 
| 496 | 
  | 
          isinf(frc[2]) || isnan(frc[2]) ) {       | 
| 506 | 
  | 
       | 
| 507 | 
  | 
      if (integrableObject->isDirectional()) { | 
| 508 | 
  | 
        type += "t"; | 
| 509 | 
< | 
        Vector3d trq; | 
| 451 | 
< | 
         | 
| 452 | 
< | 
        trq = integrableObject->getTrq(); | 
| 453 | 
< | 
         | 
| 509 | 
> | 
        Vector3d trq = integrableObject->getTrq();         | 
| 510 | 
  | 
        if (isinf(trq[0]) || isnan(trq[0]) ||  | 
| 511 | 
  | 
            isinf(trq[1]) || isnan(trq[1]) ||  | 
| 512 | 
  | 
            isinf(trq[2]) || isnan(trq[2]) ) {       | 
| 515 | 
  | 
                   " for object %d", index);       | 
| 516 | 
  | 
          painCave.isFatal = 1; | 
| 517 | 
  | 
          simError(); | 
| 518 | 
< | 
        } | 
| 463 | 
< | 
         | 
| 518 | 
> | 
        }         | 
| 519 | 
  | 
        sprintf(tempBuffer, " %13e %13e %13e", | 
| 520 | 
  | 
                trq[0], trq[1], trq[2]); | 
| 521 | 
  | 
        line += tempBuffer; | 
| 522 | 
  | 
      }       | 
| 523 | 
  | 
    } | 
| 469 | 
– | 
    if (needParticlePot_) { | 
| 470 | 
– | 
      type += "u"; | 
| 471 | 
– | 
      RealType particlePot; | 
| 524 | 
  | 
 | 
| 525 | 
< | 
      particlePot = integrableObject->getParticlePot(); | 
| 525 | 
> | 
    sprintf(tempBuffer, "%10d %7s %s\n", index, type.c_str(), line.c_str()); | 
| 526 | 
> | 
    return std::string(tempBuffer); | 
| 527 | 
> | 
  } | 
| 528 | 
  | 
 | 
| 529 | 
+ | 
  std::string DumpWriter::prepareSiteLine(StuntDouble* integrableObject, int ioIndex, int siteIndex) { | 
| 530 | 
+ | 
         | 
| 531 | 
+ | 
 | 
| 532 | 
+ | 
    std::string id; | 
| 533 | 
+ | 
    std::string type; | 
| 534 | 
+ | 
    std::string line; | 
| 535 | 
+ | 
    char tempBuffer[4096]; | 
| 536 | 
+ | 
 | 
| 537 | 
+ | 
    if (integrableObject->isRigidBody()) { | 
| 538 | 
+ | 
      sprintf(tempBuffer, "%10d           ", ioIndex); | 
| 539 | 
+ | 
      id = std::string(tempBuffer); | 
| 540 | 
+ | 
    } else { | 
| 541 | 
+ | 
      sprintf(tempBuffer, "%10d %10d", ioIndex, siteIndex); | 
| 542 | 
+ | 
      id = std::string(tempBuffer); | 
| 543 | 
+ | 
    } | 
| 544 | 
+ | 
               | 
| 545 | 
+ | 
    if (needFlucQ_) { | 
| 546 | 
+ | 
      type += "cw"; | 
| 547 | 
+ | 
      RealType fqPos = integrableObject->getFlucQPos(); | 
| 548 | 
+ | 
      if (isinf(fqPos) || isnan(fqPos) ) {       | 
| 549 | 
+ | 
        sprintf( painCave.errMsg, | 
| 550 | 
+ | 
                 "DumpWriter detected a numerical error writing the" | 
| 551 | 
+ | 
                 " fluctuating charge for object %s", id.c_str());       | 
| 552 | 
+ | 
        painCave.isFatal = 1; | 
| 553 | 
+ | 
        simError(); | 
| 554 | 
+ | 
      } | 
| 555 | 
+ | 
      sprintf(tempBuffer, " %13e ", fqPos); | 
| 556 | 
+ | 
      line += tempBuffer; | 
| 557 | 
+ | 
     | 
| 558 | 
+ | 
      RealType fqVel = integrableObject->getFlucQVel(); | 
| 559 | 
+ | 
      if (isinf(fqVel) || isnan(fqVel) ) {       | 
| 560 | 
+ | 
        sprintf( painCave.errMsg, | 
| 561 | 
+ | 
                 "DumpWriter detected a numerical error writing the" | 
| 562 | 
+ | 
                 " fluctuating charge velocity for object %s", id.c_str());       | 
| 563 | 
+ | 
        painCave.isFatal = 1; | 
| 564 | 
+ | 
        simError(); | 
| 565 | 
+ | 
      } | 
| 566 | 
+ | 
      sprintf(tempBuffer, " %13e ", fqVel); | 
| 567 | 
+ | 
      line += tempBuffer; | 
| 568 | 
+ | 
 | 
| 569 | 
+ | 
      if (needForceVector_) { | 
| 570 | 
+ | 
        type += "g"; | 
| 571 | 
+ | 
        RealType fqFrc = integrableObject->getFlucQFrc();         | 
| 572 | 
+ | 
        if (isinf(fqFrc) || isnan(fqFrc) ) {       | 
| 573 | 
+ | 
          sprintf( painCave.errMsg, | 
| 574 | 
+ | 
                   "DumpWriter detected a numerical error writing the" | 
| 575 | 
+ | 
                   " fluctuating charge force for object %s", id.c_str());       | 
| 576 | 
+ | 
          painCave.isFatal = 1; | 
| 577 | 
+ | 
          simError(); | 
| 578 | 
+ | 
        } | 
| 579 | 
+ | 
        sprintf(tempBuffer, " %13e ", fqFrc);         | 
| 580 | 
+ | 
        line += tempBuffer; | 
| 581 | 
+ | 
      } | 
| 582 | 
+ | 
    } | 
| 583 | 
+ | 
 | 
| 584 | 
+ | 
    if (needElectricField_) { | 
| 585 | 
+ | 
      type += "e"; | 
| 586 | 
+ | 
      Vector3d eField= integrableObject->getElectricField(); | 
| 587 | 
+ | 
      if (isinf(eField[0]) || isnan(eField[0]) ||  | 
| 588 | 
+ | 
          isinf(eField[1]) || isnan(eField[1]) ||  | 
| 589 | 
+ | 
          isinf(eField[2]) || isnan(eField[2]) ) {       | 
| 590 | 
+ | 
        sprintf( painCave.errMsg, | 
| 591 | 
+ | 
                 "DumpWriter detected a numerical error writing the electric" | 
| 592 | 
+ | 
                 " field for object %s", id.c_str());       | 
| 593 | 
+ | 
        painCave.isFatal = 1; | 
| 594 | 
+ | 
        simError(); | 
| 595 | 
+ | 
      } | 
| 596 | 
+ | 
      sprintf(tempBuffer, " %13e %13e %13e", | 
| 597 | 
+ | 
              eField[0], eField[1], eField[2]); | 
| 598 | 
+ | 
      line += tempBuffer; | 
| 599 | 
+ | 
    } | 
| 600 | 
+ | 
 | 
| 601 | 
+ | 
 | 
| 602 | 
+ | 
    if (needParticlePot_) { | 
| 603 | 
+ | 
      type += "u"; | 
| 604 | 
+ | 
      RealType particlePot = integrableObject->getParticlePot(); | 
| 605 | 
  | 
      if (isinf(particlePot) || isnan(particlePot)) {       | 
| 606 | 
  | 
        sprintf( painCave.errMsg, | 
| 607 | 
  | 
                 "DumpWriter detected a numerical error writing the particle " | 
| 608 | 
< | 
                 " potential for object %d", index);       | 
| 608 | 
> | 
                 " potential for object %s", id.c_str());       | 
| 609 | 
  | 
        painCave.isFatal = 1; | 
| 610 | 
  | 
        simError(); | 
| 611 | 
  | 
      } | 
| 613 | 
  | 
      line += tempBuffer; | 
| 614 | 
  | 
    } | 
| 615 | 
  | 
     | 
| 616 | 
< | 
    sprintf(tempBuffer, "%10d %7s %s\n", index, type.c_str(), line.c_str()); | 
| 616 | 
> | 
 | 
| 617 | 
> | 
    sprintf(tempBuffer, "%s %7s %s\n", id.c_str(), type.c_str(), line.c_str()); | 
| 618 | 
  | 
    return std::string(tempBuffer); | 
| 619 | 
  | 
  } | 
| 620 | 
  | 
 | 
| 685 | 
  | 
  std::ostream* DumpWriter::createOStream(const std::string& filename) { | 
| 686 | 
  | 
 | 
| 687 | 
  | 
    std::ostream* newOStream; | 
| 688 | 
< | 
#ifdef HAVE_LIBZ  | 
| 688 | 
> | 
#ifdef HAVE_ZLIB | 
| 689 | 
  | 
    if (needCompression_) { | 
| 690 | 
  | 
      newOStream = new ogzstream(filename.c_str()); | 
| 691 | 
  | 
    } else { | 
| 695 | 
  | 
    newOStream = new std::ofstream(filename.c_str()); | 
| 696 | 
  | 
#endif | 
| 697 | 
  | 
    //write out MetaData first | 
| 698 | 
< | 
    (*newOStream) << "<OpenMD version=1>" << std::endl; | 
| 698 | 
> | 
    (*newOStream) << "<OpenMD version=2>" << std::endl; | 
| 699 | 
  | 
    (*newOStream) << "  <MetaData>" << std::endl; | 
| 700 | 
  | 
    (*newOStream) << info_->getRawMetaData(); | 
| 701 | 
  | 
    (*newOStream) << "  </MetaData>" << std::endl; |