void TNDLinkEstablished(TNDLink theLink)
{
if (InvokeRequired)
{
// We're not in the UI thread, so we need to call BeginInvoke
BeginInvoke(new TNDLink.TNDLinkEstablishedDelegate(TNDLinkEstablished), new object[] { theLink });
return;
}
this.Text = mTNDLink.Name + " connected";
this.BackColor = Color.Green;
this.Visible = false;
}
void TNDLinkDisabled(TNDLink theLink)
{
if (InvokeRequired)
{
// We're not in the UI thread, so we need to call BeginInvoke
BeginInvoke(new TNDLink.TNDLinkDisabledDelegate(TNDLinkDisabled), new object[] { theLink });
return;
}
this.Text = mTNDLink.Name + " disabled";
this.BackColor = Color.Yellow;
this.Visible = true;
}
void TNDLinkLost(TNDLink theLink)
{
if (InvokeRequired)
{
// We're not in the UI thread, so we need to call BeginInvoke
BeginInvoke(new TNDLink.TNDLinkLostDelegate(TNDLinkLost), new object[] { theLink });
return;
}
this.Text = mTNDLink.Name + " DOWN";
this.BackColor = Color.Red;
this.Visible = true;
}
public TNDConnectionStatusIndicator(TNDLink theConnectionObject)
{
mTNDLink = theConnectionObject;
mTNDLink.TNDLinkEstablished += new TNDLink.TNDLinkEstablishedDelegate(TNDLinkEstablished);
mTNDLink.TNDLinkDisabled += new TNDLink.TNDLinkDisabledDelegate(TNDLinkDisabled);
mTNDLink.TNDLinkLost += new TNDLink.TNDLinkLostDelegate(TNDLinkLost);
this.Click += new EventHandler(OnClick);
this.AutoSize = true;
TNDLinkDisabled(mTNDLink);
}
protected override void mPollTimer_Elapsed(object sender, System.Timers.ElapsedEventArgs eventArgs)
{
mPollTimer.Enabled = false;
mTimeoutTimer.Enabled = true;
mStarted = DateTime.Now;
if (Project().FullyInitialized)
{
mTimeoutStateIndicator = "Starting Poll";
try
{
mTimeoutStateIndicator = "Entering lock";
// lock (masterListLock)
using (TimedLock.Lock(masterListLock))
{
mTimeoutStateIndicator = "Checking if tag list dirty";
mGotLock = DateTime.Now;
mLockAttainment.NewPeriod(mStarted, mGotLock);
if (mTagListDirty)
{
// start with an empty tag list
mTimeoutStateIndicator = "Clearing tag list";
mReadRequestsInTagList.Clear();
int result = axTndNTag.ClearTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem clearing tag list. code=" + result);
HandleLostConnection();
return;
}
// build list
mTimeoutStateIndicator = "starting tag list";
result = axTndNTag.StartTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem initiating tag list. code=" + result);
HandleLostConnection();
return;
}
mTimeoutStateIndicator = "sorting read requests";
mReadRequests_all.Sort(ReadRequestSorter.Singleton);
mTimeoutStateIndicator = "building tag list";
TNDReadRequest lastReq = null;
foreach (TNDReadRequest req in mReadRequests_all)
{
if (req.Active)
{
// only add unique ones to the taglist...the requests should be shorted by Type & Index
if (lastReq == null || req.TNDDataTypeAsShort() != lastReq.TNDDataTypeAsShort() || req.TNDDataViewIndex != lastReq.TNDDataViewIndex)
{
result = axTndNTag.AddToTagList(req.TNDDataTypeAsShort(), req.TNDDataViewIndex, "");
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: adding to tag list. code=" + result + " type=" + req.TNDDataTypeAsShort() + " index=" + req.TNDDataViewIndex);
HandleLostConnection();
return;
}
}
mReadRequestsInTagList.Add(req);
lastReq = req;
}
}
mTimeoutStateIndicator = "ending tag list";
result = axTndNTag.EndTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem closing tag list. code=" + result);
HandleLostConnection();
return;
}
mTagListDirty = false;
mTagListUpdated = DateTime.Now;
mTagListUpdate.NewPeriod(mGotLock, mTagListUpdated);
}
mTimeoutStateIndicator = "exit lock";
if (mReadRequestsInTagList.Count > 0)
{
mTimeoutStateIndicator = "starting read";
mStartRead = DateTime.Now;
int result = -99911999;
try
{
result = axTndNTag.Read();
}
catch (COMException comException)
{
mProject.Window().logMessage("ERROR: COM Exception during TND read attempt. code=" + comException.ErrorCode + " msg=" + comException.Message);
}
catch (Exception exception)
{
mProject.Window().logMessage("ERROR: Exception during TND read attempt. msg=" + exception.Message);
}
mValuesRead = DateTime.Now;
mValuesRetrieval.NewPeriod(mStartRead, mValuesRead);
if (result == TNDLink.ThinkAndDoSuccess)
{
mTimeoutStateIndicator = "finished read successfully";
short requestIndex = 0;
TNDReadRequest lastReq = null;
object valueFromTND = null;
foreach (TNDReadRequest req in mReadRequestsInTagList)
{
mTimeoutStateIndicator = "processing value " + requestIndex + " of " + mReadRequestsInTagList.Count + ": " + req.TNDDataType + " " + req.TNDDataViewIndex;
if (lastReq == null || req.TNDDataTypeAsShort() != lastReq.TNDDataTypeAsShort() || req.TNDDataViewIndex != lastReq.TNDDataViewIndex)
{
valueFromTND = axTndNTag.GetValueAt(requestIndex);
mTimeoutStateIndicator = "got value";
if (valueFromTND == null)
{
Project().Window().logMessageWithFlush("ERROR: value from TND is null; index=" + requestIndex + " taglist size=" + mReadRequestsInTagList.Count + " unique requests=" + mReadRequests_all.Count + " dirty=" + mTagListDirty);
}
requestIndex++;
}
if (valueFromTND != null)
{
mTimeoutStateIndicator = "going to handler";
req.HandleValue(valueFromTND);
}
mTimeoutStateIndicator = "finished processing value " + requestIndex;
lastReq = req;
}
mValuesHandled = DateTime.Now;
mValuesHandling.NewPeriod(mValuesRead, mValuesHandled);
}
else
{
mTimeoutStateIndicator = "finished read with ERRORS";
if (result != lastResult)
{
mProject.Window().logMessage("ERROR: TND Read failed for '" + Name + "': " + TNDLink.GetTNDResultMessage(result));
}
HandleLostConnection();
}
lastResult = result;
}
} // end thread lock
}
catch (Exception e)
{
mProject.Window().logMessage("ERROR: Exception in TND Reader " + Name + "; msg=" + e.Message + Environment.NewLine + e.StackTrace);
}
}
if (Connected)
{
mTimeoutStateIndicator = "restarting poll timer";
mPollTimer.Enabled = true;
}
mTimeoutStateIndicator = "poll completed";
mTimeoutTimer.Enabled = false;
}
protected override void mPollTimer_Elapsed(object sender, System.Timers.ElapsedEventArgs eventArgs)
{
mPollTimer.Enabled = false;
mTimeoutTimer.Enabled = true;
mStarted = DateTime.Now;
if (Project().FullyInitialized)
{
mNumberOfSums++;
DateTime now = DateTime.Now;
if (mNumberOfSums > 1) //ignore the first one (==1) since mLastPollTime won't be init'ed
{
TimeSpan period = now - mLastPollTime;
int periodInMS = (int)period.TotalMilliseconds;
if (periodInMS < mMinPeriodBetweenPolls)
{
mMinPeriodBetweenPolls = periodInMS;
}
if (periodInMS > mMaxPeriodBetweenPolls)
{
mMaxPeriodBetweenPolls = periodInMS;
}
mSumPeriodBetweenPolls += periodInMS;
mAveragePeriodBetweenPolls = (int)(mSumPeriodBetweenPolls / (mNumberOfSums - 1));
}
mLastPollTime = now;
mTimeoutStateIndicator = "Starting Poll";
try
{
mTimeoutStateIndicator = "Entering lock";
// lock (masterListLock)
using (TimedLock.Lock(masterListLock))
{
mTimeoutStateIndicator = "Checking if tag list dirty";
mGotLock = DateTime.Now;
mLockAttainment.NewPeriod(mStarted, mGotLock);
if (mTagListDirty)
{
// mProject.Window().logMessage(Name + " updating tag list " + mWriteRequestsInTagList.Count + " " + mWriteRequests_all.Count);
// start with an empty tag list
mTimeoutStateIndicator = "Clearing tag list";
mWriteRequestsInTagList.Clear();
int result = axTndNTag.ClearTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem clearing tag list. code=" + result);
HandleLostConnection();
return;
}
// build list
mTimeoutStateIndicator = "starting tag list";
result = axTndNTag.StartTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem initiating tag list. code=" + result);
HandleLostConnection();
return;
}
mTimeoutStateIndicator = "building tag list";
foreach (TNDWriteRequest req in mWriteRequests_all)
{
if (req.Active)
{
result = axTndNTag.AddToTagList(req.TNDDataTypeAsShort(), req.TNDDataViewIndex, "");
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: adding to tag list. code=" + result + " type=" + req.TNDDataTypeAsShort() + " index=" + req.TNDDataViewIndex);
HandleLostConnection();
return;
}
mWriteRequestsInTagList.Add(req);
}
}
mTimeoutStateIndicator = "ending tag list";
result = axTndNTag.EndTagList();
if (result != ThinkAndDoSuccess)
{
mProject.Window().logMessage("ERROR: problem closing tag list. code=" + result);
HandleLostConnection();
return;
}
mTagListDirty = false;
mTagListUpdated = DateTime.Now;
mTagListUpdate.NewPeriod(mGotLock, mTagListUpdated);
// mProject.Window().logMessage(Name + " tag list update complete " + mWriteRequestsInTagList.Count + " " + mWriteRequests_all.Count);
}
mTimeoutStateIndicator = "exit lock";
} // end thread lock
if (mWriteRequestsInTagList.Count > 0)
{
mTimeoutStateIndicator = "starting write; updating values";
mStartWrite = DateTime.Now;
mNumberOfWrites++;
if (mWriteRequestsInTagList.Count > mMaxValuesPerWrite)
{
mMaxValuesPerWrite = mWriteRequestsInTagList.Count;
}
// mProject.Window().logMessage(Name + " writing " + mWriteRequestsInTagList.Count + " values");
int result = -99911999;
short requestIndex = 0;
foreach (TNDWriteRequest req in mWriteRequestsInTagList)
{
//object valueToWrite = req.GetValueAsObject();
//axTndNTag.UpdatVariantValue(requestIndex, ref valueToWrite);
int valueToWrite = (int)req.GetValueAsLong();
axTndNTag.UpdateLongValue(requestIndex, valueToWrite);
//object valAsObject = valueToWrite;
//axTndNTag.UpdateVariantVal(requestIndex, ref valAsObject);
requestIndex++;
}
mTimeoutStateIndicator = "starting write";
mValuesUpdated = DateTime.Now;
mValuesUpdate.NewPeriod(mStartWrite, mValuesUpdated);
try
{
result = axTndNTag.Write();
}
catch (COMException comException)
{
mProject.Window().logMessageWithFlush("ERROR: COM Exception during TND write attempt. code=" + comException.ErrorCode + " msg=" + comException.Message);
}
catch (Exception exception)
{
mProject.Window().logMessageWithFlush("ERROR: Exception during TND write attempt. msg=" + exception.Message);
}
mValueSent = DateTime.Now;
mValueSending.NewPeriod(mValuesUpdated, mValueSent);
if (result == TNDLink.ThinkAndDoSuccess)
{
mTimeoutStateIndicator = "finished write successfully";
foreach (TNDWriteRequest req in mWriteRequestsInTagList)
{
if (req.IsOneTimeWrite())
{
req.Active = false;
}
}
mRequestsCleanedUp = DateTime.Now;
mRequestCleanup.NewPeriod(mValueSent, mRequestsCleanedUp);
}
else
{
mTimeoutStateIndicator = "finished write WITH ERRORS";
if (result != lastResult)
{
mProject.Window().logMessage("ERROR: TND write failed for '" + Name + "': " + TNDLink.GetTNDResultMessage(result));
}
HandleLostConnection();
}
lastResult = result;
// mProject.Window().logMessage(Name + " finished writing");
}
}
catch (Exception e)
{
mProject.Window().logMessage("ERROR: Exception in TND Writer " + Name + "; msg=" + e.Message);
}
}
if (Connected)
{
mTimeoutStateIndicator = "restarting poll timer";
mPollTimer.Enabled = true;
}
mTimeoutStateIndicator = "poll completed";
mTimeoutTimer.Enabled = false;
}
protected void ConnectToRuntime()
{
mPollTimer.Enabled = false;
if (!mConnectionInitialized)
{
throw new ArgumentException("ConnectToRuntime was called before the connection was initialized. How did that happen?");
}
// disconnect just in case (we could rely on mConnected, but in an unusual connection failure, there could potentially be some resources allocated inside TND's code even though I don't set mConnected)
axTndNTag.Disconnect();
if (axTndNTag.ThinkAndDoStationName != mStationName.Trim())
{
axTndNTag.ThinkAndDoStationName = mStationName.Trim();
}
int nrc = -99933999;
try
{
nrc = axTndNTag.Connect();
}
catch (COMException e)
{
mProject.Window().logMessageWithFlush("ERROR: COM Exception during TND connect attempt. code=" + e.ErrorCode + " msg=" + e.Message);
}
catch (Exception e)
{
mProject.Window().logMessageWithFlush("ERROR: Exception during TND connect attempt. msg=" + e.Message);
}
if (nrc == TNDLink.ThinkAndDoSuccess)
{
mProject.Window().logMessage("TND Link Connection Established for '" + Name + "'");
FireTNDLinkEstablished();
mConnected = true;
mPollTimer.Enabled = true;
}
else
{
if (mAttemptingReconnect)
{
//mProject.Window().logMessage("Reconnect failed: " + GetTNDResultMessage(nrc));
}
else
{
mProject.Window().logMessage("Connection attempt failed for '" + Name + "': " + TNDLink.GetTNDResultMessage(nrc));
if (mAutoReconnectEnabled)
{
mAttemptingReconnect = true;
mReconnectTimer.Enabled = true;
mProject.Window().logMessage("Auto reconnect initiated");
}
}
}
}
