1SSLsession: module { 2 3 PATH: con "/dis/lib/crypt/sslsession.dis"; 4 5 Session: adt { 6 session_id : array of byte; # [32] 7 peer : string; 8 9 connection_time : int; 10 version : array of byte; # [2] 11 12 suite : array of byte; # [2] 13 compression : byte; 14 15 master_secret : array of byte; # [48] 16 peer_certs : list of array of byte; 17 18 new: fn(peer: string, time: int, ver: array of byte): ref Session; 19 duplicate: fn(s: self ref Session): ref Session; 20 }; 21 22 init: fn(): string; 23 add_session: fn(s: ref Session); 24 get_session_byid: fn(session_id: array of byte): ref Session; 25 get_session_byname: fn(peer: string): ref Session; 26 set_timeout: fn(t: int); 27}; 28