formrule.lua.svn-base

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

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

data = datajson()
cfgvars = {
  values = {},
  params = {},
  targets = {},
  layer7 = {}
}

-- get list of l7 filters installed
l7list = split(proc('ls -1 /etc/l7-protocols', true), "\n")
for _, l7pat in ipairs(l7list) do
  if l7pat:find('\.pat') then
    l7pat = string.gsub(l7pat, '\.pat', '')
    table.insert(cfgvars['layer7'], l7pat)
  end
end

-- get list of classes (targets)
for id, options in pairs(uci.init('qos')) do
  if (options['.type'] == 'class') then
    table.insert(cfgvars['targets'], id)
  end
end

if (data ~= nil and data['id'] ~= nil) then
  cfg = uci.init('qos', data['id'])
  cfgvars['params']['id'] = data['id']
      
  if (cfg ~= nil) then
    fields = {'target', 'ports', 'portrange', 'direction', 'proto',
              'layer7', 'ipp2p', 'srchost', 'dsthost'}
    for _, field in ipairs(fields) do
      if (cfg[field] ~= nil) then
        cfgvars['values'][field] = cfg[field]
      end
    end
    
    cfgvars['values']['type'] = cfg['.type']

    if (cfgvars['values']['ipp2p'] == 'all') then 
      cfgvars['values']['layer7'] = 'allp2p'
    end
    if (cfgvars['values']['portrange'] ~= nil) then 
      cfgvars['values']['portfilter'] = 'portrange'
    end
    
  end
end

io.write(json.encode(cfgvars))