modules/admin-full/luasrc/model/cbi/admin_system/ipkg.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 local ipkgfile = "/etc/opkg.conf"
  16
  17 f = SimpleForm("ipkgconf", translate("a_s_p_ipkg"))
  18
  19 t = f:field(TextValue, "lines")
  20 t.rows = 10
  21 function t.cfgvalue()
  22         return luci.fs.readfile(ipkgfile) or ""
  23 end
  24
  25 f:append(Template("admin_system/ipkg"))
  26
  27 function f.handle(self, state, data)
  28         if state == FORM_VALID then
  29                 if (luci.fs.readfile(ipkgfile) or "") ~= data.lines then
  30                         luci.fs.writefile(ipkgfile, data.keys)
  31                 end
  32         end
  33         return true
  34 end
  35
  36 return f