/* FTPFactory.cs

use the following line to compile :

csc /target:library /out:FTPLib.dll /r:System.DLL FTPFactory.cs */

using System;
using System.Threading;
using System.Net;
using System.IO;
using System.Text;
using System.Net.Sockets;
using System.Configuration;

namespace Com.Cmb.ShortTerm.VRDNWeb.CommonUtil
{
    public class FTPFactory
    {
        #region private fields
        private string remoteHost = String.Empty, remotePath = String.Empty, remoteUser, remotePass, mes;

        private int remotePort = 0, bytes;

        private Socket clientSocket;

        private int retValue;

        private Boolean logined;

        private string reply;

        private static int BLOCK_SIZE = 512;

        Byte[] buffer = new Byte[BLOCK_SIZE];

        Encoding ASCII = Encoding.ASCII;
        #endregion

        public FTPFactory(string ftpServer, string ftpUser, string ftpPwd)
        {
            remoteHost = ftpServer;

            remotePort = 21;// Convert.ToInt32(ConfigurationSettings.AppSettings["FTPRemotePort"]);

            remoteUser = ftpUser;

            remotePass = ftpPwd;

            remotePath = ".";

            logined = false;
        }

        ///
        /// Return a string array containing the remote directory's file list.
        ///
        public string[] getFileList(string mask)
        {
            if (!logined)
                login();

            Socket cSocket = createDataSocket();

            sendCommand("NLST " + mask);

            if (!(retValue == 150 || retValue == 125))
            {
                throw new IOException(reply.Substring(4));
            }

            mes = "";

            Thread.Sleep(700);

            while (true)
            {
                if (cSocket.Connected)
                {
                    int bytes = cSocket.Receive(buffer, buffer.Length, 0);

                    mes += ASCII.GetString(buffer, 0, bytes);

                    if (bytes < buffer.Length)
                        break;
                }
                else
                {
                }
            }

            char[] seperator = { '\n' };

            string[] mess = mes.Split(seperator);

            foreach (string fileName in mess)
            {

            }

            cSocket.Close();

            readReply();

            if (retValue != 226)
            {
                throw new IOException(reply.Substring(4));
            }

            return mess;
        }

        public string[] getFileList()
        {
            if (!logined)
                login();

            Socket cSocket = createDataSocket();

            sendCommand("LIST ");

            if (!(retValue == 150 || retValue == 125))
            {
                close();

                throw new IOException(reply.Substring(4));
            }

            mes = "";

            while (true)
            {
                int bytes = cSocket.Receive(buffer, buffer.Length, 0);

                mes += ASCII.GetString(buffer, 0, bytes);

                if (bytes < buffer.Length)
                    break;
            }

            char[] seperator = { '\n' };

            string[] mess = mes.Split(seperator);

            cSocket.Close();

            readReply();

            if (retValue != 226)
                throw new IOException(reply.Substring(4));

            return mess;
        }

        ///
        /// Return the size of a file.
        ///
        public long getFileSize(string fileName)
        {
            if (!logined)
            {
                login();
            }

            sendCommand("SIZE " + fileName);

            long size = 0;

            if (retValue == 213)
            {
                size = Int64.Parse(reply.Substring(4));
            }
            else
            {
                throw new IOException(reply.Substring(4));
            }

            return size;
        }

        ///
        /// Login to the remote server.
        ///
        public void login()
        {
            clientSocket = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);

            IPEndPoint ep = new IPEndPoint(Dns.GetHostEntry(remoteHost).AddressList[0], 21);

            try
            {
                clientSocket.Connect(ep);
            }
            catch (Exception)
            {
                throw new IOException("Couldn't connect to remote server");
            }

            readReply();

            if (retValue != 220)
            {
                close();

                throw new IOException(reply.Substring(4));
            }

            sendCommand("USER " + remoteUser);

            if (!(retValue == 331 || retValue == 230))
            {
                cleanup();

                throw new IOException(reply.Substring(4));
            }

            if (retValue != 230)
            {
                sendCommand("PASS " + remotePass);

                if (!(retValue == 230 || retValue == 202))
                {
                    cleanup();

                    throw new IOException(reply.Substring(4));
                }
            }

            logined = true;

