Skip to content

Commit 383eb0f

Browse files
AlisamTechnologyAlisamTechnology
authored
Add files via upload
1 parent 98bc6f6 commit 383eb0f

16 files changed

+163
-161
lines changed

‎README.md

+7-7
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
<h1 align="center">ATSCAN SCANNER</h1>
44
<p align="center">
55
<a title="Version 16.0.4" href="https://github.com/AlisamTechnology/ATSCAN/releases">
6-
<img src="https://img.shields.io/badge/V%2016.0.5-Stable-green.svg">
6+
<img src="hhttps://img.shields.io/badge/V%2016.0.6-Stable-green.svg">
77
</a>
88
<a title="No issue known"href="https://github.com/AlisamTechnology/ATSCAN/issues">
99
<img src="https://img.shields.io/badge/Issues-None-brightgreen.svg">
@@ -177,7 +177,7 @@
177177
</tr>
178178
<tr>
179179
<td width="200px" class="main">--motor / -m</td>
180-
<td class="main">[Bing:1][Google:2][Ask:3][Yandex:4][Sogou:5][Exalead:6][Googleapis:7][All: all]</td>
180+
<td class="main">[bing][google][ask][yandex][sogou][exalead][googleapis][all]</td>
181181
</tr>
182182
<tr>
183183
<td width="200px" class="main">--apikey</td>
@@ -189,7 +189,7 @@
189189
</tr>
190190
<tr>
191191
<td width="200px" class="main">--mrandom</td>
192-
<td class="main">Random of all disponibles engines</td>
192+
<td class="main">Random of given engines</td>
193193
</tr>
194194
<tr>
195195
<td width="200px" class="main">--brandom</td>
@@ -595,7 +595,7 @@
595595
&#x25cf; <b>RANDOM: </b> <br/>
596596
Random proxy: --prandom [proxy file] <br/>
597597
Random browser: --brandom <br/>
598-
Random engine: --mrandom <br/>
598+
Random engine: --mrandom [ENGINES]<br/>
599599
<hr>
600600
&#x25cf; <b>SET HEADERS:</b> <br>
601601
atscan --dork [dork / dorks.txt] --level [level] --header "Authorization => 'Basic YWRtaW46YWRtaW4', keep_alive => '1'" <br/>
@@ -605,8 +605,8 @@
605605
Search: atscan --dork [dork] --level [level] <br/>
606606
Search: atscan -d [dork] -l [level] --index <br/>
607607
Search: atscan -d [dork] -l [level] --getlinks <br/>
608-
Set engine: atscan --dork [dork] --level [level] -m [Bing: 1][Google: 2][Ask: 3][Yandex: 4][Sogou: 5][All: all] <br/>
609-
Set selective engines: atscan -d [dork] -l [level] -m 1,2,3.. <br/>
608+
Set engine: atscan --dork [dork] --level [level] -m [bing][google][ask][yandex][sogou][all] <br/>
609+
Set selective engines: atscan -d [dork] -l [level] -m google,bing,.. <br/>
610610
Search with many dorks: atscan --dork dork1 [OTHER]dork2 [OTHER]dork3] --level [level] <br/>
611611
Search and rand: atscan -d [dork] -l [level] --expHost "/index.php?id=rang(1-9)" --sql <br/>
612612
Get target engine index: atscan -t [target] --level [value] --index <br/>
@@ -646,7 +646,7 @@
646646
atscan --dork [dork / dorks.txt] --level [level] --command "file" <br/>
647647
atscan --dork [dork / dorks.txt] --level [level] --command "curl -v --HOST" <br/>
648648
atscan --dork [dork / dorks.txt] --level [level] --command "nmap -sV -p 21,22,80 --HOSTIP" <br/>
649-
atscan -d "index of /lib/scripts/dl-skin.php" -l 20 -m 2 --command "php WP-dl-skin.php-exploit.php --TARGET" <br/>
649+
atscan -d "index of /lib/scripts/dl-skin.php" -l 2 -m bing --command "php WP-dl-skin.php-exploit.php --TARGET" <br/>
650650
atscan --shodan --search [string] --apikey [API KEY] -command [extern_command]<br/>
651651
<hr>
652652
&#x25cf; <b>MULTIPLE SCANS: </b><br/>

‎atscan.pl

