From b10a137712b98d223509652dd593912d815c90bf Mon Sep 17 00:00:00 2001
From: Marcos Kirsch <bitbucket@kirsch.com.mx>
Date: Sun, 15 Mar 2015 13:16:59 -0500
Subject: [PATCH] Finally works when serving multiple files simultaneously.
 Still need to clan up

---
 httpserver-static.lua | 25 ++++++++++++++++++-------
 1 file changed, 18 insertions(+), 7 deletions(-)

diff --git a/httpserver-static.lua b/httpserver-static.lua
index ca73e30..235d58c 100644
--- a/httpserver-static.lua
+++ b/httpserver-static.lua
@@ -14,14 +14,25 @@ end
 
 return function (connection, args)
    sendHeader(connection, 200, "OK", getMimeType(args.ext))
-   file.open(args.file)
+   print("Begin sending:", args.file)
    -- Send file in little chunks
-   while true do
-      local chunk = file.read(1024)
-      if chunk == nil then break end
-      coroutine.yield()
-      connection:send(chunk)
+   local continue = true
+   local bytesSent = 0
+   while continue do
+      file.open(args.file)
+      file.seek("set", bytesSent)
+      local chunk = file.read(512)
+      file.close()
+      if chunk == nil then
+         continue = false
+      else
+         if #chunk == 512 then
+            coroutine.yield()
+         end
+         connection:send(chunk)
+         bytesSent = bytesSent + #chunk
+         print("Sent" .. args.file, bytesSent)
+      end
    end
    print("Finished sending:", args.file)
-   file.close()
 end