lleidasms 1.0.0

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright 2012 YOURNAME
+
+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,63 @@
+= Lleidasms
+
+This project rocks and uses MIT-LICENSE.
+
+`Lleida.net` SMS gateway for Ruby
+
+Features
+--------
+
+Enhancements
+  - client class
+  - gateway superclass for new client implementations
+
+Examples
+--------
+
+  sms = Lleidasms::Client.new
+  sms.connect(<YOUR USER>, <YOUR PASSWORD>)
+  puts sms.saldo
+  sms.close
+
+
+Requirements
+------------
+
+none
+
+Install
+-------
+
+gem install lleidasms
+
+Author
+------
+
+Original author: Miguel Adolfo Barroso
+
+
+License
+-------
+
+(The MIT License)
+
+Copyright (c) 2012 Miguel Adolfo Barroso
+
+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,9 @@
+require 'bundler'
+Bundler::GemHelper.install_tasks
+
+task :default => :test
+
+desc "Run all tests"
+task :test do
+  exec "rspec --color"
+end

data/lib/lleidasms/client.rb

@@ -0,0 +1,59 @@
+$:.unshift File.dirname(__FILE__)
+require "gateway"
+
+module Lleidasms
+  class Client < Lleidasms::Gateway
+		event :ALL, :new_event
+
+    attr_accessor :timeout
+
+    def connect(user, password, timeout = 2.4)
+    	super()
+    	listener
+      cmd_login(user, password)
+      self.timeout= timeout
+    end
+
+		def saldo()
+			cmd_saldo
+			return false unless wait_for(last_label)
+			return @response_args[0]
+		end
+
+		def tarifa(numero)
+			cmd_tarifa numero
+			return false unless wait_for(last_label)
+			return @response_args
+		end
+
+		def send_sms(wait = true)
+			saldo
+			wait_for(last_label) if wait
+		end
+
+    private
+    def new_event(label, cmd, args)
+    	@event_label = label
+    	@event_cmd   = cmd
+    	@event_args  = args
+      if @wait_for_label.eql? @event_label
+        @wait = false
+      	@response_label = label
+      	@response_cmd   = cmd
+      	@response_args  = args
+      end
+    end
+
+    def wait_for(label)
+      @wait_for_label = label.to_s
+      @wait = true
+      t = Time.new
+    	while @wait do
+         sleep 0.2
+         return false if @timeout < (Time.new - t)
+    	end
+    	return true
+    end
+
+  end
+end

data/lib/lleidasms/gateway.rb

