#include <config.h>
#include <platform.h>
#include <stdio.h>
#include <string.h>
#undef STRICT
#include <java/io/File.h>
#include <java/io/IOException.h>
#include <java/util/Vector.h>
#include <java/lang/String.h>
#include <java/io/FilenameFilter.h>
#include <java/io/FileFilter.h>
#include <java/lang/System.h>
#define WIN32_EPOCH_MILLIS 11644473600000LL
jboolean
java::io::File::_access (jint query)
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
JvAssert (query == READ || query == WRITE || query == EXISTS);
DWORD attributes = GetFileAttributes (canon);
if ((query == EXISTS) || (query == READ))
return (attributes == 0xffffffff) ? false : true;
else
return ((attributes != 0xffffffff) &&
((attributes & FILE_ATTRIBUTE_READONLY) == 0)) ? true : false;
}
jboolean
java::io::File::_stat (jint query)
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
JvAssert (query == DIRECTORY || query == ISFILE);
DWORD attributes = GetFileAttributes (canon);
if (attributes == 0xffffffff)
return false;
if (query == DIRECTORY)
return attributes & FILE_ATTRIBUTE_DIRECTORY ? true : false;
else
return attributes & FILE_ATTRIBUTE_DIRECTORY ? false : true;
}
jlong
java::io::File::attr (jint query)
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
JvAssert (query == MODIFIED || query == LENGTH);
WIN32_FIND_DATA info;
HANDLE sHandle;
if ( ( sHandle = FindFirstFile( canon, &info)) == INVALID_HANDLE_VALUE)
return 0;
FindClose( sHandle);
if (query == LENGTH)
return ((long long)info.nFileSizeHigh) << 32
| (unsigned long long)info.nFileSizeLow;
else
{
return (((((long long)info.ftLastWriteTime.dwHighDateTime) << 32)
| ((unsigned long long)info.ftLastWriteTime.dwLowDateTime))
- WIN32_EPOCH_MILLIS*10000LL) / 10000LL;
}
}
jstring
java::io::File::getCanonicalPath (void)
{
JV_TEMP_STRING_WIN32 (cpath, path);
LPCTSTR thepath = cpath.buf();
if (*thepath == 0)
thepath = _T(".");
LPTSTR unused;
TCHAR buf2[MAX_PATH];
if(!GetFullPathName(thepath, MAX_PATH, buf2, &unused))
throw new IOException (JvNewStringLatin1 ("GetFullPathName failed"));
return _Jv_Win32NewString (buf2);
}
jboolean
java::io::File::isAbsolute (void)
{
if (path->length () > 2
&& (path->charAt (0) == '\\') && (path->charAt (1) == '\\'))
return true;
if (path->length() < 3)
return false;
if ((path->charAt(0) < 'a' || path->charAt(0) > 'z')
&& (path->charAt(0) < 'A' || path->charAt(0) > 'Z'))
return false;
return (path->charAt(1) == ':'
&& (path->charAt(2) == '/' || path->charAt(2) == '\\'));
}
void java::io::File::init_native ()
{
maxPathLen = MAX_PATH;
caseSensitive = false;
}
jobjectArray
java::io::File::performList (java::io::FilenameFilter *filter,
java::io::FileFilter *fileFilter,
java::lang::Class *clazz)
{
jstring canon = getCanonicalPath();
if (! canon)
return NULL;
int len = canon->length();
TCHAR buf[len + 5];
JV_TEMP_STRING_WIN32(canonstr, canon);
_tcscpy(buf, canonstr);
if (buf[len - 1] == _T('\\'))
_tcscpy (&buf[len], _T("*.*"));
else
_tcscpy (&buf[len], _T("\\*.*"));
WIN32_FIND_DATA data;
HANDLE handle = FindFirstFile (buf, &data);
if (handle == INVALID_HANDLE_VALUE)
return NULL;
java::util::Vector *vec = new java::util::Vector ();
do
{
if (_tcscmp (data.cFileName, _T(".")) &&
_tcscmp (data.cFileName, _T("..")))
{
jstring name = _Jv_Win32NewString (data.cFileName);
if (filter && !filter->accept(this, name))
continue;
if (clazz == &java::io::File::class$)
{
java::io::File *file = new java::io::File (this, name);
if (fileFilter && !fileFilter->accept(file))
continue;
vec->addElement (file);
}
else
vec->addElement (name);
}
}
while (FindNextFile (handle, &data));
if (GetLastError () != ERROR_NO_MORE_FILES)
return NULL;
FindClose (handle);
jobjectArray ret = JvNewObjectArray (vec->size(), clazz, NULL);
vec->copyInto (ret);
return ret;
}
jboolean
java::io::File::performMkdir (void)
{
JV_TEMP_STRING_WIN32 (cpath, path);
return (CreateDirectory(cpath, NULL)) ? true : false;
}
jboolean
java::io::File::performRenameTo (File *dest)
{
JV_TEMP_STRING_WIN32 (pathFrom, path);
JV_TEMP_STRING_WIN32 (pathTo, dest->path);
return (MoveFile(pathFrom, pathTo)) ? true : false;
}
jboolean
java::io::File::performDelete ()
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
DWORD attributes = GetFileAttributes (canon);
if (attributes == 0xffffffff)
return false;
if (attributes & FILE_ATTRIBUTE_DIRECTORY)
return (RemoveDirectory (canon)) ? true : false;
else
return (DeleteFile (canon)) ? true : false;
}
jboolean java::io::File::performCreate (void)
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
HANDLE h = CreateFile (canon, 0, 0, NULL, CREATE_NEW,
FILE_ATTRIBUTE_NORMAL, NULL);
if (h != INVALID_HANDLE_VALUE)
{
CloseHandle (h);
return true;
}
else
{
if (GetLastError () == ERROR_ALREADY_EXISTS)
return false;
else
throw new IOException (JvNewStringLatin1 ("CreateFile failed"));
}
}
jboolean java::io::File::performSetReadOnly ()
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
DWORD attrs = GetFileAttributes (canon);
if (attrs != INVALID_FILE_ATTRIBUTES)
{
if (SetFileAttributes (canon, attrs | FILE_ATTRIBUTE_READONLY) != 0)
return true;
else
return false;
}
else
return false;
}
jboolean java::io::File::performSetLastModified (jlong time)
{
JV_TEMP_STRING_WIN32 (canon, getCanonicalPath());
if (!canon)
return false;
FILETIME modTime;
long long mTime100ns = ((long long) time
+ WIN32_EPOCH_MILLIS) * 10000LL;
modTime.dwLowDateTime = (DWORD) mTime100ns;
modTime.dwHighDateTime = (DWORD) (mTime100ns >> 32);
jboolean retVal = false;
HANDLE h = CreateFile (canon, FILE_WRITE_ATTRIBUTES,
FILE_SHARE_READ | FILE_SHARE_WRITE,
NULL, OPEN_EXISTING, 0, NULL);
if (h != INVALID_HANDLE_VALUE)
{
if (SetFileTime (h, NULL, &modTime, &modTime) != 0)
retVal = true;
CloseHandle (h);
}
return retVal;
}
JArray<java::io::File*>* java::io::File::performListRoots ()
{
DWORD drivesBitmap = GetLogicalDrives ();
DWORD mask;
int numDrives = 0;
mask = 1;
for (int i = 0; i < 26; i++)
{
if ((drivesBitmap & mask) != 0)
numDrives++;
mask <<= 1;
}
JArray<java::io::File *> *roots
= reinterpret_cast <JArray<java::io::File *>*>
(JvNewObjectArray (numDrives, &java::io::File::class$, NULL));
::java::io::File **rootsArray = elements (roots);
char aDriveRoot[] = {'A', ':', '\\', '\0'};
mask = 1;
for (int i = 0, j = 0; i < 26; i++)
{
if ((drivesBitmap & mask) != 0)
{
rootsArray[j]
= new ::java::io::File (JvNewStringLatin1 (aDriveRoot));
j++;
}
mask <<= 1;
aDriveRoot[0]++;
}
return roots;
}