FilesExpand file tree

 master

/

server_hello.lua

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

executable file

·

62 lines (53 loc) · 1.81 KB

 master

/

server_hello.lua

Copy path

Top

File metadata and controls

• Code
• Blame

executable file

·

62 lines (53 loc) · 1.81 KB

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

#!/usr/bin/env lua

--[[

A simple HTTP server

If a request is not a HEAD method, then reply with "Hello world!"

Usage: lua examples/server_hello.lua [<port>]

]]

local port = arg[1] or 0 -- 0 means pick one at random

local http_server = require "http.server"

local http_headers = require "http.headers"

local function reply(myserver, stream) -- luacheck: ignore 212

-- Read in headers

local req_headers = assert(stream:get_headers())

local req_method = req_headers:get ":method"

-- Log request to stdout

assert(io.stdout:write(string.format('[%s] "%s %s HTTP/%g" "%s" "%s"\n',

os.date("%d/%b/%Y:%H:%M:%S %z"),

req_method or "",

req_headers:get(":path") or "",

stream.connection.version,

req_headers:get("referer") or "-",

req_headers:get("user-agent") or "-"

)))

-- Build response headers

local res_headers = http_headers.new()

res_headers:append(":status", "200")

res_headers:append("content-type", "text/plain")

-- Send headers to client; end the stream immediately if this was a HEAD request

assert(stream:write_headers(res_headers, req_method == "HEAD"))

if req_method ~= "HEAD" then

-- Send body, ending the stream

assert(stream:write_chunk("Hello world!\n", true))

end

end

local myserver = assert(http_server.listen {

host = "localhost";

port = port;

onstream = reply;

onerror = function(myserver, context, op, err, errno) -- luacheck: ignore 212

local msg = op .. " on " .. tostring(context) .. " failed"

if err then

msg = msg .. ": " .. tostring(err)

end

assert(io.stderr:write(msg, "\n"))

end;

})

-- Manually call :listen() so that we are bound before calling :localname()

assert(myserver:listen())

do

local bound_port = select(3, myserver:localname())

assert(io.stderr:write(string.format("Now listening on port %d\n", bound_port)))

end

-- Start the main server loop

assert(myserver:loop())