Bring XmlParsing in line with hapi

* Port `hapi` version of `XMLParser` and `DefaultXMLParser` - `nHapi` versions of these were years behind `hapi`.
* Keep old implementations as `LegacyXMLParser` and `LegacyDefaultXMLParser` for people or depend on old imperfect behaviour
* Add Unit tests for changes
* Fix some code styling warnings
* Improve XML Documentation
* Update some Nuget packages
* Unblocks #308
* Closes some Dependabot pull requests

Author: milkshakeuk

src/NHapi.Base/Model/AbstractGroup.cs

@@ -42,16 +42,11 @@ namespace NHapi.Base.Model
     /// </author>
     public abstract class AbstractGroup : IGroup
     {
-        private static readonly IHapiLog Log;
+        private static readonly IHapiLog Log = HapiLogFactory.GetHapiLog(typeof(AbstractGroup));
 
         private readonly IModelClassFactory myFactory;
         private List<AbstractGroupItem> items;
 
-        static AbstractGroup()
-        {
-            Log = HapiLogFactory.GetHapiLog(typeof(AbstractGroup));
-        }
-
         /// <summary> This constructor should be used by implementing classes that do not
         /// also implement Message.
         ///
@@ -527,7 +522,7 @@ private IStructure TryToInstantiateStructure(Type c, string name)
                         var argClasses = new[] { typeof(IGroup), typeof(IModelClassFactory) };
                         var argObjects = new object[] { this, myFactory };
                         var con = c.GetConstructor(argClasses);
-                        o = con.Invoke(argObjects);
+                        o = con?.Invoke(argObjects);
                     }
                     catch (MethodAccessException)
                     {

src/NHapi.Base/Model/AbstractPrimitive.cs

@@ -56,10 +56,10 @@ public AbstractPrimitive(IMessage message, string description)
         {
         }
 
-        /// <summary> Sets the value of this Primitive, first performing validation as specified
-        /// by. <code>getMessage().getValidationContext()</code>.  No validation is performed
-        /// if getMessage() returns null.
-        ///
+        /// <summary>
+        /// Sets the value of this Primitive, first performing validation as specified
+        /// by. <see cref="AbstractMessage.ValidationContext">Message.ValidationContext</see>
+        /// No validation is performed if <see cref="AbstractType.Message"/> returns null.
         /// </summary>
         public virtual string Value
         {

src/NHapi.Base/Model/GenericComposite.cs

@@ -1,6 +1,7 @@
 namespace NHapi.Base.Model
 {
     using System.Collections;
+    using System.Collections.Generic;
 
     /// <summary>
     /// An unspecified Composite datatype that has an undefined number of components, each
@@ -11,7 +12,7 @@ namespace NHapi.Base.Model
     /// <author>Bryan Tripp.</author>
     public class GenericComposite : AbstractType, IComposite
     {
-        private readonly ArrayList components;
+        private readonly List<IType> components;
 
         /// <summary>
         /// Creates a new instance of GenericComposite.
@@ -30,25 +31,13 @@ public GenericComposite(IMessage theMessage)
         public GenericComposite(IMessage theMessage, string description)
             : base(theMessage, description)
         {
-            components = new ArrayList(20);
+            components = new List<IType>(20);
         }
 
         /// <summary>
         /// Returns an array containing the components of this field.
         /// </summary>
-        public virtual IType[] Components
-        {
-            get
-            {
-                var ret = new IType[components.Count];
-                for (var i = 0; i < ret.Length; i++)
-                {
-                    ret[i] = (IType)components[i];
-                }
-
-                return ret;
-            }
-        }
+        public virtual IType[] Components => components.ToArray();
 
         /// <summary>
         /// Returns the name of the type (used in XML encoding and profile checking).
@@ -68,7 +57,7 @@ public virtual IType this[int index]
                     components.Add(new Varies(Message));
                 }
 
-                return (IType)components[index];
+                return components[index];
             }
         }
     }

src/NHapi.Base/Model/Primitive/CommonTM.cs

