modules/admin-full/luasrc/controller/admin/system.lua

   1 --[[
   2 LuCI - Lua Configuration Interface
   3
   4 Copyright 2008 Steven Barth <steven@midlink.org>
   5 Copyright 2008-2009 Jo-Philipp Wich <xm@subsignal.org>
   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 module("luci.controller.admin.system", package.seeall)
  16
  17 function index()
  18         luci.i18n.loadc("admin-core")
  19         local i18n = luci.i18n.translate
  20
  21         entry({"admin", "system"}, alias("admin", "system", "system"), i18n("system"), 30).index = true
  22         entry({"admin", "system", "system"}, cbi("admin_system/system"), i18n("system"), 1)
  23         entry({"admin", "system", "packages"}, call("action_packages"), i18n("a_s_packages"), 10)
  24         entry({"admin", "system", "packages", "ipkg"}, form("admin_system/ipkg"))
  25         entry({"admin", "system", "passwd"}, form("admin_system/passwd"), i18n("a_s_changepw"), 20)
  26         entry({"admin", "system", "sshkeys"}, form("admin_system/sshkeys"), i18n("a_s_sshkeys"), 30)
  27         entry({"admin", "system", "processes"}, form("admin_system/processes"), i18n("process_head"), 45)
  28         entry({"admin", "system", "fstab"}, cbi("admin_system/fstab"), i18n("a_s_fstab"), 50)
  29
  30         if luci.fs.isdirectory("/sys/class/leds") then
  31                 entry({"admin", "system", "leds"}, cbi("admin_system/leds"), i18n("leds", "LEDs"), 60)
  32         end
  33
  34         entry({"admin", "system", "backup"}, call("action_backup"), i18n("a_s_backup"), 70)
  35         entry({"admin", "system", "upgrade"}, call("action_upgrade"), i18n("admin_upgrade"), 80)
  36         entry({"admin", "system", "reboot"}, call("action_reboot"), i18n("reboot"), 90)
  37 end
  38
  39 function action_packages()
  40         local ipkg = require("luci.model.ipkg")
  41         local void = nil
  42         local submit = luci.http.formvalue("submit")
  43         local changes = false
  44
  45
  46         -- Search query
  47         local query = luci.http.formvalue("query")
  48         query = (query ~= '') and query or nil
  49
  50
  51         -- Packets to be installed
  52         local install = submit and luci.http.formvaluetable("install")
  53
  54         -- Install from URL
  55         local url = luci.http.formvalue("url")
  56         if url and url ~= '' and submit then
  57                 if not install then
  58                         install = {}
  59                 end
  60                 install[url] = 1
  61                 changes = true
  62         end
  63
  64         -- Do install
  65         if install then
  66                 for k, v in pairs(install) do
  67                         void, install[k] = ipkg.install(k)
  68                 end
  69                 changes = true
  70         end
  71
  72
  73         -- Remove packets
  74         local remove = submit and luci.http.formvaluetable("remove")
  75         if remove then
  76                 for k, v in pairs(remove) do
  77                         void, remove[k] = ipkg.remove(k)
  78                 end
  79                 changes = true
  80         end
  81
  82
  83         -- Update all packets
  84         local update = luci.http.formvalue("update")
  85         if update then
  86                 void, update = ipkg.update()
  87         end
  88
  89
  90         -- Upgrade all packets
  91         local upgrade = luci.http.formvalue("upgrade")
  92         if upgrade then
  93                 void, upgrade = ipkg.upgrade()
  94         end
  95
  96
  97         -- Package info
  98         local info = luci.model.ipkg.info(query and "*"..query.."*")
  99         info = info or {}
 100         local pkgs = {}
 101
 102         -- Sort after status and name
 103         for k, v in pairs(info) do
 104                 local x = 0
 105                 for i, j in pairs(pkgs) do
 106                         local vins = (v.Status and v.Status.installed)
 107                         local jins = (j.Status and j.Status.installed)
 108                         if vins ~= jins then
 109                                 if vins then
 110                                         break
 111                                 end
 112                         else
 113                                 if j.Package > v.Package then
 114                                         break
 115                                 end
 116                         end
 117                         x = i
 118                 end
 119                 table.insert(pkgs, x+1, v)
 120         end
 121
 122         luci.template.render("admin_system/packages", {pkgs=pkgs, query=query,
 123          install=install, remove=remove, update=update, upgrade=upgrade})
 124
 125         -- Remove index cache
 126         if changes then
 127                 luci.fs.unlink("/tmp/luci-indexcache")
 128         end
 129 end
 130
 131 function action_backup()
 132         local reset_avail = os.execute([[grep '"rootfs_data"' /proc/mtd >/dev/null 2>&1]]) == 0
 133         local restore_cmd = "gunzip | tar -xC/ >/dev/null 2>&1"
 134         local backup_cmd  = "tar -c %s | gzip 2>/dev/null"
 135
 136         local restore_fpi
 137         luci.http.setfilehandler(
 138                 function(meta, chunk, eof)
 139                         if not restore_fpi then
 140                                 restore_fpi = io.popen(restore_cmd, "w")
 141                         end
 142                         if chunk then
 143                                 restore_fpi:write(chunk)
 144                         end
 145                         if eof then
 146                                 restore_fpi:close()
 147                         end
 148                 end
 149         )
 150
 151         local upload = luci.http.formvalue("archive")
 152         local backup = luci.http.formvalue("backup")
 153         local reset  = reset_avail and luci.http.formvalue("reset")
 154
 155         if upload and #upload > 0 then
 156                 luci.template.render("admin_system/applyreboot")
 157                 luci.sys.reboot()
 158         elseif backup then
 159                 luci.util.perror(backup_cmd:format(_keep_pattern()))
 160                 local backup_fpi = io.popen(backup_cmd:format(_keep_pattern()), "r")
 161                 luci.http.header('Content-Disposition', 'attachment; filename="backup-%s-%s.tar.gz"' % {
 162                         luci.sys.hostname(), os.date("%Y-%m-%d")})
 163                 luci.http.prepare_content("application/x-targz")
 164                 luci.ltn12.pump.all(luci.ltn12.source.file(backup_fpi), luci.http.write)
 165         elseif reset then
 166                 luci.template.render("admin_system/applyreboot")
 167                 luci.util.exec("mtd -r erase rootfs_data")
 168         else
 169                 luci.template.render("admin_system/backup", {reset_avail = reset_avail})
 170         end
 171 end
 172
 173 function action_passwd()
 174         local p1 = luci.http.formvalue("pwd1")
 175         local p2 = luci.http.formvalue("pwd2")
 176         local stat = nil
 177
 178         if p1 or p2 then
 179                 if p1 == p2 then
 180                         stat = luci.sys.user.setpasswd("root", p1)
 181                 else
 182                         stat = 10
 183                 end
 184         end
 185
 186         luci.template.render("admin_system/passwd", {stat=stat})
 187 end
 188
 189 function action_reboot()
 190         local reboot = luci.http.formvalue("reboot")
 191         luci.template.render("admin_system/reboot", {reboot=reboot})
 192         if reboot then
 193                 luci.sys.reboot()
 194         end
 195 end
 196
 197 function action_upgrade()
 198         require("luci.model.uci")
 199
 200         local tmpfile = "/tmp/firmware.img"
 201
 202         local function image_supported()
 203                 -- XXX: yay...
 204                 return ( 0 == os.execute(
 205                         ". /etc/functions.sh; " ..
 206                         "include /lib/upgrade; " ..
 207                         "platform_check_image %q >/dev/null"
 208                                 % tmpfile
 209                 ) )
 210         end
 211
 212         local function image_checksum()
 213                 return (luci.sys.exec("md5sum %q" % tmpfile):match("^([^%s]+)"))
 214         end
 215
 216         local function storage_size()
 217                 local size = 0
 218                 if luci.fs.access("/proc/mtd") then
 219                         for l in io.lines("/proc/mtd") do
 220                                 local d, s, e, n = l:match('^([^%s]+)%s+([^%s]+)%s+([^%s]+)%s+"([^%s]+)"')
 221                                 if n == "linux" then
 222                                         size = tonumber(s, 16)
 223                                         break
 224                                 end
 225                         end
 226                 elseif luci.fs.access("/proc/partitions") then
 227                         for l in io.lines("/proc/partitions") do
 228                                 local x, y, b, n = l:match('^%s*(%d+)%s+(%d+)%s+([^%s]+)%s+([^%s]+)')
 229                                 if b and n and not n:match('[0-9]') then
 230                                         size = tonumber(b) * 1024
 231                                         break
 232                                 end
 233                         end
 234                 end
 235                 return size
 236         end
 237
 238
 239         -- Install upload handler
 240         local file
 241         luci.http.setfilehandler(
 242                 function(meta, chunk, eof)
 243                         if not luci.fs.access(tmpfile) and not file and chunk and #chunk > 0 then
 244                                 file = io.open(tmpfile, "w")
 245                         end
 246                         if file and chunk then
 247                                 file:write(chunk)
 248                         end
 249                         if file and eof then
 250                                 file:close()
 251                         end
 252                 end
 253         )
 254
 255
 256         -- Determine state
 257         local keep_avail   = true
 258         local step         = tonumber(luci.http.formvalue("step") or 1)
 259         local has_image    = luci.fs.access(tmpfile)
 260         local has_support  = image_supported()
 261         local has_platform = luci.fs.access("/lib/upgrade/platform.sh")
 262         local has_upload   = luci.http.formvalue("image")
 263
 264         -- This does the actual flashing which is invoked inside an iframe
 265         -- so don't produce meaningful errors here because the the
 266         -- previous pages should arrange the stuff as required.
 267         if step == 4 then
 268                 if has_platform and has_image and has_support then
 269                         -- Now invoke sysupgrade
 270                         local keepcfg = keep_avail and luci.http.formvalue("keepcfg") == "1"
 271                         local fd = io.popen("/sbin/luci-flash %s %q" %{
 272                                 keepcfg and "-k %q" % _keep_pattern() or "", tmpfile
 273                         })
 274
 275                         if fd then
 276                                 while true do
 277                                         local ln = fd:read("*l")
 278                                         if not ln then break end
 279                                         luci.http.write(ln)
 280                                 end
 281                                 fd:close()
 282                         end
 283
 284                         -- Make sure the device is rebooted
 285                         luci.sys.reboot()
 286                 end
 287
 288
 289         --
 290         -- This is step 1-3, which does the user interaction and
 291         -- image upload.
 292         --
 293
 294         -- Step 1: file upload, error on unsupported image format
 295         elseif not has_image or not has_support or step == 1 then
 296                 -- If there is an image but user has requested step 1
 297                 -- or type is not supported, then remove it.
 298                 if has_image then
 299                         luci.fs.unlink(tmpfile)
 300                 end
 301
 302                 luci.template.render("admin_system/upgrade", {
 303                         step=1,
 304                         bad_image=(has_image and not has_support or false),
 305                         keepavail=keep_avail,
 306                         supported=has_platform
 307                 } )
 308
 309         -- Step 2: present uploaded file, show checksum, confirmation
 310         elseif step == 2 then
 311                 luci.template.render("admin_system/upgrade", {
 312                         step=2,
 313                         checksum=image_checksum(),
 314                         filesize=luci.fs.stat(tmpfile).size,
 315                         flashsize=storage_size(),
 316                         keepconfig=(keep_avail and luci.http.formvalue("keepcfg") == "1")
 317                 } )
 318
 319         -- Step 3: load iframe which calls the actual flash procedure
 320         elseif step == 3 then
 321                 luci.template.render("admin_system/upgrade", {
 322                         step=3,
 323                         keepconfig=(keep_avail and luci.http.formvalue("keepcfg") == "1")
 324                 } )
 325         end
 326 end
 327
 328 function _keep_pattern()
 329         local kpattern = ""
 330         local files = luci.model.uci.cursor():get_all("luci", "flash_keep")
 331         if files then
 332                 kpattern = ""
 333                 for k, v in pairs(files) do
 334                         if k:sub(1,1) ~= "." and luci.fs.glob(v) then
 335                                 kpattern = kpattern .. " " ..  v
 336                         end
 337                 end
 338         end
 339         return kpattern
 340 end