Class: Puppet::Pops::Types::PTypeSetType

Inherits:
PMetaType show all
Defined in:
lib/puppet/pops/types/p_type_set_type.rb

Defined Under Namespace

Classes: TypeSetLoader

Constant Summary collapse

TYPE_STRING_OR_VERSION = 
TypeFactory.variant(PStringType::NON_EMPTY, TypeFactory.sem_ver)
TYPE_STRING_OR_RANGE = 
TypeFactory.variant(PStringType::NON_EMPTY, TypeFactory.sem_ver_range)
TYPE_TYPE_REFERENCE_I12N = 
TypeFactory
    .struct({
  KEY_NAME => Pcore::TYPE_QUALIFIED_REFERENCE,
  KEY_VERSION_RANGE => TYPE_STRING_OR_RANGE,
  TypeFactory.optional(KEY_NAME_AUTHORITY) => Pcore::TYPE_URI,
  TypeFactory.optional(KEY_ANNOTATIONS) => TYPE_ANNOTATIONS
})
TYPE_TYPESET_I12N = 
TypeFactory
    .struct({
  TypeFactory.optional(Pcore::KEY_PCORE_URI) => Pcore::TYPE_URI,
  Pcore::KEY_PCORE_VERSION => TYPE_STRING_OR_VERSION,
  TypeFactory.optional(KEY_NAME_AUTHORITY) => Pcore::TYPE_URI,
  TypeFactory.optional(KEY_NAME) => Pcore::TYPE_QUALIFIED_REFERENCE,
  TypeFactory.optional(KEY_VERSION) => TYPE_STRING_OR_VERSION,
  TypeFactory.optional(KEY_TYPES) => TypeFactory.hash_kv(Pcore::TYPE_SIMPLE_TYPE_NAME, PVariantType.new([PTypeType::DEFAULT, PObjectType::TYPE_OBJECT_I12N]), PCollectionType::NOT_EMPTY_SIZE),
  TypeFactory.optional(KEY_REFERENCES) => TypeFactory.hash_kv(Pcore::TYPE_SIMPLE_TYPE_NAME, TYPE_TYPE_REFERENCE_I12N, PCollectionType::NOT_EMPTY_SIZE),
  TypeFactory.optional(KEY_ANNOTATIONS) => TYPE_ANNOTATIONS,
})
DEFAULT = 
new({
  KEY_NAME => 'DefaultTypeSet',
  KEY_NAME_AUTHORITY => Pcore::RUNTIME_NAME_AUTHORITY,
  Pcore::KEY_PCORE_URI => Pcore::PCORE_URI,
  Pcore::KEY_PCORE_VERSION => Pcore::PCORE_VERSION,
  KEY_VERSION => SemanticPuppet::Version.new(0, 0, 0)
})

Constants included from Annotatable

Annotatable::TYPE_ANNOTATIONS

Instance Attribute Summary collapse

Attributes inherited from PMetaType

#loader

Class Method Summary collapse

Instance Method Summary collapse

Methods inherited from PMetaType

#resolve_type_refs, #resolved?, #to_s

Methods included from Annotatable

#annotatable_accept, #init_annotatable

Methods inherited from PAnyType

#==, #assignable?, #callable?, #callable_args?, #callable_with?, #check_self_recursion, create, #create, #generalize, #iterable?, #iterable_type, #kind_of_callable?, #loader, new_function, #new_function, #normalize, #really_instance?, #roundtrip_with_string?, #simple_name, simple_name, #to_alias_expanded_s, #to_s

Methods inherited from TypedModelObject

_pcore_type, create_ptype, register_ptypes

Methods included from PuppetObject

#_pcore_all_contents, #_pcore_contents, #_pcore_type, #to_s

Constructor Details

#initialize(name, init_hash_expression) ⇒ PTypeSetType #initialize(init_hash) ⇒ PTypeSetType

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future.

Initialize a TypeSet Type instance. The initialization will use either a name and an initialization hash expression, or a fully resolved initialization hash.

