//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
#pragma link "wininet.lib"
#pragma link "RzPrgres"
//---------------------------------------------------------------------------
#include "HttpUnit.h"
#include "RzPrgres.hpp"
//---------------------------------------------------------------------------
#pragma package(smart_init)
//---------------------------------------------------------------------------

bool __fastcall THttpControl::HTTPUp(Char *URL, Char *Path, void* ProgressBar)
{
  HINTERNET hInternet, hURL;
  HANDLE hFile= NULL;
  DWORD Size;
	DWORD dwRead, dwWritten, Recv=0;
  char buf[100000];
  MSG Message;

	//인터넷 연결
	hInternet=InternetOpen(L"HTTPClient", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
	if (hInternet==NULL) return false;

  //URL을 연다.
	hURL=InternetOpenUrl(hInternet, URL, NULL, 0, INTERNET_FLAG_RELOAD, 0);
  if (hURL==NULL) {
    InternetCloseHandle(hInternet);
    return false;
  }

  //다운로드 중임과 취소는 하지 않음을 전역변수에 기록한다.
  bStopHttpDownLoad=false;
  bDownLoading=false;

  //로컬 파일을 생성한다.
	hFile=CreateFile(Path, GENERIC_READ, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

  do {
		//다운로드를 받아 로컬 파일에 기록한다.
    InternetQueryDataAvailable(hURL, &Size, 0, 0);
    ReadFile(hFile, buf, Size, &dwRead, NULL);
    InternetWriteFile(hURL, buf, Size, &dwWritten);

    //다운로드 받은 양을 메세지로 전달
    Recv+=dwWritten;

    //취소 처리
    if (bStopHttpDownLoad) {
      break;
    }
  } while(dwWritten!=0);

  InternetCloseHandle(hURL);
  InternetCloseHandle(hInternet);
  CloseHandle(hFile);
  bDownLoading=false;

  return true;
}
//---------------------------------------------------------------------------
bool __fastcall THttpControl::HTTPDown(Char *URL, Char *Path, void* ProgressBar,
  int Process_Percent)
{
  HINTERNET hInternet = NULL, hURL = NULL;
  HANDLE hFile = NULL;
  DWORD Size;
  DWORD dwRead, dwWritten, Recv=0;
  char buf[100000];
  MSG Message;
	String receive_data;

  DWORD BuffSize = 1024, Reserved = 0;
  int FileSize;
  bool bSizeIsKnown;
  char FileSizeBuff[1024];
  float progress = 0.0;

	TRzProgressBar *pProgressBar =(TRzProgressBar*)ProgressBar;
	int ProgressBar_Percent = pProgressBar->Percent;

  //인터넷 연결
	hInternet=InternetOpen(L"HTTPClient", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
	if (hInternet==NULL) return false;

	//URL을 연다.
	hURL=InternetOpenUrl(hInternet, URL, NULL, 0, INTERNET_FLAG_RELOAD, 0);
  if (hURL==NULL) {
    InternetCloseHandle(hInternet);
    return false;
  }

  //다운로드 할 File size를 확인한다.
  bSizeIsKnown = HttpQueryInfo(hURL, HTTP_QUERY_CONTENT_LENGTH, FileSizeBuff, &BuffSize, &Reserved);
  if (!bSizeIsKnown) goto fail;
  receive_data = FileSizeBuff;
  FileSize = receive_data.ToInt();

  //다운로드 중임과 취소는 하지 않음을 전역변수에 기록한다.
  bStopHttpDownLoad=false;
  bDownLoading=false;

  //로컬 파일을 생성한다.
	hFile=CreateFile(Path, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

  do {
    //다운로드를 받아 로컬 파일에 기록한다.
    InternetQueryDataAvailable(hURL, &Size, 0, 0);
    InternetReadFile(hURL, buf, Size, &dwRead);

    receive_data = buf;
    if (receive_data.Pos("404 Not Found") != 0) goto fail;

    WriteFile(hFile, buf, dwRead, &dwWritten, NULL);

    //다운로드 받은 양을 메세지로 전달
    Recv+=dwWritten;
    progress = (float)Process_Percent * (float)Recv / FileSize;
		pProgressBar->Percent = ProgressBar_Percent + progress;

    //취소 처리
		if (bStopHttpDownLoad) {
      break;
    }
  } while(dwRead!=0);

  InternetCloseHandle(hURL);
  InternetCloseHandle(hInternet);
  CloseHandle(hFile);
  bDownLoading=false;

  return true;

fail:
  if (hURL) InternetCloseHandle(hURL);
  if (hInternet) InternetCloseHandle(hInternet);
  if (hFile) CloseHandle(hFile);
  DeleteFile(Path);
	bDownLoading=false;

  return false;
}
//---------------------------------------------------------------------------