Lines Matching defs:packet
1 ;;; pgg-parse.el --- OpenPGP packet parsing
42 "OpenPGP packet parsing."
80 (16 . "Generic certification of a User ID and Public Key packet")
81 (17 . "Persona certification of a User ID and Public Key packet")
82 (18 . "Casual certification of a User ID and Public Key packet")
83 (19 . "Positive certification of a User ID and Public Key packet")
95 (defcustom pgg-ignore-packet-checksum t; XXX
96 "If non-nil checksum of each ascii armored packet will be ignored."
206 (defun pgg-parse-packet-header ()
208 length-type content-tag packet-bytes header-bytes)
214 packet-bytes 0
217 (setq packet-bytes
218 (logior (lsh packet-bytes 8)
223 packet-bytes (car length-type)
225 (list content-tag packet-bytes header-bytes)))
227 (defun pgg-parse-packet (ptag)
230 (pgg-parse-public-key-encrypted-session-key-packet ptag))
232 (pgg-parse-signature-packet ptag))
234 (pgg-parse-symmetric-key-encrypted-session-key-packet ptag))
238 (pgg-parse-public-key-packet ptag))
257 (function pgg-parse-packet-header)))
260 (function pgg-parse-packet)))
347 (defun pgg-parse-signature-packet (ptag)
387 (mapcar (function cdr) ;remove packet types
398 (mapcar (function cdr) ;remove packet types
413 (defun pgg-parse-public-key-encrypted-session-key-packet (ptag)
427 (defun pgg-parse-symmetric-key-encrypted-session-key-packet (ptag)
438 (defun pgg-parse-public-key-packet (ptag)
473 pgg-ignore-packet-checksum
478 (message "PGP packet checksum does not match")
480 (message "PGP packet contain invalid base64")
482 (message "PGP packet checksum not found")