datalackeytools 0.3.4

data/bin/files2object

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+# Copyright © 2019-2021 Ismo Kärkkäinen
+# Licensed under Universal Permissive License. See LICENSE.txt.
+
+require 'pathname'
+require_relative '../lib/common'
+
+
+def usage
+  aargh %q(Usage: files2object [--wait|-w] [key filename ...]
+  Prints out key: file contents pairs as a JSON object.
+  File contents are not checked to be valid JSON.
+  If filename starts with :, the rest of string is taken to be a JSON value.
+  --wait/-w option as first argument will wait for a line/EOF from stdin first.
+  (Intended for debugging the program that gets the output from this.)
+), 1
+end
+
+wait = (ARGV.first == '--wait' or ARGV.first == '-w')
+ARGV.shift if wait
+usage if !ARGV.empty? && ARGV.size.odd?
+
+ARGV.each_slice(2) do |pair|
+  next if pair.last.start_with? ':'
+  fp = Pathname.new pair.last
+  aargh "Not a file: #{pair.last}", 1 unless fp.file?
+end
+
+if wait
+  begin
+    $stdin.readline
+  rescue StandardError
+  end
+end
+
+separator = ''
+print '{'
+ARGV.each_slice(2) do |pair|
+  print %(#{separator}"#{pair.first}":)
+  if pair.last.start_with? ':'
+    print pair.last[1..pair.last.size]
+  else
+    fp = Pathname.new pair.last
+    offset = 0
+    while offset < fp.size
+      print fp.read(1048576, offset)
+      $stdout.flush
+      offset += 1048576
+    end
+  end
+  separator = ','
+end
+puts '}'
+$stdout.flush

data/bin/object2files

@@ -0,0 +1,44 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+# Copyright © 2019-2021 Ismo Kärkkäinen
+# Licensed under Universal Permissive License. See LICENSE.txt.
+
+require 'json'
+require 'pathname'
+require_relative '../lib/common'
+
+
+if !ARGV.empty? && ARGV.size.odd?
+  aargh %q(Usage: object2files [key filename ...]
+  Saves each key:value pair value in input JSON object to file.
+  File name is either taken from arguments, or key is used as is.
+  Directories are created if filename seems to contain them.
+  Unused key/filename argument pairs are ignored.), 1
+end
+
+map = ARGV.empty? ? {} : Hash[ARGV.each_slice(2).to_a]
+
+begin
+  obj = JSON.parse($stdin.read)
+rescue JSON::ParserError
+  aargh 'Error parsing input.', 2
+end
+
+obj.each_pair do |key, value|
+  file = map.fetch(key, key)
+  fp = Pathname.new file
+  dn = fp.dirname
+  begin
+    dn.mkpath
+  rescue Errno::EEXIST
+    aargh "Failed to create key #{key} path in #{file}", 3
+  end
+  begin
+    fp.open('w') do |f|
+      f.write value.to_json
+    end
+  rescue Errno::EACCES, Errno::ENOTDIR, Errno::ENOENT
+    aargh "Failed to write key #{key} to #{file}", 3
+  end
+end

data/lib/common.rb

@@ -0,0 +1,9 @@
+# frozen_string_literal: true
+
+# Copyright © 2019-2021 Ismo Kärkkäinen
+# Licensed under Universal Permissive License. See LICENSE.txt.
+
+def aargh(message, exit_code = nil)
+  $stderr.puts message
+  exit(exit_code) unless exit_code.nil?
+end