init_tohost.ec

来自「证券交易系统」· EC 代码 · 共 39 行

#include "../incl/bank.h"

$include sqlca;

extern int outloop;

static	void	sigkill (int i)
{
	outloop = 1;
	signal ( SIGALRM, SIG_IGN );
	alarm ( 1 );
}

int init_tohost( )
{
int	i;	


	signal ( SIGCLD, SIG_DFL );

	if ( sqlexit() < 0 ) WriteLog ( LOGFILE, "sqlexit err !\n" );

	signal ( SIGCLD, SIG_IGN );
	
	for ( i = 1; i < 19; i++ )
        {
	   if ( i == SIGUSR1 ) signal ( i, sigkill );
           else	signal ( i, SIG_IGN );
        }

	if ( init_worker() != 0 ) {
		WriteLog ( LOGFILE, "Init ntbkhold error!" );
		return -1;
	} 

	return(0);
}