SMB-Scanner.zip is an executable and Perl Script for Win and Unix. Scans network blocks for file sharing status and guesses what the file sharing target might be Samba or NT or Windows depending on MAC ADDRESS.
You can download it from the following link: https://packetstormsecurity.com/files/download/24726/SMB-Scanner.zip
Source: https://packetstormsecurity.com/files/24726/SMB-Scanner.zip.html