convert luci.fs users to nixio.fs api
[project/luci.git] / libs / uvl / luasrc / uvl / datatypes.lua
1 --[[
2
3 UCI Validation Layer - Datatype Tests
4 (c) 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
5 (c) 2008 Steven Barth <steven@midlink.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 ]]--
16
17 local fs = require "nixio.fs"
18 local ip = require "luci.ip"
19 local math = require "math"
20 local util = require "luci.util"
21
22 local tonumber = tonumber
23
24 module "luci.uvl.datatypes"
25
26
27 function boolean( val )
28 if val == "1" or val == "yes" or val == "on" or val == "true" then
29 return true
30 elseif val == "0" or val == "no" or val == "off" or val == "false" then
31 return true
32 elseif val == "" or val == nil then
33 return true
34 end
35
36 return false
37 end
38
39 function uint( val )
40 local n = tonumber(val)
41 if n ~= nil and math.floor(n) == n and n >= 0 then
42 return true
43 end
44
45 return false
46 end
47
48 function integer( val )
49 local n = tonumber(val)
50 if n ~= nil and math.floor(n) == n then
51 return true
52 end
53
54 return false
55 end
56
57 function float( val )
58 return ( tonumber(val) ~= nil )
59 end
60
61 function ipaddr( val )
62 return ip4addr(val) or ip6addr(val)
63 end
64
65 function ip4addr( val )
66 if val then
67 return ip.IPv4(val) and true or false
68 end
69
70 return false
71 end
72
73 function ip4prefix( val )
74 val = tonumber(val)
75 return ( val and val >= 0 and val <= 32 )
76 end
77
78 function ip6addr( val )
79 if val then
80 return ip.IPv6(val) and true or false
81 end
82
83 return false
84 end
85
86 function ip6prefix( val )
87 val = tonumber(val)
88 return ( val and val >= 0 and val <= 128 )
89 end
90
91 function port( val )
92 val = tonumber(val)
93 return ( val and val >= 1 and val <= 65535 )
94 end
95
96 function portrange( val )
97 local p1, p2 = val:match("^(%d+)%-(%d+)$")
98 if p1 and p2 and port(p1) and port(p2) then
99 return true
100 else
101 return port(val)
102 end
103 end
104
105 function macaddr( val )
106 if val and val:match(
107 "^[a-fA-F0-9]+:[a-fA-F0-9]+:[a-fA-F0-9]+:" ..
108 "[a-fA-F0-9]+:[a-fA-F0-9]+:[a-fA-F0-9]+$"
109 ) then
110 local parts = util.split( val, ":" )
111
112 for i = 1,6 do
113 parts[i] = tonumber( parts[i], 16 )
114 if parts[i] < 0 or parts[i] > 255 then
115 return false
116 end
117 end
118
119 return true
120 end
121
122 return false
123 end
124
125 function hostname( val )
126 if val and val:match("[a-zA-Z0-9_][a-zA-Z0-9_%-%.]*") then
127 return true -- XXX: ToDo: need better solution
128 end
129
130 return false
131 end
132
133 function host( val )
134 return hostname(val) or ipaddr(val)
135 end
136
137 function string( val )
138 return true -- Everything qualifies as valid string
139 end
140
141 function directory( val, seen )
142 local s = fs.stat( val )
143 seen = seen or { }
144
145 if s and not seen[s.ino] then
146 seen[s.ino] = true
147 if s.type == "dir" then
148 return true
149 elseif s.type == "lnk" then
150 return directory( fs.readlink(val), seen )
151 end
152 end
153
154 return false
155 end
156
157 function file( val, seen )
158 local s = fs.stat( val )
159 seen = seen or { }
160
161 if s and not seen[s.ino] then
162 seen[s.ino] = true
163 if s.type == "reg" then
164 return true
165 elseif s.type == "lnk" then
166 return file( fs.readlink(val), seen )
167 end
168 end
169
170 return false
171 end
172
173 function device( val, seen )
174 local s = fs.stat( val )
175 seen = seen or { }
176
177 if s and not seen[s.ino] then
178 seen[s.ino] = true
179 if s.type == "chr" or s.type == "blk" then
180 return true
181 elseif s.type == "lnk" then
182 return device( fs.readlink(val), seen )
183 end
184 end
185
186 return false
187 end