summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog11
-rw-r--r--win32/win32.c46
2 files changed, 34 insertions, 23 deletions
diff --git a/ChangeLog b/ChangeLog
index 6ec501dc37..e5cfb46b08 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,14 @@
+Wed Jul 13 19:37:47 2005 Hirokazu Yamamoto <ocean@m2.ccsnet.ne.jp>
+
+ * win32/win32.c (rb_w32_mkdir): should set EEXIST (not EACCES)
+ if file or directory already exists. (bcc32)
+
+ * win32/win32.c (rb_w32_rmdir): should set ENOTDIR (not EINVAL)
+ if it is not directory. (bcc32, win32)
+
+ * win32/win32.c (rb_w32_rmdir, rb_w32_unlink): restore
+ FILE_ATTRIBUTE_READONLY flag on function failure.
+
Wed Jul 13 12:40:00 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp>
* ext/tcltklib/tcltklib.c: TclTkLib.do_one_event doesn't work.
diff --git a/win32/win32.c b/win32/win32.c
index c5ca269732..ee0c229621 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -157,6 +157,7 @@ static struct {
{ ERROR_NEGATIVE_SEEK, EINVAL },
{ ERROR_SEEK_ON_DEVICE, EACCES },
{ ERROR_DIR_NOT_EMPTY, ENOTEMPTY },
+ { ERROR_DIRECTORY, ENOTDIR },
{ ERROR_NOT_LOCKED, EACCES },
{ ERROR_BAD_PATHNAME, ENOENT },
{ ERROR_MAX_THRDS_REACHED, EAGAIN },
@@ -3394,19 +3395,17 @@ rb_w32_snprintf(char *buf, size_t size, const char *format, ...)
return ret;
}
-#undef mkdir
-#undef rmdir
int
rb_w32_mkdir(const char *path, int mode)
{
int ret = -1;
RUBY_CRITICAL(do {
- if (mkdir(path) == -1)
+ if (CreateDirectory(path, NULL) == FALSE) {
+ errno = map_errno(GetLastError());
break;
+ }
if (chmod(path, mode) == -1) {
- int save_errno = errno;
- rmdir(path);
- errno = save_errno;
+ RemoveDirectory(path);
break;
}
ret = 0;
@@ -3417,37 +3416,38 @@ rb_w32_mkdir(const char *path, int mode)
int
rb_w32_rmdir(const char *path)
{
- DWORD attr;
- int ret;
+ int ret = 0;
RUBY_CRITICAL({
- attr = GetFileAttributes(path);
+ const DWORD attr = GetFileAttributes(path);
if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_READONLY)) {
- attr &= ~FILE_ATTRIBUTE_READONLY;
- SetFileAttributes(path, attr);
+ SetFileAttributes(path, attr & ~FILE_ATTRIBUTE_READONLY);
}
- ret = rmdir(path);
- if (ret < 0 && attr != (DWORD)-1) {
- SetFileAttributes(path, attr);
+ if (RemoveDirectory(path) == FALSE) {
+ errno = map_errno(GetLastError());
+ ret = -1;
+ if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_READONLY)) {
+ SetFileAttributes(path, attr);
+ }
}
});
return ret;
}
-#undef unlink
int
rb_w32_unlink(const char *path)
{
- DWORD attr;
- int ret;
+ int ret = 0;
RUBY_CRITICAL({
- attr = GetFileAttributes(path);
+ const DWORD attr = GetFileAttributes(path);
if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_READONLY)) {
- attr &= ~FILE_ATTRIBUTE_READONLY;
- SetFileAttributes(path, attr);
+ SetFileAttributes(path, attr & ~FILE_ATTRIBUTE_READONLY);
}
- ret = unlink(path);
- if (ret < 0 && attr != (DWORD)-1) {
- SetFileAttributes(path, attr);
+ if (DeleteFile(path) == FALSE) {
+ errno = map_errno(GetLastError());
+ ret = -1;
+ if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_READONLY)) {
+ SetFileAttributes(path, attr);
+ }
}
});
return ret;