diakonos 0.8.8 → 0.9.8

data/lib/diakonos/clipboard-klipper-dbus.rb

@@ -0,0 +1,62 @@
+module Diakonos
+
+  # Same interface as Diakonos::Clipboard, except interacts with Klipper in KDE4 (via dbus)
+  class ClipboardKlipperDBus
+
+    def initialize
+    end
+
+    # Returns true iff some text was copied to klipper.
+    def send_to_klipper( text )
+      return false  if text.nil?
+
+      clip_filename = write_to_clip_file( text.join( "\n" ) )
+
+      # A little shell sorcery to ensure the shell doesn't strip off trailing newlines.
+      `clipping=$(cat #{clip_filename};printf "_"); dbus-send --type=method_call --dest=org.kde.klipper /klipper org.kde.klipper.klipper.setClipboardContents string:"${clipping%_}"`
+      true
+    end
+
+    def write_to_clip_file( text )
+      clip_filename = $diakonos.diakonos_home + "/clip.txt"
+      File.open( clip_filename, "w" ) do |f|
+        f.print text
+      end
+      clip_filename
+    end
+
+    # ------------------------------
+
+    def clip
+      text = `dbus-send --print-reply --dest=org.kde.klipper /klipper org.kde.klipper.klipper.getClipboardContents | awk 'BEGIN { output = ""; } { if ( NR > 1 ) { output = output $0 "\\n"; } } END { print substr(output, 12, length(output) - 13); }'`.split( "\n", -1 )
+      # getClipboardContents puts an extra newline on end; pop it off.
+      text.pop
+      text
+    end
+
+    # text is an array of Strings
+    # Returns true iff a clip was added,
+    # and only non-nil text can be added.
+    def add_clip( text )
+      return false  if text.nil?
+      send_to_klipper text
+    end
+
+    # no-op.
+    def each
+    end
+
+    # text is an array of Strings (lines)
+    # Appends the lines to the current clip.
+    # If no current clip, then a new clip is created.
+    # Returns true iff the text was successfully appended.
+    def append_to_clip( text )
+      return false  if text.nil?
+
+      last_clip = clip
+      last_clip.pop  if last_clip[ -1 ] == ""
+      send_to_klipper last_clip + text
+    end
+  end
+
+end

data/lib/diakonos/clipboard-klipper.rb

@@ -0,0 +1,62 @@
+module Diakonos
+
+  # Same interface as Diakonos::Clipboard, except interacts with Klipper in KDE 3 (via dcop)
+  class ClipboardKlipper
+
+    def initialize
+    end
+
+    # Returns true iff some text was copied to klipper.
+    def send_to_klipper( text )
+      return false  if text.nil?
+
+      clip_filename = write_to_clip_file( text.join( "\n" ) )
+
+      # A little shell sorcery to ensure the shell doesn't strip off trailing newlines.
+      `clipping=$(cat #{clip_filename};printf "_"); dcop klipper klipper setClipboardContents "${clipping%_}"`
+      true
+    end
+
+    def write_to_clip_file( text )
+      clip_filename = $diakonos.diakonos_home + "/clip.txt"
+      File.open( clip_filename, "w" ) do |f|
+        f.print text
+      end
+      clip_filename
+    end
+
+    # ------------------------------
+
+    def clip
+      text = `dcop klipper klipper getClipboardContents`.split( "\n", -1 )
+      # getClipboardContents puts an extra newline on end; pop it off.
+      text.pop
+      text
+    end
+
+    # text is an array of Strings
+    # Returns true iff a clip was added,
+    # and only non-nil text can be added.
+    def add_clip( text )
+      return false  if text.nil?
+      send_to_klipper text
+    end
+
+    # no-op.
+    def each
+    end
+
+    # text is an array of Strings (lines)
+    # Appends the lines to the current clip.
+    # If no current clip, then a new clip is created.
+    # Returns true iff the text was successfully appended.
+    def append_to_clip( text )
+      return false  if text.nil?
+
+      last_clip = clip
+      last_clip.pop  if last_clip[ -1 ] == ""
+      send_to_klipper last_clip + text
+    end
+  end
+
+end

data/lib/diakonos/clipboard-osx.rb

@@ -0,0 +1,59 @@
+module Diakonos
+
+  # Same interface as Diakonos::Clipboard, except interacts with pbcopy and
+  # pbpaste on OSX
+  class ClipboardOSX
+
+    def initialize
+    end
+
+    # @return true iff some text was copied to pbcopy
+    def send_to_pbcopy(text)
+      return false  if text.nil?
+
+      clip_filename = write_to_clip_file( text.join( "\n" ) )
+      `pbcopy < #{clip_filename}`
+
+      true
+    end
+
+    # TODO: DRY this up with other Clipboard classes
+    def write_to_clip_file(text)
+      clip_filename = $diakonos.diakonos_home + "/clip.txt"
+      File.open( clip_filename, "w" ) do |f|
+        f.print text
+      end
+      clip_filename
+    end
+
+    # ------------------------------
+
+    def clip
+      `pbpaste`.split( "\n", -1 )
+    end
+
+    # @param [Array<String>] text
+    # @return true iff a clip was added
+    def add_clip(text)
+      send_to_pbcopy text
+    end
+
+    # no-op
+    def each
+    end
+
+    # @param [Array<String>] lines of text
+    # Appends the lines to the current clip.
+    # If no current clip, then a new clip is created.
+    # @return true iff the text was successfully appended
+    def append_to_clip(text)
+      return false  if text.nil?
+
+      last_clip = clip
+      last_clip.pop  if last_clip[-1] == ""
+
+      send_to_pbcopy  last_clip + text
+    end
+  end
+
+end

