e4/98764ead917674ecf7e94f0e0d2d3166f9474f

   1 Return-Path: <dkg@fifthhorseman.net>\r
   2 X-Original-To: notmuch@notmuchmail.org\r
   3 Delivered-To: notmuch@notmuchmail.org\r
   4 Received: from localhost (localhost [127.0.0.1])\r
   5  by arlo.cworth.org (Postfix) with ESMTP id 6D20F6DE026C\r
   6  for <notmuch@notmuchmail.org>; Mon,  8 Aug 2016 16:53:25 -0700 (PDT)\r
   7 X-Virus-Scanned: Debian amavisd-new at cworth.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: -0.053\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.053 tagged_above=-999 required=5\r
  12  tests=[AWL=-0.053] autolearn=disabled\r
  13 Received: from arlo.cworth.org ([127.0.0.1])\r
  14  by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024)\r
  15  with ESMTP id hC-1n4sNOto7 for <notmuch@notmuchmail.org>;\r
  16  Mon,  8 Aug 2016 16:53:17 -0700 (PDT)\r
  17 Received: from che.mayfirst.org (che.mayfirst.org [162.247.75.118])\r
  18  by arlo.cworth.org (Postfix) with ESMTP id 0AE696DE0188\r
  19  for <notmuch@notmuchmail.org>; Mon,  8 Aug 2016 16:53:17 -0700 (PDT)\r
  20 Received: from fifthhorseman.net (unknown [38.109.115.130])\r
  21  by che.mayfirst.org (Postfix) with ESMTPSA id 0D7A4F98B\r
  22  for <notmuch@notmuchmail.org>; Mon,  8 Aug 2016 19:53:15 -0400 (EDT)\r
  23 Received: by fifthhorseman.net (Postfix, from userid 1000)\r
  24  id 2712D201E2; Mon,  8 Aug 2016 19:35:17 -0400 (EDT)\r
  25 From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>\r
  26 To: Notmuch Mail <notmuch@notmuchmail.org>\r
  27 Subject: [PATCH v2] Omit User-Agent: header by default\r
  28 Date: Mon,  8 Aug 2016 19:35:17 -0400\r
  29 Message-Id: <1470699317-30598-1-git-send-email-dkg@fifthhorseman.net>\r
  30 X-Mailer: git-send-email 2.8.1\r
  31 In-Reply-To: <874m6uvpe0.fsf@maritornes.cs.unb.ca>\r
  32 References: <874m6uvpe0.fsf@maritornes.cs.unb.ca>\r
  33 X-BeenThere: notmuch@notmuchmail.org\r
  34 X-Mailman-Version: 2.1.20\r
  35 Precedence: list\r
  36 List-Id: "Use and development of the notmuch mail system."\r
  37  <notmuch.notmuchmail.org>\r
  38 List-Unsubscribe: <https://notmuchmail.org/mailman/options/notmuch>,\r
  39  <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  40 List-Archive: <http://notmuchmail.org/pipermail/notmuch/>\r
  41 List-Post: <mailto:notmuch@notmuchmail.org>\r
  42 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  43 List-Subscribe: <https://notmuchmail.org/mailman/listinfo/notmuch>,\r
  44  <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  45 X-List-Received-Date: Mon, 08 Aug 2016 23:53:25 -0000\r
  46 \r
  47 The User-Agent: header can be fun and interesting, but it also leaks\r
  48 quite a bit of information about the user and their software stack.\r
  49 \r
  50 This represents a potential security risk (attackers can target the\r
  51 particular stack) and also an anonymity risk (a user trying to\r
  52 preserve their anonymity by sending mail from a non-associated account\r
  53 might reveal quite a lot of information if their choice of mail user\r
  54 agent is exposed).\r
  55 \r
  56 This change also avoids hiding the User-Agent header by default, so\r
  57 that people who decide they want to send it will at least see it (and\r
  58 can edit it if they want to) before sending.\r
  59 \r
  60 It makes sense to have safer defaults.\r
  61 ---\r
  62  emacs/notmuch-mua.el |  4 ++--\r
  63  test/T310-emacs.sh   | 16 ----------------\r
  64  2 files changed, 2 insertions(+), 18 deletions(-)\r
  65 \r
  66 diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el\r
  67 index 1ca8056..f3a4e5a 100644\r
  68 --- a/emacs/notmuch-mua.el\r
  69 +++ b/emacs/notmuch-mua.el\r
  70 @@ -62,7 +62,7 @@ disabled: this would result in an incorrect behavior."))\r
  71                  (const :tag "Compose mail in a new window"  new-window)\r
  72                  (const :tag "Compose mail in a new frame"   new-frame)))\r
  73  \r
  74 -(defcustom notmuch-mua-user-agent-function 'notmuch-mua-user-agent-full\r
  75 +(defcustom notmuch-mua-user-agent-function nil\r
  76    "Function used to generate a `User-Agent:' string. If this is\r
  77  `nil' then no `User-Agent:' will be generated."\r
  78    :type '(choice (const :tag "No user agent string" nil)\r
  79 @@ -73,7 +73,7 @@ disabled: this would result in an incorrect behavior."))\r
  80                            :value notmuch-mua-user-agent-full))\r
  81    :group 'notmuch-send)\r
  82  \r
  83 -(defcustom notmuch-mua-hidden-headers '("^User-Agent:")\r
  84 +(defcustom notmuch-mua-hidden-headers nil\r
  85    "Headers that are added to the `message-mode' hidden headers\r
  86  list."\r
  87    :type '(repeat string)\r
  88 diff --git a/test/T310-emacs.sh b/test/T310-emacs.sh\r
  89 index 65c1728..202fc3b 100755\r
  90 --- a/test/T310-emacs.sh\r
  91 +++ b/test/T310-emacs.sh\r
  92 @@ -193,7 +193,6 @@ emacs_deliver_message \\r
  93       (kill-whole-line)\r
  94       (insert "To: user@example.com\n")'\r
  95  sed \\r
  96 -    -e s',^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' \\r
  97      -e s',^Message-ID: <.*>$,Message-ID: <XXX>,' \\r
  98      -e s',^\(Content-Type: text/plain\); charset=us-ascii$,\1,' < sent_message >OUTPUT\r
  99  cat <<EOF >EXPECTED\r
 100 @@ -201,7 +200,6 @@ From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 101  To: user@example.com\r
 102  Subject: Testing message sent via SMTP\r
 103  Date: 01 Jan 2000 12:00:00 -0000\r
 104 -User-Agent: Notmuch/XXX Emacs/XXX\r
 105  Message-ID: <XXX>\r
 106  MIME-Version: 1.0\r
 107  Content-Type: text/plain\r
 108 @@ -310,7 +308,6 @@ test_emacs '(let ((message-hidden-headers ''()))\r
 109             (test-output))'\r
 110  sed -i -e 's/^In-Reply-To: <.*>$/In-Reply-To: <XXX>/' OUTPUT\r
 111  sed -i -e 's/^References: <.*>$/References: <XXX>/' OUTPUT\r
 112 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 113  cat <<EOF >EXPECTED\r
 114  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 115  To: user@example.com\r
 116 @@ -318,7 +315,6 @@ Subject: Re: Testing message sent via SMTP\r
 117  In-Reply-To: <XXX>\r
 118  Fcc: ${MAIL_DIR}/sent\r
 119  References: <XXX>\r
 120 -User-Agent: Notmuch/XXX Emacs/XXX\r
 121  --text follows this line--\r
 122  Notmuch Test Suite <test_suite@notmuchmail.org> writes:\r
 123  \r
 124 @@ -335,7 +331,6 @@ test_emacs "(let ((message-hidden-headers '()))\r
 125             (notmuch-test-wait)\r
 126             (notmuch-search-reply-to-thread)\r
 127             (test-output))"\r
 128 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 129  cat <<EOF >EXPECTED\r
 130  From: Notmuch Test Suite <test_suite_other@notmuchmail.org>\r
 131  To: Sender <sender@example.com>\r
 132 @@ -343,7 +338,6 @@ Subject: Re: ${test_subtest_name}\r
 133  In-Reply-To: <${gen_msg_id}>\r
 134  Fcc: ${MAIL_DIR}/sent\r
 135  References: <${gen_msg_id}>\r
 136 -User-Agent: Notmuch/XXX Emacs/XXX\r
 137  --text follows this line--\r
 138  Sender <sender@example.com> writes:\r
 139  \r
 140 @@ -361,7 +355,6 @@ test_emacs "(let ((message-hidden-headers '()))\r
 141             (notmuch-test-wait)\r
 142             (notmuch-search-reply-to-thread)\r
 143             (test-output))"\r
 144 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 145  cat <<EOF >EXPECTED\r
 146  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 147  To: Sender <sender@example.com>, someone@example.com\r
 148 @@ -369,7 +362,6 @@ Subject: Re: ${test_subtest_name}\r
 149  In-Reply-To: <${gen_msg_id}>\r
 150  Fcc: ${MAIL_DIR}/sent\r
 151  References: <${gen_msg_id}>\r
 152 -User-Agent: Notmuch/XXX Emacs/XXX\r
 153  --text follows this line--\r
 154  Sender <sender@example.com> writes:\r
 155  \r
 156 @@ -382,7 +374,6 @@ test_emacs '(let ((message-hidden-headers ''()))\r
 157             (notmuch-show "id:20091118002059.067214ed@hikari")\r
 158                 (notmuch-show-reply)\r
 159                 (test-output))'\r
 160 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 161  cat <<EOF >EXPECTED\r
 162  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 163  To: Adrian Perez de Castro <aperez@igalia.com>, notmuch@notmuchmail.org\r
 164 @@ -390,7 +381,6 @@ Subject: Re: [notmuch] Introducing myself\r
 165  In-Reply-To: <20091118002059.067214ed@hikari>\r
 166  Fcc: ${MAIL_DIR}/sent\r
 167  References: <20091118002059.067214ed@hikari>\r
 168 -User-Agent: Notmuch/XXX Emacs/XXX\r
 169  --text follows this line--\r
 170  Adrian Perez de Castro <aperez@igalia.com> writes:\r
 171  \r
 172 @@ -447,7 +437,6 @@ test_emacs '(let ((message-hidden-headers ''()))\r
 173             (notmuch-show "id:cf0c4d610911171136h1713aa59w9cf9aa31f052ad0a@mail.gmail.com")\r
 174                 (notmuch-show-reply)\r
 175                 (test-output))'\r
 176 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 177  cat <<EOF >EXPECTED\r
 178  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 179  To: Alex Botero-Lowry <alex.boterolowry@gmail.com>, notmuch@notmuchmail.org\r
 180 @@ -455,7 +444,6 @@ Subject: Re: [notmuch] preliminary FreeBSD support\r
 181  In-Reply-To: <cf0c4d610911171136h1713aa59w9cf9aa31f052ad0a@mail.gmail.com>\r
 182  Fcc: ${MAIL_DIR}/sent\r
 183  References: <cf0c4d610911171136h1713aa59w9cf9aa31f052ad0a@mail.gmail.com>\r
 184 -User-Agent: Notmuch/XXX Emacs/XXX\r
 185  --text follows this line--\r
 186  Alex Botero-Lowry <alex.boterolowry@gmail.com> writes:\r
 187  \r
 188 @@ -521,7 +509,6 @@ test_emacs "(let ((message-hidden-headers '()))\r
 189             (notmuch-show \"id:${gen_msg_id}\")\r
 190             (notmuch-show-reply)\r
 191             (test-output))"\r
 192 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 193  cat <<EOF >EXPECTED\r
 194  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 195  To: \r
 196 @@ -529,7 +516,6 @@ Subject: Re: Reply within emacs to an html-only message\r
 197  In-Reply-To: <${gen_msg_id}>\r
 198  Fcc: ${MAIL_DIR}/sent\r
 199  References: <${gen_msg_id}>\r
 200 -User-Agent: Notmuch/XXX Emacs/XXX\r
 201  --text follows this line--\r
 202  Notmuch Test Suite <test_suite@notmuchmail.org> writes:\r
 203  \r
 204 @@ -546,7 +532,6 @@ test_emacs "(let ((message-hidden-headers '()))\r
 205               (notmuch-show \"id:$message_id\")\r
 206               (notmuch-show-reply)\r
 207               (test-output))"\r
 208 -sed -i -e 's,^User-Agent: Notmuch/.* Emacs/.*,User-Agent: Notmuch/XXX Emacs/XXX,' OUTPUT\r
 209  cat <<EOF >EXPECTED\r
 210  From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
 211  To: \r
 212 @@ -554,7 +539,6 @@ Subject: Re: Quote MML tags in reply\r
 213  In-Reply-To: <test-emacs-mml-quoting@message.id>\r
 214  Fcc: ${MAIL_DIR}/sent\r
 215  References: <test-emacs-mml-quoting@message.id>\r
 216 -User-Agent: Notmuch/XXX Emacs/XXX\r
 217  --text follows this line--\r
 218  Notmuch Test Suite <test_suite@notmuchmail.org> writes:\r
 219  \r
 220 -- \r
 221 2.8.1\r
 222 \r