            chdir(remotePath);
        }

        ///
        /// If the value of mode is true, set binary mode for downloads.
        /// Else, set Ascii mode.
        ///
        public void SetBinaryMode(Boolean mode)
        {
            if (mode)
                sendCommand("TYPE I");
            else
                sendCommand("TYPE A");

            if (retValue != 200)
                throw new IOException(reply.Substring(4));
        }

        ///
        /// Download a file to the Assembly's local directory,
        /// keeping the same file name.
        ///
        public void download(string remFileName)
        {
            download(remFileName, "", false);
        }

        ///
        /// Download a remote file to the Assembly's local directory,
        /// keeping the same file name, and set the resume flag.
        ///
        public void download(string remFileName, Boolean resume)
        {
            download(remFileName, "", resume);
        }

        ///
        /// Download a remote file to a local file name which can include
        /// a path. The local file name will be created or overwritten,
        /// but the path must exist.
        ///
        public void download(string remFileName, string locFileName)
        {
            download(remFileName, locFileName, false);
        }

        ///
        /// Download a remote file to a local file name which can include
        /// a path, and set the resume flag. The local file name will be
        /// created or overwritten, but the path must exist.
        ///
        public void download(string remFileName, string locFileName, Boolean resume)
        {
            if (!logined)
            {
                login();
            }

            SetBinaryMode(false);

            if (locFileName.Equals(""))
            {
                locFileName = remFileName;
            }

            if (!File.Exists(locFileName))
            {
                Stream st = File.Create(locFileName);

                st.Close();
            }

            FileStream output = new FileStream(locFileName, FileMode.Create);

            Socket cSocket = createDataSocket();

            long offset = 0;

            if (resume)
            {
                offset = output.Length;

                if (offset > 0)
                {
                    SetBinaryMode(false);

                    sendCommand("REST " + offset);

                    if (retValue != 350)
                    {
                        //throw new IOException(reply.Substring(4));
                        //Some servers may not support resuming.

                        offset = 0;
                    }
                }

                if (offset > 0)
                {
                    long npos = output.Seek(offset, SeekOrigin.Begin);
                }
            }

            sendCommand("RETR " + remFileName);

            if (!(retValue == 150 || retValue == 125))
            {
                throw new IOException(reply.Substring(4));
            }

            while (true)
            {
                bytes = cSocket.Receive(buffer, buffer.Length, 0);

                output.Write(buffer, 0, bytes);

                if (bytes <= 0)
                {
                    break;
                }
            }

            output.Close();

            if (cSocket.Connected)
            {
                cSocket.Close();
            }

            readReply();

            if (!(retValue == 226 || retValue == 250))
            {
                throw new IOException(reply.Substring(4));
            }
        }

        ///
        /// Upload a file.
        ///
        public void upload(string fileName)
        {
            upload(fileName, false);
        }

        ///
        /// Upload a file and set the resume flag.
        ///
        public void upload(string fileName, Boolean resume)
        {
            if (!logined)
            {
                login();
            }

            Socket cSocket = createDataSocket();

            long offset = 0;

            if (resume)
            {
                try
                {
                    SetBinaryMode(true);

                    offset = getFileSize(fileName);
                }
                catch (Exception)
                {
                    offset = 0;
                }
            }

            if (offset > 0)
            {
                sendCommand("REST " + offset);

                if (retValue != 350)
                {
                    //throw new IOException(reply.Substring(4));

                    //Remote server may not support resuming.

                    offset = 0;
                }
            }

            FileInfo fileInfo = new FileInfo(fileName);


            sendCommand("STOR " + Path.GetFileName(fileName));

            if (!(retValue == 125 || retValue == 150))
            {
                close();

                throw new IOException(reply.Substring(4));
            }

            // open input stream to read source file
            FileStream input = new FileStream(fileName, FileMode.Open);

            if (offset != 0)
            {
                input.Seek(offset, SeekOrigin.Begin);
            }

            while ((bytes = input.Read(buffer, 0, buffer.Length)) > 0)
            {
                cSocket.Send(buffer, bytes, 0);
            }

            input.Close();

            if (cSocket.Connected)
            {
                cSocket.Close();
            }

            readReply();

            if (!(retValue == 226 || retValue == 250))
            {
                throw new IOException(reply.Substring(4));
            }
        }

