Fritz!Load…

genuk

Entwickler

Registriert: am 30. Sep. 2013

Beiträge: 34

Neuer Hoster: filesfrog.net

Auch ganz frisch:

file: filesfrog__net.sh

#!/bin/ash
# Copyright (c) 2014 genuK/genuk@gmx.net
# Fritzload hosterplugin for http://filesfrog.net

DEBUG_GET=1

filesfrog_net_onlineStatus() {
        local url=$1
        local checklink="http://www.filesfrog.net/?op=checkfiles"
        local checkdata="op=checkfiles&process=Check+URLs&list="$url
        GET "$checklink" $f "--data $checkdata --cookie $c -cookie-jar $c" "GET-CHECKURL"

        if grep -q -i '<td style="color:red;">Not found!</td>' $f; then
                errmsg "=== Link: $param nicht gefunden. Link ungueltig ==="; return 1
        elif grep -q -i "<td style=\"color:red;\">Filename don't match!</td>" $f; then
                errmsg "=== Link: $param - Filename don't match!. Link ungueltig ==="; return 1
        elif grep -q -i '<td style="color:green;">Found</td>' $f; then
                print "=== Link: $param gefunden. Link gueltig ==="; return 0
        else
                errmsg "=== Link Check! Something doesn't work! Please report! ==="; return 1
        fi
}

filesfrog_net() {
        local filename filesize data download_link
        local f=$tmp/response.htm c=$tmp/dl.cookie.txt

        if ! filesfrog_net_onlineStatus "$param";then
                errmsg "URL-Adresse: Offline ($param)"
                return 1
        fi

        while [ $try -lt $retries ]; do
                try=$(($try+1))

                # get the url($param) from downloadlist and load the answer in $f
                GET "$param" $f "--cookie $c --cookie-jar $c" "GET1"

                # check http status code
                if [ "$H_CODE" = 404 ] && grep -qiE "<h3>File Not found</h3>" $f ;then
                        errmsg "SERVER-FEHLER: Link nicht gefunden!; HTTP-Statuscode: $H_CODE"
                        errmsg "Link Adresse falsch?"
                        return 1
                elif [ "$H_CODE" != 200 ]; then
                        errmsg "SERVER-FEHLER: $H_CODE"
                        return 1
                fi

                # extract the filename
                filename="$(formValue 'fname' $f 0)"
                if [ -z "$filename" ];then
                        # write the log and quit if "$filename" not found
                        errmsg "FAILED: Could not resolve FILENAME"
                        return 1
                fi
                print "=== Extracted filename is: $filename ==="
                notalreadyLoaded "$targetdir/$filename" || return

                # extract the form parameters values
                data="$(formParams 'op;id;fname;referer;method_free' $f 0)"
                print "=== Extracted Form-data is: $data ==="

                # submit the form-data and load the answer in $f
                GET "$param" $f "--data $data --cookie $c --cookie-jar $c" "GET2"

                # check http status code
                if [ "$H_CODE" = 404 ] && grep -qiE "<h3>File Not found</h3>" $f ;then
                        errmsg "SERVER-FEHLER: Link nicht gefunden!; HTTP-Statuscode: $H_CODE"
                        errmsg "Link Adresse falsch?"
                        return 1
                elif [ "$H_CODE" != 200 ]; then
                        errmsg "SERVER-FEHLER: $H_CODE"
                        return 1
                elif grep -q -i "<div class=\"err\">You have to wait" $f; then
                        print "=== Download limit erreicht. Versuche reconnect. ==="
                        { needReconnect; continue; }
                fi

                # extract the form parameters values
                data="$(formParams 'op;id;rand;referer;method_free;method_premium;down_direct' $f 0)"
                print "=== Extracted Form-data is: $data ==="

                # captcha processing
                if is_captcha $f; then
                        captcha_service_active || return
                        captcha_solution $f || continue
                else
                        captcha_type_unknown
                        return
                fi

                # submit the form+captcha and load the answer in $f
                GET "$param" $f "--data $data&$CAPTCHA_RESPOND --cookie $c --cookie-jar $c" "GET3"

                if grep -q -i '<div class="err">Wrong captcha' $f; then
                        print "'Wrong captcha' was found on the second page"
                        captcha_wrong
                        continue
                elif grep -q -i '<div class="err">Expired download session' $f; then
                        print "Expired download session"
                        continue
                elif grep -q  -i "<h3>File Download Link Generated</h3>" $f ||\
                        grep -q  -i "This direct link will be available for your IP next 8 hours" $f ; then
                        print "Download Link Button gefunden auf die 3. Seite"
                        captcha_correct
                else
                        errmsg "Something goes wrong. Plugin needs update? Please report!"
                        return 1
                fi

                # extract the filesize
                filesize="$(grep "Size:" $f | sed -e 's/^.*[^0-9]\(\([0-9]*\.[0-9]*\) [K\|M\|G][B\|b]\).*$/\1/')"
                print "=== Extracted filesize is: $filesize ==="

                # extract the download link
                download_link="$(grep "var download_url" $f | sed -e "s/\(.*var download_url = '\)\([^']*\).*/\2/")"
                if [ -z "$download_link" ]; then
                        errmsg "Der Download url konnte nicht gefunden werden, eine 2. Methode wird versucht..."
                        # try to get the download url from the ahref
                        download_link="$(grep '<a href=.*http.*'"$filename" $f | sed -e 's/\(.*a href=\"\)\([^\"\]*\)".*/\2/$
                elif [ -z "$download_link" ]; then
                        # write the log if "$download_link" not found
                        errmsg "FAILED: Could not resolve download URL"
                        return 1
                fi
                print "=== Extracted download_link is: $download_link ==="

                if download "$download_link" "$filename" "--cookie $c --cookie-jar $c";then
                        succes=1
                        break
                fi
        done
}

Testlinks via PM.

rolex0815

Entwickler

Registriert: am 29. Jun. 2012

Beiträge: 558

Antw.: Neuer Hoster: filesfrog.net

In der Zeile stimmt was nicht:

download_link="$(grep '<a href=.*http.*'"$filename" $f | sed -e 's/\(.*a href=\"\)\([^\"\]*\)".*/\2/$

genuk

Entwickler

Registriert: am 30. Sep. 2013

Beiträge: 34

Antw.: Neuer Hoster: filesfrog.net

  copy&paste aus nano:

			download_link="$(grep '<a href=.*http.*'"$filename" $f | sed -e 's/\(.*a href=\"\)\([^\"\]*\)".*/\2/')"

rolex0815

Entwickler

Registriert: am 29. Jun. 2012

Beiträge: 558

Antw.: Neuer Hoster: filesfrog.net

Eingecheckt.