updated fsmanager and included it in the default init

default-init.txt

@@ -1 +1,2 @@
 getty.lua
+fsmanager.lua

module/fs.lua

@@ -97,12 +97,16 @@ function fs.rename(from,to) -- moves file *from* to *to*
 end
 
 function fs.mount(path,proxy) -- mounts the filesystem *proxy* to the mount point *path* if it is a directory. BYO proxy.
- if fs.isDirectory(path) then
+ if fs.isDirectory(path) and not fsmounts[table.concat(fs.segments(path),"/")] then
   fsmounts[table.concat(fs.segments(path),"/")] = proxy
   return true
  end
  return false, "path is not a directory"
 end
+function fs.umount(path)
+ local fsi,_ = fs.resolve(path)
+ fsmounts[fsi] = nil
+end
 
 function fs.mounts() -- returns a table containing the mount points of all mounted filesystems
  local rt = {}
@@ -127,9 +131,5 @@ if computer.getBootAddress then
  fs.makeDirectory("boot")
  fs.mount("boot",component.proxy(computer.getBootAddress()))
 end
-for addr, _ in component.list("filesystem") do
- fs.makeDirectory(addr:sub(1,3))
- fs.mount(addr:sub(1,3),component.proxy(addr))
-end
 
 end

service/fsmanager.lua

@@ -1,11 +1,21 @@
+local function mount(addr)
+ dest = component.invoke(addr,"getLabel") or "mnt/"..addr:sub(1,3)
+ dest = "/"..dest
+ syslog("Mounting "..addr.." to "..dest)
+ fs.makeDirectory(dest)
+ local w,r = fs.mount(dest,component.proxy(addr))
+ if not w then 
+  syslog("Failed to mount: "..r)
+ end
+end
+for addr, _ in component.list("filesystem") do
+ mount(addr)
+end
 while true do
  local tE = {coroutine.yield()}
  if tE[1] == "component_added" and tE[3] == "filesystem" then
-  local w, doesExist = pcall(fs.exists,"/"..tE[2]:sub(1,3))
-  if not w or not doesExist then
-   fs.mounts[tE[2]:sub(1,3)] = component.proxy(tE[2])
-  end
+  mount(tE[2])
  elseif tE[1] == "component_removed" and tE[3] == "filesystem" then
-  fs.mounts[tE[2]:sub(1,3)] = nil
+  fs.umount("/mnt/"..tE[2]:sub(1,3))
  end
 end