From 73f93e70fddef5da68dbe1dba0023dffe5d6fee5 Mon Sep 17 00:00:00 2001
From: Stephen Paul Weber <singpolyma@singpolyma.net>
Date: Tue, 30 Mar 2010 12:42:05 -0500
Subject: [PATCH] Implement CompressedDataPacket

---
 lib/openpgp.php | 27 ++++++++++++++++++++++++++-
 1 file changed, 26 insertions(+), 1 deletion(-)

diff --git a/lib/openpgp.php b/lib/openpgp.php
index a465ef9..edd25f6 100644
--- a/lib/openpgp.php
+++ b/lib/openpgp.php
@@ -456,7 +456,32 @@ class OpenPGP_SecretSubkeyPacket extends OpenPGP_SecretKeyPacket {
  * @see http://tools.ietf.org/html/rfc4880#section-5.6
  */
 class OpenPGP_CompressedDataPacket extends OpenPGP_Packet {
-  // TODO
+  public $algorithm;
+  /* see http://tools.ietf.org/html/rfc4880#section-9.3 */
+  static $algorithms = array(0 => 'Uncompressed', 1 => 'ZIP', 2 => 'ZLIB', 3 => 'BZip2');
+  function read() {
+    $this->algorithm = ord($this->read_byte());
+    $this->data = $this->read_bytes($this->length);
+    switch($this->algorithm) {
+      case 0:
+        $this->data = OpenPGP_Message::parse($this->data);
+        break;
+      case 1:
+        $this->data = OpenPGP_Message::parse(gzinflate($this->data));
+        break;
+      case 2:
+        $this->data = OpenPGP_Message::parse(gzuncompress($this->data));
+        break;
+      case 3:
+        $this->data = OpenPGP_Message::parse(bzdecompress($this->data));
+        break;
+      default:
+        /* TODO error? */
+    }
+    if($this->data) {
+      $this->data = $this->data->packets;
+    }
+  }
 }
 
 /**