Software `/` code `/` prosody

Annotate

util/jsonschema.lua @ 12331:49739369dcad

core.certmanager: Turn soft dependency on LuaSec into a hard The default network backend server_epoll already requires LuaSec so Prosody won't even start without it, so we can get rid of these lines here too.

author	Kim Alvefur <zash@zash.se>
date	Thu, 10 Feb 2022 17:15:55 +0100
parent	12132:4ff0d33dfb2b
child	12500:88e1b94105ae

rev	line source
11460 a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	1 local json = require("util.json")
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	2 local null = json.null;
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	3
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	4 local pointer = require("util.jsonpointer")
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	5
11460 a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	6 local json_type_name = json.json_type_name
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	7
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	8 local schema_t = {}
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	9
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	10 local json_schema_object = {xml_t = {}}
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	11
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	12 local type_validators = {}
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	13
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	14 local function simple_validate(schema, data)
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	15 if schema == "object" and type(data) == "table" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	16 return type(data) == "table" and (next(data) == nil or type((next(data, nil))) == "string")
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	17 elseif schema == "array" and type(data) == "table" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	18 return type(data) == "table" and (next(data) == nil or type((next(data, nil))) == "number")
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	19 elseif schema == "integer" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	20 return math.type(data) == schema
11460 a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	21 elseif schema == "null" then
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	22 return data == null
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	23 else
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	24 return type(data) == schema
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	25 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	26 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	27
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	28 type_validators.string = function(schema, data)
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	29
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	30 if type(data) == "string" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	31 if schema.maxLength and #data > schema.maxLength then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	32 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	33 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	34 if schema.minLength and #data < schema.minLength then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	35 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	36 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	37 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	38 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	39 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	40 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	41
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	42 type_validators.number = function(schema, data)
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	43 if schema.multipleOf and data % schema.multipleOf ~= 0 then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	44 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	45 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	46
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	47 if schema.maximum and not (data <= schema.maximum) then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	48 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	49 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	50
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	51 if schema.exclusiveMaximum and not (data < schema.exclusiveMaximum) then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	52 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	53 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	54
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	55 if schema.minimum and not (data >= schema.minimum) then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	56 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	57 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	58
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	59 if schema.exclusiveMinimum and not (data > schema.exclusiveMinimum) then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	60 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	61 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	62
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	63 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	64 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	65
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	66 type_validators.integer = type_validators.number
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	67
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	68 local function validate(schema, data, root)
11441 75a280e6e046 util.jsonschema: Allow a boolean as schema Kim Alvefur <zash@zash.se> parents: 11440 diff changeset	69 if type(schema) == "boolean" then
75a280e6e046 util.jsonschema: Allow a boolean as schema Kim Alvefur <zash@zash.se> parents: 11440 diff changeset	70 return schema
75a280e6e046 util.jsonschema: Allow a boolean as schema Kim Alvefur <zash@zash.se> parents: 11440 diff changeset	71 end
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	72 if type(schema) == "string" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	73 return simple_validate(schema, data)
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	74 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	75 if type(schema) == "table" then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	76 if root == nil then
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	77 root = schema
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	78 end
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	79 if schema["$ref"] and schema["$ref"]:sub(1, 1) == "#" then
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	80 local referenced = pointer.resolve(root, schema["$ref"]:sub(2))
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	81 if referenced ~= nil then
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	82 return validate(referenced, data, root)
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	83 end
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	84 end
4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	85
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	86 if schema.allOf then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	87 for _, sub in ipairs(schema.allOf) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	88 if not validate(sub, data, root) then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	89 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	90 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	91 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	92 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	93 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	94
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	95 if schema.oneOf then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	96 local valid = 0
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	97 for _, sub in ipairs(schema.oneOf) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	98 if validate(sub, data, root) then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	99 valid = valid + 1
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	100 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	101 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	102 return valid == 1
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	103 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	104
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	105 if schema.anyOf then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	106 for _, sub in ipairs(schema.anyOf) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	107 if validate(sub, data, root) then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	108 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	109 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	110 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	111 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	112 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	113
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	114 if schema["not"] then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	115 if validate(schema["not"], data, root) then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	116 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	117 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	118 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	119
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	120 if schema["if"] then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	121 if validate(schema["if"], data, root) then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	122 if schema["then"] then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	123 return validate(schema["then"], data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	124 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	125 else
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	126 if schema["else"] then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	127 return validate(schema["else"], data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	128 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	129 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	130 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	131
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	132 if schema.const ~= nil and schema.const ~= data then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	133 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	134 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	135
11447 7ad137fe665b util.jsonschema: Syntax tweak to not upset syntax highlighting Kim Alvefur <zash@zash.se> parents: 11446 diff changeset	136 if schema["enum"] ~= nil then
7ad137fe665b util.jsonschema: Syntax tweak to not upset syntax highlighting Kim Alvefur <zash@zash.se> parents: 11446 diff changeset	137 for _, v in ipairs(schema["enum"]) do
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	138 if v == data then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	139 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	140 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	141 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	142 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	143 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	144
11448 1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	145 if schema.type then
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	146 if not simple_validate(schema.type, data) then
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	147 return false
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	148 end
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	149
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	150 local validator = type_validators[schema.type]
1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	151 if validator then
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	152 return validator(schema, data, root)
11448 1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	153 end
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	154 end
11448 1d84b54ba0d7 util.jsonschema: Restructure "type" keyword handling Kim Alvefur <zash@zash.se> parents: 11447 diff changeset	155 return true
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	156 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	157 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	158
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	159 type_validators.table = function(schema, data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	160 if type(data) == "table" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	161
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	162 if schema.maxItems and #data > schema.maxItems then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	163 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	164 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	165
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	166 if schema.minItems and #data < schema.minItems then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	167 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	168 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	169
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	170 if schema.required then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	171 for _, k in ipairs(schema.required) do
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	172 if data[k] == nil then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	173 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	174 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	175 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	176 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	177
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	178 if schema.properties then
11445 c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	179 local additional = schema.additionalProperties or true
c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	180 for k, v in pairs(data) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	181 if schema.propertyNames and not validate(schema.propertyNames, k, root) then
11446 58c534bac798 util.jsonschema: Implement "propertyNames" Kim Alvefur <zash@zash.se> parents: 11445 diff changeset	182 return false
58c534bac798 util.jsonschema: Implement "propertyNames" Kim Alvefur <zash@zash.se> parents: 11445 diff changeset	183 end
11445 c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	184 local s = schema.properties[k] or additional
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	185 if not validate(s, v, root) then
11445 c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	186 return false
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	187 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	188 end
11445 c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	189 elseif schema.additionalProperties then
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	190 for k, v in pairs(data) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	191 if schema.propertyNames and not validate(schema.propertyNames, k, root) then
11446 58c534bac798 util.jsonschema: Implement "propertyNames" Kim Alvefur <zash@zash.se> parents: 11445 diff changeset	192 return false
58c534bac798 util.jsonschema: Implement "propertyNames" Kim Alvefur <zash@zash.se> parents: 11445 diff changeset	193 end
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	194 if not validate(schema.additionalProperties, v, root) then
11445 c73744fa3bdf util.jsonschema: Restructure handling of "properties" and "additionalProperties" Kim Alvefur <zash@zash.se> parents: 11444 diff changeset	195 return false
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	196 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	197 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	198 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	199
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	200 if schema.uniqueItems then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	201
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	202 local values = {}
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	203 for _, v in pairs(data) do
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	204 if values[v] then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	205 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	206 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	207 values[v] = true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	208 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	209 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	210
11443 a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	211 local p = 0
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	212 if schema.prefixItems then
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	213 for i, s in ipairs(schema.prefixItems) do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	214 if validate(s, data[i], root) then
11443 a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	215 p = i
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	216 else
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	217 return false
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	218 end
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	219 end
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	220 end
a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	221
11440 d5288c99bb5a util.jsonschema: Correct "items" keyword Kim Alvefur <zash@zash.se> parents: 11434 diff changeset	222 if schema.items then
11443 a526abef61e6 util.jsonschema: Implement the "prefixItems" keyword Kim Alvefur <zash@zash.se> parents: 11442 diff changeset	223 for i = p + 1, #data do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	224 if not validate(schema.items, data[i], root) then
11440 d5288c99bb5a util.jsonschema: Correct "items" keyword Kim Alvefur <zash@zash.se> parents: 11434 diff changeset	225 return false
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	226 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	227 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	228 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	229
11442 95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	230 if schema.contains then
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	231 local found = false
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	232 for i = 1, #data do
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	233 if validate(schema.contains, data[i], root) then
11442 95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	234 found = true
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	235 break
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	236 end
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	237 end
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	238 if not found then
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	239 return false
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	240 end
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	241 end
95f0d77175ca util.jsonschema: Implement the "contains" keyword Kim Alvefur <zash@zash.se> parents: 11441 diff changeset	242
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	243 return true
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	244 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	245 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	246 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	247
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	248 type_validators.object = function(schema, data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	249 if type(data) == "table" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	250 for k in pairs(data) do
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	251 if not (type(k) == "string") then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	252 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	253 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	254 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	255
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	256 return type_validators.table(schema, data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	257 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	258 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	259 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	260
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	261 type_validators.array = function(schema, data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	262 if type(data) == "table" then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	263
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	264 for i in pairs(data) do
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	265 if not (type(i) == "number") then
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	266 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	267 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	268 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	269
12132 4ff0d33dfb2b util.jsonschema: Add support for $ref pointers Kim Alvefur <zash@zash.se> parents: 11460 diff changeset	270 return type_validators.table(schema, data, root)
11434 66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	271 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	272 return false
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	273 end
66d4067bdfb2 util.jsonschema: Library for JSON Schema validation Kim Alvefur <zash@zash.se> parents: diff changeset	274
11460 a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	275 json_schema_object.validate = validate;
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	276
a8b4e04bc044 util.jsonschema: Rename types for improved readability Kim Alvefur <zash@zash.se> parents: 11448 diff changeset	277 return json_schema_object

prosody

49739369dcad

util/jsonschema.lua

Software / code / prosody

Annotate

util/jsonschema.lua @ 12331:49739369dcad

Software `/` code `/` prosody