+3-3
Original file line numberDiff line numberDiff line change
@@ -51,7 +51,7 @@
5151

5252
## VARIABLES
5353
our ($Version, $logoVersion, $scriptUrl, $logUrl, $ipUrl, $conectUrl, $script, $script_bac, $scriptbash, $paylNote, $psx, $V_EMAIL, $V_IP, $V_RANG, $V_SEARCH, $V_REGEX, $S_REGEX, $motor1, $motor2,
54-
$motor3, $motor4, $motor5, $motor6, $motorparam, $mrand, $pat2, $nolisting, $Hstatus, $validText, $WpSites, $JoomSites, $xss, $lfi, $JoomRfi, $WpAfd, $adminPage, $subdomain, $mupload, $mzip,
54+
$motor3, $motor4, $motor5, $motor6, $mrand, $pat2, $nolisting, $Hstatus, $validText, $WpSites, $JoomSites, $xss, $lfi, $JoomRfi, $WpAfd, $adminPage, $subdomain, $mupload, $mzip,
5555
$eMails, $command, $mmd5, $mencode64, $mdecode64, $port, $mindex, $mdom, $Target, $exploit, $p, $tcp, $udp, $proxy, $prandom, $help, $output, $replace, $replaceFROM, $dork, $mlevel, $unique,
5656
$shell, $nobanner, $beep, $ifinurl, $noverbose, $motor, $timeout, $limit, $checkVersion, $searchIps, $regex, $searchRegex, $noQuery, $ifend, $uninstall, $post, $get, $brandom, $data, $payloads,
5757
$mrandom, $content, $scriptComplInstall, $scriptCompletion, $scriptInstall, $toolInfo, $config, $freq, $headers, $msource, $ping, $exclude, $expHost, $expIp, $zone, $validShell, $interactive,
@@ -67,7 +67,7 @@
6767
'proxy=s'=>\$proxy, 'prandom=s'=>\$prandom, 'help|h'=>\$help, 'save|s=s'=>\$output, 'replace=s'=>\$replace, 'replaceFROM=s'=>\$replaceFROM, 'dork|d=s'=>\$dork, 'level|l=s'=>\$mlevel,
6868
'unique'=>\$unique, 'shell=s'=>\$shell, 'nobanner'=>\$nobanner, 'beep'=>\$beep, 'ifinurl=s'=>\$ifinurl, 'noverbose'=>\$noverbose, 'm|motor=s'=>\$motor, 'timeout=s'=>\$timeout,
6969
'limit=s'=>\$limit, 'update'=>\$checkVersion, 'ips'=>\$searchIps, 'regex=s'=>\$regex, 'sregex=s'=> \$searchRegex, 'noquery'=> \$noQuery, 'ifend'=>\$ifend,
70-
'uninstall'=> \$uninstall, 'post'=>\$post, 'get'=>\$get, 'brandom'=>\$brandom, 'data=s'=>\$data, 'payload=s'=>\$payloads, 'mrandom'=>\$mrandom, 'content'=>\$content,
70+
'uninstall'=> \$uninstall, 'post'=>\$post, 'get'=>\$get, 'brandom'=>\$brandom, 'data=s'=>\$data, 'payload=s'=>\$payloads, 'mrandom=s'=>\$mrandom, 'content'=>\$content,
7171
'tool|?'=>\$toolInfo, 'config'=>\$config, 'freq=s'=>\$freq, 'header=s'=>\$headers, 'source=s'=>\$msource, 'ping'=>\$ping, 'exclude=s'=>\$exclude, 'expHost=s'=>\$expHost,
7272
'expIp=s'=>\$expIp, 'zone=s'=>\$zone, 'interactive|i'=>\$interactive, 'vshell=s'=>\$validShell, 'popup'=>\$popup, 'all'=>\$all, 'repair'=>\$repair, 'zoneH=s'=>\$zoneH,
7373
'cookies=s'=>\$cokie, 'bugtraq'=>\$bugtraq, 'geoloc'=>\$geoloc, 'fullHeaders'=>\$fullHeaders, 'getlinks'=>\$getlinks, 'shodan'=>\$shodan, 'apikey=s'=>\$apikey,
@@ -77,7 +77,7 @@
7777

7878
## CHOMP ARGS STRINGS
7979
our @toChomp=($Hstatus, $validText, $command, $mmd5, $mencode64, $mdecode64, $port, $Target, $exploit, $p, $proxy, $prandom, $output,
80-
$replace, $replaceFROM, $dork, $mlevel, $shell, $ifinurl, $motor, $timeout, $limit, $regex, $searchRegex, $data,
80+
$replace, $replaceFROM, $dork, $mlevel, $shell, $ifinurl, $motor, $timeout, $mrandom, $limit, $regex, $searchRegex, $data,
8181
$payloads, $freq, $headers, $msource, $exclude, $expHost, $expIp, $zone, $validShell, $zoneH, $bugtraq, $apikey,
8282
$shocount, $shoquerySearch, $shoresolve, $shoreverse, $shofilters, $shotokens, $cx, $facets, $shohoneyscore);
8383
for (@toChomp) { chomp ($_) if defined $_; }

‎inc/conf/configure.pl

+2-9
Original file line numberDiff line numberDiff line change
@@ -21,7 +21,7 @@
2121
our ($Version, $logoVersion, $scriptUrl, $logUrl, $ipUrl, $conectUrl, $script, $scriptInstall, $script_bac, $scriptbash, $scriptv,
2222
$scriptCompletion, $scriptComplInstall, $readme, $uplog, $replace, $replaceFROM, $server, $geoServer, @configuration);
2323

24-
$Version="16.0.5";
24+
$Version="16.0.6";
2525
$logoVersion="V $Version";
2626
$scriptUrl="https://raw.githubusercontent.com/AlisamTechnology/ATSCAN/master/atscan.pl";
2727
$logUrl="https://raw.githubusercontent.com/AlisamTechnology/ATSCAN/master/inc/conf/version.log";
@@ -54,12 +54,7 @@
5454
sub timer { my $time=strftime "%H:%M:%S", localtime; print "[$time]"; }
5555

5656
## DELETE CLEAR LISTS
57-
sub deleteLists {
58-
our (@buildArrays, @dorks, @payloads, @exploits, @data, @proxies, @aTsearch, @aTscans, @aTtargets, @aTcopy, @ports, @motor,
59-
@motors, @systems)=();
60-
unlink our $script_bac;
61-
}
62-
deleteLists();
57+
unlink $script_bac if -e $script_bac;
6358

6459
## USER CONFIGUATION
6560
sub get_configuration {
@@ -105,9 +100,7 @@ sub get_configuration {
105100
our $motor6="https://www.exalead.com/search/web/results/?q=MYDORK&elements_per_page=10&start_index=MYNPAGES";
106101
our $motor7="https://www.googleapis.com/customsearch/v1?key=MYAPIKEY&cx=MYCX&q=MYDORK&start=MYNPAGES";
107102

108-
our $motorparam="1|2|3|4|5|6|7|all";
109103
our @mrands=($motor1, $motor2, $motor3, $motor4, $motor5, $motor6, $motor7);
110-
our $mrand=$mrands[rand @mrands];
111104
our @allMotors=($motor1, $motor2, $motor3, $motor4, $motor5, $motor6, $motor7);
112105
our $pat2='inurl:|intitle:|intext:|allinurl:|index of:|site:(.*)\+|\+site:(.*)';
113106
our $paylNote="[i] $DT[28]\n";

‎inc/conf/menu.pl

+2-2
Original file line numberDiff line numberDiff line change
@@ -58,7 +58,7 @@
5858
}
5959
}else{
6060
negative();
61-
logoff();
61+
exit();
6262
}
6363
}
6464

