gf-ralbum 0.0.2

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 gf
+
+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,80 @@
+= RAlbum
+
+I have started this personal project about two years ago. Never completed.
+
+I wish to try ruby and ruby environment github/rubyforge/gem and I have retrieved this
+old code for not start f
+So if you are interested let me finish review (and rewrite) this code, 
+write some docs in english, ...
+
+== DESCRIPTION:
+
+RAlbum si basa su tre componenti
+  * PhotoTree e' la gerarchia di come sono organizzate le foto
+              in questo albero sono inserite le foto
+  * AlbumTree e' la gerarchia di come sono organizzate gli album
+              in questo albero sono inserite le immagini
+  * Catalog e' il database delle foto e delle immagini
+
+Da una foto e' possibile ricavare piu' immagini p.e. la thumbnail, quella a dimensione media,
+quella a dimensione piu' grande.
+
+Un PhotoTree puo' essere ricavato dalle directory dal file-system, oppure leggendo da
+un catalogo di un database di immagini come AcdSee, oppure dalle virtual directory di JAlbum
+
+Dalle foto si ricavano le immagini. Le immagini sono le foto ridimensionate.
+L'insieme delle immagini ridimensionate si chiama ImagePool
+
+
+Il PhotoTree supportato ha il seguente formato
+    # PhotoTree
+    # are albums organizated into the filesystem
+    #
+    # root
+    #  |-----alb 1
+    #  |       |---alb 1.1
+    #  |       |---alb 1.2
+    #  |            |---alb 1.2.1
+    #  |-----alb 2
+    #  |       |--alb 2.1
+    #
+    # In every subdir there are photos
+    #  ab x.y.z
+    #   |---- 05_photo.jpg
+    #         05_photo.jpg.xml
+    #
+
+
+Altri PhotoTree
+    # Web PhotoTree,
+    #
+    # it is usefull to generare a catalog of images found in web sites
+    #
+    # A Web phototree on disk is a
+    # root
+    #  |
+    #  |--website1_mirror
+    #  |     |-------- subdirs where are found images
+    #  |--website2_mirror
+    #        |-------- subdirs where are found images
+    #
+
+
+== SYNOPSIS:
+
+  FIX (code sample of usage)
+
+== REQUIREMENTS:
+
+* ralbum-common
+* rmagick
+* imagesize
+* kwartz
+
+== INSTALL:
+
+* sudo gem install ralbum
+
+== Copyright
+
+Copyright (c) 2009 gf. See LICENSE for details.

data/bin/ralbum-JPG2jpg.rb

@@ -0,0 +1,90 @@
+#!/usr/bin/env ruby
+
+$RALBUM_HOME = File.expand_path( File.join( File.dirname( __FILE__), ".." ) )
+$:.unshift( File.join($GALLERIES_HOME, "lib" ) )
+
+# ruby
+require 'fileutils'
+require 'optparse'
+require 'ostruct'
+
+# rubyalbum
+require "ralbum/config"
+require "ralbum/recursive_run"
+
+
+def mymove( srcpath, destpath )
+  if $options.usetempfile
+    # find a best name for tempfile
+    temppath = File.dirname( destpath ) + File::Separator + "tempfile"
+    FileUtils::move( srcpath, temppath )
+    FileUtils::move( temppath, destpath )
+  else
+    FileUtils::move( srcpath, destpath )
+  end
+end
+
+def run( dir )
+  begin
+    Dir.entries( dir ).each { |filename|
+      next unless filename =~ /\.JPG$/
+      new_filename = filename.gsub( /\.JPG$/, ".jpg" )
+      inpath = dir + File::Separator + filename;
+      newpath = dir + File::Separator + new_filename
+      mymove( inpath, newpath )
+      puts "in #{dir}: #{filename} -> #{new_filename}"
+    }
+  rescue ArgumentError => e
+    puts "ERROR : " + e
+    puts "If you are using a fat32 filesystem try options -t"
+  rescue Errno::ENOENT => e
+    puts "ERROR : " + e
+  end
+end
+
+###################################################################################
+# Main
+
+$config = Config.new
+
+$options = OpenStruct.new
+$options.force = false
+$options.verbose = 0
+$options.recursive = false
+$options.usetempfile = false
+
+opts = OptionParser.new do |opts|
+  opts.banner =
+       "Usage: #{File.basename($0)} <directory>\n" +
+       "Rename file.JPG in file.jpg"
+   opts.on("-v", "--verbose [NUM]", Integer, "verbosity level") { |num|
+    if num.nil?
+      $options.verbose = 1
+    else
+      $options.verbose = num
+    end
+  }
+  opts.on("-r", "--recursive", "recusive in subdirectories") {
+    $options.recursive = true
+  }
+  opts.on("-t", "--usetempfile", "rename first to temp file and then to dest file") {
+    $options.usetempfile = true
+  }
+  opts.on("--help", "-h", "help!") {
+    puts opts
+    exit 0
+  }
+end
+opts.parse!(ARGV)
+
+unless ARGV[0]
+  puts opts
+  exit 1
+end
+
+input_dir = ARGV[0]
+if $options.recursive
+  recursive_run( input_dir ) { |d| run d }
+else
+  run input_dir
+end

