save.lua.svn-base

嵌入式无线路由系统openwrt的web配置工具

#!/usr/bin/lua
-- Copyright (C) 2008 OpenRB.com
require('fslib')

tmpfile = os.getenv('FORM_uploadfile')
pkgname = os.getenv('FORM_uploadfile_name')

out = {
  done = 1
}
 
if (tmpfile ~= nil and pkgname ~= nil) then
  pkgfile = '/tmp/' .. pkgname
  r, error = os.rename(tmpfile, pkgfile)

  if (r == nil) then
    out.params = error
  else
    out.params = table.unique(readlines('opkg -force-defaults install ' .. pkgfile .. ' 2>&1', 0 , true))
    os.remove(pkgfile)
  end
end

io.write(json.encode(out))