        ///
        /// Delete a file from the remote FTP server.
        ///
        public void deleteRemoteFile(string fileName)
        {
            if (!logined)
                login();

            sendCommand("DELE " + fileName);

            if (retValue != 250)
                throw new IOException(reply.Substring(4));
        }

        ///
        /// Rename a file on the remote FTP server.
        ///
        public void renameRemoteFile(string oldFileName, string newFileName)
        {
            if (!logined)
                login();

            sendCommand("RNFR " + oldFileName);

            if (retValue != 350)
                throw new IOException(reply.Substring(4));

            // known problem
            // rnto will not take care of existing file.
            // i.e. It will overwrite if newFileName exist
            sendCommand("RNTO " + newFileName);

            if (retValue != 250)
                throw new IOException(reply.Substring(4));
        }

        ///
        /// Create a directory on the remote FTP server.
        ///
        public void mkdir(string dirName)
        {
            if (!logined)
                login();

            sendCommand("MKD " + dirName);

            if (retValue != 250)
                throw new IOException(reply.Substring(4));
        }

        ///
        /// Delete a directory on the remote FTP server.
        ///
        public void rmdir(string dirName)
        {
            if (!logined)
                login();

            sendCommand("RMD " + dirName);

            if (retValue != 250)
                throw new IOException(reply.Substring(4));
        }

        ///
        /// Change the current working directory on the remote FTP server.
        ///
        public void chdir(string dirName)
        {
            if (dirName.Equals("."))
            {
                return;
            }

            if (!logined)
            {
                login();
            }

            sendCommand("CWD " + dirName);

            if (retValue != 250)
            {
                throw new IOException(reply.Substring(4));
            }

            this.remotePath = dirName;
        }

        ///
        /// Close the FTP connection.
        ///
        public void close()
        {
            if (clientSocket != null)
            {
                sendCommand("QUIT");
            }

            cleanup();
        }

        private void readReply()
        {
            mes = "";

            reply = readLine();

            retValue = Int32.Parse(reply.Substring(0, 3));
        }

        private void cleanup()
        {
            if (clientSocket != null)
            {
                clientSocket.Close();

                clientSocket = null;
            }

            logined = false;
        }

        private string readLine()
        {
            while (true)
            {
                bytes = clientSocket.Receive(buffer, buffer.Length, 0);

                mes += ASCII.GetString(buffer, 0, bytes);

                if (bytes < buffer.Length)
                    break;
            }

            char[] seperator = { '\n' };

            string[] mess = mes.Split(seperator);

            if (mes.Length > 2)
            {
                mes = mess[mess.Length - 2];
            }
            else
            {
                mes = mess[0];
            }

            if (!mes.Substring(3, 1).Equals(" "))
            {
                return readLine();
            }

            return mes;
        }

        private void sendCommand(String command)
        {
            Byte[] cmdBytes = Encoding.ASCII.GetBytes((command + "\r\n").ToCharArray());

            clientSocket.Send(cmdBytes, cmdBytes.Length, 0);

            readReply();
        }

        private Socket createDataSocket()
        {
            sendCommand("PASV");

            if (retValue != 227)
            {
                throw new IOException(reply.Substring(4));
            }

            int index1 = reply.IndexOf('(');
            int index2 = reply.IndexOf(')');
            string ipData = reply.Substring(index1 + 1, index2 - index1 - 1);

            int[] parts = new int[6];

            int len = ipData.Length;

            int partCount = 0;

            string buf = "";

            for (int i = 0; i < len && partCount <= 6; i++)
            {
                char ch = Char.Parse(ipData.Substring(i, 1));

                if (Char.IsDigit(ch))
                    buf += ch;
                else if (ch != ',')
                    throw new IOException("Malformed PASV reply: " + reply);

                if (ch == ',' || i + 1 == len)
                {
                    try
                    {
                        parts[partCount++] = Int32.Parse(buf);

                        buf = "";
                    }
                    catch (Exception)
                    {
                        throw new IOException("Malformed PASV reply: " + reply);
                    }
                }
            }

            string ipAddress = parts[0] + "." + parts[1] + "." + parts[2] + "." + parts[3];

            int port = (parts[4] << 8) + parts[5];

            Socket s = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);

