local ftp = require("ftp")
 
local connection = ftp.newConnection{ 
        host = "domain.com", 
        user = "username", 
        password = "password", 
        port = 21 -- Optional. Will default to 21.
}

connection:upload{
        localFile = system.pathForFile("image.jpg", system.ResourcesDirectory),
        remoteFile =  "/public_html/image.jpg",
        onSuccess = onUploadSuccess,
        onError = onError
}

connection:download{
        remoteFile = "/public_html/image.jpg",
        localFile = "image.jpg",
        onSuccess = onDownloadSuccess,
        onError = onError
}

connection:append{
        localFile = system.pathForFile("todaysLog.txt", system.ResourcesDirectory),
        remoteFile = "/public_html/completeLog.txt",
        onSuccess = onAppendSuccess,
        onError = onError
}

-- 
-- Abstract: Simplifies the use of FTP functions with Lua.
-- 
-- Author: Graham Ranson - http://www.grahamranson.co.uk
--
-- Version: 1.0
-- 
-- FTP Helper is MIT licensed, see http://developer.anscamobile.com/code/license
-- Copyright (C) 2010 ANSCA Inc. All Rights Reserved.
 
module(..., package.seeall)
 
local ftp = require("socket.ftp")
local ltn12 = require("ltn12")
 
function newConnection(params)
        
        local self = {}
        self.host = params.host or "anonymous.org"
        self.user = params.user or "anonymous"
        self.password = params.password or ""
        self.port = params.port or 21
 
        local putFile = function(params, command)
                        
                success, error = ftp.put{
                        host = self.host, 
                        user = self.user,
                        password = self.password,
                        port = self.port,
                        type = "i",
                        step = ltn12.all,
                        command = command,
                        argument = params.remoteFile,
                        source = ltn12.source.file( io.open( params.localFile, "rb" ) )  
                }
                
                if success then
                        if params.onSuccess then
                                params.onSuccess( { path = self.host .. params.remoteFile } )
                        end
                else
                        if params.onError then
                                params.onError( { error = error } ) 
                        end
                end
                                
                return success, error
                
        end
        
        local getFile = function(params)
        
                local success, error = ftp.get{
                        host = self.host, 
                        user = self.user,
                        password = self.password,
                        port = self.port,
                        type = "i",
                        step = ltn12.all,
                        command = command,
                        argument = params.remoteFile,
                        sink = ltn12.sink.file(params.localFile)
                }
                
                if success then
                        if params.onSuccess then
                                params.onSuccess( { path = params.localPath } )
                        end
                else
                        if params.onError then
                                params.onError( { error = error } ) 
                        end
                end
                        
                return success, error
        end
 
        function self:upload(params)
                return putFile(params, "stor")
        end
        
        function self:download(params)
                
                params.localPath = system.pathForFile( params.localFile, system.DocumentsDirectory )
                params.localFile = io.open( params.localPath, "w+b" ) 
 
                return getFile(params)
        
        end
        
        function self:append(params)
                return putFile(params, "appe")
        end
        
        return self
        
end

local ftp = require("ftp")
 
local connection = ftp.newConnection{ 
                host = "monkeydead.com", 
                user = "monkeyde", 
                password = "A4MUaC8wS8", 
                port = 21 -- Optional. Will default to 21.
        }
 
local onUploadSuccess = function(event)
        print("File uploaded to " .. event.path)
end
 
local onDownloadSuccess = function(event)
        print("File downloaded to " .. event.path)
end
 
local onAppendSuccess = function(event)
        print("File appended")
end
 
local onError = function(event)
        print("Error: " .. event.error)
end
 
connection:upload{
        localFile = system.pathForFile("image.jpg", system.ResourcesDirectory),
        remoteFile =  "/public_html/imagei.jpg",
        onSuccess = onUploadSuccess,
        onError = onError
}
        
connection:download{
        remoteFile = "/public_html/image.jpg",
        localFile = "image2.jpg",
        onSuccess = onDownloadSuccess,
        onError = onError
}
        
connection:append{
        localFile = system.pathForFile("todaysLog.txt", system.ResourcesDirectory),
        remoteFile = "/public_html/completeLog.txt",
        onSuccess = onAppendSuccess,
        onError = onError
}