1
  
2
  
3
  
4
  
5
  
6
  
7
  
8
  
9
  
10
  
11
  
12
  
13
  
14
  
15
  
16
  
17
  
18
  
19
  
20
  
21
  
22
  
23
  
24
  
25
  
#pike __REAL_VERSION__ 
#pragma strict_types 
 
//! SHA384 is another hash function specified by NIST, intended as a 
//! replacement for @[SHA1], generating larger digests. It outputs hash 
//! values of 384 bits, or 48 octets. 
 
#if constant(Nettle) && constant(Nettle.SHA384) 
 
inherit Nettle.SHA384; 
 
// id-sha384 
//   FROM RFC 4055 { 
//     joint-iso-itu-t(2) country(16) us(840) organization(1) gov(101) 
//     csor(3) nistalgorithm(4) hashalgs(2) 2 
//   } 
// 
// Standards.ASN1.Types.Identifier(2,16,840,1,101,3,4,2,2)->get_der(); 
string asn1_id() { return "`\206H\1e\3\4\2\2"; } 
 
#else 
constant this_program_does_not_exist=1; 
#endif