mollie 0.1.0

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Arie
+
+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/README.rdoc

@@ -0,0 +1,18 @@
+= mollie
+
+Description goes here.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but
+   bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2009 Arie. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,45 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "mollie"
+    gem.summary = "Interface to SMS gateway Mollie.nl"
+    gem.description = gem.summary
+    gem.email = "github@ariekanarie.nl"
+    gem.homepage = "http://github.com/arie/mollie"
+    gem.authors = ["Arie", "iain"]
+    gem.add_development_dependency "rspec", ">= 1.2.9"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+require 'spec/rake/spectask'
+Spec::Rake::SpecTask.new(:spec) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.spec_files = FileList['spec/**/*_spec.rb']
+end
+
+Spec::Rake::SpecTask.new(:rcov) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.pattern = 'spec/**/*_spec.rb'
+  spec.rcov = true
+end
+
+task :spec => :check_dependencies
+
+task :default => :spec
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "mollie #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.0

data/lib/mollie.rb

@@ -0,0 +1,147 @@
+require 'uri'
+require 'net/http'
+require 'nokogiri'
+
+module Mollie
+
+  module RequestOptions
+
+    DEFAULT_URI = "http://www.mollie.nl/xml/sms/"
+
+    def self.query_attributes
+      [:username, :password, :recipients, :originator, :gateway, :md5_password, :udh, :receipt, :deliverydate, :message, :message_type, :delivery_url]
+    end
+
+    def self.included(klass)
+      klass.__send__(:attr_accessor, *(query_attributes + [ :uri ]))
+    end
+
+    def uri
+      @uri || DEFAULT_URI
+    end
+
+  end
+
+  class SMS
+
+    include RequestOptions
+
+    attr_accessor :deliver_at, :message_type, :delivery_url
+
+    def initialize(options = {})
+      options.each_pair do |key,value| 
+        send("#{key}=", value)
+      end
+    end
+
+    def uri
+      @uri || RequestOptions::DEFAULT_URI
+    end
+
+    def recipient=(recipient)
+      self.recipients = [recipient]
+    end
+
+  end
+
+  class Send
+
+    attr_reader :query
+
+    def self.send(query)
+      new(query).send!
+    end
+
+    def initialize(query)
+      @query = query
+    end
+
+    def send!
+      raise MollieException.new(self) unless success?
+      self
+    end
+
+    def success?
+      resultcode == 10
+    end
+
+    def resultcode
+      $1.to_i if response.body =~ /<resultcode>(.*)<\/resultcode>/m
+    end
+
+    def response
+      @response ||= Net::HTTP.get_response(query.request_uri)
+    end
+
+  end
+
+  class Query
+
+    # Let's provide some friendly names instead of Mollie's weird short names
+    QUERY_ALIASES = { :message_type => :type, :delivery_url => :dlrurl, :receipt => :return }
+
+    attr_reader :sms
+
+    def initialize(sms)
+      @sms = sms
+    end
+
+    def deliverydate
+      DateTime.parse(value(:deliver_at)).strftime("%Y%m%d%H%M%S")
+    rescue TypeError
+      nil
+    end
+
+    def request_uri
+      request_uri = URI.parse(value(:uri))
+      request_uri.query = query
+      request_uri
+    end
+
+    def recipients
+      sms.recipients.join(',')
+    end
+
+    private
+
+    def attribute_name(attribute)
+      QUERY_ALIASES.has_key?(attribute) ? QUERY_ALIASES[attribute] : attribute
+    end
+
+    def value(attribute)
+      (respond_to?(attribute) ? self : sms).__send__(attribute)
+    end
+
+    def query_format
+      lambda { |attribute| "#{attribute_name(attribute)}=#{URI.encode(value(attribute))}" }
+    end
+
+    def empty_attribute?
+      lambda { |attribute| value(attribute).nil? }
+    end
+
+    def query
+      query_attributes.reject(&empty_attribute?).map(&query_format).join("&")
+    end
+
+    def query_attributes
+      RequestOptions.query_attributes
+    end
+
+  end
+
+  class MollieException < ::Exception
+
+    attr_reader :response
+
+    def initialize(response)
+      @response = response
+    end
+
+    def resultcode
+      response.resultcode
+    end
+
+  end
+
+end

data/spec/mollie_spec.rb

