diplo 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 858413b493705cbe6e1d61d91eaad60a9ae63727
+  data.tar.gz: 6dc3dc4b2d3729429c2697c0d0907d016169bd96
+SHA512:
+  metadata.gz: 50faa28edbdd5314bad19dc45ba730151f1ae71cdea9147779aa2c695217bf4fc91358b8971ac787ebdec6fd86522870523926dc374fe99f80cfb7d97980067c
+  data.tar.gz: 9a7d4b4252eb7e4c408065018ec2f566379a2d20a6851f800a9d2433286da536f31f378e7139f83a31248b1bc89e1da9bcf7bcc2eacee1e81ca1c7eafa23c4b2

data/.env

@@ -0,0 +1,8 @@
+export DIPLO_LOCK_DRIFT_FACTOR=0.01
+export DIPLO_LOCK_RETRY_COUNT=3
+export DIPLO_LOCK_RETRY_DELAY=200
+export DIPLO_LOCK_TOKEN_BYTES=20
+export DIPLO_LOCK_TTL=200
+export DIPLO_LOCK_QUORUM=1
+
+export DIPLO_REDIS=redis://127.0.0.1:6379

data/.gitignore

@@ -0,0 +1,22 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp
+*.bundle
+*.so
+*.o
+*.a
+mkmf.log

data/Gemfile

@@ -0,0 +1,3 @@
+source 'https://rubygems.org'
+
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2014 Victor Rodrigues
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,2 @@
+require "bundler/gem_tasks"
+

data/diplo.gemspec

@@ -0,0 +1,28 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'diplo/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'diplo'
+  spec.version       = Diplo::VERSION
+  spec.authors       = ['Victor Rodrigues']
+  spec.email         = ['victorc.rodrigues@gmail.com']
+  spec.summary       = 'Make distributed Ruby applications'
+  spec.homepage      = 'https://github.com/rodrigues/diplo'
+  spec.license       = 'MIT'
+
+  spec.files         = `git ls-files -z`.split("\x0")
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ['lib']
+
+  spec.add_development_dependency 'bundler', '~> 1.6'
+  spec.add_development_dependency 'rake'
+  spec.add_development_dependency 'rspec'
+  spec.add_development_dependency 'pry'
+
+  spec.add_dependency 'redis'
+  spec.add_dependency 'hiredis'
+  spec.add_dependency 'dotenv'
+end

data/lib/diplo.rb

@@ -0,0 +1,9 @@
+require 'redis'
+require 'hiredis'
+require 'dotenv'
+DotEnv.load
+
+require 'diplo/version'
+
+module Diplo
+end

data/lib/diplo/env.rb

@@ -0,0 +1,33 @@
+require 'dotenv'
+
+Dotenv.load
+
+module Diplo
+  module Env
+    module_function
+
+    def fetch(variable)
+      ENV["DIPLO_#{variable.to_s.upcase}"] || begin
+        yield if block_given?
+      end
+    end
+
+    def fetch_int(variable, error = nil, &block)
+      fetch_converted variable, :Integer, error, &block
+    end
+
+    def fetch_float(variable, error = nil, &block)
+      fetch_converted variable, :Float, error, &block
+    end
+
+    def fetch_converted(variable, conversion, error = nil)
+      value = fetch(variable)
+      return yield if value.nil? && block_given?
+
+      send conversion, value
+    rescue
+      error ? raise(error) : raise
+    end
+
+  end
+end

data/lib/diplo/lock.rb

@@ -0,0 +1,125 @@
+require 'redis'
+
+require 'diplo/env'
+
+module Diplo
+  module Lock
+    module_function
+
+    def create(resource, ttl = nil)
+      ttl ||= Env.fetch_int(:lock_ttl)
+      token = create_lock_token
+      lock = OpenStruct.new(resource: resource, token: token)
+
+      retry_count.times do
+        locked_nodes, start_time = 0, Time.now
+
+        servers.each do |server|
+          locked_nodes += 1 if lock_server(server, resource, token, ttl)
+        end
+
+        validity = validity_time(start_time, ttl)
+
+        if locked_nodes >= quorum && validity > 0
+          lock.validity = validity
+          return lock
+        else
+          remove lock
+        end
+
+        delay
+      end
+
+      false
+    end
+
+    def remove(lock)
+      servers.each do |server|
+        unlock_server server, lock.resource, lock.token
+      end
+    end
+
+    def servers
+      @servers || begin
+        config = Env.fetch(:redis)
+        uris = config.gsub(' ', '').split(',')
+        uris.map { |u| ::Redis.new url: u }
+      end
+    end
+
+    def lock_server(redis, resource, token, ttl)
+      redis.client.call [:set, resource, token, :nx, :px, ttl]
+    rescue
+      false
+    end
+
+    def unlock_server(redis, resource, token)
+      @unlock_script ||= <<-LUA
+        if redis.call("get", KEYS[1]) == ARGV[1] then
+          return redis.call("del", KEYS[1])
+        else
+          return 0
+        end
+      LUA
+
+      redis.client.call [:eval, @unlock_script, 1, resource, token]
+    rescue
+      # Nothing to do, unlocking is just a best-effort attempt.
+    end
+
+    def retry_count
+      @retry_count || Env.fetch_int(:lock_retry_count)
+    end
+
+    def retry_count=(count)
+      @retry_count = Integer(count)
+    end
+
+    def retry_delay
+      @retry_delay || Env.fetch_int(:lock_retry_delay)
+    end
+
+    def retry_delay=(miliseconds)
+      @retry_delay = Integer(miliseconds)
+    end
+
+    def drift_factor
+      @drift_factor || Env.fetch_float(:lock_drift_factor)
+    end
+
+    def drift_factor=(factor)
+      @drift_factor = Float(factor)
+    end
+
+    def lock_token_bytes
+      @lock_token_bytes || Env.fetch_int(:lock_token_bytes)
+    end
+
+    def lock_token_bytes=(count)
+      @lock_token_bytes = Integer(count)
+    end
+
+    def quorum
+      @quorum || Env.fetch_int(:lock_quorum)
+    end
+
+    def quorum=(nodes)
+      @quorum = Integer(nodes)
+    end
+
+    def create_lock_token
+      SecureRandom.hex lock_token_bytes
+    end
+
+    def delay
+      sleep rand(retry_delay).to_f / 1000
+    end
+
+    def validity_time(start_time, ttl)
+      diff_time = Time.now - start_time
+      drift = (ttl* drift_factor).to_i + 2
+      ttl - (diff_time * 1000).to_i - drift
+    end
+
+  end
+end

data/lib/diplo/version.rb

@@ -0,0 +1,3 @@
+module Diplo
+  VERSION = '0.0.1'
+end

metadata

@@ -0,0 +1,153 @@
+--- !ruby/object:Gem::Specification
+name: diplo
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Victor Rodrigues
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-07-14 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.6'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.6'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: pry
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: redis
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: hiredis
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: dotenv
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: 
+email:
+- victorc.rodrigues@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".env"
+- ".gitignore"
+- Gemfile
+- LICENSE.txt
+- Rakefile
+- diplo.gemspec
+- lib/diplo.rb
+- lib/diplo/env.rb
+- lib/diplo/lock.rb
+- lib/diplo/version.rb
+homepage: https://github.com/rodrigues/diplo
+licenses:
+- MIT
+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.2
+signing_key: 
+specification_version: 4
+summary: Make distributed Ruby applications
+test_files: []
+has_rdoc: