AddAgent.c

Go to the documentation of this file.

// $Id: AddAgent.c,v 1.3 2002/09/25 21:42:59 mjohnson Exp $

#include <stdio.h>
#include <libicl.h>
#include <liboaa.h>

#define AGENT_NAME "AddAgent_C"

int add_callback(ICLTerm* goal, ICLTerm* params, ICLTerm* solutions);
int setup_oaa_connection(int argc, char *argv[]);

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

    // Initialize the OAA library.
    oaa_Init(argc, argv);

    // Setup the connection of this agent to the Facilitator.
    // See setup_oaa_connection() definition below.
    if (!setup_oaa_connection(argc, argv)) {
        printf("Could not setup OAA connections...exiting.\n");
        return EXIT_FAILURE;
    }

    // Start the OAA main (infinite) loop
    // and wait for solve requests to arrive.
    oaa_MainLoop(TRUE);

    return EXIT_SUCCESS;
}

int setup_oaa_connection(int argc, char *argv[]) {
    ICLTerm* mySolvablesAsList = NULL;

    if (!oaa_SetupCommunication(AGENT_NAME)) {
        printf("Could not connect\n");
        return FALSE;
    }

    // Prepare a list of solvables that this agent is capable of
    // handling. This agent only has one solvable ("add")
    // and it is associated with the callback identified
    // by the name "add". See also the definition
    // of add_callback() below.
    mySolvablesAsList
        = icl_NewTermFromData(
            "[solvable(add(Addend1, Addend2, Sum), [callback(add)])]",
            55); // there are 55 characters in this string

    // Register solvables with the Facilitator.
    // The string "parent" represents the Facilitator.
    if (!oaa_Register("parent", AGENT_NAME, mySolvablesAsList)) {
        printf("Could not register\n");
        return FALSE;
    }

    // Register this agent's single callback.
    if (!oaa_RegisterCallback("add", add_callback)) {
        printf("Could not register add callback\n");
        return FALSE;
    }

    // Clean up.
    icl_Free(mySolvablesAsList);

    return TRUE;
}

int add_callback(ICLTerm* goal,
                        ICLTerm* params,
                        ICLTerm* solutions) {

    // The first addend is the first term
    // in "goal". The "goal" struct
    // is in the form "add(Addend1, Addend2, Sum)".
    ICLTerm *Addend1 = icl_CopyTerm(icl_NthTerm(goal, 1));

    // Repeat for the second addend.
    ICLTerm *Addend2 = icl_CopyTerm(icl_NthTerm(goal, 2));

    // Compute the sum.
    int addend1 = icl_Int(Addend1);
    int addend2 = icl_Int(Addend2);
    int sum = addend1 + addend2;

    // Prepare an ICLTerm containing the integer sum.
    ICLTerm *Sum = icl_NewInt(sum);

    // Prepare a struct that contains the satisfied goal.
    ICLTerm *solution = icl_NewStruct("add", 3, Addend1, Addend2, Sum);

    // Add this solution to the list of solutions.
    // This will return TRUE if the add is successful.
    return icl_AddToList(solutions, solution, TRUE);
}

// doxygen content

---