├── linux ├── bash-banner-grab.txt ├── sh-portscan.txt ├── wget_portscan.txt ├── tcp_portscan_oneliner.txt └── perl-portscan.pl ├── windows ├── powershell │ └── portscan.ps1 ├── netsh-portscan.txt └── vba │ └── ftp-connection.vba └── LICENSE /linux/bash-banner-grab.txt: -------------------------------------------------------------------------------- 1 | exec 3<>/dev/tcp/www.google.com/80 2 | echo -e "GET / HTTP/1.1\n\n">&3 3 | cat <&3 -------------------------------------------------------------------------------- /windows/powershell/portscan.ps1: -------------------------------------------------------------------------------- 1 | 80..99 | %{try{(new-Object system.Net.Sockets.TcpClient).Connect('localhost',$_);write-host "$_ Open"}catch{write-host 'Closed'}} -------------------------------------------------------------------------------- /linux/sh-portscan.txt: -------------------------------------------------------------------------------- 1 | HOST=127.0.0.1;for((port=1;port<=65535;++port));do echo -en "$port ";if exec 5<>/dev/tcp/$HOST/$port 2>/dev/null;then echo -en "\n\nport $port/tcp is open\n\n";fi;done -------------------------------------------------------------------------------- /windows/netsh-portscan.txt: -------------------------------------------------------------------------------- 1 | @ECHO OFF & ECHO start & (FOR /L %p IN (1,1,65535) DO (FOR /F "tokens=*" %a IN ('netsh diag connect iphost 127.0.0.1 %p ^| find /C /I "[NONE]"') DO ( IF %a == 0 echo %p))) & ECHO stop & @ECHO ON -------------------------------------------------------------------------------- /linux/wget_portscan.txt: -------------------------------------------------------------------------------- 1 | HOST=192.168.178.88;for((port=1;port<=65535;++port));do echo -en "$port ";if wget -F -S -t 1 -T 1 -v -O banner.txt $HOST:$port 2>&1 | grep connected;then echo -en "\n\nport $port/tcp is open\n\n";cat banner.txt;fi;done -------------------------------------------------------------------------------- /linux/tcp_portscan_oneliner.txt: -------------------------------------------------------------------------------- 1 | HOST=127.0.0.1;for((port=1;port<=65535;++port));do echo -en "$port ";if echo -en "open $HOST $port\nlogout\quit" | telnet 2>/dev/null | grep 'Connected to' > /dev/null;then echo -en "\n\nport $port/tcp is open\n\n";fi;done -------------------------------------------------------------------------------- /linux/perl-portscan.pl: -------------------------------------------------------------------------------- 1 | #!/usr/bin/perl use IO::Socket; @ARGV||die'usage: perl scanner.pl host [number of threads]'; ($|,$h,$t)=(1,@ARGV,20);$p=65535/$t; for$n(1..$t){ pipe($r[$n],$w[$n]);next if fork; print IO::Socket::INET->new(PeerAddr=>$h,PeerPort=>$_)?"Port $_ open\n":''for($p*($n-1)...$p*$n-1); print{$w[$n]}'x';exit; } read($r[$_],$x,1)for(1..$t); -------------------------------------------------------------------------------- /windows/vba/ftp-connection.vba: -------------------------------------------------------------------------------- 1 | VBA FTP Verbindung 2 | 3 | Public Sub FtpSend() 4 | Dim vPath As String 5 | Dim vFile As String 6 | Dim vFTPServ As String 7 | Dim fNum As Long 8 | 9 | vPath = ThisWorkbook.Path 10 | vFTPServ = "v.m5t.de" 11 | 12 | 'Mounting file command for ftp.exe 13 | fNum = FreeFile() 14 | Open vPath & "\FtpComm.txt" For Output As #fNum 15 | Print #1, "user v medion14" ' your login and password" 16 | Print #1, "get Ports.zip" 17 | filename to server file 18 | Print #1, "close" ' close connection 19 | Print #1, "quit" ' Quit ftp program 20 | Close 21 | 22 | Shell "ftp -n -i -g -s:" & vPath & "\FtpComm.txt " & vFTPServ, 23 | vbNormalNoFocus 24 | End Sub -------------------------------------------------------------------------------- /LICENSE: -------------------------------------------------------------------------------- 1 | This is free and unencumbered software released into the public domain. 2 | 3 | Anyone is free to copy, modify, publish, use, compile, sell, or 4 | distribute this software, either in source code form or as a compiled 5 | binary, for any purpose, commercial or non-commercial, and by any 6 | means. 7 | 8 | In jurisdictions that recognize copyright laws, the author or authors 9 | of this software dedicate any and all copyright interest in the 10 | software to the public domain. We make this dedication for the benefit 11 | of the public at large and to the detriment of our heirs and 12 | successors. We intend this dedication to be an overt act of 13 | relinquishment in perpetuity of all present and future rights to this 14 | software under copyright law. 15 | 16 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 17 | EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 18 | MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. 19 | IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR 20 | OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, 21 | ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR 22 | OTHER DEALINGS IN THE SOFTWARE. 23 | 24 | For more information, please refer to 25 | --------------------------------------------------------------------------------