Bringing repo up to date with thomas-v2

src/S7CommPlusDriver/Alarming/BrowseAlarms.cs

@@ -332,6 +332,74 @@ private void GetTexts(byte[] tloa_1, byte[] tloa_2, byte[] tloa_3, byte[] tlsa,
                 }
             }
         }
+
+        /// <summary>
+        /// Reads the active program alarms from the Plc (single poll).
+        /// 
+        /// Call example:
+        /// CultureInfo ci = new CultureInfo("de-DE");
+        /// var alarmList = new List<AlarmsDai>();
+        /// conn.GetActiveAlarms(out alarmList, ci.LCID);
+        /// foreach (var a in alarmList)
+        /// {
+        ///     Console.WriteLine(a.ToString());
+        /// }
+        /// </summary>
+        /// <param name="alarmList">Contains the alarms, empty if there is no active alarm</param>
+        /// <param name="languageId">Language id for retrieving the text entries, use language code e.g. 1031 for german</param>
+        /// <returns>0 on success</returns>
+        public int GetActiveAlarms(out List<AlarmsDai> alarmList, int languageId)
+        {
+            int res;
+
+            alarmList = new List<AlarmsDai>();
+
+            var exploreReq = new ExploreRequest(ProtocolVersion.V2);
+            exploreReq.ExploreId = Ids.NativeObjects_theAlarmSubsystem_Rid;
+            exploreReq.ExploreRequestId = Ids.AlarmSubsystem_itsUpdateRelevantDAI;
+            exploreReq.ExploreChildsRecursive = 1;
+            exploreReq.ExploreParents = 0;
+
+            // Add the requestes attributes.
+            // Request the same attributes we get from an alarm notification, so we can reuse other methods.
+            exploreReq.AddressList.Add(Ids.DAI_CPUAlarmID);
+            exploreReq.AddressList.Add(Ids.DAI_AllStatesInfo);
+            exploreReq.AddressList.Add(Ids.DAI_AlarmDomain);
+            exploreReq.AddressList.Add(Ids.DAI_Coming);
+            exploreReq.AddressList.Add(Ids.DAI_Going);
+            exploreReq.AddressList.Add(Ids.DAI_MessageType);
+            exploreReq.AddressList.Add(Ids.DAI_HmiInfo);
+            // Extra ones which we only need for compatibility with notification.
+            exploreReq.AddressList.Add(Ids.ObjectVariableTypeName);
+            exploreReq.AddressList.Add(Ids.DAI_SequenceCounter);
+            exploreReq.AddressList.Add(Ids.DAI_AlarmTexts_Rid);
+
+            res = SendS7plusFunctionObject(exploreReq);
+            if (res != 0)
+            {
+                return res;
+            }
+            m_LastError = 0;
+            WaitForNewS7plusReceived(m_ReadTimeout);
+            if (m_LastError != 0)
+            {
+                return m_LastError;
+            }
+
+            var exploreRes = ExploreResponse.DeserializeFromPdu(m_ReceivedPDU, true);
+            res = checkResponseWithIntegrity(exploreReq, exploreRes);
+            if (res != 0)
+            {
+                return res;
+            }
+
+            foreach (var obj in exploreRes.Objects)
+            {
+                alarmList.Add(AlarmsDai.FromNotificationObject(obj, languageId));
+            }
+
+            return 0;
+        }
     }
 
     public class AlarmData