cronold.c

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C语言 代码 · 共 154 行

// TIEYU@FY3
// This is a daemon that calls itself every minte. it checks
// all major daemons to make sure that they are up and running.

#include <ansi.h>
#include <command.h>
#include <globals.h>
#include <net/daemons.h>
#include <net/macros.h>

int LAST_HARD_DIS= 0;
void init_cron();
//void autosave();
void check_dns();
void check_pets();
void check_whonature();
void create()
{
 	seteuid( ROOT_UID );
	init_cron();
}
int query_last_hard_dis()
{
	return LAST_HARD_DIS;
}
int set_last_hard_dis()
{
	LAST_HARD_DIS = time();
	return time();
}
void init_cron()
{
	mixed *local;
	local = localtime(time());
        if ( !random(30)) 
	TASK_D->init_dynamic_quest();
	

//How long the system will refresh all tasks. Added by FY@SH-Morrison
//--------------------------------------------------------------------
 if ( !((local[1])%180))
      {
        message("system",
                HIW     "\t\t【海洋II】将在五分钟后重新分布task！\n\n" NOR,
                users() );
        call_out("countdown", 60, 5);
   }
//--------------------------------------------------------------------
//修改以上第一行中百分号后的数字(现在设的60代表1小时)就可以修改task重新分布的时间间间隔了。
//above is add by Morrison

// Check pets that's lost heartbeat
	if( !(local[1]%5)) 
       if(!find_object(VOID_OB))
                call_other(VOID_OB,"???");
	check_pets();
// if dns_master not working, every 15 mins re-initalize it
	if ( !(local[1]%15)) 
	{
	check_dns();
// if WHO_D,NATURE_D dies restart them
	check_whonature();
	STATUS_D->write_list();
	}
	call_out("init_cron", 60);//zzz modify 20 to 60	
}

private void countdown(int min)
{
        object *ob_list;
        int i;
	min--;
	if( min ) {
		message("system",
                        HIR     "\t\t【海洋II】将在" + chinese_number(min) + "分钟后重新分布task！\n\n"NOR,			users() );
		call_out("countdown", 60, min);
	} else {
            message("system",HIR "重新分布所有使命。。。" NOR,users());
            TASK_D->init_dynamic_quest(1);
//为解决萧秋水传奇问题而加 
           ob_list = children("/quest/shenshu/shang");
                for(i=0; i<sizeof(ob_list); i++) 
		if(environment(ob_list[i]))
		{
			destruct(ob_list[i]);
               }
           ob_list = children("/quest/shenshu/xia");
                for(i=0; i<sizeof(ob_list); i++) 
		if(environment(ob_list[i]))
		{
			destruct(ob_list[i]);
               }
//结束
            message("system",HIG "。。。所有使命分布完毕\n" NOR,users());

	}
}

void check_dns()
{
	mapping mud_list;
	mixed *muds;
	object dns;

	if(!dns = find_object(DNS_MASTER))
	// dns not started, not our problem
	return;
	mud_list = (mapping) DNS_MASTER->query_muds();
	muds=keys(mud_list);
	if(sizeof(muds)<= 1)
	{ destruct(dns);
	call_other(DNS_MASTER,"???");
	}
	return;
}

void check_whonature()
{
	mixed *info;
	int i;
	object ob;
	int who=0, nature=0;
	info = call_out_info();
	for(i=0; i<sizeof(info); i++)
	{
	if( "/"+sprintf("%O",info[i][0]) == WHO_D ) who =1;
	if( "/"+sprintf("%O",info[i][0]) == NATURE_D ) nature=1;
	}
	if(!who)
        {
                if(ob=find_object(WHO_D)) destruct(ob);
                call_other(WHO_D,"???"); 
        }
        if(!nature)
        {
                if(ob=find_object(NATURE_D)) destruct(ob);
                call_other(NATURE_D,"???");
        }
        return;
}

void check_pets()
{
int i;
object ob,*ob_list;
ob_list=children("/clone/npc/pet");
for(i=0; i<sizeof(ob_list); i++) {
if( !ob = environment(ob_list[i]) ) continue;
ob->heal_up();
                }

return;
}