multistockphoto 0.3.0 → 0.5.0

data/lib/multistockphoto/site_fotolia.rb

@@ -4,7 +4,9 @@ include Grep
 
 class Fotolia < GenericSite
   
-  attr_accessor :ftp_user, :ftp_password
+  @@errors = 0
+  
+  attr_accessor :ftp_user, :ftp_password, :max_errors
   
   FTP_HOST = 'submit.fotolia.com'
     
@@ -13,18 +15,16 @@ class Fotolia < GenericSite
     super
     if ENV['MSP_CONFIG']
       @config = YAML.load_file(ENV['MSP_CONFIG'])
-      #p "meine config: #{ENV['MSP_CONFIG']}"
     else
-      #p "standard config"
       @config = YAML.load_file("config.yaml")
     end
     @user = @config[:fotolia][:user]
     @password = @config[:fotolia][:password]
     @ftp_user = @config[:fotolia][:ftp_user]
     @ftp_password = @config[:fotolia][:ftp_password]
-    # kann vom Client ueberschrieben werden
+    @total_per_day = @config[:fotolia][:total_per_day]
   end
-
+  # TODO: Bild gedreht senden, falls Hochformat
   def transfer(photo)
     # falls nicht in config Datei eingetragen dann nicht senden
     if @user == nil or @password == nil
@@ -42,11 +42,14 @@ class Fotolia < GenericSite
     print "fotolia:#{photo.filename} ... "
     $stdout.flush
     #g = `grep "fotolia\t#{photo.filename}" sendeliste.dat` #TODO: will not work for windows