data/bin/ralbum-compile_skins.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+# stdlib
+require "pp"
+
+# ralbum
+$RALBUM_HOME = File.expand_path( File.join( File.dirname( __FILE__), ".." ) )
+$:.unshift( File.join($RALBUM_HOME, "lib" ) )
+require "common/kwartzhelper"
+
+# html skins
+%w{ gfold js cgi }.each{ |skin| 
+  skin_dir              = File.join( $RALBUM_HOME, "lib", "ralbum", "skins", skin )
+  skin_template_dir     = File.join( skin_dir, "template" )
+  skin_template_include = File.join( skin_dir, "inc" )
+  skin_template_out     = File.join( skin_dir, "out" )
+  compile( skin_template_dir, skin_template_include, skin_template_out )
+}
+

data/bin/ralbum-myconv.rb

@@ -0,0 +1,81 @@
+#!/usr/bin/env ruby
+
+# ruby
+require 'ostruct'
+require 'optparse'
+require 'fileutils'
+
+# ralbums
+$RALBUM_HOME = File.expand_path( File.join( File.dirname( __FILE__), ".." ) )
+$:.unshift( File.join($GALLERIES_HOME, "lib" ) )
+
+require "ralbum/recursive_run"
+
+
+def run( dir )
+  Dir.entries(dir).each { |filename|
+    next unless filename =~ /\.jpg$/
+    next if filename =~ /.+-.+\.jpg/
+
+    new_filename =
+      File.basename( filename, ".jpg" ) +
+     "-" + $options.geometry + "_" + $options.quality + ".jpg"
+
+    inpath  = dir + File::Separator + filename
+    outpath = dir + File::Separator + new_filename
+
+    puts "#{dir}: #{filename} -> #{new_filename}"
+    system("convert",
+           "-geometry", $options.geometry,
+           "-quality", $options.quality,
+           inpath,
+           outpath)
+    # remove exif header and comment
+    `jhead -de -dc #{outpath}`
+  }
+end
+
+
+$options = OpenStruct.new
+$options.geometry = "1024x768"
+$options.quality = "85"
+$options.verbose = 0
+$options.recursive = false
+
+opts = OptionParser.new do |opts|
+  opts.banner = "Usage: #{File.basename($0)} "
+  opts.on("-f", "--force", "force the creation of directory") {
+    $options.force = true
+  }
+  opts.on("-v", "--verbose [NUM]", Integer, "verbosity level") { |num|
+    if num.nil?
+      $options.verbose = 1
+    else
+      $options.verbose = num
+    end
+  }
+  opts.on("-q", "--quality NUM", Integer, "jpeg quality") { |num|
+    $options.quality = num.to_s
+  }
+  opts.on("-r", "--recursive", "recursive") {
+    $options.recursive = true
+  }
+  opts.on("--help", "-h", "help!") {
+    puts opts
+    exit 0
+  }
+end
+opts.parse!(ARGV)
+
+
+unless ARGV[0]
+  puts "#{File.basename __FILE__} <directory>"
+  puts "Create xml description file for jpg images"
+  exit 1
+end
+input_dir = ARGV[0]
+if $options.recursive
+  recursive_run( input_dir ) { |d| run d }
+else
+  run input_dir
+end

data/bin/ralbum-readexif.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+
+# ralbums
+$RALBUM_HOME = File.expand_path( File.join( File.dirname( __FILE__), ".." ) )
+$:.unshift( File.join($GALLERIES_HOME, "lib" ) )
+
+# rubyalbums
+require "ralbum/readexif.rb"
+
+if ARGV.length < 1
+  puts "#{File.basename __FILE__} <photo>"
+  puts "Read exif data"
+  exit 1
+end
+
+r = ExifReader.new
+r.read_exif( ARGV[0] )
+r.print

data/bin/ralbum-reorder.rb

