Joseph Redmon
2014-12-07 28e21152728cbea617948671df064ec75c7953e5
src/utils.c
@@ -1,12 +1,55 @@
#include "utils.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#include <float.h>
#include "utils.h"
char *find_replace(char *str, char *orig, char *rep)
{
    static char buffer[4096];
    char *p;
    if(!(p = strstr(str, orig)))  // Is 'orig' even in 'str'?
        return str;
    strncpy(buffer, str, p-str); // Copy characters from 'str' start to 'orig' st$
    buffer[p-str] = '\0';
    sprintf(buffer+(p-str), "%s%s", rep, p+strlen(orig));
    return buffer;
}
float sec(clock_t clocks)
{
    return (float)clocks/CLOCKS_PER_SEC;
}
void top_k(float *a, int n, int k, int *index)
{
    int i,j;
    float thresh = FLT_MAX;
    for(i = 0; i < k; ++i){
        float max = -FLT_MAX;
        int max_i = -1;
        for(j = 0; j < n; ++j){
            float val = a[j];
            if(val > max &&  val < thresh){
                max = val;
                max_i = j;
            }
        }
        index[i] = max_i;
        thresh = max;
    }
}
void error(char *s)
{
    fprintf(stderr, "Error: %s\n", s);
    perror(s);
    //fprintf(stderr, "Error: %s\n", s);
    exit(0);
}
@@ -66,7 +109,7 @@
char *fgetl(FILE *fp)
{
    if(feof(fp)) return 0;
    int size = 512;
    unsigned long size = 512;
    char *line = malloc(size*sizeof(char));
    if(!fgets(line, size, fp)){
        free(line);
@@ -74,11 +117,14 @@
    }
    int curr = strlen(line);
    while(line[curr-1]!='\n'){
        size *= 2;
        line = realloc(line, size*sizeof(char));
        if(!line) malloc_error();
        if(!line) {
            printf("%ld\n", size);
            malloc_error();
        }
        fgets(&line[curr], size-curr, fp);
        curr = strlen(line);
    }
@@ -113,42 +159,47 @@
int count_fields(char *line)
{
   int count = 0;
   int done = 0;
    int count = 0;
    int done = 0;
    char *c;
   for(c = line; !done; ++c){
      done = (*c == '\0');
      if(*c == ',' || done) ++count;
   }
   return count;
    for(c = line; !done; ++c){
        done = (*c == '\0');
        if(*c == ',' || done) ++count;
    }
    return count;
}
float *parse_fields(char *line, int n)
{
   float *field = calloc(n, sizeof(float));
   char *c, *p, *end;
   int count = 0;
   int done = 0;
   for(c = line, p = line; !done; ++c){
      done = (*c == '\0');
      if(*c == ',' || done){
         *c = '\0';
         field[count] = strtod(p, &end);
         if(p == c) field[count] = nan("");
         if(end != c && (end != c-1 || *end != '\r')) field[count] = nan(""); //DOS file formats!
         p = c+1;
         ++count;
      }
   }
   return field;
    float *field = calloc(n, sizeof(float));
    char *c, *p, *end;
    int count = 0;
    int done = 0;
    for(c = line, p = line; !done; ++c){
        done = (*c == '\0');
        if(*c == ',' || done){
            *c = '\0';
            field[count] = strtod(p, &end);
            if(p == c) field[count] = nan("");
            if(end != c && (end != c-1 || *end != '\r')) field[count] = nan(""); //DOS file formats!
            p = c+1;
            ++count;
        }
    }
    return field;
}
float mean_array(float *a, int n)
float sum_array(float *a, int n)
{
    int i;
    float sum = 0;
    for(i = 0; i < n; ++i) sum += a[i];
    return sum/n;
    return sum;
}
float mean_array(float *a, int n)
{
    return sum_array(a,n)/n;
}
float variance_array(float *a, int n)