#include <stdio.h>
#include <stdlib.h>
#include <math.h>

#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <assert.h>
#include <string.h>
#include <limits.h>
#include <unistd.h>
#include <errno.h>

#include "config.h"


int catint(char *name) {
    FILE* f = fopen(name, "r");
    int i = 0;
    if (fscanf(f, "%d", &i) != 1)
        i = -1;
    fclose(f);
    return i;
}

char *color_stop;
char *color_red;
char *color_orange;
char *color_green;
char *color_none;

char *color(int low,int mid,int rev,int value) {
    if (value>mid) {
        return rev ? color_red : color_green;
    } else if (value>low) {
        return color_orange;
    }
    return rev ? color_green : color_red;
}

int main(int argc, char *argv[]) {
    if (argc<=2) {
        fprintf(stderr, "Usage: %s <term|pango> <sensor1> [sensor2] ...\n", argv[0]);
        fflush(stderr);
        return 1;
    }

    char *color;
    if (!strcmp(argv[1],"term")) {
        color_stop = "\x1b[0m";
        color_red = "\x1b[1;31m";
        color_green = "\x1b[1;32m";
        color_orange = "\x1b[1;33m";
        color_none = color_stop;
    } else if (!strcmp(argv[1],"pango")) {
        color_stop = "</span>";
        color_red = "<span color='#f33'>";
        color_green = "<span color='#0f0'>";
        color_orange = "<span color='#fa0'>";
        color_none = "<span>";
    } else {
        color_stop = color_red = color_green = color_orange = color_none = "";
    }

    int sleeptime = UPDATE_PERIOD;
    int alertflash = 1;
    while (1) {
        int i;
        int maxtemp = 0;
        for (i=2;i<argc;i++) {
            int temp = catint(argv[i]);
            if (temp > maxtemp)
                maxtemp = temp;
        }

        float ctemp = maxtemp/1000;

        if (ctemp <= GREEN_VALUE)
            color = color_green;
        else if (ctemp >= RED_VALUE)
            color = color_red;
        else if (ctemp >= ORANGE_VALUE)
            color = color_orange;
        else
            color = color_none;

#ifdef FLASH_AFTER
        if (ctemp >= FLASH_AFTER) {
            sleeptime = 1;
            alertflash = !alertflash;
        } else {
            sleeptime = UPDATE_PERIOD;
            alertflash = 1;
        }
#endif
        if (alertflash) {
            printf("%s%2.1f%s\n",color, ctemp, color_stop);
        } else {
            int len = snprintf(NULL, 0, "%2.1f", ctemp);
            for (i=0; i<len; i++)
                printf(" ");
            printf("\n");
        }
        fflush(stdout);
        sleep(sleeptime);
    }
}