rename thorndon mailing list

[etc/mutt.git] / .mutt / bgrun

diff --git a/.mutt/bgrun b/.mutt/bgrun
index 6e1663036baed216a6015286f61d3903f98ee80a..82e1748a448de9ccc91abebc53ec16084ab1ccbd 100755 (executable)
--- a/.mutt/bgrun
+++ b/.mutt/bgrun
@@ -37,21 +37,38 @@ launch_viewer() {
   run-mailcap --action=view "$1":"$2" > output.stdout 2> output.stderr
 }
 
   run-mailcap --action=view "$1":"$2" > output.stdout 2> output.stderr
 }
 

-MIMETYPE="$1"
-TEMPFILE=$(tempfile -d . -p mutt -s $(guess_extension "$MIMETYPE"))
+MIMETYPE="$1"; shift
+
+get_file() {
+  local t
+  if [ -z "$1" ]; then
+    t=$(tempfile -d . -p mutt -s $(guess_extension "$MIMETYPE"))
+    cat > "$t"
+    echo "$t"
+  else
+    t="$(echo ${1##*/} | sed -re 's![^[:alnum:],.@%^+=_-]!_!gi')"
+    cp "$1" "$t"
+    echo "$t"
+  fi
+}
+
+notify_output() {
+  if [ -s "$TMPDIR/output.stdout" ] || [ -s "$TMPDIR/output.stderr" ]; then
+    notify $TMPDIR/output.stdout $TMPDIR/output.stderr \
+      "Output from mutt/$SELF on $BASENAME"
+  fi
+}

 
 case "$SELF" in
   (bgrun)
     # make a copy of the file, then launch a shell process in the background
     # to divert to run-mailcap, after which the temporary directory gets
     # cleaned up.
 
 case "$SELF" in
   (bgrun)
     # make a copy of the file, then launch a shell process in the background
     # to divert to run-mailcap, after which the temporary directory gets
     # cleaned up.

-    cat > "$TEMPFILE"
+    FILE="$(get_file "${1:-}")"

     (
     (

-    launch_viewer "$MIMETYPE" "$TEMPFILE"
-      if [ -s "$TMPDIR/output.stdout" ] || [ -s "$TMPDIR/output.stderr" ]; then
-        notify $TMPDIR/output.stdout $TMPDIR/output.stderr \
-          "Output from mutt/$SELF on $BASENAME"
-      fi
+      launch_viewer "$MIMETYPE" "$FILE"
+      notify_output
+      sleep 1

       cleanup
     ) &
     trap - 1 2 3 4 5 6 7 8 10 11 12 13 14 15
       cleanup
     ) &
     trap - 1 2 3 4 5 6 7 8 10 11 12 13 14 15


@@ -60,16 +77,26 @@ case "$SELF" in
     # hack to stay around until the viewer has read the file: make a fifo and
     # wait for the cat process to finish writing to it, which means that it
     # must have been consumed on the other end.
     # hack to stay around until the viewer has read the file: make a fifo and
     # wait for the cat process to finish writing to it, which means that it
     # must have been consumed on the other end.

-    cat > "$TEMPFILE"
-    FIFO="${TEMPFILE%/*}/fifo-${TEMPFILE##*/}"
+    FILE="$(get_file "${1:-}")"
+    FIFO="${FILE%/*}/fifo-${FILE##*/}"

     mkfifo "$FIFO"
     mkfifo "$FIFO"

-    cat "$TEMPFILE" > "$FIFO" &
+    cat "$FILE" > "$FIFO" &

     # For some reason, we do have to write a tempfile and cannot seem to
     # redirect stdin directly to the fifo, i.e. this does not work instead of
     # the previous three lines:
     ## cat > "$FIFO" &
     launch_viewer "$MIMETYPE" "${FIFO}"
     # For some reason, we do have to write a tempfile and cannot seem to
     # redirect stdin directly to the fifo, i.e. this does not work instead of
     # the previous three lines:
     ## cat > "$FIFO" &
     launch_viewer "$MIMETYPE" "${FIFO}"

+    notify_output

     wait
     cleanup
     ;;
     wait
     cleanup
     ;;

+  (bgrun-delay)
+    # hack to stay around for a fixed period of time after the viewer process
+    # returns control to the caller, so that we can clean up. This is for
+    # cases when the FIFO method doesn't work, because e.g. Firefox randomly
+    # chooses it needs to read HTML files twice.
+    FILE="$(get_file "${1:-}")"
+    (launch_viewer "$MIMETYPE" "${FILE}" && notify_output) &
+    (sleep 1m && cleanup) &
+    ;;

 esac
 esac