winsvc: Stop the service when the supervisor is dead (#4909)

**Which issue(s) this PR fixes**: 
None.

**What this PR does / why we need it**: 
Even if the supervisor process is dead due to config error or etc, the
service process will continue running unexpectedly because no one
monitor it. This commit fix this issue.

**Docs Changes**:
Not needed.

**Release Note**: 
Same with the title.

Signed-off-by: Takuro Ashie <[email protected]>

Author: ashie

lib/fluent/winsvc.rb

@@ -48,6 +48,8 @@ def service_main_start(service_name)
   end
 
   class FluentdService < Daemon
+    ERROR_WAIT_NO_CHILDREN = 128
+
     @pid = 0
     @service_name = ''
 
@@ -57,18 +59,21 @@ def initialize(service_name)
 
     def service_main
       @pid = service_main_start(@service_name)
-      while running?
-        sleep 10
+      begin
+        loop do
+          sleep 5
+          break unless running?
+          raise Errno::ECHILD unless Process.waitpid2(@pid, Process::WNOHANG)
+        end
+      rescue Errno::ECHILD
+        @pid = 0
+        SetEvent(@@hStopEvent)
+        SetTheServiceStatus.call(SERVICE_STOPPED, ERROR_WAIT_NO_CHILDREN, 0, 0)
       end
     end
 
     def service_stop
-      if @pid <= 0
-        set_event(@service_name)
-        return
-      end
-
-      wait_supervisor_finished
+      wait_supervisor_finished if @pid > 0
     end
 
     def service_paramchange