multistockphoto 0.9.0 → 0.9.2

data/config.yaml

@@ -0,0 +1,41 @@
+--- 
+:active_sites:
+- :fotolia
+- :zoonar
+- :photocase
+- :dreamstime
+- :bigstockphoto
+- :panthermedia
+:zoonar: 
+  :user: 'hugo'
+  :password: 'lalala'
+  :total_per_day: 10
+:fotolia: 
+  :user: 'hugo'
+  :password: 'lalala'
+  :ftp_user: '200507099'
+  :ftp_password: 'hugolalala'
+  :total_per_day: 11
+:photocase: 
+  :user: 'hugo'
+  :password: 'lalala'
+  :total_per_day: 12
+:dreamstime: 
+  :user: 'martha'
+  :password: 'mageheim'
+  :ftp_user: 'martha12345'
+  :ftp_password: 'ftpgeheimmartha'
+  :total_per_day: 1
+:bigstockphoto: 
+  :user: 'dennis'
+  :password: 'dennisgeheim'
+  :ftp_user: 'dennis12345'
+  :ftp_password: 'ftpgeheimdennis'
+  :total_per_day: 1
+:panthermedia: 
+  :user: 'iris'
+  :password: 'irisgeheim'
+  :ftp_user: 'irisftp'
+  :ftp_password: 'irisftpgeheim'
+  :total_per_day: 1
+

data/lib/multistockphoto.rb

@@ -1,24 +1,57 @@
-$:.unshift(File.dirname(__FILE__)) unless
-$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
 
 module Multistockphoto
-end
+#
+  # :stopdoc:
+  VERSION = '0.9.2'
+#  LIBPATH = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+#  PATH = ::File.dirname(LIBPATH) + ::File::SEPARATOR
+  # :startdoc:
+#
+#  # Returns the version string for the library.
+#  #
+#  def self.version
+#    VERSION
+#  end
+#
+#  # Returns the library path for the module. If any arguments are given,
+#  # they will be joined to the end of the libray path using
+#  # <tt>File.join</tt>.
+#  #
+#  def self.libpath( *args )
+#    args.empty? ? LIBPATH : ::File.join(LIBPATH, args.flatten)
+#  end
+#
+#  # Returns the lpath for the module. If any arguments are given,
+#  # they will be joined to the end of the path using
+#  # <tt>File.join</tt>.
+#  #
+#  def self.path( *args )
+#    args.empty? ? PATH : ::File.join(PATH, args.flatten)
+#  end
+#
+#  # Utility method used to require all files ending in .rb that lie in the
+#  # directory below this file that has the same name as the filename passed
+#  # in. Optionally, a specific _directory_ name can be passed in such that
+#  # the _filename_ does not have to be equivalent to the directory.
+#  #
+#  def self.require_all_libs_relative_to( fname, dir = nil )
+#    dir ||= ::File.basename(fname, '.*')
+#    search_me = ::File.expand_path(
+#        ::File.join(::File.dirname(fname), dir, '**', '*.rb'))
+#
+#    Dir.glob(search_me).sort.each {|rb| require rb}
+#  end
+#
+end  # module Multistockphoto
+#
+#Multistockphoto.require_all_libs_relative_to(__FILE__)
 
-require 'multistockphoto/version'
-require 'multistockphoto/generic_site'
-require 'multistockphoto/multistockphoto'
-require 'multistockphoto/photo'
-#require 'multistockphoto/config'
 require 'multistockphoto/sender'
-
+#require 'multistockphoto/photo'
+require 'multistockphoto/generic_site'
 require 'multistockphoto/site_fotolia'
-require 'multistockphoto/site_zoonar'
-#require 'multistockphoto/site_aldi'
-require 'multistockphoto/site_photocase'
 require 'multistockphoto/site_dreamstime'
-require 'multistockphoto/site_bigstockphoto'
 require 'multistockphoto/site_panthermedia'
-
-
-require 'multistockphoto/upload_exception'
-require 'multistockphoto/mock_zoonar'
+require 'multistockphoto/site_photocase'
+require 'multistockphoto/site_zoonar'
+# EOF

data/lib/multistockphoto/generic_site.rb

@@ -1,3 +1,28 @@
+require 'yaml'
+
+#--
+#TODO: fix für komischen recursive Array join Fehler
+# wieder entfernen, wenn das kein Problem mehr ist
+require "monitor"
+module Net
+  class FTP
+    include MonitorMixin
+    def sendport(host, port)
+      af = (@sock.peeraddr)[0]
+      if af == "AF_INET"
+        cmd = "PORT " + (host.split(".") + port.divmod(256)).join(",")
+      elsif af == "AF_INET6"
+        cmd = sprintf("EPRT |2|%s|%d|", host, port)
+      else
+        raise FTPProtoError, host
+      end
+      voidcmd(cmd)
+    end
+    private :sendport
+  end
+end
+#++
+
 class GenericSite
   attr_reader :name
   attr_accessor :user, :password, :max_errors
@@ -49,7 +74,7 @@ class GenericSite
         #TODO: leere Zeilen ignorieren
         site, photo_file, time = line.chomp.split("\t")
          
-          date = Date.parse(time)
+        date = Date.parse(time)
         
         key = [site, date]
         if count[key]==nil 

data/lib/multistockphoto/site_aldi.rb

@@ -1,3 +1,4 @@
+# Klasse Aldi war nur ein Experiment und wird wieder gelöscht, da man auf deren Site keinen Account anlegen kann, sondern nur seine Bilder hochladen, und von diesen Abzüge bestellen kann. Das läßt sich schwer automatisieren und ist auch nicht der eigentliche Zweck dieses gems
 class Aldi < GenericSite
   
   def initialize(name)
@@ -79,4 +80,4 @@ class Aldi < GenericSite
   def html_out(body,html_file)
     File.open(html_file,"w") {|f| f.print body}
   end
-end
+end

data/lib/multistockphoto/site_bigstockphoto.rb

@@ -1,5 +1,6 @@
 require 'net/ftp'
 
