made libmtar cope with lower memory systems at the expense of speed

2020-07-13 00:58:19 +10:00 · 2020-07-13 00:58:19 +10:00 · 8865768576
commit 8865768576
parent 5db20adefd
1 changed files with 3 additions and 1 deletions
--- a/lib/libmtar.lua
+++ b/lib/libmtar.lua
@ -43,7 +43,9 @@ function mtar.iter(stream) -- table -- function -- Given buffer *stream*, return
  return rb
 end
 return function()
-  stream:read(remain)
+  while remain > 0 do
+   remain=remain-#stream:read(math.min(remain,2048))
+  end
  local nlen = toint(stream:read(2) or "\0\0")
  if nlen == 0 then
   return