Quake 3 demo pattern: Read CS_SYSTEMINFO as well

Author: Tom

patterns/q3demo.hexpat

@@ -73,6 +73,35 @@ fn readCsString(ref auto data, s32 len, s32 bitindex){
     }
     return test;
 };
+fn measureCsString(ref auto data, s32 len, s32 bitindex){
+    s32 value = 0;
+    u64 ret = 0;
+    
+    while(true){
+        ret = readbits(data,len,8,bitindex);DECODERET
+        if(value != 3){
+         break;
+        }
+        // configstring
+        ret = readbits(data,len,16,bitindex);DECODERET
+        u16 csNum = value;
+        
+        while(true){
+            ret = readbits(data,len,8,bitindex);DECODERET
+            s8 val = value;
+            if(val <= 0){
+                break;
+            }
+        }
+        return bitindex;
+    }
+    return bitindex;
+};
+
+struct ConfigStrings {
+    str CS_SERVERINFO = "" [[export]];
+    str CS_SYSTEMINFO = "" [[export]];
+};
 
 struct Message {
     le s32 messageNum;
@@ -99,7 +128,13 @@ struct Message {
             } else if(firstCmd == 2){
                 ret = readbits(data,len,32,bitindex);DECODERET
                 s32 serverTime = value [[export]];
-                str CS_SERVERINFO = readCsString(data,len,bitindex) [[export]];
+                ConfigStrings configStrings = null [[export]];
+                
+                s32 nextBitindex = measureCsString(data,len,bitindex); // silly to do the calc twice but sadly we can't return both a string and an integer, rip
+                configStrings.CS_SERVERINFO = readCsString(data,len,bitindex) ;
+                bitindex = nextBitindex;
+                configStrings.CS_SYSTEMINFO = readCsString(data,len,bitindex) ;
+                
             }
 
         } else{