/** 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;
}
bool UserCmd_BountyAdd(uint iClientID, const wstring &wscCmd, const wstring &wscParam, const wchar_t *usage)
{
if (!bPluginEnabled)
{
PrintUserCmdText(iClientID, L"BountyTracker is disabled.");
return true;
}
// Get the parameters from the user command.
wstring wscName = GetParam(wscParam, L' ', 0);
wstring wscCash = GetParam(wscParam, L' ', 1);
wstring wscxTimes = GetParam(wscParam, L' ', 2);
wscCash = ReplaceStr(wscCash, L".", L"");
wscCash = ReplaceStr(wscCash, L",", L"");
wscCash = ReplaceStr(wscCash, L"$", L"");
wscCash = ReplaceStr(wscCash, L"e6", L"000000");//because scientific notation is cool
int iOnlineSecs;
HkGetOnLineTime((wchar_t*)Players.GetActiveCharacterName(iClientID), iOnlineSecs);
if (iOnlineSecs < 7200)// 7200 = 2hrs
{
PrintUserCmdText(iClientID, L"ERR Char is too new");
return true;
}
//you are not allowed to create a bounty. ERR rank too low (note, find out what a good rank should be to have access to this. no fresh chars can
//create bounties. this way we can protect against creating random fresh accs, tranferring cash, and setting copious amounts of bounties.
if (wscName == L"")
{
PrintUserCmdText(iClientID, L"ERR invalid name\n");
return false;
}
if (HkGetAccountByCharname(wscName) == 0)
{
PrintUserCmdText(iClientID, L"ERR Player does not exist");
return true;
}
if (mapBountyTargets[ToLower(wscName)].active)
{
PrintUserCmdText(iClientID, L"ERR Player already has an active bounty\n");
return true;
}
if (mapBountyTargets[ToLower(wscName)].lastTime != "")
{
if ((stoi(mapBountyTargets[ToLower(wscName)].lastTime) + 3600) > (int)time(0))
{
PrintUserCmdText(iClientID, L"ERR Player is protected\n");
PrintUserCmdText(iClientID, stows(itos((stoi(mapBountyTargets[ToLower(wscName)].lastTime) + 3600) - (int)time(0))) + L"'s remaining");
return true;
}
}
if (iClientID == HkGetClientIdFromCharname(stows(mapBountyTargets[ToLower(wscName)].lastIssuer)))//not too sure about this
{
PrintUserCmdText(iClientID, L"ERR You cannot double a bounty on this player\n");
return true;
}
if (wscCash == L"")
{
PrintUserCmdText(iClientID, L"ERR invalid cash amount\n");
return false;
}
if (wscxTimes == L"")
{
PrintUserCmdText(iClientID, L"ERR invalid contract limit\n");
return false;
}
if (stoi(wscCash) < 1000000)
{
PrintUserCmdText(iClientID, L"ERR bounty cannot be less than 1,000,000 s.c");
return true;
}
if (stoi(wscxTimes) < 0 || stoi(wscxTimes) > 5)
{
PrintUserCmdText(iClientID, L"ERR bounty contract limit cannot be less than 0 or more than 5");
return true;
}
BountyTargetInfo BTIa = mapBountyTargets[ToLower(wscName)];
//generate new bounty map values
BTIa.Char = ToLower(wstos(wscName));
BTIa.Cash = wstos(wscCash);
BTIa.xTimes = wstos(wscxTimes);
BTIa.issuer = ToLower(wstos((wchar_t*)Players.GetActiveCharacterName(iClientID)));
BTIa.lastIssuer = BTIa.issuer;
BTIa.active = true;
BTIa.lastTime = "";
BTIa.issueTime = itos((int)time(0));
//check user has enough money for the bounty
int iCash;
HkGetCash(stows(BTIa.issuer), iCash);
if (iCash < (stoi(BTIa.Cash) * stoi(BTIa.xTimes)))
{
PrintUserCmdText(iClientID, L"ERR Not enough cash for bounty.");
return true;
}
HkAddCash((wchar_t*)Players.GetActiveCharacterName(iClientID), 0 - (stoi(BTIa.Cash) * stoi(BTIa.xTimes)));
PrintUserCmdText(iClientID, L"Uploading to Neural Net...");
mapBountyTargets[ToLower(wscName)] = BTIa;
wstring PFwsTargetInfo;
PFwsTargetInfo = L"Target: ";
PFwsTargetInfo += ToLower(wscName);
PFwsTargetInfo += L" Worth: ";
PFwsTargetInfo += stows(BTIa.Cash);
PFwsTargetInfo += L" Contracts Left: ";
PFwsTargetInfo += stows(BTIa.xTimes);
PFwsTargetInfo += L" Issuer: ";
PFwsTargetInfo += stows(BTIa.issuer);
PFwsTargetInfo += L" Issued: ";
PFwsTargetInfo += stows(BTIa.issueTime);
PrintUserCmdText(iClientID, PFwsTargetInfo);
if (appendBountyCfg(BTIa))
{
ConPrint(L"cfg saved\n");
}
else
{
ConPrint(L"Err saving to cfg\n");
}
PrintUserCmdText(iClientID, L"OK");
return true;
}
/** Process a give cash command */
bool GiveCash::UserCmd_GiveCash(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 wscCash = GetParam(wscParam, L' ', 1);
wstring wscAnon = 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() || cash<=0) || (wscAnon.size() && wscAnon!=L"anon"))
{
PrintUserCmdText(iClientID, L"ERR Invalid parameters");
PrintUserCmdText(iClientID, usage);
return true;
}
bool bAnon = false;
if (wscAnon==L"anon")
bAnon = true;
if (HkGetAccountByCharname(wscTargetCharname)==0)
{
PrintUserCmdText(iClientID, L"ERR char does not exist");
return true;
}
int secs = 0;
HkGetOnLineTime(wscCharname, 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;
}
// 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 (cash<set_iMinTransfer || cash<0) {
PrintUserCmdText(iClientID, L"ERR Transfer too small, minimum transfer "+ToMoneyStr(set_iMinTransfer)+L" credits");
return true;
}
if (iCash<cash)
{
PrintUserCmdText(iClientID, L"ERR Insufficient credits");
return true;
}
// Prevent target ship from becoming corrupt.
float fTargetValue = 0.0f;
if (HKGetShipValue(wscTargetCharname, 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(wscTargetCharname, iExpectedCash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Get cash failed err="+HkErrGetText(err));
return true;
}
iExpectedCash += cash;
// Do an anticheat check on the receiving character first.
uint targetClientId = HkGetClientIdFromCharname(wscTargetCharname);
if (targetClientId!=-1 && !HkIsInCharSelectMenu(targetClientId))
{
if (HkAntiCheat(targetClientId) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when sending %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str());
return true;
}
HkSaveChar(targetClientId);
}
if (targetClientId != -1)
{
if (ClientInfo[iClientID].iTradePartner || ClientInfo[targetClientId].iTradePartner)
{
PrintUserCmdText(iClientID, L"ERR Trade window open");
AddLog("NOTICE: Trade window open when sending %s credits from %s (%s) to %s (%s) %u %u",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
iClientID, targetClientId);
return true;
}
}
// Remove cash from current character and save it checking that the
// save completes before allowing the cash to be added to the target ship.
if ((err = HkAddCash(wscCharname, 0-cash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Remove cash failed err="+HkErrGetText(err));
return true;
}
if (HkAntiCheat(iClientID) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when sending %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str());
return true;
}
HkSaveChar(iClientID);
// Add cash to target character
if ((err = HkAddCash(wscTargetCharname, cash)) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Add cash failed err="+HkErrGetText(err));
return true;
}
targetClientId = HkGetClientIdFromCharname(wscTargetCharname);
if (targetClientId!=-1 && !HkIsInCharSelectMenu(targetClientId))
{
if (HkAntiCheat(targetClientId) != HKE_OK)
{
PrintUserCmdText(iClientID, L"ERR Transfer failed");
AddLog("NOTICE: Possible cheating when sending %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str());
return true;
}
HkSaveChar(targetClientId);
}
// Check that receiving character has the correct ammount of cash.
int iCurrCash;
if ((err = HkGetCash(wscTargetCharname, iCurrCash)) != HKE_OK
|| iCurrCash != iExpectedCash)
{
AddLog("ERROR: Cash transfer error when sending %s credits from %s (%s) to %s (%s) current %s credits expected %s credits ",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str(),
wstos(ToMoneyStr(iCurrCash)).c_str(), wstos(ToMoneyStr(iExpectedCash)).c_str());
PrintUserCmdText(iClientID, L"ERR Transfer failed");
return true;
}
// If the target player is online then send them a message saying
// telling them that they've received the cash.
wstring msg = L"You have received " + ToMoneyStr(cash) + L" credits from " + ((bAnon)?L"anonymous":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
{
wstring msg = L"You have received " + ToMoneyStr(cash) + L" credits from " + ((bAnon)?L"anonymous":wscCharname);
LogTransfer(wscTargetCharname, msg);
}
AddLog("NOTICE: Send %s credits from %s (%s) to %s (%s)",
wstos(ToMoneyStr(cash)).c_str(),
wstos(wscCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscCharname))).c_str(),
wstos(wscTargetCharname).c_str(), wstos(HkGetAccountID(HkGetAccountByCharname(wscTargetCharname))).c_str());
// A friendly message explaining the transfer.
msg = L"You have sent " + ToMoneyStr(cash) + L" credits to " + wscTargetCharname;
if (bAnon)
msg += L" anonymously";
PrintUserCmdText(iClientID, L"%s", msg.c_str());
return true;
}
