1 files changed, 49 insertions, 0 deletions

diff --git a/cs-dotnet/src/gatsstring.cs b/cs-dotnet/src/gatsstring.cs
new file mode 100644
index 0000000..30b0afb
--- /dev/null
+++ b/cs-dotnet/src/gatsstring.cs
@@ -0,0 +1,49 @@
+using System.IO;
+
+namespace Com.Xagasoft.Gats
+{
+    public class GatsString : GatsObject
+    {
+        public byte[] Value { get; set; }
+
+        public GatsString()
+        {
+        }
+
+        public GatsString( byte[] val )
+        {
+            Value = val;
+        }
+
+        public override string ToString()
+        {
+            return Value.ToString();
+        }
+
+        public override void Read( Stream s, char cType )
+        {
+            int Size = (int)GatsInteger.ReadPackedInt( s );
+            Value = new byte[Size];
+            int SoFar = 0;
+            do
+            {
+                SoFar += s.Read( Value, SoFar, Size-SoFar );
+            } while( SoFar < Size );
+        }
+
+        public override void Write( Stream s )
+        {
+            s.WriteByte( (byte)'s' );
+            if( Value == null )
+            {
+                GatsInteger.WritePackedInt( s, 0 );
+            }
+            else
+            {
+                GatsInteger.WritePackedInt( s, Value.Length );
+                s.Write( Value, 0, Value.Length );
+            }
+        }
+    };
+}
+