npgrt 0.0.3 → 0.0.4

data/lib/npgrt/find.rb~

@@ -0,0 +1,31 @@
+module NPGRT
+	module Find
+		extend self
+		private 
+		def each_path
+			ENV['path'].split(";").each{|x|
+				yield x
+			}
+		end
+		public 
+		
+		def binary(name)
+			each_path do |path|
+				v = File.join(path, name)
+				return NPGRT.normalize_pathsep_os(v) if FileTest.file?(v)
+			end
+			Gem.find_files(name) do |v|
+				return NPGRT.normalize_pathsep_os(v) if FileTest.file?(v)
+			end
+
+			nil
+		end	
+		def hostruby
+			binary("ruby.exe")
+		end
+
+		
+	end
+
+
+end

data/lib/npgrt/message.rb

@@ -4,5 +4,4 @@ module NPGRT
     	defined?(msgbox) ? msgbox(*a) : print(*a)
      end
   end
-  extend Message
 end

data/lib/npgrt/message.rb~

@@ -1,7 +1,7 @@
 module NPGRT
   module Message
      def message(*a)
-    	defined?(:msgbox) ? msgbox(*a) : p(*a)
+    	defined?(msgbox) ? msgbox(*a) : print(*a)
      end
   end
   extend Message

data/lib/npgrt/query.rb

@@ -0,0 +1,6 @@
+module NPGRT
+	module Query
+		
+
+	end
+end

data/lib/npgrt/report.rb

@@ -0,0 +1,182 @@
+module NPGRT
+	class Report
+		
+
+		def initialize(io, &b)
+			@io = io
+			@binding = b.binding
+		end
+
+		private
+		def title(str)
+			"#{str} ----------\n"
+		end
+
+		def tail
+			"\n\n\n"
+		end
+
+		def form(io, title)
+			io << title(title)
+			yield io
+			io << tail
+			io
+		end
+		public
+		def inifile(io)
+			return unless FileTest.file?("Game.ini")
+			form io, "Game.ini" do |io|
+				io << File.read("Game.ini")
+			end
+		end
+
+		def scripts(io)
+			return unless defined?($RGSS_SCRIPTS)
+			form io, "Scripts" do |io|
+				io << $RGSS_SCRIPTS.map{|x| "  [%s] " % x[1]}.join("\n")
+			end		
+		end
+
+		def basic(io)
+			form io, "Basic Information" do |io|
+				io << "path:" << Dir.getwd << "\n"
+				io << "Ruby Version:" << RUBY_VERSION << "\n"
+				io << "NPGRT Version:" << NPGRT::VERSION << "\n"
+				io << "Platform:" << NPGRT::PlatformWidth << "\n"
+				begin
+					str = "" << "FPS:" << Graphics.frame_rate.to_s << "\n"
+					str << "Frame Count:" << Graphics.frame_count.to_s << "\n"
+					io << str
+				rescue
+				end
+				io << "Command Line:" << NPGRT.wstrread(NPGRT.api('kernel32', 'GetCommandLineW').call) << "\n"
+
+			end
+		end
+
+		def position(io)
+			form io, "Position" do |io|
+				io << "__FILE__:" << eval('__FILE__', @binding) << "\n"
+				if eval('__FILE__', @binding) =~ /\d+/ && $RGSS_SCRIPTS
+					io << "Section name :[" << $RGSS_SCRIPTS[$1.to_i][1] << "]\n"
+				end
+			       io << "__LINE__:" <<eval('__LINE__', @binding) << "\n"	
+			       io << "Nesting:" << eval('Module.nesting', @binding) << "\n"
+			       io << "caller:" << eval('caller', @binding).join("\n") << "\n"
+			end
+		end
+
+		def exception(io)
+			form io, "Exceptions" do
+				if $!
+					io << $!.to_s << "\n"
+					io << $!.backtrace.join("\n") << "\n"
+				else
+					io << "No exception." << "\n"
+				end
+			end
+		end
+
+		def rubyobjects(io)
+			form io, "Global Variables" do
+				(global_variables - [:$RGSS_SCRIPTS]).each{|g|
+				begin
+					v = eval(g.to_s, @binding)
+					io << (" #{g}:" << v.inspect << "\n")
+				rescue 
+				end
+				}
+				io << " $RGSS_SCRIPTS: [#{$RGSS_SCRIPTS.size} scripts]" << "\n" if defined?($RGSS_SCRIPTS)
+			end
+			form io, "Local Variables" do
+				eval('local_variables', @binding).each{|g|
+				begin
+					v = eval(g.to_s, @binding)
+					io << (" #{g}:" << v.inspect << "\n")
+				rescue 
+				end
+				}
+			end
+			form io, "Modules" do
+				ret = []
+				ObjectSpace.each_object(Module) do |m|
+					ret << m
+				end
+				ret.sort_by{|x| x.to_s}.each do |m|
+					io << "  " << (m.is_a?(Class) ? "C " : "M ") << m << (m.is_a?(Class) ? "(class)" : "(module)") << ObjectSpace.each_object(m){} << "\n" 
+				end
+
+				
+			end
+		end
+		def plugins(io)
+			form io, "LOADED_FEATURES" do
+				io << $LOADED_FEATURES.join("\n") << "\n"
+			end
+			form io, "PATH" do
+				io << ENV['PATH'] << "\n"
+			end
+		end
+
+		def minidump(io)
+			x = NPGRT.api('Kernel32', 'CreateFileW').call(
+				NPGRT.to_unicode("minidump.dmp\0\0")+"\0\0",
+				0x40000000, 0, 0, 2, 0x80, 0
+			)
+			NPGRT.api('DbgHelp.dll', 'MiniDumpWriteDump').call(
+				NPGRT.api('kernel32', 'GetCurrentProcess').call,
+				NPGRT.api('kernel32', 'GetCurrentProcessId').call,
+				x,
+				0,
+				0,
+				0,
+				0
+			)
+			NPGRT.api('kernel32', 'CloseHandle').call x
+			form io, "Core Dump" do
+				io << "Dump file written to minidump.dmp.\n"
+			end
+		end
+
+		MAX_MODULE_NAME_LEN = 1024
+		def sysmodules(io)
+			ph = NPGRT.api('kernel32', 'GetCurrentProcess').call			
+			num = [0].pack("L")
+			NPGRT.api('psapi', 'EnumProcessModules').call ph, 0, 0, num
+			num = num.unpack("L").first
+			arr = [0].pack("L")*num
+			lnum = [0].pack("L")
+			NPGRT.api('psapi', 'EnumProcessModules').call ph, arr, num, lnum
+			ret = []
+			lnum = lnum.unpack("L").first
+ 			arr.unpack(NPGRT::PtrType + "*")[0, lnum].each{|ptr|
+				break if ptr == 0 && !ret.empty?
+				buf = [0].pack("S")*MAX_MODULE_NAME_LEN
+				NPGRT.api('kernel32', 'GetModuleFileNameW').call ptr, buf, MAX_MODULE_NAME_LEN
+			
+				ret << NPGRT.wstrread(buf)
+			}
+			form io, "System Modules" do |io|
+				ret.each{|x|
+					io << " - " << x << "\n"
+				}
+			end
+		end
+
+	
+
+
+		def normal
+			basic(@io)
+			inifile(@io)
+			exception(@io)
+			plugins(@io)
+			sysmodules(@io)
+			rubyobjects(@io)
+			position(@io)
+				
+			scripts(@io)
+			minidump(@io)
+		end
+	end
+end

