pkgman updates to simplify distribution with different kernels

cfg/rc.cfg

@@ -1 +0,0 @@
-{enabled={"getty","minitel","fsmanager"}}

lib/libmtar.lua

@@ -30,7 +30,7 @@ function mtar.iter(stream) -- table -- function -- Given buffer *stream*, return
  end
  return function()
   while remain > 0 do
-   remain=remain-#stream:read(math.min(remain,2048))
+   remain=remain-(#stream:read(math.min(remain,2048)) or "")
   end
   local version = 0
   local nlen = string.unpack(">I2", stream:read(2) or "\0\0")

lib/pkgman.lua

@@ -10,6 +10,8 @@ if not w then lz16 = nil end
 fs.makeDirectory("/boot/pkg")
 fs.makeDirectory("/boot/cfg/pkg")
 require "pkgfs"
+local kver,kvar = _OSVERSION:match("(%x+)%-([^-]-)$")
+kver,kvar = kver or "unknown", kvar or "base"
 
 local function getSources()
  local f = io.open(pkg.sourcePath,"rb")
@@ -27,7 +29,7 @@ end
 
 local function getInstalled()
  local f = io.open(pkg.installedPath,"rb")
- if not f then return {} end
+ if not f then return {psychos={version=kver},["kernel-"..kvar]={version=kver}} end
  local c = f:read("*a")
  f:close()
  return serial.unserialize(c)

lib/vtansi.lua

@@ -98,7 +98,7 @@ function vtansi.vtemu(gpu,bn) -- table number -- function -- takes GPU component
      cx,cy = 1, cy+1
      checkCursor()
     elseif cc == "\t" then
-     wb=wb..(" "):rep(8*((cx+9)//8))
+     wb=wb..(" "):rep((((cx//8)+1) * 8) - cx + 1)
     elseif cc == "\27" then
      flushwb()
      mode = 1

module/rtfsboot.lua

@@ -2,7 +2,7 @@
 --#includepkglib "rtfs" "lib/rtfs.lua" "rtfs"
 do
  local a = computer.getBootAddress()
- if component.type(a) == "drive" then
+ if component.type(a) == "drive" or component.type(a) == "tape_drive" then
   local diskpart = require "diskpart"
   for k,v in ipairs(diskpart.getPartitions(a)) do
    if v[2] == "rtfs" and v[1] == computer.address():sub(1,8) .. "-boot" then