Moved luci.sys.exec, luci.sys.execl and luci.sys.bigendian to luci.util
[project/luci.git] / modules / admin-mini / luasrc / controller / mini / system.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.controller.mini.system", package.seeall)
17
18 function index()
19 luci.i18n.loadc("admin-core")
20 local i18n = luci.i18n.translate
21
22 entry({"mini", "system"}, alias("mini", "system", "index"), i18n("system"), 40)
23 entry({"mini", "system", "index"}, cbi("mini/system"), i18n("general"), 1)
24 entry({"mini", "system", "passwd"}, call("action_passwd"), i18n("a_s_changepw"), 10)
25 entry({"mini", "system", "backup"}, call("action_backup"), i18n("a_s_backup"), 80)
26 entry({"mini", "system", "upgrade"}, call("action_upgrade"), i18n("a_s_flash"), 90)
27 entry({"mini", "system", "reboot"}, call("action_reboot"), i18n("reboot"), 100)
28 end
29
30 function action_backup()
31 local reset_avail = os.execute([[grep '"rootfs_data"' /proc/mtd >/dev/null 2>&1]]) == 0
32 local restore_cmd = "gunzip | tar -xC/ >/dev/null 2>&1"
33 local backup_cmd = "tar -c %s | gzip 2>/dev/null"
34
35 local restore_fpi
36 luci.http.setfilehandler(
37 function(meta, chunk, eof)
38 if not restore_fpi then
39 restore_fpi = io.popen(restore_cmd, "w")
40 end
41 if chunk then
42 restore_fpi:write(chunk)
43 end
44 if eof then
45 restore_fpi:close()
46 end
47 end
48 )
49
50 local upload = luci.http.formvalue("archive")
51 local backup = luci.http.formvalue("backup")
52 local reset = reset_avail and luci.http.formvalue("reset")
53
54 if upload and #upload > 0 then
55 luci.template.render("mini/applyreboot")
56 luci.sys.reboot()
57 elseif backup then
58 luci.util.perror(backup_cmd:format(_keep_pattern()))
59 local backup_fpi = io.popen(backup_cmd:format(_keep_pattern()), "r")
60 luci.http.header('Content-Disposition', 'attachment; filename="backup.tar.gz"')
61 luci.http.prepare_content("application/x-targz")
62 luci.ltn12.pump.all(luci.ltn12.source.file(backup_fpi), luci.http.write)
63 elseif reset then
64 luci.template.render("mini/applyreboot")
65 luci.util.exec("mtd -r erase rootfs_data")
66 else
67 luci.template.render("mini/backup", {reset_avail = reset_avail})
68 end
69 end
70
71 function action_reboot()
72 local reboot = luci.http.formvalue("reboot")
73 luci.template.render("mini/reboot", {reboot=reboot})
74 if reboot then
75 luci.sys.reboot()
76 end
77 end
78
79 function action_upgrade()
80 require("luci.model.uci")
81
82 local ret = nil
83 local plat = luci.fs.mtime("/lib/upgrade/platform.sh")
84 local broadcom = os.execute('grep brcm_ /lib/upgrade/platform.sh >/dev/null 2>&1') == 0
85 local tmpfile = "/tmp/firmware.img"
86
87 local keep_avail = not broadcom
88
89 local file
90 luci.http.setfilehandler(
91 function(meta, chunk, eof)
92 if not file then
93 file = io.open(tmpfile, "w")
94 end
95 if chunk then
96 file:write(chunk)
97 end
98 if eof then
99 file:close()
100 end
101 end
102 )
103
104 local fname = luci.http.formvalue("image")
105 local keepcfg = keep_avail and luci.http.formvalue("keepcfg")
106
107 if plat and fname then
108 ret = luci.sys.flash(tmpfile, keepcfg and _keep_pattern())
109 end
110
111 luci.template.render("mini/upgrade", {sysupgrade=plat, ret=ret, keep_avail=keep_avail})
112 end
113
114 function action_passwd()
115 local p1 = luci.http.formvalue("pwd1")
116 local p2 = luci.http.formvalue("pwd2")
117 local stat = nil
118
119 if p1 or p2 then
120 if p1 == p2 then
121 stat = luci.sys.user.setpasswd("root", p1)
122 else
123 stat = 10
124 end
125 end
126
127 luci.template.render("mini/passwd", {stat=stat})
128 end
129
130 function _keep_pattern()
131 local kpattern = ""
132 local files = luci.model.uci.get_all("luci", "flash_keep")
133 if files then
134 kpattern = ""
135 for k,v in pairs(files) do
136 kpattern = kpattern .. " " .. v
137 end
138 end
139 return kpattern
140 end