data/lib/npgrt/report.rb~

@@ -0,0 +1,183 @@
+module NPGRT
+	class Report
+		
+
+		def initialize(io, &b)
+			@io = io
+			@binding = b.binding
+		end
+
+		private
+		def title(str)
+			"#{str} ----------\n"
+		end
+
+		def tail
+			"\n\n\n"
+		end
+
+		def form(io, title)
+			io << title(title)
+			yield io
+			io << tail
+			io
+		end
+		public
+		def inifile(io)
+			return unless FileTest.file?("Game.ini")
+			form io, "Game.ini" do |io|
+				io << File.read("Game.ini")
+			end
+		end
+
+		def scripts(io)
+			return unless defined?($RGSS_SCRIPTS)
+			form io, "Scripts" do |io|
+				io << $RGSS_SCRIPTS.map{|x| "  [%s] " % x[1]}.join("\n")
+			end		
+		end
+
+		def basic(io)
+			form io, "Basic Information" do |io|
+				io << "path:" << Dir.getwd << "\n"
+				io << "Ruby Version:" << RUBY_VERSION << "\n"
+				io << "NPGRT Version:" << NPGRT::VERSION << "\n"
+				io << "Platform:" << NPGRT::PlatformWidth << "\n"
+				begin
+					str = "" << "FPS:" << Graphics.frame_rate.to_s << "\n"
+					str << "Frame Count:" << Graphics.frame_count.to_s << "\n"
+					io << str
+				rescue
+				end
+				io << "Command Line:" << NPGRT.wstrread(NPGRT.api('kernel32', 'GetCommandLineW').call) << "\n"
+
+			end
+		end
+
+		def position(io)
+			form io, "Position" do |io|
+				io << "__FILE__:" << eval('__FILE__', @binding) << "\n"
+				if eval('__FILE__', @binding) =~ /\d+/ && $RGSS_SCRIPTS
+					io << "Section name :[" << $RGSS_SCRIPTS[$1.to_i][1] << "]\n"
+				end
+			       io << "__LINE__:" <<eval('__LINE__', @binding) << "\n"	
+			       io << "Nesting:" << eval('Module.nesting', @binding) << "\n"
+			       io << "caller:" << eval('caller', @binding).join("\n") << "\n"
+			end
+		end
+
+		def exception(io)
+			form io, "Exceptions" do
+				if $!
+					io << $!.to_s << "\n"
+					io << $!.backtrace.join("\n") << "\n"
+				else
+					io << "No exception." << "\n"
+				end
+			end
+		end
+
+		def rubyobjects(io)
+			form io, "Global Variables" do
+				(global_variables - [:$RGSS_SCRIPTS]).each{|g|
+				begin
+					v = eval(g.to_s, @binding)
+					io << (" #{g}:" << v.inspect << "\n")
+				rescue 
+				end
+				}
+				io << " $RGSS_SCRIPTS: [#{$RGSS_SCRIPTS.size} scripts]" << "\n" if defined?($RGSS_SCRIPTS)
+			end
+			form io, "Local Variables" do
+				eval('local_variables', @binding).each{|g|
+				begin
+					v = eval(g.to_s, @binding)
+					io << (" #{g}:" << v.inspect << "\n")
+				rescue 
+				end
+				}
+			end
+			form io, "Modules" do
+				ret = []
+				ObjectSpace.each_object(Module) do |m|
+					ret << m
+				end
+				ret.sort_by{|x| x.to_s}.each do |m|
+					io << "  " << (m.is_a?(Class) ? "C " : "M ") << m << (m.is_a?(Class) ? "(class)" : "(module)") << ObjectSpace.each_object(m){} << "\n" 
+				end
+
+				
+			end
+		end
+		def plugins(io)
+			form io, "LOADED_FEATURES" do
+				io << $LOADED_FEATURES.join("\n") << "\n"
+			end
+			form io, "PATH" do
+				io << ENV['PATH'] << "\n"
+			end
+		end
+
+		def minidump(io)
+			x = NPGRT.api('Kernel32', 'CreateFileW').call(
+				NPGRT.to_unicode("minidump.dmp\0\0")+"\0\0",
+				0x40000000, 0, 0, 2, 0x80, 0
+			)
+			NPGRT.api('DbgHelp.dll', 'MiniDumpWriteDump').call(
+				NPGRT.api('kernel32', 'GetCurrentProcess').call,
+				NPGRT.api('kernel32', 'GetCurrentProcessId').call,
+				x,
+				0,
+				0,
+				0,
+				0
+			)
+			NPGRT.api('kernel32', 'CloseHandle').call x
+			form io, "Core Dump" do
+				io << "Dump file written to minidump.dmp.\n"
+			en
+			
+		end
+
+		MAX_MODULE_NAME_LEN = 1024
+		def sysmodules(io)
+			ph = NPGRT.api('kernel32', 'GetCurrentProcess').call			
+			num = [0].pack("L")
+			NPGRT.api('psapi', 'EnumProcessModules').call ph, 0, 0, num
+			num = num.unpack("L").first
+			arr = [0].pack("L")*num
+			lnum = [0].pack("L")
+			NPGRT.api('psapi', 'EnumProcessModules').call ph, arr, num, lnum
+			ret = []
+			lnum = lnum.unpack("L").first
+ 			arr.unpack(NPGRT::PtrType + "*")[0, lnum].each{|ptr|
+				break if ptr == 0 && !ret.empty?
+				buf = [0].pack("S")*MAX_MODULE_NAME_LEN
+				NPGRT.api('kernel32', 'GetModuleFileNameW').call ptr, buf, MAX_MODULE_NAME_LEN
+			
+				ret << NPGRT.wstrread(buf)
+			}
+			form io, "System Modules" do |io|
+				ret.each{|x|
+					io << " - " << x << "\n"
+				}
+			end
+		end
+
+	
+
+
+		def normal
+			basic(@io)
+			inifile(@io)
+			exception(@io)
+			plugins(@io)
+			sysmodules(@io)
+			rubyobjects(@io)
+			position(@io)
+				
+			scripts(@io)
+			minidump(@io)
+		end
+	end
+end

data/lib/npgrt/require.rb

@@ -6,6 +6,28 @@ module NPGRT
 			super a
 		end
 
+		ADDPATH = []
+
+		def binary_forms(a)
+			w = NPGRT::PlatformWidth.to_s
+			[ a, a+".dll", a+".so", 
+     			  File.basename(a) + "_" + w + File.extname(a),
+			  File.basename(a) + "_" + w + ".dll",
+			  File.basename(a) + "_" + w + ".so"
+			]
+		end
+
+		def require_binary(a)
+			path = binary_forms(a).inject([]){|ret, v|
+				ret.concat Gem.find_files v
+			}
+			v = path.map{|x| 
+				FileTest.file?(x) ? NPGRT.normalize_pathsep_os(File.dirname(x)) : nil
+			}.compact - ADDPATH
+			ENV['path'] += ";" + v.join(";")
+			ADDPATH.concat v
+		end
+
 		alias primitive_require require
 		private :primitive_require
 		
@@ -21,7 +43,7 @@ module NPGRT
 			dir = File.dirname dir if FileTest.file?(dir)
 			system "cmd /c \"cd /d #{dir} & rake npgrt:build\""
 		end
+
 	end
 
-	extend Require
 end