*** old/ssl.erl	Wed Feb 20 14:01:15 2008
--- ssl.erl	Wed Feb 20 12:53:50 2008
***************
*** 571,576 ****
--- 571,577 ----
  				    Value == 1;
  				    Value == 2;
  				    Value == 4;
+ 				    Value == asn1;
  				    Value == cdr;
  				    Value == line  ->
      Value;
*** old/ssl_connection.erl	Wed Feb 20 14:00:58 2008
--- ssl_connection.erl	Wed Feb 20 13:02:05 2008
***************
*** 1320,1325 ****
--- 1300,1318 ----
  		   _/binary>>, _) when (Flags band 1) == 1 ->
      {Size + ?CDR_HDR_SIZE, 0};
  
+ check_packet(asn1, <<?BYTE(Size), _/binary>>, _) when Size < 127 ->
+     {Size + 1, 1};
+ check_packet(asn1, <<?BYTE(128), _/binary>>, _) ->
+     {0, 1};
+ check_packet(asn1, <<?BYTE(129), ?BYTE(Size), _/binary>>, _) ->
+     {Size+2, 2};
+ check_packet(asn1, <<?BYTE(130), ?UINT16(Size), _/binary>>, _) ->
+     {Size+3, 3};
+ check_packet(asn1, <<?BYTE(131), ?UINT24(Size), _/binary>>, _) ->
+     {Size+4, 4};
+ check_packet(asn1, <<?BYTE(132), ?UINT32(Size), _/binary>>, _) ->
+     {Size+5, 5};
+ 
  check_packet(line, Buffer, BytesToRead) ->
      case upto_newline(Buffer) of
          <<>> ->