pgp 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561
  1. #------------------------------------------------------------------------------
  2. # $File: pgp,v 1.17 2019/04/19 00:42:27 christos Exp $
  3. # pgp: file(1) magic for Pretty Good Privacy
  4. # see https://lists.gnupg.org/pipermail/gnupg-devel/1999-September/016052.html
  5. #
  6. # Update: Joerg Jenderek
  7. # Note: verified by `gpg -v --debug 0x02 --list-packets < PUBRING263_10.PGP`
  8. #0 byte 0x99 MAYBE PGP 0x99
  9. 0 byte 0x99
  10. # 99h~10;0110;01~2=old packet type;tag 6=Public-Key Packet;1=two-octet length
  11. # A two-octet body header encodes packet lengths of 192~00C0h - 8383~20BFh
  12. #>1 ubeshort x \b, body length 0x%.4x
  13. # skip Basic.Image Beauty.320 Pic.Icons by looking for low version number
  14. #>3 ubyte x \b, V=%u
  15. #>3 ubyte <5 VERSION OK
  16. >3 ubyte <5
  17. # next packet type often b4h~(tag 13)~User ID Packet, b0h~(tag 12)~Trust packet
  18. #>>(1.S+3) ubyte x \b, next packet type 0x%x
  19. # skip 9900-v4.bin 9902-v4.bin by looking for valid second packet type (bit 7=1)
  20. #>>(1.S+3) ubyte >0x7F TYPE OK,
  21. >>(1.S+3) ubyte >0x7F
  22. # old versions 2,3 implies Pretty Good Privacy
  23. >>>3 ubyte <4 PGP key public ring (v%u)
  24. !:mime application/pgp-keys
  25. !:ext pgp/ASD
  26. >>>>4 beldate x created %s
  27. # days that this key is valid. If this number is zero, then it does not expire
  28. >>>>8 ubeshort >0 \b, %u days valid
  29. >>>>8 ubeshort =0 \b, not expire
  30. # display key algorithm 1~RSA (Encrypt or Sign)
  31. >>>>10 use key_algo
  32. # Multiprecision Integers (MPI) size
  33. >>>>11 ubeshort x %u bits
  34. # MPI
  35. >>>>13 ubequad x MPI=0x%16.16llx...
  36. # new version implies Pretty Good Privacy (PGP) >= 5.0 or Gnu Privacy Guard (GPG)
  37. >>>3 ubyte >3 PGP/GPG key public ring (v%u)
  38. !:mime application/pgp-keys
  39. !:ext pgp/gpg/pkr/asd
  40. >>>>4 beldate x created %s
  41. # display key algorithm 17~DSA
  42. >>>>8 use key_algo
  43. # Multiprecision Integers (MPI) size
  44. >>>>9 ubeshort x %u bits
  45. >>>>11 ubequad x MPI=0x%16.16llx...
  46. 0 beshort 0x9501 PGP key security ring
  47. !:mime application/x-pgp-keyring
  48. 0 beshort 0x9500 PGP key security ring
  49. !:mime application/x-pgp-keyring
  50. 0 beshort 0xa600 PGP encrypted data
  51. #!:mime application/pgp-encrypted
  52. #0 string -----BEGIN\040PGP text/PGP armored data
  53. !:mime text/PGP # encoding: armored data
  54. #>15 string PUBLIC\040KEY\040BLOCK- public key block
  55. #>15 string MESSAGE- message
  56. #>15 string SIGNED\040MESSAGE- signed message
  57. #>15 string PGP\040SIGNATURE- signature
  58. 2 string ---BEGIN\040PGP\040PUBLIC\040KEY\040BLOCK- PGP public key block
  59. !:mime application/pgp-keys
  60. >10 search/100 \n\n
  61. >>&0 use pgp
  62. 0 string -----BEGIN\040PGP\040MESSAGE- PGP message
  63. !:mime application/pgp
  64. >10 search/100 \n\n
  65. >>&0 use pgp
  66. 0 string -----BEGIN\040PGP\040SIGNATURE- PGP signature
  67. !:mime application/pgp-signature
  68. >10 search/100 \n\n
  69. >>&0 use pgp
  70. # Decode the type of the packet based on it's base64 encoding.
  71. # Idea from Mark Martinec
  72. # The specification is in RFC 4880, section 4.2 and 4.3:
  73. # https://tools.ietf.org/html/rfc4880#section-4.2
  74. 0 name pgp
  75. >0 byte 0x67 Reserved (old)
  76. >0 byte 0x68 Public-Key Encrypted Session Key (old)
  77. >0 byte 0x69 Signature (old)
  78. >0 byte 0x6a Symmetric-Key Encrypted Session Key (old)
  79. >0 byte 0x6b One-Pass Signature (old)
  80. >0 byte 0x6c Secret-Key (old)
  81. >0 byte 0x6d Public-Key (old)
  82. >0 byte 0x6e Secret-Subkey (old)
  83. >0 byte 0x6f Compressed Data (old)
  84. >0 byte 0x70 Symmetrically Encrypted Data (old)
  85. >0 byte 0x71 Marker (old)
  86. >0 byte 0x72 Literal Data (old)
  87. >0 byte 0x73 Trust (old)
  88. >0 byte 0x74 User ID (old)
  89. >0 byte 0x75 Public-Subkey (old)
  90. >0 byte 0x76 Unused (old)
  91. >0 byte 0x77
  92. >>1 byte&0xc0 0x00 Reserved
  93. >>1 byte&0xc0 0x40 Public-Key Encrypted Session Key
  94. >>1 byte&0xc0 0x80 Signature
  95. >>1 byte&0xc0 0xc0 Symmetric-Key Encrypted Session Key
  96. >0 byte 0x78
  97. >>1 byte&0xc0 0x00 One-Pass Signature
  98. >>1 byte&0xc0 0x40 Secret-Key
  99. >>1 byte&0xc0 0x80 Public-Key
  100. >>1 byte&0xc0 0xc0 Secret-Subkey
  101. >0 byte 0x79
  102. >>1 byte&0xc0 0x00 Compressed Data
  103. >>1 byte&0xc0 0x40 Symmetrically Encrypted Data
  104. >>1 byte&0xc0 0x80 Marker
  105. >>1 byte&0xc0 0xc0 Literal Data
  106. >0 byte 0x7a
  107. >>1 byte&0xc0 0x00 Trust
  108. >>1 byte&0xc0 0x40 User ID
  109. >>1 byte&0xc0 0x80 Public-Subkey
  110. >>1 byte&0xc0 0xc0 Unused [z%x]
  111. >0 byte 0x30
  112. >>1 byte&0xc0 0x00 Unused [0%x]
  113. >>1 byte&0xc0 0x40 User Attribute
  114. >>1 byte&0xc0 0x80 Sym. Encrypted and Integrity Protected Data
  115. >>1 byte&0xc0 0xc0 Modification Detection Code
  116. # magic signatures to detect PGP crypto material (from stef)
  117. # detects and extracts metadata from:
  118. # - symmetric encrypted packet header
  119. # - RSA (e=65537) secret (sub-)keys
  120. # 1024b RSA encrypted data
  121. 0 string \x84\x8c\x03 PGP RSA encrypted session key -
  122. >3 lelong x keyid: %X
  123. >7 lelong x %X
  124. >11 byte 0x01 RSA (Encrypt or Sign) 1024b
  125. >11 byte 0x02 RSA Encrypt-Only 1024b
  126. >12 string \x04\x00
  127. >12 string \x03\xff
  128. >12 string \x03\xfe
  129. >12 string \x03\xfd
  130. >12 string \x03\xfc
  131. >12 string \x03\xfb
  132. >12 string \x03\xfa
  133. >12 string \x03\xf9
  134. >142 byte 0xd2 .
  135. # 2048b RSA encrypted data
  136. 0 string \x85\x01\x0c\x03 PGP RSA encrypted session key -
  137. >4 lelong x keyid: %X
  138. >8 lelong x %X
  139. >12 byte 0x01 RSA (Encrypt or Sign) 2048b
  140. >12 byte 0x02 RSA Encrypt-Only 2048b
  141. >13 string \x08\x00
  142. >13 string \x07\xff
  143. >13 string \x07\xfe
  144. >13 string \x07\xfd
  145. >13 string \x07\xfc
  146. >13 string \x07\xfb
  147. >13 string \x07\xfa
  148. >13 string \x07\xf9
  149. >271 byte 0xd2 .
  150. # 3072b RSA encrypted data
  151. 0 string \x85\x01\x8c\x03 PGP RSA encrypted session key -
  152. >4 lelong x keyid: %X
  153. >8 lelong x %X
  154. >12 byte 0x01 RSA (Encrypt or Sign) 3072b
  155. >12 byte 0x02 RSA Encrypt-Only 3072b
  156. >13 string \x0c\x00
  157. >13 string \x0b\xff
  158. >13 string \x0b\xfe
  159. >13 string \x0b\xfd
  160. >13 string \x0b\xfc
  161. >13 string \x0b\xfb
  162. >13 string \x0b\xfa
  163. >13 string \x0b\xf9
  164. >399 byte 0xd2 .
  165. # 3072b RSA encrypted data
  166. 0 string \x85\x02\x0c\x03 PGP RSA encrypted session key -
  167. >4 lelong x keyid: %X
  168. >8 lelong x %X
  169. >12 byte 0x01 RSA (Encrypt or Sign) 4096b
  170. >12 byte 0x02 RSA Encrypt-Only 4096b
  171. >13 string \x10\x00
  172. >13 string \x0f\xff
  173. >13 string \x0f\xfe
  174. >13 string \x0f\xfd
  175. >13 string \x0f\xfc
  176. >13 string \x0f\xfb
  177. >13 string \x0f\xfa
  178. >13 string \x0f\xf9
  179. >527 byte 0xd2 .
  180. # 4096b RSA encrypted data
  181. 0 string \x85\x04\x0c\x03 PGP RSA encrypted session key -
  182. >4 lelong x keyid: %X
  183. >8 lelong x %X
  184. >12 byte 0x01 RSA (Encrypt or Sign) 8129b
  185. >12 byte 0x02 RSA Encrypt-Only 8129b
  186. >13 string \x20\x00
  187. >13 string \x1f\xff
  188. >13 string \x1f\xfe
  189. >13 string \x1f\xfd
  190. >13 string \x1f\xfc
  191. >13 string \x1f\xfb
  192. >13 string \x1f\xfa
  193. >13 string \x1f\xf9
  194. >1039 byte 0xd2 .
  195. # crypto algo mapper
  196. 0 name crypto
  197. >0 byte 0x00 Plaintext or unencrypted data
  198. >0 byte 0x01 IDEA
  199. >0 byte 0x02 TripleDES
  200. >0 byte 0x03 CAST5 (128 bit key)
  201. >0 byte 0x04 Blowfish (128 bit key, 16 rounds)
  202. >0 byte 0x07 AES with 128-bit key
  203. >0 byte 0x08 AES with 192-bit key
  204. >0 byte 0x09 AES with 256-bit key
  205. >0 byte 0x0a Twofish with 256-bit key
  206. # hash algo mapper
  207. 0 name hash
  208. >0 byte 0x01 MD5
  209. >0 byte 0x02 SHA-1
  210. >0 byte 0x03 RIPE-MD/160
  211. >0 byte 0x08 SHA256
  212. >0 byte 0x09 SHA384
  213. >0 byte 0x0a SHA512
  214. >0 byte 0x0b SHA224
  215. # display public key algorithms as human readable text
  216. 0 name key_algo
  217. >0 byte 0x01 RSA (Encrypt or Sign)
  218. # keep old look of version 5.28 without parentheses
  219. >0 byte 0x02 RSA Encrypt-Only
  220. >0 byte 0x03 RSA (Sign-Only)
  221. >0 byte 16 ElGamal (Encrypt-Only)
  222. >0 byte 17 DSA
  223. >0 byte 18 Elliptic Curve
  224. >0 byte 19 ECDSA
  225. >0 byte 20 ElGamal (Encrypt or Sign)
  226. >0 byte 21 Diffie-Hellman
  227. >0 default x
  228. >>0 ubyte <22 unknown (pub %d)
  229. # this should never happen
  230. >>0 ubyte >21 invalid (%d)
  231. # pgp symmetric encrypted data
  232. 0 byte 0x8c PGP symmetric key encrypted data -
  233. >1 byte 0x0d
  234. >1 byte 0x0c
  235. >2 byte 0x04
  236. >3 use crypto
  237. >4 byte 0x01 salted -
  238. >>5 use hash
  239. >>14 byte 0xd2 .
  240. >>14 byte 0xc9 .
  241. >4 byte 0x03 salted & iterated -
  242. >>5 use hash
  243. >>15 byte 0xd2 .
  244. >>15 byte 0xc9 .
  245. # encrypted keymaterial needs s2k & can be checksummed/hashed
  246. 0 name chkcrypto
  247. >0 use crypto
  248. >1 byte 0x00 Simple S2K
  249. >1 byte 0x01 Salted S2K
  250. >1 byte 0x03 Salted&Iterated S2K
  251. >2 use hash
  252. # all PGP keys start with this prolog
  253. # containing version, creation date, and purpose
  254. 0 name keyprolog
  255. >0 byte 0x04
  256. >1 beldate x created on %s -
  257. >5 byte 0x01 RSA (Encrypt or Sign)
  258. >5 byte 0x02 RSA Encrypt-Only
  259. # end of secret keys known signature
  260. # contains e=65537 and the prolog to
  261. # the encrypted parameters
  262. 0 name keyend
  263. >0 string \x00\x11\x01\x00\x01 e=65537
  264. >5 use crypto
  265. >5 byte 0xff checksummed
  266. >>6 use chkcrypto
  267. >5 byte 0xfe hashed
  268. >>6 use chkcrypto
  269. # PGP secret keys contain also the public parts
  270. # these vary by bitsize of the key
  271. 0 name x1024
  272. >0 use keyprolog
  273. >6 string \x03\xfe
  274. >6 string \x03\xff
  275. >6 string \x04\x00
  276. >136 use keyend
  277. 0 name x2048
  278. >0 use keyprolog
  279. >6 string \x80\x00
  280. >6 string \x07\xfe
  281. >6 string \x07\xff
  282. >264 use keyend
  283. 0 name x3072
  284. >0 use keyprolog
  285. >6 string \x0b\xfe
  286. >6 string \x0b\xff
  287. >6 string \x0c\x00
  288. >392 use keyend
  289. 0 name x4096
  290. >0 use keyprolog
  291. >6 string \x10\x00
  292. >6 string \x0f\xfe
  293. >6 string \x0f\xff
  294. >520 use keyend
  295. # \x00|\x1f[\xfe\xff]).{1024})'
  296. 0 name x8192
  297. >0 use keyprolog
  298. >6 string \x20\x00
  299. >6 string \x1f\xfe
  300. >6 string \x1f\xff
  301. >1032 use keyend
  302. # depending on the size of the pkt
  303. # we branch into the proper key size
  304. # signatures defined as x{keysize}
  305. >0 name pgpkey
  306. >0 string \x01\xd8 1024b
  307. >>2 use x1024
  308. >0 string \x01\xeb 1024b
  309. >>2 use x1024
  310. >0 string \x01\xfb 1024b
  311. >>2 use x1024
  312. >0 string \x01\xfd 1024b
  313. >>2 use x1024
  314. >0 string \x01\xf3 1024b
  315. >>2 use x1024
  316. >0 string \x01\xee 1024b
  317. >>2 use x1024
  318. >0 string \x01\xfe 1024b
  319. >>2 use x1024
  320. >0 string \x01\xf4 1024b
  321. >>2 use x1024
  322. >0 string \x02\x0d 1024b
  323. >>2 use x1024
  324. >0 string \x02\x03 1024b
  325. >>2 use x1024
  326. >0 string \x02\x05 1024b
  327. >>2 use x1024
  328. >0 string \x02\x15 1024b
  329. >>2 use x1024
  330. >0 string \x02\x00 1024b
  331. >>2 use x1024
  332. >0 string \x02\x10 1024b
  333. >>2 use x1024
  334. >0 string \x02\x04 1024b
  335. >>2 use x1024
  336. >0 string \x02\x06 1024b
  337. >>2 use x1024
  338. >0 string \x02\x16 1024b
  339. >>2 use x1024
  340. >0 string \x03\x98 2048b
  341. >>2 use x2048
  342. >0 string \x03\xab 2048b
  343. >>2 use x2048
  344. >0 string \x03\xbb 2048b
  345. >>2 use x2048
  346. >0 string \x03\xbd 2048b
  347. >>2 use x2048
  348. >0 string \x03\xcd 2048b
  349. >>2 use x2048
  350. >0 string \x03\xb3 2048b
  351. >>2 use x2048
  352. >0 string \x03\xc3 2048b
  353. >>2 use x2048
  354. >0 string \x03\xc5 2048b
  355. >>2 use x2048
  356. >0 string \x03\xd5 2048b
  357. >>2 use x2048
  358. >0 string \x03\xae 2048b
  359. >>2 use x2048
  360. >0 string \x03\xbe 2048b
  361. >>2 use x2048
  362. >0 string \x03\xc0 2048b
  363. >>2 use x2048
  364. >0 string \x03\xd0 2048b
  365. >>2 use x2048
  366. >0 string \x03\xb4 2048b
  367. >>2 use x2048
  368. >0 string \x03\xc4 2048b
  369. >>2 use x2048
  370. >0 string \x03\xc6 2048b
  371. >>2 use x2048
  372. >0 string \x03\xd6 2048b
  373. >>2 use x2048
  374. >0 string \x05X 3072b
  375. >>2 use x3072
  376. >0 string \x05k 3072b
  377. >>2 use x3072
  378. >0 string \x05{ 3072b
  379. >>2 use x3072
  380. >0 string \x05} 3072b
  381. >>2 use x3072
  382. >0 string \x05\x8d 3072b
  383. >>2 use x3072
  384. >0 string \x05s 3072b
  385. >>2 use x3072
  386. >0 string \x05\x83 3072b
  387. >>2 use x3072
  388. >0 string \x05\x85 3072b
  389. >>2 use x3072
  390. >0 string \x05\x95 3072b
  391. >>2 use x3072
  392. >0 string \x05n 3072b
  393. >>2 use x3072
  394. >0 string \x05\x7e 3072b
  395. >>2 use x3072
  396. >0 string \x05\x80 3072b
  397. >>2 use x3072
  398. >0 string \x05\x90 3072b
  399. >>2 use x3072
  400. >0 string \x05t 3072b
  401. >>2 use x3072
  402. >0 string \x05\x84 3072b
  403. >>2 use x3072
  404. >0 string \x05\x86 3072b
  405. >>2 use x3072
  406. >0 string \x05\x96 3072b
  407. >>2 use x3072
  408. >0 string \x07[ 4096b
  409. >>2 use x4096
  410. >0 string \x07\x18 4096b
  411. >>2 use x4096
  412. >0 string \x07+ 4096b
  413. >>2 use x4096
  414. >0 string \x07; 4096b
  415. >>2 use x4096
  416. >0 string \x07= 4096b
  417. >>2 use x4096
  418. >0 string \x07M 4096b
  419. >>2 use x4096
  420. >0 string \x073 4096b
  421. >>2 use x4096
  422. >0 string \x07C 4096b
  423. >>2 use x4096
  424. >0 string \x07E 4096b
  425. >>2 use x4096
  426. >0 string \x07U 4096b
  427. >>2 use x4096
  428. >0 string \x07. 4096b
  429. >>2 use x4096
  430. >0 string \x07> 4096b
  431. >>2 use x4096
  432. >0 string \x07@ 4096b
  433. >>2 use x4096
  434. >0 string \x07P 4096b
  435. >>2 use x4096
  436. >0 string \x074 4096b
  437. >>2 use x4096
  438. >0 string \x07D 4096b
  439. >>2 use x4096
  440. >0 string \x07F 4096b
  441. >>2 use x4096
  442. >0 string \x07V 4096b
  443. >>2 use x4096
  444. >0 string \x0e[ 8192b
  445. >>2 use x8192
  446. >0 string \x0e\x18 8192b
  447. >>2 use x8192
  448. >0 string \x0e+ 8192b
  449. >>2 use x8192
  450. >0 string \x0e; 8192b
  451. >>2 use x8192
  452. >0 string \x0e= 8192b
  453. >>2 use x8192
  454. >0 string \x0eM 8192b
  455. >>2 use x8192
  456. >0 string \x0e3 8192b
  457. >>2 use x8192
  458. >0 string \x0eC 8192b
  459. >>2 use x8192
  460. >0 string \x0eE 8192b
  461. >>2 use x8192
  462. >0 string \x0eU 8192b
  463. >>2 use x8192
  464. >0 string \x0e. 8192b
  465. >>2 use x8192
  466. >0 string \x0e> 8192b
  467. >>2 use x8192
  468. >0 string \x0e@ 8192b
  469. >>2 use x8192
  470. >0 string \x0eP 8192b
  471. >>2 use x8192
  472. >0 string \x0e4 8192b
  473. >>2 use x8192
  474. >0 string \x0eD 8192b
  475. >>2 use x8192
  476. >0 string \x0eF 8192b
  477. >>2 use x8192
  478. >0 string \x0eV 8192b
  479. >>2 use x8192
  480. # PGP RSA (e=65537) secret (sub-)key header
  481. 0 byte 0x95 PGP Secret Key -
  482. >1 use pgpkey
  483. 0 byte 0x97 PGP Secret Sub-key -
  484. >1 use pgpkey
  485. 0 byte 0x9d
  486. # Update: Joerg Jenderek
  487. # secret subkey packet (tag 7) with same structure as secret key packet (tag 5)
  488. # skip Fetus.Sys16 CALIBUS.MAIN OrbFix.Sys16.Ex by looking for positive len
  489. >1 ubeshort >0
  490. #>1 ubeshort x \b, body length 0x%x
  491. # next packet type often 88h,89h~(tag 2)~Signature Packet
  492. #>>(1.S+3) ubyte x \b, next packet type 0x%x
  493. # skip Dragon.SHR DEMO.INIT by looking for positive version
  494. >>3 ubyte >0
  495. # skip BUISSON.13 GUITAR1 by looking for low version number
  496. >>>3 ubyte <5 PGP Secret Sub-key
  497. # sub-key are normally part of secret key. So it does not occur as standalone file
  498. #!:ext bin
  499. # version 2,3~old 4~new . Comment following line for version 5.28 look
  500. >>>>3 ubyte x (v%d)
  501. >>>>3 ubyte x -
  502. # old versions 2 or 3 but no real example found
  503. >>>>3 ubyte <4
  504. # 2 byte for key bits in version 5.28 look
  505. >>>>>11 ubeshort x %db
  506. >>>>>4 beldate x created on %s -
  507. # old versions use 2 additional bytes after time stamp
  508. #>>>>>8 ubeshort x 0x%x
  509. # display key algorithm 1~RSA Encrypt|Sign - 21~Diffie-Hellman
  510. >>>>>10 use key_algo
  511. >>>>>(11.S/8) ubequad x
  512. # look after first key
  513. >>>>>>&5 use keyend
  514. # new version
  515. >>>>3 ubyte >3
  516. >>>>>9 ubeshort x %db
  517. >>>>>4 beldate x created on %s -
  518. # display key algorithm
  519. >>>>>8 use key_algo
  520. >>>>>(9.S/8) ubequad x
  521. # look after first key for something like s2k
  522. >>>>>>&3 use keyend