+# Klasse zum Senden an http://www.bigstockphoto.com/
 class Bigstockphoto < GenericSite
   
   @@errors = 0
@@ -118,4 +119,4 @@ if already_sent_site?(photo,SITENAME)
     true #TODO: pruefen!
   end
   
-end # class
+end # class

data/lib/multistockphoto/site_dreamstime.rb

@@ -1,5 +1,6 @@
 require 'net/ftp'
 
+# Klasse zum Senden an http://www.dreamstime.com/
 class Dreamstime < GenericSite
   
   @@errors = 0
@@ -121,4 +122,4 @@ class Dreamstime < GenericSite
     true
   end
   
-end # class
+end # class

data/lib/multistockphoto/site_fotolia.rb

@@ -1,5 +1,35 @@
 require 'net/ftp'
+#--
+#TODO: fix für komischen recursive Array join Fehler
+# wieder entfernen, wenn das kein Problem mehr ist
+require "monitor"
+module Net
+  class FTP
+    include MonitorMixin
+    def sendport(host, port)
+      af = (@sock.peeraddr)[0]
+      if af == "AF_INET"
+# original:        cmd = "PORT " + (host.split(".") + port.divmod(256)).join(",")
+        #(host.split(".") + port.divmod(256)).join(",")
+        tmp = ''
+        (host.split(".") + port.divmod(256)).each do |x| 
+          tmp << "#{x},"
+        end
+        tmp = tmp[0..-2]
+        cmd = "PORT " + tmp #(host.split(".") + port.divmod(256)).join(",")
+      elsif af == "AF_INET6"
+        cmd = sprintf("EPRT |2|%s|%d|", host, port)
+      else
+        raise FTPProtoError, host
+      end
+      voidcmd(cmd)
+    end
+    private :sendport
+  end
+end
+#++
 
+# Klasse zum Senden an http://www.fotolia.de 
 class Fotolia < GenericSite
   
   @@errors = 0
@@ -64,7 +94,7 @@ class Fotolia < GenericSite
         files =ftp.list('*')
         #p files
         ftp.close
-      rescue Errno::EPIPE, Net::FTPTempError
+      rescue Errno::EPIPE, Net::FTPTempError, Net::FTPPermError
         raise UploadException
       end
     end

data/lib/multistockphoto/site_istockphoto.rb

@@ -10,6 +10,7 @@ dass ich erstmal darauf verzichtet habe, Istockphoto hier mit aufzunehmen.
 Aufgeschoben ist aber nicht aufgehoben. Ich werde irgenwann mal darauf zurückkommen.
 
 =end
-class Itockphoto < GenericSite
+# Klasse zum Senden an http://deutsch.istockphoto.com/index.php?view=full
+class Istockphoto < GenericSite
   
-end # class
+end # class

data/lib/multistockphoto/site_panthermedia.rb

@@ -11,6 +11,7 @@ Wichtig:
 
 TODO: Groesse der Datei testen - ist aber momentan kein kritischer Wert fuer mich
 =end
+# Klasse zum Senden an http://www.panthermedia.net/
 class Panthermedia < GenericSite
   
   @@errors = 0
@@ -129,4 +130,4 @@ class Panthermedia < GenericSite
     true
   end
   
-end # class
+end # class

data/lib/multistockphoto/site_photocase.rb

@@ -1,6 +1,7 @@
-require 'rubygems'
-require 'mechanize'
+#require 'rubygems'
+#require 'mechanize'
 
+# Klasse zum Senden an http://www.photocase.de/de/photobrowser.asp
 class Photocase < GenericSite
   SITENAME = 'photocase'
   @@errors = 0
@@ -68,7 +69,8 @@ class Photocase < GenericSite
 				end
 			end
 			# form = page.forms.first #TODO: besser nach Name
-			form = page.forms[1] #TODO: es ist jetzt das zweite Formular
+			# form = page.forms[1] #TODO: es ist jetzt das zweite Formular
+			form = page.forms[2] #TODO: es ist jetzt das dritte Formular
 			#    form['loginForm[Username]']  = @config[:zoonar][:user]
 			#    form['loginForm[Password]']  = @config[:zoonar][:password]
 			form['UserName']  = @config[:photocase][:user]

data/lib/multistockphoto/site_zoonar.rb

@@ -2,6 +2,7 @@
 require 'rubygems'
 require 'mechanize'
 
+# Klasse zum Senden an http://www.zoonar.de/
 class Zoonar < GenericSite
   SITENAME = 'zoonar'
   @@errors = 0

data/lib/multistockphoto/version.rb

@@ -1,9 +1,9 @@
-module Multistockphoto #:nodoc:
-  module VERSION #:nodoc:
-    MAJOR = 0
-    MINOR = 9
-    TINY  = 0
-
-    STRING = [MAJOR, MINOR, TINY].join('.')
-  end
-end
+#module Multistockphoto #:nodoc:
+  #module VERSION #:nodoc:
+    #MAJOR = 0
+    #MINOR = 9
+    #TINY  = 0
+#
+    #STRING = [MAJOR, MINOR, TINY].join('.')
+  #end
+#end

data/spec/multistockphoto_spec.rb

@@ -0,0 +1,7 @@
+
+require File.join(File.dirname(__FILE__), %w[spec_helper])
+
+describe Multistockphoto do
+end
+
+# EOF

data/spec/spec_helper.rb

@@ -0,0 +1,16 @@
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib multistockphoto]))
+
+Spec::Runner.configure do |config|
+  # == Mock Framework
+  #
+  # RSpec uses it's own mocking framework by default. If you prefer to
+  # use mocha, flexmock or RR, uncomment the appropriate line:
+  #
+  # config.mock_with :mocha
+  # config.mock_with :flexmock
+  # config.mock_with :rr
+end
+
+# EOF

data/test/test_helper.rb

@@ -0,0 +1,6 @@
+require 'test/unit'
+#require File.dirname(__FILE__) + '/../lib/multistockphoto'
+
+def after(d)
+  yield if DateTime.now > d
+end

data/test/test_multistockphoto.rb

