// This process watches (via change stream) for commands inserted to a commands collection
// When the command is considered valid it is forwarded to the RTU
static async void ProcessMongoCmd(JSONSCADAConfig jsConfig)
{
do
{
try
{
var Client = ConnectMongoClient(jsConfig);
var DB = Client.GetDatabase(jsConfig.mongoDatabaseName);
var collection =
DB
.GetCollection
<rtCommand>(CommandsQueueCollectionName);
bool isMongoLive =
DB
.RunCommandAsync((Command <BsonDocument>) "{ping:1}")
.Wait(1000);
if (!isMongoLive)
{
throw new Exception("Error on connection " + jsConfig.mongoConnectionString);
}
Log("MongoDB CMD CS - Start listening for commands via changestream...");
var filter = "{ operationType: 'insert' }";
var pipeline =
new EmptyPipelineDefinition <ChangeStreamDocument <rtCommand
>
>().Match(filter);
using (var cursor = await collection.WatchAsync(pipeline))
{
await cursor
.ForEachAsync(async change =>
{
if (!Active)
{
return;
}
// process change event, only process inserts
if (
change.OperationType ==
ChangeStreamOperationType.Insert
)
{
// consider only commands for this driver
{
Log("MongoDB CMD CS - Looking for connection " +
change
.FullDocument
.protocolSourceConnectionNumber +
"...");
var found = false;
foreach (IEC10X_connection
srv
in
IEC10Xconns
)
{
if (
srv.protocolConnectionNumber ==
change
.FullDocument
.protocolSourceConnectionNumber
)
{
found = true;
if (
srv.connection.IsRunning &&
srv.commandsEnabled
)
{
InformationObject sc =
BuildInfoObj(System
.Convert
.ToInt32(change
.FullDocument
.protocolSourceASDU),
System
.Convert
.ToInt32(change
.FullDocument
.protocolSourceObjectAddress),
System
.Convert
.ToDouble(change
.FullDocument
.value),
System
.Convert
.ToBoolean(change
.FullDocument
.protocolSourceCommandUseSBO),
System
.Convert
.ToByte(change
.FullDocument
.protocolSourceCommandDuration));
if (sc != null)
{
if (
DateTime
.Now
.ToLocalTime()
.Subtract(change
.FullDocument
.timeTag
.ToLocalTime(
))
.Seconds <
10
)
{
// execute
srv
.connection
.SendControlCommand(CauseOfTransmission
.ACTIVATION,
System
.Convert
.ToInt32(change
.FullDocument
.protocolSourceCommonAddress),
sc);
Log("MongoDB CMD CS - " +
srv.name +
" - " +
sc.ToString() +
" OA " +
change
.FullDocument
.protocolSourceObjectAddress +
" Delivered");
// update as delivered
var filter =
new BsonDocument(new BsonDocument("_id",
change
.FullDocument
.id));
var update =
new BsonDocument("$set",
new BsonDocument("delivered",
true));
var result =
await collection
.UpdateOneAsync(filter,
update);
}
else
{
// update as expired
Log("MongoDB CMD CS - " +
srv.name +
" - " +
sc.ToString() +
" OA " +
change
.FullDocument
.protocolSourceObjectAddress +
" value " +
change
.FullDocument
.value +
" Expired");
var filter =
new BsonDocument(new BsonDocument("_id",
change
.FullDocument
.id));
var update =
new BsonDocument("$set",
new BsonDocument("cancelReason",
"expired"));
var result =
await collection
.UpdateOneAsync(filter,
update);
}
}
else
{
// update as canceled (asdu not implemented)
Log("MongoDB CMD CS - " +
srv.name +
" - " +
" OA " +
change
.FullDocument
.protocolSourceObjectAddress +
" value " +
change
.FullDocument
.value +
" ASDU Not Implemented");
var filter =
new BsonDocument(new BsonDocument("_id",
change
.FullDocument
.id));
var update =
new BsonDocument("$set",
new BsonDocument("cancelReason",
"asdu not implemented"));
var result =
await collection
.UpdateOneAsync(filter,
update);
}
}
else
{
// update as canceled (not connected)
Log("MongoDB CMD CS - " +
srv.name +
" OA " +
change
.FullDocument
.protocolSourceObjectAddress +
" value " +
change.FullDocument.value +
(
srv.commandsEnabled
? " Not Connected"
: " Commands Disabled"
));
var filter =
new BsonDocument(new BsonDocument("_id",
change
.FullDocument
.id));
var update =
new BsonDocument("$set",
new BsonDocument("cancelReason",
(
srv
.commandsEnabled
? "not connected"
: "commands disabled"
)));
var result =
await collection
.UpdateOneAsync(filter,
update);
}
break;
}
}
if (!found)
{
// update as canceled command (not found)
Log("MongoDB CMD CS - " +
change
.FullDocument
.protocolSourceConnectionNumber
.ToString() +
" OA " +
change
.FullDocument
.protocolSourceObjectAddress +
" value " +
change.FullDocument.value +
" Not Found");
var filter =
new BsonDocument(new BsonDocument("_id",
change
.FullDocument
.id));
var update =
new BsonDocument("$set",
new BsonDocument("cancelReason",
"connection not found"));
var result =
await collection
.UpdateOneAsync(filter,
update);
}
}
}
});
}
}
catch (Exception e)
{
Log("Exception MongoCmd");
Log(e);
Log(e
.ToString()
.Substring(0,
e.ToString().IndexOf(Environment.NewLine)));
System.Threading.Thread.Sleep(3000);
}
}while (true);
}
