diff --git a/Net/DNS/RR.php b/Net/DNS/RR.php
index a6f0bcf..05d3312 100644
--- a/Net/DNS/RR.php
+++ b/Net/DNS/RR.php
@@ -30,6 +30,7 @@
 require_once("Net/DNS/RR/HINFO.php");
 require_once("Net/DNS/RR/SRV.php");
 require_once("Net/DNS/RR/NAPTR.php");
+require_once("Net/DNS/RR/RR.php");
 /* }}} */
 /* Net_DNS_RR object definition {{{ */
 /**
diff --git a/Net/DNS/RR/RP.php b/Net/DNS/RR/RP.php
new file mode 100644
index 0000000..8b737b6
--- /dev/null
+++ b/Net/DNS/RR/RP.php
@@ -0,0 +1,106 @@
+<?php
+/**
+*  License Information:
+*
+*  Net_DNS:  A resolver library for PHP
+*  Copyright (c) 2002-2003 Eric Kilfoil eric@ypass.net
+*  Maintainers:
+*  Marco Kaiser <bate@php.net>
+*  Florian Anderiasch <fa@php.net>
+*  Mike Pultz <mike@mrhost.ca>
+*
+* PHP versions 4 and 5
+*
+* LICENSE: This source file is subject to version 3.01 of the PHP license
+* that is available through the world-wide-web at the following URI:
+* http://www.php.net/license/3_01.txt.  If you did not receive a copy of
+* the PHP License and are unable to obtain it through the web, please
+* send a note to license@php.net so we can mail you a copy immediately.
+*/
+
+/* Net_DNS_RR_RP definition {{{ */
+/**
+ * A representation of a resource record of type <b>RP</b>
+ *
+ * @package Net_DNS
+ */
+class Net_DNS_RR_RP extends Net_DNS_RR
+{
+    /* class variable definitions {{{ */
+    var $name;
+    var $type;
+    var $class;
+    var $ttl;
+    var $rdlength;
+    var $rdata;
+    var $mboxdname;
+    var $txtdname;
+
+    /* }}} */
+    /* class constructor - RR(&$rro, $data, $offset = '') {{{ */
+    function Net_DNS_RR_RP(&$rro, $data, $offset = '')
+    {
+        $this->name = $rro->name;
+        $this->type = $rro->type;
+        $this->class = $rro->class;
+        $this->ttl = $rro->ttl;
+        $this->rdlength = $rro->rdlength;
+        $this->rdata = $rro->rdata;
+
+        if ($offset) {
+            if ($this->rdlength > 0) {
+
+                list($this->mboxdname, $offset) = Net_DNS_Packet::dn_expand($data, $offset);
+                list($this->txtdname, $offset) = Net_DNS_Packet::dn_expand($data, $offset);
+            }
+        } elseif (is_array($data)) {
+
+            $this->mboxdname = $data['mboxdname'];
+            $this->txtdname = $data['txtdname'];
+        } else {
+
+            preg_match("/([^ ]+)\s+([^ ]+)/", $data, $matches);
+
+            $this->mboxdname = preg_replace('/\.$/', '', $matches[1]);
+            $this->txtdname = preg_replace('/\.$/', '', $matches[2]);
+        }
+    }
+
+    /* }}} */
+    /* Net_DNS_RR_RP::rdatastr() {{{ */
+    function rdatastr()
+    {
+        if (strlen($this->mboxdname) > 0) {
+            return $this->mboxdname . '. ' . $this->txtdname . '.';
+        }
+        return '; no data';
+    }
+
+    /* }}} */
+    /* Net_DNS_RR_RP::rr_rdata($packet, $offset) {{{ */
+    function rr_rdata($packet, $offset)
+    {
+        if (strlen($this->mboxdname) > 0) {
+
+            $rdata = $packet->dn_comp($this->mboxdname, $offset);
+            $rdata .= $packet->dn_comp($this->txtdname, $offset + strlen($rdata));
+
+            return $rdata;
+        }
+        return null;
+    }
+
+    /* }}} */
+}
+/* }}} */
+/* VIM settings {{{
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * soft-stop-width: 4
+ * c indent on
+ * End:
+ * vim600: sw=4 ts=4 sts=4 cindent fdm=marker et
+ * vim<600: sw=4 ts=4
+ * }}} */
+?>
\ No newline at end of file