Branch: Tag:

1997-03-15

1997-03-15 12:18:10 by Niels Möller <nisse@lysator.liu.se>

*** empty log message ***

Rev: lib/modules/SSL.pmod/asn1.pmod.pike:1.3
Rev: lib/modules/SSL.pmod/cipher.pike:1.3
Rev: lib/modules/SSL.pmod/connection.pike:1.3
Rev: lib/modules/SSL.pmod/context.pike:1.3
Rev: lib/modules/SSL.pmod/handshake.pike:1.3
Rev: lib/modules/SSL.pmod/https.pike:1.4
Rev: lib/modules/SSL.pmod/packet.pike:1.2
Rev: lib/modules/SSL.pmod/session.pike:1.3
Rev: lib/modules/SSL.pmod/sslfile.pike:1.2
Rev: lib/modules/SSL.pmod/sslport.pike:1.4
Rev: lib/modules/SSL.pmod/state.pike:1.3

2:    *    * Rudimentary support for decoding ASN.1 encoded data.    * -  * $Id: asn1.pmod.pike,v 1.2 1997/03/15 07:10:53 nisse Exp $ +  * $Id: asn1.pmod.pike,v 1.3 1997/03/15 12:15:07 nisse Exp $    */      /* BER decoder
23:    string contents;    mixed value;    + #ifdef SSL3_DEBUG    werror(sprintf("decoding tag %x\n", tag)); -  + #endif    if ( (tag & 0x1f) == 0x1f)    throw( ({ "high tag numbers is not supported\n", backtrace() }) );    int len = get_int(1);    if (len & 0x80)    len = get_int(len & 0x7f);    -  + #ifdef SSL3_DEBUG    werror(sprintf("len : %d\n", len)); -  + #endif    contents = get_fix_string(len); -  + #ifdef SSL3_DEBUG    werror(sprintf("contents: %O\n", contents)); -  + #endif    if (tag & 0x20)    {    object seq = object_program(this_object())(contents);
41:    while(! seq->is_empty())    {    array elem = seq->get_asn1(); + #ifdef SSL3_DEBUG    // werror(sprintf("elem: %O\n", elem)); -  + #endif    value += ({ elem });    }    }