modules/rpc/luasrc/controller/rpc.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 local require = require
  17 local pairs = pairs
  18 local print = print
  19 local pcall = pcall
  20 local table = table
  21
  22 module "luci.controller.rpc"
  23
  24 function index()
  25         local function authenticator(validator, accs)
  26                 local auth = luci.http.formvalue("auth", true)
  27                 if auth then
  28                         local sdat = luci.sauth.read(auth)
  29                         user = loadstring(sdat)().user
  30                         if user and luci.util.contains(accs, user) then
  31                                 return user, auth
  32                         end
  33                 end
  34                 luci.http.status(403, "Forbidden")
  35         end
  36
  37         local rpc = node("rpc")
  38         rpc.sysauth = "root"
  39         rpc.sysauth_authenticator = authenticator
  40         rpc.notemplate = true
  41
  42         entry({"rpc", "uci"}, call("rpc_uci"))
  43         entry({"rpc", "uvl"}, call("rpc_uvl"))
  44         entry({"rpc", "fs"}, call("rpc_fs"))
  45         entry({"rpc", "sys"}, call("rpc_sys"))
  46         entry({"rpc", "ipkg"}, call("rpc_ipkg"))
  47         entry({"rpc", "auth"}, call("rpc_auth")).sysauth = false
  48 end
  49
  50 function rpc_auth()
  51         local jsonrpc = require "luci.jsonrpc"
  52         local sauth   = require "luci.sauth"
  53         local http    = require "luci.http"
  54         local sys     = require "luci.sys"
  55         local ltn12   = require "luci.ltn12"
  56         local util    = require "luci.util"
  57
  58         local loginstat
  59
  60         local server = {}
  61         server.challenge = function(user, pass)
  62                 local sid, token, secret
  63
  64                 if sys.user.checkpasswd(user, pass) then
  65                         sid = sys.uniqueid(16)
  66                         token = sys.uniqueid(16)
  67                         secret = sys.uniqueid(16)
  68
  69                         http.header("Set-Cookie", "sysauth=" .. sid.."; path=/")
  70                         sauth.write(sid, util.get_bytecode({
  71                                 user=user,
  72                                 token=token,
  73                                 secret=secret
  74                         }))
  75                 end
  76
  77                 return sid and {sid=sid, token=token, secret=secret}
  78         end
  79
  80         server.login = function(...)
  81                 local challenge = server.challenge(...)
  82                 return challenge and challenge.sid
  83         end
  84
  85         http.prepare_content("application/json")
  86         ltn12.pump.all(jsonrpc.handle(server, http.source()), http.write)
  87 end
  88
  89 function rpc_uci()
  90         if not pcall(require, "luci.model.uci") then
  91                 luci.http.status(404, "Not Found")
  92                 return nil
  93         end
  94         local uci     = require "luci.jsonrpcbind.uci"
  95         local jsonrpc = require "luci.jsonrpc"
  96         local http    = require "luci.http"
  97         local ltn12   = require "luci.ltn12"
  98
  99         http.prepare_content("application/json")
 100         ltn12.pump.all(jsonrpc.handle(uci, http.source()), http.write)
 101 end
 102
 103 function rpc_uvl()
 104         if not pcall(require, "luci.uvl") then
 105                 luci.http.status(404, "Not Found")
 106                 return nil
 107         end
 108         local uvl     = require "luci.jsonrpcbind.uvl"
 109         local jsonrpc = require "luci.jsonrpc"
 110         local http    = require "luci.http"
 111         local ltn12   = require "luci.ltn12"
 112
 113         http.prepare_content("application/json")
 114         ltn12.pump.all(jsonrpc.handle(uvl, http.source()), http.write)
 115 end
 116
 117 function rpc_fs()
 118         local util    = require "luci.util"
 119         local io      = require "io"
 120         local fs2     = util.clone(require "luci.fs")
 121         local jsonrpc = require "luci.jsonrpc"
 122         local http    = require "luci.http"
 123         local ltn12   = require "luci.ltn12"
 124
 125         function fs2.readfile(filename)
 126                 local stat, mime = pcall(require, "mime")
 127                 if not stat then
 128                         error("Base64 support not available. Please install LuaSocket.")
 129                 end
 130
 131                 local fp = io.open(filename)
 132                 if not fp then
 133                         return nil
 134                 end
 135
 136                 local output = {}
 137                 local sink = ltn12.sink.table(output)
 138                 local source = ltn12.source.chain(ltn12.source.file(fp), mime.encode("base64"))
 139                 return ltn12.pump.all(source, sink) and table.concat(output)
 140         end
 141
 142         function fs2.writefile(filename, data)
 143                 local stat, mime = pcall(require, "mime")
 144                 if not stat then
 145                         error("Base64 support not available. Please install LuaSocket.")
 146                 end
 147
 148                 local  file = io.open(filename, "w")
 149                 local  sink = file and ltn12.sink.chain(mime.decode("base64"), ltn12.sink.file(file))
 150                 return sink and ltn12.pump.all(ltn12.source.string(data), sink) or false
 151         end
 152
 153         http.prepare_content("application/json")
 154         ltn12.pump.all(jsonrpc.handle(fs2, http.source()), http.write)
 155 end
 156
 157 function rpc_sys()
 158         local sys     = require "luci.sys"
 159         local jsonrpc = require "luci.jsonrpc"
 160         local http    = require "luci.http"
 161         local ltn12   = require "luci.ltn12"
 162
 163         http.prepare_content("application/json")
 164         ltn12.pump.all(jsonrpc.handle(sys, http.source()), http.write)
 165 end
 166
 167 function rpc_ipkg()
 168         if not pcall(require, "luci.model.ipkg") then
 169                 luci.http.status(404, "Not Found")
 170                 return nil
 171         end
 172         local ipkg    = require "luci.model.ipkg"
 173         local jsonrpc = require "luci.jsonrpc"
 174         local http    = require "luci.http"
 175         local ltn12   = require "luci.ltn12"
 176
 177         http.prepare_content("application/json")
 178         ltn12.pump.all(jsonrpc.handle(ipkg, http.source()), http.write)
 179 end