1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir #include "macros.h"
29*cdf0e10cSrcweir 
30*cdf0e10cSrcweir // GetDiskSpaceExA wrapper for Win 95A
31*cdf0e10cSrcweir 
32*cdf0e10cSrcweir IMPLEMENT_THUNK( kernel32, TRYLOAD, BOOL, WINAPI, GetDiskFreeSpaceExA,(
33*cdf0e10cSrcweir   LPCSTR lpRootPathName,                  // directory name
34*cdf0e10cSrcweir   PULARGE_INTEGER lpFreeBytesAvailable,    // bytes available to caller
35*cdf0e10cSrcweir   PULARGE_INTEGER lpTotalNumberOfBytes,    // bytes on disk
36*cdf0e10cSrcweir   PULARGE_INTEGER lpTotalNumberOfFreeBytes // free bytes on disk
37*cdf0e10cSrcweir ))
38*cdf0e10cSrcweir {
39*cdf0e10cSrcweir 	DWORD	dwSectorsPerCluster, dwBytesPerSector, dwNumberOfFreeClusters, dwTotalNumberOfClusters;
40*cdf0e10cSrcweir 
41*cdf0e10cSrcweir 	BOOL	fSuccess = GetDiskFreeSpaceA( lpRootPathName, &dwSectorsPerCluster, &dwBytesPerSector, &dwNumberOfFreeClusters, &dwTotalNumberOfClusters );
42*cdf0e10cSrcweir 
43*cdf0e10cSrcweir 	if ( fSuccess )
44*cdf0e10cSrcweir 	{
45*cdf0e10cSrcweir 		ULONGLONG	ulBytesPerCluster = (ULONGLONG)dwSectorsPerCluster * (ULONGLONG)dwBytesPerSector;
46*cdf0e10cSrcweir 
47*cdf0e10cSrcweir 		if ( lpFreeBytesAvailable )
48*cdf0e10cSrcweir 			lpFreeBytesAvailable->QuadPart = ulBytesPerCluster * (ULONGLONG)dwNumberOfFreeClusters;
49*cdf0e10cSrcweir 
50*cdf0e10cSrcweir 		if ( lpTotalNumberOfBytes )
51*cdf0e10cSrcweir 			lpTotalNumberOfBytes->QuadPart = ulBytesPerCluster * (ULONGLONG)dwTotalNumberOfClusters;
52*cdf0e10cSrcweir 
53*cdf0e10cSrcweir 		if ( lpTotalNumberOfFreeBytes )
54*cdf0e10cSrcweir 			lpTotalNumberOfFreeBytes->QuadPart = ulBytesPerCluster * (ULONGLONG)dwNumberOfFreeClusters;
55*cdf0e10cSrcweir 	}
56*cdf0e10cSrcweir 
57*cdf0e10cSrcweir 	return fSuccess;
58*cdf0e10cSrcweir }
59*cdf0e10cSrcweir 
60