Mercurial Hosting > luan

annotate src/luan/modules/Rpc.luan @ 1509:0ba144491a42

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
lucene.backup zip
author Franklin Schmidt <fschmidt@gmail.com>
date Sun, 17 May 2020 14:29:33 -0600
parents d80395468b4e
children d9a5405a3102
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1353
8d95711f6615 replace java() with require "java"
Franklin Schmidt <fschmidt@gmail.com>
parents: 1280
diff changeset
1 require "java"
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
2 local Socket = require "java:java.net.Socket"
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
3 local ServerSocket = require "java:java.net.ServerSocket"
1506
d80395468b4e ssl security in code
Franklin Schmidt <fschmidt@gmail.com>
parents: 1408
diff changeset
4 local IoUtils = require "java:goodjava.io.IoUtils"
1402
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
5 local RpcClient = require "java:goodjava.rpc.RpcClient"
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
6 local RpcServer = require "java:goodjava.rpc.RpcServer"
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
7 local RpcCall = require "java:goodjava.rpc.RpcCall"
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
8 local RpcResult = require "java:goodjava.rpc.RpcResult"
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
9 local RpcException = require "java:goodjava.rpc.RpcException"
27efb1fcbcb5 move luan.lib to goodjava
Franklin Schmidt <fschmidt@gmail.com>
parents: 1381
diff changeset
10 local JavaRpc = require "java:goodjava.rpc.Rpc"
1259
e8020216dee7 add Luan.to_luan and fix multipart/form-data
Franklin Schmidt <fschmidt@gmail.com>
parents: 1236
diff changeset
11 local LuanJava = require "java:luan.Luan"
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
12 local JavaUtils = require "java:luan.modules.Utils"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
13 local IoLuan = require "java:luan.modules.IoLuan"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
14 local ByteArrayInputStream = require "java:java.io.ByteArrayInputStream"
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
15 local Luan = require "luan:Luan.luan"
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
16 local error = Luan.error
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
17 local set_metatable = Luan.set_metatable or error()
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
18 local try = Luan.try or error()
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
19 local ipairs = Luan.ipairs or error()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
20 local type = Luan.type or error()
1280
781ec0a92bb5 add Boot.luan
Franklin Schmidt <fschmidt@gmail.com>
parents: 1261
diff changeset
21 local Boot = require "luan:Boot.luan"
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
22 local Io = require "luan:Io.luan"
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
23 local Thread = require "luan:Thread.luan"
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
24 local Table = require "luan:Table.luan"
1261
198d6af7330a rename Luan.to_table to Table.java_to_table_shallow and Luan.to_luan to Table.java_to_table_deep
Franklin Schmidt <fschmidt@gmail.com>
parents: 1260
diff changeset
25 local java_to_table_deep = Table.java_to_table_deep or error()
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
26 local unpack = Table.unpack or error()
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
27 local ThreadLuan = require "java:luan.modules.ThreadLuan"
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
28 local Logging = require "luan:logging/Logging.luan"
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
29 local logger = Logging.logger "Rpc"
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
30
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
31
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
32 local Rpc = {}
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
33
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
34 Rpc.port = 9101
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
35
1206
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
36 Rpc.cipher_suites = {
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
37 "TLS_DH_anon_WITH_AES_128_GCM_SHA256"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
38 "TLS_DH_anon_WITH_AES_128_CBC_SHA256"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
39 "TLS_ECDH_anon_WITH_AES_128_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
40 "TLS_DH_anon_WITH_AES_128_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
41 "TLS_ECDH_anon_WITH_3DES_EDE_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
42 "SSL_DH_anon_WITH_3DES_EDE_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
43 "TLS_ECDH_anon_WITH_RC4_128_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
44 "SSL_DH_anon_WITH_RC4_128_MD5"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
45 "SSL_DH_anon_WITH_DES_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
46 "SSL_DH_anon_EXPORT_WITH_DES40_CBC_SHA"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
47 "SSL_DH_anon_EXPORT_WITH_RC4_40_MD5"
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
48 }
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
49
1509
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
50 local function java_array(list)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
51 for i,v in ipairs(list) do
1259
e8020216dee7 add Luan.to_luan and fix multipart/form-data
Franklin Schmidt <fschmidt@gmail.com>
parents: 1236
diff changeset
52 list[i] = LuanJava.toJava(v)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
53 end
1509
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
54 return list
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
55 end
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
56
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
57 local function java_args(list)
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
58 return unpack(java_array(list))
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
59 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
60
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
61 local function luan_args(list,binary_in)
1261
198d6af7330a rename Luan.to_table to Table.java_to_table_shallow and Luan.to_luan to Table.java_to_table_deep
Franklin Schmidt <fschmidt@gmail.com>
parents: 1260
diff changeset
62 list = java_to_table_deep(list)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
63 if binary_in ~= nil then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
64 local i_in = list[#list]
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
65 list[#list] = nil
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
66 local type = list[i_in]
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
67 if type == "binary" then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
68 list[i_in] = JavaUtils.readAll(binary_in)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
69 elseif type == "input" then
1280
781ec0a92bb5 add Boot.luan
Franklin Schmidt <fschmidt@gmail.com>
parents: 1261
diff changeset
70 list[i_in] = Boot.new_LuanIn( IoLuan.LuanInput.new(binary_in) )
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
71 else
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
72 error(type)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
73 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
74 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
75 return unpack(list)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
76 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
77
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
78 local function encode_binary(args)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
79 local binary_in, len_in, i_in
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
80 for i,v in ipairs(args) do
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
81 if type(v) == "binary" then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
82 binary_in==nil or error "can't have multiple binary args"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
83 i_in = i
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
84 binary_in = ByteArrayInputStream.new(v)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
85 len_in = #v
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
86 args[i] = "binary"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
87 elseif type(v) == "table" and v.java ~= nil and v.java.instanceof(IoLuan.LuanFile) then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
88 binary_in==nil or error "can't have multiple binary args"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
89 i_in = i
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
90 binary_in = v.java.inputStream()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
91 len_in = v.length()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
92 args[i] = "input"
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
93 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
94 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
95 args[#args+1] = i_in
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
96 return binary_in, len_in
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
97 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
98
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
99 local function rpc_caller(socket)
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
100 local client = RpcClient.new(socket)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
101 return function(fn_name,...)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
102 local args = {...}
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
103 local binary_in, len_in = encode_binary(args)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
104 local call
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
105 if binary_in == nil then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
106 call = RpcCall.new(fn_name,java_args(args))
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
107 else
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
108 call = RpcCall.new(binary_in,len_in,fn_name,java_args(args))
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
109 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
110 client.write(call)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
111 if fn_name == "close" then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
112 client.close()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
113 return
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
114 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
115 return try {
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
116 function()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
117 local result = client.read()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
118 return luan_args(result.returnValues,result["in"])
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
119 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
120 catch = function(e)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
121 local cause = e.java.getCause()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
122 if cause ~= nil and cause.instanceof(RpcException) and cause.getMessage() == "luan" then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
123 error(cause.values.get(0))
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
124 else
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
125 e.throw()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
126 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
127 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
128 }
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
129 end_function
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
130 end_function
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
131
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
132 Rpc.functions = {}
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
133
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
134 local function rpc_responder(socket,fns)
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
135 local server = RpcServer.new(socket)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
136 local responder = {}
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
137 function responder.is_closed()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
138 return server.isClosed()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
139 end_function
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
140 function responder.respond()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
141 local call = server.read()
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
142 if call==nil then
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
143 return
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
144 end
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
145 local cmd = call.cmd
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
146 if cmd == "close" then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
147 server.close()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
148 return
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
149 end_if
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
150 local fn = fns[cmd]
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
151 if fn == nil then
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
152 server.write(JavaRpc.COMMAND_NOT_FOUND)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
153 return
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
154 end_if
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
155 local rtn = try {
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
156 function()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
157 return {fn(luan_args(call.args,call["in"]))}
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
158 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
159 catch = function(e)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
160 logger.warn(e)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
161 local ex = RpcException.new("luan",e.get_message())
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
162 server.write(ex)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
163 return nil
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
164 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
165 }
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
166 if rtn==nil then return end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
167 local binary_in, len_in = encode_binary(rtn)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
168 local result
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
169 if binary_in == nil then
1509
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
170 result = RpcResult.new(java_array(rtn))
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
171 else
1509
0ba144491a42 lucene.backup zip
Franklin Schmidt <fschmidt@gmail.com>
parents: 1506
diff changeset
172 result = RpcResult.new(binary_in,len_in,java_array(rtn))
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
173 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
174 server.write(result)
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
175 end
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
176 return responder
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
177 end_function
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
178
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
179 function Rpc.remote(domain)
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
180 local socket
1206
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
181 if Rpc.cipher_suites == nil then
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
182 socket = Socket.new(domain,Rpc.port)
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
183 else
1506
d80395468b4e ssl security in code
Franklin Schmidt <fschmidt@gmail.com>
parents: 1408
diff changeset
184 socket = IoUtils.getSSLSocketFactory().createSocket(domain,Rpc.port)
1206
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
185 socket.setEnabledCipherSuites(Rpc.cipher_suites)
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
186 end
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
187 local call = rpc_caller(socket)
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
188 local mt = {}
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
189 function mt.__index(_,key)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
190 return function(...)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
191 return call(key,...)
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
192 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
193 end
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
194 local err = Luan.new_error("not closed")
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
195 function mt.__gc(_)
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
196 socket.isClosed() or logger.error(err)
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
197 end
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
198 local t = {}
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
199 set_metatable(t,mt)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
200 return t
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
201 end_function
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
202
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
203 function Rpc.serve(port,fns)
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
204 port = port or Rpc.port
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
205 fns = fns or Rpc.functions
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
206 local socket_server
1206
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
207 if Rpc.cipher_suites == nil then
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
208 socket_server = ServerSocket.new(port)
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
209 else
1506
d80395468b4e ssl security in code
Franklin Schmidt <fschmidt@gmail.com>
parents: 1408
diff changeset
210 socket_server = IoUtils.getSSLServerSocketFactory().createServerSocket(port)
1206
6dfaf4e9ce71 use many anonymous cipher_suites
Franklin Schmidt <fschmidt@gmail.com>
parents: 1205
diff changeset
211 socket_server.setEnabledCipherSuites(Rpc.cipher_suites)
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
212 end
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
213 while true do
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
214 try {
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
215 function()
1204
5d0cbd908582 remove Io socket support
Franklin Schmidt <fschmidt@gmail.com>
parents: 1201
diff changeset
216 local socket = socket_server.accept()
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
217 local function server()
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
218 local responder = nil
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
219 try {
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
220 function()
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
221 responder = rpc_responder(socket,fns)
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
222 while not responder.is_closed() do
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
223 responder.respond()
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
224 end
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
225 end
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
226 catch = function(e)
1236
5b9856045e51 rpc logging
Franklin Schmidt <fschmidt@gmail.com>
parents: 1206
diff changeset
227 logger.warn(e)
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
228 end
1381
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
229 finally = function()
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
230 responder and responder.after_close and responder.after_close()
8d7a39ca2c0c add Rpc in_backup_read_lock
Franklin Schmidt <fschmidt@gmail.com>
parents: 1380
diff changeset
231 end
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
232 }
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
233 end
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
234 Thread.fork(server)
762
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
235 end
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
236 catch = function(e)
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
237 logger.error(e)
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
238 end
3f461f85243d better rpc thread handling
Franklin Schmidt <fschmidt@gmail.com>
parents: 743
diff changeset
239 }
1120
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
240 end_while
e8fc6712b468 luan Rpc uses luan.lib.rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 1088
diff changeset
241 end_function
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
242
1088
bae2d0c2576c change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
243 return Rpc