#include <stdlib.h>
#include <sys/select.h>

#include <curl/curl.h>

#define NUM_HANDLES 2

int main(int argc, char* argv[])
{
    if (argc != 2)
        exit(EXIT_FAILURE);

    int res = 0;
    CURL *curl[NUM_HANDLES];
    int running;
    char done = 0;
    CURLM *m;
    int i, j;

    if (curl_global_init(CURL_GLOBAL_ALL) != CURLE_OK) {
        fprintf(stderr, "curl_global_init() failed\n");
        exit(EXIT_FAILURE);
    }

    if ((m = curl_multi_init()) == NULL) {
        fprintf(stderr, "curl_multi_init() failed\n");
        curl_global_cleanup();
        exit(EXIT_FAILURE);
    }

    /* get NUM_HANDLES easy handles */
    for(i=0; i < NUM_HANDLES; i++) {
        curl[i] = curl_easy_init();
        if(!curl[i]) {
            fprintf(stderr, "curl_easy_init() failed "
                    "on handle #%d\n", i);
            for (j=i-1; j >= 0; j--) {
                curl_multi_remove_handle(m, curl[j]);
                curl_easy_cleanup(curl[j]);
            }
            curl_multi_cleanup(m);
            curl_global_cleanup();
            exit(EXIT_FAILURE);
        }
        curl_easy_setopt(curl[i], CURLOPT_URL, argv[1]);

        /* go verbose */
        curl_easy_setopt(curl[i], CURLOPT_VERBOSE, 1L);

        /* include headers */
        curl_easy_setopt(curl[i], CURLOPT_HEADER, 1L);

        /* add handle to multi */
        if ((res = (int)curl_multi_add_handle(m, curl[i])) != CURLM_OK) {
            fprintf(stderr, "curl_multi_add_handle() failed, "
                    "on handle #%d with code %d\n", i, res);
            curl_easy_cleanup(curl[i]);
            for (j=i-1; j >= 0; j--) {
                curl_multi_remove_handle(m, curl[j]);
                curl_easy_cleanup(curl[j]);
            }
            curl_multi_cleanup(m);
            curl_global_cleanup();
            exit(EXIT_FAILURE);
        }
    }

    curl_multi_setopt(m, CURLMOPT_PIPELINING, 1L);

    fprintf(stderr, "Start at URL 0\n");

    while (!done) {
        fd_set rd, wr, exc;
        int max_fd;
        struct timeval interval;

        interval.tv_sec = 1;
        interval.tv_usec = 0;

        while (res == CURLM_CALL_MULTI_PERFORM) {
            res = (int)curl_multi_perform(m, &running);
            if (running <= 0) {
                done = 1; /* bail out */
                break;
            }
        }
        if (done)
            break;

        if (res != CURLM_OK) {
            fprintf(stderr, "not okay???\n");
            break;
        }

        FD_ZERO(&rd);
        FD_ZERO(&wr);
        FD_ZERO(&exc);
        max_fd = 0;

        if (curl_multi_fdset(m, &rd, &wr, &exc, &max_fd) != CURLM_OK) {
            fprintf(stderr, "unexpected failured of fdset.\n");
            res = 189;
            break;
        }

        if (select(max_fd+1, &rd, &wr, &exc, &interval) == -1) {
            fprintf(stderr, "bad select??\n");
            res = 195;
            break;
        }

        res = CURLM_CALL_MULTI_PERFORM;
    }

    /* cleanup NUM_HANDLES easy handles */
    for(i=0; i < NUM_HANDLES; i++) {
        curl_multi_remove_handle(m, curl[i]);
        curl_easy_cleanup(curl[i]);
    }

    curl_multi_cleanup(m);
    curl_global_cleanup();

    exit(res);
}