void LoadUserSettings(uint iClientID)
{
CAccount *acc = Players.FindAccountFromClientID(iClientID);
wstring wscDir;
HkGetAccountDirName(acc, wscDir);
string scUserFile = scAcctPath + wstos(wscDir) + "\\flhookuser.ini";
// read diemsg settings
ClientInfo[iClientID].dieMsg = (DIEMSGTYPE)IniGetI(scUserFile, "settings", "DieMsg", DIEMSG_ALL);
ClientInfo[iClientID].dieMsgSize = (CHATSIZE)IniGetI(scUserFile, "settings", "DieMsgSize", CS_DEFAULT);
// read chatstyle settings
ClientInfo[iClientID].chatSize = (CHATSIZE)IniGetI(scUserFile, "settings", "ChatSize", CS_DEFAULT);
ClientInfo[iClientID].chatStyle = (CHATSTYLE)IniGetI(scUserFile, "settings", "ChatStyle", CST_DEFAULT);
// read ignorelist
ClientInfo[iClientID].lstIgnore.clear();
for(int i = 1; ; i++)
{
wstring wscIgnore = IniGetWS(scUserFile, "IgnoreList", itos(i), L"");
if(!wscIgnore.length())
break;
IGNORE_INFO ii;
ii.wscCharname = GetParam(wscIgnore, ' ', 0);
ii.wscFlags = GetParam(wscIgnore, ' ', 1);
ClientInfo[iClientID].lstIgnore.push_back(ii);
}
}
/** Process a show cash command **/
bool GiveCash::UserCmd_ShowCash(uint iClientID, const wstring &wscCmd, const wstring &wscParam, const wchar_t *usage)
{
// The last error.
HK_ERROR err;
// Get the current character name
wstring wscCharname = (const wchar_t*) Players.GetActiveCharacterName(iClientID);
// Get the parameters from the user command.
wstring wscTargetCharname = GetParam(wscParam, L' ', 0);
wstring wscCode = GetParam(wscParam, L' ', 1);
if (!wscTargetCharname.length() || !wscCode.length())
{
PrintUserCmdText(iClientID, L"ERR Invalid parameters");
PrintUserCmdText(iClientID, usage);
return true;
}
CAccount *acc=HkGetAccountByCharname(wscTargetCharname);
if (acc==0)
{
PrintUserCmdText(iClientID, L"ERR char does not exist");
return true;
}
string scFile;
if (!GetUserFilePath(scFile, wscTargetCharname, "-givecash.ini"))
return true;
wstring wscTargetCode = IniGetWS(scFile, "Settings", "Code", L"");
if (!wscTargetCode.length() || wscTargetCode!=wscCode)
{
PrintUserCmdText(iClientID, L"ERR cash account access denied");
return true;
}
int iCash = 0;
if ((err = HkGetCash(wscTargetCharname, iCash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
PrintUserCmdText(iClientID, L"OK Account "+wscTargetCharname+L" has " + ToMoneyStr(iCash) + L" credits");
return true;
}
/**
Delete a message
*/
bool MailDel(const wstring &wscCharname, const string &scExtension, int iMsg)
{
// Get the target player's message file.
string scFilePath = GetUserFilePath(wscCharname, scExtension);
if (scFilePath.length()==0)
return false;
// Move all mail down one slot starting at the deleted message to overwrite it
for (int iMsgSlot = iMsg; iMsgSlot<MAX_MAIL_MSGS; iMsgSlot++)
{
wstring wscTmpMsg = IniGetWS(scFilePath, "Msgs", itos(iMsgSlot+1), L"");
IniWriteW(scFilePath, "Msgs", itos(iMsgSlot), wscTmpMsg);
bool bTmpRead = IniGetB(scFilePath, "MsgsRead", itos(iMsgSlot+1), false);
IniWrite(scFilePath, "MsgsRead", itos(iMsgSlot), (bTmpRead?"yes":"no"));
}
return true;
}
/* copy pasta from playercntl as to provide independance*/
bool MailSend(const wstring &wscCharname, const string &scExtension, const wstring &wscMsg)
{
// Get the target player's message file.
string scFilePath = GetUserFilePath(wscCharname, scExtension);
if (scFilePath.length() == 0)
return false;
// Move all mail up one slot starting at the end. We automatically
// discard the oldest messages.
for (int iMsgSlot = MAX_MAIL_MSGS - 1; iMsgSlot>0; iMsgSlot--)
{
wstring wscTmpMsg = IniGetWS(scFilePath, "Msgs", itos(iMsgSlot), L"");
IniWriteW(scFilePath, "Msgs", itos(iMsgSlot + 1), wscTmpMsg);
bool bTmpRead = IniGetB(scFilePath, "MsgsRead", itos(iMsgSlot), false);
IniWrite(scFilePath, "MsgsRead", itos(iMsgSlot + 1), (bTmpRead ? "yes" : "no"));
}
// Write message into the slot
IniWriteW(scFilePath, "Msgs", "1", GetTimeString(set_bLocalTime) + L" " + wscMsg);
IniWrite(scFilePath, "MsgsRead", "1", "no");
return true;
}
/** Show five messages from the specified starting position. */
void MailShow(const wstring &wscCharname, const string &scExtension, int iFirstMsg)
{
// Make sure the character is logged in.
uint iClientID = HkGetClientIdFromCharname(wscCharname);
if (iClientID==-1)
return;
// Get the target player's message file.
string scFilePath = GetUserFilePath(wscCharname, scExtension);
if (scFilePath.length()==0)
return;
int iLastMsg = iFirstMsg;
for (int iMsgSlot = iFirstMsg, iMsgCount = 0; iMsgSlot<MAX_MAIL_MSGS && iMsgCount<5; iMsgSlot++, iMsgCount++)
{
wstring wscTmpMsg = IniGetWS(scFilePath, "Msgs", itos(iMsgSlot), L"");
if (wscTmpMsg.length()==0)
break;
PrintUserCmdText(iClientID, L"#%02d %s", iMsgSlot, wscTmpMsg.c_str());
IniWrite(scFilePath, "MsgsRead", itos(iMsgSlot), "yes");
iLastMsg = iMsgSlot;
}
PrintUserCmdText(iClientID, L"Viewing #%02d-#%02d of %02d messages", iFirstMsg, iLastMsg, MailCount(wscCharname, scExtension));
}
/** Process a draw cash command **/
bool GiveCash::UserCmd_DrawCash(uint iClientID, const wstring &wscCmd, const wstring &wscParam, const wchar_t *usage)
{
// The last error.
HK_ERROR err;
// Get the current character name
wstring wscCharname = (const wchar_t*) Players.GetActiveCharacterName(iClientID);
// Get the parameters from the user command.
wstring wscTargetCharname = GetParam(wscParam, L' ', 0);
wstring wscCode = GetParam(wscParam, L' ', 1);
wstring wscCash = GetParam(wscParam, L' ', 2);
wscCash = ReplaceStr(wscCash, L".", L"");
wscCash = ReplaceStr(wscCash, L",", L"");
wscCash = ReplaceStr(wscCash, L"$", L"");
int cash = ToInt(wscCash);
if (!wscTargetCharname.length() || !wscCode.length() || cash<=0)
{
PrintUserCmdText(iClientID, L"ERR Invalid parameters");
PrintUserCmdText(iClientID, usage);
return true;
}
CAccount *iTargetAcc=HkGetAccountByCharname(wscTargetCharname);
if (iTargetAcc==0)
{
PrintUserCmdText(iClientID, L"ERR char does not exist");
return true;
}
int secs = 0;
HkGetOnLineTime(wscTargetCharname, secs);
if (secs<set_iMinTime)
{
PrintUserCmdText(iClientID, L"ERR insufficient time online");
return true;
}
if (InBlockedSystem(wscCharname) || InBlockedSystem(wscTargetCharname))
{
PrintUserCmdText(iClientID, L"ERR cash transfer blocked");
return true;
}
string scFile;
if (!GetUserFilePath(scFile, wscTargetCharname, "-givecash.ini"))
return true;
wstring wscTargetCode = IniGetWS(scFile, "Settings", "Code", L"");
if (!wscTargetCode.length() || wscTargetCode!=wscCode)
{
PrintUserCmdText(iClientID, L"ERR cash account access denied");
return true;
}
if (cash<set_iMinTransfer || cash<0) {
PrintUserCmdText(iClientID, L"ERR Transfer too small, minimum transfer "+ToMoneyStr(set_iMinTransfer)+L" credits");
return true;
}
int tCash = 0;
if ((err = HkGetCash(wscTargetCharname, tCash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if (tCash<cash)
{
PrintUserCmdText(iClientID, L"ERR Insufficient credits");
return true;
}
// Check the adding this cash to this player will not
// exceed the maximum ship value.
float fTargetValue = 0.0f;
if (HKGetShipValue(wscCharname, fTargetValue) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if ((fTargetValue + cash) > 2000000000.0f)
{
PrintUserCmdText(iClientID, L"ERR Transfer will exceed credit limit");
return true;
}
// Calculate the new cash
int iExpectedCash = 0;
if ((err = HkGetCash(wscCharname, iExpectedCash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
iExpectedCash += cash;
// Do an anticheat check on the receiving ship first.
if (HkAntiCheat(iClientID) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when drawing %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str());
return true;
}
HkSaveChar(iClientID);
uint targetClientId = HkGetClientIdFromCharname(wscTargetCharname);
if (targetClientId != -1)
{
if (ClientInfo[iClientID].iTradePartner || ClientInfo[targetClientId].iTradePartner)
{
PrintUserCmdText(iClientID, L"ERR Trade window open");
AddLog("NOTICE: Trade window open when drawing %s credits from %s (%s) to %s (%s) %u %u",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
iClientID, targetClientId);
return true;
}
}
// Remove cash from target character
if ((err = HkAddCash(wscTargetCharname, 0-cash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if (targetClientId!=-1 && !HkIsInCharSelectMenu(targetClientId))
{
if (HkAntiCheat(targetClientId) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when drawing %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str());
return true;
}
HkSaveChar(targetClientId);
}
// Add cash to this player
if ((err = HkAddCash(wscCharname, cash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if (HkAntiCheat(iClientID) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when drawing %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str());
return true;
}
HkSaveChar(iClientID);
// Check that receiving player has the correct ammount of cash.
int iCurrCash;
if ((err = HkGetCash(wscCharname, iCurrCash)) != HKE_OK
|| iCurrCash != iExpectedCash)
{
AddLog("ERROR: Cash transfer error when drawing %s credits from %s (%s) to %s (%s) current %s credits expected %s credits ",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(ToMoneyStr(iCurrCash)).c_str(), wstos(ToMoneyStr(iExpectedCash)).c_str());
PrintUserCmdText(iClientID, L"ERR Transfer failed");
}
// If the target player is online then send them a message saying
// telling them that they've received transfered cash.
wstring msg = L"You have transferred " + ToMoneyStr(cash) + L" credits to " + wscCharname;
if (targetClientId!=-1 && !HkIsInCharSelectMenu(targetClientId))
{
PrintUserCmdText(targetClientId, L"%s", msg.c_str());
}
// Otherwise we assume that the character is offline so we record an entry
// in the character's givecash.ini. When they come online we inform them
// of the transfer. The ini is cleared when ever the character logs in.
else
{
LogTransfer(wscTargetCharname, msg);
}
AddLog("NOTICE: Draw %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str());
// A friendly message explaining the transfer.
msg = GetTimeString(set_bLocalTime) + L": You have drawn " + ToMoneyStr(cash) + L" credits from " + wscTargetCharname;
PrintUserCmdText(iClientID, L"%s", msg.c_str());
return true;
}
/**
Move a character from a remote account into this one.
*/
bool Rename::UserCmd_MoveChar(uint iClientID, const wstring &wscCmd, const wstring &wscParam, const wchar_t *usage)
{
HK_ERROR err;
// Don't indicate an error if moving is disabled.
if (!set_bEnableMoveChar)
return false;
// Indicate an error if the command does not appear to be formatted correctly
// and stop processing but tell FLHook that we processed the command.
if (wscParam.size()==0)
{
PrintUserCmdText(iClientID, L"ERR Invalid parameters");
PrintUserCmdText(iClientID, usage);
return true;
}
uint iBaseID;
pub::Player::GetBase(iClientID, iBaseID);
if (!iBaseID)
{
PrintUserCmdText(iClientID, L"ERR Not in base");
return true;
}
// Get the target account directory.
string scFile;
wstring wscMovingCharname = Trim(GetParam(wscParam, L' ', 0));
if (!GetUserFilePath(scFile, wscMovingCharname, "-movechar.ini"))
{
PrintUserCmdText(iClientID, L"ERR Character does not exist");
return true;
}
// Check the move char code.
wstring wscCode = Trim(GetParam(wscParam, L' ', 1));
wstring wscTargetCode = IniGetWS(scFile, "Settings", "Code", L"");
if (!wscTargetCode.length() || wscTargetCode!=wscCode)
{
PrintUserCmdText(iClientID, L"ERR Move character access denied");
return true;
}
// Get the character name for this connection.
wstring wscCharname = (const wchar_t*)Players.GetActiveCharacterName(iClientID);
for (map<wstring, LockedShipsStruct>::iterator i = MapLockedShips.begin(); i != MapLockedShips.end(); ++i)
{
if ((i->first == wscMovingCharname) && (i->second.LockLevel > 0))
{
PrintUserCmdText(iClientID, L"ERR This ship is locked. The FBI has been notified.");
wstring spurdoip;
HkGetPlayerIP(iClientID, spurdoip);
AddLog("SHIPLOCK: Attempt to movechar locked ship %s from IP %s", wstos(wscMovingCharname).c_str(), wstos(spurdoip).c_str());
ConPrint(L"SHIPLOCK: Attempt to movechar locked ship %s from IP %s\n", wscMovingCharname.c_str(), spurdoip.c_str());
return true;
}
}
// Prevent ships from banned accounts from being moved.
if (IsBanned(wscMovingCharname))
{
PrintUserCmdText(iClientID, L"ERR not permitted");
return true;
}
// Saving the characters forces an anti-cheat checks and fixes
// up a multitude of other problems.
HkSaveChar(wscCharname);
HkSaveChar(wscMovingCharname);
// Read the current number of credits for the player
// and check that the character has enough cash.
int iCash = 0;
if ((err = HkGetCash(wscCharname, iCash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if (set_iMoveCost>0 && iCash<set_iMoveCost)
{
PrintUserCmdText(iClientID, L"ERR Insufficient credits");
return true;
}
// Check there is room in this account.
CAccount *acc=Players.FindAccountFromClientID(iClientID);
if (acc->iNumberOfCharacters >= 7)
{
PrintUserCmdText(iClientID, L"ERR Too many characters in account");
return true;
}
// Copy character file into this account with a temp name.
char szDataPath[MAX_PATH];
GetUserDataPath(szDataPath);
string scAcctPath = string(szDataPath) + "\\Accts\\MultiPlayer\\";
wstring wscDir;
wstring wscSourceDir;
wstring wscSourceFile;
if ((err = HkGetAccountDirName(wscCharname, wscDir))!=HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if ((err = HkGetAccountDirName(wscMovingCharname, wscSourceDir))!=HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
if ((err = HkGetCharFileName(wscMovingCharname, wscSourceFile))!=HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR "+HkErrGetText(err));
return true;
}
// Remove cash if we're charging for it.
if (set_iMoveCost>0)
HkAddCash(wscCharname, 0-set_iMoveCost);
HkSaveChar(wscCharname);
// Schedule the move
MOVE o;
o.wscDestinationCharname = wscCharname;
o.wscMovingCharname = wscMovingCharname;
o.scSourceFile = scAcctPath + wstos(wscSourceDir) + "\\" + wstos(wscSourceFile) + ".fl";
o.scDestFile = scAcctPath + wstos(wscDir) + "\\" + wstos(wscSourceFile) + ".fl";
o.scDestFileTemp = scAcctPath + wstos(wscDir) + "\\" + wstos(wscSourceFile) + ".fl.moving";
pendingMoves.push_back(o);
// Delete the move code
::DeleteFileA(scFile.c_str());
// Kick
HkKickReason(o.wscDestinationCharname, L"Moving character, please wait 10 seconds before reconnecting");
HkKickReason(o.wscMovingCharname, L"Moving character, please wait 10 seconds before reconnecting");
return true;
}
