SLIC-Reference : : BreakNoPiracy  

SFN_ERROR Slic_BreakNoPiracy::Call(SlicArgList *args)
{
	if(args->Count() != 0) {
		return SFN_ERROR_NUM_ARGS;
	}
	
	SlicObject *context = g_slicEngine->GetContext();
	if(!g_player[context->GetPlayer(0)]) {
		return SFN_ERROR_TYPE_ARGS;
	}

	if(!g_player[context->GetPlayer(1)]) {
		return SFN_ERROR_TYPE_ARGS;
	}

	sint32 pirate, victim;
	pirate = context->GetPlayer(0);
	victim = context->GetPlayer(1);

	if(!g_player[pirate])
		return SFN_ERROR_DEAD_PLAYER;

	if(!g_player[victim])
		return SFN_ERROR_DEAD_PLAYER;

	sint32 i;
	for(i = g_player[pirate]->m_agreed->Num() - 1; i >= 0; i--) {
		Agreement ag = g_player[pirate]->m_agreed->Access(i);
		if(g_theAgreementPool->IsValid(ag) &&
		   ag.GetRecipient() == pirate &&
		   ag.GetOwner() == victim &&
		   ag.GetAgreement() == AGREEMENT_TYPE_NO_PIRACY) {
			if(g_network.IsClient()) {
				g_network.SendAction(new NetAction(NET_ACTION_VIOLATE_AGREEMENT,
												   ag.m_id));
			}
												   
			ag.AccessData()->RecipientIsViolating(pirate, TRUE);
		}
	}
	return SFN_ERROR_OK;
}