Merge release-5-0 into master
[alexxy/gromacs.git] / src / gromacs / gmxpreprocess / read-conformation.cpp
1 /*
2  * This file is part of the GROMACS molecular simulation package.
3  *
4  * Copyright (c) 2014, by the GROMACS development team, led by
5  * Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
6  * and including many others, as listed in the AUTHORS file in the
7  * top-level source 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 #include "read-conformation.h"
36
37 #include "atomprop.h"
38 #include "types/simple.h"
39 #include "types/atoms.h"
40
41 #include "gromacs/fileio/confio.h"
42 #include "gromacs/utility/cstringutil.h"
43 #include "gromacs/utility/smalloc.h"
44
45 real *makeExclusionDistances(const t_atoms *a, gmx_atomprop_t aps,
46                              real defaultDistance, real scaleFactor)
47 {
48     int   i;
49     real *exclusionDistances;
50
51     snew(exclusionDistances, a->nr);
52     /* initialise arrays with distances usually based on van der Waals
53        radii */
54     fprintf(stderr, "Initialising inter-atomic distances...\n");
55     for (i = 0; (i < a->nr); i++)
56     {
57         if (!gmx_atomprop_query(aps, epropVDW,
58                                 *(a->resinfo[a->atom[i].resind].name),
59                                 *(a->atomname[i]), &(exclusionDistances[i])))
60         {
61             exclusionDistances[i] = defaultDistance;
62         }
63         else
64         {
65             exclusionDistances[i] *= scaleFactor;
66         }
67     }
68     return exclusionDistances;
69 }
70
71 char *readConformation(const char *confin, t_atoms *atoms, rvec **x, rvec **v,
72                        int *ePBC, matrix box)
73 {
74     char *title;
75     int   natoms;
76
77     snew(title, STRLEN);
78     get_stx_coordnum(confin, &natoms);
79
80     /* allocate memory for atom coordinates of configuration */
81     snew(*x, natoms);
82     if (v)
83     {
84         snew(*v, natoms);
85     }
86     init_t_atoms(atoms, natoms, FALSE);
87
88     /* read residue number, residue names, atomnames, coordinates etc. */
89     fprintf(stderr, "Reading solute configuration%s\n", v ? " and velocities" : "");
90     read_stx_conf(confin, title, atoms, *x, v ? *v : NULL, ePBC, box);
91     fprintf(stderr, "%s\nContaining %d atoms in %d residues\n",
92             title, atoms->nr, atoms->nres);
93
94     return title;
95 }