Overloads:

  • #initialize(name, init_hash_expression) ⇒ PTypeSetType

    Used when the TypeSet type is loaded using a type alias expression. When that happens, it is important that the actual resolution of the expression is deferred until all definitions have been made known to the current loader. The package will then be resolved when it is loaded by the TypeParser. “resolved” here, means that the hash expression is fully resolved, and then passed to the #_pcore_init_from_hash method.

    Parameters:

    • name (String) —

      The name of the type set

    • init_hash_expression (Model::LiteralHash) —

      The hash describing the TypeSet features

    • name_authority (String) —

      The default name authority for the type set

  • #initialize(init_hash) ⇒ PTypeSetType

    Used when the package is created by the TypeFactory. The init_hash must be fully resolved.

    Parameters:

    • init_hash (Hash{String=>Object}) —

      The hash describing the TypeSet features



94
95
96
97
98
99
100
101
102
103
104
105
106
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 94

def initialize(name_or_init_hash, init_hash_expression = nil, name_authority = nil)
  @types = EMPTY_HASH
  @references = EMPTY_HASH

  if name_or_init_hash.is_a?(Hash)
    _pcore_init_from_hash(name_or_init_hash)
  else
    # Creation using "type XXX = TypeSet[{}]". This means that the name is given
    @name = TypeAsserter.assert_instance_of('TypeSet name', Pcore::TYPE_QUALIFIED_REFERENCE, name_or_init_hash)
    @name_authority = TypeAsserter.assert_instance_of('TypeSet name_authority', Pcore::TYPE_URI, name_authority, true)
    @init_hash_expression = init_hash_expression
  end
end

Instance Attribute Details

#annotations ⇒ Object (readonly) 



75
76
77
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 75

def annotations
  @annotations
end

#name ⇒ Object (readonly) 



71
72
73
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 71

def name
  @name
end

#name_authority ⇒ Object (readonly) 



70
71
72
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 70

def name_authority
  @name_authority
end

#pcore_uri ⇒ Object (readonly) 



68
69
70
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 68

def pcore_uri
  @pcore_uri
end

#pcore_version ⇒ Object (readonly) 



69
70
71
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 69

def pcore_version
  @pcore_version
end

#references ⇒ Object (readonly) 



74
75
76
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 74

def references
  @references
end

#types ⇒ Object (readonly) 



73
74
75
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 73

def types
  @types
end

#version ⇒ Object (readonly) 



72
73
74
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 72

def version
  @version
end

Class Method Details

.register_ptype(loader, ir) ⇒ Object 



64
65
66
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 64

def self.register_ptype(loader, ir)
  create_ptype(loader, ir, 'AnyType', '_pcore_init_hash' => TYPE_TYPESET_I12N.resolve(loader))
end

Instance Method Details

#[](qname) ⇒ PAnyType?

Resolve a type in this type set using a qualified name. The resolved type may either be a type defined in this type set or a type defined in a type set that is referenced by this type set (nesting may occur to any level). The name resolution is case insensitive.

Parameters:

