HACKING 120% {Hacking, programmazione, computer & molto altro}

[Bash] Brutal Porn

« Older   Newer »
  Share  
vogy
view post Posted on 8/7/2014, 13:49     +1   -1




Come tutti ben sappiamo internet è semi-distrutta dai trogloditi che vivono h24 sui social network.
Nella speranza di migliorare la rete nel mio piccolo ho creato questo scriptino per usarne al meglio la parte più utile, che è ovviamente IlPorno.
È scritto in un bellissimo Bash da manuale, anche per unire l'importanza di GNU/Linux con quella del Porno, mi sembrava importante.
Per funzionare richiede Curl e Mplayer con cui estrae e riproduce gli ultimi video di BrutaleGapingAnale (con il periodo estivo mi parava azzeccato, comunque potete cambiare) da xHamster e ha tre fantastiche opzioni:

> l'opzione '-c' vi permette di vedere Porni a ciclo continuo, se ad esempio doveste trovare che l'Orefizio visualizzato non è trattato Brutalmente come vi piace, basta chiudere Mplayer e parte quello successivo. Lo scopo principale di questa opzione è quella di permettere all'utente di Stramazzarsi di Porno.

> l'opzione '-s' permette di settare un arco di tempo medio in minuti. All'interno dell'intervallo, così alla cazzo di cane, può partire un video porno a forte DilaniamentoAnale. L'utilità di questa funzione è farci fare figure di merda in ogni momento! Che ne so: quando si è in compagnia romantica, quando viene il prete a benedire la casa, quando la vostra figlioletta arriva a mostrarvi la Winx nuova ecc. In ogni momento della vostra giornata può arrivare un maxi-smerdamento grazie all'opzione '-s'

> l'opzione '-n' è quella più curata per il semplice fatto che non serve assolutamente a nulla e non fa assolutamente nulla. La sua utilità è quella di dire all'utente che non serve a nulla.

Il programma è testato anche su Cygwin per coloro che usano SO proprietari adatti ai videogiochi, non so cosa vengano a fare in un forum di hacking però si dice che ci siano.

CODICE
#!/bin/bash
# This program wish you to see much more BrutalAnalPorn
# it requires: curl, mplayer, a_brain, be_horny
# [Greetings To xHamster.com]

# Don't like BrutalAnal? Dreaming big cock shemales destroying your ass?
# Chose xHamster category: http://xhamster.com/channels.php
CATEGORY="http://xhamster.com/channels/new-gaping-1.html"

CURL=`which curl`
MPLAYER=`which mplayer`
TMPFILE="/tmp/AllCumLinks"
PASTVIEW="/tmp/LastCumLink"

function get_n_play {
       curl "$CATEGORY" | grep "vDate" | \
       sed -e "s/<a href='/\n/g" -e "s/.html/.html\n/g" | grep ".html" | \
       grep -v "channels" > "$TMPFILE"
       # already seen it?
       line="1"
       last=`wc -l $TMPFILE | cut -d " " -f 1`
       while [ "$line" -le "$last" ]
       do
               myfile=`head -n $line $TMPFILE | tail -n 1`
               grep "$myfile" "$PASTVIEW"
               if [ $? -ne 0 ]; then
                       echo "$myfile" >> "$PASTVIEW"
                       toplay=`curl "$myfile" | grep "video poster" | cut -d '"' -f 4`
                       mplayer "$toplay"
                       break
               fi
               let line++
       done
}

function anytime {
       if ! [ "$1" -eq "$1" ] 2>/dev/null; then
               help_text
       fi
       if [ -z "$1" ] || [ "$1" -lt "0" ]; then
               help_text
       fi
       RANGE=$(( $1 * 60 ))
       if [ "$RANGE" -eq "0" ]; then
               while true; do get_n_play ; done
       fi
       while true
       do
               seconds="$RANDOM"
               let "seconds %= $RANGE"
               get_n_play
               sleep "$seconds"
       done
}

function nothing {
       NCOLS=`tput cols`
       NLINES=`tput lines`
       XPOS=$(( $(( $NCOLS / 2 )) - 11 ))
       YPOS=$(( $NLINES / 2 ))
       clear ; tput cup 0 0 ; echo -ne "\E[30;41m"
       for i in `seq $NLINES`; do
               for n in `seq $NCOLS`; do
                       tput cup $i $n ; echo -n " "
               done
       done
       tput cup $YPOS $XPOS
       echo -ne "NOTHING TO DO, STUPID!"
       tput cup `tput lines` `tput cols` ; tput sgr0
       exit 0
}
 
function help_text {
cat << EOF
`basename $0` : view much more BrutalPorn!!
Usage: `basename $0` [options]

Options:
 -c, --continuative          Don't like this video? Simply close it and
                             watch another one!!
 -s [mins], --silly [mins]   starts BrutalPorn whenever it likes!
                             [mins] is the average in minutes before
                             next video will start. (if set to '0' same
                             as optin '-c')
 -n, --not                   this option is totally useless
 -h, --help                  show this helpfile and exits

Fuck.U
EOF
exit 0
}

# main program
if [ -z "$CURL" ]; then
       echo "[err.127] Mhhh... It seems you don't have curl :("
       exit 127
fi
if [ -z "$MPLAYER" ]; then
       echo "[err.127] Have you got mplayer?"
       exit 127
fi
if [ ! -e "$PASTVIEW" ]; then
       echo > "$PASTVIEW"
fi
if [ `wc -l $PASTVIEW | cut -d " " -f 1` -gt 50 ]; then
       tail -n 50 "$PASTVIEW" > "$PASTVIEW"
fi

if [ -n "$1" ]; then
       case "$1" in
       -c | --continuative ) while true; do get_n_play ; done ;;
       -s | --silly ) anytime "$2" ;;
       -h | --help ) help_text ;;
       -n | --not ) nothing ;;
       * ) echo -e "Ok, you're an AssHole.\nType `basename $0` -h/--help..."
           exit 1 ;;
       esac
fi
get_n_play
exit 0

#EOF
 
Top
view post Posted on 8/7/2014, 17:05     +1   -1
Avatar

Water can take unforseen forms.

Group:
Founder
Posts:
5,273
Reputation:
+1,147
Location:
Shabang

Status:


Visto che siamo in tema social network.

 
Web  Top
1 replies since 8/7/2014, 13:49   390 views
  Share