mirror of
https://github.com/dlang/phobos.git
synced 2025-04-29 14:40:30 +03:00
822 lines
16 KiB
D
822 lines
16 KiB
D
|
|
// Copyright (c) 2001-2003 by Digital Mars
|
|
// All Rights Reserved
|
|
// www.digitalmars.com
|
|
|
|
module std.file;
|
|
|
|
private import std.c.stdio;
|
|
private import std.path;
|
|
private import std.string;
|
|
|
|
/***********************************
|
|
*/
|
|
|
|
class FileException : Exception
|
|
{
|
|
private import std.syserror;
|
|
|
|
uint errno; // operating system error code
|
|
|
|
this(char[] name)
|
|
{
|
|
this(name, "file I/O");
|
|
}
|
|
|
|
this(char[] name, char[] message)
|
|
{
|
|
super(name ~ ": " ~ message);
|
|
}
|
|
|
|
this(char[] name, uint errno)
|
|
{
|
|
this(name, SysError.msg(errno));
|
|
this.errno = errno;
|
|
}
|
|
}
|
|
|
|
/***********************************
|
|
* Basic File operations.
|
|
*/
|
|
|
|
/* =========================== Win32 ======================= */
|
|
|
|
version (Win32)
|
|
{
|
|
|
|
private import std.c.windows.windows;
|
|
private import std.utf;
|
|
|
|
private int useWfuncs = 1;
|
|
|
|
static this()
|
|
{
|
|
// Win 95, 98, ME do not implement the W functions
|
|
useWfuncs = (GetVersion() < 0x80000000);
|
|
}
|
|
|
|
/********************************************
|
|
* Read a file.
|
|
* Returns:
|
|
* array of bytes read
|
|
*/
|
|
|
|
void[] read(char[] name)
|
|
{
|
|
DWORD size;
|
|
DWORD numread;
|
|
HANDLE h;
|
|
byte[] buf;
|
|
|
|
if (useWfuncs)
|
|
{
|
|
wchar* namez = std.utf.toUTF16z(name);
|
|
h = CreateFileW(namez,GENERIC_READ,FILE_SHARE_READ,null,OPEN_EXISTING,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
else
|
|
{
|
|
char* namez = toMBSz(name);
|
|
h = CreateFileA(namez,GENERIC_READ,FILE_SHARE_READ,null,OPEN_EXISTING,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
|
|
if (h == INVALID_HANDLE_VALUE)
|
|
goto err1;
|
|
|
|
size = GetFileSize(h, null);
|
|
if (size == INVALID_FILE_SIZE)
|
|
goto err2;
|
|
|
|
buf = new byte[size];
|
|
|
|
if (ReadFile(h,buf,size,&numread,null) != 1)
|
|
goto err2;
|
|
|
|
if (numread != size)
|
|
goto err2;
|
|
|
|
if (!CloseHandle(h))
|
|
goto err;
|
|
|
|
return buf;
|
|
|
|
err2:
|
|
CloseHandle(h);
|
|
err:
|
|
delete buf;
|
|
err1:
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
|
|
/*********************************************
|
|
* Write a file.
|
|
* Returns:
|
|
* 0 success
|
|
*/
|
|
|
|
void write(char[] name, void[] buffer)
|
|
{
|
|
HANDLE h;
|
|
DWORD numwritten;
|
|
|
|
if (useWfuncs)
|
|
{
|
|
wchar* namez = std.utf.toUTF16z(name);
|
|
h = CreateFileW(namez,GENERIC_WRITE,0,null,CREATE_ALWAYS,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
else
|
|
{
|
|
char* namez = toMBSz(name);
|
|
h = CreateFileA(namez,GENERIC_WRITE,0,null,CREATE_ALWAYS,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
if (h == INVALID_HANDLE_VALUE)
|
|
goto err;
|
|
|
|
if (WriteFile(h,buffer,buffer.length,&numwritten,null) != 1)
|
|
goto err2;
|
|
|
|
if (buffer.length != numwritten)
|
|
goto err2;
|
|
|
|
if (!CloseHandle(h))
|
|
goto err;
|
|
return;
|
|
|
|
err2:
|
|
CloseHandle(h);
|
|
err:
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
|
|
|
|
/*********************************************
|
|
* Append to a file.
|
|
*/
|
|
|
|
void append(char[] name, void[] buffer)
|
|
{
|
|
HANDLE h;
|
|
DWORD numwritten;
|
|
|
|
if (useWfuncs)
|
|
{
|
|
wchar* namez = std.utf.toUTF16z(name);
|
|
h = CreateFileW(namez,GENERIC_WRITE,0,null,OPEN_ALWAYS,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
else
|
|
{
|
|
char* namez = toMBSz(name);
|
|
h = CreateFileA(namez,GENERIC_WRITE,0,null,OPEN_ALWAYS,
|
|
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,cast(HANDLE)null);
|
|
}
|
|
if (h == INVALID_HANDLE_VALUE)
|
|
goto err;
|
|
|
|
SetFilePointer(h, 0, null, FILE_END);
|
|
|
|
if (WriteFile(h,buffer,buffer.length,&numwritten,null) != 1)
|
|
goto err2;
|
|
|
|
if (buffer.length != numwritten)
|
|
goto err2;
|
|
|
|
if (!CloseHandle(h))
|
|
goto err;
|
|
return;
|
|
|
|
err2:
|
|
CloseHandle(h);
|
|
err:
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Rename a file.
|
|
*/
|
|
|
|
void rename(char[] from, char[] to)
|
|
{
|
|
BOOL result;
|
|
|
|
if (useWfuncs)
|
|
result = MoveFileW(std.utf.toUTF16z(from), std.utf.toUTF16z(to));
|
|
else
|
|
result = MoveFileA(toMBSz(from), toMBSz(to));
|
|
if (!result)
|
|
throw new FileException(to, GetLastError());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Delete a file.
|
|
*/
|
|
|
|
void remove(char[] name)
|
|
{
|
|
BOOL result;
|
|
|
|
if (useWfuncs)
|
|
result = DeleteFileW(std.utf.toUTF16z(name));
|
|
else
|
|
result = DeleteFileA(toMBSz(name));
|
|
if (!result)
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Get file size.
|
|
*/
|
|
|
|
ulong getSize(char[] name)
|
|
{
|
|
HANDLE findhndl;
|
|
uint resulth;
|
|
uint resultl;
|
|
|
|
if (useWfuncs)
|
|
{
|
|
WIN32_FIND_DATAW filefindbuf;
|
|
|
|
findhndl = FindFirstFileW(std.utf.toUTF16z(name), &filefindbuf);
|
|
resulth = filefindbuf.nFileSizeHigh;
|
|
resultl = filefindbuf.nFileSizeLow;
|
|
}
|
|
else
|
|
{
|
|
WIN32_FIND_DATA filefindbuf;
|
|
|
|
findhndl = FindFirstFileA(toMBSz(name), &filefindbuf);
|
|
resulth = filefindbuf.nFileSizeHigh;
|
|
resultl = filefindbuf.nFileSizeLow;
|
|
}
|
|
|
|
if (findhndl == cast(HANDLE)-1)
|
|
{
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
FindClose(findhndl);
|
|
return (cast(ulong)resulth << 32) + resultl;
|
|
}
|
|
|
|
/***************************************************
|
|
* Does file (or directory) exist?
|
|
*/
|
|
|
|
int exists(char[] name)
|
|
{
|
|
uint result;
|
|
|
|
if (useWfuncs)
|
|
// http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/base/getfileattributes.asp
|
|
result = GetFileAttributesW(std.utf.toUTF16z(name));
|
|
else
|
|
result = GetFileAttributesA(toMBSz(name));
|
|
|
|
return (result == 0xFFFFFFFF) ? 0 : 1;
|
|
}
|
|
|
|
/***************************************************
|
|
* Get file attributes.
|
|
*/
|
|
|
|
uint getAttributes(char[] name)
|
|
{
|
|
uint result;
|
|
|
|
if (useWfuncs)
|
|
result = GetFileAttributesW(std.utf.toUTF16z(name));
|
|
else
|
|
result = GetFileAttributesA(toMBSz(name));
|
|
if (result == 0xFFFFFFFF)
|
|
{
|
|
throw new FileException(name, GetLastError());
|
|
}
|
|
return result;
|
|
}
|
|
|
|
/****************************************************
|
|
* Is name a file?
|
|
*/
|
|
|
|
int isfile(char[] name)
|
|
{
|
|
return (getAttributes(name) & FILE_ATTRIBUTE_DIRECTORY) == 0;
|
|
}
|
|
|
|
/****************************************************
|
|
* Is name a directory?
|
|
*/
|
|
|
|
int isdir(char[] name)
|
|
{
|
|
return (getAttributes(name) & FILE_ATTRIBUTE_DIRECTORY) != 0;
|
|
}
|
|
|
|
/****************************************************
|
|
* Change directory.
|
|
*/
|
|
|
|
void chdir(char[] pathname)
|
|
{ BOOL result;
|
|
|
|
if (useWfuncs)
|
|
result = SetCurrentDirectoryW(std.utf.toUTF16z(pathname));
|
|
else
|
|
result = SetCurrentDirectoryA(toMBSz(pathname));
|
|
|
|
if (!result)
|
|
{
|
|
throw new FileException(pathname, GetLastError());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Make directory.
|
|
*/
|
|
|
|
void mkdir(char[] pathname)
|
|
{ BOOL result;
|
|
|
|
if (useWfuncs)
|
|
result = CreateDirectoryW(std.utf.toUTF16z(pathname), null);
|
|
else
|
|
result = CreateDirectoryA(toMBSz(pathname), null);
|
|
|
|
if (!result)
|
|
{
|
|
throw new FileException(pathname, GetLastError());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Remove directory.
|
|
*/
|
|
|
|
void rmdir(char[] pathname)
|
|
{ BOOL result;
|
|
|
|
if (useWfuncs)
|
|
result = RemoveDirectoryW(std.utf.toUTF16z(pathname));
|
|
else
|
|
result = RemoveDirectoryA(toMBSz(pathname));
|
|
|
|
if (!result)
|
|
{
|
|
throw new FileException(pathname, GetLastError());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Get current directory.
|
|
*/
|
|
|
|
char[] getcwd()
|
|
{
|
|
if (useWfuncs)
|
|
{
|
|
wchar[] dir;
|
|
int length;
|
|
wchar c;
|
|
|
|
length = GetCurrentDirectoryW(0, &c);
|
|
if (!length)
|
|
goto Lerr;
|
|
dir = new wchar[length];
|
|
length = GetCurrentDirectoryW(length, dir);
|
|
if (!length)
|
|
goto Lerr;
|
|
return std.utf.toUTF8(dir[0 .. length]); // leave off terminating 0
|
|
}
|
|
else
|
|
{
|
|
char[] dir;
|
|
int length;
|
|
char c;
|
|
|
|
length = GetCurrentDirectoryA(0, &c);
|
|
if (!length)
|
|
goto Lerr;
|
|
dir = new char[length];
|
|
length = GetCurrentDirectoryA(length, dir);
|
|
if (!length)
|
|
goto Lerr;
|
|
return dir[0 .. length]; // leave off terminating 0
|
|
}
|
|
|
|
Lerr:
|
|
throw new FileException("getcwd", GetLastError());
|
|
}
|
|
|
|
/***************************************************
|
|
* Return contents of directory.
|
|
*/
|
|
|
|
char[][] listdir(char[] pathname)
|
|
{
|
|
char[][] result;
|
|
char[] c;
|
|
HANDLE h;
|
|
|
|
c = std.path.join(pathname, "*.*");
|
|
if (useWfuncs)
|
|
{
|
|
WIN32_FIND_DATAW fileinfo;
|
|
|
|
h = FindFirstFileW(std.utf.toUTF16z(c), &fileinfo);
|
|
if (h != INVALID_HANDLE_VALUE)
|
|
{
|
|
do
|
|
{ int i;
|
|
int clength;
|
|
|
|
// Skip "." and ".."
|
|
if (std.string.wcscmp(fileinfo.cFileName, ".") == 0 ||
|
|
std.string.wcscmp(fileinfo.cFileName, "..") == 0)
|
|
continue;
|
|
|
|
i = result.length;
|
|
result.length = i + 1;
|
|
clength = std.string.wcslen(fileinfo.cFileName);
|
|
result[i] = std.utf.toUTF8(fileinfo.cFileName[0 .. clength]);
|
|
} while (FindNextFileW(h,&fileinfo) != FALSE);
|
|
FindClose(h);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
WIN32_FIND_DATA fileinfo;
|
|
|
|
h = FindFirstFileA(toMBSz(c), &fileinfo);
|
|
if (h != INVALID_HANDLE_VALUE)
|
|
{
|
|
do
|
|
{ int i;
|
|
int clength;
|
|
|
|
// Skip "." and ".."
|
|
if (std.string.strcmp(fileinfo.cFileName, ".") == 0 ||
|
|
std.string.strcmp(fileinfo.cFileName, "..") == 0)
|
|
continue;
|
|
|
|
i = result.length;
|
|
result.length = i + 1;
|
|
clength = std.string.strlen(fileinfo.cFileName);
|
|
result[i] = fileinfo.cFileName[0 .. clength].dup;
|
|
} while (FindNextFileA(h,&fileinfo) != FALSE);
|
|
FindClose(h);
|
|
}
|
|
}
|
|
return result;
|
|
}
|
|
|
|
/******************************************
|
|
* Since Win 9x does not support the "W" API's, first convert
|
|
* to wchar, then convert to multibyte using the current code
|
|
* page.
|
|
* (Thanks to yaneurao for this)
|
|
*/
|
|
|
|
char* toMBSz(char[] s)
|
|
{
|
|
// Only need to do this if any chars have the high bit set
|
|
foreach (char c; s)
|
|
{
|
|
if (c >= 0x80)
|
|
{ char[] result;
|
|
int i;
|
|
wchar* ws = std.utf.toUTF16z(s);
|
|
result.length = WideCharToMultiByte(0, 0, ws, -1, null, 0, null, null);
|
|
i = WideCharToMultiByte(0, 0, ws, -1, result, result.length, null, null);
|
|
assert(i == result.length);
|
|
return result;
|
|
}
|
|
}
|
|
return std.string.toStringz(s);
|
|
}
|
|
|
|
}
|
|
|
|
/* =========================== linux ======================= */
|
|
|
|
version (linux)
|
|
{
|
|
|
|
private import std.c.linux.linux;
|
|
|
|
/********************************************
|
|
* Read a file.
|
|
* Returns:
|
|
* array of bytes read
|
|
*/
|
|
|
|
void[] read(char[] name)
|
|
{
|
|
uint size;
|
|
uint numread;
|
|
int fd;
|
|
struct_stat statbuf;
|
|
byte[] buf;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
//printf("file.read('%s')\n",namez);
|
|
fd = std.c.linux.linux.open(namez, O_RDONLY);
|
|
if (fd == -1)
|
|
{
|
|
//printf("\topen error, errno = %d\n",getErrno());
|
|
goto err1;
|
|
}
|
|
|
|
//printf("\tfile opened\n");
|
|
if (std.c.linux.linux.fstat(fd, &statbuf))
|
|
{
|
|
//printf("\tfstat error, errno = %d\n",getErrno());
|
|
goto err2;
|
|
}
|
|
size = statbuf.st_size;
|
|
buf = new byte[size];
|
|
|
|
numread = std.c.linux.linux.read(fd, cast(char*)buf, size);
|
|
if (numread != size)
|
|
{
|
|
//printf("\tread error, errno = %d\n",getErrno());
|
|
goto err2;
|
|
}
|
|
|
|
if (std.c.linux.linux.close(fd) == -1)
|
|
{
|
|
//printf("\tclose error, errno = %d\n",getErrno());
|
|
goto err;
|
|
}
|
|
|
|
return buf;
|
|
|
|
err2:
|
|
std.c.linux.linux.close(fd);
|
|
err:
|
|
delete buf;
|
|
|
|
err1:
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
/*********************************************
|
|
* Write a file.
|
|
* Returns:
|
|
* 0 success
|
|
*/
|
|
|
|
void write(char[] name, void[] buffer)
|
|
{
|
|
int fd;
|
|
int numwritten;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
fd = std.c.linux.linux.open(namez, O_CREAT | O_WRONLY | O_TRUNC, 0660);
|
|
if (fd == -1)
|
|
goto err;
|
|
|
|
numwritten = std.c.linux.linux.write(fd, buffer, buffer.length);
|
|
if (buffer.length != numwritten)
|
|
goto err2;
|
|
|
|
if (std.c.linux.linux.close(fd) == -1)
|
|
goto err;
|
|
|
|
return;
|
|
|
|
err2:
|
|
std.c.linux.linux.close(fd);
|
|
err:
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
|
|
/*********************************************
|
|
* Append to a file.
|
|
*/
|
|
|
|
void append(char[] name, void[] buffer)
|
|
{
|
|
int fd;
|
|
int numwritten;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
fd = std.c.linux.linux.open(namez, O_APPEND | O_WRONLY | O_CREAT, 0660);
|
|
if (fd == -1)
|
|
goto err;
|
|
|
|
numwritten = std.c.linux.linux.write(fd, buffer, buffer.length);
|
|
if (buffer.length != numwritten)
|
|
goto err2;
|
|
|
|
if (std.c.linux.linux.close(fd) == -1)
|
|
goto err;
|
|
|
|
return;
|
|
|
|
err2:
|
|
std.c.linux.linux.close(fd);
|
|
err:
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Rename a file.
|
|
*/
|
|
|
|
void rename(char[] from, char[] to)
|
|
{
|
|
char *fromz = toStringz(from);
|
|
char *toz = toStringz(to);
|
|
|
|
if (std.c.stdio.rename(fromz, toz) == -1)
|
|
throw new FileException(to, getErrno());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Delete a file.
|
|
*/
|
|
|
|
void remove(char[] name)
|
|
{
|
|
if (std.c.stdio.remove(toStringz(name)) == -1)
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Get file size.
|
|
*/
|
|
|
|
ulong getSize(char[] name)
|
|
{
|
|
uint size;
|
|
int fd;
|
|
struct_stat statbuf;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
//printf("file.getSize('%s')\n",namez);
|
|
fd = std.c.linux.linux.open(namez, O_RDONLY);
|
|
if (fd == -1)
|
|
{
|
|
//printf("\topen error, errno = %d\n",getErrno());
|
|
goto err1;
|
|
}
|
|
|
|
//printf("\tfile opened\n");
|
|
if (std.c.linux.linux.fstat(fd, &statbuf))
|
|
{
|
|
//printf("\tfstat error, errno = %d\n",getErrno());
|
|
goto err2;
|
|
}
|
|
size = statbuf.st_size;
|
|
|
|
if (std.c.linux.linux.close(fd) == -1)
|
|
{
|
|
//printf("\tclose error, errno = %d\n",getErrno());
|
|
goto err;
|
|
}
|
|
|
|
return size;
|
|
|
|
err2:
|
|
std.c.linux.linux.close(fd);
|
|
err:
|
|
err1:
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
|
|
/***************************************************
|
|
* Get file attributes.
|
|
*/
|
|
|
|
uint getAttributes(char[] name)
|
|
{
|
|
struct_stat statbuf;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
if (std.c.linux.linux.stat(namez, &statbuf))
|
|
{
|
|
throw new FileException(name, getErrno());
|
|
}
|
|
|
|
return statbuf.st_mode;
|
|
}
|
|
|
|
/****************************************************
|
|
* Does file/directory exist?
|
|
*/
|
|
|
|
int exists(char[] name)
|
|
{
|
|
struct_stat statbuf;
|
|
char *namez;
|
|
|
|
namez = toStringz(name);
|
|
if (std.c.linux.linux.stat(namez, &statbuf))
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/****************************************************
|
|
* Is name a file?
|
|
*/
|
|
|
|
int isfile(char[] name)
|
|
{
|
|
return getAttributes(name) & S_IFREG; // regular file
|
|
}
|
|
|
|
/****************************************************
|
|
* Is name a directory?
|
|
*/
|
|
|
|
int isdir(char[] name)
|
|
{
|
|
return getAttributes(name) & S_IFDIR;
|
|
}
|
|
|
|
/****************************************************
|
|
* Change directory.
|
|
*/
|
|
|
|
void chdir(char[] pathname)
|
|
{
|
|
if (std.c.linux.linux.chdir(toStringz(pathname)))
|
|
{
|
|
throw new FileException(pathname, getErrno());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Make directory.
|
|
*/
|
|
|
|
void mkdir(char[] pathname)
|
|
{
|
|
if (std.c.linux.linux.mkdir(toStringz(pathname), 0777))
|
|
{
|
|
throw new FileException(pathname, getErrno());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Remove directory.
|
|
*/
|
|
|
|
void rmdir(char[] pathname)
|
|
{
|
|
if (std.c.linux.linux.rmdir(toStringz(pathname)))
|
|
{
|
|
throw new FileException(pathname, getErrno());
|
|
}
|
|
}
|
|
|
|
/****************************************************
|
|
* Get current directory.
|
|
*/
|
|
|
|
char[] getcwd()
|
|
{ char* p;
|
|
|
|
p = std.c.linux.linux.getcwd(null, 0);
|
|
if (!p)
|
|
{
|
|
throw new FileException("cannot get cwd", getErrno());
|
|
}
|
|
|
|
int length = std.string.strlen(p);
|
|
char[] buf = new char[length];
|
|
buf[] = p[0 .. length];
|
|
std.c.stdlib.free(p);
|
|
return buf;
|
|
}
|
|
|
|
/***************************************************
|
|
* Return contents of directory.
|
|
*/
|
|
|
|
char[][] listdir(char[] pathname)
|
|
{
|
|
assert(0); // BUG: not implemented
|
|
return null;
|
|
}
|
|
|
|
}
|