-
Notifications
You must be signed in to change notification settings - Fork 1
/
metaschema_node.rb
217 lines (191 loc) · 7.9 KB
/
metaschema_node.rb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
# frozen_string_literal: true
module JSI
# a MetaschemaNode is a PathedNode whose node_document contains a metaschema.
# as with any PathedNode the node_ptr points to the content of a node.
# the root of the metaschema is pointed to by metaschema_root_ptr.
# the schema of the root of the document is pointed to by root_schema_ptr.
#
# like JSI::Base, this class represents an instance of a schema, an instance
# which may itself be a schema. unlike JSI::Base, the document containing the
# schema and the instance is the same, and a schema may be an instance of itself.
#
# the document containing the metaschema, its subschemas, and instances of those
# subschemas is the node_document.
#
# the schema instance is the content in the document pointed to by the MetaschemaNode's node_ptr.
#
# unlike with JSI::Base, the schema is not part of the class, since a metaschema
# needs the ability to have its schema be the instance itself.
#
# if the MetaschemaNode's schema is its self, it will be extended with JSI::Metaschema.
#
# a MetaschemaNode is extended with JSI::Schema when it represents a schema - this is the case when
# its schema is the metaschema.
class MetaschemaNode
include PathedNode
include Memoize
# not every MetaschemaNode is actually an Enumerable, but it's better to include Enumerable on
# the class than to conditionally extend the instance.
include Enumerable
# @param node_document the document containing the metaschema
# @param node_ptr [JSI::JSON::Pointer] ptr to this MetaschemaNode in node_document
# @param metaschema_root_ptr [JSI::JSON::Pointer] ptr to the root of the metaschema in node_document
# @param root_schema_ptr [JSI::JSON::Pointer] ptr to the schema of the root of the node_document
def initialize(node_document, node_ptr: JSI::JSON::Pointer[], metaschema_root_ptr: JSI::JSON::Pointer[], root_schema_ptr: JSI::JSON::Pointer[])
@node_document = node_document
@node_ptr = node_ptr
@metaschema_root_ptr = metaschema_root_ptr
@root_schema_ptr = root_schema_ptr
node_content = self.node_content
if node_content.respond_to?(:to_hash)
extend PathedHashNode
elsif node_content.respond_to?(:to_ary)
extend PathedArrayNode
end
instance_for_schema = node_document
schema_ptr = node_ptr.reference_tokens.inject(root_schema_ptr) do |ptr0, tok|
if instance_for_schema.respond_to?(:to_ary)
ptr1 = ptr0 && ptr0.schema_subschema_ptr_for_index(node_document, tok)
else
ptr1 = ptr0 && ptr0.schema_subschema_ptr_for_property_name(node_document, tok)
end
instance_for_schema = instance_for_schema[tok]
ptr2 = ptr1 && ptr1.deref(node_document)
ptr3 = ptr2 && ptr2.schema_match_ptr_to_instance(node_document, instance_for_schema)
ptr3 # only God may judge my variable names
end
@schema = if schema_ptr
if schema_ptr == node_ptr
self
else
new_node(node_ptr: schema_ptr)
end
else
nil
end
if schema_ptr
if schema_ptr == metaschema_root_ptr
extend JSI::Schema
end
if schema_ptr == node_ptr
extend Metaschema
end
end
if @schema
extend(JSI::SchemaClasses.module_for_schema(@schema, conflicting_modules: [Metaschema, Schema, MetaschemaNode, PathedArrayNode, PathedHashNode]))
end
# workarounds
begin # draft 4 boolean schema workaround
# in draft 4, boolean schemas are not described in the root, but on anyOf schemas on
# properties/additionalProperties and properties/additionalItems.
# we need to extend those as DescribesSchema.
addtlPropsanyOf = metaschema_root_ptr["properties"]["additionalProperties"]["anyOf"]
addtlItemsanyOf = metaschema_root_ptr["properties"]["additionalItems"]["anyOf"]
if !node_ptr.root? && [addtlPropsanyOf, addtlItemsanyOf].include?(node_ptr.parent)
extend JSI::Schema::DescribesSchema
end
end
end
# document containing the metaschema. see PathedNode#node_document.
attr_reader :node_document
# ptr to this metaschema node. see PathedNode#node_ptr.
attr_reader :node_ptr
# ptr to the root of the metaschema in the node_document
attr_reader :metaschema_root_ptr
# ptr to the schema of the root of the node_document
attr_reader :root_schema_ptr
# a JSI::Schema describing this MetaschemaNode
attr_reader :schema
# @return [MetaschemaNode] document root MetaschemaNode
def document_root_node
new_node(node_ptr: JSI::JSON::Pointer[])
end
# @return [MetaschemaNode] parent MetaschemaNode
def parent_node
new_node(node_ptr: node_ptr.parent)
end
# @param token [String, Integer, Object] the token to subscript
# @return [MetaschemaNode, Object] the node content's subscript value at the given token.
# if there is a subschema defined for that token on this MetaschemaNode's schema,
# returns that value as a MetaschemaNode instantiation of that subschema.
def [](token)
if respond_to?(:to_hash)
token_in_range = node_content_hash_pubsend(:key?, token)
value = node_content_hash_pubsend(:[], token)
elsif respond_to?(:to_ary)
token_in_range = node_content_ary_pubsend(:each_index).include?(token)
value = node_content_ary_pubsend(:[], token)
else
raise(NoMethodError, "cannot subcript (using token: #{token.inspect}) from content: #{node_content.pretty_inspect.chomp}")
end
jsi_memoize(:[], token, value, token_in_range) do |token, value, token_in_range|
if token_in_range
value_node = new_node(node_ptr: node_ptr[token])
if value_node.is_a?(Schema) || value.respond_to?(:to_hash) || value.respond_to?(:to_ary)
value_node
else
value
end
else
# I think I will not support Hash#default/#default_proc in this case.
nil
end
end
end
# if this MetaschemaNode is a $ref then the $ref is followed. otherwise this MetaschemaNode is returned.
# @return [MetaschemaNode]
def deref(&block)
node_ptr_deref do |deref_ptr|
return new_node(node_ptr: deref_ptr).tap(&(block || Util::NOOP))
end
return self
end
# @yield [Object] the node content of the instance. the block should result
# in a (nondestructively) modified copy of this.
# @return [MetaschemaNode] modified copy of self
def modified_copy(&block)
MetaschemaNode.new(node_ptr.modified_document_copy(node_document, &block), our_initialize_params)
end
# @return [String]
def inspect
"\#<#{object_group_text.join(' ')} #{node_content.inspect}>"
end
def pretty_print(q)
q.text '#<'
q.text object_group_text.join(' ')
q.group_sub {
q.nest(2) {
q.breakable ' '
q.pp node_content
}
}
q.breakable ''
q.text '>'
end
# @return [Array<String>]
def object_group_text
if schema
class_n_schema = "#{self.class} (#{schema.node_ptr.fragment})"
else
class_n_schema = self.class.to_s
end
[
class_n_schema,
is_a?(Metaschema) ? "Metaschema" : is_a?(Schema) ? "Schema" : nil,
*(node_content.respond_to?(:object_group_text) ? node_content.object_group_text : []),
].compact
end
# @return [Object] an opaque fingerprint of this MetaschemaNode for FingerprintHash
def jsi_fingerprint
{class: self.class, node_document: node_document}.merge(our_initialize_params)
end
include FingerprintHash
private
def our_initialize_params
{node_ptr: node_ptr, metaschema_root_ptr: metaschema_root_ptr, root_schema_ptr: root_schema_ptr}
end
def new_node(params)
MetaschemaNode.new(node_document, our_initialize_params.merge(params))
end
end
end