Widgetbilder aus Forumpost downloaden

Dieses Skript lädt alle Widgetbilder aus dem Downloadbereich herunter und speichert sie im Ordner ~/Downloads/WidgetPNGs/. Man kann das Skript wiederholt laufen lassen, es werden nur die neu hinzugekommenen Widgetbilder heruntergeladen.

Unter Ausführen von Skripten wird erklärt wie Skripte richtig verwendet werden.

Ausführen als Benutzer, nicht als root.

download-widget-pngs.sh


 * 1) !/bin/bash

FORUM_BASE_URL="http://www.wetab-community.com" FORUM_POST_URL="$FORUM_BASE_URL/index.php?/files/category/5-wetab-widgets-bilder/page__sort_by__DESC__sort_key__file_submitted__num__10__st__" FORUM_DOWNLOAD_URL="$FORUM_BASE_URL/index.php?/files/download" DESTINATION=~/Downloads/WidgetPNGs/ TMPDIR="$(mktemp -d)" TMPFILE="$(mktemp)"

PAGER="0" NEXTPAGE="chste Seite"

if [ $UID -eq 0 ] ; then echo "do not run as root" exit 1; fi

mkdir -p "$DESTINATION"

STOP=0 while [ $STOP -eq 0 ] ; do

echo "downloading forum post $PAGER..." curl --url "$FORUM_POST_URL$PAGER" --out "$TMPFILE" -# echo

# http://www.wetab-community.com/index.php?/files/file/73-wade-hell-bg/#comments cp "$TMPFILE" "post-$PAGER.html" cat "$TMPFILE" | perl -ne 'BEGIN {undef $/} while (m|/files/file/(\d+)-([^/]+)/#comments|cgis) { print "$1-$2:$2-$1.png\n" }' | \ while read PICURL_AND_FILENAME ; do   PICLINK="$(echo "$PICURL_AND_FILENAME" | perl -pe 's/^(.*):.*/$1/')" PICURL="$FORUM_DOWNLOAD_URL/$PICLINK/"

PICNAME="$(echo "$PICURL_AND_FILENAME" | perl -pe 's/.*:(.*)$/$1/')" PICFILE="$TMPDIR/$PICNAME"

if [ ! -s "$DESTINATION$PICNAME" ] ; then echo echo "downloading image $PICNAME..." curl --url "$PICURL" --out "$PICFILE" -# cp "$PICFILE" "$DESTINATION" rm -f "$PICFILE" fi done

PAGER="$(( $PAGER + 10 ))"

if ! grep "$NEXTPAGE" "$TMPFILE" > /dev/null ; then rm -f "$TMPFILE" STOP=1 fi

done

rm -f "$TMPFILE" rmdir "$TMPDIR"