#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <fcntl.h>
#include <errno.h> 
#include <unistd.h>


#include <linux/i2c-dev.h>
#include <sys/ioctl.h>
  
#include "lm75.h"
#include "hih61xx.h"
#include "hmc5883.h"

#define VERSION 1.22
 
// extern void lm75_print_help(void);
// extern void lm75_read_all(const char *opts);
// extern void lm75_read_one(const char *opts);
// extern void hih61xx_print_help(void);
// extern void hih61xx_read_all(const char *opts); 
// extern void hih61xx_read_one(const char *opts);


int file; 
char temp[256];
void (*print_all)(void) = NULL;
void (*read_all)(const char *opts) = NULL;
void (*read_one)(const char *opts) = NULL;
void (*conf_set)(const char *opts) = NULL;


void print_help(void) {  
    printf ("\n"
            "   i2sensors  <op> <bus> <dev_type> <dev_addr> (<options>)\n"
            "\n"
            "Aviable options: <op>\n"
            "   print_all -- list all available measurement parameters of the device\n"
            "   read_all  -- read all measured parameters from device\n"
            "   read_one  -- read the selected parameters from device\n"
            "   conf_set  -- set the configuration register\n"
            "\n"
            "Usage:\n"
            "   i2sensors read_all <bus> <device-type> <address> \n"
            "   i2sensors read_one <bus> <device-type> <address> <param-id,offset_for_param>\n"
            "   i2sensors conf_set <bus> <device-type> <address> <reg-id,word-of-bits>\n"
            "\n"
            "Examples:\n"
            "   i2sensors read_all 1 lm75 0x4f \n"
            "   i2sensors read_one 1 lm75 0x4f  00,-1.35\n"
            "\n" );
    printf ("Version:  v%1.2f,  build: %s %s\n\n",VERSION,__DATE__,__TIME__);
}

void bus_err(int ern){
    printf("I2C communication(rd) error. errno: %d\n",errno);
}

void preinit(const char *dev_type){

    if(!strcmp("lm75", dev_type)){
        print_all = lm75_print_all;
        read_all = lm75_read_all;
        read_one = lm75_read_one;
        conf_set = lm75_conf_set;
    }

    else if(!strcmp("hih61xx", dev_type)) {                            
        print_all = hih61xx_print_all;
        read_all = hih61xx_read_all;
        read_one = hih61xx_read_one;
        conf_set = hih61xx_conf_set;
    }

    else if(!strcmp("hmc5883", dev_type)) {                            
        print_all = hmc5883_print_all;
        read_all = hmc5883_read_all;
        read_one = hmc5883_read_one;
        conf_set = hmc5883_conf_set;
    }
}



int main(int argc, char *argv[])
{
    
// >> i2sensor <op> <bus> <dev_typ> <dev_addr> (<others>) 
// >> i2sensor read_all 0 lm75 4f 1,-1.0;2,+0.2;3,+10;4,-2
//    read_all, list_all, 
//    ...read_all...<dev_addr>, <param_id,offs,param_id,offs>    
//    read_one...<dev_addr>, <param_id,offs>    
//    ...read_reg_hex... <dev_addr>, <reg_addr,b/w/dw> 
//    ...read_reg_dec... <dev_addr>, <reg_addr,b/w/dw>
//    ...set_param... <dev_addr>, <param_id,value_dec>
//    ...set_reg... <dev_addr>, <reg_addr,value_hex>    
    

    if(4 < argc && argc < 10)  //Minimal 5 argument passed
    {
        
        char filename[32];
        int i;
        preinit(argv[3]);

        for(i=0;i<strlen(argv[2]);i++)  //Some test on bus address, for safety.
        {
            if(!isdigit(argv[2][i])){
                printf("\n\tThe BUS Address must be an integer\n\n");
                print_help();
                exit (EXIT_FAILURE);
            }
        }
        snprintf(filename, 31, "/dev/i2c-%s", argv[2]);   //Open i2c bus
        file = open(filename, O_RDWR);
    
        if (file < 0){
            printf("\n\tCan't open i2c BUS. Have you any permission?\n\n");    
            print_help();
            exit (EXIT_FAILURE);
        }


        if(argv[4][0]=='0' && argv[4][1]=='x'){     // Hexadecimal device address

            long addr = (int)strtol(argv[4], NULL, 0);      //# strtol() is working with hex string

            if (ioctl(file, I2C_SLAVE, addr) < 0) 
            {
                printf("\n\tCan't open i2c DEVICE, errno: %d\n\n",errno);
                print_help();
                exit (EXIT_FAILURE);
            }
        }
        else
        {
            printf("\n\tThe DEVICE address must be a hexadecimal number\n\n");
            print_help();
            exit (EXIT_FAILURE);
        }
        
        
        
        if(!strcmp("print_all",argv[1]) && print_all != NULL)        // If list_all is selected.
        {
            print_all();
        }
        else if(!strcmp("read_all",argv[1]) && read_all != NULL)
        {
            // read_all(argv[5]);
            read_all(NULL);
        }
        else if(!strcmp("read_one",argv[1]) && read_one != NULL && argc > 5)
        {
            read_one(argv[5]);
        }
        else
        { 
            print_help();
        }
    
	close(file);
  
  }
  else
  {
    print_help();
  }
  return 0;
}