Ahoj,
někdy dříve jsem si na netu všiml, že je napsaný script pro stažení tapet z National Geographic pro rok 2008 a 2009. Pro minulý rok ale nic nebylo, tak jsem si řekl, co bych pro lidi neudělal, že
Takže tady je můj script (snad tam nejsou chyby):
#!/bin/bash
clear
dir="/home/"$USER"/.ng_tapety"
wall_dir="./2010_wallpapers"
con_dir="./2010_photo_contest"
month=1
month2="01"
month_names="
jan
feb
mar
apr
may
jun
jul
aug
sept
oct
nov
dec"
wall_url="http://ngm.nationalgeographic.com/wallpaper/img/2010/"
con_numbers="
267
270
272
274
275
276
280
281
282
283
284
288
291
292
294
295
300"
if [ -e $dir ]; then
echo "Directories are already created."
else
mkdir $dir
cd $dir
mkdir $wall_dir
mkdir $con_dir
echo "Directories was successfully created."
fi
function wallpapers-download() {
cd $wall_dir
for i in $month_names; do
a=1
for b in {1..30}; do
wget -c -nc $wall_url$month2"/"$i"10wallpaper-"$a"_1600.jpg"
a=$((a+1))
done
month=$((month+1))
if [ $month -le 9 ]; then
month2="0"$month
else
month2=$month
fi
done
cd ../
}
function contest-download() {
cd $con_dir
for b in $con_numbers; do
a=1
for i in {1..99}; do
wget -nc -c "http://images.nationalgeographic.com/wpf/media-live/photos/000/"$b"/custom/"$b$a"_1600x1200-wallpaper.jpg"
a=$((a+1))
done
done
cd ../
}
function menu() {
echo "
*****************************************
National Geographic wallpapers downloader
Created by Kamil Hanus, 2011
GNU/GPL license
*****************************************
Choose from the list:
1) Download National Geographic photo contest wallpapers 2010 (slow, but i recommend)
2) Download National Geographic wallpapers for year 2010
3) Download both options
--------------------------------------------------------
4) Exit
enter nuber:
"
read response
case $response in
"1" )
contest-download
echo "
Contest wallpapers was downloaded.
Press Enter to exit...
"; read
return ;;
"2" )
wallpapers-download
echo "
National Geographic wallpapers for year 2010 was downloaded.
Press Enter to exit...
"; read
return ;;
"3" )
contest-download
wallpapers-download
echo "
National Geographic wallpapers for year 2010 and contest wallpapers was downloaded.
Press Enter to exit...
"; read
return ;;
"4" )
return ;;
*)
echo "Invalid option, try it again..."
menu ;;
esac
}
menu
exit 0
Jako první možnost je tam stažení tapet z fotografické soutěže NG, avšak je to dost pomalé. Nenalezl jsem v řazení fotek žádnou logiku a tak se musí wgetem prostě zkusit stáhnout obrázek a buď tam je, a nebo ne. Mělo by se jednat pouze o fotky z roku 2010.
Druhá volba jsou fotografie z časopisu NG, ze kterých udělali tapety. Tam to bylo dost jednoduché
Snad se to tedy někomu bude líbit, případně mi prosím napište, jestli jsem někde neudělal ve scriptu chybu...
PS: Ne že uděláte automatické měnění tapet, to si chci ještě vychutnat
//EDIT
Dohromady to je ~500 tapet o velikosti 420MB