void IGXDLMSBase.Load(GXXmlReader reader)
{
Scripts.Clear();
if (reader.IsStartElement("Scripts", true))
{
while (reader.IsStartElement("Script", true))
{
GXDLMSScript it = new GXDLMSScript();
Scripts.Add(it);
it.Id = reader.ReadElementContentAsInt("ID");
if (reader.IsStartElement("Actions", true))
{
while (reader.IsStartElement("Action", true))
{
GXDLMSScriptAction a = new Objects.GXDLMSScriptAction();
a.Type = (ScriptActionType)reader.ReadElementContentAsInt("Type");
ObjectType ot = (ObjectType)reader.ReadElementContentAsInt("ObjectType");
string ln = reader.ReadElementContentAsString("LN");
a.Index = reader.ReadElementContentAsInt("Index");
a.Target = reader.Objects.FindByLN(ot, ln);
if (a.Target == null)
{
a.Target = GXDLMSClient.CreateObject(ot);
a.Target.LogicalName = ln;
}
a.ParameterDataType = (DataType)reader.ReadElementContentAsInt("ParameterDataType");
a.Parameter = reader.ReadElementContentAsObject("Parameter", null);
}
reader.ReadEndElement("Actions");
}
}
reader.ReadEndElement("Scripts");
}
}
void IGXDLMSBase.SetValue(GXDLMSSettings settings, ValueEventArgs e)
{
if (e.Index == 1)
{
LogicalName = GXCommon.ToLogicalName(e.Value);
}
else if (e.Index == 2)
{
Scripts.Clear();
//Fix Xemex bug here.
//Xemex meters do not return array as they shoul be according standard.
if (e.Value is object[] && ((object[])e.Value).Length != 0)
{
if (((object[])e.Value)[0] is object[])
{
foreach (object[] item in (object[])e.Value)
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(item[0]);
Scripts.Add(script);
foreach (object[] arr in (object[])item[1])
{
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
string ln = GXCommon.ToLogicalName(arr[2]);
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = ot;
it.LogicalName = ln;
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
if (it.Parameter != null)
{
it.ParameterDataType = GXDLMSConverter.GetDLMSDataType(it.Parameter.GetType());
}
script.Actions.Add(it);
}
}
}
else //Read Xemex meter here.
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(((object[])e.Value)[0]);
Scripts.Add(script);
object[] arr = (object[])((object[])e.Value)[1];
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
string ln = GXCommon.ToLogicalName(arr[2]);
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = ot;
it.LogicalName = ln;
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else
{
e.Error = ErrorCode.ReadWriteDenied;
}
}
void IGXDLMSBase.SetValue(GXDLMSSettings settings, ValueEventArgs e)
{
if (e.Index == 1)
{
LogicalName = GXCommon.ToLogicalName(e.Value);
}
else if (e.Index == 2)
{
Scripts.Clear();
//Fix Xemex bug here.
//Xemex meters do not return array as they shoul be according standard.
if (e.Value is IEnumerable <object> )
{
List <object> arr, arr1, arr2;
if (e.Value is List <object> )
{
arr1 = (List <object>)e.Value;
}
else
{
arr1 = new List <object>((object[])e.Value);
}
if (arr1[0] is IEnumerable <object> )
{
foreach (object tmp in (IEnumerable <object>)e.Value)
{
List <object> item;
if (tmp is List <object> )
{
item = (List <object>)tmp;
}
else
{
item = new List <object>((object[])tmp);
}
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(item[0]);
Scripts.Add(script);
if (item[1] is List <object> )
{
arr2 = (List <object>)item[1];
}
else
{
arr2 = new List <object>((object[])item[1]);
}
foreach (object tmp2 in arr2)
{
if (tmp2 is List <object> )
{
arr = (List <object>)tmp2;
}
else
{
arr = new List <object>((object[])tmp2);
}
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXCommon.ToLogicalName(arr[2]);
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = ot;
it.LogicalName = ln;
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
if (it.Parameter != null)
{
it.ParameterDataType = GXDLMSConverter.GetDLMSDataType(it.Parameter);
}
script.Actions.Add(it);
}
}
}
else //Read Xemex meter here.
{
GXDLMSScript script = new GXDLMSScript();
if (e.Value is List <object> )
{
arr1 = (List <object>)e.Value;
}
else
{
arr1 = new List <object>((object[])e.Value);
}
script.Id = Convert.ToInt32(arr1[0]);
Scripts.Add(script);
if (arr1[1] is List <object> )
{
arr = (List <object>)arr1[1];
}
else
{
arr = new List <object>((object[])arr1[1]);
}
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXCommon.ToLogicalName(arr[2]);
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = ot;
it.LogicalName = ln;
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else
{
e.Error = ErrorCode.ReadWriteDenied;
}
}
/// <summary>
/// Executes selected script.
/// </summary>
/// <param name="client">DLMS client.</param>
/// <param name="script">Executed script.</param>
/// <returns>Action bytes.</returns>
public byte[][] Execute(GXDLMSClient client, GXDLMSScript script)
{
return(client.Method(this, 1, (UInt16)script.Id));
}
void IGXDLMSBase.SetValue(GXDLMSSettings settings, ValueEventArgs e)
{
if (e.Index == 1)
{
if (e.Value is string)
{
LogicalName = e.Value.ToString();
}
else
{
LogicalName = GXDLMSClient.ChangeType((byte[])e.Value, DataType.OctetString, settings.UseUtc2NormalTime).ToString();
}
}
else if (e.Index == 2)
{
Scripts.Clear();
//Fix Xemex bug here.
//Xemex meters do not return array as they shoul be according standard.
if (e.Value is Object[] && ((Object[])e.Value).Length != 0)
{
if (((Object[])e.Value)[0] is Object[])
{
foreach (Object[] item in (Object[])e.Value)
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(item[0]);
Scripts.Add(script);
foreach (Object[] arr in (Object[])item[1])
{
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString, settings.UseUtc2NormalTime).ToString();
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = (ObjectType)Convert.ToInt32(arr[1]);
it.LogicalName = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString, settings.UseUtc2NormalTime).ToString();
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else //Read Xemex meter here.
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(((Object[])e.Value)[0]);
Scripts.Add(script);
Object[] arr = (Object[])((Object[])e.Value)[1];
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString, settings.UseUtc2NormalTime).ToString();
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = (ObjectType)Convert.ToInt32(arr[1]);
it.LogicalName = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString, settings.UseUtc2NormalTime).ToString();
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else
{
e.Error = ErrorCode.ReadWriteDenied;
}
}
void Init()
{
Media.OnReceived += new Gurux.Common.ReceivedEventHandler(OnReceived);
Media.OnClientConnected += new Gurux.Common.ClientConnectedEventHandler(OnClientConnected);
Media.OnClientDisconnected += new Gurux.Common.ClientDisconnectedEventHandler(OnClientDisconnected);
Media.OnError += new Gurux.Common.ErrorEventHandler(OnError);
Media.Open();
///////////////////////////////////////////////////////////////////////
//Add Logical Device Name. 123456 is meter serial number.
GXDLMSData ldn = new GXDLMSData("0.0.42.0.0.255");
ldn.Value = "Gurux123456";
//Set access right. Client can't change Device name.
ldn.SetAccess(2, AccessMode.Read);
//Value is get as Octet String.
ldn.SetDataType(2, DataType.OctetString);
ldn.SetUIDataType(2, DataType.String);
Items.Add(ldn);
//Add firmware version.
GXDLMSData fw = new GXDLMSData("1.0.0.2.0.255");
fw.Value = "Gurux FW 0.0.1";
Items.Add(fw);
//Add Last average.
GXDLMSRegister r = new GXDLMSRegister("1.1.21.25.0.255");
//Set access right. Client can't change average value.
r.SetAccess(2, AccessMode.Read);
Items.Add(r);
//Add default clock. Clock's Logical Name is 0.0.1.0.0.255.
GXDLMSClock clock = new GXDLMSClock();
clock.Begin = new GXDateTime(-1, 9, 1, -1, -1, -1, -1);
clock.End = new GXDateTime(-1, 3, 1, -1, -1, -1, -1);
clock.Deviation = 0;
Items.Add(clock);
//Add Tcp Udp setup. Default Logical Name is 0.0.25.0.0.255.
GXDLMSTcpUdpSetup tcp = new GXDLMSTcpUdpSetup();
Items.Add(tcp);
///////////////////////////////////////////////////////////////////////
//Add Load profile.
GXDLMSProfileGeneric pg = new GXDLMSProfileGeneric("1.0.99.1.0.255");
//Set capture period to 60 second.
pg.CapturePeriod = 60;
//Maximum row count.
pg.ProfileEntries = 100;
pg.SortMethod = SortMethod.FiFo;
pg.SortObject = clock;
//Add columns.
//Set saved attribute index.
pg.CaptureObjects.Add(new GXKeyValuePair<GXDLMSObject, GXDLMSCaptureObject>(clock, new GXDLMSCaptureObject(2, 0)));
//Set saved attribute index.
pg.CaptureObjects.Add(new GXKeyValuePair<GXDLMSObject, GXDLMSCaptureObject>(r, new GXDLMSCaptureObject(2, 0)));
Items.Add(pg);
//Add initial rows.
pg.Buffer.Add(new object[] { DateTime.Now, (int)10 });
///////////////////////////////////////////////////////////////////////
//Add Auto connect object.
GXDLMSAutoConnect ac = new GXDLMSAutoConnect();
ac.Mode = AutoConnectMode.AutoDiallingAllowedAnytime;
ac.Repetitions = 10;
ac.RepetitionDelay = 60;
//Calling is allowed between 1am to 6am.
ac.CallingWindow.Add(new KeyValuePair<GXDateTime, GXDateTime>(new GXDateTime(-1, -1, -1, 1, 0, 0, -1), new GXDateTime(-1, -1, -1, 6, 0, 0, -1)));
ac.Destinations = new string[] { "www.gurux.org" };
Items.Add(ac);
///////////////////////////////////////////////////////////////////////
//Add Activity Calendar object.
GXDLMSActivityCalendar activity = new GXDLMSActivityCalendar();
activity.CalendarNameActive = "Active";
activity.SeasonProfileActive = new GXDLMSSeasonProfile[] { new GXDLMSSeasonProfile("Summer time", new GXDateTime(-1, 3, 31, -1, -1, -1, -1), "") };
activity.WeekProfileTableActive = new GXDLMSWeekProfile[] { new GXDLMSWeekProfile("Monday", 1, 1, 1, 1, 1, 1, 1) };
activity.DayProfileTableActive = new GXDLMSDayProfile[] { new GXDLMSDayProfile(1, new GXDLMSDayProfileAction[] { new GXDLMSDayProfileAction(new GXDateTime(DateTime.Now), "test", 1) }) };
activity.CalendarNamePassive = "Passive";
activity.SeasonProfilePassive = new GXDLMSSeasonProfile[] { new GXDLMSSeasonProfile("Winter time", new GXDateTime(-1, 10, 30, -1, -1, -1, -1), "") };
activity.WeekProfileTablePassive = new GXDLMSWeekProfile[] { new GXDLMSWeekProfile("Tuesday", 1, 1, 1, 1, 1, 1, 1) };
activity.DayProfileTablePassive = new GXDLMSDayProfile[] { new GXDLMSDayProfile(1, new GXDLMSDayProfileAction[] { new GXDLMSDayProfileAction(new GXDateTime(DateTime.Now), "0.0.1.0.0.255", 1) }) };
activity.Time = new GXDateTime(DateTime.Now);
Items.Add(activity);
///////////////////////////////////////////////////////////////////////
//Add Optical Port Setup object.
GXDLMSIECOpticalPortSetup optical = new GXDLMSIECOpticalPortSetup();
optical.DefaultMode = OpticalProtocolMode.Default;
optical.ProposedBaudrate = BaudRate.Baudrate9600;
optical.DefaultBaudrate = BaudRate.Baudrate300;
optical.ResponseTime = LocalPortResponseTime.ms200;
optical.DeviceAddress = "Gurux";
optical.Password1 = "Gurux1";
optical.Password2 = "Gurux2";
optical.Password5 = "Gurux5";
Items.Add(optical);
///////////////////////////////////////////////////////////////////////
//Add Demand Register object.
GXDLMSDemandRegister dr = new GXDLMSDemandRegister();
dr.LogicalName = "0.0.1.0.0.255";
dr.CurrentAverageValue = (uint)10;
dr.LastAverageValue = (uint)20;
dr.Status = (byte)1;
dr.StartTimeCurrent = dr.CaptureTime = new GXDateTime(DateTime.Now);
dr.Period = 10;
dr.NumberOfPeriods = 1;
Items.Add(dr);
///////////////////////////////////////////////////////////////////////
//Add Register Monitor object.
GXDLMSRegisterMonitor rm = new GXDLMSRegisterMonitor();
rm.LogicalName = "0.0.1.0.0.255";
rm.Thresholds = new object[] { (int)0x1234, (int)0x5678 };
GXDLMSActionSet set = new GXDLMSActionSet();
set.ActionDown.LogicalName = rm.LogicalName;
set.ActionDown.ScriptSelector = 1;
set.ActionUp.LogicalName = rm.LogicalName;
set.ActionUp.ScriptSelector = 2;
rm.Actions = new GXDLMSActionSet[] {
set
};
rm.MonitoredValue.Update(r, 2);
Items.Add(rm);
///////////////////////////////////////////////////////////////////////
//Add Activate test mode Script table object.
GXDLMSScriptTable st = new GXDLMSScriptTable("0.1.10.1.101.255");
GXDLMSScript s = new GXDLMSScript();
s.Id = 1;
GXDLMSScriptAction a = new GXDLMSScriptAction();
a.Target = null;
s.Actions.Add(a);
st.Scripts.Add(s);
Items.Add(st);
///////////////////////////////////////////////////////////////////////
//Add action schedule object.
GXDLMSActionSchedule actionS = new GXDLMSActionSchedule();
actionS.LogicalName = "0.0.1.0.0.255";
actionS.Target = st;
actionS.ExecutedScriptSelector = 1;
actionS.Type = SingleActionScheduleType.SingleActionScheduleType1;
actionS.ExecutionTime = new GXDateTime[] { new GXDateTime(DateTime.Now) };
Items.Add(actionS);
///////////////////////////////////////////////////////////////////////
//Add SAP Assignment object.
GXDLMSSapAssignment sap = new GXDLMSSapAssignment();
sap.SapAssignmentList.Add(new KeyValuePair<UInt16, string>(1, "Gurux"));
sap.SapAssignmentList.Add(new KeyValuePair<UInt16, string>(16, "Gurux-2"));
Items.Add(sap);
///////////////////////////////////////////////////////////////////////
//Add Auto Answer object.
GXDLMSAutoAnswer aa = new GXDLMSAutoAnswer();
aa.Mode = AutoAnswerMode.Connected;
aa.ListeningWindow.Add(new KeyValuePair<GXDateTime, GXDateTime>(new GXDateTime(-1, -1, -1, 6, -1, -1, -1), new GXDateTime(-1, -1, -1, 8, -1, -1, -1)));
aa.Status = AutoAnswerStatus.Inactive;
aa.NumberOfCalls = 0;
aa.NumberOfRingsInListeningWindow = 1;
aa.NumberOfRingsOutListeningWindow = 2;
Items.Add(aa);
///////////////////////////////////////////////////////////////////////
//Add Modem Configuration object.
GXDLMSModemConfiguration mc = new GXDLMSModemConfiguration();
mc.CommunicationSpeed = BaudRate.Baudrate57600;
GXDLMSModemInitialisation init = new GXDLMSModemInitialisation();
init.Request = "AT";
init.Response = "OK";
init.Delay = 0;
mc.InitialisationStrings = new GXDLMSModemInitialisation[] { init };
Items.Add(mc);
///////////////////////////////////////////////////////////////////////
//Add Mac Address Setup object.
GXDLMSMacAddressSetup mac = new GXDLMSMacAddressSetup();
mac.MacAddress = "00:11:22:33:44:55:66";
Items.Add(mac);
///////////////////////////////////////////////////////////////////////
//Add Image transfer object.
GXDLMSImageTransfer i = new GXDLMSImageTransfer();
Items.Add(i);
///////////////////////////////////////////////////////////////////////
//Add IP4 Setup object.
GXDLMSIp4Setup ip4 = new GXDLMSIp4Setup();
//Get local IP address.
var host = Dns.GetHostEntry(Dns.GetHostName());
foreach (var ip in host.AddressList)
{
if (ip.AddressFamily == AddressFamily.InterNetwork)
{
ip4.IPAddress = ip.ToString();
}
}
Items.Add(ip4);
//Add Push Setup. (On Connectivity)
GXDLMSPushSetup push = new GXDLMSPushSetup("0.0.25.9.0.255");
//Send Push messages to this address as default.
push.Destination = ip4.IPAddress + ":7000";
Items.Add(push);
//Add push object itself. This is needed to tell structure of data to the Push listener.
push.PushObjectList.Add(new KeyValuePair<GXDLMSObject, GXDLMSCaptureObject>(push, new GXDLMSCaptureObject(2, 0)));
//Add logical device name.
push.PushObjectList.Add(new KeyValuePair<GXDLMSObject, GXDLMSCaptureObject>(ldn, new GXDLMSCaptureObject(2, 0)));
//Add .0.0.25.1.0.255 Ch. 0 IPv4 setup IP address.
push.PushObjectList.Add(new KeyValuePair<GXDLMSObject, GXDLMSCaptureObject>(ip4, new GXDLMSCaptureObject(3, 0)));
//Add S-FSK objects
Items.Add(new GXDLMSSFSKPhyMacSetUp());
Items.Add(new GXDLMSSFSKActiveInitiator());
Items.Add(new GXDLMSSFSKMacCounters());
Items.Add(new GXDLMSSFSKMacSynchronizationTimeouts());
//Add IEC14908 (OSGB) objects.
Items.Add(new GXDLMSIEC14908Diagnostic());
Items.Add(new GXDLMSIEC14908Identification());
Items.Add(new GXDLMSIEC14908PhysicalSetup());
Items.Add(new GXDLMSIEC14908PhysicalStatus());
///////////////////////////////////////////////////////////////////////
//Server must initialize after all objects are added.
Initialize();
}
void IGXDLMSBase.SetValue(GXDLMSSettings settings, ValueEventArgs e)
{
if (e.Index == 1)
{
if (e.Value is string)
{
LogicalName = e.Value.ToString();
}
else
{
LogicalName = GXDLMSClient.ChangeType((byte[])e.Value, DataType.OctetString).ToString();
}
}
else if (e.Index == 2)
{
Scripts.Clear();
//Fix Xemex bug here.
//Xemex meters do not return array as they shoul be according standard.
if (e.Value is Object[] && ((Object[])e.Value).Length != 0)
{
if (((Object[])e.Value)[0] is Object[])
{
foreach (Object[] item in (Object[])e.Value)
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(item[0]);
Scripts.Add(script);
foreach (Object[] arr in (Object[])item[1])
{
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString).ToString();
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = (ObjectType)Convert.ToInt32(arr[1]);
it.LogicalName = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString).ToString();
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else //Read Xemex meter here.
{
GXDLMSScript script = new GXDLMSScript();
script.Id = Convert.ToInt32(((Object[])e.Value)[0]);
Scripts.Add(script);
Object[] arr = (Object[])((Object[])e.Value)[1];
GXDLMSScriptAction it = new GXDLMSScriptAction();
it.Type = (ScriptActionType)Convert.ToInt32(arr[0]);
ObjectType ot = (ObjectType)Convert.ToInt32(arr[1]);
String ln = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString).ToString();
it.Target = settings.Objects.FindByLN(ot, ln);
if (it.Target == null)
{
#pragma warning disable CS0618
it.ObjectType = (ObjectType)Convert.ToInt32(arr[1]);
it.LogicalName = GXDLMSClient.ChangeType((byte[])arr[2], DataType.OctetString).ToString();
#pragma warning restore CS0618
}
it.Index = Convert.ToInt32(arr[3]);
it.Parameter = arr[4];
script.Actions.Add(it);
}
}
}
else
{
e.Error = ErrorCode.ReadWriteDenied;
}
}
