source: benchmark/io/readv.cfa @ cb85603

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

extern "C" {
        #include <locale.h>
        #include <getopt.h>
        #include <fcntl.h>
        #include <sys/uio.h>
}

#include <unistd.h>

#include <clock.hfa>
#include <kernel.hfa>
#include <thread.hfa>
#include <time.hfa>
#include <stats.hfa>

#include "../benchcltr.hfa"

extern bool traceHeapOn();
extern ssize_t cfa_preadv2(int fd, const struct iovec *iov, int iovcnt, off_t offset, int flags);

int fd;
volatile bool run = false;
volatile size_t count = 0;

unsigned long int buflen = 50;

thread __attribute__((aligned(128))) Reader {};
void ?{}( Reader & this ) {
        ((thread&)this){ "Reader Thread", *the_benchmark_cluster };
}

void main( Reader & ) {
        park( __cfaabi_dbg_ctx );
        /* paranoid */ assert( true == __atomic_load_n(&run, __ATOMIC_RELAXED) );

        char data[buflen];
        struct iovec iov = { data, buflen };

        while(__atomic_load_n(&run, __ATOMIC_RELAXED)) {
                int r = cfa_preadv2(fd, &iov, 1, 0, 0);
                if(r < 0) abort("%s\n", strerror(-r));

                __atomic_fetch_add( &count, 1, __ATOMIC_SEQ_CST );
        }
}

int main(int argc, char * argv[]) {
        BENCH_DECL
        unsigned flags = 0;
        unsigned sublen = 16;

        arg_loop:
        for(;;) {
                static struct option options[] = {
                        BENCH_OPT_LONG
                        {"bufsize",      required_argument, 0, 'b'},
                        {"userthread",   no_argument      , 0, 'u'},
                        {"submitthread", no_argument      , 0, 's'},
                        {"submitlength", required_argument, 0, 'l'},
                        {0, 0, 0, 0}
                };

                int idx = 0;
                int opt = getopt_long(argc, argv, BENCH_OPT_SHORT "b:usl:", options, &idx);

                const char * arg = optarg ? optarg : "";
                char * end;
                switch(opt) {
                        // Exit Case
                        case -1:
                                break arg_loop;
                        BENCH_OPT_CASE
                        case 'b':
                                buflen = strtoul(arg, &end, 10);
                                if(*end != '\0' && buflen < 10) {
                                        fprintf(stderr, "Buffer size must be at least 10, was %s\n", arg);
                                        goto usage;
                                }
                                break;
                        case 'u':
                                flags |= CFA_CLUSTER_IO_POLLER_USER_THREAD;
                                break;
                        case 's':
                                flags |= CFA_CLUSTER_IO_POLLER_THREAD_SUBMITS;
                                break;
                        case 'l':
                                sublen = strtoul(arg, &end, 10);
                                if(*end != '\0' && sublen < 16) {
                                        fprintf(stderr, "Submit length must be at least 16, was %s\n", arg);
                                        goto usage;
                                }
                                flags |= (sublen << CFA_CLUSTER_IO_BUFFLEN_OFFSET);
                                break;
                        default: /* ? */
                                fprintf(stderr, "%d\n", opt);
                        usage:
                                bench_usage( argv );
                                fprintf( stderr, "  -b, --buflen=SIZE        Number of bytes to read per request\n" );
                                fprintf( stderr, "  -u, --userthread         If set, cluster uses user-thread to poll I/O\n" );
                                fprintf( stderr, "  -s, --submitthread       If set, cluster uses polling thread to submit I/O\n" );
                                exit(EXIT_FAILURE);
                }
        }

        fd = open(__FILE__, 0);
        if(fd < 0) {
                fprintf(stderr, "Could not open source file\n");
                exit(EXIT_FAILURE);
        }

        printf("Running %d threads, reading %lu bytes each, over %d processors for %f seconds\n", nthreads, buflen, nprocs, duration);

        {
                Time start, end;
                BenchCluster cl = { flags, CFA_STATS_READY_Q | CFA_STATS_IO };
                {
                        BenchProc procs[nprocs];
                        {
                                Reader threads[nthreads];

                                printf("Starting\n");
                                bool is_tty = isatty(STDOUT_FILENO);
                                start = getTimeNsec();
                                run = true;

                                for(i; nthreads) {
                                        unpark( threads[i] __cfaabi_dbg_ctx2 );
                                }
                                wait(duration, start, end, is_tty);

                                run = false;
                                end = getTimeNsec();
                                printf("\nDone\n");
                        }
                }
                printf("Took %'ld ms\n", (end - start)`ms);
                printf("Total reads      : %'15zu\n", count);
                printf("Reads per second : %'18.2lf\n", ((double)count) / (end - start)`s);
                printf("Total read size  : %'15zu\n", buflen * count);
                printf("Bytes per second : %'18.2lf\n", ((double)count * buflen) / (end - start)`s);
        }

        close(fd);
}