/*	
	Copyright (c) 1996, Ruslan R. Laishev (@RRL)
*/

#include	"nntp.h"
#include	"nntp_worker.h"
#include	"nntp_rms.h"
#include	"nntp_lib.h"
#include	"nntp_log.h"
#include	"nntp_conf.h"

char	*ID$IDcpy = "Copyright (c) 1996-97,Ruslan R. Laishev (@RRL).";
char	*ID$IDver = "DECThreads NNTP Server for OpenVMS Ver. 0.00.";

/*
 *--------------------------------------------------------------------------------
 */
void	main	(void)
{
pthread_t	th;
long		status;

	NNTP_LOG(LOGI,ID$IDcpy);
        NNTP_LOG(LOGI,ID$IDver);

        NNTP_LOG(LOGI,"Get configuration information");
        nntp_conf_get();


        NNTP_LOG(LOGI,"Current configuration follows.");

        NNTP_LOG(LOGI,"LocalHost\t\t-%s",nntp_conf.LocalHost);
        NNTP_LOG(LOGI,"LocalTZ\t\t-%s",nntp_conf.LocalTZ);
        NNTP_LOG(LOGI,"LocalPort\t\t-%d",nntp_conf.LocalPort);

        NNTP_LOG(LOGI,"MsgDBsize\t\t-%d",nntp_conf.MsgDBsize);
        NNTP_LOG(LOGI,"MsgPurgeDay\t-%d",nntp_conf.MsgPurgeDay);
        NNTP_LOG(LOGI,"MsgPurgeNum\t-%d",nntp_conf.MsgPurgeNum);

        NNTP_LOG(LOGI,"ClienTimeOut\t-%d",nntp_conf.ClientTimeOut);
        NNTP_LOG(LOGI,"SuckTimeOut\t-%d",nntp_conf.SuckTimeOut);
        NNTP_LOG(LOGI,"FeedTimeOut\t-%d",nntp_conf.FeedTimeOut);

        NNTP_LOG(LOGI,"GrpME\t\t-%s",nntp_conf.GrpME);
        NNTP_LOG(LOGI,"GrpDay\t\t-%d",nntp_conf.GrpDay);

        NNTP_LOG(LOGI,"Suck\t\t-%s",nntp_conf.Suck);
        NNTP_LOG(LOGI,"Feed\t\t-%s",nntp_conf.Feed);
        NNTP_LOG(LOGI,"Client\t\t-%s",nntp_conf.Client);

        NNTP_LOG(LOGI,"LogLevel\t\t-%d",nntp_conf.LogLevel);
        NNTP_LOG(LOGI,"Update\t\t-%d",nntp_conf.Update);
        NNTP_LOG(LOGI,"Expire\t\t-%d",nntp_conf.Expire);

        NNTP_LOG(LOGI,"Opening News Messages DataBase");
        MsgDBopen();
        NNTP_LOG(LOGW,"Opening News Messages DataBase - Ok");

        NNTP_LOG(LOGI,"Opening NewsGroups DataBase");
        GrpDBopen();
        NNTP_LOG(LOGW,"Opening NewsGroups DataBase - Ok");

        NNTP_LOG(LOGI,"Opening Suck DataBase");
        SuckDBopen();
        NNTP_LOG(LOGW,"Opening Suck DataBase - Ok");

        status = pthread_create(&th,pthread_attr_default,
                                 NNTP_ClientBoss, (pthread_addr_t) 0);
        if (status == -1)
                {
		NNTP_LOG_ERR ("nntp_main",errno);
	        NNTP_LOG(LOGF,"Create Client Boss thread-Error.");
                }
        NNTP_LOG(LOGI,"Create Client Boss thread-Ok (Tid:%d).",th);

        status = pthread_create(&th,pthread_attr_default,
                                 NNTP_SuckBoss, (pthread_addr_t) 0);
        if (status == -1)
                {
		NNTP_LOG_ERR ("nntp_main",errno);
	        NNTP_LOG(LOGF,"Create Suck Boss thread.");
                }
        NNTP_LOG(LOGI,"Create Suck Boss thread-Ok (Tid:%d).",th);

	sys$hiber();

        DBclose();
        NNTP_LOG(LOGI,"DECThreads NNTP Server for OpenVMS Ver. 0.00-End.");
}