#include "lib/communication.h"

/*
 * main loop
 *
 * opens the application pipes,
 * reads then writes the same message,
 * then closes the pipes
 */

void main_loop (const char *spath)
{
    int ret;
    struct process proc;
#if 1
    while (1) {

        // -1 : error
        // 0 = no new process
        // 1 = new process
        ret = service_get_new_process (&proc, spath);
        if (ret == -1) {
            fprintf (stderr, "Error service_get_new_process\n");
            exit (1);
        } else if (ret == 0) {
            continue;
        }

        printf ("before print\n");
        process_print (&proc);
        printf ("after print\n");

        // about the message
        size_t msize = BUFSIZ;
        char buf[BUFSIZ];
        bzero(buf, BUFSIZ);

        printf ("before read\n");
        if ((ret = process_read (&proc, &buf, &msize))) {
            fprintf(stdout, "error process_read %d\n", ret);
            exit (1);
        }
        printf ("after read\n");
        printf ("read, size %ld : %s\n", msize, buf);

        printf ("before proc write\n");
        if ((ret = process_write (&proc, &buf, msize))) {
            fprintf(stdout, "error process_write %d\n", ret);
            exit (1);
        }
        printf ("after proc write\n");
    }
#endif

#if 0

    int ret;
    struct process **proc;
    int nproc = 0;
    while (1) {
        service_get_new_processes (&proc, &nproc, spath);

        // for each process : open, read, write, close
        for (int i = 0 ; i < nproc ; i++) {
            printf ("before print\n");
            process_print (proc[i]);
            printf ("after print, i = %d\n", i);

            // about the message
            size_t msize = BUFSIZ;
            char buf[BUFSIZ];
            bzero(buf, BUFSIZ);

            printf ("before read\n");
            if ((ret = process_read (proc[i], &buf, &msize))) {
                fprintf(stdout, "error process_read %d\n", ret);
                exit (1);
            }
            printf ("after read\n");
            printf ("read, size %ld : %s\n", msize, buf);

            printf ("before proc write\n");
            if ((ret = process_write (proc[i], &buf, msize))) {
                fprintf(stdout, "error process_write %d\n", ret);
                exit (1);
            }
            printf ("after proc write\n");
        }
        service_free_processes (proc, nproc);
        free (proc);
    }
#endif
}

/*
 * service test
 *
 * 1. creates the named pipe /tmp/<service>, then listens
 * 2. opens the named pipes in & out
 * 3. talks with the (test) program
 * 4. closes the test program named pipes
 * 5. removes the named pipe /tmp/<service>
 */

int main(int argc, char * argv[])
{
    // gets the service path, such as /tmp/<service>
    char spath[PATH_MAX];
    service_path (spath, "windows");

    // creates the service named pipe, that listens to client applications
    int ret;
    if ((ret = service_create (spath))) {
        fprintf(stdout, "error service_create %d\n", ret);
        exit (1);
    }

    // the service will loop until the end of time, a specific message, a signal
    main_loop (spath);

    // the application will shut down, and remove the service named pipe
    if ((ret = service_close (spath))) {
        fprintf(stdout, "error service_close %d\n", ret);
        exit (1);
    }

    return EXIT_SUCCESS;
}