@@ -0,0 +1,906 @@
+#require "./"+File.dirname(__FILE__) + '/test_helper.rb'
+ 
+require 'grep'
+include Grep
+require 'RMagick'
+include Magick
+require 'multistockphoto/generic_site'
+require 'multistockphoto/site_fotolia'
+require 'multistockphoto/site_zoonar'
+require 'multistockphoto/site_bigstockphoto'
+require 'multistockphoto/site_dreamstime'
+require 'multistockphoto/site_istockphoto'
+require 'multistockphoto/site_panthermedia'
+require 'multistockphoto/site_photocase'
+require 'multistockphoto/mock_zoonar'
+require 'multistockphoto/upload_exception'
+require 'multistockphoto/sender'
+require 'multistockphoto/photo'
+#require 'multistockphoto'
+require 'test/unit'
+
+def after(d)
+  yield if DateTime.now > d
+end
+
+#TODO:
+if RUBY_VERSION >= "1.9.0"
+  require 'date'
+end
+
+class TestMultistockphoto < Test::Unit::TestCase
+
+  REAL_TRANSFER = false
+  BIN = 'bin/' # Test
+  SENDLIST = 'sendeliste.dat'
+  # BIN = '' # real
+  ALLSITES = [:fotolia, :zoonar, :photocase, :bigstockphoto]
+
+  def setup
+    ENV['ZOONAR_USER'] = 'hugo'
+    ENV['ZOONAR_PASSWORD'] = 'geheim'
+    ENV['ZOONAR_USER'] = 'hugo'
+    ENV['ZOONAR_PASSWORD'] = 'lalala'
+    ENV['FOTOLIA_USER'] = 'hugo'
+    ENV['FOTOLIA_PASSWORD'] = 'lalala'
+    ENV['FOTOLIA_FTP_USER'] = '200507099'
+    ENV['FOTOLIA_FTP_PASSWORD'] = 'hugolalala'
+    ENV['PHOTOCASE_USER'] = 'hugo'
+    ENV['PHOTOCASE_PASSWORD'] = 'lalala'
+    ENV['DREAMSTIME_USER'] = 'martha'
+    ENV['DREAMSTIME_PASSWORD'] = 'mageheim'
+    ENV['DREAMSTIME_FTP_USER'] = 'martha12345'
+    ENV['DREAMSTIME_FTP_PASSWORD'] = 'ftpgeheimmartha'
+    ENV['BIGSTOCKPHOTO_USER'] = 'dennis'
+    ENV['BIGSTOCKPHOTO_PASSWORD'] = 'dennisgeheim'
+    ENV['BIGSTOCKPHOTO_FTP_USER'] = 'dennis12345'
+    ENV['BIGSTOCKPHOTO_FTP_PASSWORD'] = 'ftpgeheimdennis'
+    ENV['PANTHERMEDIA_USER'] = 'iris'
+    ENV['PANTHERMEDIA_PASSWORD'] = 'irisgeheim'
+    ENV['PANTHERMEDIA_FTP_USER'] = 'irisftp'
+    ENV['PANTHERMEDIA_FTP_PASSWORD'] = 'irisftpgeheim'
+    @fotolia_user         = ENV['FOTOLIA_USER'] 
+    @fotolia_password     = ENV['FOTOLIA_PASSWORD'] 
+    @fotolia_ftp_user     = ENV['FOTOLIA_FTP_USER'] 
+    @fotolia_ftp_password = ENV['FOTOLIA_FTP_PASSWORD'] 
+    @zoonar_user          = ENV['ZOONAR_USER']
+    @zoonar_password      = ENV['ZOONAR_PASSWORD']
+    @aldi_user            = ENV['ALDI_USER']
+    @aldi_password        = ENV['ALDI_PASSWORD']
+    @photocase_user       = ENV['PHOTOCASE_USER']
+    @photocase_password   = ENV['PHOTOCASE_PASSWORD']
+    @dreamstime_user         = ENV['DREAMSTIME_USER'] 
+    @dreamstime_password     = ENV['DREAMSTIME_PASSWORD'] 
+    @dreamstime_ftp_user     = ENV['DREAMSTIME_FTP_USER'] 
+    @dreamstime_ftp_password = ENV['DREAMSTIME_FTP_PASSWORD'] 
+    @bigstockphoto_user         = ENV['BIGSTOCKPHOTO_USER'] 
+    @bigstockphoto_password     = ENV['BIGSTOCKPHOTO_PASSWORD'] 
+    @bigstockphoto_ftp_user     = ENV['BIGSTOCKPHOTO_FTP_USER'] 
+    @bigstockphoto_ftp_password = ENV['BIGSTOCKPHOTO_FTP_PASSWORD'] 
+    @panthermedia_user         = ENV['PANTHERMEDIA_USER'] 
+    @panthermedia_password     = ENV['PANTHERMEDIA_PASSWORD'] 
+    @panthermedia_ftp_user     = ENV['PANTHERMEDIA_FTP_USER'] 
+    @panthermedia_ftp_password = ENV['PANTHERMEDIA_FTP_PASSWORD'] 
+    ENV['MSP_CONFIG'] = nil
+  end
+
+  def test_objects
+    f = Fotolia.new 'fotolia'
+    assert_kind_of Fotolia, f
+    b = Bigstockphoto.new 'bigstockphoto'
+    assert_kind_of Bigstockphoto, b
+    d = Dreamstime.new 'dreamstime'
+    assert_kind_of Dreamstime, d
+    i = Istockphoto.new 'istockphoto'
+    assert_kind_of Istockphoto, i
+    p = Panthermedia.new 'panthermedia'
+    assert_kind_of Panthermedia, p
+    p = Photocase.new 'photocase'
+    assert_kind_of Photocase, p
+    z = Zoonar.new 'zoonar'
+    assert_kind_of Zoonar, z
+  end
+
+  after Date.new(2009,8,1) do
+    def test_bin_check_orientation
+      #expected = "test/IMG_3602.JPG:\tTopLeftOrientation\n"
+      expected = "test/IMG_3602.JPG:\tlandscape\n"
+    
+      result = `#{BIN}multistockphoto --check-orientation test/IMG_3602.JPG`
+      assert_equal expected, result
+
+      result = `#{BIN}multistockphoto -c test/IMG_3602.JPG`
+      assert_equal expected, result
+    
+      result = `#{BIN}multistockphoto -c test/IMG_5880.JPG`
+      assert_equal "test/IMG_5880.JPG:\tportrait\n", result
+    end
+
+    def test_bin_help
+      expected = "Usage: multistockphoto [-va1yntscrxlpoqbdef]
+Options:
+        --help                       Show this message
+    -v, --version                    Show version
+    -a, --send-all                   Send all files
+    -1, --tags-only                  Send only photos with keywords
+    -y, --verbose                    Verbose output
+    -n, --not-sent                   Count not sent files per site
+    -t, --total-transfers            Dont't send more than N photos in total
+    -s, --total-per-site             Send no more than N photos per site
+    -c, --check-orientation          Displays the orientiation of photo files
+    -r, --rotate file [file2 ...]    Rotate a photo file 90 degrees to the left
+    -x, --stats                      Displays statistics
+    -l, --list-done                  List photos sent to all sites
+    -p, --purge-done                 Purge photos sent to all sites
+    -o, --ordered                    Send/List files in alphabetical order
+    -q, --no-tags                    List photos without tags file
+    -b, --count                      Count - only photo with at least N tags
+    -d, --plist                      Show detailed sending state for each picture
+    -e, --check-translation          Checks if translation can be done for all tags
+    -f, --shuffle                    Shuffle order of files (sending)
+        --dont-send                  
+        --dont-log                   \n"
+      result = `#{BIN}multistockphoto -h`
+      assert_equal expected, result
+      result = `#{BIN}multistockphoto --help`
+      assert_equal expected, result
+    end
+
+  end
+
+  after Date.new(2009,8,1) do
+    def test_bin_version
+      #    expected = "multistockphoto 0.9.0\n" + Multistockphoto::VERSION::STRING
+      expected = "multistockphoto #{Multistockphoto::VERSION}\n"
+      result = `#{BIN}multistockphoto -v`
+      assert_equal expected, result
+      result = `#{BIN}multistockphoto --version`
+      assert_equal expected, result
+    end
+
+  end
+  def test_fotolia
+    fotolia = Fotolia.new("Fotolia")
+    fotolia.ftp_user = @fotolia_ftp_user
+    fotolia.ftp_password = @fotolia_ftp_password
+    
+    assert_kind_of Fotolia, fotolia
+    assert_equal "Fotolia", fotolia.name
+    
+    fotolia.user = @fotolia_user
+    fotolia.password = @fotolia_password
+    
+    assert_equal @fotolia_user, fotolia.user
+    assert_equal @fotolia_password, fotolia.password
+    
+  end
+
+  def test_photo
+    photo = Photo.new("123.jpg")
+    assert_kind_of Photo, photo
+    assert_equal "123.jpg", photo.filename
+  end
+  after Date.new(2009,8,1) do
+
+    def test_fotolia_transfer_1
+      if REAL_TRANSFER
+        fotolia = Fotolia.new("Fotolia")
+        fotolia.user = @fotolia_user
+        fotolia.password = @fotolia_password
+        photo = Photo.new("test/1234.jpg")
+        #assert fotolia.transfer(photo)
+        #TODO: zwei Gruende, warum das fehlschlagen kann:
+        # 1. Datei nicht vorhanden
+        # 2. Argument kein Photo-Objekt
+        # => bessere Tests
+        #    assert_raise (RuntimeError) {
+        #      fotolia.transfer("123.jpg")
+        #    }
+      end
+    end
+  
+    #  def test_fotolia_transfer_existing_picture
+    #    fotolia = Fotolia.new("Fotolia")
+    #    fotolia.user = @fotolia_user
+    #    fotolia.password = @fotolia_password
+    #    photo = Photo.new("/media/LACIE/private/CF-Card/DCIM/119CANON/IMG_3267_zugeschnitten_blank_names.jpg")
+    #    assert fotolia.transfer(photo)
+    #  end
+
+    def test_fotolia_transfer_existing_no_duplicate_picture
+      if REAL_TRANSFER
+        fotolia = Fotolia.new("Fotolia")
+        fotolia.user = @fotolia_user
+        fotolia.password = @fotolia_password
+        fotolia.ftp_user = @fotolia_ftp_user
+        fotolia.ftp_password = @fotolia_ftp_password
+        photo = Photo.new("/media/LACIE/private/CF-Card/DCIM/119CANON/IMG_3267_zugeschnitten_blank_names.jpg")
+        assert_equal :duplicate, fotolia.transfer(photo)
+      end
+    end
+  
+    def test_config_params_fotolia
+      fotolia = Fotolia.new("Fotolia Site")
+      assert fotolia.user
+      assert fotolia.password
+      assert fotolia.ftp_user
+      assert fotolia.ftp_password
+      assert_equal @fotolia_user, fotolia.user
+      assert_equal @fotolia_password, fotolia.password
+      assert_equal @fotolia_ftp_user, fotolia.ftp_user
+      assert_equal @fotolia_ftp_password, fotolia.ftp_password
+    end
+  
+    def test_config_params_zoonar
+      zoonar = Zoonar.new("zoonar Site")
+      assert zoonar.user
+      assert zoonar.password
+      assert_equal @zoonar_user, zoonar.user
+      assert_equal @zoonar_password, zoonar.password
+      #kein ftp assert_equal @zoonar_ftp_user, zoonar.ftp_user
+      #kein ftp assert_equal @zoonar_ftp_password, zoonar.ftp_password
+    end
+
+    def test_config_params_photocase
+      photocase = Photocase.new("photocase Site")
+      assert photocase.user
+      assert photocase.password
+      assert_equal @photocase_user, photocase.user
+      assert_equal @photocase_password, photocase.password
+      #kein ftp assert_equal @photocase_ftp_user, photocase.ftp_user
+      #kein ftp assert_equal @photocase_ftp_password, photocase.ftp_password
+    end
+  
+    def test_config_params_dreamstime
+      dreamstime = Dreamstime.new("Dreamstime Site")
+      assert dreamstime.user
+      assert dreamstime.password
+      assert dreamstime.ftp_user
+      assert dreamstime.ftp_password
+      assert_equal @dreamstime_user, dreamstime.user
+      assert_equal @dreamstime_password, dreamstime.password
+      assert_equal @dreamstime_ftp_user, dreamstime.ftp_user
+      assert_equal @dreamstime_ftp_password, dreamstime.ftp_password
+    end
+  
+    def test_config_params_bigstockphoto
+      bigstockphoto = Bigstockphoto.new("Bigstockphoto Site")
+      assert bigstockphoto.user
+      assert bigstockphoto.password
+      assert bigstockphoto.ftp_user
+      assert bigstockphoto.ftp_password
+      assert_equal @bigstockphoto_user, bigstockphoto.user
+      assert_equal @bigstockphoto_password, bigstockphoto.password
+      assert_equal @bigstockphoto_ftp_user, bigstockphoto.ftp_user
+      assert_equal @bigstockphoto_ftp_password, bigstockphoto.ftp_password
+    end
+  
+    def test_config_params_panthermedia
+      site = Panthermedia.new("Panthermedia Site")
+      #assert site.user
+      #assert site.password
+      assert site.ftp_user
+      assert site.ftp_password
+      assert_equal @panthermedia_user, site.user
+      assert_equal @panthermedia_password, site.password
+      assert_equal @panthermedia_ftp_user, site.ftp_user
+      assert_equal @panthermedia_ftp_password, site.ftp_password
+    end
+  
+    def test_grep
+      file = "test/testgrep.dat"
+      content = "zoonar\tIMG1.jpg\n"+
+        "fotolia\tIMG1.jpg\n"+
+        "zoonar\tIMG2.jpg\n"+
+        "fotolia\tIMG2.jpg\n"
+      File.open("test/testgrep.dat","w") {|f|
+        f.puts content
+      }
+      assert_equal 1, grep(file,/zoonar\tIMG1.jpg/).size
+      assert_equal 1, grep(file,/fotolia\tIMG1.jpg/).size
+      assert_equal 1, grep(file,/zoonar\tIMG2.jpg/).size
+      assert_equal 1, grep(file,/fotolia\tIMG2.jpg/).size
+      assert_equal 0, grep(file,/zoonar\tIMG3.jpg/).size
+      assert_equal 0, grep(file,/fotolia\tIMG3.jpg/).size
+    end
+
+    def test_photocase_transfer_1
+      after Date.new(2008,6,20) do
+        photocase = Photocase.new("Photocase")
+        photocase.user = @photocase_user
+        photocase.password = @photocase_password
+        photo = Photo.new("test/1234.jpg")
+        photocase.transfer(photo,true,true)
+        if REAL_TRANSFER
+          #assert fotolia.transfer(photo)
+          #TODO: zwei Gruende, warum das fehlschlagen kann:
+          # 1. Datei nicht vorhanden
+          # 2. Argument kein Photo-Objekt
+          # => bessere Tests
+          #    assert_raise (RuntimeError) {
+          #      fotolia.transfer("123.jpg")
+          #    }
+        end
+      end # after
+    end
+
+    def test_config_params_pixelio
+      after Date.new(2008,7,20)+20 do
+        pixelio = Pixelio.new("Pixelio Site")
+        assert pixelio.user
+        assert pixelio.password
+        assert_equal @pixelio_user, pixelio.user
+        assert_equal @pixelio_password, pixelio.password
+        #kein ftp assert_equal @pixelio_ftp_user, pixelio.ftp_user
+        #kein ftp assert_equal @pixelio_ftp_password, pixelio.ftp_password
+      end # after
+    end
+
+    def test_dreamstime_object
+      #    angemeldet.
+      dreamstime = Dreamstime.new("Dreamstime Site")
+      assert_kind_of Dreamstime, dreamstime
+    end
+
+    def test_bigstockphoto_object
+      #    http://www.bigstockphoto.com/
+      #    We accept JPG, EPS, AI, PSD, PDF and PNG file formats.
+      #    All art or images MUST be created by you alone, no exceptions.
+      #Step ONE: Upload your model releases in Release Manager>> if needed... then FTP upload your images - no folders - separate files only. Use this FTP information to log into your BigStockPhoto FTP account:
+
+      #    host: bigstockphoto.com
+      #   username: your BSP username
+      #  password: your BSP password
+
+      #Step TWO: After upload, go to your Uploaded Images Queue to add your keywords, assign releases, titles, descriptions, categories etc. before pushing them to final BigStockPhoto Approval Queue. Also see the new FTP Status Log if needed to check upload status of images.
+      bigstockphoto = Bigstockphoto.new("Bigstockphoto Site")
+      assert_kind_of Bigstockphoto, bigstockphoto
+    end
+    
+    after Date.new(2008,7,25) do
+      def test_shutterstock_object
+        shutterstock = Shutterstock.new("Shutterstock Site")
+        assert_kind_of Shutterstock, shutterstock
+      end
+    end
+
+    after Date.new(2008,7,25) do
+      def test_istockphoto_object
+        #      angemeldet, aber man muß noch vorstellungsbilder hochladen
+        istockphoto = Istockphoto.new("Istockphoto Site")
+        assert_kind_of Istockphoto, istockphoto
+      end
+    end
+
+    after Date.new(2008,7,25) do
+      def test_stockxpert_object
+        #     angemeldet, aber man muss noch vorstellungsbilder hochladen
+        stockxpert = Stockxpert.new("Stockxpert Site")
+        assert_kind_of Stockxpert, stockxpert
+      end
+    end
+
+    after Date.new(2008,7,25)+10 do
+      def test_Einszweidreirf_object
+        einszweidreirf = Einszweidreirf.new("123rf Site")
+        assert_kind_of Einszweidreirf, einszweidreirf
+      end
+    end
+
+    after Date.new(2008,7,25) do
+      def test_Panthermedia_object
+        panthermedia = Panthermedia.new("Panthermedia Site")
+        assert_kind_of Panthermedia, panthermedia
+      end
+      #Shutterstock, iStockphoto , StockXpert , Dreamstime , Bigstockphoto , 123rf und Panthermedia finden Sie auf unserer Partnerseite Fotos kaufen.de
+    end
+
+ 
+ 
+    def test_max_errors
+      site = Fotolia.new('fotolia')
+      assert_equal 3, site.max_errors
+      site = Zoonar.new('zoonar')
+      assert_equal 3, site.max_errors
+      site = Photocase.new('photocase')
+      assert_equal 3, site.max_errors
+      site = Dreamstime.new('dreamstime')
+      assert_equal 3, site.max_errors
+      site = Panthermedia.new('pantermedia')
+      assert_equal 3, site.max_errors
+    end
+
+    def test_set_max_errors
+      site = Fotolia.new('fotolia')
+      site.max_errors = 4
+      assert_equal 4, site.max_errors
+    
+      site = Zoonar.new('zoonar')
+      site.max_errors = 5
+      assert_equal 5, site.max_errors
+    
+      site = Photocase.new('photocase')
+      site.max_errors = 6
+      assert_equal 6, site.max_errors
+    end
+  
+    def test_iptc_keywords
+      after Date.new(2008,7,21)+10 do
+        expected = ['Berlin','gwb','Blume','Biene','Verkehr','S-Bahn']
+        photo = Photo.new(File.join('test','IMG_3602.JPG'))
+        photo.set_keywords
+        assert_equal expected, photo.keywords
+      end
+    end
+
+    def test_iptc_file_keywords
+      after Date.new(2008,7,21)+10 do
+        expected = 'Berlin,gwb,Blume,Biene,Verkehr,S-Bahn'
+        photo = Photo.new(File.join('test','IMG_3602.JPG'))
+        photo.set_keywords
+        assert_equal expected, photo.file_keywords
+      end
+    end
+  
+    def test_iptc_title
+      after Date.new(2008,7,21)+10 do
+        expected = 'meine Katze'
+        photo = Photo.new(File.join('test','IMG_3602.JPG'))
+        photo.set_keywords
+        assert_equal expected, photo.title
+      end
+    end
+
+    def test_iptc_file_title
+      after Date.new(2008,7,1)+30 do
+        expected = 'meine Katze'
+        photo = Photo.new(File.join('test','IMG_3602.JPG'))
+        photo.set_keywords
+        assert_equal expected, photo.file_title
+      end
+    end
+  
+    def test_string_to_keyword_array
+      s = "Berlin"
+      assert_equal ['Berlin'], Photo.to_tags(s)
+      s = "Berlin,Graffiti"
+      assert_equal ['Berlin','Graffiti'], Photo.to_tags(s)
+      s = "Berlin Graffiti"
+      assert_equal ['Berlin','Graffiti'], Photo.to_tags(s)
+      s = "Berlin Graffiti,Test"
+      assert_equal ['Berlin','Graffiti','Test'], Photo.to_tags(s)
+      s = "Berlin Graffiti,  Test"
+      assert_equal ['Berlin','Graffiti','Test'], Photo.to_tags(s)
+      s = "Berlin Graffiti,  Test\n  zweite, dritte"
+      assert_equal ['Berlin','Graffiti','Test','zweite','dritte'], Photo.to_tags(s)
+      s = "Berlin Graffiti,  Test\n  zweite\tdritte"
+      assert_equal ['Berlin','Graffiti','Test','zweite','dritte'], Photo.to_tags(s)
+      s = "Berlin Graffiti,  Test\n  zweite|dritte"
+      assert_equal ['Berlin','Graffiti','Test','zweite','dritte'], Photo.to_tags(s)
+    end
+  
+    def test_iptc_file_keywords_non_existing_tag_file
+      expected = 'Berlin gwb Blume Biene'
+      photo = Photo.new(File.join('test','IMG_9999.JPG'))
+   
+      photo.set_keywords
+      assert_equal expected, photo.file_keywords
+    end
+  
+    def test_total_per_day_from_config_file
+      zoonar = Zoonar.new('zoonar')
+      assert_equal 10, zoonar.total_per_day
+      fotolia = Fotolia.new('fotolia')
+      assert_equal 11, fotolia.total_per_day
+      photocase = Photocase.new('photocase')
+      assert_equal 12, photocase.total_per_day
+    
+      assert_equal 0, zoonar.sent_today
+      assert_equal 0, fotolia.sent_today
+      assert_equal 0, photocase.sent_today
+    end
+    #end
+
+    #class Multistockphoto
+    after Date.new(2008,7,30) do
+    
+      def config_params_pixelio(*args)
+        raise NotImplementedError, 'Need to write config_params_pixelio'
+      end
+
+      def config_params_zoonar(*args)
+        raise NotImplementedError, 'Need to write config_params_zoonar'
+      end
+
+      def fotolia(*args)
+        raise NotImplementedError, 'Need to write fotolia'
+      end
+
+    
+      def fotolia_transfer_existing_no_duplicate_picture(*args)
+        raise NotImplementedError, 'Need to write fotolia_transfer_existing_no_duplicate_picture'
+      end
+
+      def iptc_file_keywords(*args)
+        raise NotImplementedError, 'Need to write iptc_file_keywords'
+      end
+
+      def iptc_file_keywords_non_existing_tag_file(*args)
+        raise NotImplementedError, 'Need to write iptc_file_keywords_non_existing_tag_file'
+      end
+
+      def iptc_keywords(*args)
+        raise NotImplementedError, 'Need to write iptc_keywords'
+      end
+
+      def max_errors(*args)
+        raise NotImplementedError, 'Need to write max_errors'
+      end
+
+      def multistockphoto_group(*args)
+        raise NotImplementedError, 'Need to write multistockphoto_group'
+      end
+
+      def photo(*args)
+        raise NotImplementedError, 'Need to write photo'
+      end
+
+      def photocase_transfer_1(*args)
+        raise NotImplementedError, 'Need to write photocase_transfer_1'
+      end
+
+      def set_max_errors(*args)
+        raise NotImplementedError, 'Need to write set_max_errors'
+      end
+
+      #  def setup(*args)
+      #    raise NotImplementedError, 'Need to write setup'
+      #  end
+
+      def test_heute_schon_gesendet
+        after Date.new(2008,7,27) do
+          raise NotImplementedError, 'Need to write test_heute_schon_gesendet'
+        end
+      end
+
+    end
+
+    def test_password
+      password = rand(1_000_000).to_s
+      site = Fotolia.new('fotolia')
+      site.password = password
+      assert_equal password, site.password
+  
+      password = rand(1_000_000).to_s
+      site = Zoonar.new('zoonar')
+      site.password = password
+      assert_equal password, site.password
+
+      password = rand(1_000_000).to_s
+      site = Photocase.new('photocase')
+      site.password = password
+      assert_equal password, site.password
+
+      password = rand(1_000_000).to_s
+      site = Dreamstime.new('dreamstime')
+      site.password = password
+      assert_equal password, site.password
+
+      password = rand(1_000_000).to_s
+      site = Bigstockphoto.new('bigstockphoto')
+      site.password = password
+      assert_equal password, site.password
+
+      password = rand(1_000_000).to_s
+      site = Panthermedia.new('panthermedia')
+      site.password = password
+      assert_equal password, site.password
+    end
+
+    def test_password_equals
+      password = rand(1_000_000).to_s
+      site = Fotolia.new('fotolia')
+      site.password = password
+      assert_equal password, site.password
+    
+      password = rand(1_000_000).to_s
+      site = Zoonar.new('zoonar')
+      site.password = password
+      assert_equal password, site.password
+    
+      password = rand(1_000_000).to_s
+      site = Photocase.new('photocase')
+      site.password = password
+      assert_equal password, site.password
+  
+      password = rand(1_000_000).to_s
+      site = Dreamstime.new('dreamstime')
+      site.password = password
+      assert_equal password, site.password
+  
+      password = rand(1_000_000).to_s
+      site = Bigstockphoto.new('dreamstime')
+      site.password = password
+      assert_equal password, site.password
+  
+      password = rand(1_000_000).to_s
+      site = Panthermedia.new('panthermedia')
+      site.password = password
+      assert_equal password, site.password
+    end
+
+    after Date.new(2008,7,25)+10do
+      def test_photos_fuer_heute_uebrig_eh
+        raise NotImplementedError, 'Need to write test_photos_fuer_heute_uebrig_eh'
+      end
+    end
+  
+    def test_zoonar_nur_noch_5_uploads_moeglich
+      site = Mock_Zoonar.new('zoonar',:remaining => 5)
+      photo = Photo.new("test/1234.jpg")
+      assert site.transfer(photo)
+      assert site.transfer(photo)
+      assert site.transfer(photo)
+      assert site.transfer(photo)
+      assert site.transfer(photo)
+      assert_raise(UploadException) {
+        site.transfer(photo)
+      }
+      assert_raise(UploadException) {
+        site.transfer(photo)
+      }
+    end
+  
+  
+    def test_bin_simple
+      after Date.new(2008,7,25)+10 do
+        begin
+          Dir.mkdir 'upload'
+        rescue Errno::EEXIST
+          #ignore
+        end
+        ###leere sendeliste erzeugen
+        File.unlink SENDLIST
+        File.open(SENDLIST, "w") {}
+        FileUtils.cp("IMG_0000.JPG", "upload/1.gif")
+        FileUtils.cp("IMG_0000.JPG", "upload/2.gif")
+        FileUtils.cp("IMG_0000.JPG", "upload/3.gif")
+        expected="sending all unsent photos
+fotolia:upload/1.gif ... OK
+zoonar:upload/1.gif ... OK
+photocase:upload/1.gif ... OK
+fotolia:upload/2.gif ... OK
+zoonar:upload/2.gif ... OK
+photocase:upload/2.gif ... OK
+fotolia:upload/3.gif ... OK
+zoonar:upload/3.gif ... OK
+photocase:upload/3.gif ... OK
+9 photos sent.\n"
+        result = `#{BIN}multistockphoto --send-all --dont-send --dont-log`
+        assert_equal expected, result
+      end
+    end
+  
+    def test_bin_simple_verbose
+      after Date.new(2008,7,26)+10 do
+        begin
+          Dir.mkdir 'upload'
+        rescue Errno::EEXIST
+          #ignore
+        end
+        ###leere sendeliste erzeugen
+        File.unlink SENDLIST
+        File.open(SENDLIST, "w") {}
+        FileUtils.cp("IMG_0000.JPG", "upload/1.gif")
+        FileUtils.cp("IMG_0000.JPG", "upload/2.gif")
+        FileUtils.cp("IMG_0000.JPG", "upload/3.gif")
+        expected="sending all unsent photos
+fotolia:upload/1.gif ... OK
+1:23
+{:fotolia=>1, :photocase=>0, :zoonar=>0}
+zoonar:upload/1.gif ... OK
+1:23
+{:photocase=>0, :fotolia=>1, :zoonar=>1}
+photocase:upload/1.gif ... OK
+1:23
+{:photocase=>1, :fotolia=>1, :zoonar=>1}
+fotolia:upload/2.gif ... OK
+1:23
+{:fotolia=>2, :zoonar=>1, :photocase=>1}
+zoonar:upload/2.gif ... OK
+1:23
+{:fotolia=>2, :zoonar=>2, :photocase=>1}
+photocase:upload/2.gif ... OK
+1:23
+{:fotolia=>2, :zoonar=>2, :photocase=>2}
+fotolia:upload/3.gif ... OK
+1:23
+{:fotolia=>3, :zoonar=>2, :photocase=>2}
+zoonar:upload/3.gif ... OK
+1:23
+{:fotolia=>3, :zoonar=>3, :photocase=>2}
+photocase:upload/3.gif ... OK
+1:23
+{:fotolia=>3, :zoonar=>3, :photocase=>3}
+9 photos sent.\n"
+        result = `#{BIN}multistockphoto --send-all --verbose --dont-send --dont-log`
+        assert_equal expected, result
+      end
+    end
+  
+  
+    def test_bin_no_tags
+      expected = "upload/1.gif\nupload/3.gif\n"
+    
+      result = `#{BIN}multistockphoto --no-tags`
+      assert_equal expected, result
+
+      result = `#{BIN}multistockphoto -q`
+      assert_equal expected, result
+    end
+  
+    def test_sender
+      sender = Sender.new("Thomas Preymesser")
+      assert_kind_of Sender, sender
+    end
+  
+    def test_active_sites
+      sender = Sender.new("Thomas")
+      assert_equal [:fotolia, :zoonar, :photocase, :dreamstime, :bigstockphoto,
+        :panthermedia],
+        sender.active_sites
+    end
+  
+    def test_upload_dir
+      sender = Sender.new("Thomas")
+      assert_equal 'upload', sender.upload_dir
+    end
+  
+    def test_done_dir
+      sender = Sender.new("Thomas")
+      assert_equal 'done', sender.done_dir
+    end
+   
+    def test_bin_nothing_raised_send_all
+      assert_nothing_raised() {
+        puts `#{BIN}multistockphoto --send-all --dont-send --dont-log`
+      }
+      assert_nothing_raised() {
+        puts `#{BIN}multistockphoto --send-all --verbose --dont-send --dont-log`
+      }
+    end
+  
+    def test_list_done
+      result = `#{BIN}multistockphoto --list-done`
+      ret = $?
+      #p result
+      assert ret.exited?
+      assert_equal 0, ret.exitstatus
+    end
+  
+    def test_purge_done
+      result = `#{BIN}multistockphoto --purge-done`
+      ret = $?
+      #p result
+      assert ret.exited?
+      assert_equal 0, ret.exitstatus
+    end
+
+    def test_not_sent
+      result = `#{BIN}multistockphoto --not-sent`
+      ret = $?
+      #p result
+      assert ret.exited?
+      assert_equal 0, ret.exitstatus
+    end
+  
+    def test_can_handle_orientation
+      assert ! Fotolia.can_handle_orientation?
+      assert ! Zoonar.can_handle_orientation?
+      assert ! Photocase.can_handle_orientation?
+      assert ! Panthermedia.can_handle_orientation?
+    end
+  
+    def test_specific_file_sent_to_site
+      after Date.new(2008,7,21)+10 do
+        sender = Sender.new('icke')
+        assert sender.sent_to?("upload/IMG_3333.JPG", :fotolia)
+        assert ! sender.sent_to?("upload/IMG_9999.JPG", :fotolia)
+      end
+    end
+
+    def test_accepted_fileformats
+      #site = Bigstockphoto.new("bigstockphoto")
+      #We accept JPG, EPS, AI, PSD, PDF and PNG file formats.
+      assert Bigstockphoto.accept?("JPG")
+      assert Bigstockphoto.accept?("JPEG")
+      assert Bigstockphoto.accept?("EPS")
+      assert Bigstockphoto.accept?("AI")
+      assert Bigstockphoto.accept?("PSD")
+      assert Bigstockphoto.accept?("PDF")
+      assert Bigstockphoto.accept?("PNG")
+      assert ! Bigstockphoto.accept?("lalala")
+    
+      assert Bigstockphoto.accept?(".JPG")
+      assert Bigstockphoto.accept?(".JPEG")
+      assert Bigstockphoto.accept?(".EPS")
+      assert Bigstockphoto.accept?(".AI")
+      assert Bigstockphoto.accept?(".PSD")
+      assert Bigstockphoto.accept?(".PDF")
+      assert Bigstockphoto.accept?(".PNG")
+      assert ! Bigstockphoto.accept?(".lalala")
+    
+      assert Bigstockphoto.accept?("jpg")
+      assert Bigstockphoto.accept?("Jpeg")
+      assert Bigstockphoto.accept?("eps")
+      assert Bigstockphoto.accept?("ai")
+      assert Bigstockphoto.accept?("psd")
+      assert Bigstockphoto.accept?("pdf")
+      assert Bigstockphoto.accept?("Png")
+      assert ! Bigstockphoto.accept?("Lalala")
+    
+    
+      assert Fotolia.accept?('jpg')
+      assert Fotolia.accept?('jpeg')
+      assert Fotolia.accept?('svg')
+      assert ! Fotolia.accept?('psd')
+    
+    
+    
+    end
+  
+    def test_translated_iptc_file_keywords
+      after Date.new(2008,7,31) do
+        expected = 'Berlin,gwb,flower,bee,traffic'
+        photo = Photo.new(File.join('test','IMG_3602.JPG'))
+        photo.set_keywords(:de,:en)
+        assert_equal expected, photo.file_keywords
+      end
+    end
+  
+    def test_photosize_valid?
+      photo = Photo.new(File.join('test','IMG_3602.JPG'))
+      ALLSITES.each {|site_name|
+        site = eval(site_name.to_s.capitalize+".new(#{site_name.to_s.capitalize})")
+        assert site.photosize_valid?(photo)
+      }
+    end
+
+    def test_shutterstock_object
+      after Date.new(2008,7,25)+10 do
+        site = Shutterstock.new('Shutterstock')
+        assert_kind_of Shutterstock, site
+      end
+    end
+    def test_istockphoto_object
+      after Date.new(2008,7,25)+10 do
+        site = Istockphoto.new('iStockphoto')
+        assert_kind_of Istockphoto, site
+      end
+    end
+    def test_stockxpert_object
+      after Date.new(2008,7,25)+10 do
+        site = Stockxpert.new('StockXpert')
+        assert_kind_of Stockxpert, site
+      end
+    end
+    def test_123rf_object
+      after Date.new(2008,7,25)+10 do
+        site = Einszweidreirf.new('123rf')
+        assert_kind_of Einszweidreirf, site
+      end
+    end
+
+    def test_panthermedia_object
+      site = Panthermedia.new('Panthermedia')
+      assert_kind_of Panthermedia, site
+    end
+
+    def test_fineartprint
+      flunk "http://www.fineartprint.de noch implementieren"
+    end
+
+  end # after
+  
+end
+