void xrServer::OnCL_Disconnected (IClient* CL)
{
//csPlayers.Enter ();
// Game config (all, info includes deleted player now, excludes at the next cl-update)
NET_Packet P;
P.B.count = 0;
P.w_clientID(CL->ID);
xrClientData* xrCData = (xrClientData*)(CL);
VERIFY(xrCData);
if (!xrCData->ps)
return;
P.w_stringZ(xrCData->ps->getName());
P.w_u16(xrCData->ps->GameID);
P.r_pos = 0;
ClientID clientID;
clientID.set(0);
game->AddDelayedEvent(P,GAME_EVENT_PLAYER_DISCONNECTED, 0, clientID);
//
xrS_entities::iterator I=entities.begin(),E=entities.end();
if (GetClientsCount()>1 && !CL->flags.bLocal)
{
// Migrate entities
for (; I!=E; ++I)
{
CSE_Abstract* entity = I->second;
if (entity->owner == CL) PerformMigration (entity,(xrClientData*)CL,SelectBestClientToMigrateTo(entity,TRUE));
}
} else {
// Destroy entities
while (!entities.empty()) {
CSE_Abstract* entity = entities.begin()->second;
entity_Destroy (entity);
}
}
//csPlayers.Leave ();
Server_Client_Check(CL);
}
void xrServer::Perform_destroy (CSE_Abstract* object, u32 mode)
{
R_ASSERT (object);
R_ASSERT (object->ID_Parent == 0xffff);
#ifdef DEBUG
# ifdef SLOW_VERIFY_ENTITIES
verify_entities ();
# endif
#endif
while (!object->children.empty()) {
CSE_Abstract *child = game->get_entity_from_eid(object->children.back());
R_ASSERT2 (child, make_string("child registered but not found [%d]",object->children.back()));
// Msg ("SLS-CLEAR : REJECT [%s][%s] FROM [%s][%s]",child->name(),child->name_replace(),object->name(),object->name_replace());
Perform_reject (child,object,2*NET_Latency);
#ifdef DEBUG
# ifdef SLOW_VERIFY_ENTITIES
verify_entities ();
# endif
#endif
Perform_destroy (child,mode);
}
// Msg ("SLS-CLEAR : DESTROY [%s][%s]",object->name(),object->name_replace());
u16 object_id = object->ID;
entity_Destroy (object);
#ifdef DEBUG
# ifdef SLOW_VERIFY_ENTITIES
verify_entities ();
# endif
#endif
NET_Packet P;
P.w_begin (M_EVENT);
P.w_u32 (Device.dwTimeGlobal - 2*NET_Latency);
P.w_u16 (GE_DESTROY);
P.w_u16 (object_id);
ClientID clientID;
clientID.setBroadcast ();
SendBroadcast (clientID,P,mode);
}
void xrServer::Process_event_destroy (NET_Packet& P, ClientID sender, u32 time, u16 ID, NET_Packet* pEPack)
{
u32 MODE = net_flags(TRUE,TRUE);
// Parse message
u16 id_dest = ID;
#ifdef DEBUG
if( dbg_net_Draw_Flags.test( dbg_destroy ) )
Msg ("sv destroy object %s [%d]", ent_name_safe(id_dest).c_str(), Device.dwFrame);
#endif
CSE_Abstract* e_dest = game->get_entity_from_eid (id_dest); // кто должен быть уничтожен
if (!e_dest)
{
#ifndef MASTER_GOLD
Msg ("! SV:ge_destroy: [%d] not found on server",id_dest);
#endif // #ifndef MASTER_GOLD
return;
};
R_ASSERT (e_dest);
xrClientData *c_dest = e_dest->owner; // клиент, чей юнит
R_ASSERT (c_dest);
xrClientData *c_from = ID_to_client(sender); // клиент, кто прислал
R_ASSERT (c_dest == c_from); // assure client ownership of event
u16 parent_id = e_dest->ID_Parent;
#ifdef MP_LOGGING
Msg("- SV: Process destroy: parent [%d] item [%d][%s]",
parent_id, id_dest, e_dest->name());
#endif //#ifdef MP_LOGGING
//---------------------------------------------
NET_Packet P2, *pEventPack = pEPack;
P2.w_begin (M_EVENT_PACK);
//---------------------------------------------
// check if we have children
if (!e_dest->children.empty()) {
if (!pEventPack) pEventPack = &P2;
while (!e_dest->children.empty())
Process_event_destroy (P,sender,time,*e_dest->children.begin(), pEventPack);
};
if (0xffff == parent_id && NULL == pEventPack)
{
SendBroadcast (BroadcastCID,P,MODE);
}
else
{
NET_Packet tmpP;
if (0xffff != parent_id && Process_event_reject(P,sender,time,parent_id,ID,false))
{
game->u_EventGen(tmpP, GE_OWNERSHIP_REJECT, parent_id);
tmpP.w_u16(id_dest);
tmpP.w_u8(1);
if (!pEventPack) pEventPack = &P2;
pEventPack->w_u8(u8(tmpP.B.count));
pEventPack->w(&tmpP.B.data, tmpP.B.count);
};
game->u_EventGen(tmpP, GE_DESTROY, id_dest);
pEventPack->w_u8(u8(tmpP.B.count));
pEventPack->w(&tmpP.B.data, tmpP.B.count);
};
if (NULL == pEPack && NULL != pEventPack)
{
SendBroadcast (BroadcastCID, *pEventPack, MODE);
}
// Everything OK, so perform entity-destroy
if (e_dest->m_bALifeControl && ai().get_alife()) {
game_sv_Single *_game = smart_cast<game_sv_Single*>(game);
VERIFY (_game);
if (ai().alife().objects().object(id_dest,true))
_game->alife().release (e_dest,false);
}
if (game)
game->OnDestroyObject (e_dest->ID);
entity_Destroy (e_dest);
}
void xrServer::Process_event (NET_Packet& P, ClientID sender)
{
# ifdef SLOW_VERIFY_ENTITIES
VERIFY (verify_entities());
# endif
u32 timestamp;
u16 type;
u16 destination;
u32 MODE = net_flags(TRUE,TRUE);
// correct timestamp with server-unique-time (note: direct message correction)
P.r_u32 (timestamp );
// read generic info
P.r_u16 (type );
P.r_u16 (destination);
CSE_Abstract* receiver = game->get_entity_from_eid (destination);
if (receiver)
{
R_ASSERT(receiver->owner);
receiver->OnEvent (P,type,timestamp,sender);
};
switch (type)
{
case GE_GAME_EVENT:
{
u16 game_event_type;
P.r_u16(game_event_type);
game->AddDelayedEvent(P,game_event_type,timestamp,sender);
}break;
case GE_INFO_TRANSFER:
case GE_WPN_STATE_CHANGE:
case GE_ZONE_STATE_CHANGE:
case GE_ACTOR_JUMPING:
case GEG_PLAYER_PLAY_HEADSHOT_PARTICLE:
case GEG_PLAYER_ATTACH_HOLDER:
case GEG_PLAYER_DETACH_HOLDER:
case GEG_PLAYER_ITEM2SLOT:
case GEG_PLAYER_ITEM2BELT:
case GEG_PLAYER_ITEM2RUCK:
case GE_GRENADE_EXPLODE:
{
SendBroadcast (BroadcastCID,P,MODE);
}break;
case GEG_PLAYER_ACTIVATEARTEFACT:
{
Process_event_activate (P,sender,timestamp,destination,P.r_u16(), true);
break;
};
case GE_INV_ACTION:
{
xrClientData* CL = ID_to_client(sender);
if (CL) CL->net_Ready = TRUE;
if (SV_Client) SendTo(SV_Client->ID, P, net_flags(TRUE, TRUE));
}break;
case GE_RESPAWN:
{
CSE_Abstract* E = receiver;
if (E)
{
R_ASSERT (E->s_flags.is(M_SPAWN_OBJECT_PHANTOM));
svs_respawn R;
R.timestamp = timestamp + E->RespawnTime*1000;
R.phantom = destination;
q_respawn.insert (R);
}
}
break;
case GE_TRADE_BUY:
case GE_OWNERSHIP_TAKE:
{
Process_event_ownership (P,sender,timestamp,destination);
VERIFY (verify_entities());
}break;
case GE_OWNERSHIP_TAKE_MP_FORCED:
{
Process_event_ownership (P,sender,timestamp,destination,TRUE);
VERIFY (verify_entities());
}break;
case GE_TRADE_SELL:
case GE_OWNERSHIP_REJECT:
case GE_LAUNCH_ROCKET:
{
Process_event_reject (P,sender,timestamp,destination,P.r_u16());
VERIFY (verify_entities());
}break;
case GE_DESTROY:
{
Process_event_destroy (P,sender,timestamp,destination, NULL);
VERIFY (verify_entities());
}
break;
case GE_TRANSFER_AMMO:
{
u16 id_entity;
P.r_u16 (id_entity);
CSE_Abstract* e_parent = receiver; // кто забирает (для своих нужд)
CSE_Abstract* e_entity = game->get_entity_from_eid (id_entity); // кто отдает
if (!e_entity) break;
if (0xffff != e_entity->ID_Parent) break; // this item already taken
xrClientData* c_parent = e_parent->owner;
xrClientData* c_from = ID_to_client (sender);
R_ASSERT (c_from == c_parent); // assure client ownership of event
// Signal to everyone (including sender)
SendBroadcast (BroadcastCID,P,MODE);
// Perfrom real destroy
entity_Destroy (e_entity );
VERIFY (verify_entities());
}
break;
case GE_HIT:
case GE_HIT_STATISTIC:
{
P.r_pos -=2;
if (type == GE_HIT_STATISTIC)
{
P.B.count -= 4;
P.w_u32(sender.value());
};
game->AddDelayedEvent(P,GAME_EVENT_ON_HIT, 0, ClientID() );
} break;
case GE_ASSIGN_KILLER: {
u16 id_src;
P.r_u16 (id_src);
CSE_Abstract *e_dest = receiver; // кто умер
// this is possible when hit event is sent before destroy event
if (!e_dest)
break;
CSE_ALifeCreatureAbstract *creature = smart_cast<CSE_ALifeCreatureAbstract*>(e_dest);
if (creature)
creature->set_killer_id( id_src );
// Msg ("[%d][%s] killed [%d][%s]",id_src,id_src==u16(-1) ? "UNKNOWN" : game->get_entity_from_eid(id_src)->name_replace(),id_dest,e_dest->name_replace());
break;
}
case GE_CHANGE_VISUAL:
{
CSE_Visual* visual = smart_cast<CSE_Visual*>(receiver); VERIFY(visual);
string256 tmp;
P.r_stringZ (tmp);
visual->set_visual (tmp);
}break;
case GE_DIE:
{
// Parse message
u16 id_dest = destination, id_src;
P.r_u16 (id_src);
xrClientData *l_pC = ID_to_client(sender);
VERIFY (game && l_pC);
#ifndef MASTER_GOLD
if ((game->Type() != eGameIDSingle) && l_pC && l_pC->owner)
{
Msg ("* [%2d] killed by [%2d] - sended by [%s:%2d]", id_dest, id_src, game->get_option_s(*l_pC->name,"name","Player"), l_pC->owner->ID);
}
#endif // #ifndef MASTER_GOLD
CSE_Abstract* e_dest = receiver; // кто умер
// this is possible when hit event is sent before destroy event
if (!e_dest)
break;
#ifndef MASTER_GOLD
if (game->Type() != eGameIDSingle)
Msg ("* [%2d] is [%s:%s]", id_dest, *e_dest->s_name, e_dest->name_replace());
#endif // #ifndef MASTER_GOLD
CSE_Abstract* e_src = game->get_entity_from_eid (id_src ); // кто убил
if (!e_src) {
xrClientData* C = (xrClientData*) game->get_client(id_src);
if (C) e_src = C->owner;
};
VERIFY (e_src);
if (!e_src)
{
Msg("! ERROR: SV: src killer not exist.");
return;
}
// R_ASSERT2 (e_dest && e_src, "Killer or/and being killed are offline or not exist at all :(");
#ifndef MASTER_GOLD
if (game->Type() != eGameIDSingle)
Msg ("* [%2d] is [%s:%s]", id_src, *e_src->s_name, e_src->name_replace());
#endif // #ifndef MASTER_GOLD
game->on_death (e_dest,e_src);
xrClientData* c_src = e_src->owner; // клиент, чей юнит убил
if (c_src->owner->ID == id_src) {
// Main unit
P.w_begin (M_EVENT);
P.w_u32 (timestamp);
P.w_u16 (type);
P.w_u16 (destination);
P.w_u16 (id_src);
P.w_clientID (c_src->ID);
}
SendBroadcast (BroadcastCID,P,MODE);
//////////////////////////////////////////////////////////////////////////
//
if (game->Type() == eGameIDSingle) {
P.w_begin (M_EVENT);
P.w_u32 (timestamp);
P.w_u16 (GE_KILL_SOMEONE);
P.w_u16 (id_src);
P.w_u16 (destination);
SendTo (c_src->ID, P, net_flags(TRUE, TRUE));
}
//////////////////////////////////////////////////////////////////////////
VERIFY (verify_entities());
}
break;
case GE_ADDON_ATTACH:
case GE_ADDON_DETACH:
case GE_CHANGE_POS:
{
SendTo(SV_Client->ID, P, net_flags(TRUE, TRUE));
}break;
case GE_INSTALL_UPGRADE:
{
shared_str upgrade_id;
P.r_stringZ ( upgrade_id );
CSE_ALifeInventoryItem* iitem = smart_cast<CSE_ALifeInventoryItem*>( receiver );
if ( !iitem )
{
break;
}
iitem->add_upgrade ( upgrade_id );
}break;
case GEG_PLAYER_DISABLE_SPRINT:
case GEG_PLAYER_WEAPON_HIDE_STATE:
{
SendTo (SV_Client->ID, P, net_flags(TRUE, TRUE));
# ifdef SLOW_VERIFY_ENTITIES
VERIFY (verify_entities());
# endif
}break;
case GEG_PLAYER_ACTIVATE_SLOT:
case GEG_PLAYER_ITEM_EAT:
{
SendTo(SV_Client->ID, P, net_flags(TRUE, TRUE));
# ifdef SLOW_VERIFY_ENTITIES
VERIFY (verify_entities());
# endif
}break;
case GEG_PLAYER_ITEM_SELL:
{
game->OnPlayer_Sell_Item(sender, P);
}break;
case GE_TELEPORT_OBJECT:
{
game->teleport_object (P,destination);
}break;
case GE_ADD_RESTRICTION:
{
game->add_restriction (P,destination);
}break;
case GE_REMOVE_RESTRICTION:
{
game->remove_restriction(P,destination);
}break;
case GE_REMOVE_ALL_RESTRICTIONS:
{
game->remove_all_restrictions(P,destination);
}break;
case GE_MONEY:
{
CSE_Abstract *e_dest = receiver;
CSE_ALifeTraderAbstract* pTa = smart_cast<CSE_ALifeTraderAbstract*>(e_dest);
pTa->m_dwMoney = P.r_u32();
}break;
case GE_FREEZE_OBJECT:
break;
default:
R_ASSERT2 (0,"Game Event not implemented!!!");
break;
}
}
