#!/bin/bash
#Get the pics
#set -x
DIR=~/Pictures/to_post
MESSAGE=$DIR/newspost.txt
NUM_PIC=24 #number of pictures to be posted
QUEUE2=`find ~/Pictures/to_work_on/wpm|wc -l`
GROUP='alt.binaries.pictures.wallpaper'
#GROUP='al.binares.test'

# COUNTING     : Counting and sorting files {{{
COUNTING ()
{
find $DIR/t -name "*.jpg" >> $DIR/files.txt

TOTAL=`wc -w < $DIR/files.txt`
for COUNT in `seq $NUM_PIC` #35
do
	if [ $TOTAL = "0" ]
	then
		rm $DIR/files.txt
		exit
	fi
	FILE=`head -$((($RANDOM * 32678 +$RANDOM) % $TOTAL + 1)) $DIR/files.txt|tail -1|awk -F: '{print $NF}'`
	echo $FILE >> end_file.txt
	grep -v $FILE $DIR/files.txt > $DIR/files.txt.tmp
	mv $DIR/files.txt.tmp $DIR/files.txt
	let TOTAL=TOTAL-1
done
rm $DIR/files.txt
cat > $MESSAGE <<EOF
Hello everybody,

1920 x 1200 wallpapers. Might contain nudity. Look at the 00.index.jpg
for more details on the pictures.

At this moment I have another $TOTAL waiting in queue to be posted.
That is a total of `echo $TOTAL/$NUM_PIC|bc` days, `echo $TOTAL/$NUM_PIC/7|bc` weeks or some 11 months.

Next to that, there are some $QUEUE2 waiting to be processed and turned
into wallpapers. That is another `echo $QUEUE2/$NUM_PIC|bc` days.

If I reposted other peoples work, my appologies. I do try to keep things
seperated as much as possible.

houghi
EOF
}
# /* }}} */
# MOVE_FILES   : Moveing or copying files {{{
MOVE_FILES ()
{
for FILE in `cat end_file.txt`
do
	# Move the files
	mv $FILE $DIR/.
	# Copy the files
#	cp $FILE $DIR/.
done
rm  end_file.txt
}
# }}}
# WATERMARK    : Watermark the pictures {{{
WATERMARK ()
{
	for FILE in `ls $DIR/*.jpg`
	do
		nice composite -gravity SouthWest $DIR/stamp.png $FILE $FILE
	done
}
# }}}
# INDEXING     : Make an index {{{
INDEXING ()
{
	DATE=`date +%Y%m%d`
	nice montage -fill \#233C7A -tile 6x4 \
	-label %wx%h\\n%f \
	-border 9 -geometry  200x160 \
	-frame 6x5 -background \#ADB5CA $DIR/*.jpg \
	-title  "Various wallpapers by houghi" $DIR/%02d.index.$DATE.jpg
	mogrify -crop 0x0+5+0 $DIR/*.index.$DATE.jpg
	mogrify -crop 0x0-5+0 $DIR/*.index.$DATE.jpg
	# Make it look nice
	for TFILE in `ls $DIR/*.index.*`
	do
		convert -bordercolor \#ADB5CA -border 50x20 $TFILE $TFILE
		convert -mattecolor \#ADB5CA -frame 25x25+0+25 $TFILE $TFILE
		convert -bordercolor \#ADB5CA -border 200x80 $TFILE $TFILE
	done
}
# }}}
# POSTING      : Post the pics {{{
POSTING ()
{
#/usr/local/bin/newspost -v -e $DIR/newspost.txt \
/usr/local/bin/newspost -e $DIR/newspost.txt \
-s "houghi's wallpapers. May contain nudity" \
-n $GROUP \
$DIR/*.jpg && CLEANING
}
# }}}
# CLEANING     : Move the files and clean {{{
CLEANING ()
{
rm $DIR/00.index*
for I in `ls $DIR/*.jpg`
do
	mv $I /home/houghi/Pictures/processed/to_archive/to_sort/.
done
rm $DIR/*.rar $MESSAGE
}
# /* }}} */
# The script {{{
COUNTING
MOVE_FILES
WATERMARK
INDEXING
#exit
POSTING
# /* }}} */