Show spam aliases #

data/web/rc/plugins/identity_select/composer.json

@@ -0,0 +1,24 @@
+{
+    "name": "roundcube/identity_select",
+    "type": "roundcube-plugin",
+    "description": "On reply to a message user identity selection is based on\n\t\tcontent of standard headers like From, To, Cc and Return-Path.\n\t\tHere you can add header(s) set by your SMTP server (e.g.\n\t\tDelivered-To, Envelope-To, X-Envelope-To, X-RCPT-TO) to make\n\t\tidentity selection more accurate.",
+    "license": "GPLv3+",
+    "version": "1.1",
+    "authors": [
+        {
+            "name": "Aleksander Machniak",
+            "email": "alec@alec.pl",
+            "role": "Lead"
+        }
+    ],
+    "repositories": [
+        {
+            "type": "composer",
+            "url": "http://plugins.roundcube.net"
+        }
+    ],
+    "require": {
+        "php": ">=5.3.0",
+        "roundcube/plugin-installer": ">=0.1.3"
+    }
+}

data/web/rc/plugins/identity_select/identity_select.php

@@ -0,0 +1,94 @@
+<?php
+
+/**
+ * Identity selection based on additional message headers.
+ *
+ * On reply to a message user identity selection is based on
+ * content of standard headers i.e. From, To, Cc and Return-Path.
+ * Here you can add header(s) set by your SMTP server (e.g.
+ * Delivered-To, Envelope-To, X-Envelope-To, X-RCPT-TO) to make
+ * identity selection more accurate.
+ *
+ * Enable the plugin in config.inc.php and add your desired headers:
+ *   $config['identity_select_headers'] = array('Delivered-To');
+ *
+ * Note: 'Received' header is also supported, but has bigger impact
+ *       on performance, as it's body is potentially much bigger
+ *       than other headers used by Roundcube
+ *
+ * @author Aleksander Machniak <alec@alec.pl>
+ * @license GNU GPLv3+
+ */
+class identity_select extends rcube_plugin
+{
+    public $task = 'mail';
+
+
+    function init()
+    {
+        $this->add_hook('identity_select', array($this, 'select'));
+        $this->add_hook('storage_init', array($this, 'storage_init'));
+    }
+
+    /**
+     * Adds additional headers to supported headers list
+     */
+    function storage_init($p)
+    {
+        $rcmail = rcmail::get_instance();
+
+        if ($add_headers = (array)$rcmail->config->get('identity_select_headers', array())) {
+            $p['fetch_headers'] = trim($p['fetch_headers'] . ' ' . strtoupper(join(' ', $add_headers)));
+        }
+
+        return $p;
+    }
+
+    /**
+     * Identity selection
+     */
+    function select($p)
+    {
+        if ($p['selected'] !== null || !is_object($p['message']->headers)) {
+            return $p;
+        }
+
+        $rcmail = rcmail::get_instance();
+
+        foreach ((array)$rcmail->config->get('identity_select_headers', array()) as $header) {
+            if ($emails = $this->get_email_from_header($p['message'], $header)) {
+                foreach ($p['identities'] as $idx => $ident) {
+                    if (in_array($ident['email_ascii'], $emails)) {
+                        $p['selected'] = $idx;
+                        break 2;
+                    }
+                }
+            }
+        }
+
+        return $p;
+    }
+
+    /**
+     * Extract email address from specified message header
+     */
+    protected function get_email_from_header($message, $header)
+    {
+        $value = $message->headers->get($header, false);
+
+        if (strtolower($header) == 'received') {
+            // find first email address in all Received headers
+            $email = null;
+            foreach ((array) $value as $entry) {
+                if (preg_match('/[\s\t]+for[\s\t]+<([^>]+)>/', $entry, $matches)) {
+                    $email = $matches[1];
+                    break;
+                }
+            }
+
+            $value = $email;
+        }
+
+        return (array) $value;
+    }
+}

data/web/rc/plugins/identity_select/tests/IdentitySelect.php

@@ -0,0 +1,22 @@
+<?php
+
+class IdentitySelect_Plugin extends PHPUnit_Framework_TestCase
+{
+
+    function setUp()
+    {
+        include_once __DIR__ . '/../identity_select.php';
+    }
+
+    /**
+     * Plugin object construction test
+     */
+    function test_constructor()
+    {
+        $rcube  = rcube::get_instance();
+        $plugin = new identity_select($rcube->api);
+
+        $this->assertInstanceOf('identity_select', $plugin);
+        $this->assertInstanceOf('rcube_plugin', $plugin);
+    }
+}