whimsical-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject [whimsy] branch master updated: Add a simple app for generating ezmlm mail addresses
Date Sat, 09 Apr 2016 12:09:58 GMT
This is an automated email from the ASF dual-hosted git repository.

sebb pushed a commit to branch master
in repository https://git-dual.apache.org/repos/asf/whimsy.git

The following commit(s) were added to refs/heads/master by this push:
       new  b1a75f1   Add a simple app for generating ezmlm mail addresses
b1a75f1 is described below

commit b1a75f1ff9d6424fbbbcbd3f2e5598ff15b915d9
Author: Sebb <sebb@apache.org>
AuthorDate: Sat Apr 9 13:09:47 2016 +0100

    Add a simple app for generating ezmlm mail addresses
---
 tools/moderationhelper.rb           | 186 ++++++++++++++++++++++++++++++++++++
 www/committers/moderationhelper.cgi |   3 +
 2 files changed, 189 insertions(+)

diff --git a/tools/moderationhelper.rb b/tools/moderationhelper.rb
new file mode 100755
index 0000000..e6bdc1c
--- /dev/null
+++ b/tools/moderationhelper.rb
@@ -0,0 +1,186 @@
+#!/usr/bin/env ruby
+
+=begin
+APP to generate the correct ezmlm syntax for moderators
+=end
+
+require 'wunderbar'
+
+$SAFE = 1
+
+_html do
+  _style %{
+    textarea, .mod, label {display: block}
+    legend {background: #141; color: #DFD; padding: 0.4em}
+    .error, ._stderr {color: #F00}
+    table { border-collapse: separate; border-spacing: 50px 0; }
+  }
+  # ensure the generated text is selected ready for copy-pasting
+  _script %{
+    window.onload=function() {
+      var sel = window.getSelection();
+      sel.removeAllRanges();
+      var range = document.createRange();
+      var dest = document.getElementById('dest');
+      range.selectNodeContents(dest);
+      sel.addRange(range);
+      // TODO auto copy to clipboard (tricky)
+    }
+  }
+
+  _body? do
+    _form method: 'post' do
+      _fieldset do
+        _legend 'Mail Moderation Helper'
+        _h3.error do
+          _ 'This is a BETA version. ('
+          _a "Feedback", href: "mailto:dev@whimsical.apache.org?Subject=Feedback on moderation
helper app"
+          _ 'welcome.)'
+        end
+        _p 'This form generates the correct ezmlm mailing list address for various moderator
requests.'
+        _p do
+          _ 'Enter the ASF mailing list name, subscriber email (if needed) and press generate.'
+          _br
+          _ 'The generated To: address can be copy/pasted into an email, or you may find
the link works for you.'
+        end
+        _table do
+          _tr do
+            _th 'Mailing list'
+            _th 'Subscriber'
+          end
+          _tr do
+            _td do
+              _input.name name: 'maillist', size: 40, pattern: '[^@]+@([-\w]+)?', required:
true, value: @maillist,
+                placeholder: 'user@project or announce@'
+              _ '.apache.org '
+            end
+            _td do
+              _input.name name: 'email', size: 40, pattern: '[^@]+@[^@]+', value: @email,
placeholder: 'user@domain.example'
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "list", required: true, checked:
false
+                _ 'list (current subscribers)'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "subscribe", required: true, checked:
false
+                _ 'subscribe'
+              end              
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "log", required: true, checked:
false
+                _ 'log (history of changes to the subscribers)'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "unsubscribe", required: true,
checked: true
+                _ 'unsubscribe'
+              end              
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "allow-list", required: true, checked:
false
+                _ 'allow-list'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "allow-subscribe", required: true,
checked: false
+                _ 'allow-subscribe'
+              end              
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "allow-log", required: true, checked:
false
+                _ 'allow-log'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "allow-unsubscribe", required:
true, checked: false
+                _ 'allow-unsubscribe'
+              end              
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "deny-list", required: true, checked:
false
+                _ 'deny-list'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "deny-subscribe", required: true,
checked: false
+                _ 'deny-subscribe'
+              end              
+            end
+          end
+          _tr do
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "deny-log", required: true, checked:
false
+                _ 'deny-log'
+              end
+            end
+            _td do
+              _label do
+                _input type: "radio", name: "cmd", value: "deny-unsubscribe", required: true,
checked: false
+                _ 'deny-unsubscribe'
+              end              
+            end
+          end
+          _tr do
+            _td '(the above operate on the list only)'
+            _td '(the above require a subscriber email address)'
+          end
+        end
+        _p do
+          _ul do
+            _li 'subscribers can post and will receive mail'
+            _li 'allow-subscribers can post; they do not get copies of mails (this is used
for e.g. press@)'
+            _li 'deny-subscribers cannot post; their posts will be rejected without needing
moderation'
+          end
+        end
+        _input type: 'submit', value: 'Generate'
+      end
+    end
+
+    if _.post?
+      ml0,ml1 = @maillist.split('@')
+      if ml1
+        ml1 += '.apache.org'
+      else
+        ml1 = 'apache.org'
+      end
+      em = @email.split('@')
+      _br
+      _br
+      if @cmd.end_with? 'subscribe' # also catches unsubscribe
+        unless @email.length > 0
+          _h3.error 'Need subscriber email address'
+          break
+        end
+        dest = "#{ml0}-#{@cmd}-#{em[0]}=#{em[1]}@#{ml1}"
+      else
+        dest = "#{ml0}-#{@cmd}@#{ml1}"
+      end
+      _span.dest! dest
+      _br
+      _br
+      _a "Send Mail", href: "mailto:#{dest}?Subject=#{dest}"
+    end
+  end
+end
diff --git a/www/committers/moderationhelper.cgi b/www/committers/moderationhelper.cgi
new file mode 100755
index 0000000..48596b8
--- /dev/null
+++ b/www/committers/moderationhelper.cgi
@@ -0,0 +1,3 @@
+#!/usr/bin/env ruby
+
+require "../../tools/moderationhelper.rb"

-- 
To stop receiving notification emails like this one, please contact
['"commits@whimsical.apache.org" <commits@whimsical.apache.org>'].

Mime
View raw message