Piggy 0.4.2.2

data/lib/piggy-gui/filtered_file_list.rb

@@ -0,0 +1,243 @@
+require 'set'
+require 'piggy-core/environment'
+require 'piggy-core/winshell'
+require 'piggy-gui/require-fox'
+
+# Allows to choose from a predefined set of files in the list.
+# The definition of choosable files may be given as a block.
+# Chosen, unchosen and unchoosable files are rendered differently.
+class FilteredFileList < Fox::FXFileList
+  include Fox  
+  include Responder
+  
+  attr_reader(:chosenFiles)
+  attr_writer(:choosable)
+  
+  def initialize(parent)
+    super(parent, nil, 0, ICONLIST_MINI_ICONS|ICONLIST_AUTOSIZE)
+    @imageProcessor = ImageProcessor.new(getApp)
+    @chosenFiles = Set.new
+    @choosable = proc { |file| true }
+    @shell = WinShell.instance
+    initIcons
+  end
+  
+  def initIcons
+    @checkedIcon = getIcon("checked.ico")
+    @uncheckedIcon = getIcon("unchecked.ico")
+  end
+  
+  def getIcon(filename)
+    iconPath = File.join(PIGGY_PATH, 'icons', filename)
+    @imageProcessor.loadIcon(iconPath)
+  end
+  
+  def getItemRubyFilename(index)
+    fox2Ruby(getItemFilename(index))
+  end
+  
+  def getItemRubyPathname(index)
+    fox2Ruby(getItemPathname(index))
+  end
+  
+  def replaceFileIcon(index, rubyfile, modus)
+    return nil if modus == nil
+    icon = (modus == 'add' ? @checkedIcon : @uncheckedIcon)
+    if FOXVERSION_GE_1_2
+      setItemMiniIcon(index, icon)
+    else
+      file = ruby2Fox(rubyfile)
+      replaceItem(index, file, icon, icon)
+    end
+  end
+  
+  def chooseAllInFilelist
+   (0..getNumItems-1).each do
+      |i|
+      if(isItemFile(i) && supports(getItemRubyFilename(i)))
+        shortName = getItemRubyFilename(i)
+        longName = getItemRubyPathname(i)
+        @chosenFiles.add(longName)
+        replaceFileIcon(i, shortName, 'add')
+      end
+    end
+  end
+  
+  def supports(filename)
+    return @choosable.call(filename)
+  end
+  
+  def getSelectedImageFiles(fullPath = false, modus = nil)
+    selectedInd = (0..getNumItems-1).select do
+      |i|
+      isItemSelected(i) and
+      isItemFile(i) and
+      supports(getItemRubyFilename(i))
+    end
+    selectedFiles = selectedInd.collect do
+      |i|
+      shortName = getItemRubyFilename(i)
+      longName = getItemRubyPathname(i)
+      replaceFileIcon(i, shortName, modus)
+      fullPath ? longName : shortName
+    end
+    return selectedFiles
+  end
+  
+  def addSelectedFiles
+    getSelectedImageFiles(true, 'add').each { |file|
+      @chosenFiles.add(file)
+    }
+  end
+  
+  def removeSelectedFiles
+    getSelectedImageFiles(true, 'remove').each { |file|
+      @chosenFiles.delete(file)
+    }
+  end
+  
+  def updateFileList
+    scan(true)
+     (0..getNumItems-1).each do
+      |i|
+      if(isItemFile(i))
+        shortName = getItemRubyFilename(i)
+        if(supports(shortName))
+          longName = getItemRubyPathname(i)
+          if(@chosenFiles.include?(longName))
+            replaceFileIcon(i, shortName, 'add')
+          else
+            replaceFileIcon(i, shortName, 'remove')
+          end
+        end
+      end
+    end
+  end
+  
+  def addIndex(i)
+    longName = getItemRubyPathname(i)
+    shortName = getItemRubyFilename(i)
+    @chosenFiles.add(longName)
+    replaceFileIcon(i, shortName, 'add')
+  end
+  
+  def removeIndex(i)
+    longName = getItemRubyPathname(i)
+    shortName = getItemRubyFilename(i)
+    @chosenFiles.delete(longName)
+    replaceFileIcon(i, shortName, 'remove')
+  end
+  
+  def chooseSavedInstead(original, saved)
+    originalIndex = getIndex(original)
+    savedIndex = getIndex(saved)
+    removeIndex(originalIndex) unless originalIndex < 0
+    unless savedIndex < 0
+      addIndex(savedIndex) 
+      selectIndex(savedIndex)
+    end
+  end
+  
+  def getIndex(path)
+    rubyPath = rubyPath(path)
+     (0..getNumItems-1).each do
+      |i|
+      if(isItemFile(i))
+        longName = getItemRubyPathname(i)
+        if(rubyPath(longName) == rubyPath)
+          return i
+        end
+      end
+    end
+    return -1
+  end
+  
+  def rubyPath(path)
+    @shell.rubyPath(path)
+  end
+  
+  def assumeSelected(path)
+    index = getIndex(path)
+    unless index < 0 || itemSelected?(index)
+      killSelection()
+      selectItem(index)
+    end
+  end
+  
+  def chosenSequence
+    seq = Array.new
+    @chosenFiles.each { |file| seq.push(file) }
+    seq.sort! { |x, y| x <=> y }
+  end
+  
+  def goToDirectory(dirname)
+    self.directory = ruby2Fox(rubyPath(dirname))
+    @chosenFiles = Set.new
+  end
+  
+  def getCurrentDirectory
+    fox2Ruby(self.directory)
+  end
+  
+  # Return index or -1
+  def selectNextChosen
+    block = proc { |i|
+      if(isItemFile(i) &&
+        @chosenFiles.include?(getItemRubyPathname(i)))
+        killSelection
+        makeItemVisible(i)
+        selectItem(i)
+        return i
+      end
+    }
+    startingPoint = lastSelectedIndex + 1
+     (startingPoint..getNumItems-1).each(&block)
+     (0..startingPoint-1).each(&block)
+    return -1
+  end
+  
+  def selectPreviousChosen
+    max = getNumItems - 1
+    startingPoint = firstSelectedIndex
+    startingPoint = max+1 if(startingPoint < 0 || startingPoint > max)
+     (0..max).each do 
+      |index|
+      i = (max - index + startingPoint) % (max + 1)
+      if(isItemFile(i) &&
+        @chosenFiles.include?(getItemRubyPathname(i)))
+        killSelection
+        makeItemVisible(i)
+        selectItem(i)
+        return i
+      end
+    end
+    return -1
+  end
+  
+  def firstSelectedIndex
+    max = getNumItems-1
+     (0..max).each do
+      |i|
+      return i if(isItemSelected(i)) 
+    end
+    -1
+  end
+  
+  def lastSelectedIndex
+    max = getNumItems-1
+     (0..max).each do
+      |i|
+      r = max - i
+      return r if(isItemSelected(r)) 
+    end
+    -1
+  end
+  
+  def anyFilesChosen?
+    return !@chosenFiles.empty?
+  end
+  
+  def numFilesChosen
+    return @chosenFiles.size
+  end
+end

