File: packet.mli

package info (click to toggle)
sks 1.1.6-14
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 2,296 kB
  • sloc: ml: 15,228; ansic: 1,069; sh: 358; makefile: 347
file content (94 lines) | stat: -rw-r--r-- 2,698 bytes parent folder | download | duplicates (5)
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
type ptype =
    Reserved
  | Public_Key_Encrypted_Session_Key_Packet
  | Signature_Packet
  | Symmetric_Key_Encrypted_Session_Key_Packet
  | One_Pass_Signature_Packet
  | Secret_Key_Packet
  | Public_Key_Packet
  | Secret_Subkey_Packet
  | Compressed_Data_Packet
  | Symmetrically_Encrypted_Data_Packet
  | Marker_Packet
  | Literal_Data_Packet
  | Trust_Packet
  | User_ID_Packet
  | User_Attribute_Packet
  | Sym_Encrypted_and_Integrity_Protected_Data_Packet
  | Modification_Detection_Code_Packet
  | Public_Subkey_Packet
  | Private_or_Experimental_ptype
  | Unexpected_ptype
type packet = {
  content_tag : int;
  packet_type : ptype;
  packet_length : int;
  packet_body : string;
}
type sigsubpacket = { ssp_length : int; ssp_type : int; ssp_body : string; }
val ssp_type_to_string : int -> string
type key = packet list
val sigtype_to_string : int -> string
val content_tag_to_ptype : int -> ptype
val ptype_to_string : ptype -> string
type mpi = { mpi_bits : int; mpi_data : string; }
val pubkey_algorithm_string : int -> string
type pubkeyinfo = {
  pk_version : int;
  pk_ctime : int64;
  pk_expiration : int option;
  pk_alg : int;
  pk_keylen : int;
}
type sigtype =
    Signature_of_a_binary_document
  | Signature_of_a_canonical_text_document
  | Standalone_signature
  | Generic_certification_of_a_User_ID_and_Public_Key_packet
  | Persona_certification_of_a_User_ID_and_Public_Key_packet
  | Casual_certification_of_a_User_ID_and_Public_Key_packet
  | Positive_certification_of_a_User_ID_and_Public_Key_packet
  | Subkey_Binding_Signature
  | Signature_directly_on_a_key
  | Key_revocation_signature
  | Subkey_revocation_signature
  | Certification_revocation_signature
  | Timestamp_signature
  | Unexpected_sigtype
type v3sig = {
  v3s_sigtype : int;
  v3s_ctime : int64;
  v3s_keyid : string;
  v3s_pk_alg : int;
  v3s_hash_alg : int;
  v3s_hash_value : string;
  v3s_mpis : mpi list;
}
type v4sig = {
  v4s_sigtype : int;
  v4s_pk_alg : int;
  v4s_hashed_subpackets : sigsubpacket list;
  v4s_unhashed_subpackets : sigsubpacket list;
  v4s_hash_value : string;
  v4s_mpis : mpi list;
}
type signature = V3sig of v3sig | V4sig of v4sig
val int_to_sigtype : int -> sigtype
val content_tag_to_string : int -> string
val print_packet : packet -> unit
val write_packet_new :
  packet ->
  < write_byte : int -> 'a; write_int : int -> 'b;
    write_string : string -> 'c; .. > ->
  'c
val pk_alg_to_ident : int -> string
val write_packet_old :
  packet ->
  < write_byte : int -> 'a; write_int : int -> 'b;
    write_string : string -> 'c; .. > ->
  'c
val write_packet :
  packet ->
  < write_byte : int -> 'a; write_int : int -> 'b;
    write_string : string -> 'c; .. > ->
  'c