haltsys source?

Does anyone know if there is source available for haltsys? All of the
posts that I’ve seen archived on Google mention ftp.fdma.com (the authors
website), but I can’t get that site to answer.

/----------------------------------------------------------------------------/

static void shutdown(void)
{
struct sched_param param;
sigset_t bits;
union
{
struct _proc_shutdown s;
struct _proc_shutdown_reply r;
}msg;
qnx_sync(getnid());
bits=~0L;
sigprocmask(SIG_BLOCK,&bits,0);
msg.s.type=_PROC_SHUTDOWN;
msg.s.signum=SIGPWR;
Send(PROC_PID,&msg.s,&msg.r,sizeof(msg.s),sizeof(msg.r));
sleep(2);
param.sched_priority=PRIO_FIFO_MAX;
sched_setscheduler(0,SCHED_FIFO,&param); }
/----------------------------------------------------------------------------/


void halt(void)
{
shutdown();
while(1)
Yield();
}
/----------------------------------------------------------------------------/

void reboot(void)
{
union
{
struct _proc_shutdown s;
struct _proc_shutdown_reply r;
}msg;
shutdown();
msg.s.type=_PROC_SHUTDOWN;
msg.s.signum=-1; // Restart
Send(PROC_PID,&msg.s,&msg.r,sizeof(msg.s),sizeof(msg.r));
}
/----------------------------------------------------------------------------/



Paul wrote:

Does anyone know if there is source available for haltsys? All of the
posts that I’ve seen archived on Google mention ftp.fdma.com (the authors
website), but I can’t get that site to answer.
\


Joerg Hering
Chief Developer VDR
e-mail: jhering@avecs-bergen.de
privat: hering.ruegen@t-online.de
mobile: jhering.ruegen@gmx.de

AVECS Bergen GmbH
development department
Billrothstraße 11a
D-18528 Bergen auf Rügen

Tel.: +49 3838 2119101
Fax: +49 3838 2119105
Mobile: +49 172 3896974
URL: http://www.avecs-bergen.de