@@ -0,0 +1,200 @@
+#!/usr/bin/env ruby
+
+# ralbums
+$RALBUM_HOME = File.expand_path( File.join( File.dirname( __FILE__), ".." ) )
+$:.unshift( File.join($GALLERIES_HOME, "lib" ) )
+
+# ruby
+require "fileutils"
+require 'optparse'
+require 'ostruct'
+require "rexml/document"
+include REXML
+
+# rubyalbum
+require "ralbum/config"
+require "ralbum/recursive_run"
+
+
+#
+# rename file contained in dir from oldname in newname
+# return true if successfull
+#
+def rename( dir, old_filename, new_filename )
+
+  return true if old_filename == new_filename
+  #
+  # prevedere il caso in cui il new_file sia gia' presente
+  # rinominare new_file in un file temporaneo
+  #
+  old_path = dir + File::Separator + old_filename
+  new_path = dir + File::Separator + new_filename
+
+  if File.exist?( new_path )
+    return false
+  end
+  puts "in #{dir}: #{old_filename} -> #{new_filename}" if $options.ralbum_verbose > 1
+  FileUtils::move( old_path, new_path )
+  return true
+end
+
+#
+# rename a set of file
+# h contains h[ old_filename ] => new_filename
+#
+def rename_hash( dir, h )
+  files_renamed = true
+  while files_renamed and h.length > 0
+    files_renamed = false
+    delete_key = []
+    h.each { |old_filename, new_filename|
+      if rename( dir, old_filename, new_filename )
+        files_renamed = true
+        delete_key << old_filename
+      end
+    }
+    delete_key.each { |k| h.delete( k ) }
+  end
+
+  if h.length > 0
+    puts "WARNING: Some file are not renamed!!!!"
+    h.each { |old,new|
+      puts "#{old} => #{new}"
+    }
+  end
+end
+
+
+
+def run( dir )
+
+  doc = nil
+  xml_path = dir + File::Separator + "album.xml"
+  if File.exist?( xml_path )
+    doc = REXML::Document.new File.new( xml_path )
+    oldthumbnail = doc.elements["album/thumbnail"].text.to_s
+    puts "THUMBNAIL: " + oldthumbnail if $options.ralbum_verbose > 0
+  end
+
+  #
+  # The filename are separated in block
+  # the block name is the filename until the first point
+  # i.e.
+  #
+  # block 05_piazza:
+  #    05_piazza.jpg
+  #    05_piazza.jpg.xml
+  #
+  # block 10_piazza:
+  #    10_piazza.jpg.xml
+  #    10_piazza.e.jpg
+  #    10_piazza.jpg
+  #
+  blocks = { }
+  Dir.entries( dir ).each { |filename|
+    next if filename == "." or filename == ".."
+    md = /\A([^\.]+)\./.match( filename )
+    if md.nil?
+      puts "can't find blockname for #{filename}"
+      next
+    end
+    # puts md[1] + " " + md.post_match
+    blockname = md[ 1 ]
+    unless blocks.key?( blockname )
+      blocks[ blockname ] = []
+    end
+    blocks[ blockname ] << filename
+  }
+
+  # rename a block
+  # and build hask old_filename -> new_filename
+  h = {}
+  i = 1
+  blocks.keys.sort.each { |blockname|
+
+    block = blocks[ blockname ]
+    # don't rename block that not contain a jpg image
+    next unless block.find { |filename| filename =~ /\.jpg$/ }
+    new_blockname = sprintf( "%03d", i * $options.step ) + "_" + blockname.gsub(/^(\d)+_/, "")
+    if blockname != new_blockname
+      puts "block rename #{blockname} => #{new_blockname}" if $options.ralbum_verbose > 0
+
+      #
+      # creo un hashtable dal vecchio nuovo al nuovo
+      # e poi rinomino i file singolarmente
+      # puo' succedere che per qualche motivo non riesco a rinominare
+      # un file in un blocco anche se riesco a rinominare gli altri file
+      # prevedere di rinominare un blocco come operazione atomica
+      #
+
+      block.each { |old_filename|
+        new_filename = sprintf( "%03d", i * $options.step ) + "_" + old_filename.gsub(/^(\d)+_/, "")
+        #puts "\t #{old_filename} => #{new_filename}"
+        h[ old_filename ] = new_filename
+      }
+    end
+    i += 1
+  }
+
+  unless doc.nil?
+    newthumbnail = h[ oldthumbnail ]
+    if not newthumbnail.nil? and newthumbnail != oldthumbnail
+      puts "THUMBNAIL: #{oldthumbnail} => #{newthumbnail}" if $options.ralbum_verbose > 0
+      doc.elements["album/thumbnail"].text = newthumbnail
+      File.open( xml_path, "w" ) { |f|
+        doc.write( f, 0 )
+      }
+    end
+  end
+
+  rename_hash( dir, h )
+
+end
+
+###################################################################################
+# Main
+
+$config = Config.new
+
+$options = OpenStruct.new
+$options.force = false
+$options.verbose = 0
+$options.recursive = false
+$options.step = 10
+
+opts = OptionParser.new do |opts|
+  opts.banner =
+       "Usage: #{File.basename($0)} <directory>\n" +
+       "Rename images and xml descritors"
+   opts.on("-v", "--verbose [NUM]", Integer, "verbosity level") { |num|
+    if num.nil?
+      $options.verbose = 1
+    else
+      $options.verbose = num
+    end
+  }
+  opts.on("-r", "--recursive", "recusive in subdirectories") {
+    $options.recursive = true
+  }
+  opts.on("-s", "--step NUM", "step (default 10)") { |num|
+    $options.step = num
+  }
+
+  opts.on("--help", "-h", "help!") {
+    puts opts
+    exit 0
+  }
+end
+opts.parse!(ARGV)
+
+unless ARGV[0]
+  puts opts
+  exit 1
+end
+
+input_dir = ARGV[0]
+if $options.recursive
+  recursive_run( input_dir ) { |d| run d }
+else
+  run input_dir
+end