File: tftptest.lua

package info (click to toggle)
luasocket 3.0~rc1-3
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 2,144 kB
  • ctags: 995
  • sloc: ansic: 4,059; makefile: 268; sh: 116
file content (20 lines) | stat: -rw-r--r-- 539 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
-- load tftpclnt.lua
local tftp = require("socket.tftp")

-- needs tftp server running on localhost, with root pointing to
-- a directory with index.html in it

function readfile(file)
    local f = io.open(file, "r")
    if not f then return nil end
    local a = f:read("*a")
    f:close()
    return a
end

host = host or "diego.student.princeton.edu"
retrieved, err = tftp.get("tftp://" .. host .."/index.html")
assert(not err, err)
original = readfile("test/index.html")
assert(original == retrieved, "files differ!")
print("passed")