homebrew_automation 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 1681a8e776c3eddbccd8381b97ae24b7b2a65299
+  data.tar.gz: 20e552f26f2757c826977b460d4e85728dbefd90
+SHA512:
+  metadata.gz: ddb763670a14252198112f6704a8fee80a739e5bdb864ea8cd283ee32fdf71b8283d6b5ccc71a45e328d69a885a8c3006b9bc8e372ce9286844a36220c7e561e
+  data.tar.gz: ff6e96770ba8b20387260da4568df2a8ef94ed4c06c4e299f023b0fdd5c45ea0c9634bb8c4af2f6e395ca20558296a8df7d08ce73fcb46035ce53b563231c324

data/bin/homebrew_automation.rb

@@ -0,0 +1,33 @@
+#!/usr/bin/env ruby
+
+require 'thor'
+
+require 'homebrew_automation'
+
+class MyCliApp < Thor
+
+  desc 'put-sdist', 'update the URL and sha256 checksum of the source tarball'
+  option :url, :required => true
+  option :sha256, :required => true
+  def put_sdist
+    before = HomebrewAutomation::Formula.parse_string($stdin.read)
+    after = before.
+      update_field("url", options[:url]).
+      update_field("sha256", options[:sha256])
+    $stdout.write after
+  end
+
+  desc 'put-bottle', 'insert or update a bottle reference for a given OS'
+  option :os, :required => true
+  option :sha256, :required => true
+  def put_bottle
+    before = HomebrewAutomation::Formula.parse_string($stdin.read)
+    after = before.put_bottle(options[:os], options[:sha256])
+    $stdout.write after
+  end
+
+end
+
+MyCliApp.start(ARGV)
+
+

data/lib/homebrew_automation.rb

