[14de469] | 1 | /** \file helpers.hpp
|
---|
| 2 | *
|
---|
[6ac7ee] | 3 | * Declaration of some auxiliary functions for memory dis-/allocation and so on
|
---|
[14de469] | 4 | */
|
---|
| 5 |
|
---|
| 6 | #ifndef HELPERS_HPP_
|
---|
| 7 | #define HELPERS_HPP_
|
---|
| 8 |
|
---|
| 9 | using namespace std;
|
---|
| 10 |
|
---|
[f66195] | 11 | /*********************************************** includes ***********************************/
|
---|
| 12 |
|
---|
[cd4ccc] | 13 | // include config.h
|
---|
| 14 | #ifdef HAVE_CONFIG_H
|
---|
| 15 | #include <config.h>
|
---|
| 16 | #endif
|
---|
| 17 |
|
---|
[14de469] | 18 | #include <fstream>
|
---|
| 19 |
|
---|
[99593f] | 20 | #include "defs.hpp"
|
---|
[e138de] | 21 | #include "log.hpp"
|
---|
[29812d] | 22 | #include "memoryallocator.hpp"
|
---|
[6dea43] | 23 |
|
---|
[99593f] | 24 | /********************************************** definitions *********************************/
|
---|
| 25 |
|
---|
[14de469] | 26 | /********************************************** helpful functions *********************************/
|
---|
| 27 |
|
---|
[d3a46d] | 28 | // taken out of TREMOLO
|
---|
| 29 | /*@-namechecks@*/
|
---|
| 30 | #ifndef __GNUC__
|
---|
| 31 | # undef __attribute__
|
---|
| 32 | # define __attribute__(x)
|
---|
| 33 | #endif
|
---|
| 34 | /*@=namechecks@*/
|
---|
| 35 |
|
---|
| 36 | /* Behandelt aufgetretene Fehler. error ist der Fehlertyp(enum Errors)
|
---|
[042f82] | 37 | void *SpecialData ist ein untypisierter Zeiger auf Spezielle Daten zur Fehlerbehandlung.
|
---|
| 38 | Man koennte auch noch einen Zeiger auf eine Funktion uebergeben */
|
---|
[d3a46d] | 39 | extern void /*@exits@*/ debug(const char *output);
|
---|
[042f82] | 40 | //__attribute__ ((__return__));
|
---|
[d3a46d] | 41 | #define debug(data) debug_in((data), __FILE__, __LINE__)
|
---|
| 42 |
|
---|
| 43 | extern void /*@exits@*/ debug_in(const char *output,
|
---|
[042f82] | 44 | const char *file, const int line);
|
---|
| 45 | //__attribute__ ((__return__));
|
---|
[d3a46d] | 46 |
|
---|
[14de469] | 47 | double ask_value(const char *text);
|
---|
| 48 | bool check_bounds(double *x, double *cell_size);
|
---|
| 49 | void bound(double *b, double lower_bound, double upper_bound);
|
---|
[5034e1] | 50 | int CountLinesinFile(ifstream &InputFile);
|
---|
[14de469] | 51 | char *FixedDigitNumber(const int FragmentNumber, const int digits);
|
---|
[e198c7] | 52 | bool IsValidNumber( const char *string);
|
---|
[f66195] | 53 | int CompareDoubles (const void * a, const void * b);
|
---|
[99593f] | 54 | double * ReturnFullMatrixforSymmetric(const double * const cell_size);
|
---|
| 55 | double * InverseMatrix(const double * const A);
|
---|
[6cd79d] | 56 | void performCriticalExit();
|
---|
[14de469] | 57 |
|
---|
[6d35e4] | 58 | /********************************************** helpful template functions *********************************/
|
---|
| 59 |
|
---|
[c144ed2] | 60 |
|
---|
[9dbea5] | 61 | /** returns greater of the two values.
|
---|
| 62 | * \param x first value
|
---|
| 63 | * \param y second value
|
---|
| 64 | * \return greater of the two (by operator>())
|
---|
| 65 | */
|
---|
[76102e] | 66 | template <typename T> T Max(T x, T y)
|
---|
[9dbea5] | 67 | {
|
---|
| 68 | if (x > y)
|
---|
| 69 | return x;
|
---|
| 70 | else return y;
|
---|
| 71 | };
|
---|
| 72 |
|
---|
| 73 | /** returns smaller of the two values.
|
---|
| 74 | * \param x first value
|
---|
| 75 | * \param y second value
|
---|
| 76 | * \return smaller of the two (by operator<())
|
---|
| 77 | */
|
---|
[76102e] | 78 | template <typename T> T Min(T x, T y)
|
---|
[9dbea5] | 79 | {
|
---|
| 80 | if (x < y)
|
---|
| 81 | return x;
|
---|
| 82 | else return y;
|
---|
| 83 | };
|
---|
| 84 |
|
---|
[8f75a4] | 85 | /** Creates a lookup table for true father's Atom::Nr -> atom ptr.
|
---|
| 86 | * \param *start begin of chain list
|
---|
| 87 | * \paran *end end of chain list
|
---|
| 88 | * \param **Lookuptable pointer to return allocated lookup table (should be NULL on start)
|
---|
[3c349b] | 89 | * \param count optional predetermined size for table (otherwise we set the count to highest true father id)
|
---|
[8f75a4] | 90 | * \return true - success, false - failure
|
---|
| 91 | */
|
---|
[e138de] | 92 | template <typename T> bool CreateFatherLookupTable(T *start, T *end, T **&LookupTable, int count = 0)
|
---|
[8f75a4] | 93 | {
|
---|
[042f82] | 94 | bool status = true;
|
---|
| 95 | T *Walker = NULL;
|
---|
| 96 | int AtomNo;
|
---|
| 97 |
|
---|
| 98 | if (LookupTable != NULL) {
|
---|
[a67d19] | 99 | DoLog(0) && (Log() << Verbose(0) << "Pointer for Lookup table is not NULL! Aborting ..." <<endl);
|
---|
[042f82] | 100 | return false;
|
---|
| 101 | }
|
---|
| 102 |
|
---|
| 103 | // count them
|
---|
| 104 | if (count == 0) {
|
---|
| 105 | Walker = start;
|
---|
| 106 | while (Walker->next != end) { // create a lookup table (Atom::nr -> atom) used as a marker table lateron
|
---|
| 107 | Walker = Walker->next;
|
---|
| 108 | count = (count < Walker->GetTrueFather()->nr) ? Walker->GetTrueFather()->nr : count;
|
---|
| 109 | }
|
---|
| 110 | }
|
---|
| 111 | if (count <= 0) {
|
---|
[a67d19] | 112 | DoLog(0) && (Log() << Verbose(0) << "Count of lookup list is 0 or less." << endl);
|
---|
[042f82] | 113 | return false;
|
---|
| 114 | }
|
---|
| 115 |
|
---|
[7218f8] | 116 | // allocate and fill
|
---|
| 117 | LookupTable = Calloc<T*>(count, "CreateFatherLookupTable - **LookupTable");
|
---|
[042f82] | 118 | if (LookupTable == NULL) {
|
---|
[58ed4a] | 119 | DoeLog(0) && (eLog()<< Verbose(0) << "LookupTable memory allocation failed!" << endl);
|
---|
[e359a8] | 120 | performCriticalExit();
|
---|
[042f82] | 121 | status = false;
|
---|
| 122 | } else {
|
---|
| 123 | Walker = start;
|
---|
| 124 | while (Walker->next != end) { // create a lookup table (Atom::nr -> atom) used as a marker table lateron
|
---|
| 125 | Walker = Walker->next;
|
---|
| 126 | AtomNo = Walker->GetTrueFather()->nr;
|
---|
| 127 | if ((AtomNo >= 0) && (AtomNo < count)) {
|
---|
| 128 | //*out << "Setting LookupTable[" << AtomNo << "] to " << *Walker << endl;
|
---|
| 129 | LookupTable[AtomNo] = Walker;
|
---|
| 130 | } else {
|
---|
[a67d19] | 131 | DoLog(0) && (Log() << Verbose(0) << "Walker " << *Walker << " exceeded range of nuclear ids [0, " << count << ")." << endl);
|
---|
[042f82] | 132 | status = false;
|
---|
| 133 | break;
|
---|
| 134 | }
|
---|
| 135 | }
|
---|
| 136 | }
|
---|
| 137 |
|
---|
| 138 | return status;
|
---|
[8f75a4] | 139 | };
|
---|
| 140 |
|
---|
[6d35e4] | 141 | /** Frees a two-dimensional array.
|
---|
| 142 | * \param *ptr pointer to array
|
---|
| 143 | * \param dim first dim of array
|
---|
| 144 | */
|
---|
| 145 | template <typename X> void Free2DArray(X **ptr, int dim)
|
---|
| 146 | {
|
---|
[042f82] | 147 | int i;
|
---|
| 148 | if (ptr != NULL) {
|
---|
| 149 | for(i=dim;i--;)
|
---|
| 150 | if (ptr[i] != NULL)
|
---|
| 151 | free(ptr[i]);
|
---|
| 152 | free(ptr);
|
---|
| 153 | }
|
---|
[6d35e4] | 154 | };
|
---|
[14de469] | 155 |
|
---|
[5034e1] | 156 | template <typename T> void Increment(T *value, T *inc)
|
---|
[e9f8f9] | 157 | {
|
---|
[5034e1] | 158 | *value += *inc;
|
---|
[e9f8f9] | 159 | };
|
---|
| 160 |
|
---|
[5034e1] | 161 | template <typename T> void AbsoluteValue(T *value, T *abs)
|
---|
[e9f8f9] | 162 | {
|
---|
[5034e1] | 163 | *value = *abs;
|
---|
[e9f8f9] | 164 | };
|
---|
| 165 |
|
---|
[5034e1] | 166 | template <typename T> void IncrementalAbsoluteValue(T *value, T *abs)
|
---|
| 167 | {
|
---|
| 168 | *value = *abs;
|
---|
| 169 | (*abs) += 1;
|
---|
| 170 | };
|
---|
[14de469] | 171 |
|
---|
[7dad10] | 172 | #define PLURAL_S(v) (((v)==1)?"":"s")
|
---|
[f66195] | 173 |
|
---|
[6e97e5] | 174 | // this is to allow different modes of access for
|
---|
| 175 | // maps and sets
|
---|
| 176 | template<typename Res,typename T>
|
---|
| 177 | struct _take{
|
---|
| 178 | Res get(T value) const;
|
---|
| 179 | };
|
---|
| 180 |
|
---|
| 181 | // if we have a set,vector etc we can directly access the result
|
---|
| 182 | template<typename Res>
|
---|
| 183 | struct _take<Res,Res>{
|
---|
| 184 | static inline Res get(Res value){
|
---|
| 185 | return value;
|
---|
| 186 | }
|
---|
| 187 | };
|
---|
| 188 |
|
---|
| 189 | // if we have a map we have to access the second part of
|
---|
| 190 | // the pair
|
---|
| 191 | template<typename Res,typename T1>
|
---|
| 192 | struct _take<Res,std::pair<T1,Res> >{
|
---|
| 193 | static inline Res get(std::pair<T1,Res> value){
|
---|
| 194 | return value.second;
|
---|
| 195 | }
|
---|
| 196 | };
|
---|
| 197 |
|
---|
[14de469] | 198 | #endif /*HELPERS_HPP_*/
|
---|