Remove duplicate .nr members from selection structs.
[alexxy/gromacs.git] / src / gromacs / selection / tests / poscalc.cpp
1 /*
2  * This file is part of the GROMACS molecular simulation package.
3  *
4  * Copyright (c) 2013, by the GROMACS development team, led by
5  * David van der Spoel, Berk Hess, Erik Lindahl, and including many
6  * others, as listed in the AUTHORS file in the top-level source
7  * directory and at http://www.gromacs.org.
8  *
9  * GROMACS is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public License
11  * as published by the Free Software Foundation; either version 2.1
12  * of the License, or (at your option) any later version.
13  *
14  * GROMACS is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with GROMACS; if not, see
21  * http://www.gnu.org/licenses, or write to the Free Software Foundation,
22  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
23  *
24  * If you want to redistribute modifications to GROMACS, please
25  * consider that scientific software is very special. Version
26  * control is crucial - bugs must be traceable. We will be happy to
27  * consider code for inclusion in the official distribution, but
28  * derived work must not be called official GROMACS. Details are found
29  * in the README & COPYING files - if they are missing, get the
30  * official version at http://www.gromacs.org.
31  *
32  * To help us fund GROMACS development, we humbly ask that you cite
33  * the research papers on the package. Check out http://www.gromacs.org.
34  */
35 /*! \internal \file
36  * \brief
37  * Tests the position mapping engine.
38  *
39  * \author Teemu Murtola <teemu.murtola@gmail.com>
40  * \ingroup module_selection
41  */
42 #include <gtest/gtest.h>
43
44 #include <vector>
45
46 #include "gromacs/legacyheaders/smalloc.h"
47 #include "gromacs/legacyheaders/typedefs.h"
48 #include "gromacs/legacyheaders/vec.h"
49
50 #include "gromacs/selection/indexutil.h"
51 #include "gromacs/selection/poscalc.h"
52 #include "gromacs/selection/position.h"
53
54 #include "testutils/refdata.h"
55
56 #include "toputils.h"
57
58 namespace
59 {
60
61 /********************************************************************
62  * PositionCalculationTest
63  */
64
65 class PositionCalculationTest : public ::testing::Test
66 {
67     public:
68         PositionCalculationTest();
69         ~PositionCalculationTest();
70
71         void generateCoordinates();
72
73         gmx_ana_poscalc_t *createCalculation(e_poscalc_t type, int flags);
74         void setMaximumGroup(gmx_ana_poscalc_t *pc,
75                              int count, const int atoms[]);
76         gmx_ana_pos_t *initPositions(gmx_ana_poscalc_t *pc, const char *name);
77
78         void checkInitialized();
79         void updateAndCheck(gmx_ana_poscalc_t *pc, gmx_ana_pos_t *p,
80                             int count, const int atoms[],
81                             gmx::test::TestReferenceChecker *checker,
82                             const char *name);
83
84         void testSingleStatic(e_poscalc_t type, int flags, bool bExpectTop,
85                               int atomCount, const int atoms[]);
86         void testSingleDynamic(e_poscalc_t type, int flags, bool bExpectTop,
87                                int initCount, const int initAtoms[],
88                                int evalCount, const int evalAtoms[]);
89
90         template <int count>
91         void setMaximumGroup(gmx_ana_poscalc_t *pc, const int (&atoms)[count])
92         {
93             setMaximumGroup(pc, count, atoms);
94         }
95         template <int count>
96         void updateAndCheck(gmx_ana_poscalc_t *pc, gmx_ana_pos_t *p,
97                             const int (&atoms)[count],
98                             gmx::test::TestReferenceChecker *checker,
99                             const char *name)
100         {
101             updateAndCheck(pc, p, count, atoms, checker, name);
102         }
103         template <int atomCount>
104         void testSingleStatic(e_poscalc_t type, int flags, bool bExpectTop,
105                               const int (&atoms)[atomCount])
106         {
107             testSingleStatic(type, flags, bExpectTop, atomCount, atoms);
108         }
109         template <int initCount, int evalCount>
110         void testSingleDynamic(e_poscalc_t type, int flags, bool bExpectTop,
111                                const int (&initAtoms)[initCount],
112                                const int (&evalAtoms)[evalCount])
113         {
114             testSingleDynamic(type, flags, bExpectTop,
115                               initCount, initAtoms, evalCount, evalAtoms);
116         }
117
118         gmx::test::TestReferenceData        data_;
119         gmx::test::TestReferenceChecker     checker_;
120         gmx::test::TopologyManager          topManager_;
121         gmx::PositionCalculationCollection  pcc_;
122
123     private:
124         struct PositionTest
125         {
126             PositionTest() : pos(NULL), pc(NULL), name(NULL) {}
127             PositionTest(gmx_ana_pos_t *pos, gmx_ana_poscalc_t *pc,
128                          const char *name)
129                 : pos(pos), pc(pc), name(name)
130             {
131             }
132
133             gmx_ana_pos_t                  *pos;
134             gmx_ana_poscalc_t              *pc;
135             const char                     *name;
136         };
137
138         typedef std::vector<PositionTest> PositionTestList;
139
140         void setTopologyIfRequired();
141         void checkPositions(gmx::test::TestReferenceChecker *checker,
142                             const char *name, gmx_ana_pos_t *p,
143                             bool bCoordinates);
144
145         std::vector<gmx_ana_poscalc_t *>    pcList_;
146         PositionTestList                    posList_;
147         bool                                bTopSet_;
148 };
149
150 PositionCalculationTest::PositionCalculationTest()
151     : checker_(data_.rootChecker()), bTopSet_(false)
152 {
153     topManager_.requestFrame();
154 }
155
156 PositionCalculationTest::~PositionCalculationTest()
157 {
158     std::vector<gmx_ana_poscalc_t *>::reverse_iterator pci;
159     for (pci = pcList_.rbegin(); pci != pcList_.rend(); ++pci)
160     {
161         gmx_ana_poscalc_free(*pci);
162     }
163
164     PositionTestList::iterator pi;
165     for (pi = posList_.begin(); pi != posList_.end(); ++pi)
166     {
167         gmx_ana_pos_free(pi->pos);
168     }
169 }
170
171 void PositionCalculationTest::generateCoordinates()
172 {
173     t_topology *top   = topManager_.topology();
174     t_trxframe *frame = topManager_.frame();
175     for (int i = 0; i < top->atoms.nr; ++i)
176     {
177         frame->x[i][XX] = i;
178         frame->x[i][YY] = top->atoms.atom[i].resind;
179         frame->x[i][ZZ] = 0.0;
180         if (frame->bV)
181         {
182             copy_rvec(frame->x[i], frame->v[i]);
183             frame->v[i][ZZ] = 1.0;
184         }
185         if (frame->bF)
186         {
187             copy_rvec(frame->x[i], frame->f[i]);
188             frame->f[i][ZZ] = -1.0;
189         }
190     }
191 }
192
193 gmx_ana_poscalc_t *
194 PositionCalculationTest::createCalculation(e_poscalc_t type, int flags)
195 {
196     pcList_.reserve(pcList_.size() + 1);
197     pcList_.push_back(pcc_.createCalculation(type, flags));
198     return pcList_.back();
199 }
200
201 void PositionCalculationTest::setMaximumGroup(gmx_ana_poscalc_t *pc,
202                                               int count, const int atoms[])
203 {
204     setTopologyIfRequired();
205     gmx_ana_index_t g;
206     g.isize = count;
207     g.index = const_cast<int *>(atoms);
208     gmx_ana_poscalc_set_maxindex(pc, &g);
209 }
210
211 gmx_ana_pos_t *
212 PositionCalculationTest::initPositions(gmx_ana_poscalc_t *pc, const char *name)
213 {
214     posList_.reserve(posList_.size() + 1);
215     gmx_ana_pos_t *p;
216     snew(p, 1);
217     posList_.push_back(PositionTest(p, pc, name));
218     gmx_ana_poscalc_init_pos(pc, p);
219     return p;
220 }
221
222 void PositionCalculationTest::checkInitialized()
223 {
224     gmx::test::TestReferenceChecker  compound(
225             checker_.checkCompound("InitializedPositions", NULL));
226     PositionTestList::const_iterator pi;
227     for (pi = posList_.begin(); pi != posList_.end(); ++pi)
228     {
229         checkPositions(&compound, pi->name, pi->pos, false);
230     }
231 }
232
233 void PositionCalculationTest::updateAndCheck(
234         gmx_ana_poscalc_t *pc, gmx_ana_pos_t *p, int count, const int atoms[],
235         gmx::test::TestReferenceChecker *checker, const char *name)
236 {
237     gmx_ana_index_t g;
238     g.isize = count;
239     g.index = const_cast<int *>(atoms);
240     gmx_ana_poscalc_update(pc, p, &g, topManager_.frame(), NULL);
241     checkPositions(checker, name, p, true);
242 }
243
244 void PositionCalculationTest::testSingleStatic(
245         e_poscalc_t type, int flags, bool bExpectTop,
246         int atomCount, const int atoms[])
247 {
248     t_trxframe *frame = topManager_.frame();
249     if (frame->bV)
250     {
251         flags |= POS_VELOCITIES;
252     }
253     if (frame->bF)
254     {
255         flags |= POS_FORCES;
256     }
257     gmx_ana_poscalc_t *pc = createCalculation(type, flags);
258     EXPECT_EQ(bExpectTop, gmx_ana_poscalc_requires_top(pc));
259     setMaximumGroup(pc, atomCount, atoms);
260     gmx_ana_pos_t *p = initPositions(pc, NULL);
261     checkInitialized();
262     {
263         pcc_.initEvaluation();
264         pcc_.initFrame();
265         generateCoordinates();
266         gmx::test::TestReferenceChecker frameCompound(
267                 checker_.checkCompound("EvaluatedPositions", "Frame0"));
268         updateAndCheck(pc, p, atomCount, atoms, &frameCompound, NULL);
269     }
270 }
271
272 void PositionCalculationTest::testSingleDynamic(
273         e_poscalc_t type, int flags, bool bExpectTop,
274         int initCount, const int initAtoms[],
275         int evalCount, const int evalAtoms[])
276 {
277     gmx_ana_poscalc_t *pc = createCalculation(type, flags | POS_DYNAMIC);
278     EXPECT_EQ(bExpectTop, gmx_ana_poscalc_requires_top(pc));
279     setMaximumGroup(pc, initCount, initAtoms);
280     gmx_ana_pos_t *p = initPositions(pc, NULL);
281     checkInitialized();
282     {
283         pcc_.initEvaluation();
284         pcc_.initFrame();
285         generateCoordinates();
286         gmx::test::TestReferenceChecker frameCompound(
287                 checker_.checkCompound("EvaluatedPositions", "Frame0"));
288         updateAndCheck(pc, p, evalCount, evalAtoms, &frameCompound, NULL);
289     }
290 }
291
292 void PositionCalculationTest::setTopologyIfRequired()
293 {
294     if (bTopSet_)
295     {
296         return;
297     }
298     std::vector<gmx_ana_poscalc_t *>::const_iterator pci;
299     for (pci = pcList_.begin(); pci != pcList_.end(); ++pci)
300     {
301         if (gmx_ana_poscalc_requires_top(*pci))
302         {
303             bTopSet_ = true;
304             pcc_.setTopology(topManager_.topology());
305             return;
306         }
307     }
308 }
309
310 void PositionCalculationTest::checkPositions(
311         gmx::test::TestReferenceChecker *checker,
312         const char *name, gmx_ana_pos_t *p, bool bCoordinates)
313 {
314     gmx::test::TestReferenceChecker compound(
315             checker->checkCompound("Positions", name));
316     compound.checkInteger(p->count(), "Count");
317     const char *type = "???";
318     switch (p->m.type)
319     {
320         case INDEX_UNKNOWN: type = "unknown";   break;
321         case INDEX_ATOM:    type = "atoms";     break;
322         case INDEX_RES:     type = "residues";  break;
323         case INDEX_MOL:     type = "molecules"; break;
324         case INDEX_ALL:     type = "single";    break;
325     }
326     compound.checkString(type, "Type");
327     compound.checkSequenceArray(p->count() + 1, p->m.mapb.index, "Block");
328     for (int i = 0; i < p->count(); ++i)
329     {
330         gmx::test::TestReferenceChecker posCompound(
331                 compound.checkCompound("Position", NULL));
332         posCompound.checkSequence(&p->m.mapb.a[p->m.mapb.index[i]],
333                                   &p->m.mapb.a[p->m.mapb.index[i+1]],
334                                   "Atoms");
335         posCompound.checkInteger(p->m.refid[i], "RefId");
336         if (bCoordinates)
337         {
338             posCompound.checkVector(p->x[i], "Coordinates");
339         }
340         if (bCoordinates && p->v != NULL)
341         {
342             posCompound.checkVector(p->v[i], "Velocity");
343         }
344         if (bCoordinates && p->f != NULL)
345         {
346             posCompound.checkVector(p->f[i], "Force");
347         }
348         int originalIdIndex = (p->m.refid[i] != -1 ? p->m.refid[i] : i);
349         EXPECT_EQ(p->m.orgid[originalIdIndex], p->m.mapid[i]);
350     }
351 }
352
353 /********************************************************************
354  * Actual tests
355  */
356
357 TEST_F(PositionCalculationTest, ComputesAtomPositions)
358 {
359     const int group[] = { 0, 1, 2, 3 };
360     topManager_.requestVelocities();
361     topManager_.requestForces();
362     topManager_.initAtoms(4);
363     testSingleStatic(POS_ATOM, 0, false, group);
364 }
365
366 TEST_F(PositionCalculationTest, ComputesResidueCOGPositions)
367 {
368     const int group[] = { 0, 1, 2, 3, 4, 8 };
369     topManager_.requestVelocities();
370     topManager_.requestForces();
371     topManager_.initAtoms(9);
372     topManager_.initUniformResidues(3);
373     testSingleStatic(POS_RES, 0, true, group);
374 }
375
376 TEST_F(PositionCalculationTest, ComputesResidueCOMPositions)
377 {
378     const int group[] = { 0, 1, 2, 3, 4, 8 };
379     topManager_.requestVelocities();
380     topManager_.requestForces();
381     topManager_.initAtoms(9);
382     topManager_.initUniformResidues(3);
383     testSingleStatic(POS_RES, POS_MASS, true, group);
384 }
385
386 TEST_F(PositionCalculationTest, ComputesGroupCOGPositions)
387 {
388     const int group[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8 };
389     topManager_.requestVelocities();
390     topManager_.requestForces();
391     topManager_.initAtoms(9);
392     // Topology (masses) is requires for computing the force
393     testSingleStatic(POS_ALL, 0, true, group);
394 }
395
396 TEST_F(PositionCalculationTest, ComputesGroupCOMPositions)
397 {
398     const int group[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8 };
399     topManager_.requestVelocities();
400     topManager_.requestForces();
401     topManager_.initAtoms(9);
402     testSingleStatic(POS_ALL, POS_MASS, true, group);
403 }
404
405 TEST_F(PositionCalculationTest, ComputesPositionsWithCompleteWhole)
406 {
407     const int group[] = { 0, 1, 2, 3, 4, 8 };
408     topManager_.initAtoms(9);
409     topManager_.initUniformResidues(3);
410     testSingleStatic(POS_RES, POS_COMPLWHOLE, true, group);
411 }
412
413 TEST_F(PositionCalculationTest, ComputesPositionsWithCompleteMax)
414 {
415     const int maxGroup[]  = { 0, 1, 4, 5, 6, 8 };
416     const int evalGroup[] = { 0, 1, 5, 6 };
417     topManager_.initAtoms(9);
418     topManager_.initUniformResidues(3);
419     testSingleDynamic(POS_RES, POS_COMPLMAX, true, maxGroup, evalGroup);
420 }
421
422 TEST_F(PositionCalculationTest, ComputesPositionMask)
423 {
424     const int maxGroup[]  = { 0, 1, 2, 3, 4, 5 };
425     const int evalGroup[] = { 1, 2, 4 };
426     topManager_.initAtoms(6);
427     testSingleDynamic(POS_ATOM, POS_MASKONLY, false, maxGroup, evalGroup);
428 }
429
430 // TODO: Check for POS_ALL_PBC
431
432 TEST_F(PositionCalculationTest, HandlesIdenticalStaticCalculations)
433 {
434     const int group[] = { 0, 1, 4, 5, 6, 7 };
435     topManager_.initAtoms(9);
436     topManager_.initUniformResidues(3);
437
438     gmx_ana_poscalc_t *pc1 = createCalculation(POS_RES, 0);
439     gmx_ana_poscalc_t *pc2 = createCalculation(POS_RES, 0);
440     gmx_ana_poscalc_t *pc3 = createCalculation(POS_RES, 0);
441     setMaximumGroup(pc1, group);
442     setMaximumGroup(pc2, group);
443     setMaximumGroup(pc3, group);
444     gmx_ana_pos_t *p1 = initPositions(pc1, "Positions");
445     gmx_ana_pos_t *p2 = initPositions(pc2, "Positions");
446     gmx_ana_pos_t *p3 = initPositions(pc3, "Positions");
447     checkInitialized();
448     {
449         pcc_.initEvaluation();
450         pcc_.initFrame();
451         generateCoordinates();
452         gmx::test::TestReferenceChecker frameCompound(
453                 checker_.checkCompound("EvaluatedPositions", "Frame0"));
454         updateAndCheck(pc1, p1, group, &frameCompound, "Positions");
455         updateAndCheck(pc2, p2, group, &frameCompound, "Positions");
456         updateAndCheck(pc3, p3, group, &frameCompound, "Positions");
457     }
458 }
459
460 TEST_F(PositionCalculationTest, HandlesOverlappingStaticCalculations)
461 {
462     const int group1[] = { 0, 1, 4, 5 };
463     const int group2[] = { 4, 5, 7, 8 };
464     topManager_.initAtoms(9);
465     topManager_.initUniformResidues(3);
466
467     gmx_ana_poscalc_t *pc1 = createCalculation(POS_RES, 0);
468     gmx_ana_poscalc_t *pc2 = createCalculation(POS_RES, 0);
469     setMaximumGroup(pc1, group1);
470     setMaximumGroup(pc2, group2);
471     gmx_ana_pos_t *p1 = initPositions(pc1, "P1");
472     gmx_ana_pos_t *p2 = initPositions(pc2, "P2");
473     checkInitialized();
474     {
475         pcc_.initEvaluation();
476         pcc_.initFrame();
477         generateCoordinates();
478         gmx::test::TestReferenceChecker frameCompound(
479                 checker_.checkCompound("EvaluatedPositions", "Frame0"));
480         updateAndCheck(pc1, p1, group1, &frameCompound, "P1");
481         updateAndCheck(pc2, p2, group2, &frameCompound, "P2");
482     }
483 }
484
485 // TODO: Check for handling of more multiple calculation cases
486
487 } // namespace