// private static void OnAnalogAddedEvent(object sender, EventArgs e)
private void OnAnalogAddedEvent(object sender, EventArgs e)
{
Console.WriteLine("OnAnalogEventAdded started");
Analog analog = (Analog)e;
IORequestBlock iorb = new IORequestBlock()
{
RequestType = RequestType.SEND,
ProcessControllerName = analog.ProcContrName
};
DBContext dbContext = new DBContext();
RTU rtu;
if ((rtu = dbContext.GetRTUByName(analog.ProcContrName)) != null)
{
iorb.ReqAddress = (ushort)rtu.GetCommandAddress(analog);
bool shouldCommand = false;
switch (rtu.Protocol)
{
case IndustryProtocols.ModbusTCP:
ModbusHandler mdbHandler = new ModbusHandler();
mdbHandler.Header = new ModbusApplicationHeader()
{
TransactionId = 0,
Length = 5,
ProtocolId = (ushort)IndustryProtocols.ModbusTCP,
DeviceAddress = rtu.Address
};
mdbHandler.Request = new WriteRequest()
{
StartAddr = (ushort)rtu.GetCommandAddress(analog)
};
if (shouldCommand = AnalogProcessor.InitialWorkPointAnalog(analog))
{
mdbHandler.Request.FunCode = FunctionCodes.WriteSingleRegister;
AnalogProcessor.EGUToRawValue(analog);
((WriteRequest)mdbHandler.Request).Value = analog.RawCommValue;
iorb.SendBuff = mdbHandler.PackData();
iorb.SendMsgLength = iorb.SendBuff.Length;
Console.WriteLine(BitConverter.ToString(iorb.SendBuff, 0, 12));
IORequests.EnqueueRequest(iorb);
analog.IsInit = true;
}
break;
}
}
Console.WriteLine("OnAnalogEventAdded finished");
}
/// <summary>
/// Send Commands to simulator, to make its state consistent with RTDB
/// </summary>
public void InitializeSimulator()
{
List <ProcessVariable> pvs = dbContext.GetAllProcessVariables();
if (pvs.Count != 0)
{
foreach (ProcessVariable pv in pvs)
{
IORequestBlock iorb = new IORequestBlock()
{
RequestType = RequestType.SEND,
ProcessControllerName = pv.ProcContrName
};
RTU rtu;
if ((rtu = dbContext.GetRTUByName(pv.ProcContrName)) != null)
{
iorb.ReqAddress = (ushort)rtu.GetCommandAddress(pv);
bool shouldCommand = false;
switch (rtu.Protocol)
{
case IndustryProtocols.ModbusTCP:
ModbusHandler mdbHandler = new ModbusHandler();
mdbHandler.Header = new ModbusApplicationHeader()
{
TransactionId = 0,
Length = 5,
ProtocolId = (ushort)IndustryProtocols.ModbusTCP,
DeviceAddress = rtu.Address
};
mdbHandler.Request = new WriteRequest()
{
StartAddr = (ushort)rtu.GetCommandAddress(pv)
};
switch (pv.Type)
{
// initialy, on simulator all digitals are set to 0 -> closed state
case VariableTypes.DIGITAL:
Digital digital = (Digital)pv;
CommandTypes comm;
if (shouldCommand = CommandValidator.InitialCommandingForDigital(digital, out comm))
{
mdbHandler.Request.FunCode = FunctionCodes.WriteSingleCoil;
((WriteRequest)mdbHandler.Request).Value = (ushort)comm;
}
break;
case VariableTypes.ANALOG:
Analog analog = (Analog)pv;
if (shouldCommand = AnalogProcessor.InitialWorkPointAnalog(analog))
{
mdbHandler.Request.FunCode = FunctionCodes.WriteSingleRegister;
((WriteRequest)mdbHandler.Request).Value = (ushort)analog.RawCommValue;
}
analog.IsInit = true;
break;
case VariableTypes.COUNTER:
Counter counter = (Counter)pv;
break;
}
if (shouldCommand)
{
iorb.SendBuff = mdbHandler.PackData();
iorb.SendMsgLength = iorb.SendBuff.Length;
if (pv.Name == "MEAS_AN_1")
{
Console.WriteLine(BitConverter.ToString(iorb.SendBuff, 0, 12));
}
}
break;
}
if (shouldCommand)
{
IORequests.EnqueueRequest(iorb);
}
}
else
{
// izbrisati omdah te procesne varijable sa rtu-om tog imena?
Console.WriteLine("Invalid config: ProcContrName = {0} does not exists.", pv.ProcContrName);
continue;
}
}
}
}
// napravila, ali nisam testirala do kraja, to je nekad za buducnost, svakako ne treba sad :)
public OMSSCADACommon.Responses.Response WriteSingleAnalog(string id, float value)
{
Console.WriteLine("WriteSingleAnalog!");
Analog analog = null;
OMSSCADACommon.Responses.Response response = new OMSSCADACommon.Responses.Response();
// to do:
//while (!Database.IsConfigurationRunning)
// Thread.Sleep(100);
// getting PV from db
ProcessVariable pv;
if (dbContext.GetProcessVariableByName(id, out pv))
{
analog = (Analog)pv;
}
// does this ID exist in the database
if (analog == null)
{
response.ResultMessage = ResultMessage.INVALID_ID;
return(response);
}
// to do:
// ovde provera opsega, alarma...bla, bla
RTU rtu;
if ((rtu = dbContext.GetRTUByName(analog.ProcContrName)) != null)
{
IORequestBlock iorb = new IORequestBlock()
{
RequestType = RequestType.SEND,
ProcessControllerName = analog.ProcContrName
};
iorb.ReqAddress = (ushort)rtu.GetCommandAddress(analog);
bool shouldCommand = false;
switch (rtu.Protocol)
{
case IndustryProtocols.ModbusTCP:
ModbusHandler mdbHandler = new ModbusHandler
{
Header = new ModbusApplicationHeader()
{
TransactionId = 0,
Length = 5,
ProtocolId = (ushort)IndustryProtocols.ModbusTCP,
DeviceAddress = rtu.Address
},
Request = new WriteRequest()
{
FunCode = FunctionCodes.WriteSingleCoil,
StartAddr = (ushort)rtu.GetCommandAddress(analog)
}
};
if (shouldCommand = AnalogProcessor.SetNewWorkPoint(analog, value))
{
mdbHandler.Request.FunCode = FunctionCodes.WriteSingleRegister;
((WriteRequest)mdbHandler.Request).Value = (ushort)analog.RawCommValue;
}
iorb.SendBuff = mdbHandler.PackData();
iorb.SendMsgLength = iorb.SendBuff.Length;
break;
}
IORequests.EnqueueRequest(iorb);
Console.WriteLine("enqued {0}", BitConverter.ToString(iorb.SendBuff, 0, 12));
response.ResultMessage = ResultMessage.OK;
}
else
{
// rtu does not exist
}
return(response);
}
/// <summary>
/// Processing answers from Simulator - Process Controller
/// </summary>
public void ProcessPCAnwers()
{
while (!isShutdown)
{
bool isSuccessful;
IORequestBlock answer = IORequests.DequeueAnswer(out isSuccessful);
if (isSuccessful)
{
RTU rtu;
// sporno
//while (!Database.IsConfigurationRunning)
// Thread.Sleep(100);
if ((rtu = dbContext.GetRTUByName(answer.ProcessControllerName)) != null)
{
switch (rtu.Protocol)
{
case IndustryProtocols.ModbusTCP:
ModbusHandler mdbHandler = new ModbusHandler();
mdbHandler.UnpackData(answer.RcvBuff, answer.RcvMsgLength);
switch (mdbHandler.Response.FunCode)
{
case FunctionCodes.ReadDiscreteInput:
{
BitReadResponse response = (BitReadResponse)mdbHandler.Response;
ProcessVariable pv;
Digital target = null;
if (rtu.GetProcessVariableByAddress(answer.ReqAddress, out pv))
{
target = (Digital)pv;
}
if (target != null)
{
int[] array = new int[1];
response.BitValues.CopyTo(array, 0);
try
{
if (target.State != target.ValidStates[array[0]])
{
Console.WriteLine("CHANGE!");
target.State = target.ValidStates[array[0]];
ScadaModelParser parser = new ScadaModelParser();
parser.SerializeScadaModel();
DMSClient dMSClient = new DMSClient();
dMSClient.ChangeOnSCADA(target.Name, target.State);
}
}
catch
{
// Console.WriteLine("Digital variable {0}, state: INVALID", target.Name);
}
}
}
break;
case FunctionCodes.ReadInputRegisters:
{
RegisterReadResponse response = (RegisterReadResponse)mdbHandler.Response;
ProcessVariable pv;
Analog target = null;
// i ovde se zapravo cita iz baze! preko RTUa. znaci pristupamo rtuu, a moguce je da se desava rekonfiguracija.
if (rtu.GetProcessVariableByAddress(answer.ReqAddress, out pv))
{
target = (Analog)pv;
}
if (target != null)
{
ushort newRawAcqValue = response.RegValues[0];
try
{
float newAcqValue;
AnalogProcessor.RawValueToEGU(target, newRawAcqValue, out newAcqValue);
// videti kad menjas kommande
if (target.AcqValue != newAcqValue)
{
Console.WriteLine("CHANGE analog!");
target.RawAcqValue = newRawAcqValue;
target.AcqValue = newAcqValue;
ScadaModelParser parser = new ScadaModelParser();
parser.SerializeScadaModel();
DMSClient dMSClient = new DMSClient();
// to do
// dMSClient.ChangeOnSCADA(target.Name, target.State);
}
}
catch
{
// Console.WriteLine("Digital variable {0}, state: INVALID", target.Name);
}
}
}
break;
}
break;
}
}
else
{
Console.WriteLine("Answer disposed. Process Controller with name ={0} does not exit.", answer.ProcessControllerName);
}
}
Thread.Sleep(100);
}
Console.WriteLine("ProcessPCAnswers.shutdown=true");
return;
}
