From df0aaf9ae20e0e39b4926a83e79ee55d01d1c3f3 Mon Sep 17 00:00:00 2001
From: Timothee Cour <timothee.cour2@gmail.com>
Date: Fri, 8 Jan 2021 11:00:00 -0800
Subject: [PATCH 1/2] D20210108T105903

---
 tests/untestable/tasynchttpserver_extra.nim | 70 +++++++++++++++++++++
 1 file changed, 70 insertions(+)
 create mode 100644 tests/untestable/tasynchttpserver_extra.nim

diff --git a/tests/untestable/tasynchttpserver_extra.nim b/tests/untestable/tasynchttpserver_extra.nim
new file mode 100644
index 0000000000000..e54983cc29bd1
--- /dev/null
+++ b/tests/untestable/tasynchttpserver_extra.nim
@@ -0,0 +1,70 @@
+#[
+adapted from the runnableExamples in asynchttpserver.nim
+
+## works on linux
+
+## TODO
+* support osx + other platforms; the missing part is `/proc/{pid}/fd`
+maybe something based on lsof could work
+* turn this into a proper test that doesn't require user interaction
+
+* D20210107T122027:here BUG: why -1 in `result = int(fdLim.rlim_cur) - 1`  in asyncdispatch.maxDescriptors ?
+]#
+
+when true:
+  # This example will create an HTTP server on port 8080. The server will
+  # respond to all requests with a `200 OK` response code and "Hello World"
+  # as the response body.
+  import asynchttpserver
+  import asyncdispatch
+  import os, osproc, strformat, strutils
+
+  proc getCmdOutput(cmd: string): string =
+    var (outp, status) = execCmdEx(cmd)
+    doAssert status == 0, cmd
+    doAssert status == 0
+    outp.stripLineEnd
+    result = outp
+
+  proc getNumOpenFiles(): int =
+    let pid = getCurrentProcessId()
+    # xxx remove the pipe so that we only spawn 1 process, not 2, leading to 3 extra fds, not 6
+    let s = getCmdOutput fmt"ls -1 /proc/{pid}/fd | wc -l"
+    result = s.parseInt
+
+  proc getNumOpenFilesMax(): int =
+    # this could potentially change over time
+    when false:
+      result = getCmdOutput(fmt"ulimit -Sn").parseInt
+    result = maxDescriptors() + 1 # + 1 because of D20210107T122027
+
+  proc shouldAcceptRequest2(numFdPerRequest = 1): bool =
+    let num = getNumOpenFiles()
+    let numMax = getNumOpenFilesMax()
+    let numExtra = 6 # because of `getNumOpenFiles`
+    result = num + numFdPerRequest + numExtra <= numMax
+    echo ("shouldAcceptRequest2", num, numMax, result)
+
+  var count = 0
+  proc main {.async.} =
+    const port = 8080
+    var server = newAsyncHttpServer()
+    proc cb(req: Request) {.async.} =
+      let count2 = atomicInc(count) # count.inc would be buggy
+      echo (count2, req.reqMethod, req.url, req.headers)
+      let headers = {"Date": "Tue, 29 Apr 2014 23:40:08 GMT",
+          "Content-type": "text/plain; charset=utf-8"}
+      await sleepAsync(5_000)
+      await req.respond(Http200, &"Hello World: {count2}\n", headers.newHttpHeaders())
+
+    echo fmt"test this with: curl localhost:{port}/"
+    server.listen Port(port)
+    while true:
+      if shouldAcceptRequest2(1):
+        await server.acceptRequest(cb)
+      else:
+        # too many files opened, likely caused by too many concurrent connections (`maxFDs` exceeded)
+        poll()
+
+  asyncCheck main()
+  runForever()

From 07c8d9b2e384a51326eae0370e5aa8b7bb489213 Mon Sep 17 00:00:00 2001
From: Timothee Cour <timothee.cour2@gmail.com>
Date: Fri, 8 Jan 2021 11:01:05 -0800
Subject: [PATCH 2/2] _

---
 tests/untestable/tasynchttpserver_extra.nim | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/untestable/tasynchttpserver_extra.nim b/tests/untestable/tasynchttpserver_extra.nim
index e54983cc29bd1..96faaf578da04 100644
--- a/tests/untestable/tasynchttpserver_extra.nim
+++ b/tests/untestable/tasynchttpserver_extra.nim
@@ -1,4 +1,5 @@
 #[
+D20210108T105903
 adapted from the runnableExamples in asynchttpserver.nim
 
 ## works on linux