#!/usr/fb/bin/lua require 'lua.inc' print('\n') selectedAllResend=false selectedAllDelete=false selectedAllSave=false function isSelectedAll() check=os.getenv("QUERY_STRING") if check ~= nil then if string.sub(check,search(check,1),search(check,1)) == "R" then selectedAllResend=true end if string.sub(check,search(check,1),search(check,1)) == "D" then selectedAllDelete=true end if string.sub(check,search(check,1),search(check,1)) == "S" then selectedAllSave=true end end end print('') isSelectedAll() entries = fs.readdir( "/data/fax/bad" ) print('') if entries ~= nil then local found = false entries.n = nil table.sort(entries) i=3; image='Open'; while entries[i] ~= nil do if isPDF(entries[i]) then found = true year=string.sub(entries[i],1,4) month=string.sub(entries[i],5,6) --Function Month in lua.inc Number = Name day=string.sub(entries[i],7,8) centermyprint(string.format("%s/%s/%s",month,day,year)) --Date hour=string.sub(entries[i],10,11) minute=string.sub(entries[i],12,13) second=string.sub(entries[i],14,15) centermyprint(string.format("%s:%s:%s",hour,minute,second)) --Time --fromToSubject(entries[i]) data=string.format("%s%s",'/data/fax/bad/',entries[i]) link=string.format("%s%s%s%s%s", "", image, "") centermyprint(link) --Open if selectedAllResend then send=string.format("%s%s%s",'') else send=string.format("%s%s%s",'') --Send end centermyprint(send); if selectedAllDelete then delete=string.format("%s%s%s",'') else delete=string.format("%s%s%s",'') --Delete end centermyprint(delete); print('') i=i+1 else i=i+1 end end if found then print('
') print('
') print('
Execute
') print('') print('') print('') print('') if (selectedAllSave) and (os.execute("cd /data/fax/bad && tar -czf archive.tar.gz *.pdf && chmod 666 archive.tar.gz")) then print('') else print('') end print('
') print('') print('') print('
Mark All (Resend)') print('
') print('') print('') print('
') print('') print('') print('
Mark All (Delete)') print('
') print('Download Tar-Archiv:
') print('Download') print('
') print('
') print('') print('Download Tar-Archiv:
') print('') print('
') print('
') end end print(' ') print('') mydump("bottom.inc")