LCOM1920-T7G03.old1

#include <lcom/lcf.h>

#include <lcom/timer.h>

#include <stdint.h>

#include "i8254.h"

unsigned int count=0; //Initializing counter

int hook_id = TIMER0_IRQ;

int (timer_set_frequency)(uint8_t timer, uint32_t freq) {

    if(freq<19){

        return 1;

    }

    //freq=TIMER_FREQ/div, where TIMER_FREQ is the frequency of the clock and div os the value loaded nittially in the timer

    uint16_t div = (TIMER_FREQ /freq);

    uint8_t msb, lsb;

    util_get_LSB(div,&lsb);         //getting LSB

    util_get_MSB(div,&msb);         //getting MSB

    uint8_t st;

    if(timer_get_conf(timer,&st)==1){

        printf("Error getting conf in frequency set\n");

        return 1;

    }

    if(timer<0|timer>2){

        printf("Error selecting timer in frequency set\n");

        return 1;

    }

    else

    {

        if(timer==0){

            st= ((st & 0x0F)|TIMER_LSB_MSB|TIMER_SEL0);             //The mask 0x0F is used so that the 4 LSBs are not changed

            sys_outb(TIMER_CTRL,st);                                //Sends control word to program the timer

            sys_outb(TIMER_0,lsb);

            sys_outb(TIMER_0,msb);                                  //Both these functions program the timer

        }

        else if(timer==1){

            st= ((st & 0x0F)|TIMER_LSB_MSB|TIMER_SEL1);

            sys_outb(TIMER_CTRL,st);

            sys_outb(TIMER_1,lsb);

            sys_outb(TIMER_1,msb);

        }

        else if(timer==2){

            st= ((st & 0x0F)|TIMER_LSB_MSB|TIMER_SEL2);

            sys_outb(TIMER_CTRL,st);

            sys_outb(TIMER_2,lsb);

            sys_outb(TIMER_2,msb);

        }

    }

  return 0;

}

int (timer_subscribe_int)(uint8_t *bit_no) {

    *bit_no = BIT(hook_id);

    if(sys_irqsetpolicy(TIMER0_IRQ,IRQ_REENABLE,&hook_id)==1){      //operation to subscribe int

        printf("Error subscribing int\n");

        return 1;

    }

  return 0;

}

int (timer_unsubscribe_int)() {

  if(sys_irqrmpolicy(&hook_id)==1){

      printf("Error unsubscribing int\n");

      return 1;

  }

  return 0;

}

void (timer_int_handler)() {

  count++;

}

int (timer_get_conf)(uint8_t timer, uint8_t *st) {

    uint8_t read_back = (TIMER_RB_CMD | TIMER_RB_COUNT_ | TIMER_RB_SEL(timer)); //forming the read-back command (TIMER_RB_CMD (bit 7 and 6)

                                                                                //TIMER_RB_COUNT (BIT 5) and TIMER_RB_SEL (bit timer+1)

    if (sys_outb(TIMER_CTRL, read_back)==0) {                            //testing for an error

        switch (timer) {

            case 0:

                if (util_sys_inb(TIMER_0, st)==1) {               //tests if TIMER_0 was chosen

                    printf("Error selecting Timer 0\n");

                    return 1;

                }

                break;

            case 1:

                if (util_sys_inb(TIMER_1, st)==1) {               //tests if TIMER_1 was chosen

                    printf("Error selecting Timer 1\n");

                    return 1;

                }

                break;

            case 2:

                if (util_sys_inb(TIMER_2, st)==1) {               //tests if TIMER_2 was chosen

                    printf("Error selecting Timer 2\n");

                    return 1;

                }

                break;

            default:

                printf("No clock selected\n");                                  //happens if timer<0 or timer>2

                return 1;

        }

        return 0;

    }

    printf("Error in get config\n");

    return 1;

}

int(timer_display_conf)(uint8_t timer, uint8_t st, enum timer_status_field field){

    if(timer<0|timer>2){                                //tests for error in timer selection

        printf("Error selecting timer\n");

        return 1;

    }

    union timer_status_field_val config;                //create union (needed for the function at the end)

    uint8_t aux;

    aux=st;

    switch(field){

        case tsf_all:

            config.byte=aux;

            break;

        case tsf_initial:                               //Checking init_mode (mask -> 0x30)

            if((aux & 0x30)==TIMER_LSB){                //if 0x10

                config.in_mode=LSB_only;

            }

            else if ((aux & 0x30)==TIMER_MSB){          //if 0x20

                config.in_mode=MSB_only;

            }

            else if((aux & 0x30)==TIMER_LSB_MSB){       //if 0x30

                config.in_mode=MSB_after_LSB;

            }

            else{

                config.in_mode=INVAL_val;

                printf("Invalid Initialization Mode\n");

                return 1;

            }

            break;

        case tsf_mode:                                  //Checking count_mode (mask -> 0x0E)

            if((aux & 0x0E)==0){                        //if 0x00

                config.count_mode=0;

            }

            else if((aux & 0x0E)==2){                   //if 0x02

                config.count_mode=1;

            }

            else if((aux & 0x0E)==4|(aux & 0x0E)==12){  //if 0x04 or 0x0C

                config.count_mode=2;

            }

            else if((aux & 0x0E)==6|(aux & 0x0E)==14){  //if 0x06 or 0x0E

                config.count_mode=3;

            }

            else if((aux & 0x0E)==8){                   //if 0x08

                config.count_mode=4;

            }

            else if((aux & 0x0E)==10){                  //if 0x0A

                config.count_mode=5;

            }

            else{

                printf("Error in checking counting mode\n");

                return 1;

            }

            break;

        case tsf_base:                                  //Checking bcd (mask -> 0x01)

            if((aux & 0x01)== TIMER_BCD){

                config.bcd = true;                      //if the last bit is 1, it's bcd

            }

            else if((aux & 0x01)==TIMER_BIN){

                config.bcd = false;                     //if the last bit is 0, it's binary

            }

            else{

                printf("Error in checking base\n");

                return 1;

            }

            break;

        default:

            return 1;

    }

    if(timer_print_config(timer, field, config)==1){   //function that prints the result

        printf("Error printing\n");

        return 1;

    }

    return 0;

}