/*
* This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the
* Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that
* it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If
* not, see <http://www.gnu.org/licenses/>.
*/
package silentium.gameserver.tables;
import java.sql.Connection;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.util.ArrayList;
import java.util.List;
import java.util.Map;
import javolution.util.FastMap;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import silentium.commons.database.DatabaseFactory;
import silentium.gameserver.ThreadPoolManager;
import silentium.gameserver.idfactory.IdFactory;
import silentium.gameserver.instancemanager.SiegeManager;
import silentium.gameserver.model.L2Clan;
import silentium.gameserver.model.L2ClanMember;
import silentium.gameserver.model.actor.instance.L2PcInstance;
import silentium.gameserver.model.entity.Siege;
import silentium.gameserver.network.SystemMessageId;
import silentium.gameserver.network.serverpackets.PledgeShowInfoUpdate;
import silentium.gameserver.network.serverpackets.PledgeShowMemberListAll;
import silentium.gameserver.network.serverpackets.PledgeShowMemberListUpdate;
import silentium.gameserver.network.serverpackets.SystemMessage;
import silentium.gameserver.network.serverpackets.UserInfo;
import silentium.gameserver.utils.Util;
public class ClanTable
{
private static Logger _log = LoggerFactory.getLogger(ClanTable.class.getName());
private final Map<Integer, L2Clan> _clans;
public static ClanTable getInstance()
{
return SingletonHolder._instance;
}
public L2Clan[] getClans()
{
return _clans.values().toArray(new L2Clan[_clans.size()]);
}
protected ClanTable()
{
_clans = new FastMap<>();
L2Clan clan;
try (Connection con = DatabaseFactory.getConnection())
{
PreparedStatement statement = con.prepareStatement("SELECT clan_id FROM clan_data");
ResultSet result = statement.executeQuery();
while (result.next())
{
int clanId = result.getInt("clan_id");
_clans.put(clanId, new L2Clan(clanId));
clan = getClan(clanId);
if (clan.getDissolvingExpiryTime() != 0)
scheduleRemoveClan(clan.getClanId());
}
result.close();
statement.close();
}
catch (Exception e)
{
_log.error("ClanTable: Error restoring ClanTable: ", e);
}
_log.info("ClanTable: Restored " + _clans.size() + " clans.");
allianceCheck();
restorewars();
}
/**
* @param clanId
* : The id of the clan to retrieve.
* @return the clan object based on id.
*/
public L2Clan getClan(int clanId)
{
return _clans.get(Integer.valueOf(clanId));
}
public L2Clan getClanByName(String clanName)
{
for (L2Clan clan : getClans())
{
if (clan.getName().equalsIgnoreCase(clanName))
return clan;
}
return null;
}
/**
* Creates a new clan and store clan info to database
*
* @param player
* The player who requested the clan creation.
* @param clanName
* The name of the clan player wants.
* @return null if checks fail, or L2Clan
*/
public L2Clan createClan(L2PcInstance player, String clanName)
{
if (null == player)
return null;
_log.debug(player.getObjectId() + "(" + player.getName() + ") requested a clan creation.");
if (player.getLevel() < 10)
{
player.sendPacket(SystemMessageId.YOU_DO_NOT_MEET_CRITERIA_IN_ORDER_TO_CREATE_A_CLAN);
return null;
}
if (player.getClanId() != 0)
{
player.sendPacket(SystemMessageId.FAILED_TO_CREATE_CLAN);
return null;
}
if (System.currentTimeMillis() < player.getClanCreateExpiryTime())
{
player.sendPacket(SystemMessageId.YOU_MUST_WAIT_XX_DAYS_BEFORE_CREATING_A_NEW_CLAN);
return null;
}
if (!Util.isAlphaNumeric(clanName))
{
player.sendPacket(SystemMessageId.CLAN_NAME_INVALID);
return null;
}
if (clanName.length() < 2 || clanName.length() > 16)
{
player.sendPacket(SystemMessageId.CLAN_NAME_LENGTH_INCORRECT);
return null;
}
if (getClanByName(clanName) != null)
{
// clan name is already taken
player.sendPacket(SystemMessage.getSystemMessage(SystemMessageId.S1_ALREADY_EXISTS).addString(clanName));
return null;
}
L2Clan clan = new L2Clan(IdFactory.getInstance().getNextId(), clanName);
L2ClanMember leader = new L2ClanMember(clan, player.getName(), player.getLevel(), player.getClassId().getId(), player.getObjectId(), player.getPledgeType(), player.getPowerGrade(), player.getTitle(), player.getAppearance().getSex(), player.getRace().ordinal());
clan.setLeader(leader);
leader.setPlayerInstance(player);
clan.store();
player.setClan(clan);
player.setPledgeClass(leader.calculatePledgeClass(player));
player.setClanPrivileges(L2Clan.CP_ALL);
_log.debug("New clan created: " + clan.getClanId() + " " + clan.getName());
_clans.put(Integer.valueOf(clan.getClanId()), clan);
// should be update packet only
player.sendPacket(new PledgeShowInfoUpdate(clan));
player.sendPacket(new PledgeShowMemberListAll(clan, player));
player.sendPacket(new UserInfo(player));
player.sendPacket(new PledgeShowMemberListUpdate(player));
player.sendPacket(SystemMessageId.CLAN_CREATED);
return clan;
}
public synchronized void destroyClan(int clanId)
{
L2Clan clan = getClan(clanId);
if (clan == null)
return;
clan.broadcastToOnlineMembers(SystemMessage.getSystemMessage(SystemMessageId.CLAN_HAS_DISPERSED));
final int castleId = clan.getCastleId();
if (castleId == 0)
{
for (Siege siege : SiegeManager.getSieges())
siege.removeSiegeClan(clan);
}
// Drop all items from clan warehouse.
clan.getWarehouse().destroyAllItems("ClanRemove", (clan.getLeader() == null) ? null : clan.getLeader().getPlayerInstance(), null);
for (L2ClanMember member : clan.getMembers())
clan.removeClanMember(member.getObjectId(), 0);
_clans.remove(clanId);
IdFactory.getInstance().releaseId(clanId);
try (Connection con = DatabaseFactory.getConnection())
{
PreparedStatement statement = con.prepareStatement("DELETE FROM clan_data WHERE clan_id=?");
statement.setInt(1, clanId);
statement.execute();
statement.close();
statement = con.prepareStatement("DELETE FROM clan_privs WHERE clan_id=?");
statement.setInt(1, clanId);
statement.execute();
statement.close();
statement = con.prepareStatement("DELETE FROM clan_skills WHERE clan_id=?");
statement.setInt(1, clanId);
statement.execute();
statement.close();
statement = con.prepareStatement("DELETE FROM clan_subpledges WHERE clan_id=?");
statement.setInt(1, clanId);
statement.execute();
statement.close();
statement = con.prepareStatement("DELETE FROM clan_wars WHERE clan1=? OR clan2=?");
statement.setInt(1, clanId);
statement.setInt(2, clanId);
statement.execute();
statement.close();
statement = con.prepareStatement("DELETE FROM clan_notices WHERE clan_id=?");
statement.setInt(1, clanId);
statement.execute();
statement.close();
if (castleId != 0)
{
statement = con.prepareStatement("UPDATE castle SET taxPercent = 0 WHERE id = ?");
statement.setInt(1, castleId);
statement.execute();
statement.close();
}
_log.debug("clan removed in db: " + clanId);
}
catch (Exception e)
{
_log.error("Error removing clan from DB.", e);
}
}
public void scheduleRemoveClan(final int clanId)
{
ThreadPoolManager.getInstance().scheduleGeneral(new Runnable()
{
@Override
public void run()
{
if (getClan(clanId) == null)
return;
if (getClan(clanId).getDissolvingExpiryTime() != 0)
destroyClan(clanId);
}
}, Math.max(getClan(clanId).getDissolvingExpiryTime() - System.currentTimeMillis(), 60000));
}
public boolean isAllyExists(String allyName)
{
for (L2Clan clan : getClans())
{
if (clan.getAllyName() != null && clan.getAllyName().equalsIgnoreCase(allyName))
return true;
}
return false;
}
public void storeclanswars(int clanId1, int clanId2)
{
L2Clan clan1 = ClanTable.getInstance().getClan(clanId1);
L2Clan clan2 = ClanTable.getInstance().getClan(clanId2);
clan1.setEnemyClan(clan2);
clan2.setAttackerClan(clan1);
clan1.broadcastClanStatus();
clan2.broadcastClanStatus();
try (Connection con = DatabaseFactory.getConnection())
{
PreparedStatement statement;
statement = con.prepareStatement("REPLACE INTO clan_wars (clan1, clan2, wantspeace1, wantspeace2) VALUES(?,?,?,?)");
statement.setInt(1, clanId1);
statement.setInt(2, clanId2);
statement.setInt(3, 0);
statement.setInt(4, 0);
statement.execute();
statement.close();
}
catch (Exception e)
{
_log.error("Error storing clan wars data.", e);
}
clan1.broadcastToOnlineMembers(SystemMessage.getSystemMessage(SystemMessageId.CLAN_WAR_DECLARED_AGAINST_S1_IF_KILLED_LOSE_LOW_EXP).addString(clan2.getName()));
clan2.broadcastToOnlineMembers(SystemMessage.getSystemMessage(SystemMessageId.CLAN_S1_DECLARED_WAR).addString(clan1.getName()));
}
public void deleteclanswars(int clanId1, int clanId2)
{
L2Clan clan1 = ClanTable.getInstance().getClan(clanId1);
L2Clan clan2 = ClanTable.getInstance().getClan(clanId2);
clan1.deleteEnemyClan(clan2);
clan2.deleteAttackerClan(clan1);
clan1.broadcastClanStatus();
clan2.broadcastClanStatus();
try (Connection con = DatabaseFactory.getConnection())
{
PreparedStatement statement = con.prepareStatement("DELETE FROM clan_wars WHERE clan1=? AND clan2=?");
statement.setInt(1, clanId1);
statement.setInt(2, clanId2);
statement.execute();
statement.close();
}
catch (Exception e)
{
_log.error("Error removing clan wars data.", e);
}
clan1.broadcastToOnlineMembers(SystemMessage.getSystemMessage(SystemMessageId.WAR_AGAINST_S1_HAS_STOPPED).addString(clan2.getName()));
clan2.broadcastToOnlineMembers(SystemMessage.getSystemMessage(SystemMessageId.CLAN_S1_HAS_DECIDED_TO_STOP).addString(clan1.getName()));
}
public void checkSurrender(L2Clan clan1, L2Clan clan2)
{
int count = 0;
for (L2ClanMember player : clan1.getMembers())
{
if (player != null && player.getPlayerInstance().getWantsPeace() == 1)
count++;
}
if (count == clan1.getMembers().length - 1)
{
clan1.deleteEnemyClan(clan2);
clan2.deleteEnemyClan(clan1);
deleteclanswars(clan1.getClanId(), clan2.getClanId());
}
}
private void restorewars()
{
try (Connection con = DatabaseFactory.getConnection())
{
PreparedStatement statement = con.prepareStatement("SELECT clan1, clan2, wantspeace1, wantspeace2 FROM clan_wars");
ResultSet rset = statement.executeQuery();
while (rset.next())
{
getClan(rset.getInt("clan1")).setEnemyClan(rset.getInt("clan2"));
getClan(rset.getInt("clan2")).setAttackerClan(rset.getInt("clan1"));
}
statement.close();
}
catch (Exception e)
{
_log.error("Error restoring clan wars data.", e);
}
}
/**
* Check for nonexistent alliances
*/
private void allianceCheck()
{
for (L2Clan clan : _clans.values())
{
int allyId = clan.getAllyId();
if (allyId != 0 && clan.getClanId() != allyId)
{
if (!_clans.containsKey(allyId))
{
clan.setAllyId(0);
clan.setAllyName(null);
clan.changeAllyCrest(0, true);
clan.updateClanInDB();
_log.info(getClass().getSimpleName() + ": Removed alliance from clan: " + clan);
}
}
}
}
public List<L2Clan> getClanAllies(int allianceId)
{
final List<L2Clan> clanAllies = new ArrayList<>();
if (allianceId != 0)
{
for (L2Clan clan : _clans.values())
{
if (clan != null && clan.getAllyId() == allianceId)
clanAllies.add(clan);
}
}
return clanAllies;
}
private static class SingletonHolder
{
protected static final ClanTable _instance = new ClanTable();
}
}