formiface.lua.svn-base

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

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

data = datajson()
cfgvars = {
  values = {},
  params = {},
  classes = {}
}
  
-- get list of classes
qoscfg = uci.init('qos')
for name, section in pairs(qoscfg) do
  if (section['.type'] == 'class') then
    cfgvars['classes'][ name ] = {
      avgrate = (section['avgrate'] ~= nil and section['avgrate'] or 0),
      maxrate = (section['maxrate'] ~= nil and section['maxrate'] or 100)
    }
  end
end

if (data ~= nil and data['id'] ~= nil) then
  cfg = uci.init('qos', data['id'])
  cfgvars['params']['id'] = data['id']
  -- set "default" default class
  cfgvars['values']['defaultcls'] = cfgvars['classes']['Normal'] ~= nil and 'Normal' or ''

  if (cfg ~= nil) then
    cfgvars['values']['name'] = data['id']

    fields = {'overhead', 'download', 'upload'}
    for _, field in ipairs(fields) do
      if (cfg[field] ~= nil) then
        cfgvars['values'][field] = cfg[field]
      end
    end

    -- get current interface class list
    if (cfg['classgroup'] ~= nil) then
      clscfg = uci.init('qos', cfg['classgroup'])

      if (clscfg ~= nil) then
        defaultcls = clscfg['default']
        clslisttxt = clscfg['classes']

        if (defaultcls ~= nil) then
          cfgvars['values']['defaultcls'] = defaultcls
        end
        
        if (clslisttxt ~= nil) then
          clslist = split(clslisttxt, ' ')
          
          for _, clsname in ipairs(clslist) do
            cfgvars['values'][ 'cls_' .. clsname ] = clsname
          end     
        end        
      end
    end
  end

  -- get ifname for given interface
  netcfg = uci.init('network', data['id'])
  cfgvars['values']['ifname'] = (netcfg ~= nil and netcfg['ifname'] or '')
  cfgvars['values']['type'] = (netcfg ~= nil and netcfg['type'] or '')  
end

io.write(json.encode(cfgvars))