IronRuby练手系列之一:写个进程管理器

      用IronRuby+SharpDevelop 来开发GUI程序是十分便利的。《IronRuby练手系列》计划是用Ruby来写一系列的小工具，目的是来进一步熟悉IronRuby.
      我的机器装的IronRuby是 IronRuby 1.0 for .NET 2.0 SP1
      IronRuby的下载地址:http://ironruby.codeplex.com/releases

      本文示例代码下载:点击下载此文件。解压缩后，运行run.dat即可。

      我的主页:www.w-yong.com

       本文章是写一个进程管理器，需要的主要知识点是:Ruby语言，WinForm，Win32 API等。本文的重点如题，是以Ruby为主，而不是以"列举进程"为主。
      不过，还是略微提一下,取得系统中的进程信息的方法主要有：
      1.通过 Tool Help API 获取
      2.通过 PSAPI 获取
      3.通过 Native API 获取
      4.通过 驱动来遍历EPROCESS 获取
      5.对于.NET,可以通过System.Diagnostics 命名空间下的Process类来获取
      6....
 
      我们采用方式1，利用Tool Help API来获取进程信息。程序可以列举出系统中正在运行的进程，选中某个进程，程序可以显示出该进程加载的模块，还可以终止选中的进程。程序的运行结果如下:

     这个程序的主要功能实际上是由 ProcessManager这个类提供的。具体代码的实现，大家可以看process_manager.rb这个文件。ProcessManager中使用了CStruct这个类。CStruct是用ruby来模拟C语言的结构体，类似BitStruct。我写CStruct这个类目的很明确，它不需要大而全，功能适中，使用起来比较方便。有了CStruct，我们就可以很方便的和Win API打交道了。关于CStruct，我会另写一篇文章来介绍它。在这里，它只是跑龙套的。

     我们先来看看 ProcessManager类提供的功能:

require 'process_manager'

#下面是一些使用procmgr的例子
procmgr = ProcessManager.new

# 列举所有进程
procmgr.procs {|proc| puts proc.name}

# 根据名称查询进程信息.(同名的都会被列举)
procmgr.query("svchost.exe"){|proc|  puts "#{proc.name} id = #{proc.id}\n"}

# 按名称终止进程(同名的都会终止)
procmgr.kill("notepad.exe")

# 按ID终止进程
procmgr.kill(3412)

# 找出系统中载入了advapi32.dll的进程,
# 并打印出advapi32.dll在进程中的加载位置
procmgr.procs do |proc| 
	proc.modules do |mod|
		if mod.name.casecmp('advapi32.dll')==0
			printf"#{proc.name} loaded 'advapi32.dll' at %08X\n",mod.image_base
			break
		end
	end
end

     有了ProcessManager提供的procs(列举进程)和modules(列举模块)这个两个方法，我们就可以写我们的GUI版的进程管理器。大部分工作就是利用 SharpDevelop 做好界面布局。有一点需要说明，SharpDevelop 生成的变量名不太符合Ruby的命名约定，你若觉得不习惯，可以改改。反正本文没有改，两者兼有之。

      程序中有两个主要函数，show_processes和show_modules,代码如下：
show_processes:

def show_processes
	# 清空 ListView 控件
	@procListView.Items.clear
	@proc_cache.clear
	
	# 列举系统进程
	@procmgr.procs do |proc|
		
		# 缓存proc对象
		@proc_cache<<proc
		proc_mod = nil
		
		# 取出进程对应的自身模块
		proc.modules do	|mod|
			if File.basename(mod.path).casecmp(proc.name)==0
				proc_mod = mod
				break 
			end
		end
		# 如果取不到自身模块,则造个假的。
		unless proc_mod
			proc_mod = Struct.new(:path, :image_base,:image_size).new(proc.name,0,0)
		end
		# 取出进程文件的图标				
		@small_proc_imagelist.Images.Add AppUtils.get_file_small_icon(proc_mod.path.gsub("\\??\\",''),AppUtils.is_system_process(proc_mod.path))

		# 将相关信息插入到ListView控件中。
		proc_items = @procListView.Items
		
		proc_items << System::String.new(System::Text::Encoding.GetEncoding(0).GetChars(proc_mod.path))
		proc_items[proc_items.Count-1].ImageIndex = @small_proc_imagelist.Images.size-1
		proc_items[proc_items.Count-1].SubItems.Add sprintf("%08X",proc.id)
		proc_items[proc_items.Count-1].SubItems.Add sprintf("%08X",proc_mod.image_base)
		proc_items[proc_items.Count-1].SubItems.Add sprintf("%08X",proc_mod.image_size)
	
	end
		# 设置 ImageList
  @procListView.SmallImageList  = @small_proc_imagelist

end

show_modules:

def show_modules seleced_proc
	return unless seleced_proc
	# 列举选中进程的模块    
	seleced_proc.modules do |mod|
		mod_items = @modListView.Items
	
		# 取出模块文件的图标		
		@small_mod_imagelist.Images.Add AppUtils.get_file_small_icon(mod.path.gsub("\\??\\",''),AppUtils.is_system_process(mod.path))
	
		# 将相关信息插入到ListView控件中。
		mod_items << System::String.new(System::Text::Encoding.GetEncoding(0).GetChars(mod.path))
		mod_items[mod_items.Count-1].ImageIndex = @small_mod_imagelist.Images.size-1
		mod_items[mod_items.Count-1].SubItems.Add sprintf("%08X",mod.image_base)
		mod_items[mod_items.Count-1].SubItems.Add sprintf("%08X",mod.image_size)
	end
  # 设置 ImageList
  @modListView.SmallImageList  = @small_mod_imagelist
end

 

      具体的代码，请参考附件中的源码。