http_fn 0.1.0 → 0.1.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 5f163f75584cb8c3efd97c4086a5c6def7b7455ddd3a51325e4b205eff1c7932
-  data.tar.gz: 0d8c44e768a2cba2234c23294d1ac4bec17f78d3b792799387967438cd70e8a4
+  metadata.gz: 194bd7ff500a4dfbe818e70197ab5db7728ff7c243a31d92392c7912d10371eb
+  data.tar.gz: 844b65792a38d7c008a6a81462e92f580b6daa60a0e446dd011088b7e1afff4e
 SHA512:
-  metadata.gz: 2d9f0607650dea8a96dd44491e4de2a91b7a87e947a30fdfde6c039002690e693ad0aed4695bb6ec734a9baf6c41247a005515370cda8623170a5c94f97e0cd6
-  data.tar.gz: 794d6bf88255e7329e62a2b817f98c7c85b694aca48ccc884b89bc253bd00888267de1d5b9ed86414a8ee2059387aad4563d8574b23df4f225f2db54e6bd24f6
+  metadata.gz: ac8ff07d43e82facf96ea66ca8fb3534fdbe5fef4d15a8abd6eb0ca13d40ebfa848ef0e91398d1de0ec621d5c9bee982b5a7c16e16ddadba1de80756714ed174
+  data.tar.gz: dfc8bc0157f372b1339b27315924e49e4f929dd2dc19fb6274be3475e40e14c47e31cfde8f9118a949355c436a4dccca0add6e4627d4fce41b7e87307385681f

data/lib/http_fn/curl.rb

@@ -6,7 +6,7 @@ module HttpFn::Curl
 
   fn_reader :print_curl, :req
 
