ViewVC Help

View File | Revision Log | Show Annotations | View Changeset | Root Listing

root/OpenMD/branches/development/src/brains/SimCreator.cpp

Comparing:
trunk/src/brains/SimCreator.cpp (file contents), Revision 246 by gezelter, Wed Jan 12 22:41:40 2005 UTC vs.
branches/development/src/brains/SimCreator.cpp (file contents), Revision 1535 by gezelter, Fri Dec 31 18:31:56 2010 UTC

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

Comparing:
trunk/src/brains/SimCreator.cpp (property svn:keywords), Revision 246 by gezelter, Wed Jan 12 22:41:40 2005 UTC vs.
branches/development/src/brains/SimCreator.cpp (property svn:keywords), Revision 1535 by gezelter, Fri Dec 31 18:31:56 2010 UTC

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

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines