SetPresence.cs

using System;
using System.Collections.Generic;
using System.Xml;
using System.Threading.Tasks;
using TAG.Simulator.ObjectModel;
using TAG.Simulator.ObjectModel.Activities;
using TAG.Simulator.ObjectModel.Values;
using TAG.Simulator.XMPP.Actors;
using Waher.Content.Xml;
using Waher.Script;
using Waher.Networking.XMPP;
using System.IO;
 
namespace TAG.Simulator.XMPP.Activities
{
    public class SetPresence : ActivityNode, IValueRecipient
    {
        private IValue value;
        private StringAttribute actor;
        private Availability availability;
 
        public SetPresence(ISimulationNode Parent, Model Model)
            : base(Parent, Model)
        {
        }
 
        public override string LocalName => nameof(SetPresence);
 
        public override string SchemaResource => XmppActor.XmppSchema;
 
        public override string Namespace => XmppActor.XmppNamespace;
 
        public override ISimulationNode Create(ISimulationNode Parent, Model Model)
        {
            return new SetPresence(Parent, Model);
        }
 
        public override Task FromXml(XmlElement Definition)
        {
            this.actor = new StringAttribute(XML.Attribute(Definition, "actor"));
            this.availability = (Availability)XML.Attribute(Definition, "availability", Availability.Online);
 
            return base.FromXml(Definition);
        }
 
        public void Register(IValue Value)
        {
            if (this.value is null)
                this.value = Value;
            else
                throw new Exception("Value already registered.");
        }
 
        public override async Task<LinkedListNode<IActivityNode>> Execute(Variables Variables)
        {
            object Content = this.value is null ? string.Empty : await this.value.EvaluateAsync(Variables) ?? string.Empty;
            string Xml;
 
            if (!(await this.GetActorObjectAsync(this.actor, Variables) is XmppActivityObject XmppActor))
                throw new Exception("Actor not an XMPP client.");
 
            if (Content is XmlDocument Doc)
                Xml = Doc.OuterXml;
            else if (Content is XmlElement E)
                Xml = E.OuterXml;
            else
                throw new Exception("Custom content in presence must be XML.");
 
            XmppActor.Client.SetTag("CutomPresenceXML", Xml);
            await XmppActor.Client.SetPresence(this.availability);
 
            return null;
        }
 
        public override void ExportPlantUml(StreamWriter Output, int Indentation, char QuoteChar)
        {
            base.ExportPlantUml(Output, Indentation, QuoteChar);
 
            Indent(Output, Indentation);
            Output.Write(':');
            Output.Write(this.actor.Value);
            Output.Write(".SetPresence");
            Output.Write("(");
 
            Indentation++;
 
            SendMessage.AppendArgument(Output, Indentation, "Availability", this.availability.ToString(), true, QuoteChar);
 
            if (!(this.value is null))
            {
                if (this.value is Xml Xml && !string.IsNullOrEmpty(Xml.RootName))
                    SendMessage.AppendArgument(Output, Indentation, "Content", Xml.RootName, false, QuoteChar);
                else
                    SendMessage.AppendArgument(Output, Indentation, "Content", this.value, QuoteChar);
            }
 
            Output.WriteLine(");");
        }
 
    }
}