Changeset 467 for trollforge/jmax


Ignore:
Timestamp:
05/07/11 19:43:27 (2 years ago)
Author:
literalka
Message:

jews

Location:
trollforge/jmax/proxysuite
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trollforge/jmax/proxysuite/proxysuite.pl

    r247 r467  
    11#!/usr/bin/perl 
    2  
    3 # This is proxysuite, written in GNU/PURL 
    4 # by Jmax, of bantown and the GNAA. 
    5 # It gathers and tests http proxies 
    6  
    7 # This product is licensed under the BPL. 
    8 # You should have recieved a copy of the 
    9 # license with this program, along with 
    10 # the README, sockssuite.pl, sites.txt,  
    11 # and sockssites.txt 
    12  
    13 # el8 tr0ll c0dez by Jmax [ BANTOWN irc.bantown.com #bantown ] [ GNAA irc.gnaa.us #gnaa ] 
    14  
    15 use warnings; 
     2# This is proxysuite, written in GNAA/PURL by Jmax, of bantown and the GNAA and updated by Leon Kaiser of the GNAA. It gathers and tests http proxies 
     3# This product is licensed under the BPL. You should have recieved a copy of the license with this program, along with the README, sockssuite.pl, sites.txt, and sockssites.txt 
     4 
     5#use warnings; 
    166use strict; 
    177# for forking 
    … …  
    2616use HTML::Form; 
    2717use vars qw($VERSION); 
    28 $VERSION = "2.5.1-http"; 
     18$VERSION = "3.0.0"; 
    2919 
    3020#------------------------------------------------ 
    … …  
    3323 
    3424# time in seconds to wait for a proxy to timeout 
    35 my $timeout = 2; 
     25my $timeout = 10; 
    3626 
    3727# query to google for 
    38 my $query = "gnaa"; 
     28my $query = "google"; 
    3929 
    4030# user agent to use 
    41 my $agent = "JEW/Lunix FireFAKE 1.5.101"; 
     31my $agent = "Mozilla/5.0 (compatible; Konqueror/2.2.2; Linux 2.4.14-xfs; X11; i686)"; 
    4232 
    4333#------------------------------------------------ 
    … …  
    9686    test_proxies(@proxies); 
    9787} elsif ($print_help_message) { 
    98     print "proxysuite version $VERSION by Jmax\n". 
     88    print "proxysuite version $VERSION by Jmax and Leon Kaiser\n". 
    9989          "\n". 
    10090          "\n". 
    … …  
    113103          "        store the un-tested proxies.\n"; 
    114104} elsif ($print_version_message) { 
    115     print "proxysuite version $VERSION by Jmax\n"; 
     105    print "proxysuite version $VERSION by Jmax and Leon Kaiser\n"; 
    116106} else { 
    117107    print "!!!! please run 'perl proxysuite.pl --help' for more information\n"; 
    … …  
    175165    open(GETONLY, ">proxies.getonly.txt") or die "!!!! couldn't open proxies.getonly.txt: $!\n"; 
    176166    open(CANPOST, ">proxies.canpost.txt") or die "!!!! couldn't open proxies.canpost.txt: $!\n"; 
     167    open(BLKLIST, ">proxies.blklist.txt") or die "!!!! couldn't open proxies.blklist.txt: $!\n"; 
    177168    GETONLY->autoflush(1); 
    178169    CANPOST->autoflush(1); 
     170    BLKLIST->autoflush(1); 
    179171    for ($forkcount = 0; $forkcount < $maxfork; $forkcount++) { # $forkcount must _not_ be local to here 
    180172        sleep 1;                          # so we don't overload ourselves 
    … …  
    191183    close(GETONLY) or warn "!!!! couldn't close proxies.getonly.txt: $!\n"; 
    192184    close(CANPOST) or warn "!!!! couldn't close proxies.canpost.txt: $!\n"; 
     185    close(BLKLIST) or warn "!!!! couldn't close proxies.blklist.txt: $!\n"; 
    193186    print ">>>> Testing complete.\n"; 
    194187} 
    … …  
    199192            printf '%-25s', $proxy; 
    200193            print "FAILURE - BLACKLISTED PROXY\n";  
     194            print BLKLIST "$proxy\n"; 
    201195            next PROXYTEST; 
    202196        } 
    … …  
    208202        $pseudo_browser->timeout($timeout); 
    209203        # set up GET  
    210         my $GET_page = HTTP::Request->new(GET => 'http://www.google.com/webhp'); 
     204        my $GET_page = HTTP::Request->new(GET => 'http://www.google.com/m'); 
    211205        # GET 
    212206        my $GET_result = $pseudo_browser->request($GET_page); 
    213207        # check GET result 
    214208        my $POST_result; 
    215         if (($GET_result->is_success) && ($GET_result->content =~ /&copy;\d* Google/)) { 
     209        if (($GET_result->is_success) && ($GET_result->content =~ /&copy;/)) { 
    216210            # POST 
    217211            my $form = HTML::Form->parse($GET_result); 
    … …  
    225219        # check POST result 
    226220        if ($POST_result->is_success) { 
    227             if ($POST_result->decoded_content !~ /Results.*for <b>$query<\/b>/i) { 
     221            if ($POST_result->decoded_content !~ /<title> $query - google search <\/title>/i) { 
    228222                printf '%-25s', $proxy; 
    229223                print "FAILURE - UNKNOWN\n"; 
    … …  
    242236 
    243237sub is_blacklisted { 
    244     my $full_proxy = $_[0]; 
    245     my ($first_octet, $second_octet, $third_octet, $fourth_octet, $port) = $full_proxy =~ /(\d+)\.(\d+)\.(\d+)\.(\d+):(\d+)/; 
    246     # check against my blacklist 
    247     if ($first_octet =~ /^(?:6|7|11|21|22|25|26|29|30|49|50|55|164|155|147|144|143|140|138|137|132|131|128|129|134|136|138|139|205|216|160|150)$/) { 
    248         return 1;   
    249     } elsif ($first_octet == 207 && $second_octet =~ /60|61|120/) {  
    250         return 1;   
    251     } elsif ($first_octet == 204 && $second_octet == 34) {  
    252         return 1;   
    253     } elsif ($first_octet == 163 && $second_octet =~ /205|206/) {  
    254         return 1;   
    255     } elsif ($first_octet == 158 && $second_octet =~ /(?:[0-9]|1[0-9]|2[0-9]|30)/) {  
    256         return 1;   
    257     } elsif ($first_octet == 158 && $second_octet =~ /(?:23[5-9]|24[0-9]|25[0-5])/) {  
    258         return 1;   
    259     } elsif ($first_octet == 153 && $second_octet =~ /(?:2[1-9]|3[0-1])/) { 
    260         return 1;   
    261     } elsif ($first_octet == 24 && $second_octet == 198) { 
    262         return 1;   
    263     } elsif ($first_octet == 62 && $second_octet =~ /(?:[0-9]|2[0-9]|30)/) { 
    264         return 1;   
    265     } elsif ($first_octet == 64 && $second_octet =~ /70|224|225|226/) { 
    266         return 1;   
    267     } elsif ($first_octet == 212 && $second_octet =~ /56|143|149|159|179|208/) { 
    268         return 1;   
    269     } elsif ($first_octet == 158 && $second_octet =~ /(?:23[5-9]|24[0-9]|25[0-5])/) { 
    270         return 1;   
    271     } elsif ($first_octet == 146 && $second_octet =~ /17|80|98|154|165/) { 
    272         return 1;   
    273     } elsif ($first_octet == 148 && $second_octet == 114) { 
    274         return 1;   
    275     } elsif ($first_octet == 152 && $second_octet =~ /82|151|152|154|229/) { 
    276         return 1;   
    277     } elsif ($first_octet == 156 && $second_octet == 9) { 
    278         return 1;   
    279     } elsif ($first_octet == 159 && $second_octet == 120) { 
    280         return 1;   
    281     } elsif ($first_octet == 161 && $second_octet == 124) { 
    282         return 1;   
    283     } elsif ($first_octet == 167 && $second_octet == 44) { 
    284         return 1;   
    285     } elsif ($first_octet == 169 && $second_octet =~ /252|253/) { 
    286         return 1;   
    287     } elsif ($first_octet == 195 && $second_octet == 10) { 
    288         return 1;  
    289     } elsif ($first_octet == 199 && $second_octet == 122) { 
    290         return 1;   
    291     } elsif ($first_octet == 203 && $second_octet == 59) { 
    292         return 1;   
    293     } elsif ($first_octet == 207 && $second_octet == 30) { 
    294         return 1;   
    295     } elsif ($first_octet == 208 && $second_octet == 240) { 
    296         return 1;   
    297     } elsif ($first_octet == 209 && $second_octet == 35) { 
    298         return 1;   
    299     } elsif ($first_octet == 213 && $second_octet == 8) { 
    300         return 1;   
    301     } elsif ($first_octet == 157 && $second_octet =~ /150|153|202|217/) { 
    302         return 1;   
    303     } elsif ($first_octet == 162 && $second_octet =~ /32|45|46/) { 
    304         return 1; 
    305     } elsif ($first_octet == 168 && $second_octet =~ /68|85|102/) {  
    306         return 1; 
    307     } else { 
    308         return 0;  
    309     } 
    310 } 
     238        return 0; 
     239#    my $full_proxy = $_[0]; 
     240#    my ($first_octet, $second_octet, $third_octet, $fourth_octet, $port) = $full_proxy =~ /(\d+)\.(\d+)\.(\d+)\.(\d+):(\d+)/; 
     241#    # check against my blacklist 
     242#    if ($first_octet =~ /^(?:6|7|11|21|22|25|26|29|30|49|50|55|164|155|147|144|143|140|138|137|132|131|128|129|134|136|138|139|205|216|160|150)$/) { 
     243#        return 1;   
     244#    } elsif ($first_octet == 207 && $second_octet =~ /60|61|120/) {  
     245#        return 1;   
     246#    } elsif ($first_octet == 204 && $second_octet == 34) {  
     247#        return 1;   
     248#    } elsif ($first_octet == 163 && $second_octet =~ /205|206/) {  
     249#        return 1;   
     250#    } elsif ($first_octet == 158 && $second_octet =~ /(?:[0-9]|1[0-9]|2[0-9]|30)/) {  
     251#        return 1;   
     252#    } elsif ($first_octet == 158 && $second_octet =~ /(?:23[5-9]|24[0-9]|25[0-5])/) {  
     253#        return 1;   
     254#    } elsif ($first_octet == 153 && $second_octet =~ /(?:2[1-9]|3[0-1])/) { 
     255#        return 1;   
     256#    } elsif ($first_octet == 24 && $second_octet == 198) { 
     257#        return 1;   
     258#    } elsif ($first_octet == 62 && $second_octet =~ /(?:[0-9]|2[0-9]|30)/) { 
     259#        return 1;   
     260#    } elsif ($first_octet == 64 && $second_octet =~ /70|224|225|226/) { 
     261#        return 1;   
     262#    } elsif ($first_octet == 212 && $second_octet =~ /56|143|149|159|179|208/) { 
     263#        return 1;   
     264#    } elsif ($first_octet == 158 && $second_octet =~ /(?:23[5-9]|24[0-9]|25[0-5])/) { 
     265#        return 1;   
     266#    } elsif ($first_octet == 146 && $second_octet =~ /17|80|98|154|165/) { 
     267#        return 1;   
     268#    } elsif ($first_octet == 148 && $second_octet == 114) { 
     269#        return 1;   
     270#    } elsif ($first_octet == 152 && $second_octet =~ /82|151|152|154|229/) { 
     271#        return 1;   
     272#    } elsif ($first_octet == 156 && $second_octet == 9) { 
     273#        return 1;   
     274#    } elsif ($first_octet == 159 && $second_octet == 120) { 
     275#        return 1;   
     276#    } elsif ($first_octet == 161 && $second_octet == 124) { 
     277#        return 1;   
     278#    } elsif ($first_octet == 167 && $second_octet == 44) { 
     279#        return 1;   
     280#    } elsif ($first_octet == 169 && $second_octet =~ /252|253/) { 
     281#        return 1;   
     282#    } elsif ($first_octet == 195 && $second_octet == 10) { 
     283#        return 1;  
     284#    } elsif ($first_octet == 199 && $second_octet == 122) { 
     285#        return 1;   
     286#    } elsif ($first_octet == 203 && $second_octet == 59) { 
     287#        return 1;   
     288#    } elsif ($first_octet == 207 && $second_octet == 30) { 
     289#        return 1;   
     290#    } elsif ($first_octet == 208 && $second_octet == 240) { 
     291#        return 1;   
     292#    } elsif ($first_octet == 209 && $second_octet == 35) { 
     293#        return 1;   
     294#    } elsif ($first_octet == 213 && $second_octet == 8) { 
     295#        return 1;   
     296#    } elsif ($first_octet == 157 && $second_octet =~ /150|153|202|217/) { 
     297#        return 1;   
     298#    } elsif ($first_octet == 162 && $second_octet =~ /32|45|46/) { 
     299#        return 1; 
     300#    } elsif ($first_octet == 168 && $second_octet =~ /68|85|102/) {  
     301#        return 1; 
     302#    } else { 
     303#        return 0;  
     304#    } 
     305} 

  • trollforge/jmax/proxysuite/sites.txt

    r247 r467  
    2222http://www.proxy-list.net/anonymous-proxy-lists.shtml 
    2323http://www.proxy-list.net/transparent-proxy-lists.shtml 
     24http://www.samair.ru/proxy/ip-address-01.htm 
     25http://www.samair.ru/proxy/ip-address-02.htm 
     26http://www.samair.ru/proxy/ip-address-03.htm 
     27http://www.samair.ru/proxy/ip-address-04.htm 
     28http://www.samair.ru/proxy/ip-address-05.htm 
     29http://www.samair.ru/proxy/ip-address-06.htm 
     30http://www.samair.ru/proxy/ip-address-07.htm 
     31http://www.samair.ru/proxy/ip-address-08.htm 
     32http://www.samair.ru/proxy/ip-address-09.htm 
     33http://www.samair.ru/proxy/ip-address-10.htm 
    2434http://proxy.org/port80.shtml 
    2535http://proxy.org/port443.shtml 
    … …  
    6070http://www.proxylists.us/daily.html 
    6171http://www.proxylists.us/weekly.html 
    62 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=1 
    63 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=2 
    64 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=3 
    65 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=4 
    66 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=5 
    67 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=6 
    68 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=7 
    69 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=8 
    70 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=9 
    71 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=10 
    72 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=11 
    73 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=12 
    74 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=13 
    75 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=14 
    76 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=15 
    77 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=16 
    78 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=17 
    79 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=18 
    80 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=19 
    81 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=20 
    82 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=21 
    83 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=22 
    84 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=23 
    85 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=24 
    86 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=25 
    87 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=26 
    88 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=27 
    89 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=28 
    90 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=29 
    91 http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=30 
     72#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=1 
     73#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=2 
     74#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=3 
     75#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=4 
     76#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=5 
     77#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=6 
     78#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=7 
     79#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=8 
     80#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=9 
     81#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=10 
     82#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=11 
     83#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=12 
     84#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=13 
     85#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=14 
     86#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=15 
     87#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=16 
     88#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=17 
     89#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=18 
     90#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=19 
     91#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=20 
     92#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=21 
     93#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=22 
     94#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=23 
     95#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=24 
     96#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=25 
     97#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=26 
     98#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=27 
     99#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=28 
     100#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=29 
     101#http://proxy.mazafaka.ru/?c=all&t=all&m=off&checked=y&page=30 
    92102http://www.freeproxy.ru/download/lists/goodproxy.txt 
    93103http://www.proxylist.blogspot.com 
Note: See TracChangeset for help on using the changeset viewer.