/*
* Copyright (c) Contributors, http://opensimulator.org/
* See CONTRIBUTORS.TXT for a full list of copyright holders.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
* * Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* * Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* * Neither the name of the OpenSim Project nor the
* names of its contributors may be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
using System;
using System.Collections;
using System.Collections.Generic;
using System.Net;
using System.Net.Sockets;
using System.Xml;
using libsecondlife;
using Nini.Config;
using OpenSim.Framework;
using OpenSim.Region.Environment.Interfaces;
using OpenSim.Region.Environment.Scenes;
using Nwc.XmlRpc;
using MoneyTransferArgs = OpenSim.Region.Environment.Scenes.EventManager.MoneyTransferArgs;
namespace OpenSim.Region.Environment.Modules
{
///
/// Demo Economy/Money Module. This is not a production quality money/economy module!
/// This is a demo for you to use when making one that works for you.
///
public class BetaGridLikeMoneyModule: IRegionModule
{
private static readonly log4net.ILog m_log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
///
/// Region UUIDS indexed by AgentID
///
Dictionary m_rootAgents = new Dictionary();
///
/// Scenes by Region Handle
///
private Dictionary m_scenel = new Dictionary();
private IConfigSource m_gConfig;
private bool m_keepMoneyAcrossLogins = true;
private int m_minFundsBeforeRefresh = 100;
private int m_stipend = 1000;
private bool m_enabled = true;
private Dictionary m_KnownClientFunds = new Dictionary();
private bool gridmode = false;
private Scene XMLRPCHandler;
private float EnergyEfficiency = 0f;
private int ObjectCapacity = 45000;
private int ObjectCount = 0;
private int PriceEnergyUnit = 0;
private int PriceGroupCreate = 0;
private int PriceObjectClaim = 0;
private float PriceObjectRent = 0f;
private float PriceObjectScaleFactor = 0f;
private int PriceParcelClaim = 0;
private float PriceParcelClaimFactor = 0f;
private int PriceParcelRent = 0;
private int PricePublicObjectDecay = 0;
private int PricePublicObjectDelete = 0;
private int PriceRentLight = 0;
private int PriceUpload = 0;
private int TeleportMinPrice = 0;
private int UserLevelPaysFees = 2;
private string m_MoneyAddress = String.Empty;
private string m_LandAddress = String.Empty;
float TeleportPriceExponent = 0f;
///
/// Where Stipends come from and Fees go to.
///
LLUUID EconomyBaseAccount = LLUUID.Zero;
///
/// Startup
///
///
///
public void Initialise(Scene scene, IConfigSource config)
{
m_gConfig = config;
IConfig startupConfig = m_gConfig.Configs["Startup"];
IConfig economyConfig = m_gConfig.Configs["Economy"];
ReadConfigAndPopulate(scene, startupConfig, "Startup");
ReadConfigAndPopulate(scene, economyConfig, "Economy");
if (m_enabled)
{
lock (m_scenel)
{
if (m_scenel.Count == 0)
{
XMLRPCHandler = scene;
// To use the following you need to add:
// -helperuri
// to the command line parameters you use to start up your client
// This commonly looks like -helperuri http://127.0.0.1:9000/
if (m_MoneyAddress.Length > 0)
{
// Centralized grid structure using OpenSimWi Redux revision 9+
scene.AddXmlRPCHandler("dynamic_balance_update_request", GridMoneyUpdate);
}
else
{
// Local Server.. enables functionality only.
scene.AddXmlRPCHandler("getCurrencyQuote", quote_func);
scene.AddXmlRPCHandler("buyCurrency", buy_func);
scene.AddXmlRPCHandler("preflightBuyLandPrep", preflightBuyLandPrep_func);
scene.AddXmlRPCHandler("buyLandPrep", landBuy_func);
}
}
if (m_scenel.ContainsKey(scene.RegionInfo.RegionHandle))
{
m_scenel[scene.RegionInfo.RegionHandle] = scene;
}
else
{
m_scenel.Add(scene.RegionInfo.RegionHandle, scene);
}
}
scene.EventManager.OnNewClient += OnNewClient;
scene.EventManager.OnMoneyTransfer += MoneyTransferAction;
scene.EventManager.OnClientClosed += ClientClosed;
scene.EventManager.OnNewInventoryItemUploadComplete += NewInventoryItemEconomyHandler;
scene.EventManager.OnAvatarEnteringNewParcel += AvatarEnteringParcel;
scene.EventManager.OnMakeChildAgent += MakeChildAgent;
scene.EventManager.OnClientClosed += ClientLoggedOut;
}
}
///
/// Parse Configuration
///
///
///
///
private void ReadConfigAndPopulate(Scene scene, IConfig startupConfig, string config)
{
if (config == "Startup" && startupConfig != null)
{
gridmode = startupConfig.GetBoolean("gridmode", false);
m_enabled = (startupConfig.GetString("economymodule", "BetaGridLikeMoneyModule") == "BetaGridLikeMoneyModule");
}
if (config == "Economy" && startupConfig != null)
{
ObjectCapacity = startupConfig.GetInt("ObjectCapacity", 45000);
PriceEnergyUnit = startupConfig.GetInt("PriceEnergyUnit", 100);
PriceObjectClaim = startupConfig.GetInt("PriceObjectClaim", 10);
PricePublicObjectDecay = startupConfig.GetInt("PricePublicObjectDecay", 4);
PricePublicObjectDelete = startupConfig.GetInt("PricePublicObjectDelete", 4);
PriceParcelClaim = startupConfig.GetInt("PriceParcelClaim", 1);
PriceParcelClaimFactor = startupConfig.GetFloat("PriceParcelClaimFactor", 1f);
PriceUpload = startupConfig.GetInt("PriceUpload", 0);
PriceRentLight = startupConfig.GetInt("PriceRentLight", 5);
TeleportMinPrice = startupConfig.GetInt("TeleportMinPrice", 2);
TeleportPriceExponent = startupConfig.GetFloat("TeleportPriceExponent", 2f);
EnergyEfficiency = startupConfig.GetFloat("EnergyEfficiency", 1);
PriceObjectRent = startupConfig.GetFloat("PriceObjectRent", 1);
PriceObjectScaleFactor = startupConfig.GetFloat("PriceObjectScaleFactor", 10);
PriceParcelRent = startupConfig.GetInt("PriceParcelRent", 1);
PriceGroupCreate = startupConfig.GetInt("PriceGroupCreate", -1);
string EBA = startupConfig.GetString("EconomyBaseAccount", LLUUID.Zero.ToString());
Helpers.TryParse(EBA,out EconomyBaseAccount);
UserLevelPaysFees = startupConfig.GetInt("UserLevelPaysFees", -1);
m_stipend = startupConfig.GetInt("UserStipend", 500);
m_minFundsBeforeRefresh = startupConfig.GetInt("IssueStipendWhenClientIsBelowAmount", 10);
m_keepMoneyAcrossLogins = startupConfig.GetBoolean("KeepMoneyAcrossLogins", true);
m_MoneyAddress = startupConfig.GetString("CurrencyServer", String.Empty);
m_LandAddress = startupConfig.GetString("LandServer", String.Empty);
}
// Send ObjectCapacity to Scene.. Which sends it to the SimStatsReporter.
scene.SetObjectCapacity(ObjectCapacity);
}
///
/// New Client Event Handler
///
///
private void OnNewClient(IClientAPI client)
{
// Here we check if we're in grid mode
// I imagine that the 'check balance'
// function for the client should be here or shortly after
if (gridmode)
{
if (m_MoneyAddress.Length == 0)
{
CheckExistAndRefreshFunds(client.AgentId);
}
else
{
//client.SecureSessionId;
Scene s = GetRandomScene();
if (s != null)
{
//s.RegionInfo.RegionHandle;
LLUUID agentID = LLUUID.Zero;
int funds = 0;
Hashtable hbinfo = GetBalanceForUserFromMoneyServer(client.AgentId, client.SecureSessionId, s.RegionInfo.originRegionID.ToString(), s.RegionInfo.regionSecret);
if ((bool)hbinfo["success"] == true)
{
Helpers.TryParse((string)hbinfo["agentId"], out agentID);
try
{
funds = (Int32)hbinfo["funds"];
}
catch (ArgumentException)
{
}
catch (FormatException)
{
}
catch (OverflowException)
{
m_log.ErrorFormat("[MONEY]: While getting the Currency for user {0}, the return funds overflowed.", agentID);
client.SendAlertMessage("Unable to get your money balance, money operations will be unavailable");
}
catch (InvalidCastException)
{
funds = 0;
}
m_KnownClientFunds[agentID] = funds;
}
else
{
m_log.WarnFormat("[MONEY]: Getting Money for user {0} failed with the following message:{1}", agentID, (string)hbinfo["errorMessage"]);
client.SendAlertMessage((string)hbinfo["errorMessage"]);
}
SendMoneyBalance(client, agentID, client.SessionId, LLUUID.Zero);
}
}
}
else
{
CheckExistAndRefreshFunds(client.AgentId);
}
// Subscribe to Money messages
client.OnEconomyDataRequest += EconomyDataRequestHandler;
client.OnMoneyBalanceRequest += SendMoneyBalance;
client.OnLogout += ClientClosed;
}
#region event Handlers
///
/// When the client closes the connection we remove their accounting info from memory to free up resources.
///
///
public void ClientClosed(LLUUID AgentID)
{
lock (m_KnownClientFunds)
{
if (m_keepMoneyAcrossLogins && m_MoneyAddress.Length == 0)
{
}
else
{
m_KnownClientFunds.Remove(AgentID);
}
}
}
///
/// Event called Economy Data Request handler.
///
///
public void EconomyDataRequestHandler(LLUUID agentId)
{
IClientAPI user = LocateClientObject(agentId);
if (user != null)
{
user.SendEconomyData(EnergyEfficiency, ObjectCapacity, ObjectCount, PriceEnergyUnit, PriceGroupCreate,
PriceObjectClaim, PriceObjectRent, PriceObjectScaleFactor, PriceParcelClaim, PriceParcelClaimFactor,
PriceParcelRent, PricePublicObjectDecay, PricePublicObjectDelete, PriceRentLight, PriceUpload,
TeleportMinPrice, TeleportPriceExponent);
}
}
///
/// THis method gets called when someone pays someone else as a gift.
///
///
///
private void MoneyTransferAction (Object osender, MoneyTransferArgs e)
{
IClientAPI sender = null;
IClientAPI receiver = null;
sender = LocateClientObject(e.sender);
if (sender != null)
{
receiver = LocateClientObject(e.reciever);
bool transactionresult = doMoneyTranfer(e.sender, e.reciever, e.amount);
if (e.sender != e.reciever)
{
if (sender != null)
{
sender.SendMoneyBalance(LLUUID.Random(), transactionresult, Helpers.StringToField(e.description), GetFundsForAgentID(e.sender));
}
}
if (receiver != null)
{
receiver.SendMoneyBalance(LLUUID.Random(), transactionresult, Helpers.StringToField(e.description), GetFundsForAgentID(e.reciever));
}
}
else
{
m_log.Warn("[MONEY]: Potential Fraud Warning, got money transfer request for avatar that isn't in this simulator - Details; Sender:" + e.sender.ToString() + " Reciver: " + e.reciever.ToString() + " Amount: " + e.amount.ToString());
}
}
///
/// A new inventory item came in, so we must charge if we're configured to do so!
///
///
///
///
///
private void NewInventoryItemEconomyHandler(LLUUID Uploader, LLUUID AssetID, String AssetName, int userlevel)
{
// Presumably a normal grid would actually send this information to a server somewhere.
// We're going to apply the UploadCost here.
if (m_enabled)
{
// Only make users that are below the UserLevelPaysFees value pay.
// Use this to exclude Region Owners (2), Estate Managers(1), Users (0), Disabled(-1)
if (PriceUpload > 0 && userlevel <= UserLevelPaysFees)
{
doMoneyTranfer(Uploader, EconomyBaseAccount, PriceUpload);
}
}
}
///
/// Event Handler for when a root agent becomes a child agent
///
///
private void MakeChildAgent(ScenePresence avatar)
{
lock (m_rootAgents)
{
if (m_rootAgents.ContainsKey(avatar.UUID))
{
if (m_rootAgents[avatar.UUID] == avatar.Scene.RegionInfo.originRegionID)
{
m_rootAgents.Remove(avatar.UUID);
m_log.Info("[MONEY]: Removing " + avatar.Firstname + " " + avatar.Lastname + " as a root agent");
}
}
}
}
///
/// Event Handler for when the client logs out.
///
///
private void ClientLoggedOut(LLUUID AgentId)
{
lock (m_rootAgents)
{
if (m_rootAgents.ContainsKey(AgentId))
{
m_rootAgents.Remove(AgentId);
//m_log.Info("[MONEY]: Removing " + AgentId + ". Agent logged out.");
}
}
}
///
/// Call this when the client disconnects.
///
///
public void ClientClosed(IClientAPI client)
{
ClientClosed(client.AgentId);
}
///
/// Event Handler for when an Avatar enters one of the parcels in the simulator.
///
///
///
///
private void AvatarEnteringParcel(ScenePresence avatar, int localLandID, LLUUID regionID)
{
lock (m_rootAgents)
{
if (m_rootAgents.ContainsKey(avatar.UUID))
{
if (avatar.Scene.RegionInfo.originRegionID != m_rootAgents[avatar.UUID])
{
m_rootAgents[avatar.UUID] = avatar.Scene.RegionInfo.originRegionID;
//m_log.Info("[MONEY]: Claiming " + avatar.Firstname + " " + avatar.Lastname + " in region:" + avatar.RegionHandle + ".");
// Claim User! my user! Mine mine mine!
if (m_MoneyAddress.Length > 0)
{
Scene RegionItem = GetSceneByUUID(regionID);
if (RegionItem != null)
{
Hashtable hresult = claim_user(avatar.UUID, avatar.ControllingClient.SecureSessionId, regionID, RegionItem.RegionInfo.regionSecret);
if ((bool)hresult["success"] == true)
{
int funds = 0;
try
{
funds = (Int32)hresult["funds"];
}
catch (InvalidCastException)
{
}
SetLocalFundsForAgentID(avatar.UUID, funds);
}
else
{
avatar.ControllingClient.SendAgentAlertMessage((string)hresult["errorMessage"], true);
}
}
}
}
}
else
{
lock (m_rootAgents)
{
m_rootAgents.Add(avatar.UUID, avatar.Scene.RegionInfo.originRegionID);
}
if (m_MoneyAddress.Length > 0)
{
Scene RegionItem = GetSceneByUUID(regionID);
if (RegionItem != null)
{
Hashtable hresult = claim_user(avatar.UUID, avatar.ControllingClient.SecureSessionId, regionID, RegionItem.RegionInfo.regionSecret);
if ((bool)hresult["success"] == true)
{
int funds = 0;
try
{
funds = (Int32)hresult["funds"];
}
catch (InvalidCastException)
{
}
SetLocalFundsForAgentID(avatar.UUID, funds);
}
else
{
avatar.ControllingClient.SendAgentAlertMessage((string)hresult["errorMessage"], true);
}
}
}
//m_log.Info("[MONEY]: Claiming " + avatar.Firstname + " " + avatar.Lastname + " in region:" + avatar.RegionHandle + ".");
}
}
//m_log.Info("[FRIEND]: " + avatar.Name + " status:" + (!avatar.IsChildAgent).ToString());
}
#endregion
///
/// Transfer money This currently does Gifts only.
///
///
///
///
///
private bool doMoneyTranfer(LLUUID Sender, LLUUID Receiver, int amount)
{
bool result = false;
if (amount >= 0)
{
lock (m_KnownClientFunds)
{
// If we don't know about the sender, then the sender can't
// actually be here and therefore this is likely fraud or outdated.
if (m_KnownClientFunds.ContainsKey(Sender))
{
// Does the sender have enough funds to give?
if (m_KnownClientFunds[Sender] >= amount)
{
// Subtract the funds from the senders account
m_KnownClientFunds[Sender] -= amount;
// do we know about the receiver?
if (!m_KnownClientFunds.ContainsKey(Receiver))
{
// Make a record for them so they get the updated balance when they login
CheckExistAndRefreshFunds(Receiver);
}
if (m_enabled)
{
if (m_MoneyAddress.Length == 0)
{
//Add the amount to the Receiver's funds
m_KnownClientFunds[Receiver] += amount;
result = true;
}
else
{
result = TransferMoneyonMoneyServer(Sender, Receiver, amount);
}
}
}
else
{
// These below are redundant to make this clearer to read
result = false;
}
}
else
{
result = false;
}
}
}
return result;
}
#region Utility Helpers
///
/// Locates a IClientAPI for the client specified
///
///
///
private IClientAPI LocateClientObject(LLUUID AgentID)
{
ScenePresence tPresence = null;
IClientAPI rclient = null;
lock (m_scenel)
{
foreach (Scene _scene in m_scenel.Values)
{
tPresence = _scene.GetScenePresence(AgentID);
if (tPresence != null)
{
if (!tPresence.IsChildAgent)
{
rclient = tPresence.ControllingClient;
}
}
if (rclient != null)
{
return rclient;
}
}
}
return null;
}
private Scene LocateSceneClientIn(LLUUID AgentId)
{
lock (m_scenel)
{
foreach (Scene _scene in m_scenel.Values)
{
ScenePresence tPresence = _scene.GetScenePresence(AgentId);
if (tPresence != null)
{
if (!tPresence.IsChildAgent)
{
return _scene;
}
}
}
}
return null;
}
///
/// Utility function Gets a Random scene in the instance. For when which scene exactly you're doing something with doesn't matter
///
///
public Scene GetRandomScene()
{
lock (m_scenel)
{
foreach (Scene rs in m_scenel.Values)
return rs;
}
return null;
}
///
/// Utility function to get a Scene by RegionID in a module
///
///
///
public Scene GetSceneByUUID(LLUUID RegionID)
{
lock (m_scenel)
{
foreach (Scene rs in m_scenel.Values)
{
if (rs.RegionInfo.originRegionID == RegionID)
{
return rs;
}
}
}
return null;
}
#endregion
///
/// Sends the the stored money balance to the client
///
///
///
///
///
public void SendMoneyBalance(IClientAPI client, LLUUID agentID, LLUUID SessionID, LLUUID TransactionID)
{
if (client.AgentId == agentID && client.SessionId == SessionID)
{
int returnfunds = 0;
try
{
returnfunds = GetFundsForAgentID(agentID);
}
catch (System.Exception e)
{
client.SendAlertMessage(e.Message + " ");
}
client.SendMoneyBalance(TransactionID, true, new byte[0], returnfunds);
}
else
{
client.SendAlertMessage("Unable to send your money balance to you!");
}
}
#region local Fund Management
///
/// Ensures that the agent accounting data is set up in this instance.
///
///
private void CheckExistAndRefreshFunds(LLUUID agentID)
{
lock (m_KnownClientFunds)
{
if (!m_KnownClientFunds.ContainsKey(agentID))
{
m_KnownClientFunds.Add(agentID, m_stipend);
}
else
{
if (m_KnownClientFunds[agentID] <= m_minFundsBeforeRefresh)
{
m_KnownClientFunds[agentID] = m_stipend;
}
}
}
}
///
/// Gets the amount of Funds for an agent
///
///
///
private int GetFundsForAgentID(LLUUID AgentID)
{
int returnfunds = 0;
lock (m_KnownClientFunds)
{
if (m_KnownClientFunds.ContainsKey(AgentID))
{
returnfunds = m_KnownClientFunds[AgentID];
}
else
{
throw new Exception("Unable to get funds.");
}
}
return returnfunds;
}
private void SetLocalFundsForAgentID(LLUUID AgentID, int amount)
{
lock (m_KnownClientFunds)
{
if (m_KnownClientFunds.ContainsKey(AgentID))
{
m_KnownClientFunds[AgentID] = amount;
}
else
{
m_KnownClientFunds.Add(AgentID, amount);
}
}
}
#endregion
///
/// Gets the current balance for the user from the Grid Money Server
///
///
///
///
///
///
public Hashtable GetBalanceForUserFromMoneyServer(LLUUID agentId, LLUUID secureSessionID, LLUUID regionId, string regionSecret)
{
Hashtable MoneyBalanceRequestParams = new Hashtable();
MoneyBalanceRequestParams["agentId"] = agentId.ToString();
MoneyBalanceRequestParams["secureSessionId"] = secureSessionID.ToString();
MoneyBalanceRequestParams["regionId"] = regionId.ToString();
MoneyBalanceRequestParams["secret"] = regionSecret;
MoneyBalanceRequestParams["currencySecret"] = ""; // per - region/user currency secret gotten from the money system
Hashtable MoneyRespData = genericCurrencyXMLRPCRequest(MoneyBalanceRequestParams, "simulator_user_balance_request");
return MoneyRespData;
}
///
/// Generic XMLRPC client abstraction
///
/// Hashtable containing parameters to the method
/// Method to invoke
/// Hashtable with success=>bool and other values
public Hashtable genericCurrencyXMLRPCRequest(Hashtable ReqParams, string method)
{
ArrayList SendParams = new ArrayList();
SendParams.Add(ReqParams);
// Send Request
XmlRpcResponse MoneyResp;
try
{
XmlRpcRequest BalanceRequestReq = new XmlRpcRequest(method, SendParams);
MoneyResp = BalanceRequestReq.Send(m_MoneyAddress, 30000);
}
catch (WebException ex)
{
m_log.ErrorFormat(
"[MONEY]: Unable to connect to Money Server {0}. Exception {1}",
m_MoneyAddress, ex);
Hashtable ErrorHash = new Hashtable();
ErrorHash["success"] = false;
ErrorHash["errorMessage"] = "Unable to manage your money at this time. Purchases may be unavailable";
ErrorHash["errorURI"] = "";
return ErrorHash;
//throw (ex);
}
catch (SocketException ex)
{
m_log.ErrorFormat(
"[MONEY]: Unable to connect to Money Server {0}. Exception {1}",
m_MoneyAddress, ex);
Hashtable ErrorHash = new Hashtable();
ErrorHash["success"] = false;
ErrorHash["errorMessage"] = "Unable to manage your money at this time. Purchases may be unavailable";
ErrorHash["errorURI"] = "";
return ErrorHash;
//throw (ex);
}
catch (XmlException ex)
{
m_log.ErrorFormat(
"[MONEY]: Unable to connect to Money Server {0}. Exception {1}",
m_MoneyAddress, ex);
Hashtable ErrorHash = new Hashtable();
ErrorHash["success"] = false;
ErrorHash["errorMessage"] = "Unable to manage your money at this time. Purchases may be unavailable";
ErrorHash["errorURI"] = "";
return ErrorHash;
}
if (MoneyResp.IsFault)
{
Hashtable ErrorHash = new Hashtable();
ErrorHash["success"] = false;
ErrorHash["errorMessage"] = "Unable to manage your money at this time. Purchases may be unavailable";
ErrorHash["errorURI"] = "";
return ErrorHash;
}
Hashtable MoneyRespData = (Hashtable)MoneyResp.Value;
return MoneyRespData;
}
///
/// This informs the Money Grid Server that the avatar is in this simulator
///
///
///
///
///
///
public Hashtable claim_user(LLUUID agentId, LLUUID secureSessionID, LLUUID regionId, string regionSecret)
{
Hashtable MoneyBalanceRequestParams = new Hashtable();
MoneyBalanceRequestParams["agentId"] = agentId.ToString();
MoneyBalanceRequestParams["secureSessionId"] = secureSessionID.ToString();
MoneyBalanceRequestParams["regionId"] = regionId.ToString();
MoneyBalanceRequestParams["secret"] = regionSecret;
Hashtable MoneyRespData = genericCurrencyXMLRPCRequest(MoneyBalanceRequestParams, "simulator_claim_user_request");
IClientAPI sendMoneyBal = LocateClientObject(agentId);
if (sendMoneyBal != null)
{
SendMoneyBalance(sendMoneyBal, agentId, sendMoneyBal.SessionId, LLUUID.Zero);
}
return MoneyRespData;
}
///
/// Informs the Money Grid Server of a transfer.
///
///
///
///
///
public bool TransferMoneyonMoneyServer(LLUUID sourceId, LLUUID destId, int amount)
{
string description = "Gift";
int aggregatePermInventory = 0;
int aggregatePermNextOwner = 0;
int flags = 0;
int transactiontype = 0;
bool rvalue = false;
IClientAPI cli = LocateClientObject(sourceId);
if (cli != null)
{
Scene userScene = null;
lock (m_rootAgents)
{
userScene = GetSceneByUUID(m_rootAgents[sourceId]);
}
if (userScene != null)
{
Hashtable ht = new Hashtable();
ht["agentId"] = sourceId.ToString();
ht["secureSessionId"] = cli.SecureSessionId.ToString();
ht["regionId"] = userScene.RegionInfo.originRegionID.ToString();
ht["secret"] = userScene.RegionInfo.regionSecret;
ht["currencySecret"] = " ";
ht["destId"] = destId.ToString();
ht["cash"] = amount;
ht["aggregatePermInventory"] = aggregatePermInventory;
ht["aggregatePermNextOwner"] = aggregatePermNextOwner;
ht["flags"] = flags;
ht["transactionType"] = transactiontype;
ht["description"] = description;
Hashtable hresult = genericCurrencyXMLRPCRequest(ht, "region_move_money");
if ((bool)hresult["success"] == true)
{
int funds1 = 0;
int funds2 = 0;
try
{
funds1 = (Int32)hresult["funds"];
}
catch(InvalidCastException)
{
funds1 = 0;
}
SetLocalFundsForAgentID(sourceId, funds1);
if (m_KnownClientFunds.ContainsKey(destId))
{
try
{
funds2 = (Int32)hresult["funds2"];
}
catch (InvalidCastException)
{
funds2 = 0;
}
SetLocalFundsForAgentID(destId, funds2);
}
rvalue = true;
}
else
{
cli.SendAgentAlertMessage((string)hresult["errorMessage"], true);
}
}
}
else
{
m_log.ErrorFormat("[MONEY]: Client {0} not found", sourceId.ToString());
}
return rvalue;
}
public XmlRpcResponse GridMoneyUpdate(XmlRpcRequest request)
{
m_log.Debug("[MONEY]: Dynamic balance update called.");
Hashtable requestData = (Hashtable)request.Params[0];
if (requestData.ContainsKey("agentId"))
{
LLUUID agentId = LLUUID.Zero;
Helpers.TryParse((string)requestData["agentId"], out agentId);
if (agentId != LLUUID.Zero)
{
IClientAPI aClient = LocateClientObject(agentId);
if (aClient != null)
{
Scene s = LocateSceneClientIn(agentId);
if (s != null)
{
if (m_MoneyAddress.Length > 0)
{
Hashtable hbinfo = GetBalanceForUserFromMoneyServer(aClient.AgentId, aClient.SecureSessionId, s.RegionInfo.originRegionID.ToString(), s.RegionInfo.regionSecret);
if ((bool)hbinfo["success"] == true)
{
int funds = 0;
Helpers.TryParse((string)hbinfo["agentId"], out agentId);
try
{
funds = (Int32)hbinfo["funds"];
}
catch (ArgumentException)
{
}
catch (FormatException)
{
}
catch (OverflowException)
{
m_log.ErrorFormat("[MONEY]: While getting the Currency for user {0}, the return funds overflowed.", agentId);
aClient.SendAlertMessage("Unable to get your money balance, money operations will be unavailable");
}
catch (InvalidCastException)
{
funds = 0;
}
SetLocalFundsForAgentID(agentId, funds);
}
else
{
m_log.WarnFormat("[MONEY]: Getting Money for user {0} failed with the following message:{1}", agentId, (string)hbinfo["errorMessage"]);
aClient.SendAlertMessage((string)hbinfo["errorMessage"]);
}
}
SendMoneyBalance(aClient, agentId, aClient.SessionId, LLUUID.Zero);
}
else
{
m_log.Debug("[MONEY]: Got balance request update for agent that is here, but couldn't find which scene.");
}
}
else
{
m_log.Debug("[MONEY]: Got balance request update for agent that isn't here.");
}
}
else
{
m_log.Debug("[MONEY]: invalid agentId specified, dropping.");
}
}
else
{
m_log.Debug("[MONEY]: no agentId specified, dropping.");
}
XmlRpcResponse r = new XmlRpcResponse();
Hashtable rparms = new Hashtable();
rparms["success"] = true;
r.Value = rparms;
return r;
}
# region Standalone box enablers only
public XmlRpcResponse quote_func(XmlRpcRequest request)
{
Hashtable requestData = (Hashtable)request.Params[0];
LLUUID agentId = LLUUID.Zero;
int amount = 0;
Hashtable quoteResponse = new Hashtable();
XmlRpcResponse returnval = new XmlRpcResponse();
if (requestData.ContainsKey("agentId") && requestData.ContainsKey("currencyBuy"))
{
Helpers.TryParse((string)requestData["agentId"], out agentId);
try
{
amount = (Int32)requestData["currencyBuy"];
}
catch (InvalidCastException)
{
}
Hashtable currencyResponse = new Hashtable();
currencyResponse.Add("estimatedCost", 0);
currencyResponse.Add("currencyBuy", amount);
quoteResponse.Add("success", true);
quoteResponse.Add("currency", currencyResponse);
quoteResponse.Add("confirm", "asdfad9fj39ma9fj");
returnval.Value = quoteResponse;
return returnval;
}
quoteResponse.Add("success", false);
quoteResponse.Add("errorMessage", "Invalid parameters passed to the quote box");
quoteResponse.Add("errorURI", "http://www.opensimulator.org/wiki");
returnval.Value = quoteResponse;
return returnval;
}
public XmlRpcResponse buy_func(XmlRpcRequest request)
{
Hashtable requestData = (Hashtable)request.Params[0];
LLUUID agentId = LLUUID.Zero;
int amount = 0;
if (requestData.ContainsKey("agentId") && requestData.ContainsKey("currencyBuy"))
{
Helpers.TryParse((string)requestData["agentId"], out agentId);
try
{
amount = (Int32)requestData["currencyBuy"];
}
catch (InvalidCastException)
{
}
if (agentId != LLUUID.Zero)
{
lock (m_KnownClientFunds)
{
if (m_KnownClientFunds.ContainsKey(agentId))
{
m_KnownClientFunds[agentId] += amount;
}
else
{
m_KnownClientFunds.Add(agentId, amount);
}
}
IClientAPI client = LocateClientObject(agentId);
if (client != null)
{
SendMoneyBalance(client, agentId, client.SessionId, LLUUID.Zero);
}
}
}
XmlRpcResponse returnval = new XmlRpcResponse();
Hashtable returnresp = new Hashtable();
returnresp.Add("success", true);
returnval.Value = returnresp;
return returnval;
}
public XmlRpcResponse preflightBuyLandPrep_func(XmlRpcRequest request)
{
XmlRpcResponse ret = new XmlRpcResponse();
Hashtable retparam = new Hashtable();
Hashtable membershiplevels = new Hashtable();
ArrayList levels = new ArrayList();
Hashtable level = new Hashtable();
level.Add("id", "00000000-0000-0000-0000-000000000000");
level.Add("description", "some level");
levels.Add(level);
//membershiplevels.Add("levels",levels);
Hashtable landuse = new Hashtable();
landuse.Add("upgrade", false);
landuse.Add("action", "http://invaliddomaininvalid.com/");
Hashtable currency = new Hashtable();
currency.Add("estimatedCost", 0);
Hashtable membership = new Hashtable();
membershiplevels.Add("upgrade", false);
membershiplevels.Add("action", "http://invaliddomaininvalid.com/");
membershiplevels.Add("levels", membershiplevels);
retparam.Add("success", true);
retparam.Add("currency", currency);
retparam.Add("membership", membership);
retparam.Add("landuse", landuse);
retparam.Add("confirm", "asdfajsdkfjasdkfjalsdfjasdf");
ret.Value = retparam;
return ret;
}
public XmlRpcResponse landBuy_func(XmlRpcRequest request)
{
XmlRpcResponse ret = new XmlRpcResponse();
Hashtable retparam = new Hashtable();
Hashtable requestData = (Hashtable)request.Params[0];
LLUUID agentId = LLUUID.Zero;
int amount = 0;
if (requestData.ContainsKey("agentId") && requestData.ContainsKey("currencyBuy"))
{
Helpers.TryParse((string)requestData["agentId"], out agentId);
try
{
amount = (Int32)requestData["currencyBuy"];
}
catch (InvalidCastException)
{
}
if (agentId != LLUUID.Zero)
{
lock (m_KnownClientFunds)
{
if (m_KnownClientFunds.ContainsKey(agentId))
{
m_KnownClientFunds[agentId] += amount;
}
else
{
m_KnownClientFunds.Add(agentId, amount);
}
}
IClientAPI client = LocateClientObject(agentId);
if (client != null)
{
SendMoneyBalance(client, agentId, client.SessionId, LLUUID.Zero);
}
}
}
retparam.Add("success", true);
ret.Value = retparam;
return ret;
}
#endregion
public void PostInitialise()
{
}
public void Close()
{
}
public string Name
{
get { return "BetaGridLikeMoneyModule"; }
}
public bool IsSharedModule
{
get { return true; }
}
}
public enum TransactionType : int
{
SystemGenerated=0,
RegionMoneyRequest=1,
Gift=2,
Purchase=3
}
}