libs/core: Reworked some basic libraries to not use package.seeall
[project/luci.git] / modules / rpc / luasrc / jsonrpc.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
6
7 Licensed under the Apache License, Version 2.0 (the "License");
8 you may not use this file except in compliance with the License.
9 You may obtain a copy of the License at
10
11         http://www.apache.org/licenses/LICENSE-2.0
12
13 $Id$
14 ]]--
15
16 module("luci.jsonrpc", package.seeall)
17 require "luci.json"
18
19 function resolve(mod, method)
20         local path = luci.util.split(method, ".")
21         
22         for j=1, #path-1 do
23                 if not type(mod) == "table" then
24                         break
25                 end
26                 mod = rawget(mod, path[j])
27                 if not mod then
28                         break
29                 end
30         end
31         mod = type(mod) == "table" and rawget(mod, path[#path]) or nil
32         if type(mod) == "function" then
33                 return mod
34         end
35 end
36
37 function handle(tbl, rawdata)
38         local stat, json = luci.util.copcall(luci.json.Decode, rawdata)
39         local response
40         local success = false
41         
42         if stat then
43                 if type(json.method) == "string"
44                  and (not json.params or type(json.params) == "table") then
45                         if tbl[json.method] then
46                                 response = reply(json.jsonrpc, json.id,
47                                  proxy(resolve(tbl, json.method), unpack(json.params or {})))
48                         else
49                                 response = reply(json.jsonrpc, json.id,
50                                  nil, {code=-32601, message="Method not found."})
51                         end
52                 else
53                         response = reply(json.jsonrpc, json.id,
54                          nil, {code=-32600, message="Invalid request."})
55                 end
56         else
57                 response = reply(json.jsonrpc, nil,
58                  nil, {code=-32700, message="Parse error."})
59         end
60
61         return luci.json.Encode(response)
62 end
63
64 function reply(jsonrpc, id, res, err)
65         require "luci.json"
66         id = id or luci.json.Null
67         
68         -- 1.0 compatibility
69         if jsonrpc ~= "2.0" then
70                 jsonrpc = nil
71                 res = res or luci.json.Null
72                 err = err or luci.json.Null
73         end
74         
75         return {id=id, result=res, error=err, jsonrpc=jsonrpc}
76 end
77
78 function proxy(method, ...)
79         local res = {luci.util.copcall(method, ...)}
80         local stat = table.remove(res, 1)
81         
82         if not stat then
83                 return nil, {code=-32602, message="Invalid params.", data=table.remove(res, 1)} 
84         else
85                 if #res <= 1 then
86                         return res[1] or luci.json.Null
87                 else
88                         return res
89                 end
90         end
91 end