webrun

sys/apis/fs/urlfs.lua

@@ -37,7 +37,7 @@ end
 
 function urlfs.open(node, fn, fl)
 
-  if fl ~= 'r' then
+  if fl ~= 'r' and fl ~= 'rb' then
     error('Unsupported mode')
   end
 
@@ -58,6 +58,8 @@ function urlfs.open(node, fn, fl)
 
   local ctr = 0
   local lines
+
+  if fl == 'r' then
     return {
       readLine = function()
         if not lines then
@@ -73,6 +75,16 @@ function urlfs.open(node, fn, fl)
         lines = nil
       end,
     }
+  end
+  return {
+    read = function()
+      ctr = ctr + 1
+      return c:sub(ctr, ctr)
+    end,
+    close = function()
+      ctr = 0
+    end,
+  }
 end
 
 return urlfs