edn-abnf-ec 0.1.8

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 7b8331d46fcc5488aa566d52bff36e7805ff2572124c5a968d64d6ec7f748f5c
+  data.tar.gz: d8e7bf78468578f924d877d1864b9648e873afadaad603152d081fd42a675451
+SHA512:
+  metadata.gz: f047258eb31ee14fad5ef55f4608ce77aabd0f718049b47ddc67225f1ab488b97e600e6dba3ceecba2a22a67e7c8fc1be0c4b831878b2ba85335a9103ee4b61a
+  data.tar.gz: c22826fe2b73b320a98e6ea0fec1d9afd7b0a031c465697d5f2af5f64dfda4a93bbcf3a5241f88c1ecc56c7042709c6032a915cd67af4250e9d5d05cd2499257

data/bin/edn-abnf-ec

@@ -0,0 +1,109 @@
+#!/usr/bin/env ruby
+# coding: utf-8-hfs
+require 'pp'
+require 'yaml'
+require 'treetop'
+require 'json'
+
+require_relative '../lib/edn-abnf.rb'
+
+def snaky(name)
+  name.gsub(/-/, "_")
+end
+ 
+Encoding.default_external = Encoding::UTF_8
+require 'optparse'
+require 'ostruct'
+
+$options = OpenStruct.new
+begin
+  op = OptionParser.new do |opts|
+    opts.banner = "Usage: edn-abnf.rb [options] [file.edn... | -]"
+
+    opts.on("-v", "--[no-]verbose", "Run verbosely") do |v|
+      $options.verbose = v
+    end
+    opts.on("-l", "--[no-]lines", "multi-line mode") do |v|
+      require 'csv'
+      $options.lines = v
+    end
+    opts.on("-eEDN", "--e=EDN", "supply EDN on command line") do |v|
+      $options.edn = v
+    end
+    opts.on("-tFMT", "--to=FMT", [:basic, :neat, :json, :yaml, :edn, :diag], "Target format") do |v|
+      $options.target = v
+    end
+  end
+  op.parse!
+rescue Exception => e
+  warn e
+  exit 1
+end
+
+
+if !$options.edn
+  if ARGV == []
+    puts op
+    exit 1
+  end
+  $options.edn = ARGF.read
+else
+  if ARGV != []
+    warn "*** file names #{ARGV.join(", ")} ignored due to -e given"
+  end
+end
+
+edn_file = $options.edn
+
+if $options.lines
+  CSV.parse(edn_file) do |ok, edn, out|
+    if ok[0] == "#"
+      puts "# #{ok}, #{edn.inspect}, #{out}" if $options.verbose
+      next
+    end
+    begin
+      ok = ok == "="
+      puts "➔ #{ok}, #{edn}, #{out}" if $options.verbose
+      edn = EDN.from_edn(edn)
+      result = edn.tree
+      diag = result.cbor_diagnostic
+      if out == diag && !ok
+          puts "** ≠ / #{diag.inspect} / #{out.inspect}"
+      end
+      if out != diag && ok
+          puts "** ≡ / #{diag.inspect} / #{out.inspect}"
+      end
+    rescue ArgumentError => e
+      if ok
+        puts "** #{e} / #{result.inspect} / #{out.inspect}"
+      else
+        if $options.verbose
+          puts "expected failure #{e}"
+        end
+      end
+    end
+  end
+  exit
+end
+
+begin
+  edn = EDN.from_edn(edn_file)
+  result = edn.tree               # XXX .tree?
+rescue ArgumentError => e
+  puts "** #{e}"
+  exit 1
+end
+
+case $options.target
+when :basic, nil
+  pp result
+when :neat, :json
+  require 'neatjson'
+  puts JSON.neat_generate(result, after_comma: 1, after_colon: 1)
+when :yaml
+  puts result.to_yaml
+when :edn, :diag
+  puts result.cbor_diagnostic
+else
+  warn ["Unknown target format: ", $options.target].inspect
+end

data/edn-abnf.gemspec

@@ -0,0 +1,21 @@
+Gem::Specification.new do |s|
+  s.name = "edn-abnf-ec"
+  s.version = "0.1.8"
+  s.summary = "CBOR Extended Diagnostic Notation (EDN) implemented in ABNF"
+  s.description = %q{edn-abnf implements converters and miscellaneous tools for CBOR EDN's ABNF}
+  s.author = "Carsten Bormann"
+  s.email = "cabo@tzi.org"
+  s.license = "MIT"
+  s.homepage = "http://github.com/cabo/edn-abnf"
+  s.files = Dir['lib/**/*.rb'] + %w(edn-abnf.gemspec) + Dir['bin/**/*.rb']
+  s.executables = Dir['bin/*'].map {|x| File.basename(x)}
+  s.required_ruby_version = '>= 1.9.2'
+
+  s.require_paths = ["lib"]
+
+  s.add_development_dependency 'bundler', '~>1'
+  s.add_development_dependency 'abnftt', '~>0.2'
+  s.add_dependency 'treetop', '~>1'
+  s.add_dependency 'json', '~>2'
+  s.add_dependency 'neatjson', '~>0.10'
+end

data/lib/cbor-diagnostic-app/b64.rb

@@ -0,0 +1,22 @@
+require_relative "b64grammar.rb"
+
+class CBOR_DIAG::App_b64
+  def self.decode(_, s)
+    parser = B64GRAMMARParser.new #  B? XXX
+    ast = parser.parse(s)
+    if !ast
+      raise ArgumentError, "cbor-diagnostic: Parse Error in b64'#{s}':\n" << EDN.reason(parser, s)
+    end
+    # lazy -- not using parse tree...:
+    t = s.gsub(/\s|#[^\n]*(?:\n|\z)/, '').chars.each_slice(4).map(&:join)
+    if last = t[-1]
+      last << "=" * (4 - last.size)
+    end
+    b = t.join.tr("-_", "+/")
+    begin
+      b.unpack("m0")[0]
+    rescue ArgumentError
+      raise ArgumentError, "cbor-diagnostic: invalid base64 #{b.inspect}", caller[1..-1]
+    end
+  end
+end