RGSS 连接到MySQL数据库(网游爱好者的福音)

Goldencolor

RGSS 连接到MySQL数据库,,有图有真相在查找MySql资料时无意看到,,转过来. 翻译~



Mysql support for Rgss
Version: 1.0
By: Berka
有任何问题直接回复~3Q
RGSSMySQL.rar (121.55 KB, 下载次数: 2791)

2010-9-17 11:03 上传

点击文件名下载附件

MySQL 下载地址：
Mysql
SQLyog

1. 
   
2. #======================================================================
   
3. #                                                                   Net::Mysql
   
4. #      29-05-2010                            www.rpgmakervx-fr.com                                  Rgss1&2  v.1
   
5. #                                                                    par berka                 
   
6. #--------------------------------------------------------------------------------------------------------------
   
7. # 此脚本是免费使用。可以随意转载,注明出处！！
   
8. #--------------------------------------------------------------------------------------------------------------
   
9. # 警告 : 如果您的游戏破解和解密, 你的MySQL将会被登录！
   
10. # 请勿使用包含个人信息数据库。(最好对连接字符串进行加密,举例MD5,)
    
11. # 你的MySQL主机应该接受外部连接,,
    
12. # 它检查远程SSH访问你的数据库。
    
13. #--------------------------------------------------------------------------------------------------------------
    
14. # 这个脚本可以直接连接到MySQL数据库,,需要 "libmySQL.dll" 文件的支持!!
    
15. #--------------------------------------------------------------------------------------------------------------
    
16. # 注意: 如果你对游戏加密了,依然可以访问到MySql数据库。
    
17. # 他是直接通过远程SSH访问你的数据库= =,,这点大家注意
    
18. #--------------------------------------------------------------------------------------------------------------------------
    
19. # 必须存在"libmySQL.dll"否则无法连接到MySql数据库。
    
20. #--------------------------------------------------------------------------------------------------------------------------
    
21. #  — md5() support
    
22. #  — Mysql 方法(函数):
    
23. #   - Net::Mysql.new([host,user,pass,base,port]) : return : mysql 连接句柄
    
24. #   - @mysql.close : return : bool
    
25. #   - @mysql.list_tables([filter]) : return : ["table1", "table2"]
    
26. #   - @mysql.select_db(base_name) : return : true if the db exists or false
    
27. #   - @mysql.query("query",ret=false) : return : if ret = true : rows else result handle
    
28. #   - @mysql.get_fields([handle result]) : return : ["field1", "field2"]
    
29. #   - @mysql.get_rows([handle result]) : return : [["l1 row1", "l1 row2"], ["l2 row1", "l2 row2"]]
    
30. #   - @mysql.fetch_assoc : return : {"field" => ["row1", "row2"] }
    
31. #   - @mysql.num_rows([handle result]) : return : integer
    
32. #  — Html 方法(函数):
    
33. #   - "string".to_ruby : return : true, false, nil, Integer, Float, self, etc.
    
34. #   - "<berka>".htmlspecialchars : return : "&lr;berka&gt;"
    
35. #   - "<berka>".urlencode : return : "%3Cberka%3E"
    
36. #   - "%3Cberka%3E".urldecode : return : "<berka>"
    
37. #--------------------------------------------------------------------------------------------------------------------------
    
38. # SQL 查询示例：
    
39. #  —  "SELECT * FROM table"
    
40. #  —  "INSERT INTO table (fields) VALUES (values)"
    
41. #  —  "INSERT INTO table SET field = value WHERE field = value"
    
42. #  —  "UPDATE table SET field = value WHERE field = value"
    
43. #--------------------------------------------------------------------------------------------------------------------------
    
44. # 示例 :
    
45. # @mysql = Net::Mysql.new
    
46. # @mysql.query("SELECT * FROM `members`)
    
47. # res = @mysql.fetch_assoc
    
48. # => {:id=>["1","2"], :nom=>["berka","rgss"], :age=>["19",""]}
    
49. #======================================================================
    
50. 
    
51. module Berka
    
52.   module Mysql
    
53.     #mysql 服务器(local(本地) : 127.0.0.1)
    
54.     Host   = "127.0.0.1"
    
55.         #mysql 用户名
    
56.     User   = ""
    
57.         #mysql 密码
    
58.     Pass  = ""   
    
