Module: Clipboard::Windows

Extended by:
Windows
Includes:
Implementation
Included in:
Windows
Defined in:
lib/clipboard/windows.rb

Defined Under Namespace

Modules: Kernel32, User32

Constant Summary collapse

CF_TEXT =
1
CF_UNICODETEXT =
13
GMEM_MOVEABLE =
2

Instance Method Summary collapse

Instance Method Details

#clearObject



62
63
64
65
66
67
68
# File 'lib/clipboard/windows.rb', line 62

def clear(**)
  User32.empty if User32.open(nil)

  true
ensure
  User32.close
end

#copy(data_to_copy) ⇒ Object



70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
# File 'lib/clipboard/windows.rb', line 70

def copy(data_to_copy, **)
  if User32.open(nil)
    User32.empty
    data = data_to_copy.encode(Encoding::UTF_16LE) # TODO: catch bad encodings
    data << 0
    handler = Kernel32.alloc( GMEM_MOVEABLE, data.bytesize )
    pointer_to_data = Kernel32.lock( handler )
    begin
      pointer_to_data.write_string( data )
    ensure
      Kernel32.unlock( handler )
    end
    User32.set( CF_UNICODETEXT, handler )
  else # don't touch anything
    Utils.popen "clip", data_to_copy # depends on clip (available by default since Vista)
  end

  true
ensure
  User32.close
end

#paste(_ = nil) ⇒ Object



46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
# File 'lib/clipboard/windows.rb', line 46

def paste(_ = nil, **)
  return String.new unless User32.open(nil)

  hclip = User32.get( CF_UNICODETEXT )
  return String.new if hclip.null?

  pointer_to_data = Kernel32.lock( hclip )
  # Windows Unicode is ended by two null bytes, so get the whole string
  size = Kernel32.size( hclip )
  data = pointer_to_data.read_string( size - 2 )
  data.force_encoding(Encoding::UTF_16LE)
ensure
  Kernel32.unlock(hclip) if hclip && !hclip.null?
  User32.close
end