#!/usr/bin/env zsh
setopt ERR_EXIT EXTENDED_GLOB
cmds=$0:h:a
. $cmds/env.rc
fpath=($cmds/functions.zsh $fpath)
dst=$2:a
cd $1
[[ -n $dst ]] || { dst=encs ; dst=$dst:a }
mkdir -p $dst
autoload url-to-filename
zmodload -F zsh/datetime b:strftime
for new (new/*(N)) {
    while read line ; do
        [[ -n $line ]] || break
        cols=(${(s: :)line})
        [[ $cols[1] = "X-Enclosure:" ]] || continue
        url=$cols[2]
        [[ -n $url ]]
        fn=$(strftime %Y%m%d-%H%M%S)-$(url-to-filename $url)
        ${=WGET} --user-agent=$FEEDER_USER_AGENT \
            --output-document=$dst/$fn $url 2>&2 2>encs.log
        print $dst/$fn
    done < $new
}