59.         #数据库名字(base name)
    
60.     Base  = "rgss"
    
61.         #服务器端口(默认:3306)
    
62.     Port    = 3306                                  # server port (default: 3306)
    
63.    
    
64.     Err_Con = "Mysql:\n无法连接到数据库"
    
65.     Err_Req = "Mysql:\n无法发送查询"
    
66.   end
    
67.   
    
68.   module Html
    
69.     Spec_Char=["$","&","+",",","/",";",":","=","@","?"," ","<",">","#","%","{","}","|","\\","^","~","[","]","`"]
    
70.   end
    
71. end
    
72. 
    
73. class Numeric
    
74.   def copymem(len)
    
75.     # 移动存储转换到C结构Ruby对象
    
76.     Win32API.new("kernel32", "RtlMoveMemory", "ppl", "").call(buf="\0"*len,self,len);buf
    
77.   end
    
78. end
    
79. 
    
80. class String
    
81.   
    
82.   def to_ruby
    
83.     # 检测如果该字符串是一个MD5 hash
    
84.     return self if self=~/^[a-f0-9]{32}$/
    
85.     #转换成一个Ruby controls字符串
    
86.     eval(self)rescue self
    
87.   end
    
88.   
    
89.   def htmlspecialchars
    
90.     # converts special chars to html compatibles chars (ASCII)
    
91.     {"&"=>"&amp;",'"'=>"&quot;","'"=>"&rsquo;","<"=>"&lr;",">"=>"&gt;"}.each_pair{|k,v|self.gsub!(k,v)}
    
92.     self
    
93.   end
    
94.    
    
95.   def urlencode
    
96.     # 特殊字符的URL转换
    
97.     o="";self.scan(/./).each{|c|c="%"+c.unpack('H*')[0]if Berka::Html::Spec_Char.include?(c);o<<c};o
    
98.   end
    
99.    
    
100.   def urldecode
     
101.     # converts encoded special char of url to normal chars
     
102.     self.gsub!(/\%(\w\w)/){|c|c.gsub!("%","").hex.chr}
     
103.   end
     
104. end
     
105.   
     
106. module Net
     
107.   class Mysql
     
108.     MI=Win32API.new("libmysql.dll","mysql_init","l","l")
     
109.     MC=Win32API.new("libmysql.dll","mysql_close","l","l")
     
110.     MQ=Win32API.new("libmysql.dll","mysql_query","lp","l")
     
111.     MLT=Win32API.new("libmysql.dll","mysql_list_tables","lp","l")
     
112.     MFL=Win32API.new("libmysql.dll","mysql_fetch_lengths","p","l")
     
113.     MFR=Win32API.new("libmysql.dll","mysql_fetch_row","p","l")
     
114.     MNF=Win32API.new("libmysql.dll","mysql_num_fields","p","l")
     
115.     MFC=Win32API.new("libmysql.dll","mysql_field_count","p","l")
     
116.     MSR=Win32API.new("libmysql.dll","mysql_store_result","l","l")
     
117.     MRC=Win32API.new("libmysql.dll","mysql_real_connect","lpppplpl","l")
     
118.     MNR=Win32API.new("libmysql.dll","mysql_num_rows","p","l")
     
119.     MFFD=Win32API.new("libmysql.dll","mysql_fetch_field_direct","pi","l")
     
120.     MFRE=Win32API.new("libmysql.dll","mysql_free_result","p","l")
     
121.     MSDB=Win32API.new("libmysql.dll","mysql_select_db","p","l")
     
122.    
     
123.     attr_reader :handle
     
124.    
     
125.     def initialize(h=Berka::Mysql::Host,u=Berka::Mysql::User,p=Berka::Mysql::Pass,b=Berka::Mysql::Base,po=Berka::Mysql::Port)
     
126.       # @handle : 处理MySQL的初始化
     
127.       @handle=MI.call(0)
     
128.       # 建立MySQL连接
     
129.       (print(Berka::Mysql::Err_Con))if MRC.call(@handle,h,u,p,b,po,nil,0)==0
     
130.       # returns: handle
     
131.       @handle
     
132.     end
     
133.    
     
134.     def close
     
135.       # 关闭当前连接
     
136.       MC.call(@handle)
     
137.     end
     
138.    
     
