diff options
Diffstat (limited to 'feed')
| -rwxr-xr-x | feed | 83 |
1 files changed, 83 insertions, 0 deletions
| @@ -0,0 +1,83 @@ | |||
| 1 | #!/bin/sh | ||
| 2 | |||
| 3 | # RSS feed manager | ||
| 4 | |||
| 5 | # Requires: sfeed, sfeed_plain (get), dmenu, open-url (menu) | ||
| 6 | |||
| 7 | # Usage: feed [-m menu] [get|menu|clear|edit] | ||
| 8 | |||
| 9 | dir=$HOME/box/sfeed | ||
| 10 | feeddir=$dir/urls | ||
| 11 | destdir=$dir/new | ||
| 12 | olddir=$dir/old | ||
| 13 | readdir=$dir/last | ||
| 14 | menu="dmenu -l 20 -i" | ||
| 15 | urlopener=open-url | ||
| 16 | |||
| 17 | usage() { | ||
| 18 | echo "Usage: feed [get|menu|clear|show]" | ||
| 19 | } | ||
| 20 | |||
| 21 | getnew() { | ||
| 22 | for f in "$feeddir"/*; do | ||
| 23 | read -r url < "$f" | ||
| 24 | name=$(basename "$f") | ||
| 25 | d="$destdir/$name" | ||
| 26 | r="$readdir/$name" | ||
| 27 | |||
| 28 | [ -f "$r" ] && read -r lr < "$r" || lr=0 | ||
| 29 | |||
| 30 | # Get new feed items | ||
| 31 | tmp=$(mktemp) | ||
| 32 | curl -s "$url" | sfeed | \ | ||
| 33 | awk -v lr="$lr" '$1 > lr {print $0}' | \ | ||
| 34 | tee "$tmp" | sfeed_plain >> "$d" | ||
| 35 | |||
| 36 | # Update last time stamp | ||
| 37 | awk -v lr="$lr" '$1 > lr {lr=$1} END {print lr}' <"$tmp" >"$r" | ||
| 38 | done | ||
| 39 | } | ||
| 40 | |||
| 41 | showmenu() { | ||
| 42 | cat "$destdir"/* | $menu | awk '{print $NF}' | xargs $urlopener | ||
| 43 | } | ||
| 44 | |||
| 45 | while getopts "m:" opt; do | ||
| 46 | case "$opt" in | ||
| 47 | m) | ||
| 48 | menu="$OPTARG" | ||
| 49 | ;; | ||
| 50 | *) | ||
| 51 | usage | ||
| 52 | exit 1 | ||
| 53 | ;; | ||
| 54 | esac | ||
| 55 | done | ||
| 56 | |||
| 57 | shift $((OPTIND - 1)) | ||
| 58 | |||
| 59 | if [ -z "$1" ]; then | ||
| 60 | usage | ||
| 61 | exit 1 | ||
| 62 | fi | ||
| 63 | |||
| 64 | case "$1" in | ||
| 65 | get) | ||
| 66 | getnew | ||
| 67 | ;; | ||
| 68 | menu) | ||
| 69 | showmenu | ||
| 70 | ;; | ||
| 71 | clear) | ||
| 72 | d="$olddir/$(date +'%Y-%m-%d-%H-%M-%S')" | ||
| 73 | mkdir "$d" | ||
| 74 | mv "$destdir"/* "$d/" | ||
| 75 | ;; | ||
| 76 | show) | ||
| 77 | cat "$destdir"/* | ||
| 78 | ;; | ||
| 79 | *) | ||
| 80 | usage | ||
| 81 | exit 1 | ||
| 82 | ;; | ||
| 83 | esac | ||