@@ -0,0 +1,172 @@
+
+require 'parser/current'
+require 'unparser'
+
+Parser::Builders::Default.emit_lambda = true
+Parser::Builders::Default.emit_procarg0 = true
+
+module HomebrewAutomation
+
+  class Formula
+
+    # Formula::parse_string :: String -> Formula
+    def self.parse_string s
+      Formula.new (Parser::CurrentRuby.parse s)
+    end
+
+    # Formula::new :: Parser::AST::Node -> Formula
+    def initialize ast
+      @ast = ast
+    end
+
+    def to_s
+      Unparser.unparse @ast
+    end
+
+    # update_field :: String -> String -> Formula
+    def update_field field, value
+      Formula.new update(
+        @ast,
+        [ by_type('begin'),
+          by_both(
+            by_type('send'),
+            by_msg(field)),
+          by_type('str')],
+        -> (n) { n.updated(nil, [value]) })
+    end
+
+    # Insert or replace the bottle for a given OS
+    # put_bottle :: String -> String -> Node -> Node
+    def put_bottle os, sha256
+      Formula.new update(
+        @ast,
+        bot_begin_path,
+        put_bottle_version(os, sha256))
+    end
+
+    private
+
+    # Path to the :begin node
+    # bot_begin_path :: [Choice]
+    # type Choice = Proc (Node -> Bool)
+    def bot_begin_path
+      [ by_type('begin'),
+        by_both(
+          by_type('block'),
+          by_child(
+            by_both(
+              by_type('send'),
+              by_msg('bottle')))),
+        by_type('begin')]
+    end
+
+    # Tricky: this is an insert-or-update
+    # put_bottle_version :: String -> String -> Proc (Node -> Node)
+    def put_bottle_version os, sha256
+      -> (bot_begin) {
+        bot_begin.updated(
+          nil,  # keep the node type the unchanged
+          bot_begin.children.reject(
+            # Get rid of any existing matching ones
+            &by_both(
+              by_msg('sha256'),
+              by_os(os))
+          # Then add the one we want
+          ).push(new_sha256(sha256, os)))
+      }
+    end
+
+    # Build a new AST Node
+    # String -> String -> Node
+    def new_sha256 sha256, os
+      # Unparser doesn't like Sexp, so let's bring
+      # own own bit of "source code" inline.
+      sha256_send = Parser::CurrentRuby.parse(
+        'sha256 "checksum-here" => :some_os')
+      with_sha256 = update(
+        sha256_send,
+        [ by_type('hash'),
+          by_type('pair'),
+          by_type('str') ],
+        -> (n) { n.updated(nil, [sha256]) })
+      with_sha256_and_os = update(
+        with_sha256,
+        [ by_type('hash'),
+          by_type('pair'),
+          by_type('sym') ],
+        -> (n) { n.updated(nil, [os.to_sym]) })
+      with_sha256_and_os
+    end
+
+    # update :: Node -> [Choice] -> Proc (Node -> Node) -> Node
+    def update node, path, fn
+      if path.length == 0 then
+        fn.(node)
+      else
+        choose, *rest = path
+        node.updated(
+          nil,    # Don't change node type
+          node.children.map do |c|
+            choose.(c) ? update(c, rest, fn) : c
+          end)
+      end
+    end
+
+    # zoom_in :: Node -> [Choice] -> Node
+    def zoom_in node, path
+      if path.length == 0 then
+        node
+      else
+        choose, *rest = path
+        chosen = node.children.select(&choose).first
+        zoom_in chosen, rest
+      end
+    end
+
+    # by_both
+    #   :: Proc (Node -> Bool)
+    #   -> Proc (Node -> Bool)
+    #   -> Proc (Node -> Bool)
+    def by_both p, q
+      -> (n) { p.(n) && q.(n) }
+    end
+
+    # by_msg :: String -> Proc (Node -> Bool)
+    def by_msg msg
+      -> (n) { n.children[1] == msg.to_sym }
+    end
+
+    # by_type :: String -> Proc (Node -> Bool)
+    def by_type type
+      -> (n) {
+        n &&
+        n.is_a?(AST::Node) &&
+        n.type == type.to_sym
+      }
+    end
+
+    # Matches if one of the node's children matches the given p
+    # by_child :: Proc (Node -> Bool) -> Proc (Node -> Bool)
+    def by_child p
+      -> (n) {
+        n &&
+        n.is_a?(AST::Node) &&
+        n.children.select(&p).size > 0
+      }
+    end
+
+    # Matches if this :send node expresses the give sha256 sum
+    # by_os :: String -> Proc (Node -> Bool)
+    def by_os os
+      -> (n) {
+        zoom_in(n, [
+          by_type('hash'),
+          by_type('pair'),
+          by_type('sym')])
+        .children[0] == os.to_sym
+      }
+    end
+
+  end
+
+end

data/lib/homebrew_automation/version.rb

@@ -0,0 +1,4 @@
+
+module HomebrewAutomation
+  VERSION = '0.0.1'
+end

metadata

@@ -0,0 +1,90 @@
+--- !ruby/object:Gem::Specification
+name: homebrew_automation
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- easoncxz
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2017-12-30 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: thor
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.20'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.20'
+- !ruby/object:Gem::Dependency
+  name: parser
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '2.4'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '2.4'
+- !ruby/object:Gem::Dependency
+  name: unparser
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.2'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.2'
+description: '["If", "you''re", "thinking", "of", "manipulating", "Homebrew", "Formula",
+  "files", "during", "e.g.", "continuous", "integration,", "this", "is", "for", "you"]'
+email: me@easoncxz.com
+executables:
+- homebrew_automation.rb
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/homebrew_automation.rb
+- lib/homebrew_automation.rb
+- lib/homebrew_automation/version.rb
+homepage: https://github.com/easoncxz/homebrew-automation
+licenses:
+- GPL-3.0
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.5
+signing_key: 
+specification_version: 4
+summary: Automate editing of Homebrew Formula files
+test_files: []