misc.h

   1
   2 ///////////////////////////////////////////////////////////////////////////
   3 // This program is free software: you can redistribute it and/or modify  //
   4 // it under the terms of the version 3 of the GNU General Public License //
   5 // as published by the Free Software Foundation.                         //
   6 //                                                                       //
   7 // This program is distributed in the hope that it will be useful, but   //
   8 // WITHOUT ANY WARRANTY; without even the implied warranty of            //
   9 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      //
  10 // General Public License for more details.                              //
  11 //                                                                       //
  12 // You should have received a copy of the GNU General Public License     //
  13 // along with this program. If not, see <http://www.gnu.org/licenses/>.  //
  14 //                                                                       //
  15 // Written by Francois Fleuret, (C) IDIAP                                //
  16 // Contact <francois.fleuret@idiap.ch> for comments & bug reports        //
  17 ///////////////////////////////////////////////////////////////////////////
  18
  19 #ifndef MISC_H
  20 #define MISC_H
  21
  22 #include <iostream>
  23 #include <cmath>
  24 #include <fstream>
  25 #include <cfloat>
  26 #include <stdlib.h>
  27 #include <string.h>
  28
  29 using namespace std;
  30
  31 //typedef double scalar_t;
  32 typedef float scalar_t;
  33 const scalar_t SCALAR_MAX = FLT_MAX;
  34 const scalar_t SCALAR_MIN = FLT_MIN;
  35
  36 const int buffer_size = 1024;
  37 const int large_buffer_size = 65536;
  38
  39 using namespace std;
  40
  41 #ifdef DEBUG
  42 #define ASSERT(x) if(!(x)) { \
  43   std::cerr << "ASSERT FAILED IN " << __FILE__ << ":" << __LINE__ << endl; \
  44   abort(); \
  45 }
  46 #else
  47 #define ASSERT(x)
  48 #endif
  49
  50 template<class T>
  51 T smooth_min(T x, T y) {
  52   T z = exp(x - y);
  53   return 0.5 * (x + y - (x - y)/(1 + 1/z) - (y - x)/(1 + z));
  54 }
  55
  56 template <class T>
  57 void write_var(ostream *os, const T *x) { os->write((char *) x, sizeof(T)); }
  58
  59 template <class T>
  60 void read_var(istream *is, T *x) { is->read((char *) x, sizeof(T)); }
  61
  62 template <class T>
  63 void grow(int *nb_max, int nb, T** current, int factor) {
  64   ASSERT(*nb_max > 0);
  65   if(nb == *nb_max) {
  66     T *tmp = new T[*nb_max * factor];
  67     memcpy(tmp, *current, *nb_max * sizeof(T));
  68     delete[] *current;
  69     *current = tmp;
  70     *nb_max *= factor;
  71   }
  72 }
  73
  74 template <class T>
  75 inline T sq(T x) {
  76   return x * x;
  77 }
  78
  79 inline scalar_t log2(scalar_t x) {
  80   return log(x)/log(2.0);
  81 }
  82
  83 inline scalar_t xi(scalar_t x) {
  84   if(x <= 0.0) return 0.0;
  85   else         return - x * log(x)/log(2.0);
  86 }
  87
  88 scalar_t discrete_entropy(int *n, int nb);
  89
  90 char *basename(char *name);
  91
  92 char *next_word(char *buffer, char *r, int buffer_size);
  93
  94 void random_permutation(int *val, int nb);
  95 void tag_subset(bool *val, int nb_total, int nb_to_tag);
  96
  97 struct Couple {
  98   int index;
  99   scalar_t value;
 100 };
 101
 102 int compare_couple(const void *a, const void *b);
 103
 104 //  size       total program size
 105 //  resident   resident set size
 106 //  share      shared pages
 107 //  text       text (code)
 108 //  lib        library
 109 //  data       data/stack
 110 //  dt         dirty pages (unused in Linux 2.6)
 111
 112 void used_memory(size_t &size, size_t &resident,
 113                  size_t &share, size_t &text, size_t &lib, size_t &data,
 114                  size_t &dt);
 115
 116 #endif