#!/bin/bash
# exp3rtti - experts-exchange:n tulkkaaja by Katja (fly5.kapsi.fi)
# hakee expert exchangen sivuilta jutut ihmisten kielelle käännettynä
# ja pipettää selaimeen/lukijaan/mihin ikinä, oletuksena lessiin. 
#
# DISCLAIMER tms.
# scripti on tehty vain ja ainoastaan omiin tarkoituksiini mielenkiinnosta
# kokeilla asian toteuttamista. se on julkaistu toiveena sen osoittautuvan
# jollekin iloksi ja hyödyksi. en ota MITÄÄN vastuuta siitä mitä scriptillä
# kukakin tekee tai mitä se tekee käyttäjälle.

osoite="$1"
temppi="/tmp/exp3rtti-1-$$"
temppi2="/tmp/exp3rtti-2-$$"
selain="`which less`"

if [ -z "$osoite" ]; then
	read -p "Anna osoite? " osoite
fi

if [ -z "$osoite" ]; then
	echo "Se osote.."
	exit 0
fi

wget -q -O "$temppi" "$osoite"

sed -n -e '/\<class="answerBody quoted\" id=\"intelliTxt\">/,/<\/div>/p' "$temppi" |
	sed -e 's/\&nbsp\;/ /g' \
	 	-e 's/\&amp\;/\&/g' \
		-e 's/\&gt\;/>/g' \
		-e 's/\&lt\;/</g' \
		-e 's/\&quot\;/"/g' \
        -e 's/<br>//g' \
        -e 's/<br.>//g' \
        -e 's/<br .>/\n/g' \
		-e 's/\<class="answerBody quoted\" id=\"intelliTxt\">//g' \
		-e 's/<\/div>//g' \
	    	-e 's/<wbr \/>//g' \
		-e 's/^[ \t]*<//g' > $temppi2

rivit="`sed -n '$=' $temppi2`"
puolet="`expr $rivit / 2`"

EKA=`awk ' NR==1,NR=='"${puolet}"' ' $temppi2`
TOKA=`awk ' NR=='"${puolet}"',NR=='"${rivit}"' ' $temppi2`

awk ' NR=='"${puolet}"',NR=='"${rivit}"' ' $temppi2 | $selain

rm $temppi $temppi2

exit 0


## tallessa varuiks:
# rot13 jota ei tarvittu. jos haluut leikkiä tuloksella niin että rot13
# mukana, asetin sinne muuttujat EKA ja TOKA. eka on tota hienoa "kryptausta"
# ja toka on se sama mikä tulostuu muutenkin. siitä vaan vaikka diffillä
# kokeilee huikeita eroja tai purkamaan tota salakoodia :P
# cat "$@" | tr 'a-zA-Z' 'n-za-mN-ZA-M'
##
# html tagien parsija jota ei tarvittu. vois pitää tallessa kuitenki.
# -e :a -e 's/<[^>]*>//g;/</N;//ba'
##
# 24.07.2007 tänään toimii, huomisesta en tiiä..
##