---

utilities.h

Go to the documentation of this file.

/***************************************************************************
 *cr                                                                       
 *cr            (C) Copyright 1995-2008 The Board of Trustees of the           
 *cr                        University of Illinois                       
 *cr                         All Rights Reserved                        
 *cr                                                                   
 ***************************************************************************/

/***************************************************************************
 * RCS INFORMATION:
 *
 *      $RCSfile: utilities.h,v $
 *      $Author: johns $        $Locker:  $             $State: Exp $
 *      $Revision: 1.87 $       $Date: 2008/08/13 22:23:32 $
 *
 ***************************************************************************
 * DESCRIPTION:
 *
 * General utility routines and definitions.
 *
 ***************************************************************************/
#ifndef UTILITIES_H
#define UTILITIES_H

#ifndef FALSE
#define FALSE 0
#define TRUE  1
#endif

#ifndef NULL
#define NULL 0
#endif

#ifndef ABS
#define ABS(A) ((A)>0?(A):-(A))
#endif

// various PI macros not available on all machines
#define VMD_PI      3.14159265358979323846
#define VMD_TWOPI   (2.0 * VMD_PI)
#define VMD_1_PI    0.31830988618379067154

// Degree-to-Radians and Radians-to-Degrees Conversion macros
#define DEGTORAD(a)     (a*VMD_PI/180.0)
#define RADTODEG(a)     (a*180.0/VMD_PI)

extern char *combine_arguments(int, const char **, int);


extern char *stringdup(const char *);


extern char *stringtoupper(char *);

void stripslashes(char *str);

extern int strupcmp(const char *, const char *);
extern int strupncmp(const char *, const char *, int);


extern void breakup_filename(const char *, char **, char **);

extern char *str_tokenize(const char *, int *, char **);

extern double time_of_day(void);

typedef void * vmd_timerhandle;            
vmd_timerhandle vmd_timer_create(void);    
void vmd_timer_destroy(vmd_timerhandle);   
void vmd_timer_start(vmd_timerhandle);     
void vmd_timer_stop(vmd_timerhandle);      
double vmd_timer_time(vmd_timerhandle);    
double vmd_timer_timenow(vmd_timerhandle); 

typedef struct {
  vmd_timerhandle timer;
  double updatetime;
} msgtimer;

extern msgtimer * msg_timer_create(double updatetime);

extern int msg_timer_timeout(msgtimer *time);

void msg_timer_destroy(msgtimer * mt);

extern int vmd_check_stdin(void);

extern char * vmd_username(void);
extern int vmd_getuid(void);

inline int clamp_int(int val, int min, int max) {
  return   (val > min) ? ((val <= max) ? val : max) : 0;
}

extern float * cross_prod(float *x1, const float *x2, const float *x3);

inline float dot_prod(const float *v1, const float *v2) {
  return v1[0]* v2[0] + v1[1]* v2[1] + v1[2] * v2[2];
}

inline double dot_prod(const double *v1, const double *v2) {
  return v1[0]* v2[0] + v1[1]* v2[1] + v1[2] * v2[2];
}

inline void vec_copy(float *v1, const float *v2) {
  v1[0] = v2[0];
  v1[1] = v2[1];
  v1[2] = v2[2];
}

extern float * vec_normalize(float *);

inline void vec_sub(float *a, const float *b, const float *c) {
  a[0]=b[0]-c[0];
  a[1]=b[1]-c[1];
  a[2]=b[2]-c[2];
}

inline void vec_add(float *a, const float *b, const float *c) {
  a[0]=b[0]+c[0];
  a[1]=b[1]+c[1];
  a[2]=b[2]+c[2];
}

inline void vec_incr(float *a, const float *b) {
  a[0] += b[0];
  a[1] += b[1];
  a[2] += b[2];
}

inline void vec_scale(float *a, float b, const float *c) {
  a[0] = b*c[0];
  a[1] = b*c[1];
  a[2] = b*c[2];
}

inline void vec_scale(float *a, float b, const double *c) {
  a[0] = b * (float) c[0];
  a[1] = b * (float) c[1];
  a[2] = b * (float) c[2];
}

inline void vec_negate(float *a, const float *b) {
  a[0] = -b[0];
  a[1] = -b[1];
  a[2] = -b[2];
}

