EPSIAE » eneraptor

/*

 * main.c

 *

 * 2011, Aleksander Besir (alex.besir@gmail.com)

 *

 */

#include "../hci_comm/hci_comm.h"

#include "../init/scenariolist.h"

#include "../init/devicelist.h"

//#include "../logics/device_threads.h"

//#include "../logics/scenario_threads.h"

#include <stdio.h>

#include <pthread.h>

#include <syslog.h>

// Inter-thread shared variables

// TODO: These variables could be configuration variables

//       (eg: static boolean loggingEnabled)

static device   *hDevice;   //device list

static scenario *hScenario; //scenario list

//extern scenario *test;   //device list

// Crtitical section mutual exclusion security

static pthread_mutex_t mtx = PTHREAD_MUTEX_INITIALIZER;

void *decisionMakingThread_routine(void *dummy);

void *hciConnectionThread_routine(void *dummy);

void *randomValThread_routine(void *dummy);

void *scenarioThread_routine(void *dummy);

// Application entry point

int main(int argc, char *argv[]) {

    /* initialisation */

    hDevice   = setDeviceList();

    hScenario = setNewScenarioList(hDevice);

    printf("Devices present:\t%d\n",   getNumberOfDevices());

    printf("Scenarios present:\t%d\n", getNumberOfScenarios());

    /* regular work */

    //*

        pthread_t hciConnectionThread;

        pthread_t decisionMakingThread;

        pthread_t *decisionMakingThread2;

        pthread_create(&hciConnectionThread, NULL,hciConnectionThread_routine, NULL);

        pthread_create(&decisionMakingThread,NULL,decisionMakingThread_routine,NULL);

        pthread_join(hciConnectionThread,NULL);

        pthread_join(decisionMakingThread,NULL);

    /**/

        exit(0);

}

// Decision-making thread routine

// Should just call a function that implements decision making module of the logic

void *decisionMakingThread_routine(void *dummy) {

    printf("-- decisionMakingThread_routine started --\n");

    /**dummy threads for input devices (sensors)**/

    // TODO check for possible BUG involving declaring pthread_t as pointer!

    pthread_t *deviceThread, *deviceThreadHead;

    deviceThreadHead = NULL;

    int i;

    for(i=0; i<getNumberOfDevices(); i++)

    {

        deviceThread = (pthread_t *)malloc(sizeof(pthread_t));

        pthread_create(&deviceThread,NULL,randomValThread_routine,NULL);

        if(deviceThreadHead==NULL)

            deviceThreadHead=deviceThread;

    }

    /**start scenario threads**/

    pthread_t *scenarioThread, *scenarioThreadHead;

    scenarioThreadHead = NULL;

    for(i=0; i<getNumberOfScenarios(); i++)

    {

        scenarioThread = (pthread_t *)malloc(sizeof(pthread_t));

        pthread_create(&scenarioThread,NULL,scenarioThread_routine,NULL);

        if(scenarioThreadHead==NULL)

            scenarioThreadHead=scenarioThread;

    }

    /**wait for threads to finish**/

    // TODO bad position of both for loops below, joining of theese threads should be handled in a different way

    deviceThread = deviceThreadHead;

    for(i=0; i<getNumberOfDevices(); i++)

    {

        pthread_join(deviceThread,NULL);

        deviceThread++;

    }

    scenarioThread = scenarioThreadHead;

    for(i=0; i<getNumberOfScenarios(); i++)

    {

        pthread_join(scenarioThread,NULL);

        scenarioThread++;

    }

    /*start some sort of control over scenarios? - hmm morda ne...bom jutri :)*/

        pthread_exit(0);

}

// HCI connection thread routine

// Start listening to some port

void *hciConnectionThread_routine(void *dummy) {

    printf("hciConnectionThread_routine started\n");

        int hciErrorCode = listenTo(1100);

        pthread_exit(0);

}

// scenario thread routine

void *scenarioThread_routine(void *dummy)

{

    scenario *scen;

    device   *inDev;

    int      active = 0;

    float    scenarioBuffer;

    /*load scenario*/

    scen = getAvailableScenario(hScenario);

    if(!scen) pthread_exit(0);

    // TODO add pointer to this device (all of them actually) to scenario structure - problems with segfault

    //indev = scen->inDev;

    inDev = getDevice(hDevice, scen->inDevice_id);

    scen->buf=inDev->buf;

    printf("Scenario %s buffer updated to %.2f!\n", scen->scen_id, inDev->buf);

    //set its value

    //*

    while(1) //TODO signal == true

    {

        /// main scenario loop

        //printf("inDev->buf %.2f\n", 1.0f*inDev->buf);

        if(active)

            sleep(scen->actvChkItv);

        else

            sleep(scen->idleChkItv);

        //checking primary condition

        if(scen->buf) // is not null

        {

            scen->buf = scen->buf*scen->alpha+inDev->buf*(1-scen->alpha);

            //printf("Scenario %s buffer updated to %f, alpha: %.2f!\n", scen->scen_id, scenarioBuffer, scen->alpha);

            syslog(LOG_MAIL, "%s:%.2f", scen->inDevice_id, scen->buf);

            active = 1;

            if((scen->buf > scen->optval + scen->tolval) ||

               (scen->buf < scen->optval - scen->tolval))

            {

                if(evaluateAdditionalConditions(scen->cond_l, hDevice))

                {

                    // TODO syslog - "action:scen_ID:power_percentage"

                    int power = getPowerPercentage(scen->minval, scen->maxval, scen->optval, &scen->buf, scen->func);

                    syslog(LOG_MAIL, "%s:%s:%.2f", scen->action, scen->scen_id, power);

                    printf("Zaganjam napravo %s z mocjo %d\n", scen->scen_id, power);

                    /*TODO execute action with parameter(s)*/

                }

                else

                    printf("Scenario %s not updated!\n", scen->scen_id);

            }

            else

                active = 0;

        }

        /*

        if(active)

            printf("%s main buffer %.2f, sleeping %d\n",scen->scen_id, scen->buf, scen->actvChkItv);

        else

            printf("%s main buffer %.2f, sleeping %d\n",scen->scen_id, scen->buf, scen->idleChkItv);

        /**/

    }

    /**/

           pthread_exit(0);

}

void *randomValThread_routine(void *dummy)

{

    //get device

    device *dev;

    dev = getAvailableDevice(hDevice);

    if(dev){}

    else

        pthread_exit(0);

    //set its value

    while(1) //TODO signal == true

    {

        dev->buf=random(100)%10+20;// random 20-30

        //printf("device %s buf = %d\n", dev->id, dev->buf);

        sleep(dev->readitv);

    }

           pthread_exit(0);

}