@@ -0,0 +1,107 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe Mollie do
+  
+  describe Mollie::SMS do
+
+    def accepts(attribute, checked_attribute = nil)
+      checked_attribute ||= attribute
+      subject = Mollie::SMS.new(attribute => 'xxx')
+      subject.__send__(checked_attribute).should == 'xxx'
+      subject.__send__("#{attribute}=", 'yyy')
+      subject.__send__(checked_attribute).should == 'yyy'
+    end
+
+    def self.should_accept(attribute, checked_attribute = nil)
+      it "should accept #{attribute} #{checked_attribute ? "and store it as #{checked_attribute}" : ""}" do
+        accepts(attribute, checked_attribute)
+      end
+    end
+
+    should_accept :username
+    should_accept :password
+    should_accept :message
+    should_accept :originator
+    should_accept :gateway
+    should_accept :md5_password
+    should_accept :delivery_url
+    should_accept :message_type
+    should_accept :udh
+    should_accept :receipt
+    should_accept :uri
+    should_accept :deliver_at
+
+    it "should know a default gateway" do
+      Mollie::SMS.new.uri.should == Mollie::RequestOptions::DEFAULT_URI
+    end
+
+    it "should accept a single recipient" do
+      subject = Mollie::SMS.new(:recipients => ['x', 'y'])
+      subject.recipient = 'z'
+      subject.recipients.should == ['z']
+    end
+
+  end
+
+  describe Mollie::Query do
+
+    it "should format deliverydate as yyyymmddhhmmss" do
+      date = DateTime.civil(2009, 3, 8, 1, 3, 4).to_s
+      Mollie::Query.new(Mollie::SMS.new(:deliver_at => date)).deliverydate.should == "20090308010304"
+    end
+
+    it "should get a comma seperated list of recipients" do
+      subject = Mollie::Query.new(Mollie::SMS.new(:recipients => [ "alice", "bob" ]))
+      subject.recipients.should == "alice,bob"
+    end
+
+    it "should return an uri to get" do
+      subject = Mollie::Query.new(Mollie::SMS.new(:username => 'un', :password => 'pw', :message => 'msg', :recipients => ['alice','charles'], :originator => 'bob', :uri => 'http://gateway', :gateway => "4", :udh => "bla", :receipt => "yesplease", :message_type => "123")).request_uri.to_s
+      subject.should =~ /\busername=un\b/
+      subject.should =~ /\Ahttp:\/\/gateway\?/
+      subject.should =~ /\bpassword=pw\b/
+      subject.should =~ /\bmessage=msg\b/
+      subject.should =~ /\brecipients=alice,charles\b/
+      subject.should =~ /\boriginator=bob\b/
+      subject.should =~ /\bgateway=4\b/
+      subject.should =~ /\breturn=yesplease\b/
+      subject.should =~ /\btype=123\b/
+      subject.should =~ /\budh=bla\b/
+    end
+
+  end
+
+  describe Mollie::Send do
+
+    it "should accept a result code 10 as success" do
+      query = mock("query")
+      query.stub!(:request_uri).and_return(URI.parse("http://blah"))
+      FakeWeb.register_uri(:get, /.*/, :body => xml_ellende(10))
+      Mollie::Send.send(query).should be_success
+    end
+
+
+    it "should raise an exception when resultcode is not 10" do
+      query = mock("query")
+      query.stub!(:request_uri).and_return(URI.parse("http://blash"))
+      FakeWeb.register_uri(:get, /.*/, :body => xml_ellende(20))
+      lambda { Mollie::Send.send(query) }.should raise_error(Mollie::MollieException)
+    end
+    
+  end
+
+def xml_ellende(resultcode=10)
+%Q|
+<?xml version="1.0" ?>
+<response>
+    <item type="sms">
+        <recipients>1</recipients>
+        <success>true</success>
+        <resultcode>#{resultcode}</resultcode>
+        <resultmessage>Message successfully sent.</resultmessage>
+    </item>
+</response> 
+|
+end
+
+end

data/spec/spec.opts

@@ -0,0 +1,4 @@
+--colour
+--format progress
+--loadby mtime
+--reverse

data/spec/spec_helper.rb

@@ -0,0 +1,11 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'rubygems'
+require 'mollie'
+require 'spec'
+require 'spec/autorun'
+require 'fakeweb'
+
+Spec::Runner.configure do |config|
+  
+end

metadata

@@ -0,0 +1,76 @@
+--- !ruby/object:Gem::Specification 
+name: mollie
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Arie
+- iain
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-09 00:00:00 +01:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.2.9
+    version: 
+description: Interface to SMS gateway Mollie.nl
+email: github@ariekanarie.nl
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- lib/mollie.rb
+- spec/mollie_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/arie/mollie
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Interface to SMS gateway Mollie.nl
+test_files: 
+- spec/mollie_spec.rb
+- spec/spec_helper.rb