inline void vec_scaled_add(float *a, float b, const float *c) {
  a[0] += b*c[0];
  a[1] += b*c[1];
  a[2] += b*c[2];
}

inline void vec_triad(float *a, const float *b, float c, const float *d) {
  a[0] = b[0] + c*d[0];
  a[1] = b[1] + c*d[1];
  a[2] = b[2] + c*d[2];
}

inline void vec_lerp(float *a, const float *b, const float *c, float frac) {
  float diff[3], tmp[3];
  vec_sub(diff, c, b);
  vec_scale(tmp, frac, diff);
  vec_add(a, b, tmp);
}

inline void vec_zero(float *a) {
  a[0] = 0.0f;
  a[1] = 0.0f;
  a[2] = 0.0f;
}

inline void clamp_color(float *rgb) {
  // clamp color values to legal range
  if (rgb[0] < 0.0f)
    rgb[0] = 0.0f;
  if (rgb[0] > 1.0f)
    rgb[0] = 1.0f;

  if (rgb[1] < 0.0f)
    rgb[1] = 0.0f;
  if (rgb[1] > 1.0f)
    rgb[1] = 1.0f;

  if (rgb[1] < 0.0f)
    rgb[1] = 0.0f;
  if (rgb[1] > 1.0f)
    rgb[1] = 1.0f;
}


inline void midpoint(float *a, const float *b, const float *c) {
  a[0] = 0.5f * (b[0]+c[0]);
  a[1] = 0.5f * (b[1]+c[1]);
  a[2] = 0.5f * (b[2]+c[2]);
}


// These define a cubic spline with various bases
// see Foley and Van Dam, et. al., Computer Graphics, p505 or so
//
// this one was too sharply curved for my tastes
//
// float CatmullRom_basis[4][4]={{-1.0/2.0,  3.0/2.0, -3.0/2.0,  1.0/2.0},
//                               { 2.0/2.0, -5.0/2.0,  4.0/2.0, -1.0/2.0},
//                               {-1.0/2.0,  0.0/2.0,  1.0/2.0,  0.0/2.0},
//                               { 0.0/2.0,  2.0/2.0,  0.0/2.0,  0.0/2.0}};
//
// this define makes the next basis identical to CatmullRom
// #define SLOPE 2.0f
//
// This deemphasizes the slope and makes things look nicer (IMHO)
// #define SLOPE 1.25f
//
// float modified_CR_basis[4][4] = {
//    {-1.0f/SLOPE,  -1.0f/SLOPE + 2.0f,  1.0f/SLOPE - 2.0f,  1.0f/SLOPE},
//    { 2.0f/SLOPE,   1.0f/SLOPE - 3.0f,   -2.0f/SLOPE+3.0f, -1.0f/SLOPE},
//    {-1.0f/SLOPE,                0.0f,         1.0f/SLOPE,        0.0f},
//    {       0.0f,                1.0f,               0.0f,        0.0f}
// };
//
// This doesn't describe the system very nicely as the lines don't
// go through the control points (which are the C-alphas)
// float Bspline_basis[4][4]={{-1.0/6.0,  3.0/6.0, -3.0/6.0,  1.0/6.0},
//                            { 3.0/6.0, -6.0/6.0,  3.0/6.0,  0.0/6.0},
//                            {-3.0/6.0,  0.0/6.0,  3.0/6.0,  0.0/6.0},
//                            { 1.0/6.0,  4.0/6.0,  1.0/6.0,  0.0/6.0}};

inline void create_Bspline_basis(float array[4][4]) {
  array[0][0] = -1.0f/6.0f;
  array[0][1] =  3.0f/6.0f;
  array[0][2] = -3.0f/6.0f;
  array[0][3] =  1.0f/6.0f;
  array[1][0] =  3.0f/6.0f;
  array[1][1] = -6.0f/6.0f;
  array[1][2] =  3.0f/6.0f;
  array[1][3] =  0.0f/6.0f;
  array[2][0] = -3.0f/6.0f;
  array[2][1] =  0.0f/6.0f;
  array[2][2] =  3.0f/6.0f;
  array[2][3] =  0.0f/6.0f;
  array[3][0] =  1.0f/6.0f;
  array[3][1] =  4.0f/6.0f;
  array[3][2] =  1.0f/6.0f;
  array[3][3] =  0.0f/6.0f;
}

inline void create_modified_CR_spline_basis(float array[4][4], float slope) {
  array[0][0] = -1.0f / slope;
  array[0][1] = -1.0f / slope + 2.0f;
  array[0][2] =  1.0f / slope - 2.0f;
  array[0][3] =  1.0f / slope;
  array[1][0] =  2.0f / slope;
  array[1][1] =  1.0f / slope - 3.0f;
  array[1][2] = -2.0f / slope + 3.0f;
  array[1][3] = -1.0f / slope;
  array[2][0] = -1.0f / slope;
  array[2][1] =  0.0f;
  array[2][2] =  1.0f / slope;
  array[2][3] =  0.0f;
  array[3][0] =  0.0f;
  array[3][1] =  1.0f;
  array[3][2] =  0.0f;
  array[3][3] =  0.0f;
}

inline void make_spline_Q_matrix(float q[4][3], float basis[4][4], const float *pts) {
  int i, j;
  for (i = 0; i<4; i++) {
    float a, b, c;
    a = b = c = 0.0;

    for (j = 0; j<4; j++) {
      a += basis[i][j] * pts[j*3    ];
      b += basis[i][j] * pts[j*3 + 1];
      c += basis[i][j] * pts[j*3 + 2];
    }

    q[i][0] = a; 
    q[i][1] = b; 
    q[i][2] = c; 
  }
}

inline void make_spline_Q_matrix_noncontig(float q[4][3], float basis[4][4], 
                                        const float *pts1, const float *pts2,
                                        const float *pts3, const float *pts4) {
  int i;

  for (i = 0; i<4; i++) {
    float a, b, c;
    a = b = c = 0.0;

    a += basis[i][0] * pts1[0];
    b += basis[i][0] * pts1[1];
    c += basis[i][0] * pts1[2];

    a += basis[i][1] * pts2[0];
    b += basis[i][1] * pts2[1];
    c += basis[i][1] * pts2[2];

    a += basis[i][2] * pts3[0];
    b += basis[i][2] * pts3[1];
    c += basis[i][2] * pts3[2];

    a += basis[i][3] * pts4[0];
    b += basis[i][3] * pts4[1];
    c += basis[i][3] * pts4[2];

    q[i][0] = a; 
    q[i][1] = b; 
    q[i][2] = c; 
  }
}


inline void make_spline_interpolation(float out[3], float w, float q[4][3]) {
  out[0] = w * (w * (w * q[0][0] + q[1][0]) + q[2][0]) + q[3][0];
  out[1] = w * (w * (w * q[0][1] + q[1][1]) + q[2][1]) + q[3][1];
  out[2] = w * (w * (w * q[0][2] + q[1][2]) + q[2][2]) + q[3][2];
}

extern int tri_degenerate(const float *, const float *, const float *);

extern float angle(const float *, const float *);

extern float dihedral(const float *, const float *, const float *, 
                      const float *);

extern float distance(const float *, const float *);

inline float distance2(const float *a, const float *b) {
  float delta = a[0] - b[0];
  float r2 = delta*delta;
  delta = a[1] - b[1];
  r2 += delta*delta;
  delta = a[2] - b[2];
  return r2 + delta*delta;
}

extern float norm(const float *);

char *vmd_tempfile(const char *);

int vmd_delete_file(const char *);

void vmd_sleep(int);   // sleeps for N seconds
void vmd_msleep(int);  // sleeps for N milliseconds

extern int vmd_system(const char* cmd);


extern void vmd_srandom(unsigned int);
extern long vmd_random();
extern float vmd_random_gaussian();

// select the right VMD_RAND_MAX value depending on implementation and platform
#if defined(__linux) || defined(_MSC_VER)
// Linux uses RAND_MAX for both rand() and random()
// Windows is currently implemented with rand()
#define VMD_RAND_MAX RAND_MAX
#else
// All other platforms I've seen use 2^31-1 for their max random() return val
#if defined(LONG_MAX)
#define VMD_RAND_MAX LONG_MAX
#else
// just in case no LONG_MAX, 
// or in cases where they choose to update it for 64-bits or something
#define VMD_RAND_MAX 2147483647L
#endif
#endif

long vmd_get_total_physmem_mb(void);

long vmd_get_avail_physmem_mb(void);

long vmd_get_avail_physmem_percent(void);

#endif

---