@@ -82,7 +82,7 @@ sub Menu {
8282
}
8383

8484
if (!defined $checkVersion && !defined $help && !defined $uninstall && !defined $toolInfo && !defined $config && !defined $repair) {
85-
subfin(); logoff();
85+
subfin(); exit();
8686
}
8787

8888
## GET WORDPRESS SITES

‎inc/conf/version.log

+4-5
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,7 @@
1-
ATSCAN SCANNER VERSION 16.0.5 RELEASE
1+
ATSCAN SCANNER VERSION 16.0.6 RELEASE
22
=====================================================
3-
CHANGES: v16.0.5 01/03/2019
4-
- Fix conflict user configuration setting.
5-
- Removed header.pl index.pl colors.pl separators.pl
6-
- PLEASE REPORT BUGS..!!
3+
CHANGES: v16.0.6 01/03/2019
4+
- Chnage all engines random to selected random.
5+
- oooooOO PLEASE REPORT BUGS OOoooo
76
- Enjoy it!
87
=================

‎inc/errors/useErrors.pl

+26-24
Original file line numberDiff line numberDiff line change
@@ -17,7 +17,7 @@
1717
if (!defined $apikey) {
1818
print $c[4]."[!] USAGE: --shodan --apikey <key>\n";
1919
print $c[4]."[!] You can get an apikey here https://www.shodan.io/\n";
20-
logoff();
20+
exit();
2121
}
2222
}
2323

