102 lines
3.1 KiB
Ruby
102 lines
3.1 KiB
Ruby
##
|
|
# WARNING: Metasploit no longer maintains or accepts meterpreter scripts.
|
|
# If you'd like to improve this script, please try to port it as a post
|
|
# module instead. Thank you.
|
|
##
|
|
|
|
|
|
# Author: Carlos Perez at carlos_perez[at]darkoperator.com
|
|
#-------------------------------------------------------------------------------
|
|
################## Variable Declarations ##################
|
|
@client = client
|
|
#-------------------------------------------------------------------------------
|
|
|
|
######################## Functions ########################
|
|
def ls_logged
|
|
sids = []
|
|
sids << registry_enumkeys("HKLM\\SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\ProfileList")
|
|
tbl = Rex::Text::Table.new(
|
|
'Header' => "Logged Users",
|
|
'Indent' => 1,
|
|
'Columns' =>
|
|
[
|
|
"SID",
|
|
"Profile Path"
|
|
])
|
|
sids.flatten.each do |sid|
|
|
profile_path = registry_getvaldata("HKLM\\SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\ProfileList\\#{sid}","ProfileImagePath")
|
|
tbl << [sid,profile_path]
|
|
end
|
|
print_line("\n" + tbl.to_s + "\n")
|
|
end
|
|
|
|
def ls_current
|
|
key_base, username = "",""
|
|
tbl = Rex::Text::Table.new(
|
|
'Header' => "Current Logged Users",
|
|
'Indent' => 1,
|
|
'Columns' =>
|
|
[
|
|
"SID",
|
|
"User"
|
|
])
|
|
registry_enumkeys("HKU").each do |sid|
|
|
case sid
|
|
when "S-1-5-18"
|
|
username = "SYSTEM"
|
|
tbl << [sid,username]
|
|
when "S-1-5-19"
|
|
username = "Local Service"
|
|
tbl << [sid,username]
|
|
when "S-1-5-20"
|
|
username = "Network Service"
|
|
tbl << [sid,username]
|
|
else
|
|
if sid =~ /S-1-5-21-\d*-\d*-\d*-\d*$/
|
|
key_base = "HKU\\#{sid}"
|
|
os = @client.sys.config.sysinfo['OS']
|
|
if os =~ /(Windows 7|2008|Vista)/
|
|
username = registry_getvaldata("#{key_base}\\Volatile Environment","USERNAME")
|
|
elsif os =~ /(2000|NET|XP)/
|
|
appdata_var = registry_getvaldata("#{key_base}\\Volatile Environment","APPDATA")
|
|
username = ''
|
|
if appdata_var =~ /^\w\:\D*\\(\D*)\\\D*$/
|
|
username = $1
|
|
end
|
|
end
|
|
tbl << [sid,username]
|
|
end
|
|
end
|
|
end
|
|
print_line("\n" + tbl.to_s + "\n")
|
|
end
|
|
#-------------------------------------------------------------------------------
|
|
####################### Options ###########################
|
|
@@exec_opts = Rex::Parser::Arguments.new(
|
|
"-h" => [ false, "Help menu." ],
|
|
"-l" => [ false, "List SID's of users who have loged in to the host." ],
|
|
"-c" => [ false, "List SID's of currently loged on users." ]
|
|
)
|
|
@@exec_opts.parse(args) { |opt, idx, val|
|
|
case opt
|
|
when "-h"
|
|
print_line "Meterpreter Script for enumerating Current logged users and users that have loged in to the system."
|
|
print_line(@@exec_opts.usage)
|
|
raise Rex::Script::Completed
|
|
when "-l"
|
|
ls_logged
|
|
when "-c"
|
|
ls_current
|
|
end
|
|
}
|
|
if client.platform == 'windows'
|
|
if args.length == 0
|
|
print_line "Meterpreter Script for enumerating Current logged users and users that have loged in to the system."
|
|
print_line(@@exec_opts.usage)
|
|
raise Rex::Script::Completed
|
|
end
|
|
else
|
|
print_error("This version of Meterpreter is not supported with this Script!")
|
|
raise Rex::Script::Completed
|
|
end
|