iana-registry 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 0f0b36b671dfa652651a43af26dd9d0c9e1562e60b27ef2300a55171e2453d5d
+  data.tar.gz: c671a984f4c9f6ff59957c80450c767388f1c345bf0b1b9cc4b515eebaadf707
+SHA512:
+  metadata.gz: fac6cbe9adae43dcf2eb1f004fd80501aff8d6e337b63db9ac50259bd770ab571a86073572aced4f70f390ad2f3087f4d78e8dd105c1e7f5da5611128e790333
+  data.tar.gz: e539b339266327806eddf0eeed36b8082c617f88a3c2b3b9a948268470d47bfb46e0db26b9852d70733a12f3dc2952d66a8333402f7e9226644a85a7b0b50405

data/bin/cbor-tag-report.rb

@@ -0,0 +1,60 @@
+#!/usr/bin/env ruby -Ku
+# coding: utf-8
+require 'iana-registry.rb'
+require 'optparse'
+require 'ostruct'
+
+$options = OpenStruct.new
+$options.squash_spans = ENV["TAG_REPORT_SQUASH_RANGES"] # backwards compat
+
+begin
+  op = OptionParser.new do |opts|
+    opts.banner = "Usage: $0 [options]"
+    opts.version = Gem.loaded_specs["iana-registry"].version
+
+
+    opts.on("-s", "--[no-]squash-spans", "Show number of spans, not of individual values") do |v|
+      $options.squash_spans = v
+    end
+  end
+  op.parse!
+rescue Exception => e
+  warn e
+  warn op
+  exit 1
+end
+
+RANGES = [24, 0x100, 0x10000, 0x100000000, 0x10000000000000000]
+RANGE_COUNTS = [0] * 5
+RANGE_UNASSIGNEDS = [0] * 5
+RANGE_LABELS = [0, 1, 2, 4, 8].map {"1+#{_1}"}
+
+reg = IANA::Registry::CBOR_TAGS.new
+
+[[reg.assigneds, RANGE_COUNTS],
+ [reg.unassigneds, RANGE_UNASSIGNEDS]].each do |l, t|
+  l.each do |s, e|
+    r = RANGES.find_index { _1 > s }
+    t[r] += $options.squash_spans ? 1 : e - s + 1
+  end
+end
+
+ranges_count = 0
+
+puts "range  used     %                 free                total"
+(0...5).each do |i|
+  total = RANGES[i] - (i == 0 ? 0 : RANGES[i-1])
+  ct = RANGE_COUNTS[i]
+  ranges_count += ct
+  ua = RANGE_UNASSIGNEDS[i]
+  if total != ct + ua && !$options.squash_spans
+    warn "** internal/IANA data error: total != ct + ua"
+  end
+  s = "%0#4.2f" % (ct*100.0/total)
+  puts "%d %s %5d %05s %20d %20d" % [i, RANGE_LABELS[i], ct, s, ua, total]
+end
+
+if $options.squash_spans
+  puts "        ---"
+  puts "total:  #{ranges_count} spans assigned"
+end

data/bin/dns-parameters.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby -Ku
+# coding: utf-8
+require 'iana-registry.rb'
+
+doc = IANA::Registry.load("dns-parameters")
+
+DNS_RR = {}
+
+REXML::XPath.each(doc.root,
+                  "//xmlns:registry[@id='dns-parameters-4']/xmlns:record",
+                  IANA::Registry::NS) do |x|
+  typ = x.elements['type'].text
+  value = x.elements['value'].text.to_i
+  semantics = x.elements['description'].text
+  if semantics && typ =~ /\A[-_A-Z0-9]+\z/
+    DNS_RR[typ.gsub("-", "_")] = value
+  end
+end
+
+puts DNS_RR.map { |t, v|
+  "RR_#{t} = #{v}\n" }

data/iana-registry.gemspec