@@ -0,0 +1,182 @@
+require "thread"
+require "socket"
+require "io/wait"
+
+module Lleidasms
+  class Gateway
+    # Client
+    def initialize(host = 'sms.lleida.net', port = 2048)
+      @host = host
+      @port = port
+      @my_label = 0
+
+      # prepare global (scriptable) data
+      $conected      = false
+      $input_buffer  = Queue.new
+      $output_buffer = String.new
+
+      $reader      = lambda do |line|
+      	$input_buffer << line.strip
+      	parser
+      end
+      $writer      = lambda do |buffer|
+      	$server.puts "#{buffer}\r\n"
+      	puts "<#{buffer}\r\n"
+      	buffer.replace("")
+      end
+    end
+
+    def connect
+      begin
+      	$server = TCPSocket.new(@host, @port)
+      	$conected = true
+      rescue
+        $conected = false
+      	puts "Unable to open a connection."
+      	exit
+      end
+    end
+
+    def listener
+      Thread.new($server) do |socket|
+      	while line = socket.gets
+      		$reader[line]
+      	end
+      	close!
+      end
+    end
+
+    def conected?
+      $conected
+    end
+
+    def close
+      cmd_quit
+    end
+
+    def close!
+      $server.close
+      $conected = false
+    end
+    # Client end
+
+    # Callbacks
+    $callbacks = {}
+
+ 	  def self.event(name, method_name)
+ 	  	$callbacks[name] = [] unless $callbacks[name]
+      $callbacks[name] << method_name
+		end
+
+		def do_event(name)
+			run_event name.to_sym, @label, @cmd, @args
+		end
+
+		def run_event(name, *args)
+      run_event_for(name.to_sym, self, *args)
+    end
+
+    def run_event_for(name, scope, *args)
+    	return unless $callbacks[name.to_sym]
+      $callbacks[name.to_sym].each do |callback|
+        if callback.kind_of? Symbol
+          scope.send(callback, *args)
+        else
+          scope.instance_exec(*args, &callback)
+        end
+      end
+    end
+    # Callbacks end
+
+    def new_label
+      @my_label += 1
+      @my_label.to_s
+    end
+
+    def last_label
+      @my_label
+    end
+
+    # CMD Generales
+    def cmd_login(user, password, label_response = new_label)
+      $writer[label_response + " LOGIN #{user} #{password}"]
+    end
+
+    def cmd_ping(time = Time.now.to_i.to_s, label_response = new_label)
+      $writer[label_response + " PING "+ time]
+    end
+
+    def cmd_pong(time = Time.now.to_i.to_s, label_response = new_label)
+      $writer[label_response + " PONG "+ time]
+    end
+
+    def cmd_saldo(label_response = new_label)
+      $writer[label_response + " SALDO"]
+    end
+
+    def cmd_infonum(numero, label_response = new_label)
+      $writer[label_response + " INFONUM #{numero}"]
+    end
+
+    def cmd_tarifa(numero, label_response = new_label)
+      $writer[label_response + " TARIFA #{numero}"]
+    end
+
+    def cmd_quit(label_response = new_label)
+      $writer[label_response + " QUIT"]
+    end
+    # CMD Generales end
+
+    # CMD Envios MT
+    # CMD Envios MT end
+
+    # CMD Recepcion SMS (no premium)
+    def cmd_allowanswer(allow = true, label_response = new_label)
+      $writer[label_response + " ALLOWANSWER " + (allow ? 'ON' : 'OFF')]
+    end
+
+    def cmd_incomingmoack(m_id, label_response = new_label)
+      $writer[label_response + " INCOMINGMOACK #{m_id}"]
+    end
+    # CMD Recepcion SMS (no premium) end
+
+    # CMD Recepcion SMS (premium)
+    # CMD Recepcion SMS (premium) end
+
+		def parser
+			until $input_buffer.empty?
+				line = $input_buffer.shift
+				puts ">#{line}\r\n"
+				@args = line.split(' ')
+				@label = @args.shift
+				@cmd   = @args.shift
+
+				case @cmd
+				# CMD Generales
+				when 'OK'
+				when 'NOOK'
+				when 'RSALDO'
+				when 'PING'
+				  cmd_pong @args[0], @label
+				when 'PONG'
+				  cmd_ping @args[0], @label
+				when 'RINFONUM'
+				when 'RTARIFA'
+				when 'BYE'
+					close!
+        # CMD Envios MT
+
+        # CMD Recepcion SMS (no premium)
+        when 'INCOMINGMO'
+
+        # CMD Recepcion SMS (premium)
+
+				else
+          # unknow
+				end
+				do_event(@cmd)
+				do_event(:ALL)
+			end
+		end
+  end
+end

data/lib/lleidasms/version.rb

@@ -0,0 +1,3 @@
+module Lleidasms
+  VERSION = "1.0.0"
+end

data/lib/lleidasms.rb

@@ -0,0 +1,2 @@
+require File.expand_path('../lleidasms/client', __FILE__)
+require File.expand_path('../lleidasms/gateway', __FILE__)

data/test/lleidasms_test.rb

@@ -0,0 +1,7 @@
+require 'test_helper'
+
+class LleidasmsTest < ActiveSupport::TestCase
+  test "truth" do
+    assert_kind_of Module, Lleidasms
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+# Configure Rails Environment
+ENV["RAILS_ENV"] = "test"
+
+require File.expand_path("../dummy/config/environment.rb",  __FILE__)
+require "rails/test_help"
+
+Rails.backtrace_cleaner.remove_silencers!
+
+# Load support files
+Dir["#{File.dirname(__FILE__)}/support/**/*.rb"].each { |f| require f }

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification
+name: lleidasms
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+  prerelease: 
+platform: ruby
+authors:
+- Miguel Adolfo Barroso
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-05 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &19028940 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 2.7.0
+  type: :development
+  prerelease: false
+  version_requirements: *19028940
+description: Receive and send standar and premium SMS/MMS using Lleida.net services.
+email:
+- mabarroso@mabarroso.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/lleidasms.rb
+- lib/lleidasms/version.rb
+- lib/lleidasms/client.rb
+- lib/lleidasms/gateway.rb
+- MIT-LICENSE
+- Rakefile
+- README.rdoc
+- test/lleidasms_test.rb
+- test/test_helper.rb
+homepage: https://github.com/mabarroso/lleidasms
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Lleida.net SMS gateway for Ruby.
+test_files:
+- test/lleidasms_test.rb
+- test/test_helper.rb