@@ -151,15 +151,11 @@ public virtual string Value
                 {
                     // check to see if any of the following characters exist: "." or "+/-"
                     // this will help us determine the acceptable lengths
-                    var d = value.IndexOf(".");
-                    var sp = value.IndexOf("+");
-                    var sm = value.IndexOf("-");
+                    var d = value.IndexOf(".", StringComparison.Ordinal);
+                    var sp = value.IndexOf("+", StringComparison.Ordinal);
+                    var sm = value.IndexOf("-", StringComparison.Ordinal);
                     var indexOfSign = -1;
-                    var offsetExists = false;
-                    if ((sp != -1) || (sm != -1))
-                    {
-                        offsetExists = true;
-                    }
+                    var offsetExists = (sp != -1) || (sm != -1);
 
                     if (sp != -1)
                     {
@@ -189,7 +185,7 @@ public virtual string Value
                         {
                             // The length of the GMT offset must be 5 characters (including the sign)
                             var msg = "The length of the TM datatype value does not conform to an allowable" +
-                                             " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
+                                      " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
                             var e = new DataTypeException(msg);
                             throw e;
                         }
@@ -201,7 +197,7 @@ public virtual string Value
                             if ((timeVal.Length < 8) || (timeVal.Length > 11))
                             {
                                 var msg = "The length of the TM datatype value does not conform to an allowable" +
-                                                 " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
+                                          " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
                                 var e = new DataTypeException(msg);
                                 throw e;
                             }
@@ -214,7 +210,7 @@ public virtual string Value
                             if ((timeVal.Length != 2) && (timeVal.Length != 4) && (timeVal.Length != 6))
                             {
                                 var msg = "The length of the TM datatype value does not conform to an allowable" +
-                                                 " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
+                                          " format. Format should conform to HH[MM[SS[.S[S[S[S]]]]]][+/-ZZZZ]";
                                 var e = new DataTypeException(msg);
                                 throw e;
                             }

src/NHapi.Base/Model/Primitive/CommonTS.cs

@@ -206,8 +206,8 @@ public virtual string Value
                         string dateVal = null;
                         string timeVal = null;
                         string timeValLessOffset = null;
-                        var sp = value.IndexOf("+");
-                        var sm = value.IndexOf("-");
+                        var sp = value.IndexOf("+", StringComparison.Ordinal);
+                        var sm = value.IndexOf("-", StringComparison.Ordinal);
                         var indexOfSign = -1;
                         var offsetExists = false;
                         var timeValIsOffsetOnly = false;
@@ -310,7 +310,7 @@ public virtual string Value
                             tm = new CommonTM();
 
                             // first extract the + sign from the offset value string if it exists
-                            if (timeVal.IndexOf("+") == 0)
+                            if (timeVal.IndexOf("+", StringComparison.Ordinal) == 0)
                             {
                                 timeVal = timeVal.Substring(1);
                             } // end if

src/NHapi.Base/NHapi.Base.csproj

@@ -14,6 +14,7 @@
 
   <ItemGroup>
     <InternalsVisibleTo Include="$(AssemblyName).NUnit" />
+    <InternalsVisibleTo Include="NHapi.NUnit" />
     <InternalsVisibleTo Include="NHapi.SourceGeneration" />
   </ItemGroup>
 
@@ -43,4 +44,4 @@
     </PackageReference>
   </ItemGroup>
 
-</Project>
+</Project>

src/NHapi.Base/Parser/DefaultModelClassFactory.cs

@@ -22,13 +22,12 @@ namespace NHapi.Base.Parser
     public class DefaultModelClassFactory : IModelClassFactory
     {
         private static readonly object LockObject = new object();
-        private static readonly IHapiLog Log;
+        private static readonly IHapiLog Log = HapiLogFactory.GetHapiLog(typeof(DefaultModelClassFactory));
         private static Hashtable packages = null;
         private static bool isLoadingPackages = false;
 
         static DefaultModelClassFactory()
         {
-            Log = HapiLogFactory.GetHapiLog(typeof(DefaultModelClassFactory));
         }
 
         /// <summary>