Returns:

  • (PAnyType, nil) —

    the resolved type, or ‘nil` in case no type could be found



198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 198

def [](qname)
  if qname.is_a?(Loader::TypedName)
    return nil unless qname.type == :type && qname.name_authority == @name_authority

    qname = qname.name
  end

  type = @types[qname] || @types[@dc_to_cc_map[qname.downcase]]
  if type.nil? && !@references.empty?
    segments = qname.split(TypeFormatter::NAME_SEGMENT_SEPARATOR)
    first = segments[0]
    type_set_ref = @references[first] || @references[@dc_to_cc_map[first.downcase]]
    if type_set_ref.nil?
      nil
    else
      type_set = type_set_ref.type_set
      case segments.size
      when 1
        type_set
      when 2
        type_set[segments[1]]
      else
        segments.shift
        type_set[segments.join(TypeFormatter::NAME_SEGMENT_SEPARATOR)]
      end
    end
  else
    type
  end
end

#_pcore_init_from_hash(init_hash) ⇒ Object

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future. 



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
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 109

def _pcore_init_from_hash(init_hash)
  TypeAsserter.assert_instance_of('TypeSet initializer', TYPE_TYPESET_I12N, init_hash)

  # Name given to the loader have higher precedence than a name declared in the type
  @name ||= init_hash[KEY_NAME].freeze
  @name_authority ||= init_hash[KEY_NAME_AUTHORITY].freeze

  @pcore_version = PSemVerType.convert(init_hash[Pcore::KEY_PCORE_VERSION]).freeze
  unless Pcore::PARSABLE_PCORE_VERSIONS.include?(@pcore_version)
    raise ArgumentError,
          "The pcore version for TypeSet '#{@name}' is not understood by this runtime. Expected range #{Pcore::PARSABLE_PCORE_VERSIONS}, got #{@pcore_version}"
  end

  @pcore_uri = init_hash[Pcore::KEY_PCORE_URI].freeze
  @version = PSemVerType.convert(init_hash[KEY_VERSION])
  @types = init_hash[KEY_TYPES] || EMPTY_HASH
  @types.freeze

  # Map downcase names to their camel-cased equivalent
  @dc_to_cc_map = {}
  @types.keys.each { |key| @dc_to_cc_map[key.downcase] = key }

  refs = init_hash[KEY_REFERENCES]
  if refs.nil?
    @references = EMPTY_HASH
  else
    ref_map = {}
    root_map = Hash.new { |h, k| h[k] = {} }
    refs.each do |ref_alias, ref|
      ref = TypeSetReference.new(self, ref)

      # Protect against importing the exact same name_authority/name combination twice if the version ranges intersect
      ref_name = ref.name
      ref_na = ref.name_authority || @name_authority
      na_roots = root_map[ref_na]

      ranges = na_roots[ref_name]
      if ranges.nil?
        na_roots[ref_name] = [ref.version_range]
      else
        unless ranges.all? { |range| (range & ref.version_range).nil? }
          raise ArgumentError, "TypeSet '#{@name}' references TypeSet '#{ref_na}/#{ref_name}' more than once using overlapping version ranges"
        end

        ranges << ref.version_range
      end

      if ref_map.has_key?(ref_alias)
        raise ArgumentError, "TypeSet '#{@name}' references a TypeSet using alias '#{ref_alias}' more than once"
      end
      if @types.has_key?(ref_alias)
        raise ArgumentError, "TypeSet '#{@name}' references a TypeSet using alias '#{ref_alias}'. The alias collides with the name of a declared type"
      end

      ref_map[ref_alias] = ref

      @dc_to_cc_map[ref_alias.downcase] = ref_alias
      ref_map[ref_alias] = ref
    end
    @references = ref_map.freeze
  end
  @dc_to_cc_map.freeze
  init_annotatable(init_hash)
end

#_pcore_init_hash ⇒ Hash{String => Object}

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future.

Produce a hash suitable for the initializer

Returns:

  • (Hash{String => Object}) —

    the initialization hash



178
179
180
181
182
183
184
185
186
187
188
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 178

def _pcore_init_hash
  result = super()
  result[Pcore::KEY_PCORE_URI] = @pcore_uri unless @pcore_uri.nil?
  result[Pcore::KEY_PCORE_VERSION] = @pcore_version.to_s
  result[KEY_NAME_AUTHORITY] = @name_authority unless @name_authority.nil?
  result[KEY_NAME] = @name
  result[KEY_VERSION] = @version.to_s unless @version.nil?
  result[KEY_TYPES] = @types unless @types.empty?
  result[KEY_REFERENCES] = @references.transform_values(&:_pcore_init_hash) unless @references.empty?
  result
end

#accept(visitor, guard) ⇒ Object 



253
254
255
256
257
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 253

def accept(visitor, guard)
  super
  @types.each_value { |type| type.accept(visitor, guard) }
  @references.each_value { |ref| ref.accept(visitor, guard) }
end

#defines_type?(t) ⇒ Boolean

Returns:

  • (Boolean) 


229
230
231
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 229

def defines_type?(t)
  !@types.key(t).nil?
end

#eql?(o) ⇒ Boolean

Returns:

  • (Boolean) 


353
354
355
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 353

def eql?(o)
  self.class == o.class && @name_authority == o.name_authority && @name == o.name && @version == o.version
end

#hash ⇒ Object 



349
350
351
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 349

def hash
  @name_authority.hash ^ @name.hash ^ @version.hash
end

#instance?(o, guard = nil) ⇒ Boolean

Returns:

  • (Boolean) 


357
358
359
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 357

def instance?(o, guard = nil)
  o.is_a?(PTypeSetType)
end

#label ⇒ Object

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future. 



260
261
262
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 260

def label
  "TypeSet '#{@name}'"
end

#name_for(t, default_name) ⇒ String

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future.

Returns the name by which the given type is referenced from within this type set

Parameters:

Returns:

  • (String) —

    the name by which the type is referenced within this type set



238
239
240
241
242
243
244
245
246
247
248
249
250
251
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 238

def name_for(t, default_name)
  key = @types.key(t)
  if key.nil?
    unless @references.empty?
      @references.each_pair do |ref_key, ref|
        ref_name = ref.type_set.name_for(t, nil)
        return "#{ref_key}::#{ref_name}" unless ref_name.nil?
      end
    end
    default_name
  else
    key
  end
end

#resolve(loader) ⇒ Object

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future. 



265
266
267
268
269
270
271
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 265

def resolve(loader)
  super
  @references.each_value { |ref| ref.resolve(loader) }
  tsa_loader = TypeSetLoader.new(self, loader)
  @types.values.each { |type| type.resolve(tsa_loader) }
  self
end

#resolve_hash(loader, init_hash) ⇒ Object

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future. 



328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 328

def resolve_hash(loader, init_hash)
  result = init_hash.to_h do |key, value|
    key = resolve_type_refs(loader, key)
    value = resolve_type_refs(loader, value) unless key == KEY_TYPES && value.is_a?(Hash)
    [key, value]
  end
  name_auth = resolve_name_authority(result, loader)
  types = result[KEY_TYPES]
  if types.is_a?(Hash)
    types.each do |type_name, value|
      full_name = "#{@name}::#{type_name}"
      typed_name = Loader::TypedName.new(:type, full_name, name_auth)
      meta_name = value.is_a?(Hash) ? 'Object' : 'TypeAlias'
      type = Loader::TypeDefinitionInstantiator.create_named_type(full_name, meta_name, value, name_auth)
      loader.set_entry(typed_name, type)
      types[type_name] = type
    end
  end
  result
end

#resolve_literal_hash(loader, init_hash_expression) ⇒ Object

This method is part of a private API. You should avoid using this method if possible, as it may be removed or be changed in the future. 



274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
 
# File 'lib/puppet/pops/types/p_type_set_type.rb', line 274

def resolve_literal_hash(loader, init_hash_expression)
  result = {}
  type_parser = TypeParser.singleton
  init_hash_expression.entries.each do |entry|
    key = type_parser.interpret_any(entry.key, loader)
    if (key == KEY_TYPES || key == KEY_REFERENCES) && entry.value.is_a?(Model::LiteralHash)
      # Skip type parser interpretation and convert qualified references directly to String keys.
      hash = {}
      entry.value.entries.each do |he|
        kex = he.key
        name = kex.is_a?(Model::QualifiedReference) ? kex.cased_value : type_parser.interpret_any(kex, loader)
        hash[name] = key == KEY_TYPES ? he.value : type_parser.interpret_any(he.value, loader)
      end
      result[key] = hash
    else
      result[key] = type_parser.interpret_any(entry.value, loader)
    end
  end

  name_auth = resolve_name_authority(result, loader)

  types = result[KEY_TYPES]
  if types.is_a?(Hash)
    types.each do |type_name, value|
      full_name = "#{@name}::#{type_name}"
      typed_name = Loader::TypedName.new(:type, full_name, name_auth)
      if value.is_a?(Model::ResourceDefaultsExpression)
        # This is actually a <Parent> { <key-value entries> } notation. Convert to a literal hash that contains the parent
        n = value.type_ref
        name = n.cased_value
        entries = []
        unless name == 'Object' or name == 'TypeSet'
          if value.operations.any? { |op| op.attribute_name == KEY_PARENT }
            case Puppet[:strict]
            when :warning
              IssueReporter.warning(value, Issues::DUPLICATE_KEY, :key => KEY_PARENT)
            when :error
              IssueReporter.error(Puppet::ParseErrorWithIssue, value, Issues::DUPLICATE_KEY, :key => KEY_PARENT)
            end
          end
          entries << Model::KeyedEntry.new(n.locator, n.offset, n.length, KEY_PARENT, n)
        end
        value.operations.each { |op| entries << Model::KeyedEntry.new(op.locator, op.offset, op.length, op.attribute_name, op.value_expr) }
        value = Model::LiteralHash.new(value.locator, value.offset, value.length, entries)
      end
      type = Loader::TypeDefinitionInstantiator.create_type(full_name, value, name_auth)
      loader.set_entry(typed_name, type, value.locator.to_uri(value))
      types[type_name] = type
    end
  end
  result
end