Since http_server PR#74, Content-Length is mandatory unless Chunked.

If you don't provide it, http_server uses the value 0, and your data goes away.
Theodus · Jan 3, 2025 · c8ffe1d · c8ffe1d
1 parent 0a192aa
commit c8ffe1d
Show file tree

Hide file tree

Showing 3 changed files with 28 additions and 4 deletions.
diff --git a/examples/basicauth/main.pony b/examples/basicauth/main.pony
@@ -9,7 +9,13 @@ actor Main
 
     let handler =
       {(ctx: Context): Context iso^ =>
-        ctx.respond(StatusResponse(StatusOK), "Hello!".array())
+        ctx.respond(
+          StatusResponse(
+            StatusOK,
+            [("Content-Length", "6")]
+          ),
+          "Hello!".array()
+        )
         consume ctx
       }
 

diff --git a/examples/params/main.pony b/examples/params/main.pony
@@ -21,5 +21,11 @@ primitive H is RequestHandler
       "".join(
         [ "Hello"; if name != "" then " " + name else "" end; "!"
         ].values()).array()
-    ctx.respond(StatusResponse(StatusOK), body)
+    ctx.respond(
+      StatusResponse(
+        StatusOK,
+        [("Content-Length", body.size().string())]
+      ),
+      body
+    )
     consume ctx
diff --git a/jennet/fileserver.pony b/jennet/fileserver.pony
@@ -16,7 +16,13 @@ class _FileServer is RequestHandler
           bs = bs + consume line
         end
       end
-      ctx.respond(StatusResponse(StatusOK), bs)
+      ctx.respond(
+        StatusResponse(
+          StatusOK,
+          [("Content-Length", bs.size().string())]
+        ),
+        bs
+      )
     else
       ctx.respond(StatusResponse(StatusNotFound))
     end
@@ -37,7 +43,13 @@ class _DirServer is RequestHandler
           bs = bs + consume line
         end
       end
-      ctx.respond(StatusResponse(StatusOK), bs)
+      ctx.respond(
+        StatusResponse(
+          StatusOK,
+          [("Content-Length", bs.size().string())]
+        ),
+        bs
+      )
     else
       ctx.respond(StatusResponse(StatusNotFound))
     end