Mercurial Hosting > luan

annotate src/luan/modules/http/Server.luan @ 1250:e55a0c3696fb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
webserver checks for file before luan
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 23 Jul 2018 17:23:48 -0600
parents ce3279ef1bd9
children c147e2e877e3
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()
1175
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
7 local try = Luan.try or error()
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
8 local Io = require "luan:Io.luan"
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
9 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
10 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
11 local Thread = require "luan:Thread.luan"
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
12 local Http = require "luan:http/Http.luan"
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"
1175
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
27 local System = require "java:java.lang.System"
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
28
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
29
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 1080
diff changeset
30 local Server = {}
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
31
1184
2eba58842bbb remove serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1178
diff changeset
32 function Server.init_dir(dir)
1162
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
33 local dir_uri, dir_path
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
34 if matches(dir,":") then
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
35 dir_uri = dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
36 dir_path = match(dir,"^file:(.*)$") or error "server dir must be scheme 'file:'"
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
37 else
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
38 dir_path = dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
39 dir_uri = "file:"..dir
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
40 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
41 dir_uri = gsub(dir_uri,"/$","") -- remove trailing '/' if any
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
42 Http.dir = dir_uri
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 629
diff changeset
43 function Io.schemes.site(path)
1162
Franklin Schmidt <fschmidt@gmail.com>
parents: 1160
diff changeset
44 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
45 end
1172
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
46 return dir_path
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
47 end
1aa6dd74f3fc add serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1171
diff changeset
48
1184
2eba58842bbb remove serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1178
diff changeset
49 function Server.start()
1175
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
50 try {
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
51 function()
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
52 LuanHandler.start(Server.server)
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
53 end
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
54 catch = function(e)
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
55 -- e.java.printStackTrace();
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
56 Io.print_to(Io.stderr, e )
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
57 System.exit(-1)
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
58 end
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
59 }
1178
49cf706c326a serve_for_nginx on port 8081
Franklin Schmidt <fschmidt@gmail.com>
parents: 1176
diff changeset
60 end
1175
d6d0bd05ad8c exit on bind conflict, serve "127.0.0.1" for serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1173
diff changeset
61
1178
49cf706c326a serve_for_nginx on port 8081
Franklin Schmidt <fschmidt@gmail.com>
parents: 1176
diff changeset
62 function Server.start_rpc()
1173
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
63 function Rpc.functions.call(domain,fn_name,...)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
64 return Server.luan_handler.call_rpc(fn_name,...)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
65 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
66 Thread.fork(Rpc.serve)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
67 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 1172
diff changeset
68
1242
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
69 function Server.serve(dir,port)
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
70 port = port or 8080
1184
2eba58842bbb remove serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1178
diff changeset
71 local dir_path = Server.init_dir(dir)
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
72 local file_handler = FileHandler.new(dir_path)
1168
Franklin Schmidt <fschmidt@gmail.com>
parents: 1167
diff changeset
73 local dir_handler = DirHandler.new(file_handler)
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
74 local luan_handler = LuanHandler.new()
1167
7e6f28c769a1 better handlers
Franklin Schmidt <fschmidt@gmail.com>
parents: 1162
diff changeset
75 local not_found_hander = NotFound.new(luan_handler)
1250
e55a0c3696fb webserver checks for file before luan
Franklin Schmidt <fschmidt@gmail.com>
parents: 1242
diff changeset
76 local handler = ListHandler.new( file_handler, luan_handler )
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
77 handler = IndexHandler.new(handler)
1191
dada70cb57c1 put dir_handler before not_found_handler
Franklin Schmidt <fschmidt@gmail.com>
parents: 1184
diff changeset
78 handler = ListHandler.new( handler, dir_handler, not_found_hander )
1160
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
79 handler = ContentTypeHandler.new(handler)
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
80 handler = SafeHandler.new(handler)
4beabb087be6 add http/impl
Franklin Schmidt <fschmidt@gmail.com>
parents: 1149
diff changeset
81 handler = LogHandler.new(handler)
1242
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
82 Server.server = JavaServer.new(port,handler)
1184
2eba58842bbb remove serve_for_nginx
Franklin Schmidt <fschmidt@gmail.com>
parents: 1178
diff changeset
83 Server.start()
1178
49cf706c326a serve_for_nginx on port 8081
Franklin Schmidt <fschmidt@gmail.com>
parents: 1176
diff changeset
84 Server.start_rpc()
174
609c5b3118db add Web_server.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
85 end
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 494
diff changeset
86
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 1080
diff changeset
87 return Server