Changeset d95969a for benchmark/io/http/options.cfa

Timestamp:

Jan 25, 2021, 3:45:42 PM (5 years ago)

Author:

Thierry Delisle <tdelisle@…>

Branches:

ADT, arm-eh, ast-experimental, enum, forall-pointer-decay, jacob/cs343-translation, master, new-ast-unique-expr, pthread-emulation, qualifiedEnum

Children:

c292244

Parents:

b6a8b31 (diff), 7158202 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

File:

• benchmark/io/http/options.cfa (modified) (8 diffs)

benchmark/io/http/options.cfa

@@ -9 +9 @@
 }
 
+#include <bitmanip.hfa>
+#include <fstream.hfa>
 #include <kernel.hfa>
 #include <parseargs.hfa>
 
+#include <stdlib.h>
 #include <string.h>
 
@@ -18 +21 @@
 
         { // file_cache
+                0,     // path
                 0,     // open_flags;
                 42u,   // hash_seed;
@@ -34 +38 @@
                 1,     // nprocs;
                 1,     // nworkers;
-                0,     // flags;
+                {},     // params;
                 false, // procstats
                 false, // viewhalts
@@ -41 +45 @@
 };
 
-const char * parse_options( int argc, char * argv[] ) {
+void parse_options( int argc, char * argv[] ) {
         bool subthrd = false;
         bool eagrsub = false;
@@ -48 +52 @@
         bool iokpoll = false;
         unsigned sublen = 16;
+        unsigned nentries = 16;
+
 
         static cfa_option opt[] = {
-                {'p', "port",           "Port the server will listen on", options.socket.port},
-                {'c', "cpus",           "Number of processors to use", options.clopts.nprocs},
-                {'L', "log",            "Enable logs", options.log, parse_settrue},
-                {'t', "threads",        "Number of worker threads to use", options.clopts.nworkers},
-                {'b', "accept-backlog", "Maximum number of pending accepts", options.socket.backlog},
-                {'r', "request_len",    "Maximum number of bytes in the http request, requests with more data will be answered with Http Code 414", options.socket.buflen},
-                {'S', "seed",           "seed to use for hashing", options.file_cache.hash_seed },
-                {'C', "cache-size",     "Size of the cache to use, if set to small, will uses closes power of 2", options.file_cache.size },
-                {'l', "list-files",     "List the files in the specified path and exit", options.file_cache.list, parse_settrue },
-                {'s', "submitthread",   "If set, cluster uses polling thread to submit I/O", subthrd, parse_settrue },
-                {'e', "eagersubmit",    "If set, cluster submits I/O eagerly but still aggregates submits", eagrsub, parse_settrue},
-                {'f', "fixed-fds",      "If set, files are open eagerly and pre-registered with the cluster", fixedfd, parse_settrue},
-                {'k', "kpollsubmit",    "If set, cluster uses IORING_SETUP_SQPOLL, implies -f", sqkpoll, parse_settrue },
-                {'i', "kpollcomplete",  "If set, cluster uses IORING_SETUP_IOPOLL", iokpoll, parse_settrue },
-                {'L', "submitlength",   "Max number of submitions that can be submitted together", sublen },
+                { 'p', "port",           "Port the server will listen on", options.socket.port},
+                { 'c', "cpus",           "Number of processors to use", options.clopts.nprocs},
+                { 't', "threads",        "Number of worker threads to use", options.clopts.nworkers},
+                {'\0', "log",            "Enable logs", options.log, parse_settrue},
+                {'\0', "accept-backlog", "Maximum number of pending accepts", options.socket.backlog},
+                {'\0', "request_len",    "Maximum number of bytes in the http request, requests with more data will be answered with Http Code 414", options.socket.buflen},
+                {'\0', "seed",           "seed to use for hashing", options.file_cache.hash_seed },
+                {'\0', "cache-size",     "Size of the cache to use, if set to small, will uses closes power of 2", options.file_cache.size },
+                {'\0', "list-files",     "List the files in the specified path and exit", options.file_cache.list, parse_settrue },
+                { 's', "submitthread",   "If set, cluster uses polling thread to submit I/O", subthrd, parse_settrue },
+                { 'e', "eagersubmit",    "If set, cluster submits I/O eagerly but still aggregates submits", eagrsub, parse_settrue},
+                { 'f', "fixed-fds",      "If set, files are open eagerly and pre-registered with the cluster", fixedfd, parse_settrue},
+                { 'k', "kpollsubmit",    "If set, cluster uses IORING_SETUP_SQPOLL, implies -f", sqkpoll, parse_settrue },
+                { 'i', "kpollcomplete",  "If set, cluster uses IORING_SETUP_IOPOLL", iokpoll, parse_settrue },
+                {'\0', "submitlength",   "Max number of submitions that can be submitted together", sublen },
+                {'\0', "numentries",     "Number of I/O entries", nentries },
 
         };
@@ -71 +78 @@
         char **left;
         parse_args( argc, argv, opt, opt_cnt, "[OPTIONS]... [PATH]\ncforall http server", left );
+
+        if( !is_pow2(nentries) ) {
+                unsigned v = nentries;
+                v--;
+                v |= v >> 1;
+                v |= v >> 2;
+                v |= v >> 4;
+                v |= v >> 8;
+                v |= v >> 16;
+                v++;
+                serr | "Warning: num_entries not a power of 2" | '(' | nentries | ')' | "raising to " | v;
+                nentries = v;
+        }
+        options.clopts.params.num_entries = nentries;
 
         options.clopts.params.poller_submits = subthrd;
@@ -91 +112 @@
         options.clopts.params.num_ready = sublen;
 
-        if( left[0] == 0p ) { return "."; }
+        if( left[0] == 0p ) { return; }
 
         const char * path = left[0];
@@ -97 +118 @@
 
         if( left[0] != 0p ) {
-                abort("Too many trailing arguments!\n");
+                serr | "Too many trailing arguments!" | '\'' | path | '\'';
+                while(left[0] != 0p) {
+                        serr | " - " | left[0];
+                        left++;
+                }
+                exit(EXIT_FAILURE);
         }
 
-        return path;
+        options.file_cache.path = path;
 }