Re: Help Request: Running callback not working on some specific systems in Win32::Daemon.pm

--000000000000bcd7fc0589f9d255
Content-Type: text/plain; charset="UTF-8"

I urgently need assistance with this.

On a Windows 2016 server I am having a similar issue.  The service appears
to be running, but it seems the running and or timer callbacks are never
triggered.

On Wed, May 22, 2019, 4:07 PM John Simpson <[email protected]> wrote:

> Hi,
>
> I am having a problem on 242 servers where my service is running but not
> doing what it is supposed to do.
> I added the debug line as shown below.  I am getting first
> *SERVICE_STOPPED*, then *SERVICE_NOT_READY* after that.  I never get
> *SERVICE_RUNNING* on these machines.  On other machines it appears to be
> working fine without issue.
>
> Do you have any idea what I can do to fix this?  I really need to get this
> fixed ASAP.
>
> sub Callback_Running {
>     my ($Event, $Context) = @_;
> *print "State: " . Win32::Daemon::State();*
>     if (SERVICE_RUNNING == Win32::Daemon::State()) {
>         # do stuff
>
> The OS is Server 2012 R2 Standard 64-bit v6.3.9600 running Strawberry Perl
>
> Thanks,
>
>
> John Simpson
> 724-554-4464
>

--000000000000bcd7fc0589f9d255
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

<div dir=3D"auto"><div dir=3D"auto">I urgently need assistance with this.</=
div><div dir=3D"auto"><br></div>On a Windows 2016 server I am having a simi=
lar issue.=C2=A0 The service appears to be running, but it seems the runnin=
g and or timer callbacks are never triggered.</div><br><div class=3D"gmail_=
quote"><div dir=3D"ltr" class=3D"gmail_attr">On Wed, May 22, 2019, 4:07 PM =
John Simpson &lt;<a href=3D"mailto:[email protected]">john_simpson@s=
wajime.com</a>&gt; wrote:<br></div><blockquote class=3D"gmail_quote" style=
=3D"margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir=
=3D"ltr">Hi,<div><br></div><div>I am having a problem on 242 servers where =
my service is running but not doing what it is supposed to do.</div><div>I =
added the debug line as shown below.=C2=A0 I am getting first <b>SERVICE_ST=
OPPED</b>, then <b>SERVICE_NOT_READY</b> after that.=C2=A0 I never get <b>S=
ERVICE_RUNNING</b> on these machines.=C2=A0 On other machines it appears to=
 be working fine without issue.</div><div><br></div><div>Do you have any id=
ea what I can do to fix this?=C2=A0 I really need to get this fixed ASAP.</=
div><div><br><div>sub Callback_Running {<br></div><div>=C2=A0 =C2=A0 my ($E=
vent, $Context) =3D=C2=A0@_;</div><div><b>print &quot;State: &quot; . Win32=
::Daemon::State();</b></div><div>=C2=A0 =C2=A0 if (SERVICE_RUNNING =3D=3D W=
in32::Daemon::State()) {</div><div>=C2=A0 =C2=A0 =C2=A0 =C2=A0 # do stuff</=
div></div><div><br></div><div>The OS is Server 2012 R2 Standard 64-bit v6.3=
.9600 running Strawberry Perl</div><div><br></div><div>Thanks,</div><div><b=
r></div><div><br></div><div>John Simpson</div><div>724-554-4464</div></div>
</blockquote></div>

--000000000000bcd7fc0589f9d255--