// 7-Zip FileSystem.cpp for DOS

#include "StdAfx.h"

#ifndef UNDER_CE

#ifndef _UNICODE
#include "../Common/StringConvert.h"
#endif

#include "FileSystem.h"
#include "Defs.h"

namespace NDOS {
namespace NFile {
namespace NSystem {

#ifdef _WIN32

bool MyGetVolumeInformation(
    CFSTR rootPath,
    UString &volumeName,
    LPDWORD volumeSerialNumber,
    LPDWORD maximumComponentLength,
    LPDWORD fileSystemFlags,
    UString &fileSystemName)
{
  BOOL res;
#if defined(__WATCOMC__)
    TCHAR v[MAX_PATH + 2]; v[0] = 0;
    TCHAR f[MAX_PATH + 2]; f[0] = 0;
    res = GetVolumeInformation(fs2fas(rootPath),
        v, MAX_PATH,
        volumeSerialNumber, maximumComponentLength, fileSystemFlags,
        f, MAX_PATH);
    volumeName = MultiByteToUnicodeString(v);
    fileSystemName = MultiByteToUnicodeString(f);
#else
  #ifndef _UNICODE
  if (!g_IsNT)
  {
    TCHAR v[MAX_PATH + 2]; v[0] = 0;
    TCHAR f[MAX_PATH + 2]; f[0] = 0;
    res = GetVolumeInformation(fs2fas(rootPath),
        v, MAX_PATH,
        volumeSerialNumber, maximumComponentLength, fileSystemFlags,
        f, MAX_PATH);
    volumeName = MultiByteToUnicodeString(v);
    fileSystemName = MultiByteToUnicodeString(f);
  }
  else
  #endif
  {
    WCHAR v[MAX_PATH + 2]; v[0] = 0;
    WCHAR f[MAX_PATH + 2]; f[0] = 0;
    res = GetVolumeInformationW(fs2us(rootPath),
        v, MAX_PATH,
        volumeSerialNumber, maximumComponentLength, fileSystemFlags,
        f, MAX_PATH);
    volumeName = v;
    fileSystemName = f;
  }
#endif // defined(__WATCOMC__)
  return BOOLToBool(res);
}

UINT MyGetDriveType(CFSTR pathName)
{
#if defined(__WATCOMC__)
  return GetDriveType(fs2fas(pathName));
#else
  #ifndef _UNICODE
  if (!g_IsNT)
  {
    return GetDriveType(fs2fas(pathName));
  }
  else
  #endif
  {
    return GetDriveTypeW(fs2us(pathName));
  }
#endif // defined(__WATCOMC__)
}

#if !defined(__WATCOMC__)
#if !defined(Z7_WIN32_WINNT_MIN) || Z7_WIN32_WINNT_MIN < 0x0400
// GetDiskFreeSpaceEx requires Windows95-OSR2, NT4
#define Z7_USE_DYN_GetDiskFreeSpaceEx
#endif
#endif // !defined(__WATCOMC__)

#ifdef Z7_USE_DYN_GetDiskFreeSpaceEx
typedef BOOL (WINAPI * Func_GetDiskFreeSpaceExA)(
  LPCSTR lpDirectoryName,                  // directory name
  PULARGE_INTEGER lpFreeBytesAvailable,    // bytes available to caller
  PULARGE_INTEGER lpTotalNumberOfBytes,    // bytes on disk
  PULARGE_INTEGER lpTotalNumberOfFreeBytes // free bytes on disk
);

typedef BOOL (WINAPI * Func_GetDiskFreeSpaceExW)(
  LPCWSTR lpDirectoryName,                 // directory name
  PULARGE_INTEGER lpFreeBytesAvailable,    // bytes available to caller
  PULARGE_INTEGER lpTotalNumberOfBytes,    // bytes on disk
  PULARGE_INTEGER lpTotalNumberOfFreeBytes // free bytes on disk
);
#endif

bool MyGetDiskFreeSpace(CFSTR rootPath, UInt64 &clusterSize, UInt64 &totalSize, UInt64 &freeSize)
{
  DWORD numSectorsPerCluster, bytesPerSector, numFreeClusters, numClusters;
  bool sizeIsDetected = false;
  
#if defined(__WATCOMC__)
    ULARGE_INTEGER freeBytesToCaller2, totalSize2, freeSize2;
    sizeIsDetected = 0;
    if (!::GetDiskFreeSpace(fs2fas(rootPath), &numSectorsPerCluster, &bytesPerSector, &numFreeClusters, &numClusters))
      return false;
#else
  #ifndef _UNICODE
  if (!g_IsNT)
  {
#ifdef Z7_USE_DYN_GetDiskFreeSpaceEx
    const
    Func_GetDiskFreeSpaceExA f = Z7_GET_PROC_ADDRESS(
    Func_GetDiskFreeSpaceExA, GetModuleHandle(TEXT("kernel32.dll")),
        "GetDiskFreeSpaceExA");
    if (f)
#endif
    {
      ULARGE_INTEGER freeBytesToCaller2, totalSize2, freeSize2;
      sizeIsDetected = BOOLToBool(
#ifdef Z7_USE_DYN_GetDiskFreeSpaceEx
        f
#else
        GetDiskFreeSpaceExA
#endif
          (fs2fas(rootPath), &freeBytesToCaller2, &totalSize2, &freeSize2));
      totalSize = totalSize2.QuadPart;
      freeSize = freeSize2.QuadPart;
    }
    if (!::GetDiskFreeSpace(fs2fas(rootPath), &numSectorsPerCluster, &bytesPerSector, &numFreeClusters, &numClusters))
      return false;
  }
  else
  #endif
  {
#ifdef Z7_USE_DYN_GetDiskFreeSpaceEx
    const
    Func_GetDiskFreeSpaceExW f = Z7_GET_PROC_ADDRESS(
    Func_GetDiskFreeSpaceExW, GetModuleHandle(TEXT("kernel32.dll")),
        "GetDiskFreeSpaceExW");
    if (f)
#endif
    {
      ULARGE_INTEGER freeBytesToCaller2, totalSize2, freeSize2;
      sizeIsDetected = BOOLToBool(
#ifdef Z7_USE_DYN_GetDiskFreeSpaceEx
        f
#else
        GetDiskFreeSpaceExW
#endif
          (fs2us(rootPath), &freeBytesToCaller2, &totalSize2, &freeSize2));
      totalSize = totalSize2.QuadPart;
      freeSize = freeSize2.QuadPart;
    }
    if (!::GetDiskFreeSpaceW(fs2us(rootPath), &numSectorsPerCluster, &bytesPerSector, &numFreeClusters, &numClusters))
      return false;
  }
#endif // defined(__WATCOMC__)
  clusterSize = (UInt64)bytesPerSector * (UInt64)numSectorsPerCluster;
  if (!sizeIsDetected)
  {
    totalSize = clusterSize * (UInt64)numClusters;
    freeSize = clusterSize * (UInt64)numFreeClusters;
  }
  return true;
}

#endif // defined(_WIN32)

/*
bool Is_File_LimitedBy_4GB(CFSTR _path, bool &isFsDetected)
{
  isFsDetected = false;
  FString path (_path);
  path.DeleteFrom(NName::GetRootPrefixSize(path));
  // GetVolumeInformation supports super paths.
  // NName::If_IsSuperPath_RemoveSuperPrefix(path);
  if (!path.IsEmpty())
  {
    DWORD volumeSerialNumber, maximumComponentLength, fileSystemFlags;
    UString volName, fileSystemName;
    if (MyGetVolumeInformation(path, volName,
        &volumeSerialNumber, &maximumComponentLength, &fileSystemFlags,
        fileSystemName))
    {
      isFsDetected = true;
      if (fileSystemName.IsPrefixedBy_Ascii_NoCase("fat"))
        return true;
    }
  }
  return false;
}
*/

}}}

#endif // defined(UNDER_CE)
