this is a fun webpage *
hosted by greenbean * * Like redbean, greenbean has superior performance too, with an * advantage on benchmarks biased towards high connection counts * * $ sudo wrk -c 300 -t 32 --latency http://10.10.10.124:8080/ * Running 10s test @ http://10.10.10.124:8080/ * 32 threads and 300 connections * Thread Stats Avg Stdev Max +/- Stdev * Latency 1.07ms 8.27ms 138.55ms 98.58% * Req/Sec 37.98k 12.61k 117.65k 80.11% * Latency Distribution * 50% 200.00us * 75% 227.00us * 90% 303.00us * 99% 32.46ms * 10033090 requests in 8.31s, 2.96GB read * Requests/sec: 1207983.58 * Transfer/sec: 365.19MB * */ #define PORT 8080 #define HEARTBEAT 100 #define KEEPALIVE 5000 #define LOGGING 0 #define STANDARD_RESPONSE_HEADERS \ "Server: greenbean/1.o\r\n" \ "Referrer-Policy: origin\r\n" \ "Cache-Control: private; max-age=0\r\n" int workers; int messages; int connections; int closingtime; const char *status; int Worker(void *id) { int server, yes = 1; // load balance incoming connections for port 8080 across all threads // hangup on any browser clients that lag for more than a few seconds struct timeval timeo = {KEEPALIVE / 1000, KEEPALIVE % 1000}; struct sockaddr_in addr = {.sin_family = AF_INET, .sin_port = htons(PORT)}; server = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP); if (server == -1) { if (LOGGING) kprintf("%s() failed %m\n", "socket"); goto WorkerFinished; } setsockopt(server, SOL_SOCKET, SO_RCVTIMEO, &timeo, sizeof(timeo)); setsockopt(server, SOL_SOCKET, SO_SNDTIMEO, &timeo, sizeof(timeo)); setsockopt(server, SOL_SOCKET, SO_REUSEADDR, &yes, sizeof(yes)); setsockopt(server, SOL_SOCKET, SO_REUSEPORT, &yes, sizeof(yes)); setsockopt(server, SOL_TCP, TCP_FASTOPEN, &yes, sizeof(yes)); setsockopt(server, SOL_TCP, TCP_QUICKACK, &yes, sizeof(yes)); errno = 0; if (bind(server, &addr, sizeof(addr)) == -1) { if (LOGGING) kprintf("%s() failed %m\n", "socket"); goto WorkerFinished; } listen(server, 1); // connection loop while (!closingtime) { struct tm tm; int64_t unixts; struct Url url; ssize_t got, sent; struct timespec ts; struct HttpMessage msg; uint32_t clientaddrsize; struct sockaddr_in clientaddr; char inbuf[1500], outbuf[512], *p, *q; int clientip, client, inmsglen, outmsglen; // this slows the server down a lot but is needed on non-Linux to // react to keyboard ctrl-c if (!IsLinux() && poll(&(struct pollfd){server, POLLIN}, 1, HEARTBEAT) < 1) { continue; } // wait for client connection clientaddrsize = sizeof(clientaddr); client = accept(server, &clientaddr, &clientaddrsize); // accept() can raise a very diverse number of errors but none of // them are really true showstoppers that would necessitate us to // panic and abort the entire server, so we can just ignore these if (client == -1) { // we used SO_RCVTIMEO and SO_SNDTIMEO because those settings are // inherited by the accepted sockets, but using them also has the // side-effect that the listening socket fails with EAGAIN, every // several seconds. we can use that to our advantage to check for // the ctrl-c shutdowne event; otherwise, we retry the accept call continue; } asm volatile("lock incl\t%0" : "+m"(connections)); // message loop do { // parse the incoming http message InitHttpMessage(&msg, kHttpRequest); // we're not terrible concerned when errors happen here if ((got = read(client, inbuf, sizeof(inbuf))) <= 0) break; // check that client message wasn't fragmented into more reads if (!(inmsglen = ParseHttpMessage(&msg, inbuf, got))) break; asm volatile("lock incl\t%0" : "+m"(messages)); #if LOGGING // log the incoming http message clientip = ntohl(clientaddr.sin_addr.s_addr); kprintf("#%.4x get some %d.%d.%d.%d:%d %#.*s\n", (intptr_t)id, (clientip & 0xff000000) >> 030, (clientip & 0x00ff0000) >> 020, (clientip & 0x0000ff00) >> 010, (clientip & 0x000000ff) >> 000, ntohs(clientaddr.sin_port), msg.uri.b - msg.uri.a, inbuf + msg.uri.a); #endif // display hello world html page for http://127.0.0.1:8080/ if (msg.method == kHttpGet && (msg.uri.b - msg.uri.a == 1 && inbuf[msg.uri.a + 0] == '/')) { q = "\r\n" "
this is a fun webpage\r\n" "
hosted by greenbean\r\n"; p = stpcpy(outbuf, "HTTP/1.1 200 OK\r\n" STANDARD_RESPONSE_HEADERS "Content-Type: text/html; charset=utf-8\r\n" "Date: "); clock_gettime(CLOCK_REALTIME, &ts), unixts = ts.tv_sec; p = FormatHttpDateTime(p, gmtime_r(&unixts, &tm)); p = stpcpy(p, "\r\nContent-Length: "); p = FormatInt32(p, strlen(q)); p = stpcpy(p, "\r\n\r\n"); p = stpcpy(p, q); outmsglen = p - outbuf; sent = write(client, outbuf, outmsglen); } else { // display 404 not found error page for every thing else q = "\r\n" "