Class: Sambal::Client

Inherits:
Object
  • Object
show all
Defined in:
lib/sambal.rb

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(options = {}) ⇒ Client

Returns a new instance of Client.



45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
# File 'lib/sambal.rb', line 45

def initialize(options={})
  begin
    options = {domain: 'WORKGROUP', host: '127.0.0.1', share: '', user: 'guest', password: '--no-pass', port: 445}.merge(options)
    @o, @i, @pid = PTY.spawn("smbclient //#{options[:host]}/#{options[:share]} #{options[:password]} -W #{options[:domain]} -U #{options[:user]} -p #{options[:port]}")
    #@o.set_encoding('UTF-8:UTF-8') ## don't know didn't work, we only have this problem when the files are named using non-english characters
    #@i.set_encoding('UTF-8:UTF-8')
    res = @o.expect(/^smb:.*\\>/, 10)[0] rescue nil
    @connected = case res
    when nil
      $stderr.puts "Failed to connect"
      false
    when /^put/
      res['putting'].nil? ? false : true
    else
      if res['NT_STATUS']
        false
      elsif res['timed out'] || res['Server stopped']
        false
      else
        true
      end
    end

    unless @connected
      close if @pid
      exit(1)
    end
  rescue Exception => e
    raise RuntimeError.exception("Unknown Process Failed!! (#{$!.to_s}): #{e.message.inspect}\n"+e.backtrace.join("\n"))
  end
end

Instance Attribute Details

#connectedObject (readonly)

Returns the value of attribute connected.



43
44
45
# File 'lib/sambal.rb', line 43

def connected
  @connected
end

Instance Method Details

#ask(cmd) ⇒ Object



233
234
235
236
237
238
239
240
241
242
# File 'lib/sambal.rb', line 233

def ask(cmd)
  @i.printf("#{cmd}\n")
  response = @o.expect(/^smb:.*\\>/,10)[0] rescue nil
  if response.nil?
    $stderr.puts "Failed to do #{cmd}"
    raise Exception.new, "Failed to do #{cmd}"
  else
    response
  end
end

#ask_wrapped(cmd, filenames) ⇒ Object



244
245
246
# File 'lib/sambal.rb', line 244

def ask_wrapped(cmd,filenames)
  ask wrap_filenames(cmd,filenames)
end

#cd(dir) ⇒ Object



107
108
109
110
111
112
113
114
# File 'lib/sambal.rb', line 107

def cd(dir)
  response = ask("cd \"#{dir}\"")
  if response.split("\r\n").join('') =~ /NT_STATUS_OBJECT_NAME_NOT_FOUND/
    Response.new(response, false)
  else
    Response.new(response, true)
  end
end

#closeObject



228
229
230
231
# File 'lib/sambal.rb', line 228

def close
  @i.printf("quit\n")
  @connected = false
end

#del(file) ⇒ Object



184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
# File 'lib/sambal.rb', line 184

def del(file)
  begin
    file_context(file) do |file|
      response = ask_wrapped 'del', file
      next_line = response.split("\n")[1]
      if next_line =~ /^smb:.*\\>/
      Response.new(response, true)
      #elsif next_line =~ /^NT_STATUS_NO_SUCH_FILE.*$/
      #  Response.new(response, false)
      #elsif next_line =~ /^NT_STATUS_ACCESS_DENIED.*$/
      #  Response.new(response, false)
      else
        Response.new(response, false)
      end
    end
  rescue InternalError => e
    Response.new(e.message, false)
  end
  #end
  #if (path_parts = file.split('/')).length>1
  #  file = path_parts.pop
  #  subdirs = path_parts.length
  #  dir = path_parts.join('/')
  #  cd dir
  #end
#  response = ask "del #{file}"
#  next_line = response.split("\n")[1]
#  if next_line =~ /^smb:.*\\>/
#    Response.new(response, true)
#  #elsif next_line =~ /^NT_STATUS_NO_SUCH_FILE.*$/
#  #  Response.new(response, false)
#  #elsif next_line =~ /^NT_STATUS_ACCESS_DENIED.*$/
#  #  Response.new(response, false)
#  else
#    Response.new(response, false)
#  end
#rescue InternalError => e
#  Response.new(e.message, false)
#ensure
#  unless subdirs.nil?
#    subdirs.times { cd '..' }
#  end
end

#file_context(path) ⇒ Object



