* win32/win32.c (kill): fix typo and add signal 0 support.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3796 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,11 +1,15 @@
+Thu May 15 09:32:25 2003  NAKAMURA Usaku <usa@ruby-lang.org>
+
+	* win32/win32.c (kill): fix typo and add signal 0 support.
+
 Wed May 14 20:09:26 2003  why the lucky stiff <ruby-cvs@whytheluckystiff.net>
 
-    * ext/syck/gram.c: sequence-in-map shortcut, transfer methods on
-      sequence-in-sequence, memory leak in mapping merge.
+	* ext/syck/gram.c: sequence-in-map shortcut, transfer methods on
+	  sequence-in-sequence, memory leak in mapping merge.
 
-    * ext/syck/syck.c: memory leak in domain anchoring.
+	* ext/syck/syck.c: memory leak in domain anchoring.
 
-    * lib/yaml/rubytypes.rb, lib/yaml/types.rb: eliminated 1.6.x code.
+	* lib/yaml/rubytypes.rb, lib/yaml/types.rb: eliminated 1.6.x code.
 
 Wed May 14 19:56:43 2003  NAKAMURA Usaku <usa@ruby-lang.org>
 

win32/win32.c

@@ -2540,10 +2540,30 @@ kill(int pid, int sig)
     }
 
     if (IsWin95()) pid = -pid;
-    if ((unsigned int)pid == GetCurrentProcessId() && sig != SIGKILL)
+    if ((unsigned int)pid == GetCurrentProcessId() &&
+	(sig != 0 && sig != SIGKILL))
 	return raise(sig);
 
     switch (sig) {
+      case 0:
+	RUBY_CRITICAL({
+	    HANDLE hProc =
+		OpenProcess(PROCESS_QUERY_INFORMATION, FALSE, (DWORD)pid);
+	    if (hProc == NULL || hProc == INVALID_HANDLE_VALUE) {
+		if (GetLastError() == ERROR_INVALID_PARAMETER) {
+		    errno = ESRCH;
+		}
+		else {
+		    errno = EPERM;
+		}
+		ret = -1;
+	    }
+	    else {
+		CloseHandle(hProc);
+	    }
+	});
+	break;
+
       case SIGINT:
 	RUBY_CRITICAL({
 	    if (!GenerateConsoleCtrlEvent(CTRL_C_EVENT, (DWORD)pid)) {
@@ -2576,7 +2596,7 @@ kill(int pid, int sig)
 	});
 	break;
 
-      define:
+      default:
 	errno = EINVAL;
 	ret = -1;
 	break;