Squashed in FATSTAT.LUA more.

Author: Lethja

demo/xtra/FATSTAT.LUA

@@ -15,8 +15,7 @@ function FD(ts,rs,nf,sf,rd,sc)
 	local c,r=math.floor((ts-rs-(nf*sf)-rd)/sc)r=c<4085 and 12 or c<65525 and 16 or 32 return r,c end
 function CC(fat,sc)
 	local h,c={},sc
-	while c>=2 and c<0xFF8 do table.insert(h,c)c=fat[c] end return h
-end
+	while c>=2 and c<0xFF8 do table.insert(h,c)c=fat[c] end return h end
 function FR(c)
 	table.sort(c)local ranges,i={},1
 	while i<=#c do
@@ -31,14 +30,14 @@ function DE(f,o,e,fat)
 		if fb~=229 and(en:byte(12)&8)==0 then
 			local n,x=en:sub(1,8):gsub("+$",""),en:sub(9,11):gsub("+$","")
 			io.write(string.format("\t%8s %3s %s\n",n,x,FR(CC(fat,R16(en,27)))))end end end
-function FC(fat,f,st,s,uc)
+function FC(fa,f,st,s,uc)
 	local fr,z={},string.rep("\0",s)io.write("\n\tFree Space   ")
-	for i=2,uc+1 do if fat[i]==0 then table.insert(fr,i)if Z then local o=st+(i-2)*s f:seek("set",o)f:write(z)end end end print(FR(fr))end
-F={}for _,v in ipairs(arg)do if v=="-z" then Z=1 else table.insert(F,v)end end for _,file in ipairs(F)do
-local f=io.open(file,(Z and"r+b"or"rb"))if f then
-	print(file..":")
+	for i=2,uc+1 do if fa[i]==0 then table.insert(fr,i)if Z then f:seek("set",st+(i-2)*s)f:write(z)end end end print(FR(fr))end
+F={}for _,v in ipairs(arg)do if v=="-z" then Z=1 else table.insert(F,v)end end for _,fn in ipairs(F)do
+local f=io.open(fn,(Z and"r+b"or"rb"))if f then
+	print(fn..":")
 	local b,o=f:read(512)o=b:sub(1,1):byte()if o==235 or o==233 then
-		local bs,sc,rs,nf,re,ts,sf=R16(b,12),b:byte(14),R16(b,15),b:byte(17),R16(b,18),R16(b,20),R16(b,23) if ts==0 then ts=R32(b,32) end
+		local bs,sc,rs,nf,re,ts,sf=R16(b,12),b:byte(14),R16(b,15),b:byte(17),R16(b,18),R16(b,20),R16(b,23)if ts==0 then ts=R32(b,32)end
 		local rd,fo,fs,ro,ft,uc=math.ceil(re*32/bs),rs*bs,sf*bs,(rs+nf*sf)*bs ft,uc=FD(ts,rs,nf,sf,rd,sc)
 		print(string.format("\t       FAT type: FAT%s\n\t   Bytes/sector: %d\n\tSectors/cluster: %d\n\n",ft,bs,sc))
 		local fat=ft==12 and F12(f,fo,fs)or ft==16 and F16(f,fo,fs)or error("Non-FAT type")