ftpd 0.0.0.pre1

data/features/step_definitions/get.rb

@@ -0,0 +1,16 @@
+When /^the client successfully gets (text|binary) "(.*?)"$/ \
+do |mode, remote_path|
+  @client.get mode, remote_path
+end
+
+When /^the client gets (\S+) "(.*?)"$/ do |mode, path|
+  capture_error do
+    step %Q(the client successfully gets #{mode} "#{path}")
+  end
+end
+
+When /^the client gets with no path$/ do
+  capture_error do
+    @client.raw 'RETR'
+  end
+end

data/features/step_definitions/invalid_commands.rb

@@ -0,0 +1,11 @@
+When /^the client sends an empty command$/ do
+  capture_error do
+    @client.raw ''
+  end
+end
+
+When /^the client sends a non-word command$/ do
+  capture_error do
+    @client.raw '*'
+  end
+end

data/features/step_definitions/line_endings.rb

@@ -0,0 +1,7 @@
+def line_ending_type(s)
+  if s =~ /\r\n/
+    :windows
+  else
+    :unix
+  end
+end

data/features/step_definitions/list.rb

@@ -0,0 +1,46 @@
+class FileList
+
+  def initialize(lines)
+    @lines = lines
+  end
+
+  def filenames
+    @lines.map(&:split).map(&:last)
+  end
+
+  def long_form?
+    @lines.all? do |line|
+      line =~ /^[rwxSst-]{10}/
+    end
+  end
+
+  def short_form?
+    !long_form?
+  end
+
+end
+
+When /^the client lists the directory(?: "(.*?)")?$/ do |directory|
+  capture_error do
+    @list = FileList.new(@client.ls(*[directory].compact))
+  end
+end
+
+When /^the client name lists the directory(?: "(.*?)")?$/ do |directory|
+  capture_error do
+    @list = FileList.new(@client.nlst(*[directory].compact))
+  end
+end
+
+Then /^the file list should( not)? contain "(.*?)"$/ do |neg, filename|
+  matcher = if neg
+              :should_not
+            else
+              :should
+            end
+  @list.filenames.send(matcher, include(filename))
+end
+
+Then /^the file list should be in (long|short) form$/ do |form|
+  @list.should send("be_#{form}_form")
+end

data/features/step_definitions/login.rb

@@ -0,0 +1,69 @@
+def logged_in?
+  step "the client lists the directory"
+  @error.nil?
+end
+
+def login(user, password)
+  capture_error do
+    @client.login user, password
+  end
+end
+
+Given /^a successful connection( with TLS)?$/ do |with_tls|
+  step 'the server is started'
+  step "the client connects#{with_tls}"
+end
+
+Given /^a successful login( with TLS)?$/ do |with_tls|
+  step "a successful connection#{with_tls}"
+  step 'the client logs in'
+end
+
+Given /^a failed login$/ do
+  step 'the server is started'
+  step 'the client connects'
+  step 'the client logs in with a bad password'
+end
+
+When /^the client logs in$/ do
+  login @server.user, @server.password
+end
+
+When /^the client logs in with a bad password$/ do
+  login @server.user, 'the-wrong-password'
+end
+
+When /^the client logs in with a bad user$/ do
+  login 'the-wrong-user', @server.password
+end
+
+Then /^the client should( not)? be logged in$/ do |neg|
+  matcher_method = if neg
+                     :be_false
+                   else
+                     :be_true
+                   end
+  logged_in?.should send(matcher_method)
+end
+
+When /^the client sends a password( with no parameter)?$/ do |no_param|
+  capture_error do
+    args = if no_param
+             []
+           else
+             [@server.password]
+           end
+    @client.raw 'PASS', *args
+  end
+end
+
+When /^the client sends a user( with no parameter)?$/ do |no_param|
+  capture_error do
+    args = if no_param
+             []
+           else
+             [@server.user]
+           end
+    @client.raw 'USER', *args
+  end
+end

data/features/step_definitions/mode.rb

@@ -0,0 +1,15 @@
+When /^the client successfully sets mode "(.*?)"$/ do |mode|
+  @client.raw 'MODE', mode
+end
+
+When /^the client sets mode "(.*?)"$/ do |mode|
+  capture_error do
+    step %Q'the client successfully sets mode "#{mode}"'
+  end
+end
+
+When /^the client sets mode with no parameter$/ do
+  capture_error do
+    @client.raw 'MODE'
+  end
+end

data/features/step_definitions/noop.rb

@@ -0,0 +1,13 @@
+When /^the client successfully does nothing( with a parameter)?$/ do |with_param|
+  if with_param
+    @client.raw 'NOOP', 'foo'
+  else
+    @client.noop
+  end
+end
+
+When /^the client does nothing( with a parameter)?$/ do |with_param|
+  capture_error do
+    step "the client successfully does nothing#{with_param}"
+  end
+end

data/features/step_definitions/passive.rb

@@ -0,0 +1,3 @@
+Given /^the client is in (passive|active) mode$/ do |mode|
+  @client.passive = mode == 'passive'
+end

data/features/step_definitions/port.rb

@@ -0,0 +1,5 @@
+When /^the client sends PORT "(.*?)"$/ do |param|
+  capture_error do
+    @client.raw 'PORT', param
+  end
+end

data/features/step_definitions/put.rb

@@ -0,0 +1,16 @@
+When /^the client successfully puts (text|binary) "(.*?)"$/ do
+|mode, local_path|
+  @client.put mode, local_path
+end
+
+When /^the client puts (\S+) "(.*?)"$/ do |mode, path|
+  capture_error do
+    step %Q(the client successfully puts #{mode} "#{path}")
+  end
+end
+
+When /^the client puts with no path$/ do
+  capture_error do
+    @client.raw 'STOR'
+  end
+end

data/features/step_definitions/quit.rb

@@ -0,0 +1,15 @@
+When /^the client successfully quits$/ do
+  @client.quit
+end
+
+When /^the client quits$/ do
+  capture_error do
+    step 'the client successfully quits'
+  end
+end
+
+When /^the client quits with a parameter$/ do
+  capture_error do
+    @client.raw 'QUIT', 'foo'
+  end
+end

data/features/step_definitions/server.rb

@@ -0,0 +1,7 @@
+Given /^the server is started$/ do
+  @server = TestServer.new
+end
+
+After do
+  @server.close if @server
+end

data/features/step_definitions/server_files.rb

@@ -0,0 +1,18 @@
+Given /^the server has file "(.*?)"$/ do |remote_path|
+  @server.add_file remote_path
+end
+
+Then /^the server should( not)? have file "(.*?)"$/ do |neg, path|
+  matcher = if neg
+              :be_false
+            else
+              :be_true
+            end
+  @server.has_file?(path).should send(matcher)
+end
+
+Then /^the remote file "(.*?)" should have (unix|windows) line endings$/ do
+|remote_path, line_ending_type|
+  line_ending_type(@server.file_contents(remote_path)).should ==
+    line_ending_type.to_sym
+end

data/features/step_definitions/type.rb

@@ -0,0 +1,15 @@
+When /^the client successfully sets type "(.*?)"$/ do |type|
+  @client.raw 'TYPE', type
+end
+
+When /^the client sets type "(.*?)"$/ do |type|
+  capture_error do
+    step %Q'the client successfully sets type "#{type}"'
+  end
+end
+
+When /^the client sets type with no parameter$/ do
+  capture_error do
+    @client.raw 'TYPE'
+  end
+end

data/features/support/env.rb

@@ -0,0 +1,4 @@
+$LOAD_PATH << File.expand_path('../../lib', File.dirname(__FILE__))
+
+require 'ftpd'
+require 'stringio'

data/features/support/file_templates/ascii_unix

@@ -0,0 +1,4 @@
+Billy was a chemist
+but Billy is no more
+For what he thought was H2O
+Was H2SO4

data/features/support/file_templates/ascii_windows

@@ -0,0 +1,4 @@
+Billy was a chemist
+but Billy is no more
+For what he thought was H2O
+Was H2SO4

data/features/support/test_client.rb

@@ -0,0 +1,89 @@
+require 'double_bag_ftps'
+require 'net/ftp'
+
+class TestClient
+
+  extend Forwardable
+  include FileUtils
+
+  def initialize(opts = {})
+    @temp_dir = Dir.mktmpdir
+    @ftp = make_ftp(opts)
+    @templates = TestFileTemplates.new
+  end
+
+  def_delegators :@ftp,
+  :chdir,
+  :connect,
+  :delete,
+  :getbinaryfile,
+  :gettextfile,
+  :login,
+  :ls,
+  :nlst,
+  :noop,
+  :passive=,
+  :pwd,
+  :quit
+
+  def raw(*command)
+    @ftp.sendcmd *command.compact.join(' ')
+  end
+
+  def get(mode, remote_path)
+    method = "get#{mode}file"
+    @ftp.send method, remote_path, local_path(remote_path)
+  end
+
+  def put(mode, remote_path)
+    method = "put#{mode}file"
+    @ftp.send method, local_path(remote_path), remote_path
+  end
+
+  def add_file(path)
+    full_path = temp_path(path)
+    mkdir_p File.dirname(full_path)
+    File.open(full_path, 'wb') do |file|
+      file.puts @templates[File.basename(full_path)]
+    end
+  end
+
+  def file_contents(path)
+    File.open(temp_path(path), 'rb', &:read)
+  end
+
+  private
+
+  RAW_METHOD_REGEX = /^send_(.*)$/
+
+  def local_path(remote_path)
+    temp_path(File.basename(remote_path))
+  end
+
+  def temp_path(path)
+    File.expand_path(path, @temp_dir)
+  end
+
+  def make_ftp(opts)
+    tls = opts[:tls]
+    if tls
+      make_tls_ftp
+    else
+      make_non_tls_ftp
+    end
+  end
+
+  def make_tls_ftp
+    ftp = DoubleBagFTPS.new
+    context_opts = {
+      :verify_mode => OpenSSL::SSL::VERIFY_NONE
+    }
+    ftp.ssl_context = DoubleBagFTPS.create_ssl_context(context_opts)
+    ftp
+  end
+
+  def make_non_tls_ftp
+    Net::FTP.new
+  end
+
+end

data/features/support/test_file_templates.rb

@@ -0,0 +1,33 @@
+class TestFileTemplates
+
+  def [](filename)
+    if have_template?(filename)
+      read_template filename
+    else
+      default_template filename
+    end
+  end
+
+  private
+
+  def have_template?(filename)
+    File.exists?(template_path(filename))
+  end
+
+  def read_template(filename)
+    File.open(template_path(filename), 'r', &:read)
+  end
+
+  def template_path(filename)
+    File.expand_path(filename, templates_path)
+  end
+
+  def templates_path
+    File.expand_path('file_templates', File.dirname(__FILE__))
+  end
+
+  def default_template(filename)
+    "Contents of #{filename}"
+  end
+
+end

data/features/support/test_server.rb

@@ -0,0 +1,52 @@
+require 'fileutils'
+require 'forwardable'
+
+class TestServer
+
+  extend Forwardable
+  include FileUtils
+
+  def initialize
+    @temp_dir = Dir.mktmpdir
+    @server = FakeFtpServer.new(@temp_dir)
+    @templates = TestFileTemplates.new
+  end
+
+  def close
+    @server.close
+    rm_rf @temp_dir
+  end
+
+  def host
+    'localhost'
+  end
+
+  def add_file(path)
+    full_path = temp_path(path)
+    mkdir_p File.dirname(full_path)
+    File.open(full_path, 'wb') do |file|
+      file.puts @templates[File.basename(full_path)]
+    end
+  end
+
+  def has_file?(path)
+    full_path = temp_path(path)
+    File.exists?(full_path)
+  end
+
+  def file_contents(path)
+    full_path = temp_path(path)
+    File.open(full_path, 'rb', &:read)
+  end
+
+  def_delegator :@server, :password
+  def_delegator :@server, :port
+  def_delegator :@server, :user
+
+  private
+
+  def temp_path(path)
+    File.expand_path(path, @temp_dir)
+  end
+
+end