139.     def select_db(base)
     
140.       # 选择一个数据库
     
141.       MSDB.call(base)==true
     
142.     end
     
143.    
     
144.     def list_tables(m="")
     
145.       # lists tables request -> fetch the result -> to ruby string
     
146.       l=MFR.call(MLT.call(@my,m)).copymem(1024)
     
147.       # splits the string to array -> list of tables
     
148.       l.scan(/\t(\w+)\0/).flatten
     
149.     end
     
150.    
     
151.     def query(req,ret=false)
     
152.       # sends the query (msg error)
     
153.       (return print(Berka::Mysql::Err_Req+req))if !MQ.call(@handle,req)
     
154.       # previous results are released
     
155.       MFRE.call(@result)if @result
     
156.       # gets the results from the query -> c struct handle
     
157.       @result=MSR.call(@handle)
     
158.       ret ? get_rows(@result) : @result
     
159.     end
     
160.    
     
161.     # Proc: gets the name of the field (cstruct) -> to ruby string of handles -> to ruby string
     
162.     # returns the fieldname or nil if the field is not found.
     
163.     ReadField=Proc.new{|r,i,of|MFFD.call(r,i).copymem(1024).unpack("iissi")[0].copymem(of).delete!("\0")}
     
164.    
     
165.     def get_fields(res=nil)
     
166.       # if a result handle is provided
     
167.       r=res.nil? ? @result : res
     
168.       # gets the number of fields, offset: 8bytes-2 (cf. loop)
     
169.       nf,ch,of=MFC.call(@handle),[],6
     
170.       # each field: if the fieldname is not found: increase the offset of bytes.
     
171.       nf.times{|i|a=ReadField.call(r,i,of+=2)until a
     
172.         # add to the fields array
     
173.         ch<<a
     
174.         # reinitialize the offset for the next iteration
     
175.         of=6}
     
176.       # returns an array of fields
     
177.       ch
     
178.     end
     
179.    
     
180.     def get_rows(res=nil)
     
181.       # if a result handle is provided
     
182.       r=res.nil? ? @result : res
     
183.       # nr: number of rows, nf: number of fields
     
184.       nr,nf,en=MNR.call(r),MNF.call(r),[]
     
185.       # each row:
     
186.       nr.times{|i|
     
187.        # gets each row: c struct -> to ruby string -> to array (handles)
     
188.        c=MFR.call(r).copymem(4).unpack("i")[0]
     
189.        # gets each field length: c struct -> to ruby string -> to array (handles)
     
190.        tf=MFL.call(r).copymem(4*nf).unpack("i*")
     
191.        # size of field: offset of each field
     
192.        sf=tf.inject(0){|n,i|n+i}
     
193.        # handle of row -> to string (offset) -> to array
     
194.        en<<c.copymem(sf+nf).split("\0")
     
195.        }
     
196.        # returns each row as an array
     
197.       en
     
198.     end
     
199.    
     
200.     def num_rows(res=nil)
     
201.       # if a result handle is provided
     
202.       r=res.nil? ? @result : res
     
203.       # returns: number of rows
     
204.       MNR.call(r)
     
205.     end
     
206.    
     
207.     def fetch_assoc(to_ruby=false)
     
208.       # gets rows and fields
     
209.       h,f,r={},get_fields,get_rows
     
210.       # each field: read the rows and store them to an hash : h[:field]=[rows]
     
211.       # rows are converted to ruby objects if to_ruby == true
     
212.       f.each_with_index{|fi,i|t=[];r.each{|l|t<<l[i]};h[fi.to_sym]=(to_ruby ? t.map!{|o|o.to_ruby if o} : t)}
     
213.       h
     
214.     end
     
215.   end
     
216. end

复制代码

bbaugle

很好很强大.......RM中能用帐号登录了..

zphyp120

kankan

DeathKing

恩，现在正在研究这方面的饿内容，是个很好的参考。

Goldencolor

:lol 很不错的东西，我自己也在完善ing,做一C/S程序来连起来= =。。主要是对C++这东西无能无力。

orochi2k

很好很强大.......RM中能用帐号登录了..
bbaugle 发表于 2010-9-17 12:17

账号登陆的话只要调用IE的API就够实现了

secondsen

回复能看到隐藏的东西

maju_saka

隐藏的是什么东东捏？