-    g = grep("sendeliste.dat", /fotolia\t#{photo.filename}/)
+    g = grep(SENDELISTE, /fotolia\t#{photo.filename}/)
     if g.size > 0
       puts "already sent"
       return :duplicate
     end
+    if photo.portrait
+      photo.drehen
+    end
     ftp = Net::FTP.new(FTP_HOST)
     ftp.login(@ftp_user,@ftp_password) 
     files=ftp.list('*')
@@ -54,11 +57,43 @@ class Fotolia < GenericSite
     files=ftp.list('*')
     #p files
     ftp.close
+    #Test auf Fehler?
+    #    if rand(100) == 42
+    #      @@errors += 1
+    #      if @@errors > max_errors
+    #        raise "too many errors"
+    #      end
+    #    end
+    @@errors = 0
     puts 'OK'
     #    `echo "fotolia\t#{photo.filename}\t#{Time.now}" >>sendeliste.dat` #TODO:
-    File.open('sendeliste.dat','a') {|f|
+    File.open(SENDELISTE,'a') {|f|
       f.puts "fotolia\t#{photo.filename}\t#{Time.now}"
     }
     true
   end
+  
+  def total_per_day
+    @total_per_day
+  end
+  
+  def sent_today
+    site = 'fotolia'
+    return sent_today_site(site)
+  end
+
+  def already_sent?(photo)
+    unless photo.class == Photo
+      raise 'not a Photo object'
+    end
+    unless File.exist?(photo.filename)
+      raise "file #{photo.filename} does not exist"
+    end
+    g = grep(SENDELISTE, /fotolia\t#{photo.filename}/)
+    if g.size > 0
+      return true
+    else
+    return false
+    end
+  end
 end

data/lib/multistockphoto/site_photocase.rb

@@ -4,8 +4,8 @@ require 'grep'
 include Grep
 
 class Photocase < GenericSite
-  
-  attr_accessor :user, :password
+  @@errors = 0
+  attr_accessor :user, :password,  :max_errors
   
   def initialize(name)
     super
@@ -16,6 +16,7 @@ class Photocase < GenericSite
     end
     @user = @config[:photocase][:user]
     @password = @config[:photocase][:password]
+    @total_per_day = @config[:photocase][:total_per_day]
   end
   
   def transfer(photo)
@@ -33,12 +34,12 @@ class Photocase < GenericSite
     end
     print "photocase:#{photo.filename} ... "
     $stdout.flush
-    g = grep("sendeliste.dat", /photocase\t#{photo.filename}/)
+    g = grep(SENDELISTE, /photocase\t#{photo.filename}/)
     if g.size > 0
       puts 'already sent'
       return :duplicate
     end
-    if photo.hochformat
+    if photo.portrait
       photo.drehen
     end
     agent = WWW::Mechanize.new
@@ -59,11 +60,11 @@ class Photocase < GenericSite
     page = agent.click page.links.text('Upload')
     raise "no Upload a photo" if ! page.body.include?('Upload a photo')
     form = page.form('Form')
-    if photo.hochformat
+    if photo.portrait
       
       b = File.basename(photo.filename)
       newfilename = photo.filename.sub(b,'')+'rot_'+b
-#      form.file_uploads.first.file_name = 'r' + photo.filename
+      #      form.file_uploads.first.file_name = 'r' + photo.filename
       form.file_uploads.first.file_name = newfilename
     else
       form.file_uploads.first.file_name = photo.filename
@@ -79,16 +80,47 @@ class Photocase < GenericSite
       raise "not successfully uploaded"
     end
     if page.body.include?('Your photo was uploaded successfully.')
+      @@errors = 0
       puts "OK"
+    else
+      #Fehler aufgetreten
+      @@errors += 1
+      if @@errors > 3
+        raise "too many errors"
+      end
     end
     #'Your photo was uploaded successfully.'
     if sav_photo_filename != photo.filename
       raise "photo.filenames has been changed!"
     end
     
-    File.open('sendeliste.dat','a') {|f|
+    File.open(SENDELISTE,'a') {|f|
       f.puts "photocase\t#{photo.filename}\t#{Time.now}"
     }
     true
   end
+  
+  def total_per_day
+    @total_per_day
+  end
+
+  def sent_today
+    site = 'photocase'
+    return sent_today_site(site)
+  end
+  
+  def already_sent?(photo)
+    unless photo.class == Photo
+      raise 'not a Photo object'
+    end
+    unless File.exist?(photo.filename)
+      raise "file #{photo.filename} does not exist"
+    end
+    g = grep(SENDELISTE, /photocase\t#{photo.filename}/)
+    if g.size > 0
+      return true
+    else
+    return false
+    end
+  end
 end

data/lib/multistockphoto/site_zoonar.rb

@@ -7,7 +7,7 @@ class Zoonar < GenericSite
   
   @@errors = 0
   
-  attr_accessor :user, :password
+  attr_accessor :user, :password, :max_errors
   
   def initialize(name)
     super
@@ -18,8 +18,10 @@ class Zoonar < GenericSite
     end
     @user = @config[:zoonar][:user]
     @password = @config[:zoonar][:password]
+    @total_per_day = @config[:zoonar][:total_per_day]
   end
 
+  # TODO: Bild gedreht senden, falls Hochformat
   def transfer(photo)
     # falls nicht in config Datei eingetragen dann nicht senden
     if @user == nil or @password == nil
@@ -35,11 +37,14 @@ class Zoonar < GenericSite
     print "zoonar:#{photo.filename} ... "
     $stdout.flush
     #    g = `grep "zoonar\t#{photo.filename}" sendeliste.dat` #TODO: will not work for windows
-    g = grep("sendeliste.dat", /zoonar\t#{photo.filename}/)
+    g = grep(SENDELISTE, /zoonar\t#{photo.filename}/)
     if g.size > 0
       puts 'already sent'
       return :duplicate
     end
+    if photo.portrait
+      photo.drehen
+    end
     agent = WWW::Mechanize.new
     agent.user_agent_alias = 'Linux Mozilla'
     page = agent.get 'http://www.zoonar.de'
@@ -61,7 +66,7 @@ class Zoonar < GenericSite
         raise "Bild zu klein. Muss mind. 6 MP sein"
       else
         @@errors += 1
-        if @@errors > 3
+        if @@errors > max_errors
           raise "too many errors"
         end
         raise "Fehler beim Upload"
@@ -92,9 +97,33 @@ Falls wir das Bild ablehnen sollten, werden Sie eine Benachrichtigung per E-Mail
    
     #`echo "zoonar\t#{photo.filename}\t#{Time.now}" >>sendeliste.dat` #TODO:
     
-    File.open('sendeliste.dat','a') {|f|
+    File.open(SENDELISTE,'a') {|f|
       f.puts "zoonar\t#{photo.filename}\t#{Time.now}"
     }
     true
   end
+  
+  def total_per_day
+    @total_per_day
+  end
+  
+  def sent_today
+    site = 'zoonar'
+    return sent_today_site(site)
+  end
+  
+  def already_sent?(photo)
+    unless photo.class == Photo
+      raise 'not a Photo object'
+    end
+    unless File.exist?(photo.filename)
+      raise "file #{photo.filename} does not exist"
+    end
+    g = grep(SENDELISTE, /zoonar\t#{photo.filename}/)
+    if g.size > 0
+      return true
+    else
+    return false
+    end
+  end
 end

data/lib/multistockphoto/version.rb

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

data/test/test_multistockphoto.rb

@@ -2,6 +2,8 @@ require File.dirname(__FILE__) + '/test_helper.rb'
  
 require 'grep'
 include Grep
+#require 'RMagick'
+#include Magick
 
 class TestMultistockphoto < Test::Unit::TestCase
 
@@ -23,7 +25,7 @@ class TestMultistockphoto < Test::Unit::TestCase
   end
   
   def test_bin_help
-    expected = "Usage: multistockphoto [-vatsor]
+    expected = "Usage: multistockphoto [-vayntsorx]
 
 Specific options:
 
@@ -31,10 +33,13 @@ Common options:
         --help                       Show this message
     -v, --version                    Show version
     -a, --send-all                   Send all files
+    -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
     -o, --check-orientation          displays the orientiation of photo files
-    -r, --rotate                     rotate a photo file 90 degrees to the left\n"
+    -r, --rotate                     rotate a photo file 90 degrees to the left
+    -x, --stats                      Displays statistics\n"
     result = `#{BIN}multistockphoto -h`
     assert_equal expected, result
     result = `#{BIN}multistockphoto --help`
@@ -42,7 +47,7 @@ Common options:
   end
 
   def test_bin_version
-    expected = "multistockphoto 0.2.0\n"
+    expected = "multistockphoto 0.4.0\n"
     result = `#{BIN}multistockphoto -v`
     assert_equal expected, result
     result = `#{BIN}multistockphoto --version`
@@ -68,9 +73,7 @@ sending foto1.jpg ... OK
 sending foto2.jpg ... OK
 sending foto3.jpg ... OK
       "
-
       output = `system bin/multistockphoto --transfer-all`
-   
       assert_equal expected, output 
     end  
   end
@@ -191,7 +194,7 @@ sending foto3.jpg ... OK
   end
   
   def test_aldi
-    after Date.new(2008,5,15) do
+    after Date.new(2008,5,30) do
       site = Aldi.new("ALDI")
     
       assert_kind_of Aldi, site
@@ -209,7 +212,7 @@ sending foto3.jpg ... OK
   end
   
   def test_aldi_transfer
-    after Date.new(2008,5,15) do
+    after Date.new(2008,5,30) do
       site = Aldi.new("ALDI")
       photo = Photo.new("/media/LACIE/private/CF-Card/DCIM/119CANON/IMG_3267_zugeschnitten_blank_names.jpg")
       site.transfer(photo)
@@ -254,7 +257,7 @@ sending foto3.jpg ... OK
   end
 
   def test_config_params_pixelio
-    after Date.new(2008,5,15) do
+    after Date.new(2008,5,30) do
       pixelio = Pixelio.new("Pixelio Site")
       assert pixelio.user
       assert pixelio.password
@@ -266,7 +269,101 @@ sending foto3.jpg ... OK
   end
 
 
+  def DONT_test_iptc_data
+
+    pic = ImageList.new("test/IMG_3602.JPG")
+    puts pic.orientation
+
+
+    pic.each_iptc_dataset { |dataset, data_field| 
+      p dataset
+      p data_field
+    } 
+    
+    p pic.get_iptc_dataset(Magick::IPTC::Application::Keywords)
+    # assert ['aaa'], rmagicphoto.iptc
+    assert true
+  end
   
   #Shutterstock, iStockphoto , StockXpert , Dreamstime , Bigstockphoto , 123rf und Panthermedia finden Sie auf unserer Partnerseite Fotos kaufen.de
+
+  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
+  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
+    expected = ['Berlin','gwb','Blume','Biene']
+    photo = Photo.new(File.join('test','IMG_3602.JPG'))
+    photo.set_keywords
+    assert_equal expected, photo.keywords 
+  end
+
+  def test_iptc_file_keywords
+    expected = 'Berlin gwb Blume Biene'
+    photo = Photo.new(File.join('test','IMG_3602.JPG'))
+   
+    photo.set_keywords
+    assert_equal expected, photo.file_keywords 
+  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

data/website/index.html

@@ -33,7 +33,7 @@
     <h1>multistockphoto</h1>
     <div id="version" class="clickable" onclick='document.location = "http://rubyforge.org/projects/multistockphoto"; return false'>
       <p>Get Version</p>
-      <a href="http://rubyforge.org/projects/multistockphoto" class="numbers">0.3.0</a>
+      <a href="http://rubyforge.org/projects/multistockphoto" class="numbers">0.5.0</a>
     </div>
     <h1>&#x2192; &#8216;multistockphoto&#8217;</h1>
 
@@ -161,38 +161,6 @@ können.</p>
 schon vor des Hochladen überprüft werden. Dies ist jedoch noch nicht implementiert.</p>
 
 
-	<h3>fotolia.de</h3>
-
-
-	<p>Beispiel: Bei fotolia.de mußt du deine Photos hochladen, dann noch Stichworte
-und verschiedene Vertragsbedingungen festlegen. Dann erst werden deine Bilder
-geprüft und entweder angenommen oder abgelehnt.</p>
-
-
-	<h3>zoonar.de</h3>
-
-
-	<p>Bei zoonar.de wiederum läuft es so, daß du erst nur die Bilder hochlädst, dann 
-werden sie begutachtet; angenommen oder abgelehnt und erst wenn sie 
-angenommen wurden, kannst du Schlagworte vergeben. Dies hat natürlich den
-Vorteil, daß man für abgelehnte Photos erst gar keine Schlagworte vergeben muß
-(kann).</p>
-
-
-	<h3>photocase.de</h3>
-
-
-	<p>Bei photocase.de lädst du ebenfalls zuerst deinen Photos hoch, diese werden
-dann entweder angenommen oder abgelehnt. Bei angenommenen Bilder bearbeitest
-du diese auf deren Seite weiter (eigentlich wie bei zoonar.de). Als nettes
-Gimmick bei photocase kannst du bei deinen Photos sehen, an welchem Platz
-sie sich aktuell in der Warteschlage der zu begutachtenden Photos befinden.</p>
-
-
-	<p><i>Click on the Browse button to search your computer for the photo you’d like to upload. We accept <span class="caps">JPG</span> and <span class="caps">TIFF</span> files. Please pay close attention to the minimum resolution requirement of 1600&#215;1200 pixels, the image quality (e.g. not overly compressed) and the content of the image itself (e.g. it does not contain any material that you don’t hold the copyright to).
-</i></p>
-
-
 	<h2>Demonstration of usage</h2>
 
 
@@ -237,6 +205,72 @@ Starte dann einfach das Programm am nächsten Tag noch einmal, um den Rest der
 Photos hochzuladen!</p>
 
 
+	<p>Statistik über gesendete Photos</p>
+
+
+	<p>Der Schalter&#8212;stats zeigt ein Statistik über die Anzahl der gesendeten Photos
+innerhalb der letzten 10 Tage, aufgeteilt nach Site.
+Außerdem eine Summenzeile über alle bisher gesendeten Photos. Achtung: Diese
+Summen beziehen sich nicht auf die letzen zuvor aufgelisteten Tage sondern auf
+sämtliche bisher gesendeten Photos.</p>
+
+
+<pre>
+$ multistockphoto --stats
+Statistics
+           | fotolia | zoonar | photocase | total
+2008-05-23 |       0 |      0 |         0 |      0
+2008-05-22 |       7 |      7 |         7 |     21
+2008-05-21 |       4 |      4 |         3 |     11
+2008-05-20 |       7 |      6 |         6 |     19
+2008-05-19 |       5 |      9 |         5 |     19
+2008-05-18 |       6 |      6 |         6 |     18
+2008-05-17 |       7 |      7 |         7 |     21
+2008-05-16 |       7 |      7 |         6 |     20
+2008-05-15 |       6 |      6 |         6 |     18
+2008-05-14 |       0 |      1 |         1 |      2
+
+total      |     251 |    174 |       250 |    675
+</pre>
+
+	<p>Auflisten aller komplett gesendeten Photos</p>
+
+
+	<p>Um Photos aufzulisten, die bereits an alle Photo-Sites gesendet wurden, gibt
+es den Schalter&#8212;list-done</p>
+
+
+	<p>Verschieben aller komplett gesendeten Photos ins done-Directory</p>
+
+
+	<p>Falls du Photos aus dem Arbeitsdirectory löschen möchtest (aus Platzgründen oder
+weil du alte Dateien dort nicht mehr haben willst), die bereits an alle
+definierten Sites gesendet wurden, rufe</p>
+
+
+<pre>
+multistockphoto --purge-done
+</pre>
+
+	<p>auf!</p>
+
+
+	<p>Daraufhin werden alle komplett gesendeten Photos ins Directory &#8216;done&#8217; verschoben.
+Das done-Directory wird automatisch angelegt, falls es noch nicht existiert.</p>
+
+
+	<p>Die Dateien im done-Directory kannst du nun entweder löschen oder, je nach 
+Bedarf irgendwie archivieren.</p>
+
+
+	<p>Bitte beachte aber, daß, falls du später eine weitere Photo-Site definierst,
+diese alten Bilder nicht mehr an die neue Photo-Site geschickt werden. Falls
+du sie jedoch im Arbeitsverzeichnis beläßt, werden auch diese alten Bilder 
+an eventuelle neue Photo-Sites versendet.
+Du kannst aber jederzeit die verschobenen oder archivierten Bilder wieder ins
+Arbeitsverzeichnis kopieren. Bereits erfolgte Uploads werden davon nicht beeinflußt.</p>
+
+
 	<h3>Hoch- und Querformat</h3>
 
 
@@ -278,6 +312,53 @@ wurde, dann drehe das Bild vor dem Hochladen mit dem Schalter &#8216;&#8212;rota
 einen anderen Programm, welches Bilde drehen kann!</p>
 
 
+	<h2>Bisher realisierte Sites</h2>
+
+
+	<p>Diese Programm arbeitet zum gegenwärtigen Zeitpunkt mit den im folgenden 
+beschriebenen Photo-Sites zusammen. Weitere sind geplant. Wenn du weitere Sites
+realisiert haben möchtest, schreib mir!</p>
+
+
+	<p>Ebenso bin ich auch bereit (exklusive) kommerzielle Entwicklung für weitere Sites 
+anzubieten.</p>
+
+
+	<h3>fotolia.de</h3>
+
+
+	<p>Bei fotolia.de lädst du deine Fotos hoch. Anschließend mußt du noch Stichworte
+vergeben und zu jedem Bild angeben, mit welcher Lizenz dieses angeboten werden
+soll. Erst dann werden deine Bilder begutachtet und entweder angenommen oder
+abgelehnt.</p>
+
+
+	<h3>zoonar.de</h3>
+
+
+	<p>Bei zoonar.de wiederum läuft es so, daß du zuerst nur die Bilder hochlädst, dann 
+werden sie begutachtet; angenommen oder abgelehnt und erst wenn sie 
+angenommen wurden, kannst du Schlagworte vergeben. Dies hat natürlich den
+Vorteil, daß man für abgelehnte Photos erst gar keine Schlagworte vergeben muß
+(kann).
+Mein Shop bei Zoonar ist übrigens unter http://www.zoonar.de/shop/thopre zu 
+zu erreichen. Kauft fleißig bei mir ein! ;-)</p>
+
+
+	<h3>photocase.de</h3>
+
+
+	<p>Bei photocase.de lädst du ebenfalls zuerst deine Photos hoch, diese werden
+dann entweder angenommen oder abgelehnt. Bei angenommenen Bilder bearbeitest
+du diese auf deren Seite weiter (eigentlich wie bei zoonar.de). Als nettes
+Gimmick bei photocase kannst du bei deinen Photos sehen, an welchem Platz
+sie sich aktuell in der Warteschlage der zu begutachtenden Photos befinden.</p>
+
+
+	<p><i>Click on the Browse button to search your computer for the photo you’d like to upload. We accept <span class="caps">JPG</span> and <span class="caps">TIFF</span> files. Please pay close attention to the minimum resolution requirement of 1600&#215;1200 pixels, the image quality (e.g. not overly compressed) and the content of the image itself (e.g. it does not contain any material that you don’t hold the copyright to).
+</i></p>
+
+
 	<h2>Forum</h2>
 
 
@@ -345,7 +426,7 @@ rake install_gem</pre>
 	<p>Comments are welcome. Send an email to <a href="mailto:thopre@gmail.com">Thomas Preymesser</a> email 
 or via the <a href="http://groups.google.com/group/multistockphoto">forum</a></p>
     <p class="coda">
-      <a href="FIXME email">FIXME full name</a>, 10th May 2008<br>
+      <a href="FIXME email">FIXME full name</a>, 26th May 2008<br>
       Theme extended from <a href="http://rb2js.rubyforge.org/">Paul Battley</a>
     </p>
 </div>