// Internet.cpp : Defines the entry point for the console application.
//

#include "stdafx.h"
#include "Internet.h"
#include <afxinet.h>
#include	"FtpUserDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// The one and only application object

CWinApp theApp;

using namespace std;

int _tmain(int argc, TCHAR* argv[], TCHAR* envp[])
{
	int nRetCode = 0;

	// initialize MFC and print and error on failure
	if (!AfxWinInit(::GetModuleHandle(NULL), NULL, ::GetCommandLine(), 0))
	{
		// TODO: change error code to suit your needs
		cerr << _T("Fatal Error: MFC initialization failed") << endl;
		return (1);
	}
	if (argc < 2)
	{
		AfxMessageBox ("You must enter the destination address", MB_OK);
		return (1);
	}

	CFileDialog cfd (true);
	if (cfd.DoModal () == IDCANCEL)
		return (1);
	CString strSend = cfd.GetFileName();
//
//	Make sure we can read the file

	FILE *fp;
	if ((fp = fopen (cfd.GetPathName (), "rb")) == NULL)
	{
		AfxMessageBox ("Cannot open FTP source file", MB_OK);
		return (1);
	}
//
//	OK. Close it
	fclose (fp);
	CInternetSession cis;
	CFtpConnection *cfc;

	CFtpUserDlg ftp;
	if (ftp.DoModal() == IDCANCEL)
		return (1);
	CString strUser = ftp.GetFtpUser ();
	CString strPass = ftp.GetFtpPassword ();
	TRY
	{
		cfc = cis.GetFtpConnection (argv[1], (LPCSTR) strUser, (LPCSTR) strPass);
	}
	CATCH(CInternetException, e)
	{
		char errmsg [256];
		memset (errmsg, '\0', 256);
		e->GetErrorMessage (errmsg, 256);
		AfxMessageBox (errmsg, MB_OK);
		return (1);
	}
	END_CATCH
	CString strDirName;
	if (!cfc->PutFile (strSend, strSend, FTP_TRANSFER_TYPE_BINARY, 42))
	{
		AfxMessageBox ("Could not write file to host", MB_OK);
		nRetCode = 1;
	}
	cfc->Close ();
	return (nRetCode);
}