data/lib/diakonos/clipboard-xclip.rb

@@ -0,0 +1,60 @@
+module Diakonos
+
+  # Same interface as Diakonos::Clipboard, except interacts with xclip
+  class ClipboardXClip
+
+    def initialize
+    end
+
+    # Returns true iff some text was copied to xclip.
+    def send_to_xclip( text )
+      return false  if text.nil?
+      clip_filename = write_to_clip_file( text.join( "\n" ) )
+      t = Thread.new do
+        `xclip -i #{clip_filename}`
+      end
+      `xclip -o`  # Unfreeze xclip
+      t.terminate
+      true
+    end
+
+    def write_to_clip_file( text )
+      clip_filename = $diakonos.diakonos_home + "/clip.txt"
+      File.open( clip_filename, "w" ) do |f|
+        f.print text
+      end
+      clip_filename
+    end
+
+    # ------------------------------
+
+    def clip
+      `xclip -o`.split( "\n", -1 )
+    end
+
+    # text is an array of Strings
+    # Returns true iff a clip was added,
+    # and only non-nil text can be added.
+    def add_clip( text )
+      return false  if text.nil?
+      send_to_xclip text
+    end
+
+    # no-op.
+    def each
+    end
+
+    # text is an array of Strings (lines)
+    # Appends the lines to the current clip.
+    # If no current clip, then a new clip is created.
+    # Returns true iff the text was successfully appended.
+    def append_to_clip( text )
+      return false  if text.nil?
+
+      last_clip = clip
+      last_clip.pop  if last_clip[ -1 ] == ""
+      send_to_xclip last_clip + text
+    end
+  end
+
+end

data/lib/diakonos/clipboard.rb

@@ -0,0 +1,47 @@
+module Diakonos
+
+  class Clipboard
+    def initialize( max_clips )
+      @clips = Array.new
+      @max_clips = max_clips
+    end
+
+    def [] ( arg )
+      @clips[ arg ]
+    end
+
+    def clip
+      @clips[ 0 ]
+    end
+
+    # text is an array of Strings
+    # Returns true iff a clip was added,
+    # and only non-nil text can be added.
+    def add_clip( text )
+      return false if text.nil?
+      @clips.unshift text
+      @clips.pop if @clips.length > @max_clips
+      true
+    end
+
+    def each
+      @clips.each do |clip|
+        yield clip
+      end
+    end
+
+    # text is an array of Strings (lines)
+    # Appends the lines to the current clip.
+    # If no current clip, then a new clip is created.
+    # Returns true iff the text was successfully appended.
+    def append_to_clip( text )
+      return false if text.nil?
+      return add_clip( text ) if @clips.length == 0
+      last_clip = @clips[ 0 ]
+      last_clip.pop if last_clip[ -1 ] == ""
+      @clips[ 0 ] = last_clip + text
+      true
+    end
+  end
+
+end

data/lib/diakonos/config-file.rb

@@ -0,0 +1,67 @@
+module Diakonos
+  # Should inheritance be used in this file instead?
+
+  module ConfigFileDescription
+    def to_s
+      "#{@filename}\t(#{self.inclusion_description})"
+    end
+
+    def name_as_includer
+      @filename
+    end
+
+    def inclusion_description
+      "included by #{@including_config_file.name_as_includer}"
+    end
+  end
+
+  class ConfigFile
+    attr_reader :filename
+    attr_accessor :problems
+
+    include ConfigFileDescription
+
+    def initialize(filename, including_config_file)
+      @filename, @including_config_file = filename, including_config_file
+      @problems = []
+    end
+
+    def ==(other_config_file)
+      @filename == other_config_file.filename
+    end
+
+    def each_line_with_index
+      # TODO: Refactor line_number into index, then +1 before yielding
+      IO.readlines(@filename).each_with_index do |line, line_number|
+        line.chomp!
+        # Skip comments
+        next  if line[0] == ?#
+
+        yield line, line_number
+      end
+    end
+  end
+
+  class ConfigFileUnreadable
+    include ConfigFileDescription
+
+    def initialize(filename, including_config_file)
+      @filename, @including_config_file = filename, including_config_file
+    end
+
+    def problems
+      ["Configuration file #{self} was not found"]
+    end
+
+    def each_line_with_index
+    end
+  end
+
+  class ConfigFileNull
+    include ConfigFileDescription
+
+    def name_as_includer
+      "Diakonos"
+    end
+  end
+end