@@ -0,0 +1,15 @@
+Gem::Specification.new do |s|
+  s.name = "iana-registry"
+  s.version = "0.0.1"
+  s.summary = "provides generalized access to IANA registries."
+  s.description = %q{This gem provides generalized access to XML-based IANA registries.}
+  s.author = "Carsten Bormann"
+  s.email = "cabo@tzi.org"
+  s.license = "MIT"
+  s.test_files = Dir['test/**/*.rb']
+  s.files = Dir['lib/**/*.rb'] + %w(iana-registry.gemspec) + Dir['bin/**/*.rb']
+  s.executables = Dir['bin/**/*.rb'].map {|x| File.basename(x)}
+  s.required_ruby_version = '>= 2.7'
+
+  s.require_paths = ["lib"]
+end

data/lib/iana-registry.rb

@@ -0,0 +1,56 @@
+require 'open-uri'
+begin
+  require 'open-uri/cached'
+rescue ScriptError => e
+  $iana_no_caching = e
+end
+require 'rexml/document'
+
+module IANA
+  module Registry
+    REG_URI_FORM = "https://www.iana.org/assignments/%s/%s.xml"
+    ACCEPT_XML = {"Accept" => "application/xml"}
+    NS = {"xmlns" => "http://www.iana.org/assignments"}
+
+    def self.load(name)
+      uri = REG_URI_FORM % [name, name]
+      xml_src = URI(uri).open(ACCEPT_XML).read
+      REXML::Document.new(xml_src)
+    end
+
+    def self.warn_if_no_caching
+      warn "** URI caching not installed: #$iana_no_caching" if $iana_no_caching
+    end
+
+
+    class CBOR_TAGS
+      attr_reader :doc, :assigneds, :unassigneds
+
+      def initialize
+        @doc = IANA::Registry.load("cbor-tags")
+        @assigneds = []
+        @unassigneds = []
+        REXML::XPath.each(doc.root,
+                          "//xmlns:registry[@id='tags']/xmlns:record",
+                          IANA::Registry::NS) do |x|
+          value = x.elements['value']
+          s, e = value.text.split("-").map {Integer(_1)}
+          semantics = x.elements['semantics']
+          if semantics.text
+            @assigneds << [s, e || s, semantics.text]
+          else
+            @unassigneds << [s, e || s]
+          end
+        end.compact
+        warn "** IANA cbor-tags inconstency" if @assigneds.sort != @assigneds
+      end
+
+      def find(n, intv = assigneds)
+        idx = intv.bsearch_index { |s, e| e >= n }
+        if idx && intv[idx][0] <= n
+          [n, intv[idx]]
+        end
+      end
+    end
+  end
+end

data/test/test-iana-registry.rb

@@ -0,0 +1,22 @@
+require 'iana-registry'
+
+
+#if ENV["TAG_REPORT_TEST"]
+
+require_relative "../bin/cbor-tag-report.rb"
+
+reg = IANA::Registry::CBOR_TAGS.new
+
+testcases = 20.times.map do
+  (2 ** (Random.rand(Float(4)))**3).floor - 1
+end + [0, 2, 109, 120, 121, 125, 127, 128,
+       18299, 18300, 18555, 18556, 18557, 18810, 18811, 18812]
+
+o = testcases.sort.uniq.map do |n|
+  [reg.find(n), reg.find(n, reg.unassigneds)]
+end
+
+require 'pp'
+pp o
+#end
+

metadata

@@ -0,0 +1,46 @@
+--- !ruby/object:Gem::Specification
+name: iana-registry
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Carsten Bormann
+bindir: bin
+cert_chain: []
+date: 1980-01-02 00:00:00.000000000 Z
+dependencies: []
+description: This gem provides generalized access to XML-based IANA registries.
+email: cabo@tzi.org
+executables:
+- cbor-tag-report.rb
+- dns-parameters.rb
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/cbor-tag-report.rb
+- bin/dns-parameters.rb
+- iana-registry.gemspec
+- lib/iana-registry.rb
+- test/test-iana-registry.rb
+licenses:
+- MIT
+metadata: {}
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '2.7'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 4.0.2
+specification_version: 4
+summary: provides generalized access to IANA registries.
+test_files:
+- test/test-iana-registry.rb