@@ -30,78 +30,77 @@
3030
if (defined $bugtraq) {
3131
if (!defined $dork) {
3232
print $c[4]."[!] USAGE: --bugtraq --dork <dork> --level <level>\n";
33-
logoff();
33+
exit();
3434
}
3535
}
3636

3737
## ARGUMENTS VERIFICATION (TARGET AND RANGIP)
3838
if (defined $Target) {
3939
my $Targ=Targs();
40-
if ($Targ<1) { print $c[4]."[!] $OTHERS[7]\n"; logoff(); }
40+
if ($Targ<1) { print $c[4]."[!] $OTHERS[7]\n"; exit(); }
4141
}
4242

4343
## CHECK POPUP ARGUMENT IS USED WITH EXTERN COMMANDS
4444
if (defined $popup and !defined $command) {
45-
print $c[4]."[!] --$ZT[26]\n"; logoff();
45+
print $c[4]."[!] --$ZT[26]\n"; exit();
4646
}
4747

4848
if (defined $exploit or $exploit) {
4949
my $Targ=Targs();
50-
if ($Targ<1) { print $c[4]."[!] $OTHERS[7]\n"; logoff(); }
50+
if ($Targ<1) { print $c[4]."[!] $OTHERS[7]\n"; exit(); }
5151
}
5252

5353
## ZONE-H
5454
if (defined $zoneH) {
5555
if ($zoneH!~/(.*)=>(.*)/) {
56-
print $c[4]."[!] zoneH must be \"Notifier => Url\" \n"; logoff();
56+
print $c[4]."[!] zoneH must be \"Notifier => Url\" \n"; exit();
5757
}
5858
}
5959

