1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
|
--[[
LuCI - Lua Configuration Interface
Copyright 2008 Steven Barth <steven@midlink.org>
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
$Id$
]]--
module("luci.controller.admin.system", package.seeall)
function index()
luci.i18n.loadc("admin-core")
local i18n = luci.i18n.translate
entry({"admin", "system"}, alias("admin", "system", "system"), i18n("system"), 30)
entry({"admin", "system", "system"}, cbi("admin_system/system"), i18n("system"), 1)
entry({"admin", "system", "packages"}, call("action_packages"), i18n("a_s_packages"), 10)
entry({"admin", "system", "packages", "ipkg"}, form("admin_system/ipkg"), i18n("a_s_p_ipkg"))
entry({"admin", "system", "passwd"}, form("admin_system/passwd"), i18n("a_s_changepw"), 20)
entry({"admin", "system", "sshkeys"}, form("admin_system/sshkeys"), i18n("a_s_sshkeys"), 30)
entry({"admin", "system", "processes"}, form("admin_system/processes"), i18n("process_head"), 45)
entry({"admin", "system", "fstab"}, cbi("admin_system/fstab"), i18n("a_s_fstab"), 50)
entry({"admin", "system", "leds"}, cbi("admin_system/leds"), i18n("leds", "LEDs"), 60)
entry({"admin", "system", "backup"}, call("action_backup"), i18n("a_s_backup"), 70)
entry({"admin", "system", "upgrade"}, call("action_upgrade"), i18n("a_s_flash"), 80)
entry({"admin", "system", "reboot"}, call("action_reboot"), i18n("reboot"), 90)
end
function action_packages()
local ipkg = require("luci.model.ipkg")
local void = nil
local submit = luci.http.formvalue("submit")
-- Search query
local query = luci.http.formvalue("query")
query = (query ~= '') and query or nil
-- Packets to be installed
local install = submit and luci.http.formvaluetable("install")
-- Install from URL
local url = luci.http.formvalue("url")
if url and url ~= '' and submit then
if not install then
install = {}
end
install[url] = 1
end
-- Do install
if install then
for k, v in pairs(install) do
void, install[k] = ipkg.install(k)
end
end
-- Remove packets
local remove = submit and luci.http.formvaluetable("remove")
if remove then
for k, v in pairs(remove) do
void, remove[k] = ipkg.remove(k)
end
end
-- Update all packets
local update = luci.http.formvalue("update")
if update then
void, update = ipkg.update()
end
-- Upgrade all packets
local upgrade = luci.http.formvalue("upgrade")
if upgrade then
void, upgrade = ipkg.upgrade()
end
-- Package info
local info = luci.model.ipkg.info(query and "*"..query.."*")
info = info or {}
local pkgs = {}
-- Sort after status and name
for k, v in pairs(info) do
local x = 0
for i, j in pairs(pkgs) do
local vins = (v.Status and v.Status.installed)
local jins = (j.Status and j.Status.installed)
if vins ~= jins then
if vins then
break
end
else
if j.Package > v.Package then
break
end
end
x = i
end
table.insert(pkgs, x+1, v)
end
luci.template.render("admin_system/packages", {pkgs=pkgs, query=query,
install=install, remove=remove, update=update, upgrade=upgrade})
end
function action_backup()
local reset_avail = os.execute([[grep '"rootfs_data"' /proc/mtd >/dev/null 2>&1]]) == 0
local restore_cmd = "gunzip | tar -xC/ >/dev/null 2>&1"
local backup_cmd = "tar -c %s | gzip 2>/dev/null"
local restore_fpi
luci.http.setfilehandler(
function(meta, chunk, eof)
if not restore_fpi then
restore_fpi = io.popen(restore_cmd, "w")
end
if chunk then
restore_fpi:write(chunk)
end
if eof then
restore_fpi:close()
end
end
)
local upload = luci.http.formvalue("archive")
local backup = luci.http.formvalue("backup")
local reset = reset_avail and luci.http.formvalue("reset")
if upload and #upload > 0 then
luci.template.render("admin_system/applyreboot")
luci.sys.reboot()
elseif backup then
luci.util.perror(backup_cmd:format(_keep_pattern()))
local backup_fpi = io.popen(backup_cmd:format(_keep_pattern()), "r")
luci.http.header('Content-Disposition', 'attachment; filename="backup.tar.gz"')
luci.http.prepare_content("application/x-targz")
luci.ltn12.pump.all(luci.ltn12.source.file(backup_fpi), luci.http.write)
elseif reset then
luci.template.render("admin_system/applyreboot")
luci.util.exec("mtd -r erase rootfs_data")
else
luci.template.render("admin_system/backup", {reset_avail = reset_avail})
end
end
function action_passwd()
local p1 = luci.http.formvalue("pwd1")
local p2 = luci.http.formvalue("pwd2")
local stat = nil
if p1 or p2 then
if p1 == p2 then
stat = luci.sys.user.setpasswd("root", p1)
else
stat = 10
end
end
luci.template.render("admin_system/passwd", {stat=stat})
end
function action_reboot()
local reboot = luci.http.formvalue("reboot")
luci.template.render("admin_system/reboot", {reboot=reboot})
if reboot then
luci.sys.reboot()
end
end
function action_upgrade()
require("luci.model.uci")
local mtdow = require "luci.sys.mtdow"
local writer = mtdow.native_writer()
local blocks = writer and writer.blocks
local ltn12 = require "luci.ltn12"
local uploads = {}
local flash = {}
local ret
local filepat = "/tmp/mtdblock.%s"
local kfile = "/tmp/mtdappend.tgz"
local keep_avail = false
if blocks then
for k, block in pairs(blocks) do
if block.write == mtdow.WRITE_COMBINED
or block.write == mtdow.WRITE_EMULATED then
keep_avail = true
end
end
end
luci.http.setfilehandler(
function(meta, chunk, eof)
if not meta or not blocks or not blocks[meta.name] then
return
end
if not uploads[meta.name] then
uploads[meta.name] = io.open(filepat % meta.name, "w")
end
if chunk then
uploads[meta.name]:write(chunk)
end
if eof then
uploads[meta.name]:close()
uploads[meta.name] = filepat % meta.name
end
end
)
luci.http.formvalue() -- Parse uploads
local keepcfg = keep_avail and luci.http.formvalue("keepcfg")
local function _kfile()
luci.fs.unlink(kfile)
local kpattern = ""
local files = luci.model.uci.cursor():get_all("luci", "flash_keep")
if files then
kpattern = ""
for k, v in pairs(files) do
if k:sub(1,1) ~= "." and luci.fs.glob(v) then
kpattern = kpattern .. " '" .. v .. "'"
end
end
end
local stat = os.execute("tar czf '%s' %s >/dev/null 2>&1" % {kfile, kpattern})
return stat == 0 and kfile
end
for name, file in pairs(uploads) do
flash[name] = function()
local imgstream = ltn12.source.file(io.open(file))
return pcall(writer.write_block, writer,
name, imgstream, keepcfg and _kfile())
end
end
local reboot = {}
luci.template.render("admin_system/upgrade", {blocks=blocks,
flash=flash, keep_avail=keep_avail, reboot=reboot})
if reboot.exec then
local pid = posix.fork()
if pid == 0 then
os.execute("sleep 1")
posix.execp("reboot")
end
end
end
|