-  @@req = -> req {
+  @@req = ->req {
     first_part = %{curl -X '#{req[:method]}' '#{HttpFn::to_uri.(req).to_s}' #{req[:header].map(&@@header_to_curl).join(" ")}}
     if req[:body] && !req[:body].empty?
       first_part + %{\n\    -d $'#{req[:body].gsub("'", "\'")}'}
@@ -14,9 +14,9 @@ module HttpFn::Curl
       first_part
     end
   }
-  @@header_to_curl = -> a {
+  @@header_to_curl = ->a {
     "\\\n    -H '#{a[0]}: #{a[1]}'"
   }
 
-  @@print_curl = -> req { $stdout.puts(to_curl.(req)); req }.curry
+  @@print_curl = ->req { $stdout.puts(to_curl.(req)); req }.curry
 end

data/lib/http_fn/http_fn.rb

@@ -0,0 +1 @@
+

data/lib/http_fn/httpie.rb

@@ -6,7 +6,7 @@ module HttpFn::Httpie
 
   fn_reader :print_curl, :req
 
-  @@req = -> req {
+  @@req = ->req {
     first_part = %{http #{req[:method]} '#{HttpFn::to_uri.(req).to_s}' #{req[:header].map(&@@header_to_httpie).join(" ")}}
     if req[:body] && !req[:body].empty?
       %{echo $'#{req[:body].gsub("'", "\'")}' |\\\n#{first_part}}
@@ -14,7 +14,7 @@ module HttpFn::Httpie
       first_part
     end
   }
-  @@header_to_httpie = -> a {
+  @@header_to_httpie = ->a {
     "\\\n    '#{a[0]}: #{a[1]}'"
   }
 end

data/lib/http_fn/net_http.rb

@@ -1,23 +1,24 @@
-require 'net/http'
-require 'http_fn'
+require "net/http"
+require "http_fn"
+require "fn_reader"
 
 module HttpFn::NetHttp
   include HttpFn
-  mattr_reader :method_str_to_req, :server, :net_resp
+  fn_reader :method_str_to_req, :server, :net_resp
 
-  @@method_str_to_req = {"GET" => Net::HTTP::Get, "POST" => Net::HTTP::Post, "DELETE" => Net::HTTP::Delete, "PUT" => Net::HTTP::Put, "PATCH" => Net::HTTP::Patch}
+  @@method_str_to_req = { "GET" => Net::HTTP::Get, "POST" => Net::HTTP::Post, "DELETE" => Net::HTTP::Delete, "PUT" => Net::HTTP::Put, "PATCH" => Net::HTTP::Patch }
 
-  @@server = -> req { 
-    uri = to_uri.(req) 
+  @@server = ->req {
+    uri = to_uri.(req)
     req_ = method_str_to_req.fetch(req.fetch(:method)).new(uri)
     req_.set_body_internal(req[:body]) if req[:body]
     header = req.fetch(:header)
     header.each { |key, val| req_[key] = val }
     http = Net::HTTP.new(uri.host, uri.port)
-    http.use_ssl = uri.scheme == 'https'
+    http.use_ssl = uri.scheme == "https"
     # http.set_debug_output($stdout)
     @@net_resp.(http.request(req_))
-  } 
+  }
 
-  @@net_resp = -> resp { {status: resp.code, header: resp.to_hash, body: resp.body} }
+  @@net_resp = ->resp { { status: resp.code, header: resp.to_hash, body: resp.body } }
 end

data/lib/http_fn/operators.rb

@@ -2,7 +2,7 @@ require "superators19"
 
 class Proc
   superator ">>~" do |fn|
-    -> a { fn.(self.(a)) }
+    ->a { fn.(self.(a)) }
   end
 end
 

data/lib/http_fn/rack.rb

@@ -6,8 +6,8 @@ require "pp"
 module HttpFn::Rack
   fn_reader :to_env, :server, :rack_resp_to_resp
 
-  @@server = -> rack { to_env >> rack.method(:call) >> rack_resp_to_resp }
-  @@to_env = -> request {
+  @@server = ->rack { to_env >> rack.method(:call) >> rack_resp_to_resp }
+  @@to_env = ->request {
     session ||= {}
     session_options ||= {}
 
@@ -43,13 +43,13 @@ module HttpFn::Rack
     env
   }
 
-  @@rack_resp_to_resp = -> resp {
+  @@rack_resp_to_resp = ->resp {
     { status: resp[0],
-     header: resp[1],
-     body: @@body_from_rack_response.(resp[2]) }
+      header: resp[1],
+      body: @@body_from_rack_response.(resp[2]) }
   }
 
-  @@body_from_rack_response = -> response {
+  @@body_from_rack_response = ->response {
     body = ""
     response.each { |line| body << line }
     response.close if response.respond_to?(:close)

data/lib/http_fn/utils.rb

@@ -8,12 +8,12 @@ module Utils
     :expired, :apply, :and_then, :default, :map, :get, :try
 
   @@parse_json = JSON.method(:parse)
-  @@debug = -> print, a, b { print.(a); print.(b.to_s); b }.curry
-  @@at = -> key, hash { hash[key] }.curry
-  @@red = -> a { "\033[31m#{a}\033[0m" }
+  @@debug = ->print, a, b { print.(a); print.(b.to_s); b }.curry
+  @@at = ->key, hash { hash[key] }.curry
+  @@red = ->a { "\033[31m#{a}\033[0m" }
   # ( a -> b ) -> a -> b
-  @@try = -> f, a { a.nil? ? nil : f.(a) }.curry
-  @@retry_fn = -> fn, a {
+  @@try = ->f, a { a.nil? ? nil : f.(a) }.curry
+  @@retry_fn = ->fn, a {
     begin
       fn.(a)
     rescue
@@ -22,13 +22,13 @@ module Utils
       @@retry_fn.(fn).(a)
     end
   }.curry
-  @@record = -> filename, to_save {
+  @@record = ->filename, to_save {
     File.open(filename, "w+") { |a| a << to_save.to_yaml }
     to_save
   }.curry
-  @@play = -> filename, _params { YAML.load(File.read(filename)) }.curry
+  @@play = ->filename, _params { YAML.load(File.read(filename)) }.curry
   # (Float -> String -> Bool) -> String -> (a -> b) -> b
-  @@cache = -> expired, filename, fn, param {
+  @@cache = ->expired, filename, fn, param {
     if expired.(filename)
       @@record.(filename).(fn.(param))
     else
@@ -36,8 +36,8 @@ module Utils
       @@play.(filename).(nil)
     end
   }.curry
-  @@expired = -> sec, a { !File.exist?(a) || (Time.now - File.mtime(a)) > sec }.curry
-  @@count_by = -> fn, a {
+  @@expired = ->sec, a { !File.exist?(a) || (Time.now - File.mtime(a)) > sec }.curry
+  @@count_by = ->fn, a {
     a.inject({}) do |res, a|
       by = fn.(a)
       res[by] ||= 0
@@ -47,16 +47,16 @@ module Utils
   }.curry
 
   # (String -> String) -> String -> ( a -> b ) -> a -> b
-  @@time = -> print, msg, fn, a {
+  @@time = ->print, msg, fn, a {
     start_time = Time.now
     res = fn.(a)
     print.("Time duration for #{msg} =  #{Time.now - start_time}")
     res
   }.curry
-  @@apply = -> method, a { a.send(method) }.curry
-  @@default = -> default, a { a.nil? ? default : a }.curry
-  @@and_then = -> f, a { a.nil? ? nil : f.(a) }.curry
-  @@map = -> f, enum { enum.map(&f) }.curry
-  @@at = -> key, hash { hash; hash[key] }.curry
-  @@get = -> method, obj { obj.send(method) }.curry
+  @@apply = ->method, a { a.send(method) }.curry
+  @@default = ->default, a { a.nil? ? default : a }.curry
+  @@and_then = ->f, a { a.nil? ? nil : f.(a) }.curry
+  @@map = ->f, enum { enum.map(&f) }.curry
+  @@at = ->key, hash { hash; hash[key] }.curry
+  @@get = ->method, obj { obj.send(method) }.curry
 end

data/lib/http_fn/version.rb

@@ -1,3 +1,3 @@
 module HttpFn
-  VERSION = "0.1.0"
+  VERSION = "0.1.1"
 end

data/lib/http_fn.rb

@@ -15,22 +15,22 @@ module HttpFn
   @@empty_req = { proto: "HTTP/1.1", host: "http://example.com", path: "/", query: {}, header: {}, method: "GET", body: "" }
   @@empty_resp = { status: nil, header: {}, body: {} }
 
-  @@run_ = -> fn { fn.(@@empty_req) } # underscore because run conflicts with run fn in minitest
-  @@verb = -> verb, req { req.merge({ method: verb.to_s.upcase }) }.curry
-  @@with_host = -> host, req { req[:host] = host; req }.curry
-  @@with_path = -> path, req { req[:path] = path; req }.curry
-  @@with_query = -> params, req { req[:query] = params; req }.curry
-  @@with_json = -> hash, req { req[:body] = hash.to_json; req }.curry
-  @@with_headers = -> header, req { req[:header] = header; req }.curry
-  @@add_headers = -> header, req { req[:header].merge!(header); req }.curry
-  @@with_basic_auth = -> user_name, pwd, req do
+  @@run_ = ->fn { fn.(@@empty_req) } # underscore because run conflicts with run fn in minitest
+  @@verb = ->verb, req { req.merge({ method: verb.to_s.upcase }) }.curry
+  @@with_host = ->host, req { req[:host] = host; req }.curry
+  @@with_path = ->path, req { req[:path] = path; req }.curry
+  @@with_query = ->params, req { req[:query] = params; req }.curry
+  @@with_json = ->hash, req { req[:body] = hash.to_json; req }.curry
+  @@with_headers = ->header, req { req[:header] = header; req }.curry
+  @@add_headers = ->header, req { req[:header].merge!(header); req }.curry
+  @@with_basic_auth = ->user_name, pwd, req do
     encoded = Base64.strict_encode64("#{user_name}:#{pwd}")
     req.then(&add_headers.({ "Authorization" => "Basic #{encoded}" }))
   end.curry
 
   @@json_resp = Utils.at.(:body) >> Utils.parse_json
-  @@print = -> a { $stdout.puts a.pretty_inspect; a }
-  @@to_uri = -> req {
+  @@print = ->a { $stdout.puts a.pretty_inspect; a }
+  @@to_uri = ->req {
     uri = URI(req.fetch(:host))
     req[:query] && uri.query = URI.encode_www_form(req[:query])
     uri.path = req[:path]

data/test/http_fn/curl_test.rb

@@ -1,18 +1,13 @@
-require 'minitest_helper'
-require 'http_fn'
-require 'http_fn/rack'
-require 'http_fn/curl'
+require "minitest_helper"
+require "http_fn"
+require "http_fn/rack"
+require "http_fn/curl"
 
 class HttpFn::CurlTest < Minitest::Test
   include HttpFn
 
-  def setup 
-    @curl = verb.("GET") >>~ 
-      with_path.("/coucou") >>~ 
-      with_headers.(json_headers) >>~ 
-      with_host.("https://api.github.com") >>~ 
-      with_json.({user: "martin"}) >>~
-      HttpFn::Curl.req >>+ run_
+  def setup
+    @curl = verb.("GET") >> ~with_path.("/coucou") >> ~with_headers.(json_headers) >> ~with_host.("https://api.github.com") >> ~with_json.({ user: "martin" }) >> ~HttpFn::Curl.req >> +run_
   end
 
   def test_should_return_a_curl_command

data/test/minitest_helper.rb

@@ -1,4 +1,4 @@
-$LOAD_PATH.unshift File.expand_path('../../lib', __FILE__)
-require 'http_fn'
+$LOAD_PATH.unshift File.expand_path("../../lib", __FILE__)
+require "http_fn"
 
-require 'minitest/autorun'
+require "minitest/autorun"

data/test/test_http_fn.rb

@@ -1,4 +1,4 @@
-require 'minitest_helper'
+require "minitest_helper"
 
 class TestHttpFn < MiniTest::Unit::TestCase
   def test_that_it_has_a_version_number

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: http_fn
 version: !ruby/object:Gem::Version
-  version: 0.1.0
+  version: 0.1.1
 platform: ruby
 authors:
 - Martin Chabot
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2020-12-26 00:00:00.000000000 Z
+date: 2022-01-05 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler