suls-smsr 0.0.1

data/.autotest

@@ -0,0 +1,3 @@
+# require 'autotest/rspec'
+require 'autotest/redgreen'
+require 'autotest/growl'

data/.gitignore

@@ -0,0 +1,4 @@
+.DS_Store
+coverage/
+doc/
+pkg/

data/History.txt

@@ -0,0 +1,5 @@
+=== Version 0.1.0
+
+This is the first preview release of SmsR.
+ 
+* Added main bin/smsr file

data/Manifest.txt

@@ -0,0 +1,38 @@
+.autotest
+.gitignore
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+bin/smsr
+bin/smsr-config
+bin/smsr-send
+lib/providers/hispeed.rb
+lib/providers/o2.rb
+lib/providers/orange.rb
+lib/providers/swisscom.rb
+lib/smsr.rb
+lib/smsr/actions.rb
+lib/smsr/actions/config.rb
+lib/smsr/actions/list.rb
+lib/smsr/actions/send.rb
+lib/smsr/config.rb
+lib/smsr/extensions.rb
+lib/smsr/providers.rb
+lib/smsr/providers/provider.rb
+lib/smsr/smsr.rb
+lib/smsr/version.rb
+smsr.gemspec
+spec/providers/hispeed_spec.rb
+spec/providers/orange_spec.rb
+spec/providers/provider_helper.rb
+spec/providers/swisscom_spec.rb
+spec/smsr/actions/config_spec.rb
+spec/smsr/actions/send_spec.rb
+spec/smsr/actions_requirements_spec.rb
+spec/smsr/actions_spec.rb
+spec/smsr/config_spec.rb
+spec/smsr/providers_spec.rb
+spec/smsr/version_spec.rb
+spec/smsr_spec.rb
+spec/spec_helper.rb

data/README.txt

@@ -0,0 +1,70 @@
+= SmsR
+
+* http://sulsarts.ch/p/smsr
+
+== DESCRIPTION:
+
+SmsR is a simple command line SMS sender utility.
+
+== FEATURES/PROBLEMS:
+
+* lots
+
+== SYNOPSIS:
+
+Add a new provider like this:
+
+  desc "my sample operator"
+  provider :sample_operator do |user, password, number, text|
+    # login on the website and send SMS
+  end
+
+Setup the provider by providing username and password:
+
+  smsr-config sample_operator my_username my_password
+  
+Your provider is now available:
+
+  smsr-send sample_operator +41XXXXXXXXX "this is your text message"
+
+== INSTALL:
+
+  [sudo] gem install rspec
+  
+or
+  
+  git clone git://github.com/suls/smsr.git
+  cd smsr
+  rake gem
+  rake install_gem
+  
+== ACKNOWLEDGEMENTS:
+
+Thanks to Mirko Stocker for the idea (http://blog.misto.ch/archives/606) and
+to Gui for the Swisscom provider
+(http://giu.me/01-09-2008-sms-senden-leicht-gemacht-swisscom.html).
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 Mathias Sulser
+
+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,70 @@
+$:.unshift(File.join(File.dirname(__FILE__), 'lib'))
+
+require 'rake'
+require 'hoe'
+require 'spec/rake/spectask'
+require 'spec/rake/verify_rcov'
+require 'smsr/version'
+
+
+desc "Clean up everything"
+task :clean => ["spec:clobber_rcov", "hoe:clean"] do
+end
+
+namespace :hoe do
+$hoe = Hoe.new('smsr', SmsR::VERSION::STRING) do |p|
+  p.summary = SmsR::VERSION::SUMMARY
+  p.url = 'http://sulsarts.ch/p/smsr'
+  p.description = "Simple commandline utility for sending sms."
+  p.developer('Mathias Sulser', 'suls@suls.org')
+  p.extra_deps << ["mechanize", ">= 0.7.8"] << ["rspec", ">= 1.1.4"]
+  p.changes = p.paragraphs_of("History.txt", 0..1).join("\n\n")
+end
+
+['audit','test','test_deps','default','publish_docs',
+  'announce', 'post_blog', 'post_news'].
+  map{ |tsk| 'hoe:'+tsk}.
+  each do |task|
+    Rake.application.instance_variable_get('@tasks').delete(task)
+  end
+end
+
+namespace :spec do
+  desc "Run all specs with rcov"
+  Spec::Rake::SpecTask.new('rcov') do |t|
+    t.spec_files = FileList['spec/**/*_spec.rb']
+
+    t.rcov = true
+    t.rcov_opts << 
+      '--exclude' << 
+      'spec,gems' << 
+      "--text-report"
+  end
+  
+  desc "Check spec coverage"
+  RCov::VerifyTask.new(:coverage => "spec:rcov") do |t|
+    t.threshold = 90.0 # Make sure you have rcov 0.7 or higher!
+    t.index_html = File.dirname(__FILE__) + '/coverage/index.html'
+    
+    system "open coverage/index.html" if RUBY_PLATFORM =~ /darwin/
+  end
+
+  desc "Run all specs"
+  Spec::Rake::SpecTask.new('run') do |t|
+    t.spec_files = FileList['spec/**/*.rb']
+  end
+end
+
+namespace :gemspec do
+  desc 'Refresh smsr.gemspec to include ALL files'
+  task :refresh => 'manifest:refresh' do
+    File.open('smsr.gemspec', 'w') {|io| io.write($hoe.spec.to_ruby)}
+  end
+end
+
+namespace :manifest do
+  desc 'Recreate Manifest.txt to include ALL files'
+  task :refresh do
+    `rake hoe:check_manifest | patch -p0 > Manifest.txt`
+  end
+end

data/bin/smsr

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby -wKU
+require File.dirname(__FILE__) + '/../lib/smsr'
+ 
+SmsR.start ARGV

data/bin/smsr-config

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+require File.dirname(__FILE__) + '/../lib/smsr'
+
+SmsR.start ["config", *ARGV]

data/bin/smsr-send

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+require File.dirname(__FILE__) + '/../lib/smsr'
+
+SmsR.start ["send", *ARGV]

data/lib/providers/hispeed.rb

@@ -0,0 +1,35 @@
+require "rubygems"
+require "mechanize"
+
+provider :hispeed do |user, password, number, message|
+  SmsR.debug "args: ", user, password, number, message
+  
+  WWW::Mechanize.new do |agent|
+    SmsR.debug "logging in .."
+    agent.get('https://your.hispeed.ch/') do |page|
+      find_form_with_field(page, 'mail') do |f|
+        f.mail = user
+        f.password = password
+        f.submit
+      end
+    end
+    SmsR.debug ".. done"
+
+    agent.get('https://your.hispeed.ch/de/apps/messenger/') do |page|
+      SmsR.debug "start sending .."
+
+      iframe = page.iframes.text('external_application')
+      agent.get(iframe.src) do |inner_page|
+        form = inner_page.form('smsBean')
+        form.recipient = number
+        form.checkboxes.name('recipientChecked').check
+        form.message = message
+        form.submit
+      end
+
+      SmsR.debug ".. done"
+    end
+
+    SmsR.info "SMS '#{message}' sent to #{number}"
+  end
+end

data/lib/providers/o2.rb

@@ -0,0 +1,28 @@
+require "rubygems"
+require "mechanize"
+
+provider :o2 do |user, password, number, message|
+  SmsR.debug "args: ", user, password, number, message
+  WWW::Mechanize.new do |agent|
+    SmsR.debug "logging in .."
+    site = "http://www.o2.co.uk/login?dest=http://sendtxt.o2.co.uk/sendtxt/action/compose"
+    agent.get(site) do |page|
+      form = page.form("o2portal_sign_in_form")
+      form["USERNAME"] = user
+      form["PASSWORD"] = password
+      form.submit
+    end
+    SmsR.debug ".. done"
+    
+    agent.get("http://sendtxt.o2.co.uk/sendtxt/action/compose") do |page|
+      
+      form =  page.form("sendtxtform")
+      form["compose.to"] = number
+      form["compose.message"] = message
+      # pp form.buttons[-2]
+      form.click_button form.buttons[-2]
+      SmsR.debug "start sending .."
+    end
+    SmsR.debug ".. done"
+  end
+end

data/lib/providers/orange.rb

@@ -0,0 +1,34 @@
+require "rubygems"
+require "mechanize"
+
+# from Mirko
+# http://blog.misto.ch/archives/606
+provider :orange do |user, password, number, message|
+  SmsR.debug "args: ", user, password, number, message
+  
+  WWW::Mechanize.new do |agent|
+    SmsR.debug "logging in .."
+    agent.get('https://www.orange.ch/footer/login') do |page|
+      find_form_with_field(page, 'username') do |f|
+        f.username = user
+        f.password = password
+        f.submit
+      end
+    end
+    SmsR.debug ".. done"
+
+    agent.get('https://www.orange.ch/myorange/sms') do |page|
+      SmsR.debug "start sending .."
+      find_form_with_field(page, 'messageInput') do |f|
+        f.destinationNumberInput = number
+        f.messageInput = to_ISO_8859_1(message)
+        f.wui_target_id = 'sendButton'
+        f.wui_event_id = 'onclick'
+        f.submit
+      end
+      SmsR.debug ".. done"
+    end
+    
+    SmsR.info "SMS '#{message}' sent to #{number}"
+  end
+end

data/lib/providers/swisscom.rb

@@ -0,0 +1,41 @@
+require "rubygems"
+require "mechanize"
+
+# from Gui
+# http://giu.me/01-09-2008-sms-senden-leicht-gemacht-swisscom.html
+provider :swisscom do |user, password, number, message|
+  SmsR.debug "args: ", user, password, number, message
+  WWW::Mechanize.new do |agent|
+    SmsR.debug "logging in .."
+    agent.get('https://www.swisscom-mobile.ch/selfreg/SelfRegistration?'+
+              'uri=/youth/youth_zone_home-de.aspx') do |page|
+
+      find_form_with_field(page, 'isiwebuserid') do |f|
+        f.isiwebuserid = username
+        f.isiwebpasswd = password
+        f.submit
+      end
+    end
+    SmsR.debug ".. done"
+    
+
+    agent.get('https://www.swisscom-mobile.ch'+
+              '/youth/sms_senden-de.aspx') do |page|
+      SmsR.debug "start sending .."
+      find_form_with_field(page, 'CobYouthSMSSenden:txtMessage') do |f|
+        f['CobYouthSMSSenden:txtNewReceiver']= number
+        f['CobYouthSMSSenden:txtMessage']= message
+        submit_button= nil
+        #finde den richtigen submit-button
+        f.buttons.each do |button|
+          if button.name = 'CobYouthSMSSenden:btnSend' then 
+            submit_button= button
+            break
+          end
+        end
+        f.submit(submit_button)
+      end 
+    end
+    SmsR.debug ".. done"
+  end
+end

data/lib/smsr.rb

@@ -0,0 +1,12 @@
+$:.unshift File.dirname(__FILE__)
+
+require "smsr/extensions"
+require "smsr/smsr"
+require "smsr/version"
+require "smsr/config"
+require "smsr/actions"
+require "smsr/actions/config"
+require "smsr/actions/send"
+require "smsr/actions/list"
+require "smsr/providers"
+require "smsr/providers/provider"

data/lib/smsr/actions.rb

@@ -0,0 +1,110 @@
+module SmsR
+module Actions
+  
+  class RunnableAction
+    attr_writer :provider_name
+    class << self
+    
+      def inherited(child)
+        child.instance_eval do 
+          initialize_class
+          def self.run(*args)
+            args.flatten!
+            SmsR.debug "running #{self.name} .. (#run_#{args.size})",
+                        "with args: #{args.join(',')}"
+            runner = self.new(args.first)
+            
+            if runner.respond_to? :"run_#{args.size}"
+              SmsR.info runner.error unless runner.
+                                            send(:"run_#{args.size}", *args)
+            else
+              SmsR.info ".. doesn't know what to do.", "Please check 'smsr -h' ad see the available options."
+            end
+          end
+        end
+        super
+      end
+      
+      def initialize_class
+
+        self.class_eval do
+          include SmsR::Actions.requirements
+          attr_reader :error
+          attr_accessor :requirements
+          define_method(:initialize) do |provider|
+            @provider_name = provider.to_sym if provider
+            @error = []
+            @requirements = []
+          end
+        end
+      end
+      
+      def runnable(*reqs, &block)
+        n_of_block_args = if block.arity > 0
+          block.arity
+        else
+          0
+        end
+        
+        define_method(:"run_#{n_of_block_args}") do |*params|
+          self.requirements = reqs
+          
+          SmsR.debug "defining #{self.class}.run method with params: ",
+                     "  #{params.join(',')}"
+          if check
+            instance_exec(*params, &block) if block_given?
+            return true
+          end
+          false
+        end
+        
+        define_method(:check) do
+          requirements.inject(true) do |succ, req|
+            succ = self.send req.to_sym if succ
+            succ
+          end
+        end
+        
+      end
+
+    end
+
+  end
+  
+  module Requirements
+    
+    def config
+      @config = SmsR.config[@provider_name]
+      unless !!@config
+        @error << ["No config for #{provider_name} found. Run:",
+                  "", "  smsr-config #{provider_name} username password",
+                  "", "to set up the config for the selected provider."]
+      end
+      !!@config
+    end
+
+    def provider
+      @provider = SmsR::Providers.providers[@provider_name] 
+      unless !!@config
+        @error << ["Provider '#{@provider_name}' not found."]
+      end
+      !!@provider
+    end
+    
+    def load_providers
+      require "rubygems"
+      require "rake"
+      providers = FileList["#{SmsR::Providers::DEFAULT_PROVIDERS}/*.rb"]
+      providers << ENV['HOME']+'/.smsr_providers'
+      SmsR.debug providers 
+      @error = SmsR::Providers.load(*providers)
+    end
+  end
+  # module requirements
+  # included in Concr.Action
+  
+  def self.requirements
+    Requirements
+  end
+end
+end