data/lib/piggy-gui/fox_thumbsgen.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/ruby
+## $Id: fox_thumbsgen.rb 181 2007-12-12 23:33:46Z Sascha $
+
+require 'piggy-core/thumbnail_page_generator'
+require 'piggy-core/thumbnail_generator'
+require 'piggy-gui/image_processor'
+
+class FoxThumbnailPageGenerator < ThumbnailPageGenerator
+
+  protected
+  
+  def imageProcessing(progress)
+    imageProcessor = ImageProcessor.new(client.getApp)
+    @imageGenerator = ThumbnailGenerator.new(imageProcessor, @options)
+    @imageGenerator.setOutputDirectory(imageOutputPath)
+    @imageGenerator.generate(@inputFilenames, progress) 
+  end
+end

data/lib/piggy-gui/ftp_browser_widget.rb

@@ -0,0 +1,395 @@
+#!/usr/bin/ruby
+# $Id: ftp_browser_widget.rb 192 2008-02-02 19:21:34Z Sascha $
+
+# FtpBrowserWidget manages FTP transfer for Piggy.
+
+require 'piggy-core/options'
+require 'piggy-core/ftp_adapter'
+require 'piggy-core/upload_info'
+require 'piggy-gui/directory_diff_widget'
+
+class FtpBrowserDialog < Fox::FXDialogBox
+  include Fox
+  
+  def initialize(window, options = PiggyOptions.new)
+    super(window, "Piggy FTP Client", DECOR_ALL)
+    @frame = FXVerticalFrame.new(self)
+    @frame.setLayoutHints(LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    @browser = FtpBrowserWidget.new(@frame, options)
+    connect(SEL_CLOSE, method(:onCmdClose))
+    @browser.quitButton.connect(SEL_COMMAND, method(:onQuitButton))
+  end
+  
+  def options
+    @browser.options
+  end
+  
+  def create
+    resize(800, 600)
+    place(PIGGY_WINDOW_PLACEMENT)
+    super
+  end
+  
+  # Send whenever this window is about to close
+  def onCmdClose(sender, sel, ptr)
+    @browser.prepareClosure
+    return 0
+  end
+  
+  def onQuitButton(sender, sel, ptr)
+    handle(sender, MKUINT(ID_ACCEPT, SEL_COMMAND), nil)
+  end
+end
+
+class FtpBrowserMainWindow < DirectoryDiffMainWindow
+  include Fox
+  
+  def initialize(app, options = PiggyOptions.new)
+    super(app, options)
+  end
+  
+  def titleString
+    "Piggy FTP Browser"
+  end
+  
+  def setMainWidget(options)
+    @browser = FtpBrowserWidget.new(@frame, options)
+  end
+end
+
+class FtpBrowserWidget < DirectoryDiffWidget
+  include Fox
+  
+  def initialize(window, options = PiggyOptions.new)
+    @ftpAdapter = FtpAdapter.new(options)
+    @connectionDataVerified = false
+    super(window, options)
+  end
+  
+  def loadIcons
+    super
+    @reloadIcon = basicLoadIcon('reload.ico')
+    @autoSelectForDelIco =  basicLoadIcon('auto-select-for-del.ico')
+    @removeSelectedIco = basicLoadIcon('remove-selected.ico')
+    @autoSelectRightIcon = basicLoadIcon('auto-select-right.ico')
+    @uploadIcon = basicLoadIcon('auto-upload-right.ico')
+    @moveRightDirIcon = basicLoadIcon('move-right-dir.ico')
+    @moveRightFileIcon = basicLoadIcon('move-right-file.ico')
+  end
+  
+  def initializeControlsOL
+    @labels.push(FXLabel.new(@leftListPropFrame, "FTP server:"))
+    @serverField = FXTextField.new(@leftListPropFrame, 32)
+    @labels.push(FXLabel.new(@leftListPropFrame, "User:"))
+    @userField = FXTextField.new(@leftListPropFrame, 32)
+    @labels.push(FXLabel.new(@leftListPropFrame, "Password:"))
+    @passwordField = FXTextField.new(@leftListPropFrame, 32)
+    @passwordField.setTextStyle(TEXTFIELD_PASSWD)
+    @labels.push(FXLabel.new(@leftListPropFrame, "Destination path:"))
+    @leftPathField = FXTextField.new(@leftListPropFrame, 32)
+  end
+
+  def initializeControlsUL
+    @updateButton = FXButton.new(@leftButtonsFrame,
+				 "\tUpdate list",
+				 @reloadIcon)
+    super
+    @autoSelectForDelButton = FXButton.new(@leftButtonsFrame,
+					   "\tChoose files automatically",
+					   @autoSelectForDelIco)
+    @removeSelectedLeftButton = FXButton.new(@leftButtonsFrame,
+					 "\tRemove selected files",
+					 @removeSelectedIco)
+  end
+  
+  def initializeControlsUR
+    super
+    @autoSelectRightButton = FXButton.new(@rightButtonsFrame,
+					  "\tChoose files automatically",
+					  @autoSelectRightIcon)
+    @uploadSelectedButton = FXButton.new(@rightButtonsFrame,
+					 "\tUpload selected",
+					 @uploadIcon)
+  end
+  
+  def connectEvents
+    super
+    @serverField.connect(SEL_COMMAND)  {
+      @options.ftpHost = @serverField.getText
+    }
+    @userField.connect(SEL_COMMAND)  {
+      @options.ftpUser = @userField.getText
+    }
+    @updateButton.connect(SEL_COMMAND, method(:onCmdUpdate))
+    @autoSelectForDelButton.connect(SEL_COMMAND, method(:onCmdAutoSelectLeft))
+    @removeSelectedLeftButton.connect(SEL_COMMAND, method(:onCmdRemoveSelectedLeft))
+    @autoSelectRightButton.connect(SEL_COMMAND, method(:onCmdAutoSelectRight))
+    @uploadSelectedButton.connect(SEL_COMMAND, method(:onCmdUpload))
+  end
+  
+  def setDefaults
+    @serverField.setText(@options.ftpHost)
+    @userField.setText(@options.ftpUser)
+    @rightPathField.setText(@options.localDestinationPath)
+    @leftPathField.setText(@options.remoteDestinationPath)
+  end
+  
+  # accessing
+
+  def leftPath
+    @options.remoteDestinationPath
+  end
+  
+  def setLeftPath(p)
+    @options.remoteDestinationPath = FilePath.internPath(p)
+    @leftPathField.setText(leftPath) #fixme winpath
+  end
+  
+  def password
+    @passwordField.getText
+  end
+  
+  def host
+    @serverField.getText
+  end
+  
+  def user
+    @userField.getText
+  end
+  
+  # update
+  
+  def updateStatusIconsRight
+    (0..@rightFileList.getNumItems - 1).each do
+      |index|
+      file = itemFilename(@rightFileList, index)
+      myInfo = @rightContents[file]
+      otherInfo = @leftContents[file]
+      icon = if myInfo.directory?
+	       otherInfo ? @dirIcon : @moveRightDirIcon
+	     else
+               if otherInfo
+                 otherInfo.mtime < myInfo.mtime ? @newerFileIcon : @fileIcon
+               else
+                 @moveRightFileIcon
+               end
+	     end
+      @rightFileList.setItemMiniIcon(index, icon)
+    end
+  end
+  
+  def updateLeftList
+    updateFtpList if @connectionDataVerified
+  end
+  
+  def ftpDo(&block) # don't chdir in block
+    getApp.beginWaitCursor
+    @leftFileList.clearItems
+    @leftContents = DirectoryContents.new(leftPath)
+    begin
+      @connectionDataVerified = false
+      @ftpAdapter.connect(host, user, password)
+      @connectionDataVerified = true
+      @ftpAdapter.chdir(leftPath)
+      block.call # <------ the call
+      updateList(@ftpAdapter.nlst, @leftFileList, @leftContents) do
+	|file, path|
+	@ftpAdapter.info(file, path)
+      end
+    rescue SocketError => ex
+      error(ex.message)
+    rescue Net::FTPError => ex
+      error(ex.message)
+    rescue StandardError => ex
+      error(ex.message)
+    rescue Timeout::Error => ex
+      error("Timeout - operation took longer than expected. \nCheck network connection and try again.")
+    ensure
+      @ftpAdapter.close
+    end
+    getApp.endWaitCursor
+  end
+  
+  def updateFtpList
+    ftpDo {} # every ftp action includes an update :-)
+  end
+
+  # actions
+
+  def autoSelectLeft
+    list = @leftFileList
+    list.killSelection
+    (0..list.getNumItems-1).each do
+      |index|
+      file = itemFilename(list, index)
+      myInfo = @leftContents[file]
+      otherInfo = @rightContents[file]
+      select = if myInfo.directory?
+		 false
+	       elsif otherInfo
+		 false
+	       else
+		 true
+	       end
+      list.selectItem(index) if select
+    end
+  end
+
+  def autoSelectRight
+    list = @rightFileList
+    list.killSelection
+    (0..list.getNumItems-1).each do
+      |index|
+      file = itemFilename(list, index)
+      myInfo = @rightContents[file]
+      otherInfo = @leftContents[file]
+      select = if myInfo.directory?
+		 false
+	       elsif otherInfo && otherInfo.directory?
+		 false
+	       elsif !otherInfo || otherInfo.mtime < myInfo.mtime
+		 true
+	       else
+		 false
+	       end
+      list.selectItem(index) if select
+    end
+  end
+
+  def ftpDeleteLeft(files)
+    ftpDo {
+      files.each { |file|
+	@ftpAdapter.delete(file) 
+      }
+    }
+    updateStatusIcons
+  end
+
+  def ftpUploadRight(hash, totalSize)
+    ftpDo do
+      progressDialog = FXProgressDialog.new(self,
+					    'Transferring data',
+					    'Transferring data')
+      begin
+	progressDialog.setProgress(1)
+	progressDialog.setTotal(totalSize)
+	progressDialog.create
+	progressDialog.show
+	progressDialog.repaint
+	hash.keys.sort.each do
+	  |file|
+	  @ftpAdapter.upload(rightPath, file) { |data|
+	    progressDialog.setMessage(ruby2Fox("Transferring #{File.basename(file)}"))
+	    progressDialog.increment(data.size)
+	    progressDialog.repaint
+	  }
+	end
+      ensure
+	progressDialog.hide
+      end
+    end
+    updateStatusIcons
+  end
+
+  def askAndUploadSelection
+    sel = selectionInList(@rightFileList)
+    return false if sel.empty?
+    files = sel.collect { |e| FilePath.join(rightPath, e) }
+    uploadInfo = UploadInfo.new(files)
+    num = uploadInfo.numFiles
+    if(num < 1)
+      FXMessageBox.information(self, MBOX_OK, 'No files',
+			       'No files found in selected directories!')
+      return false
+    end
+    answer = FXMessageBox.question(self, MBOX_YES_NO, 'Really upload?',
+				   "Upload #{num} fil#{num == 1 ? 'e' : 'es'}?")
+    ftpUploadRight(uploadInfo.bytesHash, uploadInfo.bytes) if answer == MBOX_CLICKED_YES
+  end
+  
+  def askAndFtpDeleteSelection
+    sel = selectionInList(@leftFileList)
+    dirs = sel.select { |file|
+      @leftContents[file].directory?
+    }
+    return error("Sorry, can't remove directories, yet") unless dirs.empty?
+    return false if sel.empty?
+    num = sel.size
+    answer = FXMessageBox.question(self, MBOX_YES_NO, 'Really delete?',
+				   "Delete #{num} fil#{num == 1 ? 'e' : 'es'}?")
+    ftpDeleteLeft(sel) if answer == MBOX_CLICKED_YES
+  end
+
+  # events
+
+  def onCmdUpdate(sender, sel, ptr)
+    updateFtpList
+    updateStatusIcons
+  end
+
+  def onCmdAutoSelectLeft(sender, sel, ptr)
+    autoSelectLeft
+  end
+
+  def onCmdRemoveSelectedLeft(sender, sel, ptr)
+    askAndFtpDeleteSelection
+  end
+
+  def onCmdAutoSelectRight(sender, sel, ptr)
+    autoSelectRight
+  end
+
+  def onCmdUpload(sender, sel, event)
+    askAndUploadSelection
+  end
+		   
+  def onMenuLeftList(sender, sel, event)
+    selection = selectionInList(@leftFileList)
+    pane = FXMenuPane.new(self)
+    # FXMenuSeparator.new(pane)
+    item = FXMenuCommand.new(pane, "&Remove selected")
+    if(selection.empty?)
+      item.disable
+    else
+      item.connect(SEL_COMMAND){ |sender, sel, event|
+	askAndFtpDeleteSelection
+      }
+    end
+    pane.create
+    pane.popup(nil, event.root_x, event.root_y)
+    getApp.runModalWhileShown(pane)
+    return 1
+  end
+
+  def onMenuRightList(sender, sel, event)
+    selection = selectionInList(@rightFileList)
+    pane = FXMenuPane.new(self)
+    item = FXMenuCommand.new(pane, "&Upload selected")
+    if(selection.empty?)
+      item.disable
+    else
+      item.connect(SEL_COMMAND){ |sender, sel, event|
+	askAndUploadSelection
+      }
+    end
+    # FXMenuSeparator.new(pane)
+    pane.create
+    pane.popup(nil, event.root_x, event.root_y)
+    getApp.runModalWhileShown(pane)
+    return 1
+  end
+  
+  # open/close
+  
+  def inCreate
+    updateRightList
+    updateStatusIcons
+    @fourSplitter.setVSplit(2450)
+  end
+  
+  def prepareClosure
+    @ftpAdapter.close
+    super
+  end
+end
+