[ruby-dev:13762] Re: mswin32/ming32 system patch (experimental)

なかだです。

At Sat, 7 Jul 2001 03:49:39 +0900,
U.Nakamura <[e-mail]> wrote:
> これをそのまま採用して、末尾のパッチのようになりました。

  だいたい問題なさそうでしょうか。Win98のノートが一台あるんです
が、とんでもなく不安定でほとんど確認にならないもんで。

> この先の拡張は、別途fork+execなメソッドの議論の後ですね。
> # あるいは、fork(のように動くもの)を実装するか :-P

  cygwinではデバッグ用のAPIを使ってforkを実装してるそうですが、
はたしてそこまで必要かどうか。そこまでやりたいなら素直にcygwin
使えばとか思っちゃうんですが。popenとかopen3相当のことができれ
ば、スレッドもあることだしたぶんforkがなくてもそんなに困ること
はないんじゃないかと思うんですが。

> これでcommitしようと思ってますが、どうでしょう?

  すいません、一ヶ所見落としてました。RUBY_CRITICAL()の中から直
接returnすると、critical sectionを開放しないままになってしまう
のでまずいです。diff -w のパッチなのでインデントは適当に直して
ください。


diff -u2pw win32/win32.c~ win32/win32.c
--- win32/win32.c~	Sat Jul  7 05:43:48 2001
+++ win32/win32.c	Sat Jul  7 05:45:17 2001
@@ -2401,4 +2401,6 @@ int
 kill(int pid, int sig)
 {
+    int ret = 0;
+
     if ((unsigned int)pid == GetCurrentProcessId() && sig != SIGKILL)
 	return raise(sig);
@@ -2408,5 +2410,5 @@ kill(int pid, int sig)
 	    if (!GenerateConsoleCtrlEvent(CTRL_C_EVENT, (DWORD)pid)) {
 		errno = GetLastError();
-		return -1;
+		ret = -1;
 	    }
 	});
@@ -2414,5 +2416,4 @@ kill(int pid, int sig)
     else if (sig == SIGKILL && pid > 0) {
 	HANDLE hProc;
-	int ret = 0;
 
 	RUBY_CRITICAL({
@@ -2426,7 +2427,7 @@ kill(int pid, int sig)
 		    errno = EPERM;
 		}
-		return -1;
+		ret = -1;
 	    }
-
+	    else {
 	    if (!TerminateProcess(hProc, 0)) {
 		errno = EPERM;
@@ -2434,13 +2435,13 @@ kill(int pid, int sig)
 	    }
 	    CloseHandle(hProc);
+	    }
 	});
-	return ret;
     }
     else {
 	errno = EINVAL;
-	return -1;
+	ret = -1;
     }
 
-    return 0;
+    return ret;
 }
 


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