]> Sergey Matveev's repositories - feeder.git/blob - urls2feeds
90b1341ad3202daae66583c74f91cec151262444
[feeder.git] / urls2feeds
1 #!/usr/bin/env zsh
2 setopt ERR_EXIT
3 fpath=($0:h:a/cmd/functions.zsh $fpath)
4 autoload url-to-filename
5 typeset -A seen
6 while read url ; do
7     url="$url " # to be sure that next line will work
8     url=${${=url}[1]}
9     dir=feeds/$(url-to-filename $url)
10     seen[$dir]=1
11     [[ -e $dir ]] && continue || :
12     mkdir -p $dir/{cur,new,tmp} # make it maildir
13     print -- "$url" > $dir/url
14     print $dir
15 done
16 for dir (feeds/*) [[ $seen[$dir] -eq 1 ]] || print disappeared: $dir