From e27f9e236fec5fcbef9c1ee63fc5c27c87d787ea Mon Sep 17 00:00:00 2001
From: Stephen Paul Weber <singpolyma@singpolyma.net>
Date: Mon, 24 Jun 2013 11:22:01 -0500
Subject: [PATCH] Full example of decrypting a message

---
 examples/deASCIIdeCrypt.php | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 examples/deASCIIdeCrypt.php

diff --git a/examples/deASCIIdeCrypt.php b/examples/deASCIIdeCrypt.php
new file mode 100644
index 0000000..d567b32
--- /dev/null
+++ b/examples/deASCIIdeCrypt.php
@@ -0,0 +1,27 @@
+<?php
+
+// USAGE: php examples/deASCIIdeCrypt.php secretkey.asc password message.asc
+// This will fail if the algo on key or message is not 3DES or AES
+
+require dirname(__FILE__).'/../lib/openpgp.php';
+require dirname(__FILE__).'/../lib/openpgp_crypt_rsa.php';
+require dirname(__FILE__).'/../lib/openpgp_crypt_aes_tripledes.php';
+
+$keyASCII = file_get_contents($argv[1]);
+$msgASCII = file_get_contents($argv[3]);
+
+$keyEncrypted = OpenPGP_Message::parse(OpenPGP::unarmor($keyASCII, 'PGP PRIVATE KEY BLOCK'));
+
+// Try each secret key packet
+foreach($keyEncrypted as $p) {
+	if(!($p instanceof OpenPGP_SecretSubkeyPacket)) continue;
+
+	$key = OpenPGP_Crypt_AES_TripleDES::decryptSecretKey($argv[2], $p);
+
+	$msg = OpenPGP_Message::parse(OpenPGP::unarmor($msgASCII, 'PGP MESSAGE'));
+
+	$decryptor = new OpenPGP_Crypt_RSA($key);
+	$decrypted = $decryptor->decrypt($msg);
+
+	var_dump($decrypted);
+}