annotate src/luan/modules/http/Server.luan @ 1173:bdbd1d12c1f2

minor
author Franklin Schmidt <fschmidt@gmail.com>
date Sun, 11 Feb 2018 16:31:02 -0700
parents 1aa6dd74f3fc
children d6d0bd05ad8c
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
1 local Luan = require "luan:Luan.luan"
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
2 local error = Luan.error
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
3 local String = require "luan:String.luan"
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
4 local gsub = String.gsub or error()
1162
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
5 local match = String.match or error()
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
6 local matches = String.matches or error()
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
7 local Io = require "luan:Io.luan"
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
8 local Package = require "luan:Package.luan"
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
9 local Rpc = require "luan:Rpc.luan"
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
10 local Thread = require "luan:Thread.luan"
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
11 local Http = require "luan:http/Http.luan"
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
12 require "luan:logging/init.luan" -- initialize logging
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
13 local Logging = require "luan:logging/Logging.luan"
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 712
diff changeset
14 local logger = Logging.logger "http/Server"
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
15
321
7f7708e8fdd4 remove import statement
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 320
diff changeset
16 java()
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
17 local JavaServer = require "java:luan.webserver.Server"
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
18 local FileHandler = require "java:luan.webserver.handlers.FileHandler"
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
19 local DirHandler = require "java:luan.webserver.handlers.DirHandler"
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
20 local IndexHandler = require "java:luan.webserver.handlers.IndexHandler"
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
21 local ContentTypeHandler = require "java:luan.webserver.handlers.ContentTypeHandler"
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
22 local SafeHandler = require "java:luan.webserver.handlers.SafeHandler"
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
23 local LogHandler = require "java:luan.webserver.handlers.LogHandler"
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
24 local ListHandler = require "java:luan.webserver.handlers.ListHandler"
1171
794ddcfbee20 remove http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1168
diff changeset
25 local LuanHandler = require "java:luan.modules.http.LuanHandler"
794ddcfbee20 remove http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1168
diff changeset
26 local NotFound = require "java:luan.modules.http.NotFound"
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
27
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
28
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 1080
diff changeset
29 local Server = {}
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
30
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 1080
diff changeset
31 Server.port = 8080
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
32
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
33 local function init_dir(dir)
1162
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
34 local dir_uri, dir_path
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
35 if matches(dir,":") then
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
36 dir_uri = dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
37 dir_path = match(dir,"^file:(.*)$") or error "server dir must be scheme 'file:'"
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
38 else
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
39 dir_path = dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
40 dir_uri = "file:"..dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
41 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
42 dir_uri = gsub(dir_uri,"/$","") -- remove trailing '/' if any
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
43 Http.dir = dir_uri
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
44 function Io.schemes.site(path)
1162
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
45 return Io.uri( dir_uri..path )
264
9e0d4452e649 implement URL style module names
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 260
diff changeset
46 end
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
47 return dir_path
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
48 end
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
49
1173
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
50 local function start(handler)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
51 function Rpc.functions.call(domain,fn_name,...)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
52 return Server.luan_handler.call_rpc(fn_name,...)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
53 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
54 Thread.fork(Rpc.serve)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
55
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
56 Server.server = JavaServer.new(Server.port,handler)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
57 LuanHandler.start(Server.server)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
58 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
59
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
60 function Server.serve(dir)
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
61 local dir_path = init_dir(dir)
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
62 local file_handler = FileHandler.new(dir_path)
1168
Franklin Schmidt <fschmidt@gmail.com>
parents: 1167
diff changeset
63 local dir_handler = DirHandler.new(file_handler)
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
64 local luan_handler = LuanHandler.new()
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
65 local not_found_hander = NotFound.new(luan_handler)
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
66 local handler = ListHandler.new( luan_handler, file_handler )
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
67 handler = IndexHandler.new(handler)
1173
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
68 handler = ListHandler.new( handler, not_found_hander, dir_handler )
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
69 handler = ContentTypeHandler.new(handler)
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
70 handler = SafeHandler.new(handler)
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
71 handler = LogHandler.new(handler)
1173
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
72 start(handler)
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
73 end
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 494
diff changeset
74
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
75 function Server.serve_for_nginx(dir)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
76 init_dir(dir)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
77 local luan_handler = LuanHandler.new()
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
78 local not_found_hander = NotFound.new(luan_handler)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
79 local handler = luan_handler
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
80 handler = IndexHandler.new(handler)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
81 handler = ListHandler.new( handler, not_found_hander )
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
82 handler = ContentTypeHandler.new(handler)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
83 handler = SafeHandler.new(handler)
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
84 handler = LogHandler.new(handler)
1173
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
85 start(handler)
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
86 end
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
87
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 1080
diff changeset
88 return Server