fixes #497 - updating ASNItem() to recognize ASN1_APP_COUNTER64

IndySockets · Sep 5, 2023 · 93a3f55 · 93a3f55
1 parent b5618f1
commit 93a3f55
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/Lib/Protocols/IdASN1Util.pas b/Lib/Protocols/IdASN1Util.pas
@@ -84,6 +84,8 @@ interface
   ASN1_GAUGE = $42;
   ASN1_TIMETICKS = $43;
   ASN1_OPAQUE = $44;
+  ASN1_APP_COUNTER64 = $46;
+  // TODO: float, double, int64, uint64
 
 function ASNEncOIDItem(Value: UInt32): string;
 function ASNDecOIDItem(var Start: Integer; const Buffer: string): UInt32;
@@ -333,7 +335,9 @@ function ASNItem(var Start: Integer; const Buffer: string;
           end;
           Result := IntToStr(y);
         end;
-      ASN1_COUNTER, ASN1_GAUGE, ASN1_TIMETICKS:  //Typically a 32-bit _unsigned_ number
+      ASN1_COUNTER, ASN1_GAUGE, ASN1_TIMETICKS,  //Typically a 32-bit _unsigned_ number
+      ASN1_APP_COUNTER64:
+      // TODO: int64, uint64
         begin
           z := 0;
           for n := 1 to ASNSize do begin
@@ -344,6 +348,7 @@ function ASNItem(var Start: Integer; const Buffer: string;
           end;
           Result := IntToStr(z);
         end;
+      // TODO: float, double
       ASN1_OCTSTR, ASN1_OPAQUE:
         begin
           {$IFDEF STRING_IS_IMMUTABLE}