6060
## CHECK TARGET PROTOCOL
6161
if (defined $Target) {
6262
if ((!-e $Target) && ($Target!~/$V_IP/) && !defined $ping) {
63-
if ($Target!~/https?:\/\//) { print $c[4]."[!] $DT[16]\n"; logoff(); }
63+
if ($Target!~/https?:\/\//) { print $c[4]."[!] $DT[16]\n"; exit(); }
6464
}
6565
}
6666

6767
## CRAWLER
6868
if (defined $mindex) {
6969
if (!defined $mlevel && !$mlevel) {
70-
print $c[4]."[!] $DT[20]\n"; logoff();
70+
print $c[4]."[!] $DT[20]\n"; exit();
7171
}
7272
}
7373

7474
## REPLACE
7575
if (defined $replace || defined $replaceFROM) {
7676
for (@replace) {
7777
if (defined $_ and $_ !~ /=>/) {
78-
print $c[4]."[!] $ZT[27] \"STRING => NEW_STRING\"\n"; logoff();
78+
print $c[4]."[!] $ZT[27] \"STRING => NEW_STRING\"\n"; exit();
7979
}
8080
}
8181
}
8282

8383
## CHECK RANDOM PARAMS
84-
if (defined $mrandom && (!defined $mlevel && !$mlevel)) { print $c[4]."[!] $DT[38]\n"; logoff(); }
84+
if (defined $mrandom && (!defined $mlevel && !$mlevel)) { print $c[4]."[!] $DT[38]\n"; exit(); }
8585

8686
## ARGUMENTS VERIFICATION (LEVEL / PORTS)
87-
if ((defined $dork)&&(!defined $mlevel && !$mlevel && !defined $shodan)) { print $c[4]."[!] $DT[40]\n"; logoff(); }
88-
if ((defined $port) && (!defined $tcp and !defined $udp)) { print $c[4]."$DT[23]\n"; logoff(); }
87+
if ((defined $dork)&&(!defined $mlevel && !$mlevel && !defined $shodan)) { print $c[4]."[!] $DT[40]\n"; exit(); }
88+
if ((defined $port) && (!defined $tcp and !defined $udp)) { print $c[4]."$DT[23]\n"; exit(); }
8989

9090
## MORE ARGUMENTS PROCESS VERIFICATION
9191
if ((defined $dork) || (defined $Target)) {
92-
if ((defined $JoomRfi) and (!defined $shell)) { print $c[4]."[!] $DT[41]\n"; logoff(); }
92+
if ((defined $JoomRfi) and (!defined $shell)) { print $c[4]."[!] $DT[41]\n"; exit(); }
9393
}
9494

95-
if ((!defined $dork) && (defined $unique)) { print $c[4]."[!] $DT[21]\n"; logoff(); }
95+
if ((!defined $dork) && (defined $unique)) { print $c[4]."[!] $DT[21]\n"; exit(); }
9696
if (defined $regex or defined $eMails or defined $searchRegex or defined $searchIps) {
97-
if (defined $Hstatus) { print $c[4]."[!] $SCAN_TITLE[2]"; logoff(); }
97+
if (defined $Hstatus) { print $c[4]."[!] $SCAN_TITLE[2]"; exit(); }
9898
}
9999

100100
## CHECK MOTORS ARGUMENTS
101-
our ($motorparam);
102101
if (defined $motor || $motor) {
103102
if (defined $mrandom || $mrandom) {
104-
print $c[4]."$TT[14]\n"; logoff();
103+
print $c[4]."$TT[14]\n"; exit();
105104
}
106105
abcd($motor);
107106
}
@@ -112,39 +111,42 @@ sub abcd {
112111
if ($abcd=~/,/) { @abcd=split(", ", $abcd); }
113112
else{ push @abcd, $abcd; }
114113
for my $ad(@abcd) {
115-
if ($ad!~/(1|2|3|4|5|6|7|all)/) { print $c[2]."[!] $DT[25]\n".$c[4]." $DT[27] \n $OTHERS[5] -m 1,2,...\n"; logoff(); }
114+
if ($ad!~/(bing|ask|google|yandex|sogou|exalead|googleapis)/) {
115+
print $c[2]."[!] $DT[25]\n".$c[4]." $DT[27] \n $OTHERS[5] -m google,bing,...\n"; exit();
116+
}
116117
}
117118
}
118119

119120
## CHECK LEVEL
120121
if (defined $mlevel || $mlevel) {
121-
if ($mlevel!~/^[0-9,.E]+$/) { print $c[4]."$TT[15]\n"; logoff(); }
122+
if ($mlevel!~/^[0-9,.E]+$/) { print $c[4]."$TT[15]\n"; exit(); }
122123
}
123124

124125
## ADVISE DATA WITHOUT METHOD
125-
if (defined $data and (!defined $post && !defined $get && !defined $mupload && !$method)) { print $c[4]."[!] $TT[16]\n"; logoff(); }
126+
if (defined $data and (!defined $post && !defined $get && !defined $mupload && !$method)) { print $c[4]."[!] $TT[16]\n"; exit(); }
126127

127128
## CHECK PAUSE ARGUMENT
128129
if (defined $data) {
129130
if ($limit<500) {
130-
if (!defined $Hstatus && !defined $validText) { print $c[4]."[!] $TT[17]\n"; logoff(); }
131+
if (!defined $Hstatus && !defined $validText) { print $c[4]."[!] $TT[17]\n"; exit(); }
131132
}
132133
}
133134

134135
## WORDLIST IN DATA
135136
sub data_alert {
136-
print $c[4]."[!] $ZT[28]\n"; logoff();
137+
print $c[4]."[!] $ZT[28]\n"; exit();
137138
}
138139

139140
## IF DATA FILES > 1
140141
sub adviseDataFile {
141-
print $c[2]."[!] $ZT[29]\n"; logoff();
142+
print $c[2]."[!] $ZT[29]\n"; exit();
142143
}
143144

144145
## IF DATA FILE NOT EXISTS
145146
sub advise_no_file {
146147
my $no_file=$_[0];
147-
print $c[2]."[!] $ZT[30] $no_file !\n"; logoff();
148+
print $c[2]."[!] $ZT[30] $no_file !\n"; exit();
148149
}
149150

151+
150152
1;

0 commit comments

Comments
 (0)