X-Git-Url: https://git.sthu.org/?p=shutils.git;a=blobdiff_plain;f=dotfiles%2Fmutt%2Fscripts%2Fciscoclean;fp=dotfiles%2Fmutt%2Fscripts%2Fciscoclean;h=a94c4d5b449b86fba56e387523612a48a7e796e0;hp=0000000000000000000000000000000000000000;hb=209fa89db7684bc721bd9b30a8d00eeb1f6e651a;hpb=e7b2e754ab0f1198124536df89e468824e3ab001

diff --git a/dotfiles/mutt/scripts/ciscoclean b/dotfiles/mutt/scripts/ciscoclean
new file mode 100755
index 0000000..a94c4d5
--- /dev/null
+++ b/dotfiles/mutt/scripts/ciscoclean
@@ -0,0 +1,42 @@
+#!/bin/sh
+
+set -e
+
+PROG="$0"
+
+ciscowipe() {
+    # Remove secure-web.cisco.com prefix
+      sed -E "s!https?://secure-web.cisco.com/[^/ ]*/!!g" |
+    # URL decode
+     # Decodes all URL escape sequences
+     #sed -e 's!+! !g;s!%\([0-9A-Fa-f]\{2\}\)!\\x\1!g' | xargs -0 printf "%b"
+     # Decodes only some escape sequences, but leaves others, like spacs,
+     # as is.
+     sed 's!%3A!:!g;s!%2F!/!g;s!%3F!?!g;s!%3D!=!g;s!%26!\&!g'
+}
+
+usage() {
+    cat<<EOF
+Mr. Clean for Cisco's mail snakeoil. It restores the original URL from the URL
+generated by Cisco's mail security software.
+
+Usage:
+    $PROG -h
+    $PROG [FILE]...
+
+If no filename is given then stdin is processed. Otherwise all files passed are
+processed.
+EOF
+}
+
+if [ "$#" -eq 0 ]; then
+    ciscowipe
+else
+    for f in "$@"; do
+        if [ "$f" = "-h" ]; then
+            usage
+            exit
+        fi
+        cat "$f" | ciscowipe
+    done
+fi