85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
# File 'lib/sambal.rb', line 85

def file_context(path)
  if (path_parts = path.split('/')).length>1
    file = path_parts.pop
    subdirs = path_parts.length
    dir = path_parts.join('/')
    cd dir
  else
    file = path
  end
  begin
    yield(file)
  ensure
    unless subdirs.nil?
      subdirs.times { cd '..' }
    end
  end
end

#get(file, output) ⇒ Object



116
117
118
119
120
121
122
123
124
125
126
127
128
129
# File 'lib/sambal.rb', line 116

def get(file, output)
  begin
    file_context(file) do |file|
      response = ask_wrapped 'get', [file, output]
      if response =~ /^getting\sfile.*$/
        Response.new(response, true)
      else
        Response.new(response, false)
      end
    end
  rescue InternalError => e
    Response.new(e.message, false)
  end
end

#loggerObject



77
78
79
# File 'lib/sambal.rb', line 77

def logger
  @logger ||= Logger.new(STDOUT)
end

#logger=(l) ⇒ Object



81
82
83
# File 'lib/sambal.rb', line 81

def logger=(l)
  @logger = l
end

#ls(qualifier = '*') ⇒ Object



103
104
105
# File 'lib/sambal.rb', line 103

def ls(qualifier = '*')
  parse_files(ask_wrapped('ls', qualifier))
end

#parse_files(str) ⇒ Object



254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
# File 'lib/sambal.rb', line 254

def parse_files(str)
  files = {}
  str.each_line do |line|
    if line =~ /\s+([\w\.\d\-\_\?\!\s]+)\s+([DAH]?)\s+(\d+)\s+(.+)$/
      lsplit = line.split(/\s{2,}/)
      #$stderr.puts "lsplit: #{lsplit}"
      lsplit.shift ## remove first empty string
      name = lsplit.shift#$1
      if lsplit.first =~ /^[A-Za-z]+$/
        type = lsplit.shift
      else
        type = ""
      end
      size = lsplit.shift#$3
      date = lsplit.join(' ')#$4
      name.gsub!(/\s+$/,'')
      files[name] = if type =~/^D.*$/
        {type: :directory, size: size, modified: (Time.parse(date) rescue "!!#{date}")}
      else
        {type: :file, size: size , modified: (Time.parse(date) rescue "!!#{date}")}
      end
    end
  end
  files
end

#put(file, destination) ⇒ Object



131
132
133
134
135
136
137
138
139
140
# File 'lib/sambal.rb', line 131

def put(file, destination)
  response = ask_wrapped 'put', [file, destination]
  if response =~ /^putting\sfile.*$/
    Response.new(response, true)
  else
    Response.new(response, false)
  end
rescue InternalError => e
  Response.new(e.message, false)
end

#put_content(content, destination) ⇒ Object



142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
# File 'lib/sambal.rb', line 142

def put_content(content, destination)
  t = Tempfile.new("upload-smb-content-#{destination}")
  File.open(t.path, 'w') do |f|
    f << content
  end
  response = ask_wrapped 'put', [t.path, destination]
  if response =~ /^putting\sfile.*$/
    Response.new(response, true)
  else
    Response.new(response, false)
  end
rescue InternalError => e
  Response.new(e.message, false)
ensure
  t.close
end

#rmdir(dir) ⇒ Object



159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
# File 'lib/sambal.rb', line 159

def rmdir(dir)
  response = cd dir
  return response if response.failure?
  begin
    ls.each do |name, meta|
      if meta[:type]==:file
        response = del name
      elsif meta[:type]==:directory && !(name =~ /^\.+$/)
        response = rmdir(name)
      end
      raise InternalError.new response.message if response && response.failure?
    end
    cd '..'
    response = ask_wrapped 'rmdir', dir
    next_line = response.split("\n")[1]
    if next_line =~ /^smb:.*\\>/
      Response.new(response, true)
    else
      Response.new(response, false)
    end
  rescue InternalError => e
    Response.new(e.message, false)
  end
end

#wrap_filenames(cmd, filenames) ⇒ Object



248
249
250
251
252
# File 'lib/sambal.rb', line 248

def wrap_filenames(cmd,filenames)
  filenames = [filenames] unless filenames.kind_of?(Array)
  filenames.map!{ |filename| '"' + filename + '"' }
  [cmd,filenames].flatten.join(' ')
end