ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/OpenMD/trunk/src/brains/SimCreator.cpp
(Generate patch)

Comparing trunk/src/brains/SimCreator.cpp (file contents):
Revision 384 by tim, Tue Mar 1 19:11:47 2005 UTC vs.
Revision 1782 by gezelter, Wed Aug 22 02:28:28 2012 UTC

# Line 1 | Line 1
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 < /**
43 < * @file SimCreator.cpp
44 < * @author tlin
45 < * @date 11/03/2004
46 < * @time 13:51am
47 < * @version 1.0
48 < */
49 <
50 < #include <sprng.h>
51 <
52 < #include "brains/MoleculeCreator.hpp"
53 < #include "brains/SimCreator.hpp"
54 < #include "brains/SimSnapshotManager.hpp"
55 < #include "io/DumpReader.hpp"
56 < #include "io/parse_me.h"
57 < #include "UseTheForce/ForceFieldFactory.hpp"
58 < #include "utils/simError.h"
59 < #include "utils/StringUtils.hpp"
60 < #include "math/OOPSERandNumGen.hpp"
61 < #ifdef IS_MPI
62 < #include "io/mpiBASS.h"
63 <
64 < #endif
65 <
66 < namespace oopse {
67 <
68 < void SimCreator::parseFile(const std::string mdFileName,  MakeStamps* stamps, Globals* simParams){
69 <
70 < #ifdef IS_MPI
71 <
72 <    if (worldRank == 0) {
73 < #endif // is_mpi
74 <
75 <        simParams->initalize();
76 <        set_interface_stamps(stamps, simParams);
77 <
78 < #ifdef IS_MPI
79 <
80 <        mpiEventInit();
81 <
82 < #endif
83 <
84 <        yacc_BASS(mdFileName.c_str());
85 <
86 < #ifdef IS_MPI
87 <
88 <        throwMPIEvent(NULL);
89 <    } else {
90 <        set_interface_stamps(stamps, simParams);
91 <        mpiEventInit();
92 <        MPIcheckPoint();
93 <        mpiEventLoop();
94 <    }
95 <
96 < #endif
97 <
98 < }
99 <
100 < SimInfo*  SimCreator::createSim(const std::string & mdFileName, bool loadInitCoords) {
101 <    
102 <    MakeStamps * stamps = new MakeStamps();
103 <
104 <    Globals * simParams = new Globals();
105 <
106 <    //parse meta-data file
107 <    parseFile(mdFileName, stamps, simParams);
108 <
109 <    //create the force field
110 <    ForceField * ff = ForceFieldFactory::getInstance()->createForceField(
111 <                          simParams->getForceField());
112 <    
113 <    if (ff == NULL) {
114 <        sprintf(painCave.errMsg, "ForceField Factory can not create %s force field\n",
115 <                simParams->getForceField());
116 <        painCave.isFatal = 1;
117 <        simError();
118 <    }
119 <
120 <    if (simParams->haveForceFieldFileName()) {
121 <        ff->setForceFieldFileName(simParams->getForceFieldFileName());
122 <    }
123 <    
124 <    std::string forcefieldFileName;
125 <    forcefieldFileName = ff->getForceFieldFileName();
126 <
127 <    if (simParams->haveForceFieldVariant()) {
128 <        //If the force field has variant, the variant force field name will be
129 <        //Base.variant.frc. For exampel EAM.u6.frc
130 <        
131 <        std::string variant = simParams->getForceFieldVariant();
132 <
133 <        std::string::size_type pos = forcefieldFileName.rfind(".frc");
134 <        variant = "." + variant;
135 <        if (pos != std::string::npos) {
136 <            forcefieldFileName.insert(pos, variant);
137 <        } else {
138 <            //If the default force field file name does not containt .frc suffix, just append the .variant
139 <            forcefieldFileName.append(variant);
140 <        }
141 <    }
142 <    
143 <    ff->parse(forcefieldFileName);
144 <    
145 <    //extract the molecule stamps
146 <    std::vector < std::pair<MoleculeStamp *, int> > moleculeStampPairs;
147 <    compList(stamps, simParams, moleculeStampPairs);
148 <
149 <    //create SimInfo
150 <    SimInfo * info = new SimInfo(moleculeStampPairs, ff, simParams);
151 <
152 <    //gather parameters (SimCreator only retrieves part of the parameters)
153 <    gatherParameters(info, mdFileName);
154 <
155 <    //divide the molecules and determine the global index of molecules
156 < #ifdef IS_MPI
157 <    divideMolecules(info);
158 < #endif
159 <
160 <    //create the molecules
161 <    createMolecules(info);
162 <
163 <
164 <    //allocate memory for DataStorage(circular reference, need to break it)
165 <    info->setSnapshotManager(new SimSnapshotManager(info));
166 <    
167 <    //set the global index of atoms, rigidbodies and cutoffgroups (only need to be set once, the
168 <    //global index will never change again). Local indices of atoms and rigidbodies are already set by
169 <    //MoleculeCreator class which actually delegates the responsibility to LocalIndexManager.
170 <    setGlobalIndex(info);
171 <
172 <    //Alought addExculdePairs is called inside SimInfo's addMolecule method, at that point
173 <    //atoms don't have the global index yet  (their global index are all initialized to -1).
174 <    //Therefore we have to call addExcludePairs explicitly here. A way to work around is that
175 <    //we can determine the beginning global indices of atoms before they get created.
176 <    SimInfo::MoleculeIterator mi;
177 <    Molecule* mol;
178 <    for (mol= info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
179 <        info->addExcludePairs(mol);
180 <    }
181 <    
182 <
183 <    //load initial coordinates, some extra information are pushed into SimInfo's property map ( such as
184 <    //eta, chi for NPT integrator)
185 <    if (loadInitCoords)
186 <        loadCoordinates(info);    
187 <    
188 <    return info;
189 < }
190 <
191 < void SimCreator::gatherParameters(SimInfo *info, const std::string& mdfile) {
192 <
193 <    //figure out the ouput file names
194 <    std::string prefix;
195 <
196 < #ifdef IS_MPI
197 <
198 <    if (worldRank == 0) {
199 < #endif // is_mpi
200 <        Globals * simParams = info->getSimParams();
201 <        if (simParams->haveFinalConfig()) {
202 <            prefix = getPrefix(simParams->getFinalConfig());
203 <        } else {
204 <            prefix = getPrefix(mdfile);
205 <        }
206 <
207 <        info->setFinalConfigFileName(prefix + ".eor");
208 <        info->setDumpFileName(prefix + ".dump");
209 <        info->setStatFileName(prefix + ".stat");
210 <
211 < #ifdef IS_MPI
212 <
213 <    }
214 <
215 < #endif
216 <
217 < }
218 <
219 < #ifdef IS_MPI
220 < void SimCreator::divideMolecules(SimInfo *info) {
221 <    double numerator;
222 <    double denominator;
223 <    double precast;
224 <    double x;
225 <    double y;
226 <    double a;
227 <    int old_atoms;
228 <    int add_atoms;
229 <    int new_atoms;
230 <    int nTarget;
231 <    int done;
232 <    int i;
233 <    int j;
234 <    int loops;
235 <    int which_proc;
236 <    int nProcessors;
237 <    std::vector<int> atomsPerProc;
238 <    int nGlobalMols = info->getNGlobalMolecules();
239 <    std::vector<int> molToProcMap(nGlobalMols, -1); // default to an error condition:
240 <    
241 <    MPI_Comm_size(MPI_COMM_WORLD, &nProcessors);
242 <
243 <    if (nProcessors > nGlobalMols) {
244 <        sprintf(painCave.errMsg,
245 <                "nProcessors (%d) > nMol (%d)\n"
246 <                    "\tThe number of processors is larger than\n"
247 <                    "\tthe number of molecules.  This will not result in a \n"
248 <                    "\tusable division of atoms for force decomposition.\n"
249 <                    "\tEither try a smaller number of processors, or run the\n"
250 <                    "\tsingle-processor version of OOPSE.\n", nProcessors, nGlobalMols);
251 <
252 <        painCave.isFatal = 1;
253 <        simError();
254 <    }
255 <
256 <    int seedValue;
257 <    Globals * simParams = info->getSimParams();
258 <    OOPSERandNumGen* myRandom;
259 <    if (simParams->haveSeed()) {
260 <        seedValue = simParams->getSeed();
261 <        myRandom = new OOPSERandNumGen(seedValue);
262 <    }else {
263 <        myRandom = new OOPSERandNumGen();
264 <    }  
265 <
266 <
267 <    a = 3.0 * nGlobalMols / info->getNGlobalAtoms();
268 <
269 <    //initialize atomsPerProc
270 <    atomsPerProc.insert(atomsPerProc.end(), nProcessors, 0);
271 <
272 <    if (worldRank == 0) {
273 <        numerator = info->getNGlobalAtoms();
274 <        denominator = nProcessors;
275 <        precast = numerator / denominator;
276 <        nTarget = (int)(precast + 0.5);
277 <
278 <        for(i = 0; i < nGlobalMols; i++) {
279 <            done = 0;
280 <            loops = 0;
281 <
282 <            while (!done) {
283 <                loops++;
284 <
285 <                // Pick a processor at random
286 <
287 <                which_proc = (int) (myRandom->rand() * nProcessors);
288 <
289 <                //get the molecule stamp first
290 <                int stampId = info->getMoleculeStampId(i);
291 <                MoleculeStamp * moleculeStamp = info->getMoleculeStamp(stampId);
292 <
293 <                // How many atoms does this processor have so far?
294 <                old_atoms = atomsPerProc[which_proc];
295 <                add_atoms = moleculeStamp->getNAtoms();
296 <                new_atoms = old_atoms + add_atoms;
297 <
298 <                // If we've been through this loop too many times, we need
299 <                // to just give up and assign the molecule to this processor
300 <                // and be done with it.
301 <
302 <                if (loops > 100) {
303 <                    sprintf(painCave.errMsg,
304 <                            "I've tried 100 times to assign molecule %d to a "
305 <                                " processor, but can't find a good spot.\n"
306 <                                "I'm assigning it at random to processor %d.\n",
307 <                            i, which_proc);
308 <
309 <                    painCave.isFatal = 0;
310 <                    simError();
311 <
312 <                    molToProcMap[i] = which_proc;
313 <                    atomsPerProc[which_proc] += add_atoms;
314 <
315 <                    done = 1;
316 <                    continue;
317 <                }
318 <
319 <                // If we can add this molecule to this processor without sending
320 <                // it above nTarget, then go ahead and do it:
321 <
322 <                if (new_atoms <= nTarget) {
323 <                    molToProcMap[i] = which_proc;
324 <                    atomsPerProc[which_proc] += add_atoms;
325 <
326 <                    done = 1;
327 <                    continue;
328 <                }
329 <
330 <                // The only situation left is when new_atoms > nTarget.  We
331 <                // want to accept this with some probability that dies off the
332 <                // farther we are from nTarget
333 <
334 <                // roughly:  x = new_atoms - nTarget
335 <                //           Pacc(x) = exp(- a * x)
336 <                // where a = penalty / (average atoms per molecule)
337 <
338 <                x = (double)(new_atoms - nTarget);
339 <                y = myRandom->rand();
340 <
341 <                if (y < exp(- a * x)) {
342 <                    molToProcMap[i] = which_proc;
343 <                    atomsPerProc[which_proc] += add_atoms;
344 <
345 <                    done = 1;
346 <                    continue;
347 <                } else {
348 <                    continue;
349 <                }
350 <            }
351 <        }
352 <
353 <        delete myRandom;
354 <        
355 <        // Spray out this nonsense to all other processors:
356 <
357 <        MPI_Bcast(&molToProcMap[0], nGlobalMols, MPI_INT, 0, MPI_COMM_WORLD);
358 <    } else {
359 <
360 <        // Listen to your marching orders from processor 0:
361 <
362 <        MPI_Bcast(&molToProcMap[0], nGlobalMols, MPI_INT, 0, MPI_COMM_WORLD);
363 <    }
364 <
365 <    info->setMolToProcMap(molToProcMap);
366 <    sprintf(checkPointMsg,
367 <            "Successfully divided the molecules among the processors.\n");
368 <    MPIcheckPoint();
369 < }
370 <
371 < #endif
372 <
373 < void SimCreator::createMolecules(SimInfo *info) {
374 <    MoleculeCreator molCreator;
375 <    int stampId;
376 <
377 <    for(int i = 0; i < info->getNGlobalMolecules(); i++) {
378 <
379 < #ifdef IS_MPI
380 <
381 <        if (info->getMolToProc(i) == worldRank) {
382 < #endif
383 <
384 <            stampId = info->getMoleculeStampId(i);
385 <            Molecule * mol = molCreator.createMolecule(info->getForceField(), info->getMoleculeStamp(stampId),
386 <                                                                                    stampId, i, info->getLocalIndexManager());
387 <
388 <            info->addMolecule(mol);
389 <
390 < #ifdef IS_MPI
391 <
392 <        }
393 <
394 < #endif
395 <
396 <    } //end for(int i=0)  
397 < }
398 <
399 < void SimCreator::compList(MakeStamps *stamps, Globals* simParams,
400 <                        std::vector < std::pair<MoleculeStamp *, int> > &moleculeStampPairs) {
401 <    int i;
402 <    char * id;
403 <    MoleculeStamp * currentStamp;
404 <    Component** the_components = simParams->getComponents();
405 <    int n_components = simParams->getNComponents();
406 <
407 <    if (!simParams->haveNMol()) {
408 <        // we don't have the total number of molecules, so we assume it is
409 <        // given in each component
410 <
411 <        for(i = 0; i < n_components; i++) {
412 <            if (!the_components[i]->haveNMol()) {
413 <                // we have a problem
414 <                sprintf(painCave.errMsg,
415 <                        "SimCreator Error. No global NMol or component NMol given.\n"
416 <                            "\tCannot calculate the number of atoms.\n");
417 <
418 <                painCave.isFatal = 1;
419 <                simError();
420 <            }
421 <
422 <            id = the_components[i]->getType();
423 <            currentStamp = (stamps->extractMolStamp(id))->getStamp();
424 <
425 <            if (currentStamp == NULL) {
426 <                sprintf(painCave.errMsg,
427 <                        "SimCreator error: Component \"%s\" was not found in the "
428 <                            "list of declared molecules\n", id);
429 <
430 <                painCave.isFatal = 1;
431 <                simError();
432 <            }
433 <
434 <            moleculeStampPairs.push_back(
435 <                std::make_pair(currentStamp, the_components[i]->getNMol()));
436 <        } //end for (i = 0; i < n_components; i++)
437 <    } else {
438 <        sprintf(painCave.errMsg, "SimSetup error.\n"
439 <                                     "\tSorry, the ability to specify total"
440 <                                     " nMols and then give molfractions in the components\n"
441 <                                     "\tis not currently supported."
442 <                                     " Please give nMol in the components.\n");
443 <
444 <        painCave.isFatal = 1;
445 <        simError();
446 <    }
447 <
448 < #ifdef IS_MPI
449 <
450 <    strcpy(checkPointMsg, "Component stamps successfully extracted\n");
451 <    MPIcheckPoint();
452 <
453 < #endif // is_mpi
454 <
455 < }
456 <
457 < void SimCreator::setGlobalIndex(SimInfo *info) {
458 <    SimInfo::MoleculeIterator mi;
459 <    Molecule::AtomIterator ai;
460 <    Molecule::RigidBodyIterator ri;
461 <    Molecule::CutoffGroupIterator ci;
462 <    Molecule * mol;
463 <    Atom * atom;
464 <    RigidBody * rb;
465 <    CutoffGroup * cg;
466 <    int beginAtomIndex;
467 <    int beginRigidBodyIndex;
468 <    int beginCutoffGroupIndex;
469 <    int nGlobalAtoms = info->getNGlobalAtoms();
470 <    
471 < #ifndef IS_MPI
472 <
473 <    beginAtomIndex = 0;
474 <    beginRigidBodyIndex = 0;
475 <    beginCutoffGroupIndex = 0;
476 <
477 < #else
478 <
479 <    int nproc;
480 <    int myNode;
481 <
482 <    myNode = worldRank;
483 <    MPI_Comm_size(MPI_COMM_WORLD, &nproc);
484 <
485 <    std::vector < int > tmpAtomsInProc(nproc, 0);
486 <    std::vector < int > tmpRigidBodiesInProc(nproc, 0);
487 <    std::vector < int > tmpCutoffGroupsInProc(nproc, 0);
488 <    std::vector < int > NumAtomsInProc(nproc, 0);
489 <    std::vector < int > NumRigidBodiesInProc(nproc, 0);
490 <    std::vector < int > NumCutoffGroupsInProc(nproc, 0);
491 <
492 <    tmpAtomsInProc[myNode] = info->getNAtoms();
493 <    tmpRigidBodiesInProc[myNode] = info->getNRigidBodies();
494 <    tmpCutoffGroupsInProc[myNode] = info->getNCutoffGroups();
495 <
496 <    //do MPI_ALLREDUCE to exchange the total number of atoms, rigidbodies and cutoff groups
497 <    MPI_Allreduce(&tmpAtomsInProc[0], &NumAtomsInProc[0], nproc, MPI_INT,
498 <                  MPI_SUM, MPI_COMM_WORLD);
499 <    MPI_Allreduce(&tmpRigidBodiesInProc[0], &NumRigidBodiesInProc[0], nproc,
500 <                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
501 <    MPI_Allreduce(&tmpCutoffGroupsInProc[0], &NumCutoffGroupsInProc[0], nproc,
502 <                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
503 <
504 <    beginAtomIndex = 0;
505 <    beginRigidBodyIndex = 0;
506 <    beginCutoffGroupIndex = 0;
507 <
508 <    for(int i = 0; i < myNode; i++) {
509 <        beginAtomIndex += NumAtomsInProc[i];
510 <        beginRigidBodyIndex += NumRigidBodiesInProc[i];
511 <        beginCutoffGroupIndex += NumCutoffGroupsInProc[i];
512 <    }
513 <
514 < #endif
515 <
516 <    //rigidbody's index begins right after atom's
517 <    beginRigidBodyIndex += info->getNGlobalAtoms();
518 <
519 <    for(mol = info->beginMolecule(mi); mol != NULL;
520 <        mol = info->nextMolecule(mi)) {
521 <
522 <        //local index(index in DataStorge) of atom is important
523 <        for(atom = mol->beginAtom(ai); atom != NULL; atom = mol->nextAtom(ai)) {
524 <            atom->setGlobalIndex(beginAtomIndex++);
525 <        }
526 <
527 <        for(rb = mol->beginRigidBody(ri); rb != NULL;
528 <            rb = mol->nextRigidBody(ri)) {
529 <            rb->setGlobalIndex(beginRigidBodyIndex++);
530 <        }
531 <
532 <        //local index of cutoff group is trivial, it only depends on the order of travesing
533 <        for(cg = mol->beginCutoffGroup(ci); cg != NULL;
534 <            cg = mol->nextCutoffGroup(ci)) {
535 <            cg->setGlobalIndex(beginCutoffGroupIndex++);
536 <        }
537 <    }
538 <
539 <    //fill globalGroupMembership
540 <    std::vector<int> globalGroupMembership(info->getNGlobalAtoms(), 0);
541 <    for(mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {        
542 <        for (cg = mol->beginCutoffGroup(ci); cg != NULL; cg = mol->nextCutoffGroup(ci)) {
543 <
544 <            for(atom = cg->beginAtom(ai); atom != NULL; atom = cg->nextAtom(ai)) {
545 <                globalGroupMembership[atom->getGlobalIndex()] = cg->getGlobalIndex();
546 <            }
547 <
548 <        }      
549 <    }
550 <
551 < #ifdef IS_MPI    
552 <    // Since the globalGroupMembership has been zero filled and we've only
553 <    // poked values into the atoms we know, we can do an Allreduce
554 <    // to get the full globalGroupMembership array (We think).
555 <    // This would be prettier if we could use MPI_IN_PLACE like the MPI-2
556 <    // docs said we could.
557 <    std::vector<int> tmpGroupMembership(nGlobalAtoms, 0);
558 <    MPI_Allreduce(&globalGroupMembership[0], &tmpGroupMembership[0], nGlobalAtoms,
559 <                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
560 <     info->setGlobalGroupMembership(tmpGroupMembership);
561 < #else
562 <    info->setGlobalGroupMembership(globalGroupMembership);
563 < #endif
564 <
565 <    //fill molMembership
566 <    std::vector<int> globalMolMembership(info->getNGlobalAtoms(), 0);
567 <    
568 <    for(mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
569 <
570 <        for(atom = mol->beginAtom(ai); atom != NULL; atom = mol->nextAtom(ai)) {
571 <            globalMolMembership[atom->getGlobalIndex()] = mol->getGlobalIndex();
572 <        }
573 <    }
574 <
575 < #ifdef IS_MPI
576 <    std::vector<int> tmpMolMembership(nGlobalAtoms, 0);
577 <
578 <    MPI_Allreduce(&globalMolMembership[0], &tmpMolMembership[0], nGlobalAtoms,
579 <                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
580 <    
581 <    info->setGlobalMolMembership(tmpMolMembership);
582 < #else
583 <    info->setGlobalMolMembership(globalMolMembership);
584 < #endif
585 <
586 < }
587 <
588 < void SimCreator::loadCoordinates(SimInfo* info) {
589 <    Globals* simParams;
590 <    simParams = info->getSimParams();
591 <    
592 <    if (!simParams->haveInitialConfig()) {
593 <        sprintf(painCave.errMsg,
594 <                "Cannot intialize a simulation without an initial configuration file.\n");
595 <        painCave.isFatal = 1;;
596 <        simError();
597 <    }
598 <        
599 <    DumpReader reader(info, simParams->getInitialConfig());
600 <    int nframes = reader.getNFrames();
601 <
602 <    if (nframes > 0) {
603 <        reader.readFrame(nframes - 1);
604 <    } else {
605 <        //invalid initial coordinate file
606 <        sprintf(painCave.errMsg, "Initial configuration file %s should at least contain one frame\n",
607 <                simParams->getInitialConfig());
608 <        painCave.isFatal = 1;
609 <        simError();
610 <    }
611 <
612 <    //copy the current snapshot to previous snapshot
613 <    info->getSnapshotManager()->advance();
614 < }
615 <
616 < } //end namespace oopse
617 <
618 <
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. Redistributions of source code must retain the above copyright
10 > *    notice, this list of conditions and the following disclaimer.
11 > *
12 > * 2. Redistributions in binary form must reproduce the above copyright
13 > *    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 > *
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]  Kuang & Gezelter,  J. Chem. Phys. 133, 164101 (2010).
40 > * [5]  Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011).
41 > */
42 >
43 > /**
44 > * @file SimCreator.cpp
45 > * @author tlin
46 > * @date 11/03/2004
47 > * @time 13:51am
48 > * @version 1.0
49 > */
50 > #include <exception>
51 > #include <iostream>
52 > #include <sstream>
53 > #include <string>
54 >
55 > #include "brains/MoleculeCreator.hpp"
56 > #include "brains/SimCreator.hpp"
57 > #include "brains/SimSnapshotManager.hpp"
58 > #include "io/DumpReader.hpp"
59 > #include "brains/ForceField.hpp"
60 > #include "utils/simError.h"
61 > #include "utils/StringUtils.hpp"
62 > #include "math/SeqRandNumGen.hpp"
63 > #include "mdParser/MDLexer.hpp"
64 > #include "mdParser/MDParser.hpp"
65 > #include "mdParser/MDTreeParser.hpp"
66 > #include "mdParser/SimplePreprocessor.hpp"
67 > #include "antlr/ANTLRException.hpp"
68 > #include "antlr/TokenStreamRecognitionException.hpp"
69 > #include "antlr/TokenStreamIOException.hpp"
70 > #include "antlr/TokenStreamException.hpp"
71 > #include "antlr/RecognitionException.hpp"
72 > #include "antlr/CharStreamException.hpp"
73 >
74 > #include "antlr/MismatchedCharException.hpp"
75 > #include "antlr/MismatchedTokenException.hpp"
76 > #include "antlr/NoViableAltForCharException.hpp"
77 > #include "antlr/NoViableAltException.hpp"
78 >
79 > #include "types/DirectionalAdapter.hpp"
80 > #include "types/MultipoleAdapter.hpp"
81 > #include "types/EAMAdapter.hpp"
82 > #include "types/SuttonChenAdapter.hpp"
83 > #include "types/PolarizableAdapter.hpp"
84 > #include "types/FixedChargeAdapter.hpp"
85 > #include "types/FluctuatingChargeAdapter.hpp"
86 >
87 > #ifdef IS_MPI
88 > #include "mpi.h"
89 > #include "math/ParallelRandNumGen.hpp"
90 > #endif
91 >
92 > namespace OpenMD {
93 >  
94 >  Globals* SimCreator::parseFile(std::istream& rawMetaDataStream, const std::string& filename, int mdFileVersion, int startOfMetaDataBlock ){
95 >    Globals* simParams = NULL;
96 >    try {
97 >
98 >      // Create a preprocessor that preprocesses md file into an ostringstream
99 >      std::stringstream ppStream;
100 > #ifdef IS_MPI            
101 >      int streamSize;
102 >      const int masterNode = 0;
103 >      int commStatus;
104 >      if (worldRank == masterNode) {
105 >        commStatus = MPI_Bcast(&mdFileVersion, 1, MPI_INT, masterNode, MPI_COMM_WORLD);
106 > #endif                
107 >        SimplePreprocessor preprocessor;
108 >        preprocessor.preprocess(rawMetaDataStream, filename, startOfMetaDataBlock, ppStream);
109 >                
110 > #ifdef IS_MPI            
111 >        //brocasting the stream size
112 >        streamSize = ppStream.str().size() +1;
113 >        commStatus = MPI_Bcast(&streamSize, 1, MPI_LONG, masterNode, MPI_COMM_WORLD);                  
114 >
115 >        commStatus = MPI_Bcast(static_cast<void*>(const_cast<char*>(ppStream.str().c_str())), streamSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);
116 >            
117 >                
118 >      } else {
119 >
120 >        commStatus = MPI_Bcast(&mdFileVersion, 1, MPI_INT, masterNode, MPI_COMM_WORLD);
121 >
122 >        //get stream size
123 >        commStatus = MPI_Bcast(&streamSize, 1, MPI_LONG, masterNode, MPI_COMM_WORLD);  
124 >
125 >        char* buf = new char[streamSize];
126 >        assert(buf);
127 >                
128 >        //receive file content
129 >        commStatus = MPI_Bcast(buf, streamSize, MPI_CHAR, masterNode, MPI_COMM_WORLD);
130 >                
131 >        ppStream.str(buf);
132 >        delete [] buf;
133 >
134 >      }
135 > #endif            
136 >      // Create a scanner that reads from the input stream
137 >      MDLexer lexer(ppStream);
138 >      lexer.setFilename(filename);
139 >      lexer.initDeferredLineCount();
140 >    
141 >      // Create a parser that reads from the scanner
142 >      MDParser parser(lexer);
143 >      parser.setFilename(filename);
144 >
145 >      // Create an observer that synchorizes file name change
146 >      FilenameObserver observer;
147 >      observer.setLexer(&lexer);
148 >      observer.setParser(&parser);
149 >      lexer.setObserver(&observer);
150 >    
151 >      antlr::ASTFactory factory;
152 >      parser.initializeASTFactory(factory);
153 >      parser.setASTFactory(&factory);
154 >      parser.mdfile();
155 >
156 >      // Create a tree parser that reads information into Globals
157 >      MDTreeParser treeParser;
158 >      treeParser.initializeASTFactory(factory);
159 >      treeParser.setASTFactory(&factory);
160 >      simParams = treeParser.walkTree(parser.getAST());
161 >    }
162 >
163 >      
164 >    catch(antlr::MismatchedCharException& e) {
165 >      sprintf(painCave.errMsg,
166 >              "parser exception: %s %s:%d:%d\n",
167 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
168 >      painCave.isFatal = 1;
169 >      simError();          
170 >    }
171 >    catch(antlr::MismatchedTokenException &e) {
172 >      sprintf(painCave.errMsg,
173 >              "parser exception: %s %s:%d:%d\n",
174 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
175 >      painCave.isFatal = 1;
176 >      simError();  
177 >    }
178 >    catch(antlr::NoViableAltForCharException &e) {
179 >      sprintf(painCave.errMsg,
180 >              "parser exception: %s %s:%d:%d\n",
181 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
182 >      painCave.isFatal = 1;
183 >      simError();  
184 >    }
185 >    catch(antlr::NoViableAltException &e) {
186 >      sprintf(painCave.errMsg,
187 >              "parser exception: %s %s:%d:%d\n",
188 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
189 >      painCave.isFatal = 1;
190 >      simError();  
191 >    }
192 >      
193 >    catch(antlr::TokenStreamRecognitionException& e) {
194 >      sprintf(painCave.errMsg,
195 >              "parser exception: %s %s:%d:%d\n",
196 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
197 >      painCave.isFatal = 1;
198 >      simError();  
199 >    }
200 >        
201 >    catch(antlr::TokenStreamIOException& e) {
202 >      sprintf(painCave.errMsg,
203 >              "parser exception: %s\n",
204 >              e.getMessage().c_str());
205 >      painCave.isFatal = 1;
206 >      simError();
207 >    }
208 >        
209 >    catch(antlr::TokenStreamException& e) {
210 >      sprintf(painCave.errMsg,
211 >              "parser exception: %s\n",
212 >              e.getMessage().c_str());
213 >      painCave.isFatal = 1;
214 >      simError();
215 >    }        
216 >    catch (antlr::RecognitionException& e) {
217 >      sprintf(painCave.errMsg,
218 >              "parser exception: %s %s:%d:%d\n",
219 >              e.getMessage().c_str(),e.getFilename().c_str(), e.getLine(), e.getColumn());
220 >      painCave.isFatal = 1;
221 >      simError();          
222 >    }
223 >    catch (antlr::CharStreamException& e) {
224 >      sprintf(painCave.errMsg,
225 >              "parser exception: %s\n",
226 >              e.getMessage().c_str());
227 >      painCave.isFatal = 1;
228 >      simError();        
229 >    }
230 >    catch (OpenMDException& e) {
231 >      sprintf(painCave.errMsg,
232 >              "%s\n",
233 >              e.getMessage().c_str());
234 >      painCave.isFatal = 1;
235 >      simError();
236 >    }
237 >    catch (std::exception& e) {
238 >      sprintf(painCave.errMsg,
239 >              "parser exception: %s\n",
240 >              e.what());
241 >      painCave.isFatal = 1;
242 >      simError();
243 >    }
244 >
245 >    simParams->setMDfileVersion(mdFileVersion);
246 >    return simParams;
247 >  }
248 >  
249 >  SimInfo*  SimCreator::createSim(const std::string & mdFileName,
250 >                                  bool loadInitCoords) {
251 >    
252 >    const int bufferSize = 65535;
253 >    char buffer[bufferSize];
254 >    int lineNo = 0;
255 >    std::string mdRawData;
256 >    int metaDataBlockStart = -1;
257 >    int metaDataBlockEnd = -1;
258 >    int i;
259 >    streamoff mdOffset;
260 >    int mdFileVersion;
261 >
262 > #ifdef IS_MPI            
263 >    const int masterNode = 0;
264 >    if (worldRank == masterNode) {
265 > #endif
266 >
267 >      std::ifstream mdFile_(mdFileName.c_str());
268 >      
269 >      if (mdFile_.fail()) {
270 >        sprintf(painCave.errMsg,
271 >                "SimCreator: Cannot open file: %s\n",
272 >                mdFileName.c_str());
273 >        painCave.isFatal = 1;
274 >        simError();
275 >      }
276 >
277 >      mdFile_.getline(buffer, bufferSize);
278 >      ++lineNo;
279 >      std::string line = trimLeftCopy(buffer);
280 >      i = CaseInsensitiveFind(line, "<OpenMD");
281 >      if (static_cast<size_t>(i) == string::npos) {
282 >        // try the older file strings to see if that works:
283 >        i = CaseInsensitiveFind(line, "<OOPSE");
284 >      }
285 >      
286 >      if (static_cast<size_t>(i) == string::npos) {
287 >        // still no luck!
288 >        sprintf(painCave.errMsg,
289 >                "SimCreator: File: %s is not a valid OpenMD file!\n",
290 >                mdFileName.c_str());
291 >        painCave.isFatal = 1;
292 >        simError();
293 >      }
294 >      
295 >      // found the correct opening string, now try to get the file
296 >      // format version number.
297 >
298 >      StringTokenizer tokenizer(line, "=<> \t\n\r");
299 >      std::string fileType = tokenizer.nextToken();
300 >      toUpper(fileType);
301 >
302 >      mdFileVersion = 0;
303 >
304 >      if (fileType == "OPENMD") {
305 >        while (tokenizer.hasMoreTokens()) {
306 >          std::string token(tokenizer.nextToken());
307 >          toUpper(token);
308 >          if (token == "VERSION") {
309 >            mdFileVersion = tokenizer.nextTokenAsInt();
310 >            break;
311 >          }
312 >        }
313 >      }
314 >            
315 >      //scan through the input stream and find MetaData tag        
316 >      while(mdFile_.getline(buffer, bufferSize)) {
317 >        ++lineNo;
318 >        
319 >        std::string line = trimLeftCopy(buffer);
320 >        if (metaDataBlockStart == -1) {
321 >          i = CaseInsensitiveFind(line, "<MetaData>");
322 >          if (i != string::npos) {
323 >            metaDataBlockStart = lineNo;
324 >            mdOffset = mdFile_.tellg();
325 >          }
326 >        } else {
327 >          i = CaseInsensitiveFind(line, "</MetaData>");
328 >          if (i != string::npos) {
329 >            metaDataBlockEnd = lineNo;
330 >          }
331 >        }
332 >      }
333 >
334 >      if (metaDataBlockStart == -1) {
335 >        sprintf(painCave.errMsg,
336 >                "SimCreator: File: %s did not contain a <MetaData> tag!\n",
337 >                mdFileName.c_str());
338 >        painCave.isFatal = 1;
339 >        simError();
340 >      }
341 >      if (metaDataBlockEnd == -1) {
342 >        sprintf(painCave.errMsg,
343 >                "SimCreator: File: %s did not contain a closed MetaData block!\n",
344 >                mdFileName.c_str());
345 >        painCave.isFatal = 1;
346 >        simError();
347 >      }
348 >        
349 >      mdFile_.clear();
350 >      mdFile_.seekg(0);
351 >      mdFile_.seekg(mdOffset);
352 >
353 >      mdRawData.clear();
354 >
355 >      for (int i = 0; i < metaDataBlockEnd - metaDataBlockStart - 1; ++i) {
356 >        mdFile_.getline(buffer, bufferSize);
357 >        mdRawData += buffer;
358 >        mdRawData += "\n";
359 >      }
360 >
361 >      mdFile_.close();
362 >
363 > #ifdef IS_MPI
364 >    }
365 > #endif
366 >
367 >    std::stringstream rawMetaDataStream(mdRawData);
368 >
369 >    //parse meta-data file
370 >    Globals* simParams = parseFile(rawMetaDataStream, mdFileName, mdFileVersion,
371 >                                   metaDataBlockStart + 1);
372 >    
373 >    //create the force field
374 >    ForceField * ff = new ForceField(simParams->getForceField());
375 >
376 >    if (ff == NULL) {
377 >      sprintf(painCave.errMsg,
378 >              "ForceField Factory can not create %s force field\n",
379 >              simParams->getForceField().c_str());
380 >      painCave.isFatal = 1;
381 >      simError();
382 >    }
383 >    
384 >    if (simParams->haveForceFieldFileName()) {
385 >      ff->setForceFieldFileName(simParams->getForceFieldFileName());
386 >    }
387 >    
388 >    std::string forcefieldFileName;
389 >    forcefieldFileName = ff->getForceFieldFileName();
390 >    
391 >    if (simParams->haveForceFieldVariant()) {
392 >      //If the force field has variant, the variant force field name will be
393 >      //Base.variant.frc. For exampel EAM.u6.frc
394 >      
395 >      std::string variant = simParams->getForceFieldVariant();
396 >      
397 >      std::string::size_type pos = forcefieldFileName.rfind(".frc");
398 >      variant = "." + variant;
399 >      if (pos != std::string::npos) {
400 >        forcefieldFileName.insert(pos, variant);
401 >      } else {
402 >        //If the default force field file name does not containt .frc suffix, just append the .variant
403 >        forcefieldFileName.append(variant);
404 >      }
405 >    }
406 >    
407 >    ff->parse(forcefieldFileName);
408 >    //create SimInfo
409 >    SimInfo * info = new SimInfo(ff, simParams);
410 >
411 >    info->setRawMetaData(mdRawData);
412 >    
413 >    //gather parameters (SimCreator only retrieves part of the
414 >    //parameters)
415 >    gatherParameters(info, mdFileName);
416 >    
417 >    //divide the molecules and determine the global index of molecules
418 > #ifdef IS_MPI
419 >    divideMolecules(info);
420 > #endif
421 >    
422 >    //create the molecules
423 >    createMolecules(info);
424 >    
425 >    //find the storage layout
426 >
427 >    int storageLayout = computeStorageLayout(info);
428 >
429 >    //allocate memory for DataStorage(circular reference, need to
430 >    //break it)
431 >    info->setSnapshotManager(new SimSnapshotManager(info, storageLayout));
432 >    
433 >    //set the global index of atoms, rigidbodies and cutoffgroups
434 >    //(only need to be set once, the global index will never change
435 >    //again). Local indices of atoms and rigidbodies are already set
436 >    //by MoleculeCreator class which actually delegates the
437 >    //responsibility to LocalIndexManager.
438 >    setGlobalIndex(info);
439 >    
440 >    //Although addInteractionPairs is called inside SimInfo's addMolecule
441 >    //method, at that point atoms don't have the global index yet
442 >    //(their global index are all initialized to -1).  Therefore we
443 >    //have to call addInteractionPairs explicitly here. A way to work
444 >    //around is that we can determine the beginning global indices of
445 >    //atoms before they get created.
446 >    SimInfo::MoleculeIterator mi;
447 >    Molecule* mol;
448 >    for (mol= info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
449 >      info->addInteractionPairs(mol);
450 >    }
451 >    
452 >    if (loadInitCoords)
453 >      loadCoordinates(info, mdFileName);    
454 >    return info;
455 >  }
456 >  
457 >  void SimCreator::gatherParameters(SimInfo *info, const std::string& mdfile) {
458 >    
459 >    //figure out the output file names
460 >    std::string prefix;
461 >    
462 > #ifdef IS_MPI
463 >    
464 >    if (worldRank == 0) {
465 > #endif // is_mpi
466 >      Globals * simParams = info->getSimParams();
467 >      if (simParams->haveFinalConfig()) {
468 >        prefix = getPrefix(simParams->getFinalConfig());
469 >      } else {
470 >        prefix = getPrefix(mdfile);
471 >      }
472 >      
473 >      info->setFinalConfigFileName(prefix + ".eor");
474 >      info->setDumpFileName(prefix + ".dump");
475 >      info->setStatFileName(prefix + ".stat");
476 >      info->setRestFileName(prefix + ".zang");
477 >      
478 > #ifdef IS_MPI
479 >      
480 >    }
481 >    
482 > #endif
483 >    
484 >  }
485 >  
486 > #ifdef IS_MPI
487 >  void SimCreator::divideMolecules(SimInfo *info) {
488 >    RealType numerator;
489 >    RealType denominator;
490 >    RealType precast;
491 >    RealType x;
492 >    RealType y;
493 >    RealType a;
494 >    int old_atoms;
495 >    int add_atoms;
496 >    int new_atoms;
497 >    int nTarget;
498 >    int done;
499 >    int i;
500 >    int j;
501 >    int loops;
502 >    int which_proc;
503 >    int nProcessors;
504 >    std::vector<int> atomsPerProc;
505 >    int nGlobalMols = info->getNGlobalMolecules();
506 >    std::vector<int> molToProcMap(nGlobalMols, -1); // default to an error condition:
507 >    
508 >    MPI_Comm_size(MPI_COMM_WORLD, &nProcessors);
509 >    
510 >    if (nProcessors > nGlobalMols) {
511 >      sprintf(painCave.errMsg,
512 >              "nProcessors (%d) > nMol (%d)\n"
513 >              "\tThe number of processors is larger than\n"
514 >              "\tthe number of molecules.  This will not result in a \n"
515 >              "\tusable division of atoms for force decomposition.\n"
516 >              "\tEither try a smaller number of processors, or run the\n"
517 >              "\tsingle-processor version of OpenMD.\n", nProcessors, nGlobalMols);
518 >      
519 >      painCave.isFatal = 1;
520 >      simError();
521 >    }
522 >    
523 >    int seedValue;
524 >    Globals * simParams = info->getSimParams();
525 >    SeqRandNumGen* myRandom; //divide labor does not need Parallel random number generator
526 >    if (simParams->haveSeed()) {
527 >      seedValue = simParams->getSeed();
528 >      myRandom = new SeqRandNumGen(seedValue);
529 >    }else {
530 >      myRandom = new SeqRandNumGen();
531 >    }  
532 >    
533 >    
534 >    a = 3.0 * nGlobalMols / info->getNGlobalAtoms();
535 >    
536 >    //initialize atomsPerProc
537 >    atomsPerProc.insert(atomsPerProc.end(), nProcessors, 0);
538 >    
539 >    if (worldRank == 0) {
540 >      numerator = info->getNGlobalAtoms();
541 >      denominator = nProcessors;
542 >      precast = numerator / denominator;
543 >      nTarget = (int)(precast + 0.5);
544 >      
545 >      for(i = 0; i < nGlobalMols; i++) {
546 >        done = 0;
547 >        loops = 0;
548 >        
549 >        while (!done) {
550 >          loops++;
551 >          
552 >          // Pick a processor at random
553 >          
554 >          which_proc = (int) (myRandom->rand() * nProcessors);
555 >          
556 >          //get the molecule stamp first
557 >          int stampId = info->getMoleculeStampId(i);
558 >          MoleculeStamp * moleculeStamp = info->getMoleculeStamp(stampId);
559 >          
560 >          // How many atoms does this processor have so far?
561 >          old_atoms = atomsPerProc[which_proc];
562 >          add_atoms = moleculeStamp->getNAtoms();
563 >          new_atoms = old_atoms + add_atoms;
564 >          
565 >          // If we've been through this loop too many times, we need
566 >          // to just give up and assign the molecule to this processor
567 >          // and be done with it.
568 >          
569 >          if (loops > 100) {
570 >            sprintf(painCave.errMsg,
571 >                    "I've tried 100 times to assign molecule %d to a "
572 >                    " processor, but can't find a good spot.\n"
573 >                    "I'm assigning it at random to processor %d.\n",
574 >                    i, which_proc);
575 >            
576 >            painCave.isFatal = 0;
577 >            simError();
578 >            
579 >            molToProcMap[i] = which_proc;
580 >            atomsPerProc[which_proc] += add_atoms;
581 >            
582 >            done = 1;
583 >            continue;
584 >          }
585 >          
586 >          // If we can add this molecule to this processor without sending
587 >          // it above nTarget, then go ahead and do it:
588 >          
589 >          if (new_atoms <= nTarget) {
590 >            molToProcMap[i] = which_proc;
591 >            atomsPerProc[which_proc] += add_atoms;
592 >            
593 >            done = 1;
594 >            continue;
595 >          }
596 >          
597 >          // The only situation left is when new_atoms > nTarget.  We
598 >          // want to accept this with some probability that dies off the
599 >          // farther we are from nTarget
600 >          
601 >          // roughly:  x = new_atoms - nTarget
602 >          //           Pacc(x) = exp(- a * x)
603 >          // where a = penalty / (average atoms per molecule)
604 >          
605 >          x = (RealType)(new_atoms - nTarget);
606 >          y = myRandom->rand();
607 >          
608 >          if (y < exp(- a * x)) {
609 >            molToProcMap[i] = which_proc;
610 >            atomsPerProc[which_proc] += add_atoms;
611 >            
612 >            done = 1;
613 >            continue;
614 >          } else {
615 >            continue;
616 >          }
617 >        }
618 >      }
619 >      
620 >      delete myRandom;
621 >      
622 >      // Spray out this nonsense to all other processors:
623 >      
624 >      MPI_Bcast(&molToProcMap[0], nGlobalMols, MPI_INT, 0, MPI_COMM_WORLD);
625 >    } else {
626 >      
627 >      // Listen to your marching orders from processor 0:
628 >      
629 >      MPI_Bcast(&molToProcMap[0], nGlobalMols, MPI_INT, 0, MPI_COMM_WORLD);
630 >    }
631 >    
632 >    info->setMolToProcMap(molToProcMap);
633 >    sprintf(checkPointMsg,
634 >            "Successfully divided the molecules among the processors.\n");
635 >    errorCheckPoint();
636 >  }
637 >  
638 > #endif
639 >  
640 >  void SimCreator::createMolecules(SimInfo *info) {
641 >    MoleculeCreator molCreator;
642 >    int stampId;
643 >    
644 >    for(int i = 0; i < info->getNGlobalMolecules(); i++) {
645 >      
646 > #ifdef IS_MPI
647 >      
648 >      if (info->getMolToProc(i) == worldRank) {
649 > #endif
650 >        
651 >        stampId = info->getMoleculeStampId(i);
652 >        Molecule * mol = molCreator.createMolecule(info->getForceField(),
653 >                                                   info->getMoleculeStamp(stampId),
654 >                                                   stampId, i,
655 >                                                   info->getLocalIndexManager());
656 >        
657 >        info->addMolecule(mol);
658 >        
659 > #ifdef IS_MPI
660 >        
661 >      }
662 >      
663 > #endif
664 >      
665 >    } //end for(int i=0)  
666 >  }
667 >    
668 >  int SimCreator::computeStorageLayout(SimInfo* info) {
669 >
670 >    Globals* simParams = info->getSimParams();
671 >    int nRigidBodies = info->getNGlobalRigidBodies();
672 >    set<AtomType*> atomTypes = info->getSimulatedAtomTypes();
673 >    set<AtomType*>::iterator i;
674 >    bool hasDirectionalAtoms = false;
675 >    bool hasFixedCharge = false;
676 >    bool hasMultipoles = false;    
677 >    bool hasPolarizable = false;    
678 >    bool hasFluctuatingCharge = false;    
679 >    bool hasMetallic = false;
680 >    int storageLayout = 0;
681 >    storageLayout |= DataStorage::dslPosition;
682 >    storageLayout |= DataStorage::dslVelocity;
683 >    storageLayout |= DataStorage::dslForce;
684 >
685 >    for (i = atomTypes.begin(); i != atomTypes.end(); ++i) {
686 >
687 >      DirectionalAdapter da = DirectionalAdapter( (*i) );
688 >      MultipoleAdapter ma = MultipoleAdapter( (*i) );
689 >      EAMAdapter ea = EAMAdapter( (*i) );
690 >      SuttonChenAdapter sca = SuttonChenAdapter( (*i) );
691 >      PolarizableAdapter pa = PolarizableAdapter( (*i) );
692 >      FixedChargeAdapter fca = FixedChargeAdapter( (*i) );
693 >      FluctuatingChargeAdapter fqa = FluctuatingChargeAdapter( (*i) );
694 >
695 >      if (da.isDirectional()){
696 >        hasDirectionalAtoms = true;
697 >      }
698 >      if (ma.isMultipole()){
699 >        hasMultipoles = true;
700 >      }
701 >      if (ea.isEAM() || sca.isSuttonChen()){
702 >        hasMetallic = true;
703 >      }
704 >      if ( fca.isFixedCharge() ){
705 >        hasFixedCharge = true;
706 >      }
707 >      if ( fqa.isFluctuatingCharge() ){
708 >        hasFluctuatingCharge = true;
709 >      }
710 >      if ( pa.isPolarizable() ){
711 >        hasPolarizable = true;
712 >      }
713 >    }
714 >    
715 >    if (nRigidBodies > 0 || hasDirectionalAtoms) {
716 >      storageLayout |= DataStorage::dslAmat;
717 >      if(storageLayout & DataStorage::dslVelocity) {
718 >        storageLayout |= DataStorage::dslAngularMomentum;
719 >      }
720 >      if (storageLayout & DataStorage::dslForce) {
721 >        storageLayout |= DataStorage::dslTorque;
722 >      }
723 >    }
724 >    if (hasMultipoles) {
725 >      storageLayout |= DataStorage::dslElectroFrame;
726 >    }
727 >    if (hasFixedCharge || hasFluctuatingCharge) {
728 >      storageLayout |= DataStorage::dslSkippedCharge;
729 >    }
730 >    if (hasMetallic) {
731 >      storageLayout |= DataStorage::dslDensity;
732 >      storageLayout |= DataStorage::dslFunctional;
733 >      storageLayout |= DataStorage::dslFunctionalDerivative;
734 >    }
735 >    if (hasPolarizable) {
736 >      storageLayout |= DataStorage::dslElectricField;
737 >    }
738 >    if (hasFluctuatingCharge){
739 >      storageLayout |= DataStorage::dslFlucQPosition;
740 >      if(storageLayout & DataStorage::dslVelocity) {
741 >        storageLayout |= DataStorage::dslFlucQVelocity;
742 >      }
743 >      if (storageLayout & DataStorage::dslForce) {
744 >        storageLayout |= DataStorage::dslFlucQForce;
745 >      }
746 >    }
747 >    
748 >    // if the user has asked for them, make sure we've got the memory for the
749 >    // objects defined.
750 >
751 >    if (simParams->getOutputParticlePotential()) {
752 >      storageLayout |= DataStorage::dslParticlePot;
753 >    }
754 >
755 >    if (simParams->havePrintHeatFlux()) {
756 >      if (simParams->getPrintHeatFlux()) {
757 >        storageLayout |= DataStorage::dslParticlePot;
758 >      }
759 >    }
760 >
761 >    if (simParams->getOutputElectricField()) {
762 >      storageLayout |= DataStorage::dslElectricField;
763 >    }
764 >    if (simParams->getOutputFluctuatingCharges()) {
765 >      storageLayout |= DataStorage::dslFlucQPosition;
766 >      storageLayout |= DataStorage::dslFlucQVelocity;
767 >      storageLayout |= DataStorage::dslFlucQForce;
768 >    }
769 >
770 >    return storageLayout;
771 >  }
772 >
773 >  void SimCreator::setGlobalIndex(SimInfo *info) {
774 >    SimInfo::MoleculeIterator mi;
775 >    Molecule::AtomIterator ai;
776 >    Molecule::RigidBodyIterator ri;
777 >    Molecule::CutoffGroupIterator ci;
778 >    Molecule::IntegrableObjectIterator  ioi;
779 >    Molecule * mol;
780 >    Atom * atom;
781 >    RigidBody * rb;
782 >    CutoffGroup * cg;
783 >    int beginAtomIndex;
784 >    int beginRigidBodyIndex;
785 >    int beginCutoffGroupIndex;
786 >    int nGlobalAtoms = info->getNGlobalAtoms();
787 >    
788 >    beginAtomIndex = 0;
789 >    //rigidbody's index begins right after atom's
790 >    beginRigidBodyIndex = info->getNGlobalAtoms();
791 >    beginCutoffGroupIndex = 0;
792 >
793 >    for(int i = 0; i < info->getNGlobalMolecules(); i++) {
794 >      
795 > #ifdef IS_MPI      
796 >      if (info->getMolToProc(i) == worldRank) {
797 > #endif        
798 >        // stuff to do if I own this molecule
799 >        mol = info->getMoleculeByGlobalIndex(i);
800 >
801 >        //local index(index in DataStorge) of atom is important
802 >        for(atom = mol->beginAtom(ai); atom != NULL; atom = mol->nextAtom(ai)) {
803 >          atom->setGlobalIndex(beginAtomIndex++);
804 >        }
805 >        
806 >        for(rb = mol->beginRigidBody(ri); rb != NULL;
807 >            rb = mol->nextRigidBody(ri)) {
808 >          rb->setGlobalIndex(beginRigidBodyIndex++);
809 >        }
810 >        
811 >        //local index of cutoff group is trivial, it only depends on
812 >        //the order of travesing
813 >        for(cg = mol->beginCutoffGroup(ci); cg != NULL;
814 >            cg = mol->nextCutoffGroup(ci)) {
815 >          cg->setGlobalIndex(beginCutoffGroupIndex++);
816 >        }        
817 >        
818 > #ifdef IS_MPI        
819 >      }  else {
820 >
821 >        // stuff to do if I don't own this molecule
822 >        
823 >        int stampId = info->getMoleculeStampId(i);
824 >        MoleculeStamp* stamp = info->getMoleculeStamp(stampId);
825 >
826 >        beginAtomIndex += stamp->getNAtoms();
827 >        beginRigidBodyIndex += stamp->getNRigidBodies();
828 >        beginCutoffGroupIndex += stamp->getNCutoffGroups() + stamp->getNFreeAtoms();
829 >      }
830 > #endif          
831 >
832 >    } //end for(int i=0)  
833 >
834 >    //fill globalGroupMembership
835 >    std::vector<int> globalGroupMembership(info->getNGlobalAtoms(), 0);
836 >    for(mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {        
837 >      for (cg = mol->beginCutoffGroup(ci); cg != NULL; cg = mol->nextCutoffGroup(ci)) {
838 >        
839 >        for(atom = cg->beginAtom(ai); atom != NULL; atom = cg->nextAtom(ai)) {
840 >          globalGroupMembership[atom->getGlobalIndex()] = cg->getGlobalIndex();
841 >        }
842 >        
843 >      }      
844 >    }
845 >  
846 > #ifdef IS_MPI    
847 >    // Since the globalGroupMembership has been zero filled and we've only
848 >    // poked values into the atoms we know, we can do an Allreduce
849 >    // to get the full globalGroupMembership array (We think).
850 >    // This would be prettier if we could use MPI_IN_PLACE like the MPI-2
851 >    // docs said we could.
852 >    std::vector<int> tmpGroupMembership(info->getNGlobalAtoms(), 0);
853 >    MPI_Allreduce(&globalGroupMembership[0], &tmpGroupMembership[0], nGlobalAtoms,
854 >                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
855 >    info->setGlobalGroupMembership(tmpGroupMembership);
856 > #else
857 >    info->setGlobalGroupMembership(globalGroupMembership);
858 > #endif
859 >    
860 >    //fill molMembership
861 >    std::vector<int> globalMolMembership(info->getNGlobalAtoms(), 0);
862 >    
863 >    for(mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
864 >      for(atom = mol->beginAtom(ai); atom != NULL; atom = mol->nextAtom(ai)) {
865 >        globalMolMembership[atom->getGlobalIndex()] = mol->getGlobalIndex();
866 >      }
867 >    }
868 >    
869 > #ifdef IS_MPI
870 >    std::vector<int> tmpMolMembership(info->getNGlobalAtoms(), 0);
871 >    
872 >    MPI_Allreduce(&globalMolMembership[0], &tmpMolMembership[0], nGlobalAtoms,
873 >                  MPI_INT, MPI_SUM, MPI_COMM_WORLD);
874 >    
875 >    info->setGlobalMolMembership(tmpMolMembership);
876 > #else
877 >    info->setGlobalMolMembership(globalMolMembership);
878 > #endif
879 >
880 >    // nIOPerMol holds the number of integrable objects per molecule
881 >    // here the molecules are listed by their global indices.
882 >
883 >    std::vector<int> nIOPerMol(info->getNGlobalMolecules(), 0);
884 >    for (mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
885 >      nIOPerMol[mol->getGlobalIndex()] = mol->getNIntegrableObjects();      
886 >    }
887 >    
888 > #ifdef IS_MPI
889 >    std::vector<int> numIntegrableObjectsPerMol(info->getNGlobalMolecules(), 0);
890 >    MPI_Allreduce(&nIOPerMol[0], &numIntegrableObjectsPerMol[0],
891 >                  info->getNGlobalMolecules(), MPI_INT, MPI_SUM, MPI_COMM_WORLD);
892 > #else
893 >    std::vector<int> numIntegrableObjectsPerMol = nIOPerMol;
894 > #endif    
895 >
896 >    std::vector<int> startingIOIndexForMol(info->getNGlobalMolecules());
897 >    
898 >    int startingIndex = 0;
899 >    for (int i = 0; i < info->getNGlobalMolecules(); i++) {
900 >      startingIOIndexForMol[i] = startingIndex;
901 >      startingIndex += numIntegrableObjectsPerMol[i];
902 >    }
903 >    
904 >    std::vector<StuntDouble*> IOIndexToIntegrableObject(info->getNGlobalIntegrableObjects(), (StuntDouble*)NULL);
905 >    for (mol = info->beginMolecule(mi); mol != NULL; mol = info->nextMolecule(mi)) {
906 >      int myGlobalIndex = mol->getGlobalIndex();
907 >      int globalIO = startingIOIndexForMol[myGlobalIndex];
908 >      for (StuntDouble* sd = mol->beginIntegrableObject(ioi); sd != NULL;
909 >           sd = mol->nextIntegrableObject(ioi)) {
910 >        sd->setGlobalIntegrableObjectIndex(globalIO);
911 >        IOIndexToIntegrableObject[globalIO] = sd;
912 >        globalIO++;
913 >      }
914 >    }
915 >      
916 >    info->setIOIndexToIntegrableObject(IOIndexToIntegrableObject);
917 >    
918 >  }
919 >  
920 >  void SimCreator::loadCoordinates(SimInfo* info, const std::string& mdFileName) {
921 >    Globals* simParams;
922 >
923 >    simParams = info->getSimParams();
924 >    
925 >    DumpReader reader(info, mdFileName);
926 >    int nframes = reader.getNFrames();
927 >
928 >    if (nframes > 0) {
929 >      reader.readFrame(nframes - 1);
930 >    } else {
931 >      //invalid initial coordinate file
932 >      sprintf(painCave.errMsg,
933 >              "Initial configuration file %s should at least contain one frame\n",
934 >              mdFileName.c_str());
935 >      painCave.isFatal = 1;
936 >      simError();
937 >    }
938 >    //copy the current snapshot to previous snapshot
939 >    info->getSnapshotManager()->advance();
940 >  }
941 >  
942 > } //end namespace OpenMD
943 >
944 >

Comparing trunk/src/brains/SimCreator.cpp (property svn:keywords):
Revision 384 by tim, Tue Mar 1 19:11:47 2005 UTC vs.
Revision 1782 by gezelter, Wed Aug 22 02:28:28 2012 UTC

# Line 0 | Line 1
1 + Author Id Revision Date

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines