1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012 |
- /*
- * 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 OpenSimulator 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.IO;
- using System.Reflection;
- using System.Runtime.Remoting.Lifetime;
- using System.Text;
- using System.Net;
- using System.Threading;
- using System.Xml;
- using log4net;
- using OpenMetaverse;
- using OpenMetaverse.StructuredData;
- using Nini.Config;
- using OpenSim;
- using OpenSim.Framework;
- using OpenSim.Framework.Console;
- using OpenSim.Region.Framework.Interfaces;
- using OpenSim.Region.Framework.Scenes;
- using OpenSim.Region.ScriptEngine.Shared;
- using OpenSim.Region.ScriptEngine.Shared.Api.Plugins;
- using OpenSim.Region.ScriptEngine.Shared.ScriptBase;
- using OpenSim.Region.ScriptEngine.Interfaces;
- using OpenSim.Region.ScriptEngine.Shared.Api.Interfaces;
- using TPFlags = OpenSim.Framework.Constants.TeleportFlags;
- using OpenSim.Services.Interfaces;
- using GridRegion = OpenSim.Services.Interfaces.GridRegion;
- using System.Text.RegularExpressions;
- using LSL_Float = OpenSim.Region.ScriptEngine.Shared.LSL_Types.LSLFloat;
- using LSL_Integer = OpenSim.Region.ScriptEngine.Shared.LSL_Types.LSLInteger;
- using LSL_Key = OpenSim.Region.ScriptEngine.Shared.LSL_Types.LSLString;
- using LSL_List = OpenSim.Region.ScriptEngine.Shared.LSL_Types.list;
- using LSL_Rotation = OpenSim.Region.ScriptEngine.Shared.LSL_Types.Quaternion;
- using LSL_String = OpenSim.Region.ScriptEngine.Shared.LSL_Types.LSLString;
- using LSL_Vector = OpenSim.Region.ScriptEngine.Shared.LSL_Types.Vector3;
- using PermissionMask = OpenSim.Framework.PermissionMask;
- using OpenSim.Services.Connectors.Hypergrid;
- namespace OpenSim.Region.ScriptEngine.Shared.Api
- {
- //////////////////////////////////////////////////////////////
- //
- // Level description
- //
- // None - Function is no threat at all. It doesn't constitute
- // an threat to either users or the system and has no
- // known side effects
- //
- // Nuisance - Abuse of this command can cause a nuisance to the
- // region operator, such as log message spew
- //
- // VeryLow - Extreme levels ob abuse of this function can cause
- // impaired functioning of the region, or very gullible
- // users can be tricked into experiencing harmless effects
- //
- // Low - Intentional abuse can cause crashes or malfunction
- // under certain circumstances, which can easily be rectified,
- // or certain users can be tricked into certain situations
- // in an avoidable manner.
- //
- // Moderate - Intentional abuse can cause denial of service and crashes
- // with potential of data or state loss, or trusting users
- // can be tricked into embarrassing or uncomfortable
- // situationsa.
- //
- // High - Casual abuse can cause impaired functionality or temporary
- // denial of service conditions. Intentional abuse can easily
- // cause crashes with potential data loss, or can be used to
- // trick experienced and cautious users into unwanted situations,
- // or changes global data permanently and without undo ability
- // Malicious scripting can allow theft of content
- //
- // VeryHigh - Even normal use may, depending on the number of instances,
- // or frequency of use, result in severe service impairment
- // or crash with loss of data, or can be used to cause
- // unwanted or harmful effects on users without giving the
- // user a means to avoid it.
- //
- // Severe - Even casual use is a danger to region stability, or function
- // allows console or OS command execution, or function allows
- // taking money without consent, or allows deletion or
- // modification of user data, or allows the compromise of
- // sensitive data by design.
- class FunctionPerms
- {
- public List<UUID> AllowedCreators;
- public List<UUID> AllowedOwners;
- public List<string> AllowedOwnerClasses;
- public FunctionPerms()
- {
- AllowedCreators = new List<UUID>();
- AllowedOwners = new List<UUID>();
- AllowedOwnerClasses = new List<string>();
- }
- }
- [Serializable]
- public class OSSL_Api : MarshalByRefObject, IOSSL_Api, IScriptApi
- {
- private static readonly ILog m_log = LogManager.GetLogger(MethodBase.GetCurrentMethod().DeclaringType);
- public const string GridInfoServiceConfigSectionName = "GridInfoService";
- internal IScriptEngine m_ScriptEngine;
- internal ILSL_Api m_LSL_Api = null; // get a reference to the LSL API so we can call methods housed there
- internal SceneObjectPart m_host;
- internal TaskInventoryItem m_item;
- internal bool m_OSFunctionsEnabled = false;
- internal ThreatLevel m_MaxThreatLevel = ThreatLevel.VeryLow;
- internal float m_ScriptDelayFactor = 1.0f;
- internal float m_ScriptDistanceFactor = 1.0f;
- internal Dictionary<string, FunctionPerms > m_FunctionPerms = new Dictionary<string, FunctionPerms >();
- protected IUrlModule m_UrlModule = null;
- public void Initialize(
- IScriptEngine scriptEngine, SceneObjectPart host, TaskInventoryItem item)
- {
- m_ScriptEngine = scriptEngine;
- m_host = host;
- m_item = item;
- m_UrlModule = m_ScriptEngine.World.RequestModuleInterface<IUrlModule>();
- if (m_ScriptEngine.Config.GetBoolean("AllowOSFunctions", false))
- {
- m_OSFunctionsEnabled = true;
- // m_log.Warn("[OSSL] OSSL FUNCTIONS ENABLED");
- }
- m_ScriptDelayFactor =
- m_ScriptEngine.Config.GetFloat("ScriptDelayFactor", 1.0f);
- m_ScriptDistanceFactor =
- m_ScriptEngine.Config.GetFloat("ScriptDistanceLimitFactor", 1.0f);
- string risk = m_ScriptEngine.Config.GetString("OSFunctionThreatLevel", "VeryLow");
- switch (risk)
- {
- case "NoAccess":
- m_MaxThreatLevel = ThreatLevel.NoAccess;
- break;
- case "None":
- m_MaxThreatLevel = ThreatLevel.None;
- break;
- case "VeryLow":
- m_MaxThreatLevel = ThreatLevel.VeryLow;
- break;
- case "Low":
- m_MaxThreatLevel = ThreatLevel.Low;
- break;
- case "Moderate":
- m_MaxThreatLevel = ThreatLevel.Moderate;
- break;
- case "High":
- m_MaxThreatLevel = ThreatLevel.High;
- break;
- case "VeryHigh":
- m_MaxThreatLevel = ThreatLevel.VeryHigh;
- break;
- case "Severe":
- m_MaxThreatLevel = ThreatLevel.Severe;
- break;
- default:
- break;
- }
- }
- public override Object InitializeLifetimeService()
- {
- ILease lease = (ILease)base.InitializeLifetimeService();
- if (lease.CurrentState == LeaseState.Initial)
- {
- lease.InitialLeaseTime = TimeSpan.FromMinutes(0);
- // lease.RenewOnCallTime = TimeSpan.FromSeconds(10.0);
- // lease.SponsorshipTimeout = TimeSpan.FromMinutes(1.0);
- }
- return lease;
- }
- public Scene World
- {
- get { return m_ScriptEngine.World; }
- }
- internal void OSSLError(string msg)
- {
- throw new ScriptException("OSSL Runtime Error: " + msg);
- }
- /// <summary>
- /// Initialize the LSL interface.
- /// </summary>
- /// <remarks>
- /// FIXME: This is an abomination. We should be able to set this up earlier but currently we have no
- /// guarantee the interface is present on Initialize(). There needs to be another post initialize call from
- /// ScriptInstance.
- /// </remarks>
- private void InitLSL()
- {
- if (m_LSL_Api != null)
- return;
- m_LSL_Api = (ILSL_Api)m_ScriptEngine.GetApi(m_item.ItemID, "LSL");
- }
- //
- //Dumps an error message on the debug console.
- //
- internal void OSSLShoutError(string message)
- {
- if (message.Length > 1023)
- message = message.Substring(0, 1023);
- World.SimChat(Utils.StringToBytes(message),
- ChatTypeEnum.Shout, ScriptBaseClass.DEBUG_CHANNEL, m_host.ParentGroup.RootPart.AbsolutePosition, m_host.Name, m_host.UUID, true);
- IWorldComm wComm = m_ScriptEngine.World.RequestModuleInterface<IWorldComm>();
- wComm.DeliverMessage(ChatTypeEnum.Shout, ScriptBaseClass.DEBUG_CHANNEL, m_host.Name, m_host.UUID, message);
- }
- // Returns of the function is allowed. Throws a script exception if not allowed.
- public void CheckThreatLevel(ThreatLevel level, string function)
- {
- if (!m_OSFunctionsEnabled)
- OSSLError(String.Format("{0} permission denied. All OS functions are disabled.", function)); // throws
- string reasonWhyNot = CheckThreatLevelTest(level, function);
- if (!String.IsNullOrEmpty(reasonWhyNot))
- {
- OSSLError(reasonWhyNot);
- }
- }
- // Check to see if function is allowed. Returns an empty string if function permitted
- // or a string explaining why this function can't be used.
- private string CheckThreatLevelTest(ThreatLevel level, string function)
- {
- if (!m_FunctionPerms.ContainsKey(function))
- {
- FunctionPerms perms = new FunctionPerms();
- m_FunctionPerms[function] = perms;
- string ownerPerm = m_ScriptEngine.Config.GetString("Allow_" + function, "");
- string creatorPerm = m_ScriptEngine.Config.GetString("Creators_" + function, "");
- if (ownerPerm == "" && creatorPerm == "")
- {
- // Default behavior
- perms.AllowedOwners = null;
- perms.AllowedCreators = null;
- perms.AllowedOwnerClasses = null;
- }
- else
- {
- bool allowed;
- if (bool.TryParse(ownerPerm, out allowed))
- {
- // Boolean given
- if (allowed)
- {
- // Allow globally
- perms.AllowedOwners.Add(UUID.Zero);
- }
- }
- else
- {
- string[] ids = ownerPerm.Split(new char[] {','});
- foreach (string id in ids)
- {
- string current = id.Trim();
- if (current.ToUpper() == "PARCEL_GROUP_MEMBER" || current.ToUpper() == "PARCEL_OWNER" || current.ToUpper() == "ESTATE_MANAGER" || current.ToUpper() == "ESTATE_OWNER")
- {
- if (!perms.AllowedOwnerClasses.Contains(current))
- perms.AllowedOwnerClasses.Add(current.ToUpper());
- }
- else
- {
- UUID uuid;
- if (UUID.TryParse(current, out uuid))
- {
- if (uuid != UUID.Zero)
- perms.AllowedOwners.Add(uuid);
- }
- }
- }
- ids = creatorPerm.Split(new char[] {','});
- foreach (string id in ids)
- {
- string current = id.Trim();
- UUID uuid;
- if (UUID.TryParse(current, out uuid))
- {
- if (uuid != UUID.Zero)
- perms.AllowedCreators.Add(uuid);
- }
- }
- }
- }
- }
- // If the list is null, then the value was true / undefined
- // Threat level governs permissions in this case
- //
- // If the list is non-null, then it is a list of UUIDs allowed
- // to use that particular function. False causes an empty
- // list and therefore means "no one"
- //
- // To allow use by anyone, the list contains UUID.Zero
- //
- if (m_FunctionPerms[function].AllowedOwners == null)
- {
- // Allow / disallow by threat level
- if (level > m_MaxThreatLevel)
- return
- String.Format(
- "{0} permission denied. Allowed threat level is {1} but function threat level is {2}.",
- function, m_MaxThreatLevel, level);
- }
- else
- {
- if (!m_FunctionPerms[function].AllowedOwners.Contains(UUID.Zero))
- {
- // Not anyone. Do detailed checks
- if (m_FunctionPerms[function].AllowedOwners.Contains(m_host.OwnerID))
- {
- // prim owner is in the list of allowed owners
- return String.Empty;
- }
- UUID ownerID = m_item.OwnerID;
- //OSSL only may be used if object is in the same group as the parcel
- if (m_FunctionPerms[function].AllowedOwnerClasses.Contains("PARCEL_GROUP_MEMBER"))
- {
- ILandObject land = World.LandChannel.GetLandObject(m_host.AbsolutePosition);
- if (land.LandData.GroupID == m_item.GroupID && land.LandData.GroupID != UUID.Zero)
- {
- return String.Empty;
- }
- }
- //Only Parcelowners may use the function
- if (m_FunctionPerms[function].AllowedOwnerClasses.Contains("PARCEL_OWNER"))
- {
- ILandObject land = World.LandChannel.GetLandObject(m_host.AbsolutePosition);
- if (land.LandData.OwnerID == ownerID)
- {
- return String.Empty;
- }
- }
- //Only Estate Managers may use the function
- if (m_FunctionPerms[function].AllowedOwnerClasses.Contains("ESTATE_MANAGER"))
- {
- //Only Estate Managers may use the function
- if (World.RegionInfo.EstateSettings.IsEstateManagerOrOwner(ownerID) && World.RegionInfo.EstateSettings.EstateOwner != ownerID)
- {
- return String.Empty;
- }
- }
- //Only regionowners may use the function
- if (m_FunctionPerms[function].AllowedOwnerClasses.Contains("ESTATE_OWNER"))
- {
- if (World.RegionInfo.EstateSettings.EstateOwner == ownerID)
- {
- return String.Empty;
- }
- }
- if (!m_FunctionPerms[function].AllowedCreators.Contains(m_item.CreatorID))
- return(
- String.Format("{0} permission denied. Script creator is not in the list of users allowed to execute this function and prim owner also has no permission.",
- function));
- if (m_item.CreatorID != ownerID)
- {
- if ((m_item.CurrentPermissions & (uint)PermissionMask.Modify) != 0)
- return String.Format("{0} permission denied. Script permissions error.", function);
- }
- }
- }
- return String.Empty;
- }
- internal void OSSLDeprecated(string function, string replacement)
- {
- OSSLShoutError(string.Format("Use of function {0} is deprecated. Use {1} instead.", function, replacement));
- }
- protected void ScriptSleep(int delay)
- {
- delay = (int)((float)delay * m_ScriptDelayFactor);
- if (delay == 0)
- return;
- System.Threading.Thread.Sleep(delay);
- }
- public LSL_Integer osSetTerrainHeight(int x, int y, double val)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetTerrainHeight");
- return SetTerrainHeight(x, y, val);
- }
- public LSL_Integer osTerrainSetHeight(int x, int y, double val)
- {
- CheckThreatLevel(ThreatLevel.High, "osTerrainSetHeight");
- OSSLDeprecated("osTerrainSetHeight", "osSetTerrainHeight");
- return SetTerrainHeight(x, y, val);
- }
- private LSL_Integer SetTerrainHeight(int x, int y, double val)
- {
- m_host.AddScriptLPS(1);
- if (x > (World.RegionInfo.RegionSizeX - 1) || x < 0 || y > (World.RegionInfo.RegionSizeY - 1) || y < 0)
- OSSLError("osSetTerrainHeight: Coordinate out of bounds");
- if (World.Permissions.CanTerraformLand(m_host.OwnerID, new Vector3(x, y, 0)))
- {
- World.Heightmap[x, y] = val;
- return 1;
- }
- else
- {
- return 0;
- }
- }
- public LSL_Float osGetTerrainHeight(int x, int y)
- {
- CheckThreatLevel(ThreatLevel.None, "osGetTerrainHeight");
- return GetTerrainHeight(x, y);
- }
- public LSL_Float osTerrainGetHeight(int x, int y)
- {
- CheckThreatLevel(ThreatLevel.None, "osTerrainGetHeight");
- OSSLDeprecated("osTerrainGetHeight", "osGetTerrainHeight");
- return GetTerrainHeight(x, y);
- }
- private LSL_Float GetTerrainHeight(int x, int y)
- {
- m_host.AddScriptLPS(1);
- if (x > (World.RegionInfo.RegionSizeX - 1) || x < 0 || y > (World.RegionInfo.RegionSizeY - 1) || y < 0)
- OSSLError("osGetTerrainHeight: Coordinate out of bounds");
- return World.Heightmap[x, y];
- }
- public void osTerrainFlush()
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osTerrainFlush");
- m_host.AddScriptLPS(1);
- ITerrainModule terrainModule = World.RequestModuleInterface<ITerrainModule>();
- if (terrainModule != null) terrainModule.TaintTerrain();
- }
- public int osRegionRestart(double seconds)
- {
- // This is High here because region restart is not reliable
- // it may result in the region staying down or becoming
- // unstable. This should be changed to Low or VeryLow once
- // The underlying functionality is fixed, since the security
- // as such is sound
- //
- CheckThreatLevel(ThreatLevel.High, "osRegionRestart");
- IRestartModule restartModule = World.RequestModuleInterface<IRestartModule>();
- m_host.AddScriptLPS(1);
- if (World.Permissions.CanIssueEstateCommand(m_host.OwnerID, false) && (restartModule != null))
- {
- if (seconds < 15)
- {
- restartModule.AbortRestart("Restart aborted");
- return 1;
- }
- List<int> times = new List<int>();
- while (seconds > 0)
- {
- times.Add((int)seconds);
- if (seconds > 300)
- seconds -= 120;
- else if (seconds > 30)
- seconds -= 30;
- else
- seconds -= 15;
- }
- restartModule.ScheduleRestart(UUID.Zero, "Region will restart in {0}", times.ToArray(), true);
- return 1;
- }
- else
- {
- return 0;
- }
- }
- public void osRegionNotice(string msg)
- {
- // This implementation provides absolutely no security
- // It's high griefing potential makes this classification
- // necessary
- //
- CheckThreatLevel(ThreatLevel.VeryHigh, "osRegionNotice");
- m_host.AddScriptLPS(1);
- IDialogModule dm = World.RequestModuleInterface<IDialogModule>();
- if (dm != null)
- dm.SendGeneralAlert(msg);
- }
- public void osSetRot(UUID target, Quaternion rotation)
- {
- // This function has no security. It can be used to destroy
- // arbitrary builds the user would normally have no rights to
- //
- CheckThreatLevel(ThreatLevel.VeryHigh, "osSetRot");
- m_host.AddScriptLPS(1);
- if (World.Entities.ContainsKey(target))
- {
- EntityBase entity;
- if (World.Entities.TryGetValue(target, out entity))
- {
- if (entity is SceneObjectGroup)
- ((SceneObjectGroup)entity).UpdateGroupRotationR(rotation);
- else if (entity is ScenePresence)
- ((ScenePresence)entity).Rotation = rotation;
- }
- }
- else
- {
- OSSLError("osSetRot: Invalid target");
- }
- }
- public string osSetDynamicTextureURL(string dynamicID, string contentType, string url, string extraParams,
- int timer)
- {
- // This may be upgraded depending on the griefing or DOS
- // potential, or guarded with a delay
- //
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureURL");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- UUID createdTexture =
- textureManager.AddDynamicTextureURL(World.RegionInfo.RegionID, m_host.UUID, contentType, url,
- extraParams, timer);
- return createdTexture.ToString();
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public string osSetDynamicTextureURLBlend(string dynamicID, string contentType, string url, string extraParams,
- int timer, int alpha)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureURLBlend");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- UUID createdTexture =
- textureManager.AddDynamicTextureURL(World.RegionInfo.RegionID, m_host.UUID, contentType, url,
- extraParams, timer, true, (byte) alpha);
- return createdTexture.ToString();
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public string osSetDynamicTextureURLBlendFace(string dynamicID, string contentType, string url, string extraParams,
- bool blend, int disp, int timer, int alpha, int face)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureURLBlendFace");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- UUID createdTexture =
- textureManager.AddDynamicTextureURL(World.RegionInfo.RegionID, m_host.UUID, contentType, url,
- extraParams, timer, blend, disp, (byte) alpha, face);
- return createdTexture.ToString();
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public string osSetDynamicTextureData(string dynamicID, string contentType, string data, string extraParams,
- int timer)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureData");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- if (textureManager != null)
- {
- if (extraParams == String.Empty)
- {
- extraParams = "256";
- }
- UUID createdTexture =
- textureManager.AddDynamicTextureData(World.RegionInfo.RegionID, m_host.UUID, contentType, data,
- extraParams, timer);
- return createdTexture.ToString();
- }
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public string osSetDynamicTextureDataBlend(string dynamicID, string contentType, string data, string extraParams,
- int timer, int alpha)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureDataBlend");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- if (textureManager != null)
- {
- if (extraParams == String.Empty)
- {
- extraParams = "256";
- }
- UUID createdTexture =
- textureManager.AddDynamicTextureData(World.RegionInfo.RegionID, m_host.UUID, contentType, data,
- extraParams, timer, true, (byte) alpha);
- return createdTexture.ToString();
- }
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public string osSetDynamicTextureDataBlendFace(string dynamicID, string contentType, string data, string extraParams,
- bool blend, int disp, int timer, int alpha, int face)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetDynamicTextureDataBlendFace");
- m_host.AddScriptLPS(1);
- if (dynamicID == String.Empty)
- {
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- if (textureManager != null)
- {
- if (extraParams == String.Empty)
- {
- extraParams = "256";
- }
- UUID createdTexture =
- textureManager.AddDynamicTextureData(World.RegionInfo.RegionID, m_host.UUID, contentType, data,
- extraParams, timer, blend, disp, (byte) alpha, face);
- return createdTexture.ToString();
- }
- }
- else
- {
- //TODO update existing dynamic textures
- }
- return UUID.Zero.ToString();
- }
- public bool osConsoleCommand(string command)
- {
- CheckThreatLevel(ThreatLevel.Severe, "osConsoleCommand");
- m_host.AddScriptLPS(1);
- // For safety, we add another permission check here, and don't rely only on the standard OSSL permissions
- if (World.Permissions.CanRunConsoleCommand(m_host.OwnerID))
- {
- MainConsole.Instance.RunCommand(command);
- return true;
- }
- return false;
- }
- public void osSetPrimFloatOnWater(int floatYN)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetPrimFloatOnWater");
- m_host.AddScriptLPS(1);
- m_host.ParentGroup.RootPart.SetFloatOnWater(floatYN);
- }
- // Teleport functions
- public void osTeleportAgent(string agent, string regionName, LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- // High because there is no security check. High griefer potential
- //
- CheckThreatLevel(ThreatLevel.Severe, "osTeleportAgent");
- TeleportAgent(agent, regionName, position, lookat, false);
- }
- private void TeleportAgent(string agent, string regionName,
- LSL_Types.Vector3 position, LSL_Types.Vector3 lookat, bool relaxRestrictions)
- {
- m_host.AddScriptLPS(1);
- UUID agentId = new UUID();
- if (UUID.TryParse(agent, out agentId))
- {
- ScenePresence presence = World.GetScenePresence(agentId);
- if (presence != null)
- {
- // For osTeleportAgent, agent must be over owners land to avoid abuse
- // For osTeleportOwner, this restriction isn't necessary
- // commented out because its redundant and uneeded please remove eventually.
- // if (relaxRestrictions ||
- // m_host.OwnerID
- // == World.LandChannel.GetLandObject(
- // presence.AbsolutePosition.X, presence.AbsolutePosition.Y).LandData.OwnerID)
- // {
- // We will launch the teleport on a new thread so that when the script threads are terminated
- // before teleport in ScriptInstance.GetXMLState(), we don't end up aborting the one doing the teleporting.
- Util.FireAndForget(
- o => World.RequestTeleportLocation(
- presence.ControllingClient, regionName, position,
- lookat, (uint)TPFlags.ViaLocation),
- null, "OSSL_Api.TeleportAgentByRegionCoords");
- ScriptSleep(5000);
- // }
- }
- }
- }
- public void osTeleportAgent(string agent, int regionX, int regionY, LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- // High because there is no security check. High griefer potential
- //
- CheckThreatLevel(ThreatLevel.Severe, "osTeleportAgent");
- TeleportAgent(agent, regionX, regionY, position, lookat, false);
- }
- private void TeleportAgent(string agent, int regionX, int regionY,
- LSL_Types.Vector3 position, LSL_Types.Vector3 lookat, bool relaxRestrictions)
- {
- // ulong regionHandle = Util.UIntsToLong(((uint)regionX * (uint)Constants.RegionSize), ((uint)regionY * (uint)Constants.RegionSize));
- ulong regionHandle = Util.RegionLocToHandle((uint)regionX, (uint)regionY);
- m_host.AddScriptLPS(1);
- UUID agentId = new UUID();
- if (UUID.TryParse(agent, out agentId))
- {
- ScenePresence presence = World.GetScenePresence(agentId);
- if (presence != null)
- {
- // For osTeleportAgent, agent must be over owners land to avoid abuse
- // For osTeleportOwner, this restriction isn't necessary
- // commented out because its redundant and uneeded please remove eventually.
- // if (relaxRestrictions ||
- // m_host.OwnerID
- // == World.LandChannel.GetLandObject(
- // presence.AbsolutePosition.X, presence.AbsolutePosition.Y).LandData.OwnerID)
- // {
- // We will launch the teleport on a new thread so that when the script threads are terminated
- // before teleport in ScriptInstance.GetXMLState(), we don't end up aborting the one doing the teleporting.
- Util.FireAndForget(
- o => World.RequestTeleportLocation(
- presence.ControllingClient, regionHandle,
- position, lookat, (uint)TPFlags.ViaLocation),
- null, "OSSL_Api.TeleportAgentByRegionName");
- ScriptSleep(5000);
- // }
- }
- }
- }
- public void osTeleportAgent(string agent, LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- osTeleportAgent(agent, World.RegionInfo.RegionName, position, lookat);
- }
- public void osTeleportOwner(string regionName, LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- // Threat level None because this is what can already be done with the World Map in the viewer
- CheckThreatLevel(ThreatLevel.None, "osTeleportOwner");
- TeleportAgent(m_host.OwnerID.ToString(), regionName, position, lookat, true);
- }
- public void osTeleportOwner(LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- osTeleportOwner(World.RegionInfo.RegionName, position, lookat);
- }
- public void osTeleportOwner(int regionX, int regionY, LSL_Types.Vector3 position, LSL_Types.Vector3 lookat)
- {
- CheckThreatLevel(ThreatLevel.None, "osTeleportOwner");
- TeleportAgent(m_host.OwnerID.ToString(), regionX, regionY, position, lookat, true);
- }
- ///<summary>
- /// Allows a script IN the target prim to force an avatar to sit on it using normal methods
- /// as if called by the client.
- /// Silent fail if agent (or target if overloaded) not found.
- /// Does work if passed key (or keys if overloaded).
- /// </summary>
- /// <param name="avatar"></param>
- public void osForceOtherSit(string avatar)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osForceOtherSit");
- m_host.AddScriptLPS(1);
- ForceSit(avatar, m_host.UUID);
- }
- /// <summary>
- /// Overload method of osForceOtherSit(string avatar) to allow a script NOT in the target prim to force
- /// an avatar to sit on the target prim using normal methods as if called by the client.
- /// </summary>
- /// <param name="avatar"></param>
- /// <param name="target"></param>
- public void osForceOtherSit(string avatar, string target)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osForceOtherSit");
- m_host.AddScriptLPS(1);
- UUID targetID = new UUID(target);
-
- ForceSit(avatar, targetID);
- }
- public void ForceSit(string avatar, UUID targetID)
- {
- UUID agentID;
- if (!UUID.TryParse(avatar, out agentID))
- return;
- ScenePresence presence = World.GetScenePresence(agentID);
- SceneObjectPart part = World.GetSceneObjectPart(targetID);
- if (presence != null &&
- part != null &&
- part.SitTargetAvatar == UUID.Zero)
- presence.HandleAgentRequestSit(presence.ControllingClient,
- agentID,
- targetID,
- part.SitTargetPosition);
- }
- // Functions that get information from the agent itself.
- //
- // osGetAgentIP - this is used to determine the IP address of
- //the client. This is needed to help configure other in world
- //resources based on the IP address of the clients connected.
- //I think High is a good risk level for this, as it is an
- //information leak.
- public string osGetAgentIP(string agent)
- {
- CheckThreatLevel(ThreatLevel.High, "osGetAgentIP");
- UUID avatarID = (UUID)agent;
- m_host.AddScriptLPS(1);
- if (World.Entities.ContainsKey((UUID)agent) && World.Entities[avatarID] is ScenePresence)
- {
- ScenePresence target = (ScenePresence)World.Entities[avatarID];
- return target.ControllingClient.RemoteEndPoint.Address.ToString();
- }
-
- // fall through case, just return nothing
- return "";
- }
- // Get a list of all the avatars/agents in the region
- public LSL_List osGetAgents()
- {
- // threat level is None as we could get this information with an
- // in-world script as well, just not as efficient
- CheckThreatLevel(ThreatLevel.None, "osGetAgents");
- m_host.AddScriptLPS(1);
- LSL_List result = new LSL_List();
- World.ForEachRootScenePresence(delegate(ScenePresence sp)
- {
- result.Add(new LSL_String(sp.Name));
- });
- return result;
- }
- // Adam's super super custom animation functions
- public void osAvatarPlayAnimation(string avatar, string animation)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osAvatarPlayAnimation");
- AvatarPlayAnimation(avatar, animation);
- }
- private void AvatarPlayAnimation(string avatar, string animation)
- {
- UUID avatarID = (UUID)avatar;
- m_host.AddScriptLPS(1);
- if (World.Entities.ContainsKey((UUID)avatar) && World.Entities[avatarID] is ScenePresence)
- {
- ScenePresence target = (ScenePresence)World.Entities[avatarID];
- if (target != null)
- {
- UUID animID=UUID.Zero;
- lock (m_host.TaskInventory)
- {
- foreach (KeyValuePair<UUID, TaskInventoryItem> inv in m_host.TaskInventory)
- {
- if (inv.Value.Name == animation)
- {
- if (inv.Value.Type == (int)AssetType.Animation)
- animID = inv.Value.AssetID;
- continue;
- }
- }
- }
- if (animID == UUID.Zero)
- target.Animator.AddAnimation(animation, m_host.UUID);
- else
- target.Animator.AddAnimation(animID, m_host.UUID);
- }
- }
- }
- public void osAvatarStopAnimation(string avatar, string animation)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osAvatarStopAnimation");
- AvatarStopAnimation(avatar, animation);
- }
- private void AvatarStopAnimation(string avatar, string animation)
- {
- UUID avatarID = (UUID)avatar;
- m_host.AddScriptLPS(1);
- // FIXME: What we really want to do here is factor out the similar code in llStopAnimation() to a common
- // method (though see that doesn't do the is animation check, which is probably a bug) and have both
- // these functions call that common code. However, this does mean navigating the brain-dead requirement
- // of calling InitLSL()
- if (World.Entities.ContainsKey(avatarID) && World.Entities[avatarID] is ScenePresence)
- {
- ScenePresence target = (ScenePresence)World.Entities[avatarID];
- if (target != null)
- {
- UUID animID;
- if (!UUID.TryParse(animation, out animID))
- {
- TaskInventoryItem item = m_host.Inventory.GetInventoryItem(animation);
- if (item != null && item.Type == (int)AssetType.Animation)
- animID = item.AssetID;
- else
- animID = UUID.Zero;
- }
-
- if (animID == UUID.Zero)
- target.Animator.RemoveAnimation(animation);
- else
- target.Animator.RemoveAnimation(animID, true);
- }
- }
- }
- //Texture draw functions
- public string osMovePen(string drawList, int x, int y)
- {
- CheckThreatLevel(ThreatLevel.None, "osMovePen");
- m_host.AddScriptLPS(1);
- drawList += "MoveTo " + x + "," + y + ";";
- return drawList;
- }
- public string osDrawLine(string drawList, int startX, int startY, int endX, int endY)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawLine");
- m_host.AddScriptLPS(1);
- drawList += "MoveTo "+ startX+","+ startY +"; LineTo "+endX +","+endY +"; ";
- return drawList;
- }
- public string osDrawLine(string drawList, int endX, int endY)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawLine");
- m_host.AddScriptLPS(1);
- drawList += "LineTo " + endX + "," + endY + "; ";
- return drawList;
- }
- public string osDrawText(string drawList, string text)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawText");
- m_host.AddScriptLPS(1);
- drawList += "Text " + text + "; ";
- return drawList;
- }
- public string osDrawEllipse(string drawList, int width, int height)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawEllipse");
- m_host.AddScriptLPS(1);
- drawList += "Ellipse " + width + "," + height + "; ";
- return drawList;
- }
- public string osDrawRectangle(string drawList, int width, int height)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawRectangle");
- m_host.AddScriptLPS(1);
- drawList += "Rectangle " + width + "," + height + "; ";
- return drawList;
- }
- public string osDrawFilledRectangle(string drawList, int width, int height)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawFilledRectangle");
- m_host.AddScriptLPS(1);
- drawList += "FillRectangle " + width + "," + height + "; ";
- return drawList;
- }
- public string osDrawFilledPolygon(string drawList, LSL_List x, LSL_List y)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawFilledPolygon");
- m_host.AddScriptLPS(1);
- if (x.Length != y.Length || x.Length < 3)
- {
- return "";
- }
- drawList += "FillPolygon " + x.GetLSLStringItem(0) + "," + y.GetLSLStringItem(0);
- for (int i = 1; i < x.Length; i++)
- {
- drawList += "," + x.GetLSLStringItem(i) + "," + y.GetLSLStringItem(i);
- }
- drawList += "; ";
- return drawList;
- }
- public string osDrawPolygon(string drawList, LSL_List x, LSL_List y)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawPolygon");
- m_host.AddScriptLPS(1);
- if (x.Length != y.Length || x.Length < 3)
- {
- return "";
- }
- drawList += "Polygon " + x.GetLSLStringItem(0) + "," + y.GetLSLStringItem(0);
- for (int i = 1; i < x.Length; i++)
- {
- drawList += "," + x.GetLSLStringItem(i) + "," + y.GetLSLStringItem(i);
- }
- drawList += "; ";
- return drawList;
- }
- public string osSetFontSize(string drawList, int fontSize)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetFontSize");
- m_host.AddScriptLPS(1);
- drawList += "FontSize "+ fontSize +"; ";
- return drawList;
- }
- public string osSetFontName(string drawList, string fontName)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetFontName");
- m_host.AddScriptLPS(1);
- drawList += "FontName "+ fontName +"; ";
- return drawList;
- }
- public string osSetPenSize(string drawList, int penSize)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetPenSize");
- m_host.AddScriptLPS(1);
- drawList += "PenSize " + penSize + "; ";
- return drawList;
- }
- public string osSetPenColor(string drawList, string color)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetPenColor");
-
- m_host.AddScriptLPS(1);
- drawList += "PenColor " + color + "; ";
- return drawList;
- }
- // Deprecated
- public string osSetPenColour(string drawList, string colour)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetPenColour");
- OSSLDeprecated("osSetPenColour", "osSetPenColor");
- m_host.AddScriptLPS(1);
- drawList += "PenColour " + colour + "; ";
- return drawList;
- }
- public string osSetPenCap(string drawList, string direction, string type)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetPenCap");
- m_host.AddScriptLPS(1);
- drawList += "PenCap " + direction + "," + type + "; ";
- return drawList;
- }
- public string osDrawImage(string drawList, int width, int height, string imageUrl)
- {
- CheckThreatLevel(ThreatLevel.None, "osDrawImage");
- m_host.AddScriptLPS(1);
- drawList +="Image " +width + "," + height+ ","+ imageUrl +"; " ;
- return drawList;
- }
- public LSL_Vector osGetDrawStringSize(string contentType, string text, string fontName, int fontSize)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osGetDrawStringSize");
- m_host.AddScriptLPS(1);
- LSL_Vector vec = new LSL_Vector(0,0,0);
- IDynamicTextureManager textureManager = World.RequestModuleInterface<IDynamicTextureManager>();
- if (textureManager != null)
- {
- double xSize, ySize;
- textureManager.GetDrawStringSize(contentType, text, fontName, fontSize,
- out xSize, out ySize);
- vec.x = xSize;
- vec.y = ySize;
- }
- return vec;
- }
- public void osSetStateEvents(int events)
- {
- // This function is a hack. There is no reason for it's existence
- // anymore, since state events now work properly.
- // It was probably added as a crutch or debugging aid, and
- // should be removed
- //
- CheckThreatLevel(ThreatLevel.High, "osSetStateEvents");
- m_host.AddScriptLPS(1);
- m_host.SetScriptEvents(m_item.ItemID, events);
- }
- public void osSetRegionWaterHeight(double height)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetRegionWaterHeight");
- m_host.AddScriptLPS(1);
- World.EventManager.TriggerRequestChangeWaterHeight((float)height);
- }
- /// <summary>
- /// Changes the Region Sun Settings, then Triggers a Sun Update
- /// </summary>
- /// <param name="useEstateSun">True to use Estate Sun instead of Region Sun</param>
- /// <param name="sunFixed">True to keep the sun stationary</param>
- /// <param name="sunHour">The "Sun Hour" that is desired, 0...24, with 0 just after SunRise</param>
- public void osSetRegionSunSettings(bool useEstateSun, bool sunFixed, double sunHour)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetRegionSunSettings");
- m_host.AddScriptLPS(1);
- while (sunHour > 24.0)
- sunHour -= 24.0;
- while (sunHour < 0)
- sunHour += 24.0;
- World.RegionInfo.RegionSettings.UseEstateSun = useEstateSun;
- World.RegionInfo.RegionSettings.SunPosition = sunHour + 6; // LL Region Sun Hour is 6 to 30
- World.RegionInfo.RegionSettings.FixedSun = sunFixed;
- World.RegionInfo.RegionSettings.Save();
- World.EventManager.TriggerEstateToolsSunUpdate(World.RegionInfo.RegionHandle);
- }
- /// <summary>
- /// Changes the Estate Sun Settings, then Triggers a Sun Update
- /// </summary>
- /// <param name="sunFixed">True to keep the sun stationary, false to use global time</param>
- /// <param name="sunHour">The "Sun Hour" that is desired, 0...24, with 0 just after SunRise</param>
- public void osSetEstateSunSettings(bool sunFixed, double sunHour)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetEstateSunSettings");
- m_host.AddScriptLPS(1);
- while (sunHour > 24.0)
- sunHour -= 24.0;
- while (sunHour < 0)
- sunHour += 24.0;
- World.RegionInfo.EstateSettings.UseGlobalTime = !sunFixed;
- World.RegionInfo.EstateSettings.SunPosition = sunHour;
- World.RegionInfo.EstateSettings.FixedSun = sunFixed;
- World.EstateDataService.StoreEstateSettings(World.RegionInfo.EstateSettings);
- World.EventManager.TriggerEstateToolsSunUpdate(World.RegionInfo.RegionHandle);
- }
- /// <summary>
- /// Return the current Sun Hour 0...24, with 0 being roughly sun-rise
- /// </summary>
- /// <returns></returns>
- public double osGetCurrentSunHour()
- {
- CheckThreatLevel(ThreatLevel.None, "osGetCurrentSunHour");
- m_host.AddScriptLPS(1);
- // Must adjust for the fact that Region Sun Settings are still LL offset
- double sunHour = World.RegionInfo.RegionSettings.SunPosition - 6;
- // See if the sun module has registered itself, if so it's authoritative
- ISunModule module = World.RequestModuleInterface<ISunModule>();
- if (module != null)
- {
- sunHour = module.GetCurrentSunHour();
- }
- return sunHour;
- }
- public double osSunGetParam(string param)
- {
- CheckThreatLevel(ThreatLevel.None, "osSunGetParam");
- OSSLDeprecated("osSunGetParam", "osGetSunParam");
- return GetSunParam(param);
- }
- public double osGetSunParam(string param)
- {
- CheckThreatLevel(ThreatLevel.None, "osGetSunParam");
- return GetSunParam(param);
- }
- private double GetSunParam(string param)
- {
- m_host.AddScriptLPS(1);
- double value = 0.0;
- ISunModule module = World.RequestModuleInterface<ISunModule>();
- if (module != null)
- {
- value = module.GetSunParameter(param);
- }
- return value;
- }
- public void osSunSetParam(string param, double value)
- {
- CheckThreatLevel(ThreatLevel.None, "osSunSetParam");
- OSSLDeprecated("osSunSetParam", "osSetSunParam");
- SetSunParam(param, value);
- }
- public void osSetSunParam(string param, double value)
- {
- CheckThreatLevel(ThreatLevel.None, "osSetSunParam");
- SetSunParam(param, value);
- }
- private void SetSunParam(string param, double value)
- {
- m_host.AddScriptLPS(1);
- ISunModule module = World.RequestModuleInterface<ISunModule>();
- if (module != null)
- {
- module.SetSunParameter(param, value);
- }
- }
- public string osWindActiveModelPluginName()
- {
- CheckThreatLevel(ThreatLevel.None, "osWindActiveModelPluginName");
- m_host.AddScriptLPS(1);
- IWindModule module = World.RequestModuleInterface<IWindModule>();
- if (module != null)
- {
- return module.WindActiveModelPluginName;
- }
- return String.Empty;
- }
- public void osSetWindParam(string plugin, string param, LSL_Float value)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetWindParam");
- m_host.AddScriptLPS(1);
- IWindModule module = World.RequestModuleInterface<IWindModule>();
- if (module != null)
- {
- try
- {
- module.WindParamSet(plugin, param, (float)value);
- }
- catch (Exception) { }
- }
- }
- public LSL_Float osGetWindParam(string plugin, string param)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osGetWindParam");
- m_host.AddScriptLPS(1);
- IWindModule module = World.RequestModuleInterface<IWindModule>();
- if (module != null)
- {
- return module.WindParamGet(plugin, param);
- }
- return 0.0f;
- }
- // Routines for creating and managing parcels programmatically
- public void osParcelJoin(LSL_Vector pos1, LSL_Vector pos2)
- {
- CheckThreatLevel(ThreatLevel.High, "osParcelJoin");
- m_host.AddScriptLPS(1);
- int startx = (int)(pos1.x < pos2.x ? pos1.x : pos2.x);
- int starty = (int)(pos1.y < pos2.y ? pos1.y : pos2.y);
- int endx = (int)(pos1.x > pos2.x ? pos1.x : pos2.x);
- int endy = (int)(pos1.y > pos2.y ? pos1.y : pos2.y);
- World.LandChannel.Join(startx,starty,endx,endy,m_host.OwnerID);
- }
- public void osParcelSubdivide(LSL_Vector pos1, LSL_Vector pos2)
- {
- CheckThreatLevel(ThreatLevel.High, "osParcelSubdivide");
- m_host.AddScriptLPS(1);
- int startx = (int)(pos1.x < pos2.x ? pos1.x : pos2.x);
- int starty = (int)(pos1.y < pos2.y ? pos1.y : pos2.y);
- int endx = (int)(pos1.x > pos2.x ? pos1.x : pos2.x);
- int endy = (int)(pos1.y > pos2.y ? pos1.y : pos2.y);
- World.LandChannel.Subdivide(startx,starty,endx,endy,m_host.OwnerID);
- }
- public void osParcelSetDetails(LSL_Vector pos, LSL_List rules)
- {
- const string functionName = "osParcelSetDetails";
- CheckThreatLevel(ThreatLevel.High, functionName);
- OSSLDeprecated(functionName, "osSetParcelDetails");
- SetParcelDetails(pos, rules, functionName);
- }
- public void osSetParcelDetails(LSL_Vector pos, LSL_List rules)
- {
- const string functionName = "osSetParcelDetails";
- CheckThreatLevel(ThreatLevel.High, functionName);
- SetParcelDetails(pos, rules, functionName);
- }
- private void SetParcelDetails(LSL_Vector pos, LSL_List rules, string functionName)
- {
- m_host.AddScriptLPS(1);
- // Get a reference to the land data and make sure the owner of the script
- // can modify it
- ILandObject startLandObject = World.LandChannel.GetLandObject((int)pos.x, (int)pos.y);
- if (startLandObject == null)
- {
- OSSLShoutError("There is no land at that location");
- return;
- }
- if (!World.Permissions.CanEditParcelProperties(m_host.OwnerID, startLandObject, GroupPowers.LandOptions))
- {
- OSSLShoutError("You do not have permission to modify the parcel");
- return;
- }
- // Create a new land data object we can modify
- LandData newLand = startLandObject.LandData.Copy();
- UUID uuid;
- // Process the rules, not sure what the impact would be of changing owner or group
- for (int idx = 0; idx < rules.Length;)
- {
- int code = rules.GetLSLIntegerItem(idx++);
- string arg = rules.GetLSLStringItem(idx++);
- switch (code)
- {
- case ScriptBaseClass.PARCEL_DETAILS_NAME:
- newLand.Name = arg;
- break;
- case ScriptBaseClass.PARCEL_DETAILS_DESC:
- newLand.Description = arg;
- break;
- case ScriptBaseClass.PARCEL_DETAILS_OWNER:
- CheckThreatLevel(ThreatLevel.VeryHigh, functionName);
- if (UUID.TryParse(arg, out uuid))
- newLand.OwnerID = uuid;
- break;
- case ScriptBaseClass.PARCEL_DETAILS_GROUP:
- CheckThreatLevel(ThreatLevel.VeryHigh, functionName);
- if (UUID.TryParse(arg, out uuid))
- newLand.GroupID = uuid;
- break;
- case ScriptBaseClass.PARCEL_DETAILS_CLAIMDATE:
- CheckThreatLevel(ThreatLevel.VeryHigh, functionName);
- newLand.ClaimDate = Convert.ToInt32(arg);
- if (newLand.ClaimDate == 0)
- newLand.ClaimDate = Util.UnixTimeSinceEpoch();
- break;
- }
- }
- World.LandChannel.UpdateLandObject(newLand.LocalID,newLand);
- }
- public double osList2Double(LSL_Types.list src, int index)
- {
- // There is really no double type in OSSL. C# and other
- // have one, but the current implementation of LSL_Types.list
- // is not allowed to contain any.
- // This really should be removed.
- //
- CheckThreatLevel(ThreatLevel.None, "osList2Double");
- m_host.AddScriptLPS(1);
- if (index < 0)
- {
- index = src.Length + index;
- }
- if (index >= src.Length)
- {
- return 0.0;
- }
- return Convert.ToDouble(src.Data[index]);
- }
- public void osSetParcelMediaURL(string url)
- {
- // What actually is the difference to the LL function?
- //
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetParcelMediaURL");
- m_host.AddScriptLPS(1);
- ILandObject land = World.LandChannel.GetLandObject(m_host.AbsolutePosition);
- if (land.LandData.OwnerID != m_host.OwnerID)
- return;
- land.SetMediaUrl(url);
- }
- public void osSetParcelSIPAddress(string SIPAddress)
- {
- // What actually is the difference to the LL function?
- //
- CheckThreatLevel(ThreatLevel.VeryLow, "osSetParcelSIPAddress");
- m_host.AddScriptLPS(1);
- ILandObject land = World.LandChannel.GetLandObject(m_host.AbsolutePosition);
- if (land.LandData.OwnerID != m_host.OwnerID)
- {
- OSSLError("osSetParcelSIPAddress: Sorry, you need to own the land to use this function");
- return;
- }
- // get the voice module
- IVoiceModule voiceModule = World.RequestModuleInterface<IVoiceModule>();
- if (voiceModule != null)
- voiceModule.setLandSIPAddress(SIPAddress,land.LandData.GlobalID);
- else
- OSSLError("osSetParcelSIPAddress: No voice module enabled for this land");
- }
- public string osGetScriptEngineName()
- {
- // This gets a "high" because knowing the engine may be used
- // to exploit engine-specific bugs or induce usage patterns
- // that trigger engine-specific failures.
- // Besides, public grid users aren't supposed to know.
- //
- CheckThreatLevel(ThreatLevel.High, "osGetScriptEngineName");
- m_host.AddScriptLPS(1);
- int scriptEngineNameIndex = 0;
- if (!String.IsNullOrEmpty(m_ScriptEngine.ScriptEngineName))
- {
- // parse off the "ScriptEngine."
- scriptEngineNameIndex = m_ScriptEngine.ScriptEngineName.IndexOf(".", scriptEngineNameIndex);
- scriptEngineNameIndex++; // get past delimiter
- int scriptEngineNameLength = m_ScriptEngine.ScriptEngineName.Length - scriptEngineNameIndex;
- // create char array then a string that is only the script engine name
- Char[] scriptEngineNameCharArray = m_ScriptEngine.ScriptEngineName.ToCharArray(scriptEngineNameIndex, scriptEngineNameLength);
- String scriptEngineName = new String(scriptEngineNameCharArray);
- return scriptEngineName;
- }
- else
- {
- return String.Empty;
- }
- }
- public LSL_Integer osCheckODE()
- {
- m_host.AddScriptLPS(1);
- LSL_Integer ret = 0; // false
- if (m_ScriptEngine.World.PhysicsScene != null)
- {
- string physEngine = m_ScriptEngine.World.PhysicsScene.EngineType;
- if (physEngine == "OpenDynamicsEngine")
- {
- ret = 1; // true
- }
- }
- return ret;
- }
- public string osGetPhysicsEngineType()
- {
- // High because it can be used to target attacks to known weaknesses
- // This would allow a new class of griefer scripts that don't even
- // require their user to know what they are doing (see script
- // kiddie)
- // Because it would be nice if scripts didn't blow up if the information
- // about the physics engine, this function returns an empty string if
- // the user does not have permission to see it. This as opposed to
- // throwing an exception.
- m_host.AddScriptLPS(1);
- string ret = String.Empty;
- if (String.IsNullOrEmpty(CheckThreatLevelTest(ThreatLevel.High, "osGetPhysicsEngineType")))
- {
- if (m_ScriptEngine.World.PhysicsScene != null)
- {
- ret = m_ScriptEngine.World.PhysicsScene.EngineType;
- // An old physics engine might have an uninitialized engine type
- if (ret == null)
- ret = "unknown";
- }
- }
- return ret;
- }
- public string osGetSimulatorVersion()
- {
- // High because it can be used to target attacks to known weaknesses
- // This would allow a new class of griefer scripts that don't even
- // require their user to know what they are doing (see script
- // kiddie)
- //
- CheckThreatLevel(ThreatLevel.High,"osGetSimulatorVersion");
- m_host.AddScriptLPS(1);
- return m_ScriptEngine.World.GetSimulatorVersion();
- }
- private Hashtable osdToHashtable(OSDMap map)
- {
- Hashtable result = new Hashtable();
- foreach (KeyValuePair<string, OSD> item in map) {
- result.Add(item.Key, osdToObject(item.Value));
- }
- return result;
- }
-
- private ArrayList osdToArray(OSDArray list)
- {
- ArrayList result = new ArrayList();
- foreach ( OSD item in list ) {
- result.Add(osdToObject(item));
- }
- return result;
- }
- private Object osdToObject(OSD decoded)
- {
- if ( decoded is OSDString ) {
- return (string) decoded.AsString();
- } else if ( decoded is OSDInteger ) {
- return (int) decoded.AsInteger();
- } else if ( decoded is OSDReal ) {
- return (float) decoded.AsReal();
- } else if ( decoded is OSDBoolean ) {
- return (bool) decoded.AsBoolean();
- } else if ( decoded is OSDMap ) {
- return osdToHashtable((OSDMap) decoded);
- } else if ( decoded is OSDArray ) {
- return osdToArray((OSDArray) decoded);
- } else {
- return null;
- }
- }
- public Object osParseJSONNew(string JSON)
- {
- CheckThreatLevel(ThreatLevel.None, "osParseJSONNew");
- m_host.AddScriptLPS(1);
- try
- {
- OSD decoded = OSDParser.DeserializeJson(JSON);
- return osdToObject(decoded);
- }
- catch(Exception e)
- {
- OSSLError("osParseJSONNew: Problems decoding JSON string " + JSON + " : " + e.Message) ;
- return null;
- }
- }
- public Hashtable osParseJSON(string JSON)
- {
- CheckThreatLevel(ThreatLevel.None, "osParseJSON");
- m_host.AddScriptLPS(1);
- Object decoded = osParseJSONNew(JSON);
-
- if ( decoded is Hashtable ) {
- return (Hashtable) decoded;
- } else if ( decoded is ArrayList ) {
- ArrayList decoded_list = (ArrayList) decoded;
- Hashtable fakearray = new Hashtable();
- int i = 0;
- for ( i = 0; i < decoded_list.Count ; i++ ) {
- fakearray.Add(i, decoded_list[i]);
- }
- return fakearray;
- } else {
- OSSLError("osParseJSON: unable to parse JSON string " + JSON);
- return null;
- }
- }
- /// <summary>
- /// Send a message to to object identified by the given UUID
- /// </summary>
- /// <remarks>
- /// A script in the object must implement the dataserver function
- /// the dataserver function is passed the ID of the calling function and a string message
- /// </remarks>
- /// <param name="objectUUID"></param>
- /// <param name="message"></param>
- public void osMessageObject(LSL_Key objectUUID, string message)
- {
- CheckThreatLevel(ThreatLevel.Low, "osMessageObject");
- m_host.AddScriptLPS(1);
- UUID objUUID;
- if (!UUID.TryParse(objectUUID, out objUUID)) // prior to patching, a thrown exception regarding invalid GUID format would be shouted instead.
- {
- OSSLShoutError("osMessageObject() cannot send messages to objects with invalid UUIDs");
- return;
- }
- MessageObject(objUUID, message);
- }
- private void MessageObject(UUID objUUID, string message)
- {
- object[] resobj = new object[] { new LSL_Types.LSLString(m_host.UUID.ToString()), new LSL_Types.LSLString(message) };
- SceneObjectPart sceneOP = World.GetSceneObjectPart(objUUID);
- if (sceneOP == null) // prior to patching, PostObjectEvent() would cause a throw exception to be shouted instead.
- {
- OSSLShoutError("osMessageObject() cannot send message to " + objUUID.ToString() + ", object was not found in scene.");
- return;
- }
- m_ScriptEngine.PostObjectEvent(
- sceneOP.LocalId, new EventParams(
- "dataserver", resobj, new DetectParams[0]));
- }
- /// <summary>
- /// Write a notecard directly to the prim's inventory.
- /// </summary>
- /// <remarks>
- /// This needs ThreatLevel high. It is an excellent griefer tool,
- /// In a loop, it can cause asset bloat and DOS levels of asset
- /// writes.
- /// </remarks>
- /// <param name="notecardName">The name of the notecard to write.</param>
- /// <param name="contents">The contents of the notecard.</param>
- public void osMakeNotecard(string notecardName, LSL_Types.list contents)
- {
- CheckThreatLevel(ThreatLevel.High, "osMakeNotecard");
- m_host.AddScriptLPS(1);
- StringBuilder notecardData = new StringBuilder();
- for (int i = 0; i < contents.Length; i++)
- notecardData.Append((string)(contents.GetLSLStringItem(i) + "\n"));
- SaveNotecard(notecardName, "Script generated notecard", notecardData.ToString(), false);
- }
- /// <summary>
- /// Save a notecard to prim inventory.
- /// </summary>
- /// <param name="name"></param>
- /// <param name="description">Description of notecard</param>
- /// <param name="notecardData"></param>
- /// <param name="forceSameName">
- /// If true, then if an item exists with the same name, it is replaced.
- /// If false, then a new item is created witha slightly different name (e.g. name 1)
- /// </param>
- /// <returns>Prim inventory item created.</returns>
- protected TaskInventoryItem SaveNotecard(string name, string description, string data, bool forceSameName)
- {
- // Create new asset
- AssetBase asset = new AssetBase(UUID.Random(), name, (sbyte)AssetType.Notecard, m_host.OwnerID.ToString());
- asset.Description = description;
- byte[] a;
- byte[] b;
- byte[] c;
- b = Util.UTF8.GetBytes(data);
- a = Util.UTF8.GetBytes(
- "Linden text version 2\n{\nLLEmbeddedItems version 1\n{\ncount 0\n}\nText length " + b.Length.ToString() + "\n");
- c = Util.UTF8.GetBytes("}");
- byte[] d = new byte[a.Length + b.Length + c.Length];
- Buffer.BlockCopy(a, 0, d, 0, a.Length);
- Buffer.BlockCopy(b, 0, d, a.Length, b.Length);
- Buffer.BlockCopy(c, 0, d, a.Length + b.Length, c.Length);
- asset.Data = d;
- World.AssetService.Store(asset);
- // Create Task Entry
- TaskInventoryItem taskItem = new TaskInventoryItem();
- taskItem.ResetIDs(m_host.UUID);
- taskItem.ParentID = m_host.UUID;
- taskItem.CreationDate = (uint)Util.UnixTimeSinceEpoch();
- taskItem.Name = asset.Name;
- taskItem.Description = asset.Description;
- taskItem.Type = (int)AssetType.Notecard;
- taskItem.InvType = (int)InventoryType.Notecard;
- taskItem.OwnerID = m_host.OwnerID;
- taskItem.CreatorID = m_host.OwnerID;
- taskItem.BasePermissions = (uint)PermissionMask.All | (uint)PermissionMask.Export;
- taskItem.CurrentPermissions = (uint)PermissionMask.All | (uint)PermissionMask.Export;
- taskItem.EveryonePermissions = 0;
- taskItem.NextPermissions = (uint)PermissionMask.All;
- taskItem.GroupID = m_host.GroupID;
- taskItem.GroupPermissions = 0;
- taskItem.Flags = 0;
- taskItem.PermsGranter = UUID.Zero;
- taskItem.PermsMask = 0;
- taskItem.AssetID = asset.FullID;
- if (forceSameName)
- m_host.Inventory.AddInventoryItemExclusive(taskItem, false);
- else
- m_host.Inventory.AddInventoryItem(taskItem, false);
- return taskItem;
- }
- /// <summary>
- /// Load the notecard data found at the given prim inventory item name or asset uuid.
- /// </summary>
- /// <param name="notecardNameOrUuid"></param>
- /// <returns>The text loaded. Null if no notecard was found.</returns>
- protected string LoadNotecard(string notecardNameOrUuid)
- {
- UUID assetID = CacheNotecard(notecardNameOrUuid);
- if (assetID != UUID.Zero)
- {
- StringBuilder notecardData = new StringBuilder();
-
- for (int count = 0; count < NotecardCache.GetLines(assetID); count++)
- {
- string line = NotecardCache.GetLine(assetID, count) + "\n";
-
- // m_log.DebugFormat("[OSSL]: From notecard {0} loading line {1}", notecardNameOrUuid, line);
-
- notecardData.Append(line);
- }
-
- return notecardData.ToString();
- }
- return null;
- }
- /// <summary>
- /// Cache a notecard's contents.
- /// </summary>
- /// <param name="notecardNameOrUuid"></param>
- /// <returns>
- /// The asset id of the notecard, which is used for retrieving the cached data.
- /// UUID.Zero if no asset could be found.
- /// </returns>
- protected UUID CacheNotecard(string notecardNameOrUuid)
- {
- UUID assetID = UUID.Zero;
- if (!UUID.TryParse(notecardNameOrUuid, out assetID))
- {
- foreach (TaskInventoryItem item in m_host.TaskInventory.Values)
- {
- if (item.Type == 7 && item.Name == notecardNameOrUuid)
- {
- assetID = item.AssetID;
- }
- }
- }
- if (assetID == UUID.Zero)
- return UUID.Zero;
- if (!NotecardCache.IsCached(assetID))
- {
- AssetBase a = World.AssetService.Get(assetID.ToString());
- if (a == null)
- return UUID.Zero;
- NotecardCache.Cache(assetID, a.Data);
- };
- return assetID;
- }
- /// <summary>
- /// Directly get an entire notecard at once.
- /// </summary>
- /// <remarks>
- /// Instead of using the LSL Dataserver event to pull notecard data
- /// this will simply read the entire notecard and return its data as a string.
- ///
- /// Warning - due to the synchronous method this function uses to fetch assets, its use
- /// may be dangerous and unreliable while running in grid mode.
- /// </remarks>
- /// <param name="name">Name of the notecard or its asset id</param>
- /// <param name="line">The line number to read. The first line is line 0</param>
- /// <returns>Notecard line</returns>
- public string osGetNotecardLine(string name, int line)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osGetNotecardLine");
- m_host.AddScriptLPS(1);
- UUID assetID = CacheNotecard(name);
- if (assetID == UUID.Zero)
- {
- OSSLShoutError("Notecard '" + name + "' could not be found.");
- return "ERROR!";
- }
- return NotecardCache.GetLine(assetID, line);
- }
- /// <summary>
- /// Get an entire notecard at once.
- /// </summary>
- /// <remarks>
- /// Instead of using the LSL Dataserver event to pull notecard data line by line,
- /// this will simply read the entire notecard and return its data as a string.
- ///
- /// Warning - due to the synchronous method this function uses to fetch assets, its use
- /// may be dangerous and unreliable while running in grid mode.
- /// </remarks>
- /// <param name="name">Name of the notecard or its asset id</param>
- /// <returns>Notecard text</returns>
- public string osGetNotecard(string name)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osGetNotecard");
- m_host.AddScriptLPS(1);
- string text = LoadNotecard(name);
- if (text == null)
- {
- OSSLShoutError("Notecard '" + name + "' could not be found.");
- return "ERROR!";
- }
- else
- {
- return text;
- }
- }
- /// <summary>
- /// Get the number of lines in the given notecard.
- /// </summary>
- /// <remarks>
- /// Instead of using the LSL Dataserver event to pull notecard data,
- /// this will simply read the number of note card lines and return this data as an integer.
- ///
- /// Warning - due to the synchronous method this function uses to fetch assets, its use
- /// may be dangerous and unreliable while running in grid mode.
- /// </remarks>
- /// <param name="name">Name of the notecard or its asset id</param>
- /// <returns></returns>
- public int osGetNumberOfNotecardLines(string name)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osGetNumberOfNotecardLines");
- m_host.AddScriptLPS(1);
- UUID assetID = CacheNotecard(name);
- if (assetID == UUID.Zero)
- {
- OSSLShoutError("Notecard '" + name + "' could not be found.");
- return -1;
- }
- return NotecardCache.GetLines(assetID);
- }
- public string osAvatarName2Key(string firstname, string lastname)
- {
- CheckThreatLevel(ThreatLevel.Low, "osAvatarName2Key");
- m_host.AddScriptLPS(1);
- IUserManagement userManager = World.RequestModuleInterface<IUserManagement>();
- if (userManager == null)
- {
- OSSLShoutError("osAvatarName2Key: UserManagement module not available");
- return string.Empty;
- }
- // Check if the user is already cached
- UUID userID = userManager.GetUserIdByName(firstname, lastname);
- if (userID != UUID.Zero)
- return userID.ToString();
- // Query for the user
- String realFirstName; String realLastName; String serverURI;
- if (Util.ParseForeignAvatarName(firstname, lastname, out realFirstName, out realLastName, out serverURI))
- {
- try
- {
- UserAgentServiceConnector userConnection = new UserAgentServiceConnector(serverURI, true);
- if (userConnection != null)
- {
- userID = userConnection.GetUUID(realFirstName, realLastName);
- if (userID != UUID.Zero)
- {
- userManager.AddUser(userID, realFirstName, realLastName, serverURI);
- return userID.ToString();
- }
- }
- }
- catch (Exception /*e*/)
- {
- // m_log.Warn("[osAvatarName2Key] UserAgentServiceConnector - Unable to connect to destination grid ", e);
- }
- }
- else
- {
- UserAccount account = World.UserAccountService.GetUserAccount(World.RegionInfo.ScopeID, firstname, lastname);
- if (account != null)
- return account.PrincipalID.ToString();
- }
- return UUID.Zero.ToString();
- }
- public string osKey2Name(string id)
- {
- CheckThreatLevel(ThreatLevel.Low, "osKey2Name");
- m_host.AddScriptLPS(1);
- UUID key = new UUID();
- if (UUID.TryParse(id, out key))
- {
- UserAccount account = World.UserAccountService.GetUserAccount(World.RegionInfo.ScopeID, key);
- if (account != null)
- return account.Name;
- if (m_ScriptEngine.World.GridUserService != null)
- {
- GridUserInfo uInfo = m_ScriptEngine.World.GridUserService.GetGridUserInfo(key.ToString());
- if (uInfo != null)
- {
- UUID userUUID; String gridURL; String firstName; String lastName; String tmp;
- if (Util.ParseUniversalUserIdentifier(uInfo.UserID, out userUUID, out gridURL, out firstName, out lastName, out tmp))
- {
- string grid = new Uri(gridURL).Authority;
- return firstName + "." + lastName + " @" + grid;
- }
- }
- }
- }
-
- return "";
- }
- private enum InfoType
- {
- Nick,
- Name,
- Login,
- Home,
- Custom
- };
- private string GridUserInfo(InfoType type)
- {
- return GridUserInfo(type, "");
- }
- private string GridUserInfo(InfoType type, string key)
- {
- string retval = String.Empty;
- IConfigSource config = m_ScriptEngine.ConfigSource;
- string url = null;
- IConfig gridInfoConfig = config.Configs["GridInfo"];
- if (gridInfoConfig != null)
- url = gridInfoConfig.GetString("GridInfoURI", String.Empty);
- if (String.IsNullOrEmpty(url))
- return "Configuration Error!";
- string verb ="/json_grid_info";
- OSDMap json = new OSDMap();
- OSDMap info = WebUtil.GetFromService(String.Format("{0}{1}",url,verb), 3000);
- if (info["Success"] != true)
- return "Get GridInfo Failed!";
- json = (OSDMap)OSDParser.DeserializeJson(info["_RawResult"].AsString());
- switch (type)
- {
- case InfoType.Nick:
- retval = json["gridnick"];
- break;
- case InfoType.Name:
- retval = json["gridname"];
- break;
- case InfoType.Login:
- retval = json["login"];
- break;
- case InfoType.Home:
- retval = json["home"];
- break;
- case InfoType.Custom:
- retval = json[key];
- break;
- default:
- retval = "error";
- break;
- }
- return retval;
- }
- /// <summary>
- /// Get the nickname of this grid, as set in the [GridInfo] config section.
- /// </summary>
- /// <remarks>
- /// Threat level is Moderate because intentional abuse, for instance
- /// scripts that are written to be malicious only on one grid,
- /// for instance in a HG scenario, are a distinct possibility.
- /// </remarks>
- /// <returns></returns>
- public string osGetGridNick()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridNick");
- m_host.AddScriptLPS(1);
- string nick = String.Empty;
- IConfigSource config = m_ScriptEngine.ConfigSource;
- if (config.Configs[GridInfoServiceConfigSectionName] != null)
- nick = config.Configs[GridInfoServiceConfigSectionName].GetString("gridnick", nick);
- if (String.IsNullOrEmpty(nick))
- nick = GridUserInfo(InfoType.Nick);
- return nick;
- }
- public string osGetGridName()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridName");
- m_host.AddScriptLPS(1);
- string name = String.Empty;
- IConfigSource config = m_ScriptEngine.ConfigSource;
- if (config.Configs[GridInfoServiceConfigSectionName] != null)
- name = config.Configs[GridInfoServiceConfigSectionName].GetString("gridname", name);
- if (String.IsNullOrEmpty(name))
- name = GridUserInfo(InfoType.Name);
- return name;
- }
- public string osGetGridLoginURI()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridLoginURI");
- m_host.AddScriptLPS(1);
- string loginURI = String.Empty;
- IConfigSource config = m_ScriptEngine.ConfigSource;
- if (config.Configs[GridInfoServiceConfigSectionName] != null)
- loginURI = config.Configs[GridInfoServiceConfigSectionName].GetString("login", loginURI);
- if (String.IsNullOrEmpty(loginURI))
- loginURI = GridUserInfo(InfoType.Login);
- return loginURI;
- }
- public string osGetGridHomeURI()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridHomeURI");
- m_host.AddScriptLPS(1);
- IConfigSource config = m_ScriptEngine.ConfigSource;
- string HomeURI = Util.GetConfigVarFromSections<string>(config, "HomeURI",
- new string[] { "Startup", "Hypergrid" }, String.Empty);
- if (!string.IsNullOrEmpty(HomeURI))
- return HomeURI;
- // Legacy. Remove soon!
- if (config.Configs["LoginService"] != null)
- HomeURI = config.Configs["LoginService"].GetString("SRV_HomeURI", HomeURI);
- if (String.IsNullOrEmpty(HomeURI))
- HomeURI = GridUserInfo(InfoType.Home);
- return HomeURI;
- }
- public string osGetGridGatekeeperURI()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridGatekeeperURI");
- m_host.AddScriptLPS(1);
- IConfigSource config = m_ScriptEngine.ConfigSource;
- string gatekeeperURI = Util.GetConfigVarFromSections<string>(config, "GatekeeperURI",
- new string[] { "Startup", "Hypergrid" }, String.Empty);
- if (!string.IsNullOrEmpty(gatekeeperURI))
- return gatekeeperURI;
- // Legacy. Remove soon!
- if (config.Configs["GridService"] != null)
- gatekeeperURI = config.Configs["GridService"].GetString("Gatekeeper", gatekeeperURI);
- return gatekeeperURI;
- }
- public string osGetGridCustom(string key)
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetGridCustom");
- m_host.AddScriptLPS(1);
- string retval = String.Empty;
- IConfigSource config = m_ScriptEngine.ConfigSource;
- if (config.Configs[GridInfoServiceConfigSectionName] != null)
- retval = config.Configs[GridInfoServiceConfigSectionName].GetString(key, retval);
- if (String.IsNullOrEmpty(retval))
- retval = GridUserInfo(InfoType.Custom, key);
- return retval;
- }
- public string osGetAvatarHomeURI(string uuid)
- {
- CheckThreatLevel(ThreatLevel.Low, "osGetAvatarHomeURI");
- m_host.AddScriptLPS(1);
- IUserManagement userManager = m_ScriptEngine.World.RequestModuleInterface<IUserManagement>();
- string returnValue = "";
- if (userManager != null)
- {
- returnValue = userManager.GetUserServerURL(new UUID(uuid), "HomeURI");
- }
- if (returnValue == "")
- {
- IConfigSource config = m_ScriptEngine.ConfigSource;
- returnValue = Util.GetConfigVarFromSections<string>(config, "HomeURI",
- new string[] { "Startup", "Hypergrid" }, String.Empty);
- if (!string.IsNullOrEmpty(returnValue))
- return returnValue;
- // Legacy. Remove soon!
- if (config.Configs["LoginService"] != null)
- returnValue = config.Configs["LoginService"].GetString("SRV_HomeURI", returnValue);
- if (String.IsNullOrEmpty(returnValue))
- returnValue = GridUserInfo(InfoType.Home);
- }
- return returnValue;
- }
- public LSL_String osFormatString(string str, LSL_List strings)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osFormatString");
- m_host.AddScriptLPS(1);
- return String.Format(str, strings.Data);
- }
- public LSL_List osMatchString(string src, string pattern, int start)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osMatchString");
- m_host.AddScriptLPS(1);
- LSL_List result = new LSL_List();
- // Normalize indices (if negative).
- // After normlaization they may still be
- // negative, but that is now relative to
- // the start, rather than the end, of the
- // sequence.
- if (start < 0)
- {
- start = src.Length + start;
- }
- if (start < 0 || start >= src.Length)
- {
- return result; // empty list
- }
- // Find matches beginning at start position
- Regex matcher = new Regex(pattern);
- Match match = matcher.Match(src, start);
- while (match.Success)
- {
- foreach (System.Text.RegularExpressions.Group g in match.Groups)
- {
- if (g.Success)
- {
- result.Add(new LSL_String(g.Value));
- result.Add(new LSL_Integer(g.Index));
- }
- }
- match = match.NextMatch();
- }
- return result;
- }
- public LSL_String osReplaceString(string src, string pattern, string replace, int count, int start)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osReplaceString");
- m_host.AddScriptLPS(1);
- // Normalize indices (if negative).
- // After normlaization they may still be
- // negative, but that is now relative to
- // the start, rather than the end, of the
- // sequence.
- if (start < 0)
- {
- start = src.Length + start;
- }
- if (start < 0 || start >= src.Length)
- {
- return src;
- }
- // Find matches beginning at start position
- Regex matcher = new Regex(pattern);
- return matcher.Replace(src,replace,count,start);
- }
- public string osLoadedCreationDate()
- {
- CheckThreatLevel(ThreatLevel.Low, "osLoadedCreationDate");
- m_host.AddScriptLPS(1);
- return World.RegionInfo.RegionSettings.LoadedCreationDate;
- }
- public string osLoadedCreationTime()
- {
- CheckThreatLevel(ThreatLevel.Low, "osLoadedCreationTime");
- m_host.AddScriptLPS(1);
- return World.RegionInfo.RegionSettings.LoadedCreationTime;
- }
- public string osLoadedCreationID()
- {
- CheckThreatLevel(ThreatLevel.Low, "osLoadedCreationID");
- m_host.AddScriptLPS(1);
- return World.RegionInfo.RegionSettings.LoadedCreationID;
- }
- /// <summary>
- /// Get the primitive parameters of a linked prim.
- /// </summary>
- /// <remarks>
- /// Threat level is 'Low' because certain users could possibly be tricked into
- /// dropping an unverified script into one of their own objects, which could
- /// then gather the physical construction details of the object and transmit it
- /// to an unscrupulous third party, thus permitting unauthorized duplication of
- /// the object's form.
- /// </remarks>
- /// <param name="linknumber"></param>
- /// <param name="rules"></param>
- /// <returns></returns>
- public LSL_List osGetLinkPrimitiveParams(int linknumber, LSL_List rules)
- {
- CheckThreatLevel(ThreatLevel.High, "osGetLinkPrimitiveParams");
- m_host.AddScriptLPS(1);
- InitLSL();
- // One needs to cast m_LSL_Api because we're using functions not
- // on the ILSL_Api interface.
- LSL_Api LSL_Api = (LSL_Api)m_LSL_Api;
- LSL_List retVal = new LSL_List();
- LSL_List remaining = new LSL_List();
- List<SceneObjectPart> parts = LSL_Api.GetLinkParts(linknumber);
- foreach (SceneObjectPart part in parts)
- {
- remaining = LSL_Api.GetPrimParams(part, rules, ref retVal);
- }
- while (remaining.Length > 2)
- {
- linknumber = remaining.GetLSLIntegerItem(0);
- rules = remaining.GetSublist(1, -1);
- parts = LSL_Api.GetLinkParts(linknumber);
- foreach (SceneObjectPart part in parts)
- remaining = LSL_Api.GetPrimParams(part, rules, ref retVal);
- }
- return retVal;
- }
- public void osForceCreateLink(string target, int parent)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osForceCreateLink");
- m_host.AddScriptLPS(1);
- InitLSL();
- ((LSL_Api)m_LSL_Api).CreateLink(target, parent);
- }
- public void osForceBreakLink(int linknum)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osForceBreakLink");
- m_host.AddScriptLPS(1);
- InitLSL();
- ((LSL_Api)m_LSL_Api).BreakLink(linknum);
- }
- public void osForceBreakAllLinks()
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osForceBreakAllLinks");
- m_host.AddScriptLPS(1);
- InitLSL();
- ((LSL_Api)m_LSL_Api).BreakAllLinks();
- }
- public LSL_Integer osIsNpc(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.None, "osIsNpc");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId;
- if (UUID.TryParse(npc.m_string, out npcId))
- if (module.IsNPC(npcId, World))
- return ScriptBaseClass.TRUE;
- }
- return ScriptBaseClass.FALSE;
- }
- public LSL_Key osNpcCreate(string firstname, string lastname, LSL_Vector position, string notecard)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcCreate");
- m_host.AddScriptLPS(1);
- return NpcCreate(firstname, lastname, position, notecard, false, false);
- }
- public LSL_Key osNpcCreate(string firstname, string lastname, LSL_Vector position, string notecard, int options)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcCreate");
- m_host.AddScriptLPS(1);
- return NpcCreate(
- firstname, lastname, position, notecard,
- (options & ScriptBaseClass.OS_NPC_NOT_OWNED) == 0,
- (options & ScriptBaseClass.OS_NPC_SENSE_AS_AGENT) != 0);
- }
- private LSL_Key NpcCreate(
- string firstname, string lastname, LSL_Vector position, string notecard, bool owned, bool senseAsAgent)
- {
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- AvatarAppearance appearance = null;
- UUID id;
- if (UUID.TryParse(notecard, out id))
- {
- ScenePresence clonePresence = World.GetScenePresence(id);
- if (clonePresence != null)
- appearance = clonePresence.Appearance;
- }
- if (appearance == null)
- {
- string appearanceSerialized = LoadNotecard(notecard);
- if (appearanceSerialized != null)
- {
- OSDMap appearanceOsd = (OSDMap)OSDParser.DeserializeLLSDXml(appearanceSerialized);
- appearance = new AvatarAppearance();
- appearance.Unpack(appearanceOsd);
- }
- else
- {
- OSSLError(string.Format("osNpcCreate: Notecard reference '{0}' not found.", notecard));
- }
- }
- UUID ownerID = UUID.Zero;
- if (owned)
- ownerID = m_host.OwnerID;
- UUID x = module.CreateNPC(firstname,
- lastname,
- position,
- ownerID,
- senseAsAgent,
- World,
- appearance);
- return new LSL_Key(x.ToString());
- }
- return new LSL_Key(UUID.Zero.ToString());
- }
- /// <summary>
- /// Save the current appearance of the NPC permanently to the named notecard.
- /// </summary>
- /// <param name="avatar"></param>
- /// <param name="notecard">The name of the notecard to which to save the appearance.</param>
- /// <returns>The asset ID of the notecard saved.</returns>
- public LSL_Key osNpcSaveAppearance(LSL_Key npc, string notecard)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcSaveAppearance");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return new LSL_Key(UUID.Zero.ToString());
- if (!npcModule.CheckPermissions(npcId, m_host.OwnerID))
- return new LSL_Key(UUID.Zero.ToString());
- return SaveAppearanceToNotecard(npcId, notecard);
- }
- return new LSL_Key(UUID.Zero.ToString());
- }
- public void osNpcLoadAppearance(LSL_Key npc, string notecard)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcLoadAppearance");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return;
- if (!npcModule.CheckPermissions(npcId, m_host.OwnerID))
- return;
- string appearanceSerialized = LoadNotecard(notecard);
- if (appearanceSerialized == null)
- OSSLError(string.Format("osNpcCreate: Notecard reference '{0}' not found.", notecard));
- OSDMap appearanceOsd = (OSDMap)OSDParser.DeserializeLLSDXml(appearanceSerialized);
- // OSD a = OSDParser.DeserializeLLSDXml(appearanceSerialized);
- // Console.WriteLine("appearanceSerialized {0}", appearanceSerialized);
- // Console.WriteLine("a.Type {0}, a.ToString() {1}", a.Type, a);
- AvatarAppearance appearance = new AvatarAppearance();
- appearance.Unpack(appearanceOsd);
- npcModule.SetNPCAppearance(npcId, appearance, m_host.ParentGroup.Scene);
- }
- }
- public LSL_Key osNpcGetOwner(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.None, "osNpcGetOwner");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (UUID.TryParse(npc.m_string, out npcId))
- {
- UUID owner = npcModule.GetOwner(npcId);
- if (owner != UUID.Zero)
- return new LSL_Key(owner.ToString());
- else
- return npc;
- }
- }
- return new LSL_Key(UUID.Zero.ToString());
- }
- public LSL_Vector osNpcGetPos(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcGetPos");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return new LSL_Vector(0, 0, 0);
- if (!npcModule.CheckPermissions(npcId, m_host.OwnerID))
- return new LSL_Vector(0, 0, 0);
- ScenePresence sp = World.GetScenePresence(npcId);
- if (sp != null)
- return new LSL_Vector(sp.AbsolutePosition);
- }
- return Vector3.Zero;
- }
- public void osNpcMoveTo(LSL_Key npc, LSL_Vector pos)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcMoveTo");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return;
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
-
- module.MoveToTarget(npcId, World, pos, false, true, false);
- }
- }
- public void osNpcMoveToTarget(LSL_Key npc, LSL_Vector target, int options)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcMoveToTarget");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return;
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.MoveToTarget(
- new UUID(npc.m_string),
- World,
- target,
- (options & ScriptBaseClass.OS_NPC_NO_FLY) != 0,
- (options & ScriptBaseClass.OS_NPC_LAND_AT_TARGET) != 0,
- (options & ScriptBaseClass.OS_NPC_RUNNING) != 0);
- }
- }
- public LSL_Rotation osNpcGetRot(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcGetRot");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return new LSL_Rotation(Quaternion.Identity);
- if (!npcModule.CheckPermissions(npcId, m_host.OwnerID))
- return new LSL_Rotation(Quaternion.Identity);
- ScenePresence sp = World.GetScenePresence(npcId);
- if (sp != null)
- return new LSL_Rotation(sp.GetWorldRotation());
- }
- return Quaternion.Identity;
- }
- public void osNpcSetRot(LSL_Key npc, LSL_Rotation rotation)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcSetRot");
- m_host.AddScriptLPS(1);
- INPCModule npcModule = World.RequestModuleInterface<INPCModule>();
- if (npcModule != null)
- {
- UUID npcId;
- if (!UUID.TryParse(npc.m_string, out npcId))
- return;
- if (!npcModule.CheckPermissions(npcId, m_host.OwnerID))
- return;
- ScenePresence sp = World.GetScenePresence(npcId);
- if (sp != null)
- sp.Rotation = rotation;
- }
- }
- public void osNpcStopMoveToTarget(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcStopMoveToTarget");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.StopMoveToTarget(npcId, World);
- }
- }
- public void osNpcSay(LSL_Key npc, string message)
- {
- osNpcSay(npc, 0, message);
- }
- public void osNpcSay(LSL_Key npc, int channel, string message)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcSay");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.Say(npcId, World, message, channel);
- }
- }
- public void osNpcShout(LSL_Key npc, int channel, string message)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcShout");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.Shout(npcId, World, message, channel);
- }
- }
- public void osNpcSit(LSL_Key npc, LSL_Key target, int options)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcSit");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.Sit(npcId, new UUID(target.m_string), World);
- }
- }
- public void osNpcStand(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcStand");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.Stand(npcId, World);
- }
- }
- public void osNpcRemove(LSL_Key npc)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcRemove");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.DeleteNPC(npcId, World);
- }
- }
- public void osNpcPlayAnimation(LSL_Key npc, string animation)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcPlayAnimation");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcID = new UUID(npc.m_string);
- if (module.CheckPermissions(npcID, m_host.OwnerID))
- AvatarPlayAnimation(npcID.ToString(), animation);
- }
- }
- public void osNpcStopAnimation(LSL_Key npc, string animation)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcStopAnimation");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcID = new UUID(npc.m_string);
- if (module.CheckPermissions(npcID, m_host.OwnerID))
- AvatarStopAnimation(npcID.ToString(), animation);
- }
- }
- public void osNpcWhisper(LSL_Key npc, int channel, string message)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcWhisper");
- m_host.AddScriptLPS(1);
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- if (module != null)
- {
- UUID npcId = new UUID(npc.m_string);
- if (!module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- module.Whisper(npcId, World, message, channel);
- }
- }
- public void osNpcTouch(LSL_Key npcLSL_Key, LSL_Key object_key, LSL_Integer link_num)
- {
- CheckThreatLevel(ThreatLevel.High, "osNpcTouch");
- m_host.AddScriptLPS(1);
-
- INPCModule module = World.RequestModuleInterface<INPCModule>();
- int linkNum = link_num.value;
- if (module != null || (linkNum < 0 && linkNum != ScriptBaseClass.LINK_THIS))
- {
- UUID npcId;
- if (!UUID.TryParse(npcLSL_Key, out npcId) || !module.CheckPermissions(npcId, m_host.OwnerID))
- return;
- SceneObjectPart part = null;
- UUID objectId;
- if (UUID.TryParse(LSL_String.ToString(object_key), out objectId))
- part = World.GetSceneObjectPart(objectId);
- if (part == null)
- return;
- if (linkNum != ScriptBaseClass.LINK_THIS)
- {
- if (linkNum == 0 || linkNum == ScriptBaseClass.LINK_ROOT)
- { // 0 and 1 are treated as root, find the root if the current part isnt it
- if (!part.IsRoot)
- part = part.ParentGroup.RootPart;
- }
- else
- { // Find the prim with the given link number if not found then fail silently
- part = part.ParentGroup.GetLinkNumPart(linkNum);
- if (part == null)
- return;
- }
- }
- module.Touch(npcId, part.UUID);
- }
- }
- /// <summary>
- /// Save the current appearance of the script owner permanently to the named notecard.
- /// </summary>
- /// <param name="notecard">The name of the notecard to which to save the appearance.</param>
- /// <returns>The asset ID of the notecard saved.</returns>
- public LSL_Key osOwnerSaveAppearance(string notecard)
- {
- CheckThreatLevel(ThreatLevel.High, "osOwnerSaveAppearance");
- m_host.AddScriptLPS(1);
- return SaveAppearanceToNotecard(m_host.OwnerID, notecard);
- }
- public LSL_Key osAgentSaveAppearance(LSL_Key avatarId, string notecard)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osAgentSaveAppearance");
- m_host.AddScriptLPS(1);
- return SaveAppearanceToNotecard(avatarId, notecard);
- }
- protected LSL_Key SaveAppearanceToNotecard(ScenePresence sp, string notecard)
- {
- IAvatarFactoryModule appearanceModule = World.RequestModuleInterface<IAvatarFactoryModule>();
- if (appearanceModule != null)
- {
- appearanceModule.SaveBakedTextures(sp.UUID);
- OSDMap appearancePacked = sp.Appearance.Pack();
- TaskInventoryItem item
- = SaveNotecard(notecard, "Avatar Appearance", Util.GetFormattedXml(appearancePacked as OSD), true);
- return new LSL_Key(item.AssetID.ToString());
- }
- else
- {
- return new LSL_Key(UUID.Zero.ToString());
- }
- }
- protected LSL_Key SaveAppearanceToNotecard(UUID avatarId, string notecard)
- {
- ScenePresence sp = World.GetScenePresence(avatarId);
- if (sp == null || sp.IsChildAgent)
- return new LSL_Key(UUID.Zero.ToString());
- return SaveAppearanceToNotecard(sp, notecard);
- }
- protected LSL_Key SaveAppearanceToNotecard(LSL_Key rawAvatarId, string notecard)
- {
- UUID avatarId;
- if (!UUID.TryParse(rawAvatarId, out avatarId))
- return new LSL_Key(UUID.Zero.ToString());
- return SaveAppearanceToNotecard(avatarId, notecard);
- }
- /// <summary>
- /// Get the gender as specified in avatar appearance for a given avatar key
- /// </summary>
- /// <param name="rawAvatarId"></param>
- /// <returns>"male" or "female" or "unknown"</returns>
- public LSL_String osGetGender(LSL_Key rawAvatarId)
- {
- CheckThreatLevel(ThreatLevel.None, "osGetGender");
- m_host.AddScriptLPS(1);
- UUID avatarId;
- if (!UUID.TryParse(rawAvatarId, out avatarId))
- return new LSL_String("unknown");
- ScenePresence sp = World.GetScenePresence(avatarId);
- if (sp == null || sp.IsChildAgent || sp.Appearance == null || sp.Appearance.VisualParams == null)
- return new LSL_String("unknown");
- // find the index of "shape" parameter "male"
- int vpShapeMaleIndex = 0;
- bool indexFound = false;
- VisualParam param = new VisualParam();
- foreach(var vpEntry in VisualParams.Params)
- {
- param = vpEntry.Value;
- if (param.Name == "male" && param.Wearable == "shape")
- {
- indexFound = true;
- break;
- }
- if (param.Group == 0)
- vpShapeMaleIndex++;
- }
- if (!indexFound)
- return new LSL_String("unknown");
- float vpShapeMale = Utils.ByteToFloat(sp.Appearance.VisualParams[vpShapeMaleIndex], param.MinValue, param.MaxValue);
- bool isMale = vpShapeMale > 0.5f;
- return new LSL_String(isMale ? "male" : "female");
- }
-
- /// <summary>
- /// Get current region's map texture UUID
- /// </summary>
- /// <returns></returns>
- public LSL_Key osGetMapTexture()
- {
- CheckThreatLevel(ThreatLevel.None, "osGetMapTexture");
- m_host.AddScriptLPS(1);
- return m_ScriptEngine.World.RegionInfo.RegionSettings.TerrainImageID.ToString();
- }
- /// <summary>
- /// Get a region's map texture UUID by region UUID or name.
- /// </summary>
- /// <param name="regionName"></param>
- /// <returns></returns>
- public LSL_Key osGetRegionMapTexture(string regionName)
- {
- CheckThreatLevel(ThreatLevel.High, "osGetRegionMapTexture");
- m_host.AddScriptLPS(1);
- Scene scene = m_ScriptEngine.World;
- UUID key = UUID.Zero;
- GridRegion region;
- //If string is a key, use it. Otherwise, try to locate region by name.
- if (UUID.TryParse(regionName, out key))
- region = scene.GridService.GetRegionByUUID(UUID.Zero, key);
- else
- region = scene.GridService.GetRegionByName(UUID.Zero, regionName);
- // If region was found, return the regions map texture key.
- if (region != null)
- key = region.TerrainImage;
- ScriptSleep(1000);
- return key.ToString();
- }
-
- /// <summary>
- /// Return information regarding various simulator statistics (sim fps, physics fps, time
- /// dilation, total number of prims, total number of active scripts, script lps, various
- /// timing data, packets in/out, etc. Basically much the information that's shown in the
- /// client's Statistics Bar (Ctrl-Shift-1)
- /// </summary>
- /// <returns>List of floats</returns>
- public LSL_List osGetRegionStats()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetRegionStats");
- m_host.AddScriptLPS(1);
- LSL_List ret = new LSL_List();
- float[] stats = World.StatsReporter.LastReportedSimStats;
-
- for (int i = 0; i < 21; i++)
- {
- ret.Add(new LSL_Float(stats[i]));
- }
- return ret;
- }
- public LSL_Vector osGetRegionSize()
- {
- CheckThreatLevel(ThreatLevel.None, "osGetRegionSize");
- m_host.AddScriptLPS(1);
- bool isMegaregion;
- IRegionCombinerModule rcMod = World.RequestModuleInterface<IRegionCombinerModule>();
- if (rcMod != null)
- isMegaregion = rcMod.IsRootForMegaregion(World.RegionInfo.RegionID);
- else
- isMegaregion = false;
- if (isMegaregion)
- {
- Vector2 size = rcMod.GetSizeOfMegaregion(World.RegionInfo.RegionID);
- return new LSL_Vector(size.X, size.Y, Constants.RegionHeight);
- }
- else
- {
- Scene scene = m_ScriptEngine.World;
- GridRegion region = scene.GridService.GetRegionByUUID(UUID.Zero, World.RegionInfo.RegionID);
- return new LSL_Vector((float)region.RegionSizeX, (float)region.RegionSizeX, Constants.RegionHeight);
- }
- }
- public int osGetSimulatorMemory()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetSimulatorMemory");
- m_host.AddScriptLPS(1);
- long pws = System.Diagnostics.Process.GetCurrentProcess().WorkingSet64;
- if (pws > Int32.MaxValue)
- return Int32.MaxValue;
- if (pws < 0)
- return 0;
- return (int)pws;
- }
-
- public void osSetSpeed(string UUID, LSL_Float SpeedModifier)
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osSetSpeed");
- m_host.AddScriptLPS(1);
- ScenePresence avatar = World.GetScenePresence(new UUID(UUID));
- if (avatar != null)
- avatar.SpeedModifier = (float)SpeedModifier;
- }
-
- public void osKickAvatar(string FirstName, string SurName, string alert)
- {
- CheckThreatLevel(ThreatLevel.Severe, "osKickAvatar");
- m_host.AddScriptLPS(1);
- World.ForEachRootScenePresence(delegate(ScenePresence sp)
- {
- if (sp.Firstname == FirstName && sp.Lastname == SurName)
- {
- // kick client...
- if (alert != null)
- sp.ControllingClient.Kick(alert);
- // ...and close on our side
- sp.Scene.CloseAgent(sp.UUID, false);
- }
- });
- }
- public LSL_Float osGetHealth(string avatar)
- {
- CheckThreatLevel(ThreatLevel.None, "osGetHealth");
- m_host.AddScriptLPS(1);
- LSL_Float health = new LSL_Float(-1);
- ScenePresence presence = World.GetScenePresence(new UUID(avatar));
- if (presence != null) health = presence.Health;
- return health;
- }
-
- public void osCauseDamage(string avatar, double damage)
- {
- CheckThreatLevel(ThreatLevel.High, "osCauseDamage");
- m_host.AddScriptLPS(1);
- UUID avatarId = new UUID(avatar);
- Vector3 pos = m_host.GetWorldPosition();
- ScenePresence presence = World.GetScenePresence(avatarId);
- if (presence != null)
- {
- LandData land = World.GetLandData(pos);
- if ((land.Flags & (uint)ParcelFlags.AllowDamage) == (uint)ParcelFlags.AllowDamage)
- {
- float health = presence.Health;
- health -= (float)damage;
- presence.setHealthWithUpdate(health);
- if (health <= 0)
- {
- float healthliveagain = 100;
- presence.ControllingClient.SendAgentAlertMessage("You died!", true);
- presence.setHealthWithUpdate(healthliveagain);
- presence.Scene.TeleportClientHome(presence.UUID, presence.ControllingClient);
- }
- }
- }
- }
-
- public void osCauseHealing(string avatar, double healing)
- {
- CheckThreatLevel(ThreatLevel.High, "osCauseHealing");
- m_host.AddScriptLPS(1);
- UUID avatarId = new UUID(avatar);
- ScenePresence presence = World.GetScenePresence(avatarId);
- if (presence != null && World.ScriptDanger(m_host.LocalId, m_host.GetWorldPosition()))
- {
- float health = presence.Health;
- health += (float)healing;
- if (health >= 100)
- health = 100;
- presence.setHealthWithUpdate(health);
- }
- }
- public LSL_List osGetPrimitiveParams(LSL_Key prim, LSL_List rules)
- {
- CheckThreatLevel(ThreatLevel.High, "osGetPrimitiveParams");
- m_host.AddScriptLPS(1);
- InitLSL();
-
- return m_LSL_Api.GetPrimitiveParamsEx(prim, rules);
- }
- public void osSetPrimitiveParams(LSL_Key prim, LSL_List rules)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetPrimitiveParams");
- m_host.AddScriptLPS(1);
- InitLSL();
-
- m_LSL_Api.SetPrimitiveParamsEx(prim, rules, "osSetPrimitiveParams");
- }
-
- /// <summary>
- /// Set parameters for light projection in host prim
- /// </summary>
- public void osSetProjectionParams(bool projection, LSL_Key texture, double fov, double focus, double amb)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetProjectionParams");
- osSetProjectionParams(UUID.Zero.ToString(), projection, texture, fov, focus, amb);
- }
- /// <summary>
- /// Set parameters for light projection with uuid of target prim
- /// </summary>
- public void osSetProjectionParams(LSL_Key prim, bool projection, LSL_Key texture, double fov, double focus, double amb)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetProjectionParams");
- m_host.AddScriptLPS(1);
- SceneObjectPart obj = null;
- if (prim == UUID.Zero.ToString())
- {
- obj = m_host;
- }
- else
- {
- obj = World.GetSceneObjectPart(new UUID(prim));
- if (obj == null)
- return;
- }
- obj.Shape.ProjectionEntry = projection;
- obj.Shape.ProjectionTextureUUID = new UUID(texture);
- obj.Shape.ProjectionFOV = (float)fov;
- obj.Shape.ProjectionFocus = (float)focus;
- obj.Shape.ProjectionAmbiance = (float)amb;
- obj.ParentGroup.HasGroupChanged = true;
- obj.ScheduleFullUpdate();
- }
- /// <summary>
- /// Like osGetAgents but returns enough info for a radar
- /// </summary>
- /// <returns>Strided list of the UUID, position and name of each avatar in the region</returns>
- public LSL_List osGetAvatarList()
- {
- CheckThreatLevel(ThreatLevel.None, "osGetAvatarList");
- m_host.AddScriptLPS(1);
- LSL_List result = new LSL_List();
- World.ForEachRootScenePresence(delegate (ScenePresence avatar)
- {
- if (avatar != null && avatar.UUID != m_host.OwnerID)
- {
- result.Add(new LSL_String(avatar.UUID.ToString()));
- result.Add(new LSL_Vector(avatar.AbsolutePosition));
- result.Add(new LSL_String(avatar.Name));
- }
- });
- return result;
- }
- /// <summary>
- /// Convert a unix time to a llGetTimestamp() like string
- /// </summary>
- /// <param name="unixTime"></param>
- /// <returns></returns>
- public LSL_String osUnixTimeToTimestamp(long time)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osUnixTimeToTimestamp");
- m_host.AddScriptLPS(1);
- long baseTicks = 621355968000000000;
- long tickResolution = 10000000;
- long epochTicks = (time * tickResolution) + baseTicks;
- DateTime date = new DateTime(epochTicks);
- return date.ToString("yyyy-MM-ddTHH:mm:ss.fffffffZ");
- }
- /// <summary>
- /// Get the description from an inventory item
- /// </summary>
- /// <param name="inventoryName"></param>
- /// <returns>Item description</returns>
- public LSL_String osGetInventoryDesc(string item)
- {
- m_host.AddScriptLPS(1);
- lock (m_host.TaskInventory)
- {
- foreach (KeyValuePair<UUID, TaskInventoryItem> inv in m_host.TaskInventory)
- {
- if (inv.Value.Name == item)
- {
- return inv.Value.Description.ToString();
- }
- }
- }
- return String.Empty;
- }
- /// <summary>
- /// Invite user to the group this object is set to
- /// </summary>
- /// <param name="agentId"></param>
- /// <returns></returns>
- public LSL_Integer osInviteToGroup(LSL_Key agentId)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osInviteToGroup");
- m_host.AddScriptLPS(1);
- UUID agent = new UUID(agentId);
- // groups module is required
- IGroupsModule groupsModule = m_ScriptEngine.World.RequestModuleInterface<IGroupsModule>();
- if (groupsModule == null) return ScriptBaseClass.FALSE;
- // object has to be set to a group, but not group owned
- if (m_host.GroupID == UUID.Zero || m_host.GroupID == m_host.OwnerID) return ScriptBaseClass.FALSE;
- // object owner has to be in that group and required permissions
- GroupMembershipData member = groupsModule.GetMembershipData(m_host.GroupID, m_host.OwnerID);
- if (member == null || (member.GroupPowers & (ulong)GroupPowers.Invite) == 0) return ScriptBaseClass.FALSE;
- // check if agent is in that group already
- //member = groupsModule.GetMembershipData(agent, m_host.GroupID, agent);
- //if (member != null) return ScriptBaseClass.FALSE;
- // invited agent has to be present in this scene
- if (World.GetScenePresence(agent) == null) return ScriptBaseClass.FALSE;
- groupsModule.InviteGroup(null, m_host.OwnerID, m_host.GroupID, agent, UUID.Zero);
- return ScriptBaseClass.TRUE;
- }
- /// <summary>
- /// Eject user from the group this object is set to
- /// </summary>
- /// <param name="agentId"></param>
- /// <returns></returns>
- public LSL_Integer osEjectFromGroup(LSL_Key agentId)
- {
- CheckThreatLevel(ThreatLevel.VeryLow, "osEjectFromGroup");
- m_host.AddScriptLPS(1);
- UUID agent = new UUID(agentId);
- // groups module is required
- IGroupsModule groupsModule = m_ScriptEngine.World.RequestModuleInterface<IGroupsModule>();
- if (groupsModule == null) return ScriptBaseClass.FALSE;
- // object has to be set to a group, but not group owned
- if (m_host.GroupID == UUID.Zero || m_host.GroupID == m_host.OwnerID) return ScriptBaseClass.FALSE;
- // object owner has to be in that group and required permissions
- GroupMembershipData member = groupsModule.GetMembershipData(m_host.GroupID, m_host.OwnerID);
- if (member == null || (member.GroupPowers & (ulong)GroupPowers.Eject) == 0) return ScriptBaseClass.FALSE;
- // agent has to be in that group
- //member = groupsModule.GetMembershipData(agent, m_host.GroupID, agent);
- //if (member == null) return ScriptBaseClass.FALSE;
- // ejectee can be offline
- groupsModule.EjectGroupMember(null, m_host.OwnerID, m_host.GroupID, agent);
- return ScriptBaseClass.TRUE;
- }
- /// <summary>
- /// Sets terrain estate texture
- /// </summary>
- /// <param name="level"></param>
- /// <param name="texture"></param>
- /// <returns></returns>
- public void osSetTerrainTexture(int level, LSL_Key texture)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetTerrainTexture");
- m_host.AddScriptLPS(1);
- //Check to make sure that the script's owner is the estate manager/master
- //World.Permissions.GenericEstatePermission(
- if (World.Permissions.IsGod(m_host.OwnerID))
- {
- if (level < 0 || level > 3)
- return;
- UUID textureID = new UUID();
- if (!UUID.TryParse(texture, out textureID))
- return;
- // estate module is required
- IEstateModule estate = World.RequestModuleInterface<IEstateModule>();
- if (estate != null)
- estate.setEstateTerrainBaseTexture(level, textureID);
- }
- }
- /// <summary>
- /// Sets terrain heights of estate
- /// </summary>
- /// <param name="corner"></param>
- /// <param name="low"></param>
- /// <param name="high"></param>
- /// <returns></returns>
- public void osSetTerrainTextureHeight(int corner, double low, double high)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetTerrainTextureHeight");
- m_host.AddScriptLPS(1);
- //Check to make sure that the script's owner is the estate manager/master
- //World.Permissions.GenericEstatePermission(
- if (World.Permissions.IsGod(m_host.OwnerID))
- {
- if (corner < 0 || corner > 3)
- return;
- // estate module is required
- IEstateModule estate = World.RequestModuleInterface<IEstateModule>();
- if (estate != null)
- estate.setEstateTerrainTextureHeights(corner, (float)low, (float)high);
- }
- }
- #region Attachment commands
- public void osForceAttachToAvatar(int attachmentPoint)
- {
- CheckThreatLevel(ThreatLevel.High, "osForceAttachToAvatar");
- m_host.AddScriptLPS(1);
- InitLSL();
- ((LSL_Api)m_LSL_Api).AttachToAvatar(attachmentPoint);
- }
- public void osForceAttachToAvatarFromInventory(string itemName, int attachmentPoint)
- {
- CheckThreatLevel(ThreatLevel.High, "osForceAttachToAvatarFromInventory");
- m_host.AddScriptLPS(1);
- ForceAttachToAvatarFromInventory(m_host.OwnerID, itemName, attachmentPoint);
- }
- public void osForceAttachToOtherAvatarFromInventory(string rawAvatarId, string itemName, int attachmentPoint)
- {
- CheckThreatLevel(ThreatLevel.VeryHigh, "osForceAttachToOtherAvatarFromInventory");
- m_host.AddScriptLPS(1);
- UUID avatarId;
- if (!UUID.TryParse(rawAvatarId, out avatarId))
- return;
- ForceAttachToAvatarFromInventory(avatarId, itemName, attachmentPoint);
- }
- public void ForceAttachToAvatarFromInventory(UUID avatarId, string itemName, int attachmentPoint)
- {
- IAttachmentsModule attachmentsModule = m_ScriptEngine.World.AttachmentsModule;
- if (attachmentsModule == null)
- return;
- InitLSL();
- TaskInventoryItem item = m_host.Inventory.GetInventoryItem(itemName);
- if (item == null)
- {
- ((LSL_Api)m_LSL_Api).llSay(0, string.Format("Could not find object '{0}'", itemName));
- throw new Exception(String.Format("The inventory item '{0}' could not be found", itemName));
- }
- if (item.InvType != (int)InventoryType.Object)
- {
- // FIXME: Temporary null check for regression tests since they dont' have the infrastructure to set
- // up the api reference.
- if (m_LSL_Api != null)
- ((LSL_Api)m_LSL_Api).llSay(0, string.Format("Unable to attach, item '{0}' is not an object.", itemName));
- throw new Exception(String.Format("The inventory item '{0}' is not an object", itemName));
- }
- ScenePresence sp = World.GetScenePresence(avatarId);
- if (sp == null)
- return;
- string message;
- InventoryItemBase newItem = World.MoveTaskInventoryItem(sp.UUID, UUID.Zero, m_host, item.ItemID, out message);
- if (newItem == null)
- {
- m_log.ErrorFormat(
- "[OSSL API]: Could not create user inventory item {0} for {1}, attach point {2} in {3}: {4}",
- itemName, m_host.Name, attachmentPoint, World.Name, message);
- ((LSL_Api)m_LSL_Api).llSay(0, message);
- return;
- }
- attachmentsModule.RezSingleAttachmentFromInventory(sp, newItem.ID, (uint)attachmentPoint);
- }
- public void osForceDetachFromAvatar()
- {
- CheckThreatLevel(ThreatLevel.High, "osForceDetachFromAvatar");
- m_host.AddScriptLPS(1);
- InitLSL();
- ((LSL_Api)m_LSL_Api).DetachFromAvatar();
- }
- public LSL_List osGetNumberOfAttachments(LSL_Key avatar, LSL_List attachmentPoints)
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osGetNumberOfAttachments");
- m_host.AddScriptLPS(1);
- UUID targetUUID;
- ScenePresence target;
- LSL_List resp = new LSL_List();
- if (attachmentPoints.Length >= 1 && UUID.TryParse(avatar.ToString(), out targetUUID) && World.TryGetScenePresence(targetUUID, out target))
- {
- foreach (object point in attachmentPoints.Data)
- {
- LSL_Integer ipoint = new LSL_Integer(
- (point is LSL_Integer || point is int || point is uint) ?
- (int)point :
- 0
- );
- resp.Add(ipoint);
- if (ipoint == 0)
- {
- // indicates zero attachments
- resp.Add(new LSL_Integer(0));
- }
- else
- {
- // gets the number of attachments on the attachment point
- resp.Add(new LSL_Integer(target.GetAttachments((uint)ipoint).Count));
- }
- }
- }
- return resp;
- }
- public void osMessageAttachments(LSL_Key avatar, string message, LSL_List attachmentPoints, int options)
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osMessageAttachments");
- m_host.AddScriptLPS(1);
- UUID targetUUID;
- ScenePresence target;
- if (attachmentPoints.Length >= 1 && UUID.TryParse(avatar.ToString(), out targetUUID) && World.TryGetScenePresence(targetUUID, out target))
- {
- List<int> aps = new List<int>();
- foreach (object point in attachmentPoints.Data)
- {
- int ipoint;
- if (int.TryParse(point.ToString(), out ipoint))
- {
- aps.Add(ipoint);
- }
- }
- List<SceneObjectGroup> attachments = new List<SceneObjectGroup>();
- bool msgAll = aps.Contains(ScriptBaseClass.OS_ATTACH_MSG_ALL);
- bool invertPoints = (options & ScriptBaseClass.OS_ATTACH_MSG_INVERT_POINTS) != 0;
- if (msgAll && invertPoints)
- {
- return;
- }
- else if (msgAll || invertPoints)
- {
- attachments = target.GetAttachments();
- }
- else
- {
- foreach (int point in aps)
- {
- if (point > 0)
- {
- attachments.AddRange(target.GetAttachments((uint)point));
- }
- }
- }
- // if we have no attachments at this point, exit now
- if (attachments.Count == 0)
- {
- return;
- }
- List<SceneObjectGroup> ignoreThese = new List<SceneObjectGroup>();
- if (invertPoints)
- {
- foreach (SceneObjectGroup attachment in attachments)
- {
- if (aps.Contains((int)attachment.AttachmentPoint))
- {
- ignoreThese.Add(attachment);
- }
- }
- }
- foreach (SceneObjectGroup attachment in ignoreThese)
- {
- attachments.Remove(attachment);
- }
- ignoreThese.Clear();
- // if inverting removed all attachments to check, exit now
- if (attachments.Count < 1)
- {
- return;
- }
- if ((options & ScriptBaseClass.OS_ATTACH_MSG_OBJECT_CREATOR) != 0)
- {
- foreach (SceneObjectGroup attachment in attachments)
- {
- if (attachment.RootPart.CreatorID != m_host.CreatorID)
- {
- ignoreThese.Add(attachment);
- }
- }
- foreach (SceneObjectGroup attachment in ignoreThese)
- {
- attachments.Remove(attachment);
- }
- ignoreThese.Clear();
- // if filtering by same object creator removed all
- // attachments to check, exit now
- if (attachments.Count == 0)
- {
- return;
- }
- }
- if ((options & ScriptBaseClass.OS_ATTACH_MSG_SCRIPT_CREATOR) != 0)
- {
- foreach (SceneObjectGroup attachment in attachments)
- {
- if (attachment.RootPart.CreatorID != m_item.CreatorID)
- {
- ignoreThese.Add(attachment);
- }
- }
- foreach (SceneObjectGroup attachment in ignoreThese)
- {
- attachments.Remove(attachment);
- }
- ignoreThese.Clear();
- // if filtering by object creator must match originating
- // script creator removed all attachments to check,
- // exit now
- if (attachments.Count == 0)
- {
- return;
- }
- }
- foreach (SceneObjectGroup attachment in attachments)
- {
- MessageObject(attachment.RootPart.UUID, message);
- }
- }
- }
- #endregion
- /// <summary>
- /// Checks if thing is a UUID.
- /// </summary>
- /// <param name="thing"></param>
- /// <returns>1 if thing is a valid UUID, 0 otherwise</returns>
- public LSL_Integer osIsUUID(string thing)
- {
- CheckThreatLevel(ThreatLevel.None, "osIsUUID");
- m_host.AddScriptLPS(1);
- UUID test;
- return UUID.TryParse(thing, out test) ? 1 : 0;
- }
- /// <summary>
- /// Wraps to Math.Min()
- /// </summary>
- /// <param name="a"></param>
- /// <param name="b"></param>
- /// <returns></returns>
- public LSL_Float osMin(double a, double b)
- {
- CheckThreatLevel(ThreatLevel.None, "osMin");
- m_host.AddScriptLPS(1);
- return Math.Min(a, b);
- }
- /// <summary>
- /// Wraps to Math.max()
- /// </summary>
- /// <param name="a"></param>
- /// <param name="b"></param>
- /// <returns></returns>
- public LSL_Float osMax(double a, double b)
- {
- CheckThreatLevel(ThreatLevel.None, "osMax");
- m_host.AddScriptLPS(1);
- return Math.Max(a, b);
- }
- public LSL_Key osGetRezzingObject()
- {
- CheckThreatLevel(ThreatLevel.None, "osGetRezzingObject");
- m_host.AddScriptLPS(1);
- return new LSL_Key(m_host.ParentGroup.FromPartID.ToString());
- }
- /// <summary>
- /// Sets the response type for an HTTP request/response
- /// </summary>
- /// <returns></returns>
- public void osSetContentType(LSL_Key id, string type)
- {
- CheckThreatLevel(ThreatLevel.High, "osSetContentType");
- if (m_UrlModule != null)
- m_UrlModule.HttpContentType(new UUID(id),type);
- }
- /// Shout an error if the object owner did not grant the script the specified permissions.
- /// </summary>
- /// <param name="perms"></param>
- /// <returns>boolean indicating whether an error was shouted.</returns>
- protected bool ShoutErrorOnLackingOwnerPerms(int perms, string errorPrefix)
- {
- m_host.AddScriptLPS(1);
- bool fail = false;
- if (m_item.PermsGranter != m_host.OwnerID)
- {
- fail = true;
- OSSLShoutError(string.Format("{0}. Permissions not granted to owner.", errorPrefix));
- }
- else if ((m_item.PermsMask & perms) == 0)
- {
- fail = true;
- OSSLShoutError(string.Format("{0}. Permissions not granted.", errorPrefix));
- }
- return fail;
- }
- protected void DropAttachment(bool checkPerms)
- {
- if (checkPerms && ShoutErrorOnLackingOwnerPerms(ScriptBaseClass.PERMISSION_ATTACH, "Cannot drop attachment"))
- {
- return;
- }
- IAttachmentsModule attachmentsModule = m_ScriptEngine.World.AttachmentsModule;
- ScenePresence sp = attachmentsModule == null ? null : m_host.ParentGroup.Scene.GetScenePresence(m_host.ParentGroup.OwnerID);
- if (attachmentsModule != null && sp != null)
- {
- attachmentsModule.DetachSingleAttachmentToGround(sp, m_host.ParentGroup.LocalId);
- }
- }
- protected void DropAttachmentAt(bool checkPerms, LSL_Vector pos, LSL_Rotation rot)
- {
- if (checkPerms && ShoutErrorOnLackingOwnerPerms(ScriptBaseClass.PERMISSION_ATTACH, "Cannot drop attachment"))
- {
- return;
- }
- IAttachmentsModule attachmentsModule = m_ScriptEngine.World.AttachmentsModule;
- ScenePresence sp = attachmentsModule == null ? null : m_host.ParentGroup.Scene.GetScenePresence(m_host.ParentGroup.OwnerID);
- if (attachmentsModule != null && sp != null)
- {
- attachmentsModule.DetachSingleAttachmentToGround(sp, m_host.ParentGroup.LocalId, pos, rot);
- }
- }
- public void osDropAttachment()
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osDropAttachment");
- m_host.AddScriptLPS(1);
- DropAttachment(true);
- }
- public void osForceDropAttachment()
- {
- CheckThreatLevel(ThreatLevel.High, "osForceDropAttachment");
- m_host.AddScriptLPS(1);
- DropAttachment(false);
- }
- public void osDropAttachmentAt(LSL_Vector pos, LSL_Rotation rot)
- {
- CheckThreatLevel(ThreatLevel.Moderate, "osDropAttachmentAt");
- m_host.AddScriptLPS(1);
- DropAttachmentAt(true, pos, rot);
- }
- public void osForceDropAttachmentAt(LSL_Vector pos, LSL_Rotation rot)
- {
- CheckThreatLevel(ThreatLevel.High, "osForceDropAttachmentAt");
- m_host.AddScriptLPS(1);
- DropAttachmentAt(false, pos, rot);
- }
- public LSL_Integer osListenRegex(int channelID, string name, string ID, string msg, int regexBitfield)
- {
- CheckThreatLevel(ThreatLevel.Low, "osListenRegex");
- m_host.AddScriptLPS(1);
- UUID keyID;
- UUID.TryParse(ID, out keyID);
- // if we want the name to be used as a regular expression, ensure it is valid first.
- if ((regexBitfield & ScriptBaseClass.OS_LISTEN_REGEX_NAME) == ScriptBaseClass.OS_LISTEN_REGEX_NAME)
- {
- try
- {
- Regex.IsMatch("", name);
- }
- catch (Exception)
- {
- OSSLShoutError("Name regex is invalid.");
- return -1;
- }
- }
- // if we want the msg to be used as a regular expression, ensure it is valid first.
- if ((regexBitfield & ScriptBaseClass.OS_LISTEN_REGEX_MESSAGE) == ScriptBaseClass.OS_LISTEN_REGEX_MESSAGE)
- {
- try
- {
- Regex.IsMatch("", msg);
- }
- catch (Exception)
- {
- OSSLShoutError("Message regex is invalid.");
- return -1;
- }
- }
- IWorldComm wComm = m_ScriptEngine.World.RequestModuleInterface<IWorldComm>();
- return (wComm == null) ? -1 : wComm.Listen(
- m_host.LocalId,
- m_item.ItemID,
- m_host.UUID,
- channelID,
- name,
- keyID,
- msg,
- regexBitfield
- );
- }
- public LSL_Integer osRegexIsMatch(string input, string pattern)
- {
- CheckThreatLevel(ThreatLevel.Low, "osRegexIsMatch");
- m_host.AddScriptLPS(1);
- try
- {
- return Regex.IsMatch(input, pattern) ? 1 : 0;
- }
- catch (Exception)
- {
- OSSLShoutError("Possible invalid regular expression detected.");
- return 0;
- }
- }
- }
- }
|