            s.SetSocketOption(SocketOptionLevel.Socket, SocketOptionName.SendTimeout, 5000);

            IPEndPoint ep = new

            IPEndPoint(Dns.GetHostEntry(ipAddress).AddressList[0], port);

            try
            {
                s.Connect(ep);
            }
            catch (Exception)
            {
                throw new IOException("Can't connect to remote server");
            }

            return s;
        }
    }
    
    public class FTPUtil
    {
        #region FTPFunc

        /// <summary>
        ///
        /// </summary>
        /// <param name="pm_srcFileName">srcFilename From ftp</param>
        /// <param name="pm_LocalFileName">downloadFile fullpath in local</param>
        /// <param name="pm_ftp">srcFileftp path</param>
        /// <param name="pm_ftpUserName"></param>
        /// <param name="ftpPassword"></param>
        /// <param name="Iserro">is erro arrise in Func FTPDownLoad</param>

        static public void FTPDownLoad(string pm_srcFileName, string pm_LocalFileName, string pm_ftp, string pm_ftpUserName, string ftpPassword, out bool Iserro)
        {
            try
            {
                FtpWebRequest ftp = null;
                FtpWebResponse ftpwr = null;
                Stream rs = null;
                FileStream fs = null;

                ftp = (FtpWebRequest)FtpWebRequest.Create(new Uri(@"ftp://" + pm_ftp + pm_srcFileName));
                ftp.Credentials = new NetworkCredential(pm_ftpUserName, ftpPassword);

                ftp.Method = WebRequestMethods.Ftp.DownloadFile;
                ftpwr = (FtpWebResponse)ftp.GetResponse();

                rs = ftpwr.GetResponseStream();
                byte[] buffer = new byte[1024];
                //RAW_FILE
                fs = new FileStream(pm_LocalFileName, FileMode.Create);
                int read = 0;
                do
                {
                    read = rs.Read(buffer, 0, buffer.Length);
                    fs.Write(buffer, 0, read);
                } while (read != 0);
                rs.Close();
                ftpwr.Close();
                fs.Flush();
                fs.Close();

                rs = null;
                fs = null;
                ftpwr = null;
                ftp = null;
                Iserro = false;
            }
            catch (Exception ex)
            {
                Iserro = true;
                throw ex;
            }
        }

        static public void FTPDownLoad(string pm_srcFileName, string pm_LocalFileName, string pm_ftp, string pm_ftpUserName, string ftpPassword)
        {
            bool Iserro = false;
            FTPDownLoad(pm_srcFileName, pm_LocalFileName, pm_ftp, pm_ftpUserName, ftpPassword, out Iserro);
        }

        static public void FTPUpLoad(string pm_ftpFileName, string pm_LocalFileName, string pm_ftp, string pm_ftpUserName, string ftpPassword, out bool Iserro)
        {
            try
            {
                FtpWebRequest ftp = null;


                //MemoryStream ms = null;
                StreamReader fs = null;
                //MF_FILENAME
                ftp = (FtpWebRequest)FtpWebRequest.Create(new Uri(@"ftp://" + pm_ftp + pm_ftpFileName));
                ftp.Credentials = new NetworkCredential(pm_ftpUserName, ftpPassword);


                ftp.Method = WebRequestMethods.Ftp.UploadFile;
                ftp.Proxy = null;
                StreamWriter sw = new StreamWriter(ftp.GetRequestStream());
                fs = new StreamReader(pm_LocalFileName);
                sw.Write(fs.ReadToEnd());

                fs.Close();
                sw.Close();
                fs = null;
                ftp = null;
                Iserro = false;
            }
            catch (Exception ex)
            {
                Iserro = true;
                throw ex;
            }
        }

        static public void FTPUpLoad(string pm_ftpFileName, string pm_LocalFileName, string pm_ftp, string pm_ftpUserName, string ftpPassword)
        {
            bool IsErro = false;
            FTPUpLoad(pm_ftpFileName, pm_LocalFileName, pm_ftp, pm_ftpUserName, ftpPassword, out IsErro);
        }
        #endregion
    }
}